| 12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715171617171718171917201721172217231724172517261727172817291730173117321733173417351736173717381739174017411742174317441745174617471748174917501751175217531754175517561757175817591760176117621763176417651766176717681769177017711772177317741775177617771778177917801781178217831784178517861787178817891790179117921793179417951796179717981799180018011802180318041805180618071808180918101811181218131814181518161817181818191820182118221823182418251826182718281829183018311832183318341835183618371838183918401841184218431844184518461847184818491850185118521853185418551856185718581859186018611862186318641865186618671868186918701871187218731874187518761877187818791880188118821883188418851886188718881889189018911892189318941895189618971898189919001901190219031904190519061907190819091910191119121913191419151916191719181919192019211922192319241925192619271928192919301931193219331934193519361937193819391940194119421943194419451946194719481949195019511952195319541955195619571958195919601961196219631964196519661967196819691970197119721973197419751976197719781979198019811982198319841985198619871988198919901991199219931994199519961997199819992000200120022003200420052006200720082009201020112012201320142015201620172018201920202021202220232024202520262027202820292030203120322033203420352036203720382039204020412042204320442045204620472048204920502051205220532054205520562057205820592060206120622063206420652066206720682069207020712072207320742075207620772078207920802081208220832084208520862087208820892090209120922093209420952096209720982099210021012102210321042105210621072108210921102111211221132114211521162117211821192120212121222123212421252126212721282129213021312132213321342135213621372138213921402141214221432144214521462147214821492150215121522153215421552156215721582159216021612162216321642165216621672168216921702171217221732174217521762177217821792180218121822183218421852186218721882189219021912192219321942195219621972198219922002201220222032204220522062207220822092210221122122213221422152216221722182219222022212222222322242225222622272228222922302231223222332234223522362237223822392240224122422243224422452246224722482249225022512252225322542255225622572258225922602261226222632264226522662267226822692270227122722273227422752276227722782279228022812282228322842285228622872288228922902291229222932294229522962297229822992300230123022303230423052306230723082309231023112312231323142315231623172318231923202321232223232324232523262327232823292330233123322333233423352336233723382339234023412342234323442345234623472348234923502351235223532354235523562357235823592360236123622363236423652366236723682369237023712372237323742375237623772378237923802381238223832384238523862387238823892390239123922393239423952396239723982399240024012402240324042405240624072408240924102411241224132414241524162417241824192420242124222423242424252426242724282429243024312432243324342435243624372438243924402441244224432444244524462447244824492450245124522453245424552456245724582459246024612462246324642465246624672468246924702471247224732474247524762477247824792480248124822483248424852486248724882489249024912492249324942495249624972498249925002501250225032504250525062507250825092510251125122513251425152516251725182519252025212522252325242525252625272528252925302531253225332534253525362537253825392540254125422543254425452546254725482549255025512552255325542555255625572558255925602561256225632564256525662567256825692570257125722573257425752576257725782579258025812582258325842585258625872588258925902591259225932594259525962597259825992600260126022603260426052606260726082609261026112612261326142615261626172618261926202621262226232624262526262627262826292630263126322633263426352636263726382639264026412642264326442645264626472648264926502651265226532654265526562657265826592660266126622663266426652666266726682669267026712672267326742675267626772678267926802681268226832684268526862687268826892690269126922693269426952696269726982699270027012702270327042705270627072708270927102711271227132714271527162717271827192720272127222723272427252726272727282729273027312732273327342735273627372738273927402741274227432744274527462747274827492750275127522753275427552756275727582759276027612762276327642765276627672768276927702771277227732774277527762777277827792780278127822783278427852786278727882789279027912792279327942795279627972798279928002801280228032804280528062807280828092810281128122813281428152816281728182819282028212822282328242825282628272828282928302831283228332834283528362837283828392840284128422843284428452846284728482849285028512852285328542855285628572858285928602861286228632864286528662867286828692870287128722873287428752876287728782879288028812882288328842885288628872888288928902891289228932894289528962897289828992900290129022903290429052906290729082909291029112912291329142915291629172918291929202921292229232924292529262927292829292930293129322933293429352936293729382939294029412942294329442945294629472948294929502951295229532954295529562957295829592960296129622963296429652966296729682969297029712972297329742975297629772978297929802981298229832984298529862987298829892990299129922993299429952996299729982999300030013002300330043005300630073008300930103011301230133014301530163017301830193020302130223023302430253026302730283029303030313032303330343035303630373038303930403041304230433044304530463047304830493050305130523053305430553056305730583059306030613062306330643065306630673068306930703071307230733074307530763077307830793080308130823083308430853086308730883089309030913092309330943095309630973098309931003101310231033104310531063107310831093110311131123113311431153116311731183119312031213122312331243125312631273128312931303131313231333134313531363137313831393140314131423143314431453146314731483149315031513152315331543155315631573158315931603161316231633164316531663167316831693170317131723173317431753176317731783179318031813182318331843185318631873188318931903191319231933194319531963197319831993200320132023203320432053206320732083209321032113212321332143215321632173218321932203221322232233224322532263227322832293230323132323233323432353236323732383239324032413242324332443245324632473248324932503251325232533254325532563257325832593260326132623263326432653266326732683269327032713272327332743275327632773278327932803281328232833284328532863287328832893290329132923293329432953296329732983299330033013302330333043305330633073308330933103311331233133314331533163317331833193320332133223323332433253326332733283329333033313332333333343335333633373338333933403341334233433344334533463347334833493350335133523353335433553356335733583359336033613362336333643365336633673368336933703371337233733374337533763377337833793380338133823383338433853386338733883389339033913392339333943395339633973398339934003401340234033404340534063407340834093410341134123413341434153416341734183419342034213422342334243425342634273428342934303431343234333434343534363437343834393440344134423443344434453446344734483449345034513452345334543455345634573458345934603461346234633464346534663467346834693470347134723473347434753476347734783479348034813482348334843485348634873488348934903491349234933494349534963497349834993500350135023503350435053506350735083509351035113512351335143515351635173518351935203521352235233524352535263527352835293530353135323533353435353536353735383539354035413542354335443545354635473548354935503551355235533554355535563557355835593560356135623563356435653566356735683569357035713572357335743575357635773578357935803581358235833584358535863587358835893590359135923593359435953596359735983599360036013602360336043605360636073608360936103611361236133614361536163617361836193620362136223623362436253626362736283629363036313632363336343635363636373638363936403641364236433644364536463647364836493650365136523653365436553656365736583659366036613662366336643665366636673668366936703671367236733674367536763677367836793680368136823683368436853686368736883689369036913692369336943695369636973698369937003701370237033704370537063707370837093710371137123713371437153716371737183719372037213722372337243725372637273728372937303731373237333734373537363737373837393740374137423743374437453746374737483749375037513752375337543755375637573758375937603761376237633764376537663767376837693770377137723773377437753776377737783779378037813782378337843785378637873788378937903791379237933794379537963797379837993800380138023803380438053806380738083809381038113812381338143815381638173818381938203821382238233824382538263827382838293830383138323833383438353836383738383839384038413842384338443845384638473848384938503851385238533854385538563857385838593860386138623863386438653866386738683869387038713872387338743875387638773878387938803881388238833884388538863887388838893890389138923893389438953896389738983899390039013902390339043905390639073908390939103911391239133914391539163917391839193920392139223923392439253926392739283929393039313932393339343935393639373938393939403941394239433944394539463947394839493950395139523953395439553956395739583959396039613962396339643965396639673968396939703971397239733974397539763977397839793980398139823983398439853986398739883989399039913992399339943995399639973998399940004001400240034004400540064007400840094010401140124013401440154016401740184019402040214022402340244025402640274028402940304031403240334034403540364037403840394040404140424043404440454046404740484049405040514052405340544055405640574058405940604061406240634064406540664067406840694070407140724073407440754076407740784079408040814082408340844085408640874088408940904091409240934094409540964097409840994100410141024103410441054106410741084109411041114112411341144115411641174118411941204121412241234124412541264127412841294130413141324133413441354136413741384139414041414142414341444145414641474148414941504151415241534154415541564157415841594160416141624163416441654166416741684169417041714172417341744175417641774178417941804181418241834184418541864187418841894190419141924193419441954196419741984199420042014202420342044205420642074208420942104211421242134214421542164217421842194220422142224223422442254226422742284229423042314232423342344235423642374238423942404241424242434244424542464247424842494250425142524253425442554256425742584259426042614262426342644265426642674268426942704271427242734274427542764277427842794280428142824283428442854286428742884289429042914292429342944295429642974298429943004301430243034304430543064307430843094310431143124313431443154316431743184319432043214322432343244325432643274328432943304331433243334334433543364337433843394340434143424343434443454346434743484349435043514352435343544355435643574358435943604361436243634364436543664367436843694370437143724373437443754376437743784379438043814382438343844385438643874388438943904391439243934394439543964397439843994400440144024403440444054406440744084409441044114412441344144415441644174418441944204421442244234424442544264427442844294430443144324433443444354436443744384439444044414442444344444445444644474448444944504451445244534454445544564457445844594460446144624463446444654466446744684469447044714472447344744475447644774478447944804481448244834484448544864487448844894490449144924493449444954496449744984499450045014502450345044505450645074508450945104511451245134514451545164517451845194520452145224523452445254526452745284529453045314532453345344535453645374538453945404541454245434544454545464547454845494550455145524553455445554556455745584559456045614562456345644565456645674568456945704571457245734574457545764577457845794580458145824583458445854586458745884589459045914592459345944595459645974598459946004601460246034604460546064607460846094610461146124613461446154616461746184619462046214622462346244625462646274628462946304631463246334634463546364637463846394640464146424643464446454646464746484649465046514652465346544655465646574658465946604661466246634664466546664667466846694670467146724673467446754676467746784679468046814682468346844685468646874688468946904691469246934694469546964697469846994700470147024703470447054706470747084709471047114712471347144715471647174718471947204721472247234724472547264727472847294730473147324733473447354736473747384739474047414742474347444745474647474748474947504751475247534754475547564757475847594760476147624763476447654766476747684769477047714772477347744775477647774778477947804781478247834784478547864787478847894790479147924793479447954796479747984799480048014802480348044805480648074808480948104811481248134814481548164817481848194820482148224823482448254826482748284829483048314832483348344835483648374838483948404841484248434844484548464847484848494850485148524853485448554856485748584859486048614862486348644865486648674868486948704871487248734874487548764877487848794880488148824883488448854886488748884889489048914892489348944895489648974898489949004901490249034904490549064907490849094910491149124913491449154916491749184919492049214922492349244925492649274928492949304931493249334934493549364937493849394940494149424943494449454946494749484949495049514952495349544955495649574958495949604961496249634964496549664967496849694970497149724973497449754976497749784979498049814982498349844985498649874988498949904991499249934994499549964997499849995000500150025003500450055006500750085009501050115012501350145015501650175018501950205021502250235024502550265027502850295030503150325033503450355036503750385039504050415042504350445045504650475048504950505051505250535054505550565057505850595060506150625063506450655066506750685069507050715072507350745075507650775078507950805081508250835084508550865087508850895090509150925093509450955096509750985099510051015102510351045105510651075108510951105111511251135114511551165117511851195120512151225123512451255126512751285129513051315132513351345135513651375138513951405141514251435144514551465147514851495150515151525153515451555156515751585159516051615162516351645165516651675168516951705171517251735174517551765177517851795180518151825183518451855186518751885189519051915192519351945195519651975198519952005201520252035204520552065207520852095210521152125213521452155216521752185219522052215222522352245225522652275228522952305231523252335234523552365237523852395240524152425243524452455246524752485249525052515252525352545255525652575258525952605261526252635264526552665267526852695270527152725273527452755276527752785279528052815282528352845285528652875288528952905291529252935294529552965297529852995300530153025303530453055306530753085309531053115312531353145315531653175318531953205321532253235324532553265327532853295330533153325333533453355336533753385339534053415342534353445345534653475348534953505351535253535354535553565357535853595360536153625363536453655366536753685369537053715372537353745375537653775378537953805381538253835384538553865387538853895390539153925393539453955396539753985399540054015402540354045405540654075408540954105411541254135414541554165417541854195420542154225423542454255426542754285429543054315432543354345435543654375438543954405441544254435444544554465447544854495450545154525453545454555456545754585459546054615462546354645465546654675468546954705471547254735474547554765477547854795480548154825483548454855486548754885489549054915492549354945495549654975498549955005501550255035504550555065507550855095510551155125513551455155516551755185519552055215522552355245525552655275528552955305531553255335534553555365537553855395540554155425543554455455546554755485549555055515552555355545555555655575558555955605561556255635564556555665567556855695570557155725573557455755576557755785579558055815582558355845585558655875588558955905591559255935594559555965597559855995600560156025603560456055606560756085609561056115612561356145615561656175618561956205621562256235624562556265627562856295630563156325633563456355636563756385639564056415642564356445645564656475648564956505651565256535654565556565657565856595660566156625663566456655666566756685669567056715672567356745675567656775678567956805681568256835684568556865687568856895690569156925693569456955696569756985699570057015702570357045705570657075708570957105711571257135714571557165717571857195720572157225723572457255726572757285729573057315732573357345735573657375738573957405741574257435744574557465747574857495750575157525753575457555756575757585759576057615762576357645765576657675768576957705771577257735774577557765777577857795780578157825783578457855786578757885789579057915792579357945795579657975798579958005801580258035804580558065807580858095810581158125813581458155816581758185819582058215822582358245825582658275828582958305831583258335834583558365837583858395840584158425843584458455846584758485849585058515852585358545855585658575858585958605861586258635864586558665867586858695870587158725873587458755876587758785879588058815882588358845885588658875888588958905891589258935894589558965897589858995900590159025903590459055906590759085909591059115912591359145915591659175918591959205921592259235924592559265927592859295930593159325933593459355936593759385939594059415942594359445945594659475948594959505951595259535954595559565957595859595960596159625963596459655966596759685969597059715972597359745975597659775978597959805981598259835984598559865987598859895990599159925993599459955996599759985999600060016002600360046005600660076008600960106011601260136014601560166017601860196020602160226023602460256026602760286029603060316032603360346035603660376038603960406041604260436044604560466047604860496050605160526053605460556056605760586059606060616062606360646065606660676068606960706071607260736074607560766077607860796080608160826083608460856086608760886089609060916092609360946095609660976098609961006101610261036104610561066107610861096110611161126113611461156116611761186119612061216122612361246125612661276128612961306131613261336134613561366137613861396140614161426143614461456146614761486149615061516152615361546155615661576158615961606161616261636164616561666167616861696170617161726173617461756176617761786179618061816182618361846185618661876188618961906191619261936194619561966197619861996200620162026203620462056206620762086209621062116212621362146215621662176218621962206221622262236224622562266227622862296230623162326233623462356236623762386239624062416242624362446245624662476248624962506251625262536254625562566257625862596260626162626263626462656266626762686269627062716272627362746275627662776278627962806281628262836284628562866287628862896290629162926293629462956296629762986299630063016302630363046305630663076308630963106311631263136314631563166317631863196320632163226323632463256326632763286329633063316332633363346335633663376338633963406341634263436344634563466347634863496350635163526353635463556356635763586359636063616362636363646365636663676368636963706371637263736374637563766377637863796380638163826383638463856386638763886389639063916392639363946395639663976398639964006401640264036404640564066407640864096410641164126413641464156416641764186419642064216422642364246425642664276428642964306431643264336434643564366437643864396440644164426443644464456446644764486449645064516452645364546455645664576458645964606461646264636464646564666467646864696470647164726473647464756476647764786479648064816482648364846485648664876488648964906491649264936494649564966497649864996500650165026503650465056506650765086509651065116512651365146515651665176518651965206521652265236524652565266527652865296530653165326533653465356536653765386539654065416542654365446545654665476548654965506551655265536554655565566557655865596560656165626563656465656566656765686569657065716572657365746575657665776578657965806581658265836584658565866587658865896590659165926593659465956596659765986599660066016602660366046605660666076608660966106611661266136614661566166617661866196620662166226623662466256626662766286629663066316632663366346635663666376638663966406641664266436644664566466647664866496650665166526653665466556656665766586659666066616662666366646665666666676668666966706671667266736674667566766677667866796680668166826683668466856686668766886689669066916692669366946695669666976698669967006701670267036704670567066707670867096710671167126713671467156716671767186719672067216722672367246725672667276728672967306731673267336734673567366737673867396740674167426743674467456746674767486749675067516752675367546755675667576758675967606761676267636764676567666767676867696770677167726773677467756776677767786779678067816782678367846785678667876788678967906791679267936794679567966797679867996800680168026803680468056806680768086809681068116812681368146815681668176818681968206821682268236824682568266827682868296830683168326833683468356836683768386839684068416842684368446845684668476848684968506851685268536854685568566857685868596860686168626863686468656866686768686869687068716872687368746875687668776878687968806881688268836884688568866887688868896890689168926893689468956896689768986899690069016902690369046905690669076908690969106911691269136914691569166917691869196920692169226923692469256926692769286929693069316932693369346935693669376938693969406941694269436944694569466947694869496950695169526953695469556956695769586959696069616962696369646965696669676968696969706971697269736974697569766977697869796980698169826983698469856986698769886989699069916992699369946995699669976998699970007001700270037004700570067007700870097010701170127013701470157016701770187019702070217022702370247025702670277028702970307031703270337034703570367037703870397040704170427043704470457046704770487049705070517052705370547055705670577058705970607061706270637064706570667067706870697070707170727073707470757076707770787079708070817082708370847085708670877088708970907091709270937094709570967097709870997100710171027103710471057106710771087109711071117112711371147115711671177118711971207121712271237124712571267127712871297130713171327133713471357136713771387139714071417142714371447145714671477148714971507151715271537154715571567157715871597160716171627163716471657166716771687169717071717172717371747175717671777178717971807181718271837184718571867187718871897190719171927193719471957196719771987199720072017202720372047205720672077208720972107211721272137214721572167217721872197220722172227223722472257226722772287229723072317232723372347235723672377238723972407241724272437244724572467247724872497250725172527253725472557256725772587259726072617262726372647265726672677268726972707271727272737274727572767277727872797280728172827283728472857286728772887289729072917292729372947295729672977298729973007301730273037304730573067307730873097310731173127313731473157316731773187319732073217322732373247325732673277328732973307331733273337334733573367337733873397340734173427343734473457346734773487349735073517352735373547355735673577358735973607361736273637364736573667367736873697370737173727373737473757376737773787379738073817382738373847385738673877388738973907391739273937394739573967397739873997400740174027403740474057406740774087409741074117412741374147415741674177418741974207421742274237424742574267427742874297430743174327433743474357436743774387439744074417442744374447445744674477448744974507451745274537454745574567457745874597460746174627463746474657466746774687469747074717472747374747475747674777478747974807481748274837484748574867487748874897490749174927493749474957496749774987499750075017502750375047505750675077508750975107511751275137514751575167517751875197520752175227523752475257526752775287529753075317532753375347535753675377538753975407541754275437544754575467547754875497550755175527553755475557556755775587559756075617562756375647565756675677568756975707571757275737574757575767577757875797580758175827583758475857586758775887589759075917592759375947595759675977598759976007601760276037604760576067607760876097610761176127613761476157616761776187619762076217622762376247625762676277628762976307631763276337634763576367637763876397640764176427643764476457646764776487649765076517652765376547655765676577658765976607661766276637664766576667667766876697670767176727673767476757676767776787679768076817682768376847685768676877688768976907691769276937694769576967697769876997700770177027703770477057706770777087709771077117712771377147715771677177718771977207721772277237724772577267727772877297730773177327733773477357736773777387739774077417742774377447745774677477748774977507751775277537754775577567757775877597760776177627763776477657766776777687769777077717772777377747775777677777778777977807781778277837784778577867787778877897790779177927793779477957796779777987799780078017802780378047805780678077808780978107811781278137814781578167817781878197820782178227823782478257826782778287829783078317832783378347835783678377838783978407841784278437844784578467847784878497850785178527853785478557856785778587859786078617862786378647865786678677868786978707871787278737874787578767877787878797880788178827883788478857886788778887889789078917892789378947895789678977898789979007901790279037904790579067907790879097910791179127913791479157916791779187919792079217922792379247925792679277928792979307931793279337934793579367937793879397940794179427943794479457946794779487949795079517952795379547955795679577958795979607961796279637964796579667967796879697970797179727973797479757976797779787979798079817982798379847985798679877988798979907991799279937994799579967997799879998000800180028003800480058006800780088009801080118012801380148015801680178018801980208021802280238024802580268027802880298030803180328033803480358036803780388039804080418042804380448045804680478048804980508051805280538054805580568057805880598060806180628063806480658066806780688069807080718072807380748075807680778078807980808081808280838084808580868087808880898090809180928093809480958096809780988099810081018102810381048105810681078108810981108111811281138114811581168117811881198120812181228123812481258126812781288129813081318132813381348135813681378138813981408141814281438144814581468147814881498150815181528153815481558156815781588159816081618162816381648165816681678168816981708171817281738174817581768177817881798180818181828183818481858186818781888189819081918192819381948195819681978198819982008201820282038204820582068207820882098210821182128213821482158216821782188219822082218222822382248225822682278228822982308231823282338234823582368237823882398240824182428243824482458246824782488249825082518252825382548255825682578258825982608261826282638264826582668267826882698270827182728273827482758276827782788279828082818282828382848285828682878288828982908291829282938294829582968297829882998300830183028303830483058306830783088309831083118312831383148315831683178318831983208321832283238324832583268327832883298330833183328333833483358336833783388339834083418342834383448345834683478348834983508351835283538354835583568357835883598360836183628363836483658366836783688369837083718372837383748375837683778378837983808381838283838384838583868387838883898390839183928393839483958396839783988399840084018402840384048405840684078408840984108411841284138414841584168417841884198420842184228423842484258426842784288429843084318432843384348435843684378438843984408441844284438444844584468447844884498450845184528453845484558456845784588459846084618462846384648465846684678468846984708471847284738474847584768477847884798480848184828483848484858486848784888489849084918492849384948495849684978498849985008501850285038504850585068507850885098510851185128513851485158516851785188519852085218522852385248525852685278528852985308531853285338534853585368537853885398540854185428543854485458546854785488549855085518552855385548555855685578558855985608561856285638564856585668567856885698570857185728573857485758576857785788579858085818582858385848585858685878588858985908591859285938594859585968597859885998600860186028603860486058606860786088609861086118612861386148615861686178618861986208621862286238624862586268627862886298630863186328633863486358636863786388639864086418642864386448645864686478648864986508651865286538654865586568657865886598660866186628663866486658666866786688669867086718672867386748675867686778678867986808681868286838684868586868687868886898690869186928693869486958696869786988699870087018702870387048705870687078708870987108711871287138714871587168717871887198720872187228723872487258726872787288729873087318732873387348735873687378738873987408741874287438744874587468747874887498750875187528753875487558756875787588759876087618762876387648765876687678768876987708771877287738774877587768777877887798780878187828783878487858786878787888789879087918792879387948795879687978798879988008801880288038804880588068807880888098810881188128813881488158816881788188819882088218822882388248825882688278828882988308831883288338834883588368837883888398840884188428843884488458846884788488849885088518852885388548855885688578858885988608861886288638864886588668867886888698870887188728873887488758876887788788879888088818882888388848885888688878888888988908891889288938894889588968897889888998900890189028903890489058906890789088909891089118912891389148915891689178918891989208921892289238924892589268927892889298930893189328933893489358936893789388939894089418942894389448945894689478948894989508951895289538954895589568957895889598960896189628963896489658966896789688969897089718972897389748975897689778978897989808981898289838984898589868987898889898990899189928993899489958996899789988999900090019002900390049005900690079008900990109011901290139014901590169017901890199020902190229023902490259026902790289029903090319032903390349035903690379038903990409041904290439044904590469047904890499050905190529053905490559056905790589059906090619062906390649065906690679068906990709071907290739074907590769077907890799080908190829083908490859086908790889089909090919092909390949095909690979098909991009101910291039104910591069107910891099110911191129113911491159116911791189119912091219122912391249125912691279128912991309131913291339134913591369137913891399140914191429143914491459146914791489149915091519152915391549155915691579158915991609161916291639164916591669167916891699170917191729173917491759176917791789179918091819182918391849185918691879188918991909191919291939194919591969197919891999200920192029203920492059206920792089209921092119212921392149215921692179218921992209221922292239224922592269227922892299230923192329233923492359236923792389239924092419242924392449245924692479248924992509251925292539254925592569257925892599260926192629263926492659266926792689269927092719272927392749275927692779278927992809281928292839284928592869287928892899290929192929293929492959296929792989299930093019302930393049305930693079308930993109311931293139314931593169317931893199320932193229323932493259326932793289329933093319332933393349335933693379338933993409341934293439344934593469347934893499350935193529353935493559356935793589359936093619362936393649365936693679368936993709371937293739374937593769377937893799380938193829383938493859386938793889389939093919392939393949395939693979398939994009401940294039404940594069407940894099410941194129413941494159416941794189419942094219422942394249425942694279428942994309431943294339434943594369437943894399440944194429443944494459446944794489449945094519452945394549455945694579458945994609461946294639464946594669467946894699470947194729473947494759476947794789479948094819482948394849485948694879488948994909491949294939494949594969497949894999500950195029503950495059506950795089509951095119512951395149515951695179518951995209521952295239524952595269527952895299530953195329533953495359536953795389539954095419542954395449545954695479548954995509551955295539554955595569557955895599560956195629563956495659566956795689569957095719572957395749575957695779578957995809581958295839584958595869587958895899590959195929593959495959596959795989599960096019602960396049605960696079608960996109611961296139614961596169617961896199620962196229623962496259626962796289629963096319632963396349635963696379638963996409641964296439644964596469647964896499650965196529653965496559656965796589659966096619662966396649665966696679668966996709671967296739674967596769677967896799680968196829683968496859686968796889689969096919692969396949695969696979698969997009701970297039704970597069707970897099710971197129713971497159716971797189719972097219722972397249725972697279728972997309731973297339734973597369737973897399740974197429743974497459746974797489749975097519752975397549755975697579758975997609761976297639764976597669767976897699770977197729773977497759776977797789779978097819782978397849785978697879788978997909791979297939794979597969797979897999800980198029803980498059806980798089809981098119812981398149815981698179818981998209821982298239824982598269827982898299830983198329833983498359836983798389839984098419842984398449845984698479848984998509851985298539854985598569857985898599860986198629863986498659866986798689869987098719872987398749875987698779878987998809881988298839884988598869887988898899890989198929893989498959896989798989899990099019902990399049905990699079908990999109911991299139914991599169917991899199920992199229923992499259926992799289929993099319932993399349935993699379938993999409941994299439944994599469947994899499950995199529953995499559956995799589959996099619962996399649965996699679968996999709971997299739974997599769977997899799980998199829983998499859986998799889989999099919992999399949995999699979998999910000100011000210003100041000510006100071000810009100101001110012100131001410015100161001710018100191002010021100221002310024100251002610027100281002910030100311003210033100341003510036100371003810039100401004110042100431004410045100461004710048100491005010051100521005310054100551005610057100581005910060100611006210063100641006510066100671006810069100701007110072100731007410075100761007710078100791008010081100821008310084100851008610087100881008910090100911009210093100941009510096100971009810099101001010110102101031010410105101061010710108101091011010111101121011310114101151011610117101181011910120101211012210123101241012510126101271012810129101301013110132101331013410135101361013710138101391014010141101421014310144101451014610147101481014910150101511015210153101541015510156101571015810159101601016110162101631016410165101661016710168101691017010171101721017310174101751017610177101781017910180101811018210183101841018510186101871018810189101901019110192101931019410195101961019710198101991020010201102021020310204102051020610207102081020910210102111021210213102141021510216102171021810219102201022110222102231022410225102261022710228102291023010231102321023310234102351023610237102381023910240102411024210243102441024510246102471024810249102501025110252102531025410255102561025710258102591026010261102621026310264102651026610267102681026910270102711027210273102741027510276102771027810279102801028110282102831028410285102861028710288102891029010291102921029310294102951029610297102981029910300103011030210303103041030510306103071030810309103101031110312103131031410315103161031710318103191032010321103221032310324103251032610327103281032910330103311033210333103341033510336103371033810339103401034110342103431034410345103461034710348103491035010351103521035310354103551035610357103581035910360103611036210363103641036510366103671036810369103701037110372103731037410375103761037710378103791038010381103821038310384103851038610387103881038910390103911039210393103941039510396103971039810399104001040110402104031040410405104061040710408104091041010411104121041310414104151041610417104181041910420104211042210423104241042510426104271042810429104301043110432104331043410435104361043710438104391044010441104421044310444104451044610447104481044910450104511045210453104541045510456104571045810459104601046110462104631046410465104661046710468104691047010471104721047310474104751047610477104781047910480104811048210483104841048510486104871048810489104901049110492104931049410495104961049710498104991050010501105021050310504105051050610507105081050910510105111051210513105141051510516105171051810519105201052110522105231052410525105261052710528105291053010531105321053310534105351053610537105381053910540105411054210543105441054510546105471054810549105501055110552105531055410555105561055710558105591056010561105621056310564105651056610567105681056910570105711057210573105741057510576105771057810579105801058110582105831058410585105861058710588105891059010591105921059310594105951059610597105981059910600106011060210603106041060510606106071060810609106101061110612106131061410615106161061710618106191062010621106221062310624106251062610627106281062910630106311063210633106341063510636106371063810639106401064110642106431064410645106461064710648106491065010651106521065310654106551065610657106581065910660106611066210663106641066510666106671066810669106701067110672106731067410675106761067710678106791068010681106821068310684106851068610687106881068910690106911069210693106941069510696106971069810699107001070110702107031070410705107061070710708107091071010711107121071310714107151071610717107181071910720107211072210723107241072510726107271072810729107301073110732107331073410735107361073710738107391074010741107421074310744107451074610747107481074910750107511075210753107541075510756107571075810759107601076110762107631076410765107661076710768107691077010771107721077310774107751077610777107781077910780107811078210783107841078510786107871078810789107901079110792107931079410795107961079710798107991080010801108021080310804108051080610807108081080910810108111081210813108141081510816108171081810819108201082110822108231082410825108261082710828108291083010831108321083310834108351083610837108381083910840108411084210843108441084510846108471084810849108501085110852108531085410855108561085710858108591086010861108621086310864108651086610867108681086910870108711087210873108741087510876108771087810879108801088110882108831088410885108861088710888108891089010891108921089310894108951089610897108981089910900109011090210903109041090510906109071090810909109101091110912109131091410915109161091710918109191092010921109221092310924109251092610927109281092910930109311093210933109341093510936109371093810939109401094110942109431094410945109461094710948109491095010951109521095310954109551095610957109581095910960109611096210963109641096510966109671096810969109701097110972109731097410975109761097710978109791098010981109821098310984109851098610987109881098910990109911099210993109941099510996109971099810999110001100111002110031100411005110061100711008110091101011011110121101311014110151101611017110181101911020110211102211023110241102511026110271102811029110301103111032110331103411035110361103711038110391104011041110421104311044110451104611047110481104911050110511105211053110541105511056110571105811059110601106111062110631106411065110661106711068110691107011071110721107311074110751107611077110781107911080110811108211083110841108511086110871108811089110901109111092110931109411095110961109711098110991110011101111021110311104111051110611107111081110911110111111111211113111141111511116111171111811119111201112111122111231112411125111261112711128111291113011131111321113311134111351113611137111381113911140111411114211143111441114511146111471114811149111501115111152111531115411155111561115711158111591116011161111621116311164111651116611167111681116911170111711117211173111741117511176111771117811179111801118111182111831118411185111861118711188111891119011191111921119311194111951119611197111981119911200112011120211203112041120511206112071120811209112101121111212112131121411215112161121711218112191122011221112221122311224112251122611227112281122911230112311123211233112341123511236112371123811239112401124111242112431124411245112461124711248112491125011251112521125311254112551125611257112581125911260112611126211263112641126511266112671126811269112701127111272112731127411275112761127711278112791128011281112821128311284112851128611287112881128911290112911129211293112941129511296112971129811299113001130111302113031130411305113061130711308113091131011311113121131311314113151131611317113181131911320113211132211323113241132511326113271132811329113301133111332113331133411335113361133711338113391134011341113421134311344113451134611347113481134911350113511135211353113541135511356113571135811359113601136111362113631136411365113661136711368113691137011371113721137311374113751137611377113781137911380113811138211383113841138511386113871138811389113901139111392113931139411395113961139711398113991140011401114021140311404114051140611407114081140911410114111141211413114141141511416114171141811419114201142111422114231142411425114261142711428114291143011431114321143311434114351143611437114381143911440114411144211443114441144511446114471144811449114501145111452114531145411455114561145711458114591146011461114621146311464114651146611467114681146911470114711147211473114741147511476114771147811479114801148111482114831148411485114861148711488114891149011491114921149311494114951149611497114981149911500115011150211503115041150511506115071150811509115101151111512115131151411515115161151711518115191152011521115221152311524115251152611527115281152911530115311153211533115341153511536115371153811539115401154111542115431154411545115461154711548115491155011551115521155311554115551155611557115581155911560115611156211563115641156511566115671156811569115701157111572115731157411575115761157711578115791158011581115821158311584115851158611587115881158911590115911159211593115941159511596115971159811599116001160111602116031160411605116061160711608116091161011611116121161311614116151161611617116181161911620116211162211623116241162511626116271162811629116301163111632116331163411635116361163711638116391164011641116421164311644116451164611647116481164911650116511165211653116541165511656116571165811659116601166111662116631166411665116661166711668116691167011671116721167311674116751167611677116781167911680116811168211683116841168511686116871168811689116901169111692116931169411695116961169711698116991170011701117021170311704117051170611707117081170911710117111171211713117141171511716117171171811719117201172111722117231172411725117261172711728117291173011731117321173311734117351173611737117381173911740117411174211743117441174511746117471174811749117501175111752117531175411755117561175711758117591176011761117621176311764117651176611767117681176911770117711177211773117741177511776117771177811779117801178111782117831178411785117861178711788117891179011791117921179311794117951179611797117981179911800118011180211803118041180511806118071180811809118101181111812118131181411815118161181711818118191182011821118221182311824118251182611827118281182911830118311183211833118341183511836118371183811839118401184111842118431184411845118461184711848118491185011851118521185311854118551185611857118581185911860118611186211863118641186511866118671186811869118701187111872118731187411875118761187711878118791188011881118821188311884118851188611887118881188911890118911189211893118941189511896118971189811899119001190111902119031190411905119061190711908119091191011911119121191311914119151191611917119181191911920119211192211923119241192511926119271192811929119301193111932119331193411935119361193711938119391194011941119421194311944119451194611947119481194911950119511195211953119541195511956119571195811959119601196111962119631196411965119661196711968119691197011971119721197311974119751197611977119781197911980119811198211983119841198511986119871198811989119901199111992119931199411995119961199711998119991200012001120021200312004120051200612007120081200912010120111201212013120141201512016120171201812019120201202112022120231202412025120261202712028120291203012031120321203312034120351203612037120381203912040120411204212043120441204512046120471204812049120501205112052120531205412055120561205712058120591206012061120621206312064120651206612067120681206912070120711207212073120741207512076120771207812079120801208112082120831208412085120861208712088120891209012091120921209312094120951209612097120981209912100121011210212103121041210512106121071210812109121101211112112121131211412115121161211712118121191212012121121221212312124121251212612127121281212912130121311213212133121341213512136121371213812139121401214112142121431214412145121461214712148121491215012151121521215312154121551215612157121581215912160121611216212163121641216512166121671216812169121701217112172121731217412175121761217712178121791218012181121821218312184121851218612187121881218912190121911219212193121941219512196121971219812199122001220112202122031220412205122061220712208122091221012211122121221312214122151221612217122181221912220122211222212223122241222512226122271222812229122301223112232122331223412235122361223712238122391224012241122421224312244122451224612247122481224912250122511225212253122541225512256122571225812259122601226112262122631226412265122661226712268122691227012271122721227312274122751227612277122781227912280122811228212283122841228512286122871228812289122901229112292122931229412295122961229712298122991230012301123021230312304123051230612307123081230912310123111231212313123141231512316123171231812319123201232112322123231232412325123261232712328123291233012331123321233312334123351233612337123381233912340123411234212343123441234512346123471234812349123501235112352123531235412355123561235712358123591236012361123621236312364123651236612367123681236912370123711237212373123741237512376123771237812379123801238112382123831238412385123861238712388123891239012391123921239312394123951239612397123981239912400124011240212403124041240512406124071240812409124101241112412124131241412415124161241712418124191242012421124221242312424124251242612427124281242912430124311243212433124341243512436124371243812439124401244112442124431244412445124461244712448124491245012451124521245312454124551245612457124581245912460124611246212463124641246512466124671246812469124701247112472124731247412475124761247712478124791248012481124821248312484124851248612487124881248912490124911249212493124941249512496124971249812499125001250112502125031250412505125061250712508125091251012511125121251312514125151251612517125181251912520125211252212523125241252512526125271252812529125301253112532125331253412535125361253712538125391254012541125421254312544125451254612547125481254912550125511255212553125541255512556125571255812559125601256112562125631256412565125661256712568125691257012571125721257312574125751257612577125781257912580125811258212583125841258512586125871258812589125901259112592125931259412595125961259712598125991260012601126021260312604126051260612607126081260912610126111261212613126141261512616126171261812619126201262112622126231262412625126261262712628126291263012631126321263312634126351263612637126381263912640126411264212643126441264512646126471264812649126501265112652126531265412655126561265712658126591266012661126621266312664126651266612667126681266912670126711267212673126741267512676126771267812679126801268112682126831268412685126861268712688126891269012691126921269312694126951269612697126981269912700127011270212703127041270512706127071270812709127101271112712127131271412715127161271712718127191272012721127221272312724127251272612727127281272912730127311273212733127341273512736127371273812739127401274112742127431274412745127461274712748127491275012751127521275312754127551275612757127581275912760127611276212763127641276512766127671276812769127701277112772127731277412775127761277712778127791278012781127821278312784127851278612787127881278912790127911279212793127941279512796127971279812799128001280112802128031280412805128061280712808128091281012811128121281312814128151281612817128181281912820128211282212823128241282512826128271282812829128301283112832128331283412835128361283712838128391284012841128421284312844128451284612847128481284912850128511285212853128541285512856128571285812859128601286112862128631286412865128661286712868128691287012871128721287312874128751287612877128781287912880128811288212883128841288512886128871288812889128901289112892128931289412895128961289712898128991290012901129021290312904129051290612907129081290912910129111291212913129141291512916129171291812919129201292112922129231292412925129261292712928129291293012931129321293312934129351293612937129381293912940129411294212943129441294512946129471294812949129501295112952129531295412955129561295712958129591296012961129621296312964129651296612967129681296912970129711297212973129741297512976129771297812979129801298112982129831298412985129861298712988129891299012991129921299312994129951299612997129981299913000130011300213003130041300513006130071300813009130101301113012130131301413015130161301713018130191302013021130221302313024130251302613027130281302913030130311303213033130341303513036130371303813039130401304113042130431304413045130461304713048130491305013051130521305313054130551305613057130581305913060130611306213063130641306513066130671306813069130701307113072130731307413075130761307713078130791308013081130821308313084130851308613087130881308913090130911309213093130941309513096130971309813099131001310113102131031310413105131061310713108131091311013111131121311313114131151311613117131181311913120131211312213123131241312513126131271312813129131301313113132131331313413135131361313713138131391314013141131421314313144131451314613147131481314913150131511315213153131541315513156131571315813159131601316113162131631316413165131661316713168131691317013171131721317313174131751317613177131781317913180131811318213183131841318513186131871318813189131901319113192131931319413195131961319713198131991320013201132021320313204132051320613207132081320913210132111321213213132141321513216132171321813219132201322113222132231322413225132261322713228132291323013231132321323313234132351323613237132381323913240132411324213243132441324513246132471324813249132501325113252132531325413255132561325713258132591326013261132621326313264132651326613267132681326913270132711327213273132741327513276132771327813279132801328113282132831328413285132861328713288132891329013291132921329313294132951329613297132981329913300133011330213303133041330513306133071330813309133101331113312133131331413315133161331713318133191332013321133221332313324133251332613327133281332913330133311333213333133341333513336133371333813339133401334113342133431334413345133461334713348133491335013351133521335313354133551335613357133581335913360133611336213363133641336513366133671336813369133701337113372133731337413375133761337713378133791338013381133821338313384133851338613387133881338913390133911339213393133941339513396133971339813399134001340113402134031340413405134061340713408134091341013411134121341313414134151341613417134181341913420134211342213423134241342513426134271342813429134301343113432134331343413435134361343713438134391344013441134421344313444134451344613447134481344913450134511345213453134541345513456134571345813459134601346113462134631346413465134661346713468134691347013471134721347313474134751347613477134781347913480134811348213483134841348513486134871348813489134901349113492134931349413495134961349713498134991350013501135021350313504135051350613507135081350913510135111351213513135141351513516135171351813519135201352113522135231352413525135261352713528135291353013531135321353313534135351353613537135381353913540135411354213543135441354513546135471354813549135501355113552135531355413555135561355713558135591356013561135621356313564135651356613567135681356913570135711357213573135741357513576135771357813579135801358113582135831358413585135861358713588135891359013591135921359313594135951359613597135981359913600136011360213603136041360513606136071360813609136101361113612136131361413615136161361713618136191362013621136221362313624136251362613627136281362913630136311363213633136341363513636136371363813639136401364113642136431364413645136461364713648136491365013651136521365313654136551365613657136581365913660136611366213663136641366513666136671366813669136701367113672136731367413675136761367713678136791368013681136821368313684136851368613687136881368913690136911369213693136941369513696136971369813699137001370113702137031370413705137061370713708137091371013711137121371313714137151371613717137181371913720137211372213723137241372513726137271372813729137301373113732137331373413735137361373713738137391374013741137421374313744137451374613747137481374913750137511375213753137541375513756137571375813759137601376113762137631376413765137661376713768137691377013771137721377313774137751377613777137781377913780137811378213783137841378513786137871378813789137901379113792137931379413795137961379713798137991380013801138021380313804138051380613807138081380913810138111381213813138141381513816138171381813819138201382113822138231382413825138261382713828138291383013831138321383313834138351383613837138381383913840138411384213843138441384513846138471384813849138501385113852138531385413855138561385713858138591386013861138621386313864138651386613867138681386913870138711387213873138741387513876138771387813879138801388113882138831388413885138861388713888138891389013891138921389313894138951389613897138981389913900139011390213903139041390513906139071390813909139101391113912139131391413915139161391713918139191392013921139221392313924139251392613927139281392913930139311393213933139341393513936139371393813939139401394113942139431394413945139461394713948139491395013951139521395313954139551395613957139581395913960139611396213963139641396513966139671396813969139701397113972139731397413975139761397713978139791398013981139821398313984139851398613987139881398913990139911399213993139941399513996139971399813999140001400114002140031400414005140061400714008140091401014011140121401314014140151401614017140181401914020140211402214023140241402514026140271402814029140301403114032140331403414035140361403714038140391404014041140421404314044140451404614047140481404914050140511405214053140541405514056140571405814059140601406114062140631406414065140661406714068140691407014071140721407314074140751407614077140781407914080140811408214083140841408514086140871408814089140901409114092140931409414095140961409714098140991410014101141021410314104141051410614107141081410914110141111411214113141141411514116141171411814119141201412114122141231412414125141261412714128141291413014131141321413314134141351413614137141381413914140141411414214143141441414514146141471414814149141501415114152141531415414155141561415714158141591416014161141621416314164141651416614167141681416914170141711417214173141741417514176141771417814179141801418114182141831418414185141861418714188141891419014191141921419314194141951419614197141981419914200142011420214203142041420514206142071420814209142101421114212142131421414215142161421714218142191422014221142221422314224142251422614227142281422914230142311423214233142341423514236142371423814239142401424114242142431424414245142461424714248142491425014251142521425314254142551425614257142581425914260142611426214263142641426514266142671426814269142701427114272142731427414275142761427714278142791428014281142821428314284142851428614287142881428914290142911429214293142941429514296142971429814299143001430114302143031430414305143061430714308143091431014311143121431314314143151431614317143181431914320143211432214323143241432514326143271432814329143301433114332143331433414335143361433714338143391434014341143421434314344143451434614347143481434914350143511435214353143541435514356143571435814359143601436114362143631436414365143661436714368143691437014371143721437314374143751437614377143781437914380143811438214383143841438514386143871438814389143901439114392143931439414395143961439714398143991440014401144021440314404144051440614407144081440914410144111441214413144141441514416144171441814419144201442114422144231442414425144261442714428144291443014431144321443314434144351443614437144381443914440144411444214443144441444514446144471444814449144501445114452144531445414455144561445714458144591446014461144621446314464144651446614467144681446914470144711447214473144741447514476144771447814479144801448114482144831448414485144861448714488144891449014491144921449314494144951449614497144981449914500145011450214503145041450514506145071450814509145101451114512145131451414515145161451714518145191452014521145221452314524145251452614527145281452914530145311453214533145341453514536145371453814539145401454114542145431454414545145461454714548145491455014551145521455314554145551455614557145581455914560145611456214563145641456514566145671456814569145701457114572145731457414575145761457714578145791458014581145821458314584145851458614587145881458914590145911459214593145941459514596145971459814599146001460114602146031460414605146061460714608146091461014611146121461314614146151461614617146181461914620146211462214623146241462514626146271462814629146301463114632146331463414635146361463714638146391464014641146421464314644146451464614647146481464914650146511465214653146541465514656146571465814659146601466114662146631466414665146661466714668146691467014671146721467314674146751467614677146781467914680146811468214683146841468514686146871468814689146901469114692146931469414695146961469714698146991470014701147021470314704147051470614707147081470914710147111471214713147141471514716147171471814719147201472114722147231472414725147261472714728147291473014731147321473314734147351473614737147381473914740147411474214743147441474514746147471474814749147501475114752147531475414755147561475714758147591476014761147621476314764147651476614767147681476914770147711477214773147741477514776147771477814779147801478114782147831478414785147861478714788147891479014791147921479314794147951479614797147981479914800148011480214803148041480514806148071480814809148101481114812148131481414815148161481714818148191482014821148221482314824148251482614827148281482914830148311483214833148341483514836148371483814839148401484114842148431484414845148461484714848148491485014851148521485314854148551485614857148581485914860148611486214863148641486514866148671486814869148701487114872148731487414875148761487714878148791488014881148821488314884148851488614887148881488914890148911489214893148941489514896148971489814899149001490114902149031490414905149061490714908149091491014911149121491314914149151491614917149181491914920149211492214923149241492514926149271492814929149301493114932149331493414935149361493714938149391494014941149421494314944149451494614947149481494914950149511495214953149541495514956149571495814959149601496114962149631496414965149661496714968149691497014971149721497314974149751497614977149781497914980149811498214983149841498514986149871498814989149901499114992149931499414995149961499714998149991500015001150021500315004150051500615007150081500915010150111501215013150141501515016150171501815019150201502115022150231502415025150261502715028150291503015031150321503315034150351503615037150381503915040150411504215043150441504515046150471504815049150501505115052150531505415055150561505715058150591506015061150621506315064150651506615067150681506915070150711507215073150741507515076150771507815079150801508115082150831508415085150861508715088150891509015091150921509315094150951509615097150981509915100151011510215103151041510515106151071510815109151101511115112151131511415115151161511715118151191512015121151221512315124151251512615127151281512915130151311513215133151341513515136151371513815139151401514115142151431514415145151461514715148151491515015151151521515315154151551515615157151581515915160151611516215163151641516515166151671516815169151701517115172151731517415175151761517715178151791518015181151821518315184151851518615187151881518915190151911519215193151941519515196151971519815199152001520115202152031520415205152061520715208152091521015211152121521315214152151521615217152181521915220152211522215223152241522515226152271522815229152301523115232152331523415235152361523715238152391524015241152421524315244152451524615247152481524915250152511525215253152541525515256152571525815259152601526115262152631526415265152661526715268152691527015271152721527315274152751527615277152781527915280152811528215283152841528515286152871528815289152901529115292152931529415295152961529715298152991530015301153021530315304153051530615307153081530915310153111531215313153141531515316153171531815319153201532115322153231532415325153261532715328153291533015331153321533315334153351533615337153381533915340153411534215343153441534515346153471534815349153501535115352153531535415355153561535715358153591536015361153621536315364153651536615367153681536915370153711537215373153741537515376153771537815379153801538115382153831538415385153861538715388153891539015391153921539315394153951539615397153981539915400154011540215403154041540515406154071540815409154101541115412154131541415415154161541715418154191542015421154221542315424154251542615427154281542915430154311543215433154341543515436154371543815439154401544115442154431544415445154461544715448154491545015451154521545315454154551545615457154581545915460154611546215463154641546515466154671546815469154701547115472154731547415475154761547715478154791548015481154821548315484154851548615487154881548915490154911549215493154941549515496154971549815499155001550115502155031550415505155061550715508155091551015511155121551315514155151551615517155181551915520155211552215523155241552515526155271552815529155301553115532155331553415535155361553715538155391554015541155421554315544155451554615547155481554915550155511555215553155541555515556155571555815559155601556115562155631556415565155661556715568155691557015571155721557315574155751557615577155781557915580155811558215583155841558515586155871558815589155901559115592155931559415595155961559715598155991560015601156021560315604156051560615607156081560915610156111561215613156141561515616156171561815619156201562115622156231562415625156261562715628156291563015631156321563315634156351563615637156381563915640156411564215643156441564515646156471564815649156501565115652156531565415655156561565715658156591566015661156621566315664156651566615667156681566915670156711567215673156741567515676156771567815679156801568115682156831568415685156861568715688156891569015691156921569315694156951569615697156981569915700157011570215703157041570515706157071570815709157101571115712157131571415715157161571715718157191572015721157221572315724157251572615727157281572915730157311573215733157341573515736157371573815739157401574115742157431574415745157461574715748157491575015751157521575315754157551575615757157581575915760157611576215763157641576515766157671576815769157701577115772157731577415775157761577715778157791578015781157821578315784157851578615787157881578915790157911579215793157941579515796157971579815799158001580115802158031580415805158061580715808158091581015811158121581315814158151581615817158181581915820158211582215823158241582515826158271582815829158301583115832158331583415835158361583715838158391584015841158421584315844158451584615847158481584915850158511585215853158541585515856158571585815859158601586115862158631586415865158661586715868158691587015871158721587315874158751587615877158781587915880158811588215883158841588515886158871588815889158901589115892158931589415895158961589715898158991590015901159021590315904159051590615907159081590915910159111591215913159141591515916159171591815919159201592115922159231592415925159261592715928159291593015931159321593315934159351593615937159381593915940159411594215943159441594515946159471594815949159501595115952159531595415955159561595715958159591596015961159621596315964159651596615967159681596915970159711597215973159741597515976159771597815979159801598115982159831598415985159861598715988159891599015991159921599315994159951599615997159981599916000160011600216003160041600516006160071600816009160101601116012160131601416015160161601716018160191602016021160221602316024160251602616027160281602916030160311603216033160341603516036160371603816039160401604116042160431604416045160461604716048160491605016051160521605316054160551605616057160581605916060160611606216063160641606516066160671606816069160701607116072160731607416075160761607716078160791608016081160821608316084160851608616087160881608916090160911609216093160941609516096160971609816099161001610116102161031610416105161061610716108161091611016111161121611316114161151611616117161181611916120161211612216123161241612516126161271612816129161301613116132161331613416135161361613716138161391614016141161421614316144161451614616147161481614916150161511615216153161541615516156161571615816159161601616116162161631616416165161661616716168161691617016171161721617316174161751617616177161781617916180161811618216183161841618516186161871618816189161901619116192161931619416195161961619716198161991620016201162021620316204162051620616207162081620916210162111621216213162141621516216162171621816219162201622116222162231622416225162261622716228162291623016231162321623316234162351623616237162381623916240162411624216243162441624516246162471624816249162501625116252162531625416255162561625716258162591626016261162621626316264162651626616267162681626916270162711627216273162741627516276162771627816279162801628116282162831628416285162861628716288162891629016291162921629316294162951629616297162981629916300163011630216303163041630516306163071630816309163101631116312163131631416315163161631716318163191632016321163221632316324163251632616327163281632916330163311633216333163341633516336163371633816339163401634116342163431634416345163461634716348163491635016351163521635316354163551635616357163581635916360163611636216363163641636516366163671636816369163701637116372163731637416375163761637716378163791638016381163821638316384163851638616387163881638916390163911639216393163941639516396163971639816399164001640116402164031640416405164061640716408164091641016411164121641316414164151641616417164181641916420164211642216423164241642516426164271642816429164301643116432164331643416435164361643716438164391644016441164421644316444164451644616447164481644916450164511645216453164541645516456164571645816459164601646116462164631646416465164661646716468164691647016471164721647316474164751647616477164781647916480164811648216483164841648516486164871648816489164901649116492164931649416495164961649716498164991650016501165021650316504165051650616507165081650916510165111651216513165141651516516165171651816519165201652116522165231652416525165261652716528165291653016531165321653316534165351653616537165381653916540165411654216543165441654516546165471654816549165501655116552165531655416555165561655716558165591656016561165621656316564165651656616567165681656916570165711657216573165741657516576165771657816579165801658116582165831658416585165861658716588165891659016591165921659316594165951659616597165981659916600166011660216603166041660516606166071660816609166101661116612166131661416615166161661716618166191662016621166221662316624166251662616627166281662916630166311663216633166341663516636166371663816639166401664116642166431664416645166461664716648166491665016651166521665316654166551665616657166581665916660166611666216663166641666516666166671666816669166701667116672166731667416675166761667716678166791668016681166821668316684166851668616687166881668916690166911669216693166941669516696166971669816699167001670116702167031670416705167061670716708167091671016711167121671316714167151671616717167181671916720167211672216723167241672516726167271672816729167301673116732167331673416735167361673716738167391674016741167421674316744167451674616747167481674916750167511675216753167541675516756167571675816759167601676116762167631676416765167661676716768167691677016771167721677316774167751677616777167781677916780167811678216783167841678516786167871678816789167901679116792167931679416795167961679716798167991680016801168021680316804168051680616807168081680916810168111681216813168141681516816168171681816819168201682116822168231682416825168261682716828168291683016831168321683316834168351683616837168381683916840168411684216843168441684516846168471684816849168501685116852168531685416855168561685716858168591686016861168621686316864168651686616867168681686916870168711687216873168741687516876168771687816879168801688116882168831688416885168861688716888168891689016891168921689316894168951689616897168981689916900169011690216903169041690516906169071690816909169101691116912169131691416915169161691716918169191692016921169221692316924169251692616927169281692916930169311693216933169341693516936169371693816939169401694116942169431694416945169461694716948169491695016951169521695316954169551695616957169581695916960169611696216963169641696516966169671696816969169701697116972169731697416975169761697716978169791698016981169821698316984169851698616987169881698916990169911699216993169941699516996169971699816999170001700117002170031700417005170061700717008170091701017011170121701317014170151701617017170181701917020170211702217023170241702517026170271702817029170301703117032170331703417035170361703717038170391704017041170421704317044170451704617047170481704917050170511705217053170541705517056170571705817059170601706117062170631706417065170661706717068170691707017071170721707317074170751707617077170781707917080170811708217083170841708517086170871708817089170901709117092170931709417095170961709717098170991710017101171021710317104171051710617107171081710917110171111711217113171141711517116171171711817119171201712117122171231712417125171261712717128171291713017131171321713317134171351713617137171381713917140171411714217143171441714517146171471714817149171501715117152171531715417155171561715717158171591716017161171621716317164171651716617167171681716917170171711717217173171741717517176171771717817179171801718117182171831718417185171861718717188171891719017191171921719317194171951719617197171981719917200172011720217203172041720517206172071720817209172101721117212172131721417215172161721717218172191722017221172221722317224172251722617227172281722917230172311723217233172341723517236172371723817239172401724117242172431724417245172461724717248172491725017251172521725317254172551725617257172581725917260172611726217263172641726517266172671726817269172701727117272172731727417275172761727717278172791728017281172821728317284172851728617287172881728917290172911729217293172941729517296172971729817299173001730117302173031730417305173061730717308173091731017311173121731317314173151731617317173181731917320173211732217323173241732517326173271732817329173301733117332173331733417335173361733717338173391734017341173421734317344173451734617347173481734917350173511735217353173541735517356173571735817359173601736117362173631736417365173661736717368173691737017371173721737317374173751737617377173781737917380173811738217383173841738517386173871738817389173901739117392173931739417395173961739717398173991740017401174021740317404174051740617407174081740917410174111741217413174141741517416174171741817419174201742117422174231742417425174261742717428174291743017431174321743317434174351743617437174381743917440174411744217443174441744517446174471744817449174501745117452174531745417455174561745717458174591746017461174621746317464174651746617467174681746917470174711747217473174741747517476174771747817479174801748117482174831748417485174861748717488174891749017491174921749317494174951749617497174981749917500175011750217503175041750517506175071750817509175101751117512175131751417515175161751717518175191752017521175221752317524175251752617527175281752917530175311753217533175341753517536175371753817539175401754117542175431754417545175461754717548175491755017551175521755317554175551755617557175581755917560175611756217563175641756517566175671756817569175701757117572175731757417575175761757717578175791758017581175821758317584175851758617587175881758917590175911759217593175941759517596175971759817599176001760117602176031760417605176061760717608176091761017611176121761317614176151761617617176181761917620176211762217623176241762517626176271762817629176301763117632176331763417635176361763717638176391764017641176421764317644176451764617647176481764917650176511765217653176541765517656176571765817659176601766117662176631766417665176661766717668176691767017671176721767317674176751767617677176781767917680176811768217683176841768517686176871768817689176901769117692176931769417695176961769717698176991770017701177021770317704177051770617707177081770917710177111771217713177141771517716177171771817719177201772117722177231772417725177261772717728177291773017731177321773317734177351773617737177381773917740177411774217743177441774517746177471774817749177501775117752177531775417755177561775717758177591776017761177621776317764177651776617767177681776917770177711777217773177741777517776177771777817779177801778117782177831778417785177861778717788177891779017791177921779317794177951779617797177981779917800178011780217803178041780517806178071780817809178101781117812178131781417815178161781717818178191782017821178221782317824178251782617827178281782917830178311783217833178341783517836178371783817839178401784117842178431784417845178461784717848178491785017851178521785317854178551785617857178581785917860178611786217863178641786517866178671786817869178701787117872178731787417875178761787717878178791788017881178821788317884178851788617887178881788917890178911789217893178941789517896178971789817899179001790117902179031790417905179061790717908179091791017911179121791317914179151791617917179181791917920179211792217923179241792517926179271792817929179301793117932179331793417935179361793717938179391794017941179421794317944179451794617947179481794917950179511795217953179541795517956179571795817959179601796117962179631796417965179661796717968179691797017971179721797317974179751797617977179781797917980179811798217983179841798517986179871798817989179901799117992179931799417995179961799717998179991800018001180021800318004180051800618007180081800918010180111801218013180141801518016180171801818019180201802118022180231802418025180261802718028180291803018031180321803318034180351803618037180381803918040180411804218043180441804518046180471804818049180501805118052180531805418055180561805718058180591806018061180621806318064180651806618067180681806918070180711807218073180741807518076180771807818079180801808118082180831808418085180861808718088180891809018091180921809318094180951809618097180981809918100181011810218103181041810518106181071810818109181101811118112181131811418115181161811718118181191812018121181221812318124181251812618127181281812918130181311813218133181341813518136181371813818139181401814118142181431814418145181461814718148181491815018151181521815318154181551815618157181581815918160181611816218163181641816518166181671816818169181701817118172181731817418175181761817718178181791818018181181821818318184181851818618187181881818918190181911819218193181941819518196181971819818199182001820118202182031820418205182061820718208182091821018211182121821318214182151821618217182181821918220182211822218223182241822518226182271822818229182301823118232182331823418235182361823718238182391824018241182421824318244182451824618247182481824918250182511825218253182541825518256182571825818259182601826118262182631826418265182661826718268182691827018271182721827318274182751827618277182781827918280182811828218283182841828518286182871828818289182901829118292182931829418295182961829718298182991830018301183021830318304183051830618307183081830918310183111831218313183141831518316183171831818319183201832118322183231832418325183261832718328183291833018331183321833318334183351833618337183381833918340183411834218343183441834518346183471834818349183501835118352183531835418355183561835718358183591836018361183621836318364183651836618367183681836918370183711837218373183741837518376183771837818379183801838118382183831838418385183861838718388183891839018391183921839318394183951839618397183981839918400184011840218403184041840518406184071840818409184101841118412184131841418415184161841718418184191842018421184221842318424184251842618427184281842918430184311843218433184341843518436184371843818439184401844118442184431844418445184461844718448184491845018451184521845318454184551845618457184581845918460184611846218463184641846518466184671846818469184701847118472184731847418475184761847718478184791848018481184821848318484184851848618487184881848918490184911849218493184941849518496184971849818499185001850118502185031850418505185061850718508185091851018511185121851318514185151851618517185181851918520185211852218523185241852518526185271852818529185301853118532185331853418535185361853718538185391854018541185421854318544185451854618547185481854918550185511855218553185541855518556185571855818559185601856118562185631856418565185661856718568185691857018571185721857318574185751857618577185781857918580185811858218583185841858518586185871858818589185901859118592185931859418595185961859718598185991860018601186021860318604186051860618607186081860918610186111861218613186141861518616186171861818619186201862118622186231862418625186261862718628186291863018631186321863318634186351863618637186381863918640186411864218643186441864518646186471864818649186501865118652186531865418655186561865718658186591866018661186621866318664186651866618667186681866918670186711867218673186741867518676186771867818679186801868118682186831868418685186861868718688186891869018691186921869318694186951869618697186981869918700187011870218703187041870518706187071870818709187101871118712187131871418715187161871718718187191872018721187221872318724187251872618727187281872918730187311873218733187341873518736187371873818739187401874118742187431874418745187461874718748187491875018751187521875318754187551875618757187581875918760187611876218763187641876518766187671876818769187701877118772187731877418775187761877718778187791878018781187821878318784187851878618787187881878918790187911879218793187941879518796187971879818799188001880118802188031880418805188061880718808188091881018811188121881318814188151881618817188181881918820188211882218823188241882518826188271882818829188301883118832188331883418835188361883718838188391884018841188421884318844188451884618847188481884918850188511885218853188541885518856188571885818859188601886118862188631886418865188661886718868188691887018871188721887318874188751887618877188781887918880188811888218883188841888518886188871888818889188901889118892188931889418895188961889718898188991890018901189021890318904189051890618907189081890918910189111891218913189141891518916189171891818919189201892118922189231892418925189261892718928189291893018931189321893318934189351893618937189381893918940189411894218943189441894518946189471894818949189501895118952189531895418955189561895718958189591896018961189621896318964189651896618967189681896918970189711897218973189741897518976189771897818979189801898118982189831898418985189861898718988189891899018991189921899318994189951899618997189981899919000190011900219003190041900519006190071900819009190101901119012190131901419015190161901719018190191902019021190221902319024190251902619027190281902919030190311903219033190341903519036190371903819039190401904119042190431904419045190461904719048190491905019051190521905319054190551905619057190581905919060190611906219063190641906519066190671906819069190701907119072190731907419075190761907719078190791908019081190821908319084190851908619087190881908919090190911909219093190941909519096190971909819099191001910119102191031910419105191061910719108191091911019111191121911319114191151911619117191181911919120191211912219123191241912519126191271912819129191301913119132191331913419135191361913719138191391914019141191421914319144191451914619147191481914919150191511915219153191541915519156191571915819159191601916119162191631916419165191661916719168191691917019171191721917319174191751917619177191781917919180191811918219183191841918519186191871918819189191901919119192191931919419195191961919719198191991920019201192021920319204192051920619207192081920919210192111921219213192141921519216192171921819219192201922119222192231922419225192261922719228192291923019231192321923319234192351923619237192381923919240192411924219243192441924519246192471924819249192501925119252192531925419255192561925719258192591926019261192621926319264192651926619267192681926919270192711927219273192741927519276192771927819279192801928119282192831928419285192861928719288192891929019291192921929319294192951929619297192981929919300193011930219303193041930519306193071930819309193101931119312193131931419315193161931719318193191932019321193221932319324193251932619327193281932919330193311933219333193341933519336193371933819339193401934119342193431934419345193461934719348193491935019351193521935319354193551935619357193581935919360193611936219363193641936519366193671936819369193701937119372193731937419375193761937719378193791938019381193821938319384193851938619387193881938919390193911939219393193941939519396193971939819399194001940119402194031940419405194061940719408194091941019411194121941319414194151941619417194181941919420194211942219423194241942519426194271942819429194301943119432194331943419435194361943719438194391944019441194421944319444194451944619447194481944919450194511945219453194541945519456194571945819459194601946119462194631946419465194661946719468194691947019471194721947319474194751947619477194781947919480194811948219483194841948519486194871948819489194901949119492194931949419495194961949719498194991950019501195021950319504195051950619507195081950919510195111951219513195141951519516195171951819519195201952119522195231952419525195261952719528195291953019531195321953319534195351953619537195381953919540195411954219543195441954519546195471954819549195501955119552195531955419555195561955719558195591956019561195621956319564195651956619567195681956919570195711957219573195741957519576195771957819579195801958119582195831958419585195861958719588195891959019591195921959319594195951959619597195981959919600196011960219603196041960519606196071960819609196101961119612196131961419615196161961719618196191962019621196221962319624196251962619627196281962919630196311963219633196341963519636196371963819639196401964119642196431964419645196461964719648196491965019651196521965319654196551965619657196581965919660196611966219663196641966519666196671966819669196701967119672196731967419675196761967719678196791968019681196821968319684196851968619687196881968919690196911969219693196941969519696196971969819699197001970119702197031970419705197061970719708197091971019711197121971319714197151971619717197181971919720197211972219723197241972519726197271972819729197301973119732197331973419735197361973719738197391974019741197421974319744197451974619747197481974919750197511975219753197541975519756197571975819759197601976119762197631976419765197661976719768197691977019771197721977319774197751977619777197781977919780197811978219783197841978519786197871978819789197901979119792197931979419795197961979719798197991980019801198021980319804198051980619807198081980919810198111981219813198141981519816198171981819819198201982119822198231982419825198261982719828198291983019831198321983319834198351983619837198381983919840198411984219843198441984519846198471984819849198501985119852198531985419855198561985719858198591986019861198621986319864198651986619867198681986919870198711987219873198741987519876198771987819879198801988119882198831988419885198861988719888198891989019891198921989319894198951989619897198981989919900199011990219903199041990519906199071990819909199101991119912199131991419915199161991719918199191992019921199221992319924199251992619927199281992919930199311993219933199341993519936199371993819939199401994119942199431994419945199461994719948199491995019951199521995319954199551995619957199581995919960199611996219963199641996519966199671996819969199701997119972199731997419975199761997719978199791998019981199821998319984199851998619987199881998919990199911999219993199941999519996199971999819999200002000120002200032000420005200062000720008200092001020011200122001320014200152001620017200182001920020200212002220023200242002520026200272002820029200302003120032200332003420035200362003720038200392004020041200422004320044200452004620047200482004920050200512005220053200542005520056200572005820059200602006120062200632006420065200662006720068200692007020071200722007320074200752007620077200782007920080200812008220083200842008520086200872008820089200902009120092200932009420095200962009720098200992010020101201022010320104201052010620107201082010920110201112011220113201142011520116201172011820119201202012120122201232012420125201262012720128201292013020131201322013320134201352013620137201382013920140201412014220143201442014520146201472014820149201502015120152201532015420155201562015720158201592016020161201622016320164201652016620167201682016920170201712017220173201742017520176201772017820179201802018120182201832018420185201862018720188201892019020191201922019320194201952019620197201982019920200202012020220203202042020520206202072020820209202102021120212202132021420215202162021720218202192022020221202222022320224202252022620227202282022920230202312023220233202342023520236202372023820239202402024120242202432024420245202462024720248202492025020251202522025320254202552025620257202582025920260202612026220263202642026520266202672026820269202702027120272202732027420275202762027720278202792028020281202822028320284202852028620287202882028920290202912029220293202942029520296202972029820299203002030120302203032030420305203062030720308203092031020311203122031320314203152031620317203182031920320203212032220323203242032520326203272032820329203302033120332203332033420335203362033720338203392034020341203422034320344203452034620347203482034920350203512035220353203542035520356203572035820359203602036120362203632036420365203662036720368203692037020371203722037320374203752037620377203782037920380203812038220383203842038520386203872038820389203902039120392203932039420395203962039720398203992040020401204022040320404204052040620407204082040920410204112041220413204142041520416204172041820419204202042120422204232042420425204262042720428204292043020431204322043320434204352043620437204382043920440204412044220443204442044520446204472044820449204502045120452204532045420455204562045720458204592046020461204622046320464204652046620467204682046920470204712047220473204742047520476204772047820479204802048120482204832048420485204862048720488204892049020491204922049320494204952049620497204982049920500205012050220503205042050520506205072050820509205102051120512205132051420515205162051720518205192052020521205222052320524205252052620527205282052920530205312053220533205342053520536205372053820539205402054120542205432054420545205462054720548205492055020551205522055320554205552055620557205582055920560205612056220563205642056520566205672056820569205702057120572205732057420575205762057720578205792058020581205822058320584205852058620587205882058920590205912059220593205942059520596205972059820599206002060120602206032060420605206062060720608206092061020611206122061320614206152061620617206182061920620206212062220623206242062520626206272062820629206302063120632206332063420635206362063720638206392064020641206422064320644206452064620647206482064920650206512065220653206542065520656206572065820659206602066120662206632066420665206662066720668206692067020671206722067320674206752067620677206782067920680206812068220683206842068520686206872068820689206902069120692206932069420695206962069720698206992070020701207022070320704207052070620707207082070920710207112071220713207142071520716207172071820719207202072120722207232072420725207262072720728207292073020731207322073320734207352073620737207382073920740207412074220743207442074520746207472074820749207502075120752207532075420755207562075720758207592076020761207622076320764207652076620767207682076920770207712077220773207742077520776207772077820779207802078120782207832078420785207862078720788207892079020791207922079320794207952079620797207982079920800208012080220803208042080520806208072080820809208102081120812208132081420815208162081720818208192082020821208222082320824208252082620827208282082920830208312083220833208342083520836208372083820839208402084120842208432084420845208462084720848208492085020851208522085320854208552085620857208582085920860208612086220863208642086520866208672086820869208702087120872208732087420875208762087720878208792088020881208822088320884208852088620887208882088920890208912089220893208942089520896208972089820899209002090120902209032090420905209062090720908209092091020911209122091320914209152091620917209182091920920209212092220923209242092520926209272092820929209302093120932209332093420935209362093720938209392094020941209422094320944209452094620947209482094920950209512095220953209542095520956209572095820959209602096120962209632096420965209662096720968209692097020971209722097320974209752097620977209782097920980209812098220983209842098520986209872098820989209902099120992209932099420995209962099720998209992100021001210022100321004210052100621007210082100921010210112101221013210142101521016210172101821019210202102121022210232102421025210262102721028210292103021031210322103321034210352103621037210382103921040210412104221043210442104521046210472104821049210502105121052210532105421055210562105721058210592106021061210622106321064210652106621067210682106921070210712107221073210742107521076210772107821079210802108121082210832108421085210862108721088210892109021091210922109321094210952109621097210982109921100211012110221103211042110521106211072110821109211102111121112211132111421115211162111721118211192112021121211222112321124211252112621127211282112921130211312113221133211342113521136211372113821139211402114121142211432114421145211462114721148211492115021151211522115321154211552115621157211582115921160211612116221163211642116521166211672116821169211702117121172211732117421175211762117721178211792118021181211822118321184211852118621187211882118921190211912119221193211942119521196211972119821199212002120121202212032120421205212062120721208212092121021211212122121321214212152121621217212182121921220212212122221223212242122521226212272122821229212302123121232212332123421235212362123721238212392124021241212422124321244212452124621247212482124921250212512125221253212542125521256212572125821259212602126121262212632126421265212662126721268212692127021271212722127321274212752127621277212782127921280212812128221283212842128521286212872128821289212902129121292212932129421295212962129721298212992130021301213022130321304213052130621307213082130921310213112131221313213142131521316213172131821319213202132121322213232132421325213262132721328213292133021331213322133321334213352133621337213382133921340213412134221343213442134521346213472134821349213502135121352213532135421355213562135721358213592136021361213622136321364213652136621367213682136921370213712137221373213742137521376213772137821379213802138121382213832138421385213862138721388213892139021391213922139321394213952139621397213982139921400214012140221403214042140521406214072140821409214102141121412214132141421415214162141721418214192142021421214222142321424214252142621427214282142921430214312143221433214342143521436214372143821439214402144121442214432144421445214462144721448214492145021451214522145321454214552145621457214582145921460214612146221463214642146521466214672146821469214702147121472214732147421475214762147721478214792148021481214822148321484214852148621487214882148921490214912149221493214942149521496214972149821499215002150121502215032150421505215062150721508215092151021511215122151321514215152151621517215182151921520215212152221523215242152521526215272152821529215302153121532215332153421535215362153721538215392154021541215422154321544215452154621547215482154921550215512155221553215542155521556215572155821559215602156121562215632156421565215662156721568215692157021571215722157321574215752157621577215782157921580215812158221583215842158521586215872158821589215902159121592215932159421595215962159721598215992160021601216022160321604216052160621607216082160921610216112161221613216142161521616216172161821619216202162121622216232162421625216262162721628216292163021631216322163321634216352163621637216382163921640216412164221643216442164521646216472164821649216502165121652216532165421655216562165721658216592166021661216622166321664216652166621667216682166921670216712167221673216742167521676216772167821679216802168121682216832168421685216862168721688216892169021691216922169321694216952169621697216982169921700217012170221703217042170521706217072170821709217102171121712217132171421715217162171721718217192172021721217222172321724217252172621727217282172921730217312173221733217342173521736217372173821739217402174121742217432174421745217462174721748217492175021751217522175321754217552175621757217582175921760217612176221763217642176521766217672176821769217702177121772217732177421775217762177721778217792178021781217822178321784217852178621787217882178921790217912179221793217942179521796217972179821799218002180121802218032180421805218062180721808218092181021811218122181321814218152181621817218182181921820218212182221823218242182521826218272182821829218302183121832218332183421835218362183721838218392184021841218422184321844218452184621847218482184921850218512185221853218542185521856218572185821859218602186121862218632186421865218662186721868218692187021871218722187321874218752187621877218782187921880218812188221883218842188521886218872188821889218902189121892218932189421895218962189721898218992190021901219022190321904219052190621907219082190921910219112191221913219142191521916219172191821919219202192121922219232192421925219262192721928219292193021931219322193321934219352193621937219382193921940219412194221943219442194521946219472194821949219502195121952219532195421955219562195721958219592196021961219622196321964219652196621967219682196921970219712197221973219742197521976219772197821979219802198121982219832198421985219862198721988219892199021991219922199321994219952199621997219982199922000220012200222003220042200522006220072200822009220102201122012220132201422015220162201722018220192202022021220222202322024220252202622027220282202922030220312203222033220342203522036220372203822039220402204122042220432204422045220462204722048220492205022051220522205322054220552205622057220582205922060220612206222063220642206522066220672206822069220702207122072220732207422075220762207722078220792208022081220822208322084220852208622087220882208922090220912209222093220942209522096220972209822099221002210122102221032210422105221062210722108221092211022111221122211322114221152211622117221182211922120221212212222123221242212522126221272212822129221302213122132221332213422135221362213722138221392214022141221422214322144221452214622147221482214922150221512215222153221542215522156221572215822159221602216122162221632216422165221662216722168221692217022171221722217322174221752217622177221782217922180221812218222183221842218522186221872218822189221902219122192221932219422195221962219722198221992220022201222022220322204222052220622207222082220922210222112221222213222142221522216222172221822219222202222122222222232222422225222262222722228222292223022231222322223322234222352223622237222382223922240222412224222243222442224522246222472224822249222502225122252222532225422255222562225722258222592226022261222622226322264222652226622267222682226922270222712227222273222742227522276222772227822279222802228122282222832228422285222862228722288222892229022291222922229322294222952229622297222982229922300223012230222303223042230522306223072230822309223102231122312223132231422315223162231722318223192232022321223222232322324223252232622327223282232922330223312233222333223342233522336223372233822339223402234122342223432234422345223462234722348223492235022351223522235322354223552235622357223582235922360223612236222363223642236522366223672236822369223702237122372223732237422375223762237722378223792238022381223822238322384223852238622387223882238922390223912239222393223942239522396223972239822399224002240122402224032240422405224062240722408224092241022411224122241322414224152241622417224182241922420224212242222423224242242522426224272242822429224302243122432224332243422435224362243722438224392244022441224422244322444224452244622447224482244922450224512245222453224542245522456224572245822459224602246122462224632246422465224662246722468224692247022471224722247322474224752247622477224782247922480224812248222483224842248522486224872248822489224902249122492224932249422495224962249722498224992250022501225022250322504225052250622507225082250922510225112251222513225142251522516225172251822519225202252122522225232252422525225262252722528225292253022531225322253322534225352253622537225382253922540225412254222543225442254522546225472254822549225502255122552225532255422555225562255722558225592256022561225622256322564225652256622567225682256922570225712257222573225742257522576225772257822579225802258122582225832258422585225862258722588225892259022591225922259322594225952259622597225982259922600226012260222603226042260522606226072260822609226102261122612226132261422615226162261722618226192262022621226222262322624226252262622627226282262922630226312263222633226342263522636226372263822639226402264122642226432264422645226462264722648226492265022651226522265322654226552265622657226582265922660226612266222663226642266522666226672266822669226702267122672226732267422675226762267722678226792268022681226822268322684226852268622687226882268922690226912269222693226942269522696226972269822699227002270122702227032270422705227062270722708227092271022711227122271322714227152271622717227182271922720227212272222723227242272522726227272272822729227302273122732227332273422735227362273722738227392274022741227422274322744227452274622747227482274922750227512275222753227542275522756227572275822759227602276122762227632276422765227662276722768227692277022771227722277322774227752277622777227782277922780227812278222783227842278522786227872278822789227902279122792227932279422795227962279722798227992280022801228022280322804228052280622807228082280922810228112281222813228142281522816228172281822819228202282122822228232282422825228262282722828228292283022831228322283322834228352283622837228382283922840228412284222843228442284522846228472284822849228502285122852228532285422855228562285722858228592286022861228622286322864228652286622867228682286922870228712287222873228742287522876228772287822879228802288122882228832288422885228862288722888228892289022891228922289322894228952289622897228982289922900229012290222903229042290522906229072290822909229102291122912229132291422915229162291722918229192292022921229222292322924229252292622927229282292922930229312293222933229342293522936229372293822939229402294122942229432294422945229462294722948229492295022951229522295322954229552295622957229582295922960229612296222963229642296522966229672296822969229702297122972229732297422975229762297722978229792298022981229822298322984229852298622987229882298922990229912299222993229942299522996229972299822999230002300123002230032300423005230062300723008230092301023011230122301323014230152301623017230182301923020230212302223023230242302523026230272302823029230302303123032230332303423035230362303723038230392304023041230422304323044230452304623047230482304923050230512305223053230542305523056230572305823059230602306123062230632306423065230662306723068230692307023071230722307323074230752307623077230782307923080230812308223083230842308523086230872308823089230902309123092230932309423095230962309723098230992310023101231022310323104231052310623107231082310923110231112311223113231142311523116231172311823119231202312123122231232312423125231262312723128231292313023131231322313323134231352313623137231382313923140231412314223143231442314523146231472314823149231502315123152231532315423155231562315723158231592316023161231622316323164231652316623167231682316923170231712317223173231742317523176231772317823179231802318123182231832318423185231862318723188231892319023191231922319323194231952319623197231982319923200232012320223203232042320523206232072320823209232102321123212232132321423215232162321723218232192322023221232222322323224232252322623227232282322923230232312323223233232342323523236232372323823239232402324123242232432324423245232462324723248232492325023251232522325323254232552325623257232582325923260232612326223263232642326523266232672326823269232702327123272232732327423275232762327723278232792328023281232822328323284232852328623287232882328923290232912329223293232942329523296232972329823299233002330123302233032330423305233062330723308233092331023311233122331323314233152331623317233182331923320233212332223323233242332523326233272332823329233302333123332233332333423335233362333723338233392334023341233422334323344233452334623347233482334923350233512335223353233542335523356233572335823359233602336123362233632336423365233662336723368233692337023371233722337323374233752337623377233782337923380233812338223383233842338523386233872338823389233902339123392233932339423395233962339723398233992340023401234022340323404234052340623407234082340923410234112341223413234142341523416234172341823419234202342123422234232342423425234262342723428234292343023431234322343323434234352343623437234382343923440234412344223443234442344523446234472344823449234502345123452234532345423455234562345723458234592346023461234622346323464234652346623467234682346923470234712347223473234742347523476234772347823479234802348123482234832348423485234862348723488234892349023491234922349323494234952349623497234982349923500235012350223503235042350523506235072350823509235102351123512235132351423515235162351723518235192352023521235222352323524235252352623527235282352923530235312353223533235342353523536235372353823539235402354123542235432354423545235462354723548235492355023551235522355323554235552355623557235582355923560235612356223563235642356523566235672356823569235702357123572235732357423575235762357723578235792358023581235822358323584235852358623587235882358923590235912359223593235942359523596235972359823599236002360123602236032360423605236062360723608236092361023611236122361323614236152361623617236182361923620236212362223623236242362523626236272362823629236302363123632236332363423635236362363723638236392364023641236422364323644236452364623647236482364923650236512365223653236542365523656236572365823659236602366123662236632366423665236662366723668236692367023671236722367323674236752367623677236782367923680236812368223683236842368523686236872368823689236902369123692236932369423695236962369723698236992370023701237022370323704237052370623707237082370923710237112371223713237142371523716237172371823719237202372123722237232372423725237262372723728237292373023731237322373323734237352373623737237382373923740237412374223743237442374523746237472374823749237502375123752237532375423755237562375723758237592376023761237622376323764237652376623767237682376923770237712377223773237742377523776237772377823779237802378123782237832378423785237862378723788237892379023791237922379323794237952379623797237982379923800238012380223803238042380523806238072380823809238102381123812238132381423815238162381723818238192382023821238222382323824238252382623827238282382923830238312383223833238342383523836238372383823839238402384123842238432384423845238462384723848238492385023851238522385323854238552385623857238582385923860238612386223863238642386523866238672386823869238702387123872238732387423875238762387723878238792388023881238822388323884238852388623887238882388923890238912389223893238942389523896238972389823899239002390123902239032390423905239062390723908239092391023911239122391323914239152391623917239182391923920239212392223923239242392523926239272392823929239302393123932239332393423935239362393723938239392394023941239422394323944239452394623947239482394923950239512395223953239542395523956239572395823959239602396123962239632396423965239662396723968239692397023971239722397323974239752397623977239782397923980239812398223983239842398523986239872398823989239902399123992239932399423995239962399723998239992400024001240022400324004240052400624007240082400924010240112401224013240142401524016240172401824019240202402124022240232402424025240262402724028240292403024031240322403324034240352403624037240382403924040240412404224043240442404524046240472404824049240502405124052240532405424055240562405724058240592406024061240622406324064240652406624067240682406924070240712407224073240742407524076240772407824079240802408124082240832408424085240862408724088240892409024091240922409324094240952409624097240982409924100241012410224103241042410524106241072410824109241102411124112241132411424115241162411724118241192412024121241222412324124241252412624127241282412924130241312413224133241342413524136241372413824139241402414124142241432414424145241462414724148241492415024151241522415324154241552415624157241582415924160241612416224163241642416524166241672416824169241702417124172241732417424175241762417724178241792418024181241822418324184241852418624187241882418924190241912419224193241942419524196241972419824199242002420124202242032420424205242062420724208242092421024211242122421324214242152421624217242182421924220242212422224223242242422524226242272422824229242302423124232242332423424235242362423724238242392424024241242422424324244242452424624247242482424924250242512425224253242542425524256242572425824259242602426124262242632426424265242662426724268242692427024271242722427324274242752427624277242782427924280242812428224283242842428524286242872428824289242902429124292242932429424295242962429724298242992430024301243022430324304243052430624307243082430924310243112431224313243142431524316243172431824319243202432124322243232432424325243262432724328243292433024331243322433324334243352433624337243382433924340243412434224343243442434524346243472434824349243502435124352243532435424355243562435724358243592436024361243622436324364243652436624367243682436924370243712437224373243742437524376243772437824379243802438124382243832438424385243862438724388243892439024391243922439324394243952439624397243982439924400244012440224403244042440524406244072440824409244102441124412244132441424415244162441724418244192442024421244222442324424244252442624427244282442924430244312443224433244342443524436244372443824439244402444124442244432444424445244462444724448244492445024451244522445324454244552445624457244582445924460244612446224463244642446524466244672446824469244702447124472244732447424475244762447724478244792448024481244822448324484244852448624487244882448924490244912449224493244942449524496244972449824499245002450124502245032450424505245062450724508245092451024511245122451324514245152451624517245182451924520245212452224523245242452524526245272452824529245302453124532245332453424535245362453724538245392454024541245422454324544245452454624547245482454924550245512455224553245542455524556245572455824559245602456124562245632456424565245662456724568245692457024571245722457324574245752457624577245782457924580245812458224583245842458524586245872458824589245902459124592245932459424595245962459724598245992460024601246022460324604246052460624607246082460924610246112461224613246142461524616246172461824619246202462124622246232462424625246262462724628246292463024631246322463324634246352463624637246382463924640246412464224643246442464524646246472464824649246502465124652246532465424655246562465724658246592466024661246622466324664246652466624667246682466924670246712467224673246742467524676246772467824679246802468124682246832468424685246862468724688246892469024691246922469324694246952469624697246982469924700247012470224703247042470524706247072470824709247102471124712247132471424715247162471724718247192472024721247222472324724247252472624727247282472924730247312473224733247342473524736247372473824739247402474124742247432474424745247462474724748247492475024751247522475324754247552475624757247582475924760247612476224763247642476524766247672476824769247702477124772247732477424775247762477724778247792478024781247822478324784247852478624787247882478924790247912479224793247942479524796247972479824799248002480124802248032480424805248062480724808248092481024811248122481324814248152481624817248182481924820248212482224823248242482524826248272482824829248302483124832248332483424835248362483724838248392484024841248422484324844248452484624847248482484924850248512485224853248542485524856248572485824859248602486124862248632486424865248662486724868248692487024871248722487324874248752487624877248782487924880248812488224883248842488524886248872488824889248902489124892248932489424895248962489724898248992490024901249022490324904249052490624907249082490924910249112491224913249142491524916249172491824919249202492124922249232492424925249262492724928249292493024931249322493324934249352493624937249382493924940249412494224943249442494524946249472494824949249502495124952249532495424955249562495724958249592496024961249622496324964249652496624967249682496924970249712497224973249742497524976249772497824979249802498124982249832498424985249862498724988249892499024991249922499324994249952499624997249982499925000250012500225003250042500525006250072500825009250102501125012250132501425015250162501725018250192502025021250222502325024250252502625027250282502925030250312503225033250342503525036250372503825039250402504125042250432504425045250462504725048250492505025051250522505325054250552505625057250582505925060250612506225063250642506525066250672506825069250702507125072250732507425075250762507725078250792508025081250822508325084250852508625087250882508925090250912509225093250942509525096250972509825099251002510125102251032510425105251062510725108251092511025111251122511325114251152511625117251182511925120251212512225123251242512525126251272512825129251302513125132251332513425135251362513725138251392514025141251422514325144251452514625147251482514925150251512515225153251542515525156251572515825159251602516125162251632516425165251662516725168251692517025171251722517325174251752517625177251782517925180251812518225183251842518525186251872518825189251902519125192251932519425195251962519725198251992520025201252022520325204252052520625207252082520925210252112521225213252142521525216252172521825219252202522125222252232522425225252262522725228252292523025231252322523325234252352523625237252382523925240252412524225243252442524525246252472524825249252502525125252252532525425255252562525725258252592526025261252622526325264252652526625267252682526925270252712527225273252742527525276252772527825279252802528125282252832528425285252862528725288252892529025291252922529325294252952529625297252982529925300253012530225303253042530525306253072530825309253102531125312253132531425315253162531725318253192532025321253222532325324253252532625327253282532925330253312533225333253342533525336253372533825339253402534125342253432534425345253462534725348253492535025351253522535325354253552535625357253582535925360253612536225363253642536525366253672536825369253702537125372253732537425375253762537725378253792538025381253822538325384253852538625387253882538925390253912539225393253942539525396253972539825399254002540125402254032540425405254062540725408254092541025411254122541325414254152541625417254182541925420254212542225423254242542525426254272542825429254302543125432254332543425435254362543725438254392544025441254422544325444254452544625447254482544925450254512545225453254542545525456254572545825459254602546125462254632546425465254662546725468254692547025471254722547325474254752547625477254782547925480254812548225483254842548525486254872548825489254902549125492254932549425495254962549725498254992550025501255022550325504255052550625507255082550925510255112551225513255142551525516255172551825519255202552125522255232552425525255262552725528255292553025531255322553325534255352553625537255382553925540255412554225543255442554525546255472554825549255502555125552255532555425555255562555725558255592556025561255622556325564255652556625567255682556925570255712557225573255742557525576255772557825579255802558125582255832558425585255862558725588255892559025591255922559325594255952559625597255982559925600256012560225603256042560525606256072560825609256102561125612256132561425615256162561725618256192562025621256222562325624256252562625627256282562925630256312563225633256342563525636256372563825639256402564125642256432564425645256462564725648256492565025651256522565325654256552565625657256582565925660256612566225663256642566525666256672566825669256702567125672256732567425675256762567725678256792568025681256822568325684256852568625687256882568925690256912569225693256942569525696256972569825699257002570125702257032570425705257062570725708257092571025711257122571325714257152571625717257182571925720257212572225723257242572525726257272572825729257302573125732257332573425735257362573725738257392574025741257422574325744257452574625747257482574925750257512575225753257542575525756257572575825759257602576125762257632576425765257662576725768257692577025771257722577325774257752577625777257782577925780257812578225783257842578525786257872578825789257902579125792257932579425795257962579725798257992580025801258022580325804258052580625807258082580925810258112581225813258142581525816258172581825819258202582125822258232582425825258262582725828258292583025831258322583325834258352583625837258382583925840258412584225843258442584525846258472584825849258502585125852258532585425855258562585725858258592586025861258622586325864258652586625867258682586925870258712587225873258742587525876258772587825879258802588125882258832588425885258862588725888258892589025891258922589325894258952589625897258982589925900259012590225903259042590525906259072590825909259102591125912259132591425915259162591725918259192592025921259222592325924259252592625927259282592925930259312593225933259342593525936259372593825939259402594125942259432594425945259462594725948259492595025951259522595325954259552595625957259582595925960259612596225963259642596525966259672596825969259702597125972259732597425975259762597725978259792598025981259822598325984259852598625987259882598925990259912599225993259942599525996259972599825999260002600126002260032600426005260062600726008260092601026011260122601326014260152601626017260182601926020260212602226023260242602526026260272602826029260302603126032260332603426035260362603726038260392604026041260422604326044260452604626047260482604926050260512605226053260542605526056260572605826059260602606126062260632606426065260662606726068260692607026071260722607326074260752607626077260782607926080260812608226083260842608526086260872608826089260902609126092260932609426095260962609726098260992610026101261022610326104261052610626107261082610926110261112611226113261142611526116261172611826119261202612126122261232612426125261262612726128261292613026131261322613326134261352613626137261382613926140261412614226143261442614526146261472614826149261502615126152261532615426155261562615726158261592616026161261622616326164261652616626167261682616926170261712617226173261742617526176261772617826179261802618126182261832618426185261862618726188261892619026191261922619326194261952619626197261982619926200262012620226203262042620526206262072620826209262102621126212262132621426215262162621726218262192622026221262222622326224262252622626227262282622926230262312623226233262342623526236262372623826239262402624126242262432624426245262462624726248262492625026251262522625326254262552625626257262582625926260262612626226263262642626526266262672626826269262702627126272262732627426275262762627726278262792628026281262822628326284262852628626287262882628926290262912629226293262942629526296262972629826299263002630126302263032630426305263062630726308263092631026311263122631326314263152631626317263182631926320263212632226323263242632526326263272632826329263302633126332263332633426335263362633726338263392634026341263422634326344263452634626347263482634926350263512635226353263542635526356263572635826359263602636126362263632636426365263662636726368263692637026371263722637326374263752637626377263782637926380263812638226383263842638526386263872638826389263902639126392263932639426395263962639726398263992640026401264022640326404264052640626407264082640926410264112641226413264142641526416264172641826419264202642126422264232642426425264262642726428264292643026431264322643326434264352643626437264382643926440264412644226443264442644526446264472644826449264502645126452264532645426455264562645726458264592646026461264622646326464264652646626467264682646926470264712647226473264742647526476264772647826479264802648126482264832648426485264862648726488264892649026491264922649326494264952649626497264982649926500265012650226503265042650526506265072650826509265102651126512265132651426515265162651726518265192652026521265222652326524265252652626527265282652926530265312653226533265342653526536265372653826539265402654126542265432654426545265462654726548265492655026551265522655326554265552655626557265582655926560265612656226563265642656526566265672656826569265702657126572265732657426575265762657726578265792658026581265822658326584265852658626587265882658926590265912659226593265942659526596265972659826599266002660126602266032660426605266062660726608266092661026611266122661326614266152661626617266182661926620266212662226623266242662526626266272662826629266302663126632266332663426635266362663726638266392664026641266422664326644266452664626647266482664926650266512665226653266542665526656266572665826659266602666126662266632666426665266662666726668266692667026671266722667326674266752667626677266782667926680266812668226683266842668526686266872668826689266902669126692266932669426695266962669726698266992670026701267022670326704267052670626707267082670926710267112671226713267142671526716267172671826719267202672126722267232672426725267262672726728267292673026731267322673326734267352673626737267382673926740267412674226743267442674526746267472674826749267502675126752267532675426755267562675726758267592676026761267622676326764267652676626767267682676926770267712677226773267742677526776267772677826779267802678126782267832678426785267862678726788267892679026791267922679326794267952679626797267982679926800268012680226803268042680526806268072680826809268102681126812268132681426815268162681726818268192682026821268222682326824268252682626827268282682926830268312683226833268342683526836268372683826839268402684126842268432684426845268462684726848268492685026851268522685326854268552685626857268582685926860268612686226863268642686526866268672686826869268702687126872268732687426875268762687726878268792688026881268822688326884268852688626887268882688926890268912689226893268942689526896268972689826899269002690126902269032690426905269062690726908269092691026911269122691326914269152691626917269182691926920269212692226923269242692526926269272692826929269302693126932269332693426935269362693726938269392694026941269422694326944269452694626947269482694926950269512695226953269542695526956269572695826959269602696126962269632696426965269662696726968269692697026971269722697326974269752697626977269782697926980269812698226983269842698526986269872698826989269902699126992269932699426995269962699726998269992700027001270022700327004270052700627007270082700927010270112701227013270142701527016270172701827019270202702127022270232702427025270262702727028270292703027031270322703327034270352703627037270382703927040270412704227043270442704527046270472704827049270502705127052270532705427055270562705727058270592706027061270622706327064270652706627067270682706927070270712707227073270742707527076270772707827079270802708127082270832708427085270862708727088270892709027091270922709327094270952709627097270982709927100271012710227103271042710527106271072710827109271102711127112271132711427115271162711727118271192712027121271222712327124271252712627127271282712927130271312713227133271342713527136271372713827139271402714127142271432714427145271462714727148271492715027151271522715327154271552715627157271582715927160271612716227163271642716527166271672716827169271702717127172271732717427175271762717727178271792718027181271822718327184271852718627187271882718927190271912719227193271942719527196271972719827199272002720127202272032720427205272062720727208272092721027211272122721327214272152721627217272182721927220272212722227223272242722527226272272722827229272302723127232272332723427235272362723727238272392724027241272422724327244272452724627247272482724927250272512725227253272542725527256272572725827259272602726127262272632726427265272662726727268272692727027271272722727327274272752727627277272782727927280272812728227283272842728527286272872728827289272902729127292272932729427295272962729727298272992730027301273022730327304273052730627307273082730927310273112731227313273142731527316273172731827319273202732127322273232732427325273262732727328273292733027331273322733327334273352733627337273382733927340273412734227343273442734527346273472734827349273502735127352273532735427355273562735727358273592736027361273622736327364273652736627367273682736927370273712737227373273742737527376273772737827379273802738127382273832738427385273862738727388273892739027391273922739327394273952739627397273982739927400274012740227403274042740527406274072740827409274102741127412274132741427415274162741727418274192742027421274222742327424274252742627427274282742927430274312743227433274342743527436274372743827439274402744127442274432744427445274462744727448274492745027451274522745327454274552745627457274582745927460274612746227463274642746527466274672746827469274702747127472274732747427475274762747727478274792748027481274822748327484274852748627487274882748927490274912749227493274942749527496274972749827499275002750127502275032750427505275062750727508275092751027511275122751327514275152751627517275182751927520275212752227523275242752527526275272752827529275302753127532275332753427535275362753727538275392754027541275422754327544275452754627547275482754927550275512755227553275542755527556275572755827559275602756127562275632756427565275662756727568275692757027571275722757327574275752757627577275782757927580275812758227583275842758527586275872758827589275902759127592275932759427595275962759727598275992760027601276022760327604276052760627607276082760927610276112761227613276142761527616276172761827619276202762127622276232762427625276262762727628276292763027631276322763327634276352763627637276382763927640276412764227643276442764527646276472764827649276502765127652276532765427655276562765727658276592766027661276622766327664276652766627667276682766927670276712767227673276742767527676276772767827679276802768127682276832768427685276862768727688276892769027691276922769327694276952769627697276982769927700277012770227703277042770527706277072770827709277102771127712277132771427715277162771727718277192772027721277222772327724277252772627727277282772927730277312773227733277342773527736277372773827739277402774127742277432774427745277462774727748277492775027751277522775327754277552775627757277582775927760277612776227763277642776527766277672776827769277702777127772277732777427775277762777727778277792778027781277822778327784277852778627787277882778927790277912779227793277942779527796277972779827799278002780127802278032780427805278062780727808278092781027811278122781327814278152781627817278182781927820278212782227823278242782527826278272782827829278302783127832278332783427835278362783727838278392784027841278422784327844278452784627847278482784927850278512785227853278542785527856278572785827859278602786127862278632786427865278662786727868278692787027871278722787327874278752787627877278782787927880278812788227883278842788527886278872788827889278902789127892278932789427895278962789727898278992790027901279022790327904279052790627907279082790927910279112791227913279142791527916279172791827919279202792127922279232792427925279262792727928279292793027931279322793327934279352793627937279382793927940279412794227943279442794527946279472794827949279502795127952279532795427955279562795727958279592796027961279622796327964279652796627967279682796927970279712797227973279742797527976279772797827979279802798127982279832798427985279862798727988279892799027991279922799327994279952799627997279982799928000280012800228003280042800528006280072800828009280102801128012280132801428015280162801728018280192802028021280222802328024280252802628027280282802928030280312803228033280342803528036280372803828039280402804128042280432804428045280462804728048280492805028051280522805328054280552805628057280582805928060280612806228063280642806528066280672806828069280702807128072280732807428075280762807728078280792808028081280822808328084280852808628087280882808928090280912809228093280942809528096280972809828099281002810128102281032810428105281062810728108281092811028111281122811328114281152811628117281182811928120281212812228123281242812528126281272812828129281302813128132281332813428135281362813728138281392814028141281422814328144281452814628147281482814928150281512815228153281542815528156281572815828159281602816128162281632816428165281662816728168281692817028171281722817328174281752817628177281782817928180281812818228183281842818528186281872818828189281902819128192281932819428195281962819728198281992820028201282022820328204282052820628207282082820928210282112821228213282142821528216282172821828219282202822128222282232822428225282262822728228282292823028231282322823328234282352823628237282382823928240282412824228243282442824528246282472824828249282502825128252282532825428255282562825728258282592826028261282622826328264282652826628267282682826928270282712827228273282742827528276282772827828279282802828128282282832828428285282862828728288282892829028291282922829328294282952829628297282982829928300283012830228303283042830528306283072830828309283102831128312283132831428315283162831728318283192832028321283222832328324283252832628327283282832928330283312833228333283342833528336283372833828339283402834128342283432834428345283462834728348283492835028351283522835328354283552835628357283582835928360283612836228363283642836528366283672836828369283702837128372283732837428375283762837728378283792838028381283822838328384283852838628387283882838928390283912839228393283942839528396283972839828399284002840128402284032840428405284062840728408284092841028411284122841328414284152841628417284182841928420284212842228423284242842528426284272842828429284302843128432284332843428435284362843728438284392844028441284422844328444284452844628447284482844928450284512845228453284542845528456284572845828459284602846128462284632846428465284662846728468284692847028471284722847328474284752847628477284782847928480284812848228483284842848528486284872848828489284902849128492284932849428495284962849728498284992850028501285022850328504285052850628507285082850928510285112851228513285142851528516285172851828519285202852128522285232852428525285262852728528285292853028531285322853328534285352853628537285382853928540285412854228543285442854528546285472854828549285502855128552285532855428555285562855728558285592856028561285622856328564285652856628567285682856928570285712857228573285742857528576285772857828579285802858128582285832858428585285862858728588285892859028591285922859328594285952859628597285982859928600286012860228603286042860528606286072860828609286102861128612286132861428615286162861728618286192862028621286222862328624286252862628627286282862928630286312863228633286342863528636286372863828639286402864128642286432864428645286462864728648286492865028651286522865328654286552865628657286582865928660286612866228663286642866528666286672866828669286702867128672286732867428675286762867728678286792868028681286822868328684286852868628687286882868928690286912869228693286942869528696286972869828699287002870128702287032870428705287062870728708287092871028711287122871328714287152871628717287182871928720287212872228723287242872528726287272872828729287302873128732287332873428735287362873728738287392874028741287422874328744287452874628747287482874928750287512875228753287542875528756287572875828759287602876128762287632876428765287662876728768287692877028771287722877328774287752877628777287782877928780287812878228783287842878528786287872878828789287902879128792287932879428795287962879728798287992880028801288022880328804288052880628807288082880928810288112881228813288142881528816288172881828819288202882128822288232882428825288262882728828288292883028831288322883328834288352883628837288382883928840288412884228843288442884528846288472884828849288502885128852288532885428855288562885728858288592886028861288622886328864288652886628867288682886928870288712887228873288742887528876288772887828879288802888128882288832888428885288862888728888288892889028891288922889328894288952889628897288982889928900289012890228903289042890528906289072890828909289102891128912289132891428915289162891728918289192892028921289222892328924289252892628927289282892928930289312893228933289342893528936289372893828939289402894128942289432894428945289462894728948289492895028951289522895328954289552895628957289582895928960289612896228963289642896528966289672896828969289702897128972289732897428975289762897728978289792898028981289822898328984289852898628987289882898928990289912899228993289942899528996289972899828999290002900129002290032900429005290062900729008290092901029011290122901329014290152901629017290182901929020290212902229023290242902529026290272902829029290302903129032290332903429035290362903729038290392904029041290422904329044290452904629047290482904929050290512905229053290542905529056290572905829059290602906129062290632906429065290662906729068290692907029071290722907329074290752907629077290782907929080290812908229083290842908529086290872908829089290902909129092290932909429095290962909729098290992910029101291022910329104291052910629107291082910929110291112911229113291142911529116291172911829119291202912129122291232912429125291262912729128291292913029131291322913329134291352913629137291382913929140291412914229143291442914529146291472914829149291502915129152291532915429155291562915729158291592916029161291622916329164291652916629167291682916929170291712917229173291742917529176291772917829179291802918129182291832918429185291862918729188291892919029191291922919329194291952919629197291982919929200292012920229203292042920529206292072920829209292102921129212292132921429215292162921729218292192922029221292222922329224292252922629227292282922929230292312923229233292342923529236292372923829239292402924129242292432924429245292462924729248292492925029251292522925329254292552925629257292582925929260292612926229263292642926529266292672926829269292702927129272292732927429275292762927729278292792928029281292822928329284292852928629287292882928929290292912929229293292942929529296292972929829299293002930129302293032930429305293062930729308293092931029311293122931329314293152931629317293182931929320293212932229323293242932529326293272932829329293302933129332293332933429335293362933729338293392934029341293422934329344293452934629347293482934929350293512935229353293542935529356293572935829359293602936129362293632936429365293662936729368293692937029371293722937329374293752937629377293782937929380293812938229383293842938529386293872938829389293902939129392293932939429395293962939729398293992940029401294022940329404294052940629407294082940929410294112941229413294142941529416294172941829419294202942129422294232942429425294262942729428294292943029431294322943329434294352943629437294382943929440294412944229443294442944529446294472944829449294502945129452294532945429455294562945729458294592946029461294622946329464294652946629467294682946929470294712947229473294742947529476294772947829479294802948129482294832948429485294862948729488294892949029491294922949329494294952949629497294982949929500295012950229503295042950529506295072950829509295102951129512295132951429515295162951729518295192952029521295222952329524295252952629527295282952929530295312953229533295342953529536295372953829539295402954129542295432954429545295462954729548295492955029551295522955329554295552955629557295582955929560295612956229563295642956529566295672956829569295702957129572295732957429575295762957729578295792958029581295822958329584295852958629587295882958929590295912959229593295942959529596295972959829599296002960129602296032960429605296062960729608296092961029611296122961329614296152961629617296182961929620296212962229623296242962529626296272962829629296302963129632296332963429635296362963729638296392964029641296422964329644296452964629647296482964929650296512965229653296542965529656296572965829659296602966129662296632966429665296662966729668296692967029671296722967329674296752967629677296782967929680296812968229683296842968529686296872968829689296902969129692296932969429695296962969729698296992970029701297022970329704297052970629707297082970929710297112971229713297142971529716297172971829719297202972129722297232972429725297262972729728297292973029731297322973329734297352973629737297382973929740297412974229743297442974529746297472974829749297502975129752297532975429755297562975729758297592976029761297622976329764297652976629767297682976929770297712977229773297742977529776297772977829779297802978129782297832978429785297862978729788297892979029791297922979329794297952979629797297982979929800298012980229803298042980529806298072980829809298102981129812298132981429815298162981729818298192982029821298222982329824298252982629827298282982929830298312983229833298342983529836298372983829839298402984129842298432984429845298462984729848298492985029851298522985329854298552985629857298582985929860298612986229863298642986529866298672986829869298702987129872298732987429875298762987729878298792988029881298822988329884298852988629887298882988929890298912989229893298942989529896298972989829899299002990129902299032990429905299062990729908299092991029911299122991329914299152991629917299182991929920299212992229923299242992529926299272992829929299302993129932299332993429935299362993729938299392994029941299422994329944299452994629947299482994929950299512995229953299542995529956299572995829959299602996129962299632996429965299662996729968299692997029971299722997329974299752997629977299782997929980299812998229983299842998529986299872998829989299902999129992299932999429995299962999729998299993000030001300023000330004300053000630007300083000930010300113001230013300143001530016300173001830019300203002130022300233002430025300263002730028300293003030031300323003330034300353003630037300383003930040300413004230043300443004530046300473004830049300503005130052300533005430055300563005730058300593006030061300623006330064300653006630067300683006930070300713007230073300743007530076300773007830079300803008130082300833008430085300863008730088300893009030091300923009330094300953009630097300983009930100301013010230103301043010530106301073010830109301103011130112301133011430115301163011730118301193012030121301223012330124301253012630127301283012930130301313013230133301343013530136301373013830139301403014130142301433014430145301463014730148301493015030151301523015330154301553015630157301583015930160301613016230163301643016530166301673016830169301703017130172301733017430175301763017730178301793018030181301823018330184301853018630187301883018930190301913019230193301943019530196301973019830199302003020130202302033020430205302063020730208302093021030211302123021330214302153021630217302183021930220302213022230223302243022530226302273022830229302303023130232302333023430235302363023730238302393024030241302423024330244302453024630247302483024930250302513025230253302543025530256302573025830259302603026130262302633026430265302663026730268302693027030271302723027330274302753027630277302783027930280302813028230283302843028530286302873028830289302903029130292302933029430295302963029730298302993030030301303023030330304303053030630307303083030930310303113031230313303143031530316303173031830319303203032130322303233032430325303263032730328303293033030331303323033330334303353033630337303383033930340303413034230343303443034530346303473034830349303503035130352303533035430355303563035730358303593036030361303623036330364303653036630367303683036930370303713037230373303743037530376303773037830379303803038130382303833038430385303863038730388303893039030391303923039330394303953039630397303983039930400304013040230403304043040530406304073040830409304103041130412304133041430415304163041730418304193042030421304223042330424304253042630427304283042930430304313043230433304343043530436304373043830439304403044130442304433044430445304463044730448304493045030451304523045330454304553045630457304583045930460304613046230463304643046530466304673046830469304703047130472304733047430475304763047730478304793048030481304823048330484304853048630487304883048930490304913049230493304943049530496304973049830499305003050130502305033050430505305063050730508305093051030511305123051330514305153051630517305183051930520305213052230523305243052530526305273052830529305303053130532305333053430535305363053730538305393054030541305423054330544305453054630547305483054930550305513055230553305543055530556305573055830559305603056130562305633056430565305663056730568305693057030571305723057330574305753057630577305783057930580305813058230583305843058530586305873058830589305903059130592305933059430595305963059730598305993060030601306023060330604306053060630607306083060930610306113061230613306143061530616306173061830619306203062130622306233062430625306263062730628306293063030631306323063330634306353063630637306383063930640306413064230643306443064530646306473064830649306503065130652306533065430655306563065730658306593066030661306623066330664306653066630667306683066930670306713067230673306743067530676306773067830679306803068130682306833068430685306863068730688306893069030691306923069330694306953069630697306983069930700307013070230703307043070530706307073070830709307103071130712307133071430715307163071730718307193072030721307223072330724307253072630727307283072930730307313073230733307343073530736307373073830739307403074130742307433074430745307463074730748307493075030751307523075330754307553075630757307583075930760307613076230763307643076530766307673076830769307703077130772307733077430775307763077730778307793078030781307823078330784307853078630787307883078930790307913079230793307943079530796307973079830799308003080130802308033080430805308063080730808308093081030811308123081330814308153081630817308183081930820308213082230823308243082530826308273082830829308303083130832308333083430835308363083730838308393084030841308423084330844308453084630847308483084930850308513085230853308543085530856308573085830859308603086130862308633086430865308663086730868308693087030871308723087330874308753087630877308783087930880308813088230883308843088530886308873088830889308903089130892308933089430895308963089730898308993090030901309023090330904309053090630907309083090930910309113091230913309143091530916309173091830919309203092130922309233092430925309263092730928309293093030931309323093330934309353093630937309383093930940309413094230943309443094530946309473094830949309503095130952309533095430955309563095730958309593096030961309623096330964309653096630967309683096930970309713097230973309743097530976309773097830979309803098130982309833098430985309863098730988309893099030991309923099330994309953099630997309983099931000310013100231003310043100531006310073100831009310103101131012310133101431015310163101731018310193102031021310223102331024310253102631027310283102931030310313103231033310343103531036310373103831039310403104131042310433104431045310463104731048310493105031051310523105331054310553105631057310583105931060310613106231063310643106531066310673106831069310703107131072310733107431075310763107731078310793108031081310823108331084310853108631087310883108931090310913109231093310943109531096310973109831099311003110131102311033110431105311063110731108311093111031111311123111331114311153111631117311183111931120311213112231123311243112531126311273112831129311303113131132311333113431135311363113731138311393114031141311423114331144311453114631147311483114931150311513115231153311543115531156311573115831159311603116131162311633116431165311663116731168311693117031171311723117331174311753117631177311783117931180311813118231183311843118531186311873118831189311903119131192311933119431195311963119731198311993120031201312023120331204312053120631207312083120931210312113121231213312143121531216312173121831219312203122131222312233122431225312263122731228312293123031231312323123331234312353123631237312383123931240312413124231243312443124531246312473124831249312503125131252312533125431255312563125731258312593126031261312623126331264312653126631267312683126931270312713127231273312743127531276312773127831279312803128131282312833128431285312863128731288312893129031291312923129331294312953129631297312983129931300313013130231303313043130531306313073130831309313103131131312313133131431315313163131731318313193132031321313223132331324313253132631327313283132931330313313133231333313343133531336313373133831339313403134131342313433134431345313463134731348313493135031351313523135331354313553135631357313583135931360313613136231363313643136531366313673136831369313703137131372313733137431375313763137731378313793138031381313823138331384313853138631387313883138931390313913139231393313943139531396313973139831399314003140131402314033140431405314063140731408314093141031411314123141331414314153141631417314183141931420314213142231423314243142531426314273142831429314303143131432314333143431435314363143731438314393144031441314423144331444314453144631447314483144931450314513145231453314543145531456314573145831459314603146131462314633146431465314663146731468314693147031471314723147331474314753147631477314783147931480314813148231483314843148531486314873148831489314903149131492314933149431495314963149731498314993150031501315023150331504315053150631507315083150931510315113151231513315143151531516315173151831519315203152131522315233152431525315263152731528315293153031531315323153331534315353153631537315383153931540315413154231543315443154531546315473154831549315503155131552315533155431555315563155731558315593156031561315623156331564315653156631567315683156931570315713157231573315743157531576315773157831579315803158131582315833158431585315863158731588315893159031591315923159331594315953159631597315983159931600316013160231603316043160531606316073160831609316103161131612316133161431615316163161731618316193162031621316223162331624316253162631627316283162931630316313163231633316343163531636316373163831639316403164131642316433164431645316463164731648316493165031651316523165331654316553165631657316583165931660316613166231663316643166531666316673166831669316703167131672316733167431675316763167731678316793168031681316823168331684316853168631687316883168931690316913169231693316943169531696316973169831699317003170131702317033170431705317063170731708317093171031711317123171331714317153171631717317183171931720317213172231723317243172531726317273172831729317303173131732317333173431735317363173731738317393174031741317423174331744317453174631747317483174931750317513175231753317543175531756317573175831759317603176131762317633176431765317663176731768317693177031771317723177331774317753177631777317783177931780317813178231783317843178531786317873178831789317903179131792317933179431795317963179731798317993180031801318023180331804318053180631807318083180931810318113181231813318143181531816318173181831819318203182131822318233182431825318263182731828318293183031831318323183331834318353183631837318383183931840318413184231843318443184531846318473184831849318503185131852318533185431855318563185731858318593186031861318623186331864318653186631867318683186931870318713187231873318743187531876318773187831879318803188131882318833188431885318863188731888318893189031891318923189331894318953189631897318983189931900319013190231903319043190531906319073190831909319103191131912319133191431915319163191731918319193192031921319223192331924319253192631927319283192931930319313193231933319343193531936319373193831939319403194131942319433194431945319463194731948319493195031951319523195331954319553195631957319583195931960319613196231963319643196531966319673196831969319703197131972319733197431975319763197731978319793198031981319823198331984319853198631987319883198931990319913199231993319943199531996319973199831999320003200132002320033200432005320063200732008320093201032011320123201332014320153201632017320183201932020320213202232023320243202532026320273202832029320303203132032320333203432035320363203732038320393204032041320423204332044320453204632047320483204932050320513205232053320543205532056320573205832059320603206132062320633206432065320663206732068320693207032071320723207332074320753207632077320783207932080320813208232083320843208532086320873208832089320903209132092320933209432095320963209732098320993210032101321023210332104321053210632107321083210932110321113211232113321143211532116321173211832119321203212132122321233212432125321263212732128321293213032131321323213332134321353213632137321383213932140321413214232143321443214532146321473214832149321503215132152321533215432155321563215732158321593216032161321623216332164321653216632167321683216932170321713217232173321743217532176321773217832179321803218132182321833218432185321863218732188321893219032191321923219332194321953219632197321983219932200322013220232203322043220532206322073220832209322103221132212322133221432215322163221732218322193222032221322223222332224322253222632227322283222932230322313223232233322343223532236322373223832239322403224132242322433224432245322463224732248322493225032251322523225332254322553225632257322583225932260322613226232263322643226532266322673226832269322703227132272322733227432275322763227732278322793228032281322823228332284322853228632287322883228932290322913229232293322943229532296322973229832299323003230132302323033230432305323063230732308323093231032311323123231332314323153231632317323183231932320323213232232323323243232532326323273232832329323303233132332323333233432335323363233732338323393234032341323423234332344323453234632347323483234932350323513235232353323543235532356323573235832359323603236132362323633236432365323663236732368323693237032371323723237332374323753237632377323783237932380323813238232383323843238532386323873238832389323903239132392323933239432395323963239732398323993240032401324023240332404324053240632407324083240932410324113241232413324143241532416324173241832419324203242132422324233242432425324263242732428324293243032431324323243332434324353243632437324383243932440324413244232443324443244532446324473244832449324503245132452324533245432455324563245732458324593246032461324623246332464324653246632467324683246932470324713247232473324743247532476324773247832479324803248132482324833248432485324863248732488324893249032491324923249332494324953249632497324983249932500325013250232503325043250532506325073250832509325103251132512325133251432515325163251732518325193252032521325223252332524325253252632527325283252932530325313253232533325343253532536325373253832539325403254132542325433254432545325463254732548325493255032551325523255332554325553255632557325583255932560325613256232563325643256532566325673256832569325703257132572325733257432575325763257732578325793258032581325823258332584325853258632587325883258932590325913259232593325943259532596325973259832599326003260132602326033260432605326063260732608326093261032611326123261332614326153261632617326183261932620326213262232623326243262532626326273262832629326303263132632326333263432635326363263732638326393264032641326423264332644326453264632647326483264932650326513265232653326543265532656326573265832659326603266132662326633266432665326663266732668326693267032671326723267332674326753267632677326783267932680326813268232683326843268532686326873268832689326903269132692326933269432695326963269732698326993270032701327023270332704327053270632707327083270932710327113271232713327143271532716327173271832719327203272132722327233272432725327263272732728327293273032731327323273332734327353273632737327383273932740327413274232743327443274532746327473274832749327503275132752327533275432755327563275732758327593276032761327623276332764327653276632767327683276932770327713277232773327743277532776327773277832779327803278132782327833278432785327863278732788327893279032791327923279332794327953279632797327983279932800328013280232803328043280532806328073280832809328103281132812328133281432815328163281732818328193282032821328223282332824328253282632827328283282932830328313283232833328343283532836328373283832839328403284132842328433284432845328463284732848328493285032851328523285332854328553285632857328583285932860328613286232863328643286532866328673286832869328703287132872328733287432875328763287732878328793288032881328823288332884328853288632887328883288932890328913289232893328943289532896328973289832899329003290132902329033290432905329063290732908329093291032911329123291332914329153291632917329183291932920329213292232923329243292532926329273292832929329303293132932329333293432935329363293732938329393294032941329423294332944329453294632947329483294932950329513295232953329543295532956329573295832959329603296132962329633296432965329663296732968329693297032971329723297332974329753297632977329783297932980329813298232983329843298532986329873298832989329903299132992329933299432995329963299732998329993300033001330023300333004330053300633007330083300933010330113301233013330143301533016330173301833019330203302133022330233302433025330263302733028330293303033031330323303333034330353303633037330383303933040330413304233043330443304533046330473304833049330503305133052330533305433055330563305733058330593306033061330623306333064330653306633067330683306933070330713307233073330743307533076330773307833079330803308133082330833308433085330863308733088330893309033091330923309333094330953309633097330983309933100331013310233103331043310533106331073310833109331103311133112331133311433115331163311733118331193312033121331223312333124331253312633127331283312933130331313313233133331343313533136331373313833139331403314133142331433314433145331463314733148331493315033151331523315333154331553315633157331583315933160331613316233163331643316533166331673316833169331703317133172331733317433175331763317733178331793318033181331823318333184331853318633187331883318933190331913319233193331943319533196331973319833199332003320133202332033320433205332063320733208332093321033211332123321333214332153321633217332183321933220332213322233223332243322533226332273322833229332303323133232332333323433235332363323733238332393324033241332423324333244332453324633247332483324933250332513325233253332543325533256332573325833259332603326133262332633326433265332663326733268332693327033271332723327333274332753327633277332783327933280332813328233283332843328533286332873328833289332903329133292332933329433295332963329733298332993330033301333023330333304333053330633307333083330933310333113331233313333143331533316333173331833319333203332133322333233332433325333263332733328333293333033331333323333333334333353333633337333383333933340333413334233343333443334533346333473334833349333503335133352333533335433355333563335733358333593336033361333623336333364333653336633367333683336933370333713337233373333743337533376333773337833379333803338133382333833338433385333863338733388333893339033391333923339333394333953339633397333983339933400334013340233403334043340533406334073340833409334103341133412334133341433415334163341733418334193342033421334223342333424334253342633427334283342933430334313343233433334343343533436334373343833439334403344133442334433344433445334463344733448334493345033451334523345333454334553345633457334583345933460334613346233463334643346533466334673346833469334703347133472334733347433475334763347733478334793348033481334823348333484334853348633487334883348933490334913349233493334943349533496334973349833499335003350133502335033350433505335063350733508335093351033511335123351333514335153351633517335183351933520335213352233523335243352533526335273352833529335303353133532335333353433535335363353733538335393354033541335423354333544335453354633547335483354933550335513355233553335543355533556335573355833559335603356133562335633356433565335663356733568335693357033571335723357333574335753357633577335783357933580335813358233583335843358533586335873358833589335903359133592335933359433595335963359733598335993360033601336023360333604336053360633607336083360933610336113361233613336143361533616336173361833619336203362133622336233362433625336263362733628336293363033631336323363333634336353363633637336383363933640336413364233643336443364533646336473364833649336503365133652336533365433655336563365733658336593366033661336623366333664336653366633667336683366933670336713367233673336743367533676336773367833679336803368133682336833368433685336863368733688336893369033691336923369333694336953369633697336983369933700337013370233703337043370533706337073370833709337103371133712337133371433715337163371733718337193372033721337223372333724337253372633727337283372933730337313373233733337343373533736337373373833739337403374133742337433374433745337463374733748337493375033751337523375333754337553375633757337583375933760337613376233763337643376533766337673376833769337703377133772337733377433775337763377733778337793378033781337823378333784337853378633787337883378933790337913379233793337943379533796337973379833799338003380133802338033380433805338063380733808338093381033811338123381333814338153381633817338183381933820338213382233823338243382533826338273382833829338303383133832338333383433835338363383733838338393384033841338423384333844338453384633847338483384933850338513385233853338543385533856338573385833859338603386133862338633386433865338663386733868338693387033871338723387333874338753387633877338783387933880338813388233883338843388533886338873388833889338903389133892338933389433895338963389733898338993390033901339023390333904339053390633907339083390933910339113391233913339143391533916339173391833919339203392133922339233392433925339263392733928339293393033931339323393333934339353393633937339383393933940339413394233943339443394533946339473394833949339503395133952339533395433955339563395733958339593396033961339623396333964339653396633967339683396933970339713397233973339743397533976339773397833979339803398133982339833398433985339863398733988339893399033991339923399333994339953399633997339983399934000340013400234003340043400534006340073400834009340103401134012340133401434015340163401734018340193402034021340223402334024340253402634027340283402934030340313403234033340343403534036340373403834039340403404134042340433404434045340463404734048340493405034051340523405334054340553405634057340583405934060340613406234063340643406534066340673406834069340703407134072340733407434075340763407734078340793408034081340823408334084340853408634087340883408934090340913409234093340943409534096340973409834099341003410134102341033410434105341063410734108341093411034111341123411334114341153411634117341183411934120341213412234123341243412534126341273412834129341303413134132341333413434135341363413734138341393414034141341423414334144341453414634147341483414934150341513415234153341543415534156341573415834159341603416134162341633416434165341663416734168341693417034171341723417334174341753417634177341783417934180341813418234183341843418534186341873418834189341903419134192341933419434195341963419734198341993420034201342023420334204342053420634207342083420934210342113421234213342143421534216342173421834219342203422134222342233422434225342263422734228342293423034231342323423334234342353423634237342383423934240342413424234243342443424534246342473424834249342503425134252342533425434255342563425734258342593426034261342623426334264342653426634267342683426934270342713427234273342743427534276342773427834279342803428134282342833428434285342863428734288342893429034291342923429334294342953429634297342983429934300343013430234303343043430534306343073430834309343103431134312343133431434315343163431734318343193432034321343223432334324343253432634327343283432934330343313433234333343343433534336343373433834339343403434134342343433434434345343463434734348343493435034351343523435334354343553435634357343583435934360343613436234363343643436534366343673436834369343703437134372343733437434375343763437734378343793438034381343823438334384343853438634387343883438934390343913439234393343943439534396343973439834399344003440134402344033440434405344063440734408344093441034411344123441334414344153441634417344183441934420344213442234423344243442534426344273442834429344303443134432344333443434435344363443734438344393444034441344423444334444344453444634447344483444934450344513445234453344543445534456344573445834459344603446134462344633446434465344663446734468344693447034471344723447334474344753447634477344783447934480344813448234483344843448534486344873448834489344903449134492344933449434495344963449734498344993450034501345023450334504345053450634507345083450934510345113451234513345143451534516345173451834519345203452134522345233452434525345263452734528345293453034531345323453334534345353453634537345383453934540345413454234543345443454534546345473454834549345503455134552345533455434555345563455734558345593456034561345623456334564345653456634567345683456934570345713457234573345743457534576345773457834579345803458134582345833458434585345863458734588345893459034591345923459334594345953459634597345983459934600346013460234603346043460534606346073460834609346103461134612346133461434615346163461734618346193462034621346223462334624346253462634627346283462934630346313463234633346343463534636346373463834639346403464134642346433464434645346463464734648346493465034651346523465334654346553465634657346583465934660346613466234663346643466534666346673466834669346703467134672346733467434675346763467734678346793468034681346823468334684346853468634687346883468934690346913469234693346943469534696346973469834699347003470134702347033470434705347063470734708347093471034711347123471334714347153471634717347183471934720347213472234723347243472534726347273472834729347303473134732347333473434735347363473734738347393474034741347423474334744347453474634747347483474934750347513475234753347543475534756347573475834759347603476134762347633476434765347663476734768347693477034771347723477334774347753477634777347783477934780347813478234783347843478534786347873478834789347903479134792347933479434795347963479734798347993480034801348023480334804348053480634807348083480934810348113481234813348143481534816348173481834819348203482134822348233482434825348263482734828348293483034831348323483334834348353483634837348383483934840348413484234843348443484534846348473484834849348503485134852348533485434855348563485734858348593486034861348623486334864348653486634867348683486934870348713487234873348743487534876348773487834879348803488134882348833488434885348863488734888348893489034891348923489334894348953489634897348983489934900349013490234903349043490534906349073490834909349103491134912349133491434915349163491734918349193492034921349223492334924349253492634927349283492934930349313493234933349343493534936349373493834939349403494134942349433494434945349463494734948349493495034951349523495334954349553495634957349583495934960349613496234963349643496534966349673496834969349703497134972349733497434975349763497734978349793498034981349823498334984349853498634987349883498934990349913499234993349943499534996349973499834999350003500135002350033500435005350063500735008350093501035011350123501335014350153501635017350183501935020350213502235023350243502535026350273502835029350303503135032350333503435035350363503735038350393504035041350423504335044350453504635047350483504935050350513505235053350543505535056350573505835059350603506135062350633506435065350663506735068350693507035071350723507335074350753507635077350783507935080350813508235083350843508535086350873508835089350903509135092350933509435095350963509735098350993510035101351023510335104351053510635107351083510935110351113511235113351143511535116351173511835119351203512135122351233512435125351263512735128351293513035131351323513335134351353513635137351383513935140351413514235143351443514535146351473514835149351503515135152351533515435155351563515735158351593516035161351623516335164351653516635167351683516935170351713517235173351743517535176351773517835179351803518135182351833518435185351863518735188351893519035191351923519335194351953519635197351983519935200352013520235203352043520535206352073520835209352103521135212352133521435215352163521735218352193522035221352223522335224352253522635227352283522935230352313523235233352343523535236352373523835239352403524135242352433524435245352463524735248352493525035251352523525335254352553525635257352583525935260352613526235263352643526535266352673526835269352703527135272352733527435275352763527735278352793528035281352823528335284352853528635287352883528935290352913529235293352943529535296352973529835299353003530135302353033530435305353063530735308353093531035311353123531335314353153531635317353183531935320353213532235323353243532535326353273532835329353303533135332353333533435335353363533735338353393534035341353423534335344353453534635347353483534935350353513535235353353543535535356353573535835359353603536135362353633536435365353663536735368353693537035371353723537335374353753537635377353783537935380353813538235383353843538535386353873538835389353903539135392353933539435395353963539735398353993540035401354023540335404354053540635407354083540935410354113541235413354143541535416354173541835419354203542135422354233542435425354263542735428354293543035431354323543335434354353543635437354383543935440354413544235443354443544535446354473544835449354503545135452354533545435455354563545735458354593546035461354623546335464354653546635467354683546935470354713547235473354743547535476354773547835479354803548135482354833548435485354863548735488354893549035491354923549335494354953549635497354983549935500355013550235503355043550535506355073550835509355103551135512355133551435515355163551735518355193552035521355223552335524355253552635527355283552935530355313553235533355343553535536355373553835539355403554135542355433554435545355463554735548355493555035551355523555335554355553555635557355583555935560355613556235563355643556535566355673556835569355703557135572355733557435575355763557735578355793558035581355823558335584355853558635587355883558935590355913559235593355943559535596355973559835599356003560135602356033560435605356063560735608356093561035611356123561335614356153561635617356183561935620356213562235623356243562535626356273562835629356303563135632356333563435635356363563735638356393564035641356423564335644356453564635647356483564935650356513565235653356543565535656356573565835659356603566135662356633566435665356663566735668356693567035671356723567335674356753567635677356783567935680356813568235683356843568535686356873568835689356903569135692356933569435695356963569735698356993570035701357023570335704357053570635707357083570935710357113571235713357143571535716357173571835719357203572135722357233572435725357263572735728357293573035731357323573335734357353573635737357383573935740357413574235743357443574535746357473574835749357503575135752357533575435755357563575735758357593576035761357623576335764357653576635767357683576935770357713577235773357743577535776357773577835779357803578135782357833578435785357863578735788357893579035791357923579335794357953579635797357983579935800358013580235803358043580535806358073580835809358103581135812358133581435815358163581735818358193582035821358223582335824358253582635827358283582935830358313583235833358343583535836358373583835839358403584135842358433584435845358463584735848358493585035851358523585335854358553585635857358583585935860358613586235863358643586535866358673586835869358703587135872358733587435875358763587735878358793588035881358823588335884358853588635887358883588935890358913589235893358943589535896358973589835899359003590135902359033590435905359063590735908359093591035911359123591335914359153591635917359183591935920359213592235923359243592535926359273592835929359303593135932359333593435935359363593735938359393594035941359423594335944359453594635947359483594935950359513595235953359543595535956359573595835959359603596135962359633596435965359663596735968359693597035971359723597335974359753597635977359783597935980359813598235983359843598535986359873598835989359903599135992359933599435995359963599735998359993600036001360023600336004360053600636007360083600936010360113601236013360143601536016360173601836019360203602136022360233602436025360263602736028360293603036031360323603336034360353603636037360383603936040360413604236043360443604536046360473604836049360503605136052360533605436055360563605736058360593606036061360623606336064360653606636067360683606936070360713607236073360743607536076360773607836079360803608136082360833608436085360863608736088360893609036091360923609336094360953609636097360983609936100361013610236103361043610536106361073610836109361103611136112361133611436115361163611736118361193612036121361223612336124361253612636127361283612936130361313613236133361343613536136361373613836139361403614136142361433614436145361463614736148361493615036151361523615336154361553615636157361583615936160361613616236163361643616536166361673616836169361703617136172361733617436175361763617736178361793618036181361823618336184361853618636187361883618936190361913619236193361943619536196361973619836199362003620136202362033620436205362063620736208362093621036211362123621336214362153621636217362183621936220362213622236223362243622536226362273622836229362303623136232362333623436235362363623736238362393624036241362423624336244362453624636247362483624936250362513625236253362543625536256362573625836259362603626136262362633626436265362663626736268362693627036271362723627336274362753627636277362783627936280362813628236283362843628536286362873628836289362903629136292362933629436295362963629736298362993630036301363023630336304363053630636307363083630936310363113631236313363143631536316363173631836319363203632136322363233632436325363263632736328363293633036331363323633336334363353633636337363383633936340363413634236343363443634536346363473634836349363503635136352363533635436355363563635736358363593636036361363623636336364363653636636367363683636936370363713637236373363743637536376363773637836379363803638136382363833638436385363863638736388363893639036391363923639336394363953639636397363983639936400364013640236403364043640536406364073640836409364103641136412364133641436415364163641736418364193642036421364223642336424364253642636427364283642936430364313643236433364343643536436364373643836439364403644136442364433644436445364463644736448364493645036451364523645336454364553645636457364583645936460364613646236463364643646536466364673646836469364703647136472364733647436475364763647736478364793648036481364823648336484364853648636487364883648936490364913649236493364943649536496364973649836499365003650136502365033650436505365063650736508365093651036511365123651336514365153651636517365183651936520365213652236523365243652536526365273652836529365303653136532365333653436535365363653736538365393654036541365423654336544365453654636547365483654936550365513655236553365543655536556365573655836559365603656136562365633656436565365663656736568365693657036571365723657336574365753657636577365783657936580365813658236583365843658536586365873658836589365903659136592365933659436595365963659736598365993660036601366023660336604366053660636607366083660936610366113661236613366143661536616366173661836619366203662136622366233662436625366263662736628366293663036631366323663336634366353663636637366383663936640366413664236643366443664536646366473664836649366503665136652366533665436655366563665736658366593666036661366623666336664366653666636667366683666936670366713667236673366743667536676366773667836679366803668136682366833668436685366863668736688366893669036691366923669336694366953669636697366983669936700367013670236703367043670536706367073670836709367103671136712367133671436715367163671736718367193672036721367223672336724367253672636727367283672936730367313673236733367343673536736367373673836739367403674136742367433674436745367463674736748367493675036751367523675336754367553675636757367583675936760367613676236763367643676536766367673676836769367703677136772367733677436775367763677736778367793678036781367823678336784367853678636787367883678936790367913679236793367943679536796367973679836799368003680136802368033680436805368063680736808368093681036811368123681336814368153681636817368183681936820368213682236823368243682536826368273682836829368303683136832368333683436835368363683736838368393684036841368423684336844368453684636847368483684936850368513685236853368543685536856368573685836859368603686136862368633686436865368663686736868368693687036871368723687336874368753687636877368783687936880368813688236883368843688536886368873688836889368903689136892368933689436895368963689736898368993690036901369023690336904369053690636907369083690936910369113691236913369143691536916369173691836919369203692136922369233692436925369263692736928369293693036931369323693336934369353693636937369383693936940369413694236943369443694536946369473694836949369503695136952369533695436955369563695736958369593696036961369623696336964369653696636967369683696936970369713697236973369743697536976369773697836979369803698136982369833698436985369863698736988369893699036991369923699336994369953699636997369983699937000370013700237003370043700537006370073700837009370103701137012370133701437015370163701737018370193702037021370223702337024370253702637027370283702937030370313703237033370343703537036370373703837039370403704137042370433704437045370463704737048370493705037051370523705337054370553705637057370583705937060370613706237063370643706537066370673706837069370703707137072370733707437075370763707737078370793708037081370823708337084370853708637087370883708937090370913709237093370943709537096370973709837099371003710137102371033710437105371063710737108371093711037111371123711337114371153711637117371183711937120371213712237123371243712537126371273712837129371303713137132371333713437135371363713737138371393714037141371423714337144371453714637147371483714937150371513715237153371543715537156371573715837159371603716137162371633716437165371663716737168371693717037171371723717337174371753717637177371783717937180371813718237183371843718537186371873718837189371903719137192371933719437195371963719737198371993720037201372023720337204372053720637207372083720937210372113721237213372143721537216372173721837219372203722137222372233722437225372263722737228372293723037231372323723337234372353723637237372383723937240372413724237243372443724537246372473724837249372503725137252372533725437255372563725737258372593726037261372623726337264372653726637267372683726937270372713727237273372743727537276372773727837279372803728137282372833728437285372863728737288372893729037291372923729337294372953729637297372983729937300373013730237303373043730537306373073730837309373103731137312373133731437315373163731737318373193732037321373223732337324373253732637327373283732937330373313733237333373343733537336373373733837339373403734137342373433734437345373463734737348373493735037351373523735337354373553735637357373583735937360373613736237363373643736537366373673736837369373703737137372373733737437375373763737737378373793738037381373823738337384373853738637387373883738937390373913739237393373943739537396373973739837399374003740137402374033740437405374063740737408374093741037411374123741337414374153741637417374183741937420374213742237423374243742537426374273742837429374303743137432374333743437435374363743737438374393744037441374423744337444374453744637447374483744937450374513745237453374543745537456374573745837459374603746137462374633746437465374663746737468374693747037471374723747337474374753747637477374783747937480374813748237483374843748537486374873748837489374903749137492374933749437495374963749737498374993750037501375023750337504375053750637507375083750937510375113751237513375143751537516375173751837519375203752137522375233752437525375263752737528375293753037531375323753337534375353753637537375383753937540375413754237543375443754537546375473754837549375503755137552375533755437555375563755737558375593756037561375623756337564375653756637567375683756937570375713757237573375743757537576375773757837579375803758137582375833758437585375863758737588375893759037591375923759337594375953759637597375983759937600376013760237603376043760537606376073760837609376103761137612376133761437615376163761737618376193762037621376223762337624376253762637627376283762937630376313763237633376343763537636376373763837639376403764137642376433764437645376463764737648376493765037651376523765337654376553765637657376583765937660376613766237663376643766537666376673766837669376703767137672376733767437675376763767737678376793768037681376823768337684376853768637687376883768937690376913769237693376943769537696376973769837699377003770137702377033770437705377063770737708377093771037711377123771337714377153771637717377183771937720377213772237723377243772537726377273772837729377303773137732377333773437735377363773737738377393774037741377423774337744377453774637747377483774937750377513775237753377543775537756377573775837759377603776137762377633776437765377663776737768377693777037771377723777337774377753777637777377783777937780377813778237783377843778537786377873778837789377903779137792377933779437795377963779737798377993780037801378023780337804378053780637807378083780937810378113781237813378143781537816378173781837819378203782137822378233782437825378263782737828378293783037831378323783337834378353783637837378383783937840378413784237843378443784537846378473784837849378503785137852378533785437855378563785737858378593786037861378623786337864378653786637867378683786937870378713787237873378743787537876378773787837879378803788137882378833788437885378863788737888378893789037891378923789337894378953789637897378983789937900379013790237903379043790537906379073790837909379103791137912379133791437915379163791737918379193792037921379223792337924379253792637927379283792937930379313793237933379343793537936379373793837939379403794137942379433794437945379463794737948379493795037951379523795337954379553795637957379583795937960379613796237963379643796537966379673796837969379703797137972379733797437975379763797737978379793798037981379823798337984379853798637987379883798937990379913799237993379943799537996379973799837999380003800138002380033800438005380063800738008380093801038011380123801338014380153801638017380183801938020380213802238023380243802538026380273802838029380303803138032380333803438035380363803738038380393804038041380423804338044380453804638047380483804938050380513805238053380543805538056380573805838059380603806138062380633806438065380663806738068380693807038071380723807338074380753807638077380783807938080380813808238083380843808538086380873808838089380903809138092380933809438095380963809738098380993810038101381023810338104381053810638107381083810938110381113811238113381143811538116381173811838119381203812138122381233812438125381263812738128381293813038131381323813338134381353813638137381383813938140381413814238143381443814538146381473814838149381503815138152381533815438155381563815738158381593816038161381623816338164381653816638167381683816938170381713817238173381743817538176381773817838179381803818138182381833818438185381863818738188381893819038191381923819338194381953819638197381983819938200382013820238203382043820538206382073820838209382103821138212382133821438215382163821738218382193822038221382223822338224382253822638227382283822938230382313823238233382343823538236382373823838239382403824138242382433824438245382463824738248382493825038251382523825338254382553825638257382583825938260382613826238263382643826538266382673826838269382703827138272382733827438275382763827738278382793828038281382823828338284382853828638287382883828938290382913829238293382943829538296382973829838299383003830138302383033830438305383063830738308383093831038311383123831338314383153831638317383183831938320383213832238323383243832538326383273832838329383303833138332383333833438335383363833738338383393834038341383423834338344383453834638347383483834938350383513835238353383543835538356383573835838359383603836138362383633836438365383663836738368383693837038371383723837338374383753837638377383783837938380383813838238383383843838538386383873838838389383903839138392383933839438395383963839738398383993840038401384023840338404384053840638407384083840938410384113841238413384143841538416384173841838419384203842138422384233842438425384263842738428384293843038431384323843338434384353843638437384383843938440384413844238443384443844538446384473844838449384503845138452384533845438455384563845738458384593846038461384623846338464384653846638467384683846938470384713847238473384743847538476384773847838479384803848138482384833848438485384863848738488384893849038491384923849338494384953849638497384983849938500385013850238503385043850538506385073850838509385103851138512385133851438515385163851738518385193852038521385223852338524385253852638527385283852938530385313853238533385343853538536385373853838539385403854138542385433854438545385463854738548385493855038551385523855338554385553855638557385583855938560385613856238563385643856538566385673856838569385703857138572385733857438575385763857738578385793858038581385823858338584385853858638587385883858938590385913859238593385943859538596385973859838599386003860138602386033860438605386063860738608386093861038611386123861338614386153861638617386183861938620386213862238623386243862538626386273862838629386303863138632386333863438635386363863738638386393864038641386423864338644386453864638647386483864938650386513865238653386543865538656386573865838659386603866138662386633866438665386663866738668386693867038671386723867338674386753867638677386783867938680386813868238683386843868538686386873868838689386903869138692386933869438695386963869738698386993870038701387023870338704387053870638707387083870938710387113871238713387143871538716387173871838719387203872138722387233872438725387263872738728387293873038731387323873338734387353873638737387383873938740387413874238743387443874538746387473874838749387503875138752387533875438755387563875738758387593876038761387623876338764387653876638767387683876938770387713877238773387743877538776387773877838779387803878138782387833878438785387863878738788387893879038791387923879338794387953879638797387983879938800388013880238803388043880538806388073880838809388103881138812388133881438815388163881738818388193882038821388223882338824388253882638827388283882938830388313883238833388343883538836388373883838839388403884138842388433884438845388463884738848388493885038851388523885338854388553885638857388583885938860388613886238863388643886538866388673886838869388703887138872388733887438875388763887738878388793888038881388823888338884388853888638887388883888938890388913889238893388943889538896388973889838899389003890138902389033890438905389063890738908389093891038911389123891338914389153891638917389183891938920389213892238923389243892538926389273892838929389303893138932389333893438935389363893738938389393894038941389423894338944389453894638947389483894938950389513895238953389543895538956389573895838959389603896138962389633896438965389663896738968389693897038971389723897338974389753897638977389783897938980389813898238983389843898538986389873898838989389903899138992389933899438995389963899738998389993900039001390023900339004390053900639007390083900939010390113901239013390143901539016390173901839019390203902139022390233902439025390263902739028390293903039031390323903339034390353903639037390383903939040390413904239043390443904539046390473904839049390503905139052390533905439055390563905739058390593906039061390623906339064390653906639067390683906939070390713907239073390743907539076390773907839079390803908139082390833908439085390863908739088390893909039091390923909339094390953909639097390983909939100391013910239103391043910539106391073910839109391103911139112391133911439115391163911739118391193912039121391223912339124391253912639127391283912939130391313913239133391343913539136391373913839139391403914139142391433914439145391463914739148391493915039151391523915339154391553915639157391583915939160391613916239163391643916539166391673916839169391703917139172391733917439175391763917739178391793918039181391823918339184391853918639187391883918939190391913919239193391943919539196391973919839199392003920139202392033920439205392063920739208392093921039211392123921339214392153921639217392183921939220392213922239223392243922539226392273922839229392303923139232392333923439235392363923739238392393924039241392423924339244392453924639247392483924939250392513925239253392543925539256392573925839259392603926139262392633926439265392663926739268392693927039271392723927339274392753927639277392783927939280392813928239283392843928539286392873928839289392903929139292392933929439295392963929739298392993930039301393023930339304393053930639307393083930939310393113931239313393143931539316393173931839319393203932139322393233932439325393263932739328393293933039331393323933339334393353933639337393383933939340393413934239343393443934539346393473934839349393503935139352393533935439355393563935739358393593936039361393623936339364393653936639367393683936939370393713937239373393743937539376393773937839379393803938139382393833938439385393863938739388393893939039391393923939339394393953939639397393983939939400394013940239403394043940539406394073940839409394103941139412394133941439415394163941739418394193942039421394223942339424394253942639427394283942939430394313943239433394343943539436394373943839439394403944139442394433944439445394463944739448394493945039451394523945339454394553945639457394583945939460394613946239463394643946539466394673946839469394703947139472394733947439475394763947739478394793948039481394823948339484394853948639487394883948939490394913949239493394943949539496394973949839499395003950139502395033950439505395063950739508395093951039511395123951339514395153951639517395183951939520395213952239523395243952539526395273952839529395303953139532395333953439535395363953739538395393954039541395423954339544395453954639547395483954939550395513955239553395543955539556395573955839559395603956139562395633956439565395663956739568395693957039571395723957339574395753957639577395783957939580395813958239583395843958539586395873958839589395903959139592395933959439595395963959739598395993960039601396023960339604396053960639607396083960939610396113961239613396143961539616396173961839619396203962139622396233962439625396263962739628396293963039631396323963339634396353963639637396383963939640396413964239643396443964539646396473964839649396503965139652396533965439655396563965739658396593966039661396623966339664396653966639667396683966939670396713967239673396743967539676396773967839679396803968139682396833968439685396863968739688396893969039691396923969339694396953969639697396983969939700397013970239703397043970539706397073970839709397103971139712397133971439715397163971739718397193972039721397223972339724397253972639727397283972939730397313973239733397343973539736397373973839739397403974139742397433974439745397463974739748397493975039751397523975339754397553975639757397583975939760397613976239763397643976539766397673976839769397703977139772397733977439775397763977739778397793978039781397823978339784397853978639787397883978939790397913979239793397943979539796397973979839799398003980139802398033980439805398063980739808398093981039811398123981339814398153981639817398183981939820398213982239823398243982539826398273982839829398303983139832398333983439835398363983739838398393984039841398423984339844398453984639847398483984939850398513985239853398543985539856398573985839859398603986139862398633986439865398663986739868398693987039871398723987339874398753987639877398783987939880398813988239883398843988539886398873988839889398903989139892398933989439895398963989739898398993990039901399023990339904399053990639907399083990939910399113991239913399143991539916399173991839919399203992139922399233992439925399263992739928399293993039931399323993339934399353993639937399383993939940399413994239943399443994539946399473994839949399503995139952399533995439955399563995739958399593996039961399623996339964399653996639967399683996939970399713997239973399743997539976399773997839979399803998139982399833998439985399863998739988399893999039991399923999339994399953999639997399983999940000400014000240003400044000540006400074000840009400104001140012400134001440015400164001740018400194002040021400224002340024400254002640027400284002940030400314003240033400344003540036400374003840039400404004140042400434004440045400464004740048400494005040051400524005340054400554005640057400584005940060400614006240063400644006540066400674006840069400704007140072400734007440075400764007740078400794008040081400824008340084400854008640087400884008940090400914009240093400944009540096400974009840099401004010140102401034010440105401064010740108401094011040111401124011340114401154011640117401184011940120401214012240123401244012540126401274012840129401304013140132401334013440135401364013740138401394014040141401424014340144401454014640147401484014940150401514015240153401544015540156401574015840159401604016140162401634016440165401664016740168401694017040171401724017340174401754017640177401784017940180401814018240183401844018540186401874018840189401904019140192401934019440195401964019740198401994020040201402024020340204402054020640207402084020940210402114021240213402144021540216402174021840219402204022140222402234022440225402264022740228402294023040231402324023340234402354023640237402384023940240402414024240243402444024540246402474024840249402504025140252402534025440255402564025740258402594026040261402624026340264402654026640267402684026940270402714027240273402744027540276402774027840279402804028140282402834028440285402864028740288402894029040291402924029340294402954029640297402984029940300403014030240303403044030540306403074030840309403104031140312403134031440315403164031740318403194032040321403224032340324403254032640327403284032940330403314033240333403344033540336403374033840339403404034140342403434034440345403464034740348403494035040351403524035340354403554035640357403584035940360403614036240363403644036540366403674036840369403704037140372403734037440375403764037740378403794038040381403824038340384403854038640387403884038940390403914039240393403944039540396403974039840399404004040140402404034040440405404064040740408404094041040411404124041340414404154041640417404184041940420404214042240423404244042540426404274042840429404304043140432404334043440435404364043740438404394044040441404424044340444404454044640447404484044940450404514045240453404544045540456404574045840459404604046140462404634046440465404664046740468404694047040471404724047340474404754047640477404784047940480404814048240483404844048540486404874048840489404904049140492404934049440495404964049740498404994050040501405024050340504405054050640507405084050940510405114051240513405144051540516405174051840519405204052140522405234052440525405264052740528405294053040531405324053340534405354053640537405384053940540405414054240543405444054540546405474054840549405504055140552405534055440555405564055740558405594056040561405624056340564405654056640567405684056940570405714057240573405744057540576405774057840579405804058140582405834058440585405864058740588405894059040591405924059340594405954059640597405984059940600406014060240603406044060540606406074060840609406104061140612406134061440615406164061740618406194062040621406224062340624406254062640627406284062940630406314063240633406344063540636406374063840639406404064140642406434064440645406464064740648406494065040651406524065340654406554065640657406584065940660406614066240663406644066540666406674066840669406704067140672406734067440675406764067740678406794068040681406824068340684406854068640687406884068940690406914069240693406944069540696406974069840699407004070140702407034070440705407064070740708407094071040711407124071340714407154071640717407184071940720407214072240723407244072540726407274072840729407304073140732407334073440735407364073740738407394074040741407424074340744407454074640747407484074940750407514075240753407544075540756407574075840759407604076140762407634076440765407664076740768407694077040771407724077340774407754077640777407784077940780407814078240783407844078540786407874078840789407904079140792407934079440795407964079740798407994080040801408024080340804408054080640807408084080940810408114081240813408144081540816408174081840819408204082140822408234082440825408264082740828408294083040831408324083340834408354083640837408384083940840408414084240843408444084540846408474084840849408504085140852408534085440855408564085740858408594086040861408624086340864408654086640867408684086940870408714087240873408744087540876408774087840879408804088140882408834088440885408864088740888408894089040891408924089340894408954089640897408984089940900409014090240903409044090540906409074090840909409104091140912409134091440915409164091740918409194092040921409224092340924409254092640927409284092940930409314093240933409344093540936409374093840939409404094140942409434094440945409464094740948409494095040951409524095340954409554095640957409584095940960409614096240963409644096540966409674096840969409704097140972409734097440975409764097740978409794098040981409824098340984409854098640987409884098940990409914099240993409944099540996409974099840999410004100141002410034100441005410064100741008410094101041011410124101341014410154101641017410184101941020410214102241023410244102541026410274102841029410304103141032410334103441035410364103741038410394104041041410424104341044410454104641047410484104941050410514105241053410544105541056410574105841059410604106141062410634106441065410664106741068410694107041071410724107341074410754107641077410784107941080410814108241083410844108541086410874108841089410904109141092410934109441095410964109741098410994110041101411024110341104411054110641107411084110941110411114111241113411144111541116411174111841119411204112141122411234112441125411264112741128411294113041131411324113341134411354113641137411384113941140411414114241143411444114541146411474114841149411504115141152411534115441155411564115741158411594116041161411624116341164411654116641167411684116941170411714117241173411744117541176411774117841179411804118141182411834118441185411864118741188411894119041191411924119341194411954119641197411984119941200412014120241203412044120541206412074120841209412104121141212412134121441215412164121741218412194122041221412224122341224412254122641227412284122941230412314123241233412344123541236412374123841239412404124141242412434124441245412464124741248412494125041251412524125341254412554125641257412584125941260412614126241263412644126541266412674126841269412704127141272412734127441275412764127741278412794128041281412824128341284412854128641287412884128941290412914129241293412944129541296412974129841299413004130141302413034130441305413064130741308413094131041311413124131341314413154131641317413184131941320413214132241323413244132541326413274132841329413304133141332413334133441335413364133741338413394134041341413424134341344413454134641347413484134941350413514135241353413544135541356413574135841359413604136141362413634136441365413664136741368413694137041371413724137341374413754137641377413784137941380413814138241383413844138541386413874138841389413904139141392413934139441395413964139741398413994140041401414024140341404414054140641407414084140941410414114141241413414144141541416414174141841419414204142141422414234142441425414264142741428414294143041431414324143341434414354143641437414384143941440414414144241443414444144541446414474144841449414504145141452414534145441455414564145741458414594146041461414624146341464414654146641467414684146941470414714147241473414744147541476414774147841479414804148141482414834148441485414864148741488414894149041491414924149341494414954149641497414984149941500415014150241503415044150541506415074150841509415104151141512415134151441515415164151741518415194152041521415224152341524415254152641527415284152941530415314153241533415344153541536415374153841539415404154141542415434154441545415464154741548415494155041551415524155341554415554155641557415584155941560415614156241563415644156541566415674156841569415704157141572415734157441575415764157741578415794158041581415824158341584415854158641587415884158941590415914159241593415944159541596415974159841599416004160141602416034160441605416064160741608416094161041611416124161341614416154161641617416184161941620416214162241623416244162541626416274162841629416304163141632416334163441635416364163741638416394164041641416424164341644416454164641647416484164941650416514165241653416544165541656416574165841659416604166141662416634166441665416664166741668416694167041671416724167341674416754167641677416784167941680416814168241683416844168541686416874168841689416904169141692416934169441695416964169741698416994170041701417024170341704417054170641707417084170941710417114171241713417144171541716417174171841719417204172141722417234172441725417264172741728417294173041731417324173341734417354173641737417384173941740417414174241743417444174541746417474174841749417504175141752417534175441755417564175741758417594176041761417624176341764417654176641767417684176941770417714177241773417744177541776417774177841779417804178141782417834178441785417864178741788417894179041791417924179341794417954179641797417984179941800418014180241803418044180541806418074180841809418104181141812418134181441815418164181741818418194182041821418224182341824418254182641827418284182941830418314183241833418344183541836418374183841839418404184141842418434184441845418464184741848418494185041851418524185341854418554185641857418584185941860418614186241863418644186541866418674186841869418704187141872418734187441875418764187741878418794188041881418824188341884418854188641887418884188941890418914189241893418944189541896418974189841899419004190141902419034190441905419064190741908419094191041911419124191341914419154191641917419184191941920419214192241923419244192541926419274192841929419304193141932419334193441935419364193741938419394194041941419424194341944419454194641947419484194941950419514195241953419544195541956419574195841959419604196141962419634196441965419664196741968419694197041971419724197341974419754197641977419784197941980419814198241983419844198541986419874198841989419904199141992419934199441995419964199741998419994200042001420024200342004420054200642007420084200942010420114201242013420144201542016420174201842019420204202142022420234202442025420264202742028420294203042031420324203342034420354203642037420384203942040420414204242043420444204542046420474204842049420504205142052420534205442055420564205742058420594206042061420624206342064420654206642067420684206942070420714207242073420744207542076420774207842079420804208142082420834208442085420864208742088420894209042091420924209342094420954209642097420984209942100421014210242103421044210542106421074210842109421104211142112421134211442115421164211742118421194212042121421224212342124421254212642127421284212942130421314213242133421344213542136421374213842139421404214142142421434214442145421464214742148421494215042151421524215342154421554215642157421584215942160421614216242163421644216542166421674216842169421704217142172421734217442175421764217742178421794218042181421824218342184421854218642187421884218942190421914219242193421944219542196421974219842199422004220142202422034220442205422064220742208422094221042211422124221342214422154221642217422184221942220422214222242223422244222542226422274222842229422304223142232422334223442235422364223742238422394224042241422424224342244422454224642247422484224942250422514225242253422544225542256422574225842259422604226142262422634226442265422664226742268422694227042271422724227342274422754227642277422784227942280422814228242283422844228542286422874228842289422904229142292422934229442295422964229742298422994230042301423024230342304423054230642307423084230942310423114231242313423144231542316423174231842319423204232142322423234232442325423264232742328423294233042331423324233342334423354233642337423384233942340423414234242343423444234542346423474234842349423504235142352423534235442355423564235742358423594236042361423624236342364423654236642367423684236942370423714237242373423744237542376423774237842379423804238142382423834238442385423864238742388423894239042391423924239342394423954239642397423984239942400424014240242403424044240542406424074240842409424104241142412424134241442415424164241742418424194242042421424224242342424424254242642427424284242942430424314243242433424344243542436424374243842439424404244142442424434244442445424464244742448424494245042451424524245342454424554245642457424584245942460424614246242463424644246542466424674246842469424704247142472424734247442475424764247742478424794248042481424824248342484424854248642487424884248942490424914249242493424944249542496424974249842499425004250142502425034250442505425064250742508425094251042511425124251342514425154251642517425184251942520425214252242523425244252542526425274252842529425304253142532425334253442535425364253742538425394254042541425424254342544425454254642547425484254942550425514255242553425544255542556425574255842559425604256142562425634256442565425664256742568425694257042571425724257342574425754257642577425784257942580425814258242583425844258542586425874258842589425904259142592425934259442595425964259742598425994260042601426024260342604426054260642607426084260942610426114261242613426144261542616426174261842619426204262142622426234262442625426264262742628426294263042631426324263342634426354263642637426384263942640426414264242643426444264542646426474264842649426504265142652426534265442655426564265742658426594266042661426624266342664426654266642667426684266942670426714267242673426744267542676426774267842679426804268142682426834268442685426864268742688426894269042691426924269342694426954269642697426984269942700427014270242703427044270542706427074270842709427104271142712427134271442715427164271742718427194272042721427224272342724427254272642727427284272942730427314273242733427344273542736427374273842739427404274142742427434274442745427464274742748427494275042751427524275342754427554275642757427584275942760427614276242763427644276542766427674276842769427704277142772427734277442775427764277742778427794278042781427824278342784427854278642787427884278942790427914279242793427944279542796427974279842799428004280142802428034280442805428064280742808428094281042811428124281342814428154281642817428184281942820428214282242823428244282542826428274282842829428304283142832428334283442835428364283742838428394284042841428424284342844428454284642847428484284942850428514285242853428544285542856428574285842859428604286142862428634286442865428664286742868428694287042871428724287342874428754287642877428784287942880428814288242883428844288542886428874288842889428904289142892428934289442895428964289742898428994290042901429024290342904429054290642907429084290942910429114291242913429144291542916429174291842919429204292142922429234292442925429264292742928429294293042931429324293342934429354293642937429384293942940429414294242943429444294542946429474294842949429504295142952429534295442955429564295742958429594296042961429624296342964429654296642967429684296942970429714297242973429744297542976429774297842979429804298142982429834298442985429864298742988429894299042991429924299342994429954299642997429984299943000430014300243003430044300543006430074300843009430104301143012430134301443015430164301743018430194302043021430224302343024430254302643027430284302943030430314303243033430344303543036430374303843039430404304143042430434304443045430464304743048430494305043051430524305343054430554305643057430584305943060430614306243063430644306543066430674306843069430704307143072430734307443075430764307743078430794308043081430824308343084430854308643087430884308943090430914309243093430944309543096430974309843099431004310143102431034310443105431064310743108431094311043111431124311343114431154311643117431184311943120431214312243123431244312543126431274312843129431304313143132431334313443135431364313743138431394314043141431424314343144431454314643147431484314943150431514315243153431544315543156431574315843159431604316143162431634316443165431664316743168431694317043171431724317343174431754317643177431784317943180431814318243183431844318543186431874318843189431904319143192431934319443195431964319743198431994320043201432024320343204432054320643207432084320943210432114321243213432144321543216432174321843219432204322143222432234322443225432264322743228432294323043231432324323343234432354323643237432384323943240432414324243243432444324543246432474324843249432504325143252432534325443255432564325743258432594326043261432624326343264432654326643267432684326943270432714327243273432744327543276432774327843279432804328143282432834328443285432864328743288432894329043291432924329343294432954329643297432984329943300433014330243303433044330543306433074330843309433104331143312433134331443315433164331743318433194332043321433224332343324433254332643327433284332943330433314333243333433344333543336433374333843339433404334143342433434334443345433464334743348433494335043351433524335343354433554335643357433584335943360433614336243363433644336543366433674336843369433704337143372433734337443375433764337743378433794338043381433824338343384433854338643387433884338943390433914339243393433944339543396433974339843399434004340143402434034340443405434064340743408434094341043411434124341343414434154341643417434184341943420434214342243423434244342543426434274342843429434304343143432434334343443435434364343743438434394344043441434424344343444434454344643447434484344943450434514345243453434544345543456434574345843459434604346143462434634346443465434664346743468434694347043471434724347343474434754347643477434784347943480434814348243483434844348543486434874348843489434904349143492434934349443495434964349743498434994350043501435024350343504435054350643507435084350943510435114351243513435144351543516435174351843519435204352143522435234352443525435264352743528435294353043531435324353343534435354353643537435384353943540435414354243543435444354543546435474354843549435504355143552435534355443555435564355743558435594356043561435624356343564435654356643567435684356943570435714357243573435744357543576435774357843579435804358143582435834358443585435864358743588435894359043591435924359343594435954359643597435984359943600436014360243603436044360543606436074360843609436104361143612436134361443615436164361743618436194362043621436224362343624436254362643627436284362943630436314363243633436344363543636436374363843639436404364143642436434364443645436464364743648436494365043651436524365343654436554365643657436584365943660436614366243663436644366543666436674366843669436704367143672436734367443675436764367743678436794368043681436824368343684436854368643687436884368943690436914369243693436944369543696436974369843699437004370143702437034370443705437064370743708437094371043711437124371343714437154371643717437184371943720437214372243723437244372543726437274372843729437304373143732437334373443735437364373743738437394374043741437424374343744437454374643747437484374943750437514375243753437544375543756437574375843759437604376143762437634376443765437664376743768437694377043771437724377343774437754377643777437784377943780437814378243783437844378543786437874378843789437904379143792437934379443795437964379743798437994380043801438024380343804438054380643807438084380943810438114381243813438144381543816438174381843819438204382143822438234382443825438264382743828438294383043831438324383343834438354383643837438384383943840438414384243843438444384543846438474384843849438504385143852438534385443855438564385743858438594386043861438624386343864438654386643867438684386943870438714387243873438744387543876438774387843879438804388143882438834388443885438864388743888438894389043891438924389343894438954389643897438984389943900439014390243903439044390543906439074390843909439104391143912439134391443915439164391743918439194392043921439224392343924439254392643927439284392943930439314393243933439344393543936439374393843939439404394143942439434394443945439464394743948439494395043951439524395343954439554395643957439584395943960439614396243963439644396543966439674396843969439704397143972439734397443975439764397743978439794398043981439824398343984439854398643987439884398943990439914399243993439944399543996439974399843999440004400144002440034400444005440064400744008440094401044011440124401344014440154401644017440184401944020440214402244023440244402544026440274402844029440304403144032440334403444035440364403744038440394404044041440424404344044440454404644047440484404944050440514405244053440544405544056440574405844059440604406144062440634406444065440664406744068440694407044071440724407344074440754407644077440784407944080440814408244083440844408544086440874408844089440904409144092440934409444095440964409744098440994410044101441024410344104441054410644107441084410944110441114411244113441144411544116441174411844119441204412144122441234412444125441264412744128441294413044131441324413344134441354413644137441384413944140441414414244143441444414544146441474414844149441504415144152441534415444155441564415744158441594416044161441624416344164441654416644167441684416944170441714417244173441744417544176441774417844179441804418144182441834418444185441864418744188441894419044191441924419344194441954419644197441984419944200442014420244203442044420544206442074420844209442104421144212442134421444215442164421744218442194422044221442224422344224442254422644227442284422944230442314423244233442344423544236442374423844239442404424144242442434424444245442464424744248442494425044251442524425344254442554425644257442584425944260442614426244263442644426544266442674426844269442704427144272442734427444275442764427744278442794428044281442824428344284442854428644287442884428944290442914429244293442944429544296442974429844299443004430144302443034430444305443064430744308443094431044311443124431344314443154431644317443184431944320443214432244323443244432544326443274432844329443304433144332443334433444335443364433744338443394434044341443424434344344443454434644347443484434944350443514435244353443544435544356443574435844359443604436144362443634436444365443664436744368443694437044371443724437344374443754437644377443784437944380443814438244383443844438544386443874438844389443904439144392443934439444395443964439744398443994440044401444024440344404444054440644407444084440944410444114441244413444144441544416444174441844419444204442144422444234442444425444264442744428444294443044431444324443344434444354443644437444384443944440444414444244443444444444544446444474444844449444504445144452444534445444455444564445744458444594446044461444624446344464444654446644467444684446944470444714447244473444744447544476444774447844479444804448144482444834448444485444864448744488444894449044491444924449344494444954449644497444984449944500445014450244503445044450544506445074450844509445104451144512445134451444515445164451744518445194452044521445224452344524445254452644527445284452944530445314453244533445344453544536445374453844539445404454144542445434454444545445464454744548445494455044551445524455344554445554455644557445584455944560445614456244563445644456544566445674456844569445704457144572445734457444575445764457744578445794458044581445824458344584445854458644587445884458944590445914459244593445944459544596445974459844599446004460144602446034460444605446064460744608446094461044611446124461344614446154461644617446184461944620446214462244623446244462544626446274462844629446304463144632446334463444635446364463744638446394464044641446424464344644446454464644647446484464944650446514465244653446544465544656446574465844659446604466144662446634466444665446664466744668446694467044671446724467344674446754467644677446784467944680446814468244683446844468544686446874468844689446904469144692446934469444695446964469744698446994470044701447024470344704447054470644707447084470944710447114471244713447144471544716447174471844719447204472144722447234472444725447264472744728447294473044731447324473344734447354473644737447384473944740447414474244743447444474544746447474474844749447504475144752447534475444755447564475744758447594476044761447624476344764447654476644767447684476944770447714477244773447744477544776447774477844779447804478144782447834478444785447864478744788447894479044791447924479344794447954479644797447984479944800448014480244803448044480544806448074480844809448104481144812448134481444815448164481744818448194482044821448224482344824448254482644827448284482944830448314483244833448344483544836448374483844839448404484144842448434484444845448464484744848448494485044851448524485344854448554485644857448584485944860448614486244863448644486544866448674486844869448704487144872448734487444875448764487744878448794488044881448824488344884448854488644887448884488944890448914489244893448944489544896448974489844899449004490144902449034490444905449064490744908449094491044911449124491344914449154491644917449184491944920449214492244923449244492544926449274492844929449304493144932449334493444935449364493744938449394494044941449424494344944449454494644947449484494944950449514495244953449544495544956449574495844959449604496144962449634496444965449664496744968449694497044971449724497344974449754497644977449784497944980449814498244983449844498544986449874498844989449904499144992449934499444995449964499744998449994500045001450024500345004450054500645007450084500945010450114501245013450144501545016450174501845019450204502145022450234502445025450264502745028450294503045031450324503345034450354503645037450384503945040450414504245043450444504545046450474504845049450504505145052450534505445055450564505745058450594506045061450624506345064450654506645067450684506945070450714507245073450744507545076450774507845079450804508145082450834508445085450864508745088450894509045091450924509345094450954509645097450984509945100451014510245103451044510545106451074510845109451104511145112451134511445115451164511745118451194512045121451224512345124451254512645127451284512945130451314513245133451344513545136451374513845139451404514145142451434514445145451464514745148451494515045151451524515345154451554515645157451584515945160451614516245163451644516545166451674516845169451704517145172451734517445175451764517745178451794518045181451824518345184451854518645187451884518945190451914519245193451944519545196451974519845199452004520145202452034520445205452064520745208452094521045211452124521345214452154521645217452184521945220452214522245223452244522545226452274522845229452304523145232452334523445235452364523745238452394524045241452424524345244452454524645247452484524945250452514525245253452544525545256452574525845259452604526145262452634526445265452664526745268452694527045271452724527345274452754527645277452784527945280452814528245283452844528545286452874528845289452904529145292452934529445295452964529745298452994530045301453024530345304453054530645307453084530945310453114531245313453144531545316453174531845319453204532145322453234532445325453264532745328453294533045331453324533345334453354533645337453384533945340453414534245343453444534545346453474534845349453504535145352453534535445355453564535745358453594536045361453624536345364453654536645367453684536945370453714537245373453744537545376453774537845379453804538145382453834538445385453864538745388453894539045391453924539345394453954539645397453984539945400454014540245403454044540545406454074540845409454104541145412454134541445415454164541745418454194542045421454224542345424454254542645427454284542945430454314543245433454344543545436454374543845439454404544145442454434544445445454464544745448454494545045451454524545345454454554545645457454584545945460454614546245463454644546545466454674546845469454704547145472454734547445475454764547745478454794548045481454824548345484454854548645487454884548945490454914549245493454944549545496454974549845499455004550145502455034550445505455064550745508455094551045511455124551345514455154551645517455184551945520455214552245523455244552545526455274552845529455304553145532455334553445535455364553745538455394554045541455424554345544455454554645547455484554945550455514555245553455544555545556455574555845559455604556145562455634556445565455664556745568455694557045571455724557345574455754557645577455784557945580455814558245583455844558545586455874558845589455904559145592455934559445595455964559745598455994560045601456024560345604456054560645607456084560945610456114561245613456144561545616456174561845619456204562145622456234562445625456264562745628456294563045631456324563345634456354563645637456384563945640456414564245643456444564545646456474564845649456504565145652456534565445655456564565745658456594566045661456624566345664456654566645667456684566945670456714567245673456744567545676456774567845679456804568145682456834568445685456864568745688456894569045691456924569345694456954569645697456984569945700457014570245703457044570545706457074570845709457104571145712457134571445715457164571745718457194572045721457224572345724457254572645727457284572945730457314573245733457344573545736457374573845739457404574145742457434574445745457464574745748457494575045751457524575345754457554575645757457584575945760457614576245763457644576545766457674576845769457704577145772457734577445775457764577745778457794578045781457824578345784457854578645787457884578945790457914579245793457944579545796457974579845799458004580145802458034580445805458064580745808458094581045811458124581345814458154581645817458184581945820458214582245823458244582545826458274582845829458304583145832458334583445835458364583745838458394584045841458424584345844458454584645847458484584945850458514585245853458544585545856458574585845859458604586145862458634586445865458664586745868458694587045871458724587345874458754587645877458784587945880458814588245883458844588545886458874588845889458904589145892458934589445895458964589745898458994590045901459024590345904459054590645907459084590945910459114591245913459144591545916459174591845919459204592145922459234592445925459264592745928459294593045931459324593345934459354593645937459384593945940459414594245943459444594545946459474594845949459504595145952459534595445955459564595745958459594596045961459624596345964459654596645967459684596945970459714597245973459744597545976459774597845979459804598145982459834598445985459864598745988459894599045991459924599345994459954599645997459984599946000460014600246003460044600546006460074600846009460104601146012460134601446015460164601746018460194602046021460224602346024460254602646027460284602946030460314603246033460344603546036460374603846039460404604146042460434604446045460464604746048460494605046051460524605346054460554605646057460584605946060460614606246063460644606546066460674606846069460704607146072460734607446075460764607746078460794608046081460824608346084460854608646087460884608946090460914609246093460944609546096460974609846099461004610146102461034610446105461064610746108461094611046111461124611346114461154611646117461184611946120461214612246123461244612546126461274612846129461304613146132461334613446135461364613746138461394614046141461424614346144461454614646147461484614946150461514615246153461544615546156461574615846159461604616146162461634616446165461664616746168461694617046171461724617346174461754617646177461784617946180461814618246183461844618546186461874618846189461904619146192461934619446195461964619746198461994620046201462024620346204462054620646207462084620946210462114621246213462144621546216462174621846219462204622146222462234622446225462264622746228462294623046231462324623346234462354623646237462384623946240462414624246243462444624546246462474624846249462504625146252462534625446255462564625746258462594626046261462624626346264462654626646267462684626946270462714627246273462744627546276462774627846279462804628146282462834628446285462864628746288462894629046291462924629346294462954629646297462984629946300463014630246303463044630546306463074630846309463104631146312463134631446315463164631746318463194632046321463224632346324463254632646327463284632946330463314633246333463344633546336463374633846339463404634146342463434634446345463464634746348463494635046351463524635346354463554635646357463584635946360463614636246363463644636546366463674636846369463704637146372463734637446375463764637746378463794638046381463824638346384463854638646387463884638946390463914639246393463944639546396463974639846399464004640146402464034640446405464064640746408464094641046411464124641346414464154641646417464184641946420464214642246423464244642546426464274642846429464304643146432464334643446435464364643746438464394644046441464424644346444464454644646447464484644946450464514645246453464544645546456464574645846459464604646146462464634646446465464664646746468464694647046471464724647346474464754647646477464784647946480464814648246483464844648546486464874648846489464904649146492464934649446495464964649746498464994650046501465024650346504465054650646507465084650946510465114651246513465144651546516465174651846519465204652146522465234652446525465264652746528465294653046531465324653346534465354653646537465384653946540465414654246543465444654546546465474654846549465504655146552465534655446555465564655746558465594656046561465624656346564465654656646567465684656946570465714657246573465744657546576465774657846579465804658146582465834658446585465864658746588465894659046591465924659346594465954659646597465984659946600466014660246603466044660546606466074660846609466104661146612466134661446615466164661746618466194662046621466224662346624466254662646627466284662946630466314663246633466344663546636466374663846639466404664146642466434664446645466464664746648466494665046651466524665346654466554665646657466584665946660466614666246663466644666546666466674666846669466704667146672466734667446675466764667746678466794668046681466824668346684466854668646687466884668946690466914669246693466944669546696466974669846699467004670146702467034670446705467064670746708467094671046711467124671346714467154671646717467184671946720467214672246723467244672546726467274672846729467304673146732467334673446735467364673746738467394674046741467424674346744467454674646747467484674946750467514675246753467544675546756467574675846759467604676146762467634676446765467664676746768467694677046771467724677346774467754677646777467784677946780467814678246783467844678546786467874678846789467904679146792467934679446795467964679746798467994680046801468024680346804468054680646807468084680946810468114681246813468144681546816468174681846819468204682146822468234682446825468264682746828468294683046831468324683346834468354683646837468384683946840468414684246843468444684546846468474684846849468504685146852468534685446855468564685746858468594686046861468624686346864468654686646867468684686946870468714687246873468744687546876468774687846879468804688146882468834688446885468864688746888468894689046891468924689346894468954689646897468984689946900469014690246903469044690546906469074690846909469104691146912469134691446915469164691746918469194692046921469224692346924469254692646927469284692946930469314693246933469344693546936469374693846939469404694146942469434694446945469464694746948469494695046951469524695346954469554695646957469584695946960469614696246963469644696546966469674696846969469704697146972469734697446975469764697746978469794698046981469824698346984469854698646987469884698946990469914699246993469944699546996469974699846999470004700147002470034700447005470064700747008470094701047011470124701347014470154701647017470184701947020470214702247023470244702547026470274702847029470304703147032470334703447035470364703747038470394704047041470424704347044470454704647047470484704947050470514705247053470544705547056470574705847059470604706147062470634706447065470664706747068470694707047071470724707347074470754707647077470784707947080470814708247083470844708547086470874708847089470904709147092470934709447095470964709747098470994710047101471024710347104471054710647107471084710947110471114711247113471144711547116471174711847119471204712147122471234712447125471264712747128471294713047131471324713347134471354713647137471384713947140471414714247143471444714547146471474714847149471504715147152471534715447155471564715747158471594716047161471624716347164471654716647167471684716947170471714717247173471744717547176471774717847179471804718147182471834718447185471864718747188471894719047191471924719347194471954719647197471984719947200472014720247203472044720547206472074720847209472104721147212472134721447215472164721747218472194722047221472224722347224472254722647227472284722947230472314723247233472344723547236472374723847239472404724147242472434724447245472464724747248472494725047251472524725347254472554725647257472584725947260472614726247263472644726547266472674726847269472704727147272472734727447275472764727747278472794728047281472824728347284472854728647287472884728947290472914729247293472944729547296472974729847299473004730147302473034730447305473064730747308473094731047311473124731347314473154731647317473184731947320473214732247323473244732547326473274732847329473304733147332473334733447335473364733747338473394734047341473424734347344473454734647347473484734947350473514735247353473544735547356473574735847359473604736147362473634736447365473664736747368473694737047371473724737347374473754737647377473784737947380473814738247383473844738547386473874738847389473904739147392473934739447395473964739747398473994740047401474024740347404474054740647407474084740947410474114741247413474144741547416474174741847419474204742147422474234742447425474264742747428474294743047431474324743347434474354743647437474384743947440474414744247443474444744547446474474744847449474504745147452474534745447455474564745747458474594746047461474624746347464474654746647467474684746947470474714747247473474744747547476474774747847479474804748147482474834748447485474864748747488474894749047491474924749347494474954749647497474984749947500475014750247503475044750547506475074750847509475104751147512475134751447515475164751747518475194752047521475224752347524475254752647527475284752947530475314753247533475344753547536475374753847539475404754147542475434754447545475464754747548475494755047551475524755347554475554755647557475584755947560475614756247563475644756547566475674756847569475704757147572475734757447575475764757747578475794758047581475824758347584475854758647587475884758947590475914759247593475944759547596475974759847599476004760147602476034760447605476064760747608476094761047611476124761347614476154761647617476184761947620476214762247623476244762547626476274762847629476304763147632476334763447635476364763747638476394764047641476424764347644476454764647647476484764947650476514765247653476544765547656476574765847659476604766147662476634766447665476664766747668476694767047671476724767347674476754767647677476784767947680476814768247683476844768547686476874768847689476904769147692476934769447695476964769747698476994770047701477024770347704477054770647707477084770947710477114771247713477144771547716477174771847719477204772147722477234772447725477264772747728477294773047731477324773347734477354773647737477384773947740477414774247743477444774547746477474774847749477504775147752477534775447755477564775747758477594776047761477624776347764477654776647767477684776947770477714777247773477744777547776477774777847779477804778147782477834778447785477864778747788477894779047791477924779347794477954779647797477984779947800478014780247803478044780547806478074780847809478104781147812478134781447815478164781747818478194782047821478224782347824478254782647827478284782947830478314783247833478344783547836478374783847839478404784147842478434784447845478464784747848478494785047851478524785347854478554785647857478584785947860478614786247863478644786547866478674786847869478704787147872478734787447875478764787747878478794788047881478824788347884478854788647887478884788947890478914789247893478944789547896478974789847899479004790147902479034790447905479064790747908479094791047911479124791347914479154791647917479184791947920479214792247923479244792547926479274792847929479304793147932479334793447935479364793747938479394794047941479424794347944479454794647947479484794947950479514795247953479544795547956479574795847959479604796147962479634796447965479664796747968479694797047971479724797347974479754797647977479784797947980479814798247983479844798547986479874798847989479904799147992479934799447995479964799747998479994800048001480024800348004480054800648007480084800948010480114801248013480144801548016480174801848019480204802148022480234802448025480264802748028480294803048031480324803348034480354803648037480384803948040480414804248043480444804548046480474804848049480504805148052480534805448055480564805748058480594806048061480624806348064480654806648067480684806948070480714807248073480744807548076480774807848079480804808148082480834808448085480864808748088480894809048091480924809348094480954809648097480984809948100481014810248103481044810548106481074810848109481104811148112481134811448115481164811748118481194812048121481224812348124481254812648127481284812948130481314813248133481344813548136481374813848139481404814148142481434814448145481464814748148481494815048151481524815348154481554815648157481584815948160481614816248163481644816548166481674816848169481704817148172481734817448175481764817748178481794818048181481824818348184481854818648187481884818948190481914819248193481944819548196481974819848199482004820148202482034820448205482064820748208482094821048211482124821348214482154821648217482184821948220482214822248223482244822548226482274822848229482304823148232482334823448235482364823748238482394824048241482424824348244482454824648247482484824948250482514825248253482544825548256482574825848259482604826148262482634826448265482664826748268482694827048271482724827348274482754827648277482784827948280482814828248283482844828548286482874828848289482904829148292482934829448295482964829748298482994830048301483024830348304483054830648307483084830948310483114831248313483144831548316483174831848319483204832148322483234832448325483264832748328483294833048331483324833348334483354833648337483384833948340483414834248343483444834548346483474834848349483504835148352483534835448355483564835748358483594836048361483624836348364483654836648367483684836948370483714837248373483744837548376483774837848379483804838148382483834838448385483864838748388483894839048391483924839348394483954839648397483984839948400484014840248403484044840548406484074840848409484104841148412484134841448415484164841748418484194842048421484224842348424484254842648427484284842948430484314843248433484344843548436484374843848439484404844148442484434844448445484464844748448484494845048451484524845348454484554845648457484584845948460484614846248463484644846548466484674846848469484704847148472484734847448475484764847748478484794848048481484824848348484484854848648487484884848948490484914849248493484944849548496484974849848499485004850148502485034850448505485064850748508485094851048511485124851348514485154851648517485184851948520485214852248523485244852548526485274852848529485304853148532485334853448535485364853748538485394854048541485424854348544485454854648547485484854948550485514855248553485544855548556485574855848559485604856148562485634856448565485664856748568485694857048571485724857348574485754857648577485784857948580485814858248583485844858548586485874858848589485904859148592485934859448595485964859748598485994860048601486024860348604486054860648607486084860948610486114861248613486144861548616486174861848619486204862148622486234862448625486264862748628486294863048631486324863348634486354863648637486384863948640486414864248643486444864548646486474864848649486504865148652486534865448655486564865748658486594866048661486624866348664486654866648667486684866948670486714867248673486744867548676486774867848679486804868148682486834868448685486864868748688486894869048691486924869348694486954869648697486984869948700487014870248703487044870548706487074870848709487104871148712487134871448715487164871748718487194872048721487224872348724487254872648727487284872948730487314873248733487344873548736487374873848739487404874148742487434874448745487464874748748487494875048751487524875348754487554875648757487584875948760487614876248763487644876548766487674876848769487704877148772487734877448775487764877748778487794878048781487824878348784487854878648787487884878948790487914879248793487944879548796487974879848799488004880148802488034880448805488064880748808488094881048811488124881348814488154881648817488184881948820488214882248823488244882548826488274882848829488304883148832488334883448835488364883748838488394884048841488424884348844488454884648847488484884948850488514885248853488544885548856488574885848859488604886148862488634886448865488664886748868488694887048871488724887348874488754887648877488784887948880488814888248883488844888548886488874888848889488904889148892488934889448895488964889748898488994890048901489024890348904489054890648907489084890948910489114891248913489144891548916489174891848919489204892148922489234892448925489264892748928489294893048931489324893348934489354893648937489384893948940489414894248943489444894548946489474894848949489504895148952489534895448955489564895748958489594896048961489624896348964489654896648967489684896948970489714897248973489744897548976489774897848979489804898148982489834898448985489864898748988489894899048991489924899348994489954899648997489984899949000490014900249003490044900549006490074900849009490104901149012490134901449015490164901749018490194902049021490224902349024490254902649027490284902949030490314903249033490344903549036490374903849039490404904149042490434904449045490464904749048490494905049051490524905349054490554905649057490584905949060490614906249063490644906549066490674906849069490704907149072490734907449075490764907749078490794908049081490824908349084490854908649087490884908949090490914909249093490944909549096490974909849099491004910149102491034910449105491064910749108491094911049111491124911349114491154911649117491184911949120491214912249123491244912549126491274912849129491304913149132491334913449135491364913749138491394914049141491424914349144491454914649147491484914949150491514915249153491544915549156491574915849159491604916149162491634916449165491664916749168491694917049171491724917349174491754917649177491784917949180491814918249183491844918549186491874918849189491904919149192491934919449195491964919749198491994920049201492024920349204492054920649207492084920949210492114921249213492144921549216492174921849219492204922149222492234922449225492264922749228492294923049231492324923349234492354923649237492384923949240492414924249243492444924549246492474924849249492504925149252492534925449255492564925749258492594926049261492624926349264492654926649267492684926949270492714927249273492744927549276492774927849279492804928149282492834928449285492864928749288492894929049291492924929349294492954929649297492984929949300493014930249303493044930549306493074930849309493104931149312493134931449315493164931749318493194932049321493224932349324493254932649327493284932949330493314933249333493344933549336493374933849339493404934149342493434934449345493464934749348493494935049351493524935349354493554935649357493584935949360493614936249363493644936549366493674936849369493704937149372493734937449375493764937749378493794938049381493824938349384493854938649387493884938949390493914939249393493944939549396493974939849399494004940149402494034940449405494064940749408494094941049411494124941349414494154941649417494184941949420494214942249423494244942549426494274942849429494304943149432494334943449435494364943749438494394944049441494424944349444494454944649447494484944949450494514945249453494544945549456494574945849459494604946149462494634946449465494664946749468494694947049471494724947349474494754947649477494784947949480494814948249483494844948549486494874948849489494904949149492494934949449495494964949749498494994950049501495024950349504495054950649507495084950949510495114951249513495144951549516495174951849519495204952149522495234952449525495264952749528495294953049531495324953349534495354953649537495384953949540495414954249543495444954549546495474954849549495504955149552495534955449555495564955749558495594956049561495624956349564495654956649567495684956949570495714957249573495744957549576495774957849579495804958149582495834958449585495864958749588495894959049591495924959349594495954959649597495984959949600496014960249603496044960549606496074960849609496104961149612496134961449615496164961749618496194962049621496224962349624496254962649627496284962949630496314963249633496344963549636496374963849639496404964149642496434964449645496464964749648496494965049651496524965349654496554965649657496584965949660496614966249663496644966549666496674966849669496704967149672496734967449675496764967749678496794968049681496824968349684496854968649687496884968949690496914969249693496944969549696496974969849699497004970149702497034970449705497064970749708497094971049711497124971349714497154971649717497184971949720497214972249723497244972549726497274972849729497304973149732497334973449735497364973749738497394974049741497424974349744497454974649747497484974949750497514975249753497544975549756497574975849759497604976149762497634976449765497664976749768497694977049771497724977349774497754977649777497784977949780497814978249783497844978549786497874978849789497904979149792497934979449795497964979749798497994980049801498024980349804498054980649807498084980949810498114981249813498144981549816498174981849819498204982149822498234982449825498264982749828498294983049831498324983349834498354983649837498384983949840498414984249843498444984549846498474984849849498504985149852498534985449855498564985749858498594986049861498624986349864498654986649867498684986949870498714987249873498744987549876498774987849879498804988149882498834988449885498864988749888498894989049891498924989349894498954989649897498984989949900499014990249903499044990549906499074990849909499104991149912499134991449915499164991749918499194992049921499224992349924499254992649927499284992949930499314993249933499344993549936499374993849939499404994149942499434994449945499464994749948499494995049951499524995349954499554995649957499584995949960499614996249963499644996549966499674996849969499704997149972499734997449975499764997749978499794998049981499824998349984499854998649987499884998949990499914999249993499944999549996499974999849999500005000150002500035000450005500065000750008500095001050011500125001350014500155001650017500185001950020500215002250023500245002550026500275002850029500305003150032500335003450035500365003750038500395004050041500425004350044500455004650047500485004950050500515005250053500545005550056500575005850059500605006150062500635006450065500665006750068500695007050071500725007350074500755007650077500785007950080500815008250083500845008550086500875008850089500905009150092500935009450095500965009750098500995010050101501025010350104501055010650107501085010950110501115011250113501145011550116501175011850119501205012150122501235012450125501265012750128501295013050131501325013350134501355013650137501385013950140501415014250143501445014550146501475014850149501505015150152501535015450155501565015750158501595016050161501625016350164501655016650167501685016950170501715017250173501745017550176501775017850179501805018150182501835018450185501865018750188501895019050191501925019350194501955019650197501985019950200502015020250203502045020550206502075020850209502105021150212502135021450215502165021750218502195022050221502225022350224502255022650227502285022950230502315023250233502345023550236502375023850239502405024150242502435024450245502465024750248502495025050251502525025350254502555025650257502585025950260502615026250263502645026550266502675026850269502705027150272502735027450275502765027750278502795028050281502825028350284502855028650287502885028950290502915029250293502945029550296502975029850299503005030150302503035030450305503065030750308503095031050311503125031350314503155031650317503185031950320503215032250323503245032550326503275032850329503305033150332503335033450335503365033750338503395034050341503425034350344503455034650347503485034950350503515035250353503545035550356503575035850359503605036150362503635036450365503665036750368503695037050371503725037350374503755037650377503785037950380503815038250383503845038550386503875038850389503905039150392503935039450395503965039750398503995040050401504025040350404504055040650407504085040950410504115041250413504145041550416504175041850419504205042150422504235042450425504265042750428504295043050431504325043350434504355043650437504385043950440504415044250443504445044550446504475044850449504505045150452504535045450455504565045750458504595046050461504625046350464504655046650467504685046950470504715047250473504745047550476504775047850479504805048150482504835048450485504865048750488504895049050491504925049350494504955049650497504985049950500505015050250503505045050550506505075050850509505105051150512505135051450515505165051750518505195052050521505225052350524505255052650527505285052950530505315053250533505345053550536505375053850539505405054150542505435054450545505465054750548505495055050551505525055350554505555055650557505585055950560505615056250563505645056550566505675056850569505705057150572505735057450575505765057750578505795058050581505825058350584505855058650587505885058950590505915059250593505945059550596505975059850599506005060150602506035060450605506065060750608506095061050611506125061350614506155061650617506185061950620506215062250623506245062550626506275062850629506305063150632506335063450635506365063750638506395064050641506425064350644506455064650647506485064950650506515065250653506545065550656506575065850659506605066150662506635066450665506665066750668506695067050671506725067350674506755067650677506785067950680506815068250683506845068550686506875068850689506905069150692506935069450695506965069750698506995070050701507025070350704507055070650707507085070950710507115071250713507145071550716507175071850719507205072150722507235072450725507265072750728507295073050731507325073350734507355073650737507385073950740507415074250743507445074550746507475074850749507505075150752507535075450755507565075750758507595076050761507625076350764507655076650767507685076950770507715077250773507745077550776507775077850779507805078150782507835078450785507865078750788507895079050791507925079350794507955079650797507985079950800508015080250803508045080550806508075080850809508105081150812508135081450815508165081750818508195082050821508225082350824508255082650827508285082950830508315083250833508345083550836508375083850839508405084150842508435084450845508465084750848508495085050851508525085350854508555085650857508585085950860508615086250863508645086550866508675086850869508705087150872508735087450875508765087750878508795088050881508825088350884508855088650887508885088950890508915089250893508945089550896508975089850899509005090150902509035090450905509065090750908509095091050911509125091350914509155091650917509185091950920509215092250923509245092550926509275092850929509305093150932509335093450935509365093750938509395094050941509425094350944509455094650947509485094950950509515095250953509545095550956509575095850959509605096150962509635096450965509665096750968509695097050971509725097350974509755097650977509785097950980509815098250983509845098550986509875098850989509905099150992509935099450995509965099750998509995100051001510025100351004510055100651007510085100951010510115101251013510145101551016510175101851019510205102151022510235102451025510265102751028510295103051031510325103351034510355103651037510385103951040510415104251043510445104551046510475104851049510505105151052510535105451055510565105751058510595106051061510625106351064510655106651067510685106951070510715107251073510745107551076510775107851079510805108151082510835108451085510865108751088510895109051091510925109351094510955109651097510985109951100511015110251103511045110551106511075110851109511105111151112511135111451115511165111751118511195112051121511225112351124511255112651127511285112951130511315113251133511345113551136511375113851139511405114151142511435114451145511465114751148511495115051151511525115351154511555115651157511585115951160511615116251163511645116551166511675116851169511705117151172511735117451175511765117751178511795118051181511825118351184511855118651187511885118951190511915119251193511945119551196511975119851199512005120151202512035120451205512065120751208512095121051211512125121351214512155121651217512185121951220512215122251223512245122551226512275122851229512305123151232512335123451235512365123751238512395124051241512425124351244512455124651247512485124951250512515125251253512545125551256512575125851259512605126151262512635126451265512665126751268512695127051271512725127351274512755127651277512785127951280512815128251283512845128551286512875128851289512905129151292512935129451295512965129751298512995130051301513025130351304513055130651307513085130951310513115131251313513145131551316513175131851319513205132151322513235132451325513265132751328513295133051331513325133351334513355133651337513385133951340513415134251343513445134551346513475134851349513505135151352513535135451355513565135751358513595136051361513625136351364513655136651367513685136951370513715137251373513745137551376513775137851379513805138151382513835138451385513865138751388513895139051391513925139351394513955139651397513985139951400514015140251403514045140551406514075140851409514105141151412514135141451415514165141751418514195142051421514225142351424514255142651427514285142951430514315143251433514345143551436514375143851439514405144151442514435144451445514465144751448514495145051451514525145351454514555145651457514585145951460514615146251463514645146551466514675146851469514705147151472514735147451475514765147751478514795148051481514825148351484514855148651487514885148951490514915149251493514945149551496514975149851499515005150151502515035150451505515065150751508515095151051511515125151351514515155151651517515185151951520515215152251523515245152551526515275152851529515305153151532515335153451535515365153751538515395154051541515425154351544515455154651547515485154951550515515155251553515545155551556515575155851559515605156151562515635156451565515665156751568515695157051571515725157351574515755157651577515785157951580515815158251583515845158551586515875158851589515905159151592515935159451595515965159751598515995160051601516025160351604516055160651607516085160951610516115161251613516145161551616516175161851619516205162151622516235162451625516265162751628516295163051631516325163351634516355163651637516385163951640516415164251643516445164551646516475164851649516505165151652516535165451655516565165751658516595166051661516625166351664516655166651667516685166951670516715167251673516745167551676516775167851679516805168151682516835168451685516865168751688516895169051691516925169351694516955169651697516985169951700517015170251703517045170551706517075170851709517105171151712517135171451715517165171751718517195172051721517225172351724517255172651727517285172951730517315173251733517345173551736517375173851739517405174151742517435174451745517465174751748517495175051751517525175351754517555175651757517585175951760517615176251763517645176551766517675176851769517705177151772517735177451775517765177751778517795178051781517825178351784517855178651787517885178951790517915179251793517945179551796517975179851799518005180151802518035180451805518065180751808518095181051811518125181351814518155181651817518185181951820518215182251823518245182551826518275182851829518305183151832518335183451835518365183751838518395184051841518425184351844518455184651847518485184951850518515185251853518545185551856518575185851859518605186151862518635186451865518665186751868518695187051871518725187351874518755187651877518785187951880518815188251883518845188551886518875188851889518905189151892518935189451895518965189751898518995190051901519025190351904519055190651907519085190951910519115191251913519145191551916519175191851919519205192151922519235192451925519265192751928519295193051931519325193351934519355193651937519385193951940519415194251943519445194551946519475194851949519505195151952519535195451955519565195751958519595196051961519625196351964519655196651967519685196951970519715197251973519745197551976519775197851979519805198151982519835198451985519865198751988519895199051991519925199351994519955199651997519985199952000520015200252003520045200552006520075200852009520105201152012520135201452015520165201752018520195202052021520225202352024520255202652027520285202952030520315203252033520345203552036520375203852039520405204152042520435204452045520465204752048520495205052051520525205352054520555205652057520585205952060520615206252063520645206552066520675206852069520705207152072520735207452075520765207752078520795208052081520825208352084520855208652087520885208952090520915209252093520945209552096520975209852099521005210152102521035210452105521065210752108521095211052111521125211352114521155211652117521185211952120521215212252123521245212552126521275212852129521305213152132521335213452135521365213752138521395214052141521425214352144521455214652147521485214952150521515215252153521545215552156521575215852159521605216152162521635216452165521665216752168521695217052171521725217352174521755217652177521785217952180521815218252183521845218552186521875218852189521905219152192521935219452195521965219752198521995220052201522025220352204522055220652207522085220952210522115221252213522145221552216522175221852219522205222152222522235222452225522265222752228522295223052231522325223352234522355223652237522385223952240522415224252243522445224552246522475224852249522505225152252522535225452255522565225752258522595226052261522625226352264522655226652267522685226952270522715227252273522745227552276522775227852279522805228152282522835228452285522865228752288522895229052291522925229352294522955229652297522985229952300523015230252303523045230552306523075230852309523105231152312523135231452315523165231752318523195232052321523225232352324523255232652327523285232952330523315233252333523345233552336523375233852339523405234152342523435234452345523465234752348523495235052351523525235352354523555235652357523585235952360523615236252363523645236552366523675236852369523705237152372523735237452375523765237752378523795238052381523825238352384523855238652387523885238952390523915239252393523945239552396523975239852399524005240152402524035240452405524065240752408524095241052411524125241352414524155241652417524185241952420524215242252423524245242552426524275242852429524305243152432524335243452435524365243752438524395244052441524425244352444524455244652447524485244952450524515245252453524545245552456524575245852459524605246152462524635246452465524665246752468524695247052471524725247352474524755247652477524785247952480524815248252483524845248552486524875248852489524905249152492524935249452495524965249752498524995250052501525025250352504525055250652507525085250952510525115251252513525145251552516525175251852519525205252152522525235252452525525265252752528525295253052531525325253352534525355253652537525385253952540525415254252543525445254552546525475254852549525505255152552525535255452555525565255752558525595256052561525625256352564525655256652567525685256952570525715257252573525745257552576525775257852579525805258152582525835258452585525865258752588525895259052591525925259352594525955259652597525985259952600526015260252603526045260552606526075260852609526105261152612526135261452615526165261752618526195262052621526225262352624526255262652627526285262952630526315263252633526345263552636526375263852639526405264152642526435264452645526465264752648526495265052651526525265352654526555265652657526585265952660526615266252663526645266552666526675266852669526705267152672526735267452675526765267752678526795268052681526825268352684526855268652687526885268952690526915269252693526945269552696526975269852699527005270152702527035270452705527065270752708527095271052711527125271352714527155271652717527185271952720527215272252723527245272552726527275272852729527305273152732527335273452735527365273752738527395274052741527425274352744527455274652747527485274952750527515275252753527545275552756527575275852759527605276152762527635276452765527665276752768527695277052771527725277352774527755277652777527785277952780527815278252783527845278552786527875278852789527905279152792527935279452795527965279752798527995280052801528025280352804528055280652807528085280952810528115281252813528145281552816528175281852819528205282152822528235282452825528265282752828528295283052831528325283352834528355283652837528385283952840528415284252843528445284552846528475284852849528505285152852528535285452855528565285752858528595286052861528625286352864528655286652867528685286952870528715287252873528745287552876528775287852879528805288152882528835288452885528865288752888528895289052891528925289352894528955289652897528985289952900529015290252903529045290552906529075290852909529105291152912529135291452915529165291752918529195292052921529225292352924529255292652927529285292952930529315293252933529345293552936529375293852939529405294152942529435294452945529465294752948529495295052951529525295352954529555295652957529585295952960529615296252963529645296552966529675296852969529705297152972529735297452975529765297752978529795298052981529825298352984529855298652987529885298952990529915299252993529945299552996529975299852999530005300153002530035300453005530065300753008530095301053011530125301353014530155301653017530185301953020530215302253023530245302553026530275302853029530305303153032530335303453035530365303753038530395304053041530425304353044530455304653047530485304953050530515305253053530545305553056530575305853059530605306153062530635306453065530665306753068530695307053071530725307353074530755307653077530785307953080530815308253083530845308553086530875308853089530905309153092530935309453095530965309753098530995310053101531025310353104531055310653107531085310953110531115311253113531145311553116531175311853119531205312153122531235312453125531265312753128531295313053131531325313353134531355313653137531385313953140531415314253143531445314553146531475314853149531505315153152531535315453155531565315753158531595316053161531625316353164531655316653167531685316953170531715317253173531745317553176531775317853179531805318153182531835318453185531865318753188531895319053191531925319353194531955319653197531985319953200532015320253203532045320553206532075320853209532105321153212532135321453215532165321753218532195322053221532225322353224532255322653227532285322953230532315323253233532345323553236532375323853239532405324153242532435324453245532465324753248532495325053251532525325353254532555325653257532585325953260532615326253263532645326553266532675326853269532705327153272532735327453275532765327753278532795328053281532825328353284532855328653287532885328953290532915329253293532945329553296532975329853299533005330153302533035330453305533065330753308533095331053311533125331353314533155331653317533185331953320533215332253323533245332553326533275332853329533305333153332533335333453335533365333753338533395334053341533425334353344533455334653347533485334953350533515335253353533545335553356533575335853359533605336153362533635336453365533665336753368533695337053371533725337353374533755337653377533785337953380533815338253383533845338553386533875338853389533905339153392533935339453395533965339753398533995340053401534025340353404534055340653407534085340953410534115341253413534145341553416534175341853419534205342153422534235342453425534265342753428534295343053431534325343353434534355343653437534385343953440534415344253443534445344553446534475344853449534505345153452534535345453455534565345753458534595346053461534625346353464534655346653467534685346953470534715347253473534745347553476534775347853479534805348153482534835348453485534865348753488534895349053491534925349353494534955349653497534985349953500535015350253503535045350553506535075350853509535105351153512535135351453515535165351753518535195352053521535225352353524535255352653527535285352953530535315353253533535345353553536535375353853539535405354153542535435354453545535465354753548535495355053551535525355353554535555355653557535585355953560535615356253563535645356553566535675356853569535705357153572535735357453575535765357753578535795358053581535825358353584535855358653587535885358953590535915359253593535945359553596535975359853599536005360153602536035360453605536065360753608536095361053611536125361353614536155361653617536185361953620536215362253623536245362553626536275362853629536305363153632536335363453635536365363753638536395364053641536425364353644536455364653647536485364953650536515365253653536545365553656536575365853659536605366153662536635366453665536665366753668536695367053671536725367353674536755367653677536785367953680536815368253683536845368553686536875368853689536905369153692536935369453695536965369753698536995370053701537025370353704537055370653707537085370953710537115371253713537145371553716537175371853719537205372153722537235372453725537265372753728537295373053731537325373353734537355373653737537385373953740537415374253743537445374553746537475374853749537505375153752537535375453755537565375753758537595376053761537625376353764537655376653767537685376953770537715377253773537745377553776537775377853779537805378153782537835378453785537865378753788537895379053791537925379353794537955379653797537985379953800538015380253803538045380553806538075380853809538105381153812538135381453815538165381753818538195382053821538225382353824538255382653827538285382953830538315383253833538345383553836538375383853839538405384153842538435384453845538465384753848538495385053851538525385353854538555385653857538585385953860538615386253863538645386553866538675386853869538705387153872538735387453875538765387753878538795388053881538825388353884538855388653887538885388953890538915389253893538945389553896538975389853899539005390153902539035390453905539065390753908539095391053911539125391353914539155391653917539185391953920539215392253923539245392553926539275392853929539305393153932539335393453935539365393753938539395394053941539425394353944539455394653947539485394953950539515395253953539545395553956539575395853959539605396153962539635396453965539665396753968539695397053971539725397353974539755397653977539785397953980539815398253983539845398553986539875398853989539905399153992539935399453995539965399753998539995400054001540025400354004540055400654007540085400954010540115401254013540145401554016540175401854019540205402154022540235402454025540265402754028540295403054031540325403354034540355403654037540385403954040540415404254043540445404554046540475404854049540505405154052540535405454055540565405754058540595406054061540625406354064540655406654067540685406954070540715407254073540745407554076540775407854079540805408154082540835408454085540865408754088540895409054091540925409354094540955409654097540985409954100541015410254103541045410554106541075410854109541105411154112541135411454115541165411754118541195412054121541225412354124541255412654127541285412954130541315413254133541345413554136541375413854139541405414154142541435414454145541465414754148541495415054151541525415354154541555415654157541585415954160541615416254163541645416554166541675416854169541705417154172541735417454175541765417754178541795418054181541825418354184541855418654187541885418954190541915419254193541945419554196541975419854199542005420154202542035420454205542065420754208542095421054211542125421354214542155421654217542185421954220542215422254223542245422554226542275422854229542305423154232542335423454235542365423754238542395424054241542425424354244542455424654247542485424954250542515425254253542545425554256542575425854259542605426154262542635426454265542665426754268542695427054271542725427354274542755427654277542785427954280542815428254283542845428554286542875428854289542905429154292542935429454295542965429754298542995430054301543025430354304543055430654307543085430954310543115431254313543145431554316543175431854319543205432154322543235432454325543265432754328543295433054331543325433354334543355433654337543385433954340543415434254343543445434554346543475434854349543505435154352543535435454355543565435754358543595436054361543625436354364543655436654367543685436954370543715437254373543745437554376543775437854379543805438154382543835438454385543865438754388543895439054391543925439354394543955439654397543985439954400544015440254403544045440554406544075440854409544105441154412544135441454415544165441754418544195442054421544225442354424544255442654427544285442954430544315443254433544345443554436544375443854439544405444154442544435444454445544465444754448544495445054451544525445354454544555445654457544585445954460544615446254463544645446554466544675446854469544705447154472544735447454475544765447754478544795448054481544825448354484544855448654487544885448954490544915449254493544945449554496544975449854499545005450154502545035450454505545065450754508545095451054511545125451354514545155451654517545185451954520545215452254523545245452554526545275452854529545305453154532545335453454535545365453754538545395454054541545425454354544545455454654547545485454954550545515455254553545545455554556545575455854559545605456154562545635456454565545665456754568545695457054571545725457354574545755457654577545785457954580545815458254583545845458554586545875458854589545905459154592545935459454595545965459754598545995460054601546025460354604546055460654607546085460954610546115461254613546145461554616546175461854619546205462154622546235462454625546265462754628546295463054631546325463354634546355463654637546385463954640546415464254643546445464554646546475464854649546505465154652546535465454655546565465754658546595466054661546625466354664546655466654667546685466954670546715467254673546745467554676546775467854679546805468154682546835468454685546865468754688546895469054691546925469354694546955469654697546985469954700547015470254703547045470554706547075470854709547105471154712547135471454715547165471754718547195472054721547225472354724547255472654727547285472954730547315473254733547345473554736547375473854739547405474154742547435474454745547465474754748547495475054751547525475354754547555475654757547585475954760547615476254763547645476554766547675476854769547705477154772547735477454775547765477754778547795478054781547825478354784547855478654787547885478954790547915479254793547945479554796547975479854799548005480154802548035480454805548065480754808548095481054811548125481354814548155481654817548185481954820548215482254823548245482554826548275482854829548305483154832548335483454835548365483754838548395484054841548425484354844548455484654847548485484954850548515485254853548545485554856548575485854859548605486154862548635486454865548665486754868548695487054871548725487354874548755487654877548785487954880548815488254883548845488554886548875488854889548905489154892548935489454895548965489754898548995490054901549025490354904549055490654907549085490954910549115491254913549145491554916549175491854919549205492154922549235492454925549265492754928549295493054931549325493354934549355493654937549385493954940549415494254943549445494554946549475494854949549505495154952549535495454955549565495754958549595496054961549625496354964549655496654967549685496954970549715497254973549745497554976549775497854979549805498154982549835498454985549865498754988549895499054991549925499354994549955499654997549985499955000550015500255003550045500555006550075500855009550105501155012550135501455015550165501755018550195502055021550225502355024550255502655027550285502955030550315503255033550345503555036550375503855039550405504155042550435504455045550465504755048550495505055051550525505355054550555505655057550585505955060550615506255063550645506555066550675506855069550705507155072550735507455075550765507755078550795508055081550825508355084550855508655087550885508955090550915509255093550945509555096550975509855099551005510155102551035510455105551065510755108551095511055111551125511355114551155511655117551185511955120551215512255123551245512555126551275512855129551305513155132551335513455135551365513755138551395514055141551425514355144551455514655147551485514955150551515515255153551545515555156551575515855159551605516155162551635516455165551665516755168551695517055171551725517355174551755517655177551785517955180551815518255183551845518555186551875518855189551905519155192551935519455195551965519755198551995520055201552025520355204552055520655207552085520955210552115521255213552145521555216552175521855219552205522155222552235522455225552265522755228552295523055231552325523355234552355523655237552385523955240552415524255243552445524555246552475524855249552505525155252552535525455255552565525755258552595526055261552625526355264552655526655267552685526955270552715527255273552745527555276552775527855279552805528155282552835528455285552865528755288552895529055291552925529355294552955529655297552985529955300553015530255303553045530555306553075530855309553105531155312553135531455315553165531755318553195532055321553225532355324553255532655327553285532955330553315533255333553345533555336553375533855339553405534155342553435534455345553465534755348553495535055351553525535355354553555535655357553585535955360553615536255363553645536555366553675536855369553705537155372553735537455375553765537755378553795538055381553825538355384553855538655387553885538955390553915539255393553945539555396553975539855399554005540155402554035540455405554065540755408554095541055411554125541355414554155541655417554185541955420554215542255423554245542555426554275542855429554305543155432554335543455435554365543755438554395544055441554425544355444554455544655447554485544955450554515545255453554545545555456554575545855459554605546155462554635546455465554665546755468554695547055471554725547355474554755547655477554785547955480554815548255483554845548555486554875548855489554905549155492554935549455495554965549755498554995550055501555025550355504555055550655507555085550955510555115551255513555145551555516555175551855519555205552155522555235552455525555265552755528555295553055531555325553355534555355553655537555385553955540555415554255543555445554555546555475554855549555505555155552555535555455555555565555755558555595556055561555625556355564555655556655567555685556955570555715557255573555745557555576555775557855579555805558155582555835558455585555865558755588555895559055591555925559355594555955559655597555985559955600556015560255603556045560555606556075560855609556105561155612556135561455615556165561755618556195562055621556225562355624556255562655627556285562955630556315563255633556345563555636556375563855639556405564155642556435564455645556465564755648556495565055651556525565355654556555565655657556585565955660556615566255663556645566555666556675566855669556705567155672556735567455675556765567755678556795568055681556825568355684556855568655687556885568955690556915569255693556945569555696556975569855699557005570155702557035570455705557065570755708557095571055711557125571355714557155571655717557185571955720557215572255723557245572555726557275572855729557305573155732557335573455735557365573755738557395574055741557425574355744557455574655747557485574955750557515575255753557545575555756557575575855759557605576155762557635576455765557665576755768557695577055771557725577355774557755577655777557785577955780557815578255783557845578555786557875578855789557905579155792557935579455795557965579755798557995580055801558025580355804558055580655807558085580955810558115581255813558145581555816558175581855819558205582155822558235582455825558265582755828558295583055831558325583355834558355583655837558385583955840558415584255843558445584555846558475584855849558505585155852558535585455855558565585755858558595586055861558625586355864558655586655867558685586955870558715587255873558745587555876558775587855879558805588155882558835588455885558865588755888558895589055891558925589355894558955589655897558985589955900559015590255903559045590555906559075590855909559105591155912559135591455915559165591755918559195592055921559225592355924559255592655927559285592955930559315593255933559345593555936559375593855939559405594155942559435594455945559465594755948559495595055951559525595355954559555595655957559585595955960559615596255963559645596555966559675596855969559705597155972559735597455975559765597755978559795598055981559825598355984559855598655987559885598955990559915599255993559945599555996559975599855999560005600156002560035600456005560065600756008560095601056011560125601356014560155601656017560185601956020560215602256023560245602556026560275602856029560305603156032560335603456035560365603756038560395604056041560425604356044560455604656047560485604956050560515605256053560545605556056560575605856059560605606156062560635606456065560665606756068560695607056071560725607356074560755607656077560785607956080560815608256083560845608556086560875608856089560905609156092560935609456095560965609756098560995610056101561025610356104561055610656107561085610956110561115611256113561145611556116561175611856119561205612156122561235612456125561265612756128561295613056131561325613356134561355613656137561385613956140561415614256143561445614556146561475614856149561505615156152561535615456155561565615756158561595616056161561625616356164561655616656167561685616956170561715617256173561745617556176561775617856179561805618156182561835618456185561865618756188561895619056191561925619356194561955619656197561985619956200562015620256203562045620556206562075620856209562105621156212562135621456215562165621756218562195622056221562225622356224562255622656227562285622956230562315623256233562345623556236562375623856239562405624156242562435624456245562465624756248562495625056251562525625356254562555625656257562585625956260562615626256263562645626556266562675626856269562705627156272562735627456275562765627756278562795628056281562825628356284562855628656287562885628956290562915629256293562945629556296562975629856299563005630156302563035630456305563065630756308563095631056311563125631356314563155631656317563185631956320563215632256323563245632556326563275632856329563305633156332563335633456335563365633756338563395634056341563425634356344563455634656347563485634956350563515635256353563545635556356563575635856359563605636156362563635636456365563665636756368563695637056371563725637356374563755637656377563785637956380563815638256383563845638556386563875638856389563905639156392563935639456395563965639756398563995640056401564025640356404564055640656407564085640956410564115641256413564145641556416564175641856419564205642156422564235642456425564265642756428564295643056431564325643356434564355643656437564385643956440564415644256443564445644556446564475644856449564505645156452564535645456455564565645756458564595646056461564625646356464564655646656467564685646956470564715647256473564745647556476564775647856479564805648156482564835648456485564865648756488564895649056491564925649356494564955649656497564985649956500565015650256503565045650556506565075650856509565105651156512565135651456515565165651756518565195652056521565225652356524565255652656527565285652956530565315653256533565345653556536565375653856539565405654156542565435654456545565465654756548565495655056551565525655356554565555655656557565585655956560565615656256563565645656556566565675656856569565705657156572565735657456575565765657756578565795658056581565825658356584565855658656587565885658956590565915659256593565945659556596565975659856599566005660156602566035660456605566065660756608566095661056611566125661356614566155661656617566185661956620566215662256623566245662556626566275662856629566305663156632566335663456635566365663756638566395664056641566425664356644566455664656647566485664956650566515665256653566545665556656566575665856659566605666156662566635666456665566665666756668566695667056671566725667356674566755667656677566785667956680566815668256683566845668556686566875668856689566905669156692566935669456695566965669756698566995670056701567025670356704567055670656707567085670956710567115671256713567145671556716567175671856719567205672156722567235672456725567265672756728567295673056731567325673356734567355673656737567385673956740567415674256743567445674556746567475674856749567505675156752567535675456755567565675756758567595676056761567625676356764567655676656767567685676956770567715677256773567745677556776567775677856779567805678156782567835678456785567865678756788567895679056791567925679356794567955679656797567985679956800568015680256803568045680556806568075680856809568105681156812568135681456815568165681756818568195682056821568225682356824568255682656827568285682956830568315683256833568345683556836568375683856839568405684156842568435684456845568465684756848568495685056851568525685356854568555685656857568585685956860568615686256863568645686556866568675686856869568705687156872568735687456875568765687756878568795688056881568825688356884568855688656887568885688956890568915689256893568945689556896568975689856899569005690156902569035690456905569065690756908569095691056911569125691356914569155691656917569185691956920569215692256923569245692556926569275692856929569305693156932569335693456935569365693756938569395694056941569425694356944569455694656947569485694956950569515695256953569545695556956569575695856959569605696156962569635696456965569665696756968569695697056971569725697356974569755697656977569785697956980569815698256983569845698556986569875698856989569905699156992569935699456995569965699756998569995700057001570025700357004570055700657007570085700957010570115701257013570145701557016570175701857019570205702157022570235702457025570265702757028570295703057031570325703357034570355703657037570385703957040570415704257043570445704557046570475704857049570505705157052570535705457055570565705757058570595706057061570625706357064570655706657067570685706957070570715707257073570745707557076570775707857079570805708157082570835708457085570865708757088570895709057091570925709357094570955709657097570985709957100571015710257103571045710557106571075710857109571105711157112571135711457115571165711757118571195712057121571225712357124571255712657127571285712957130571315713257133571345713557136571375713857139571405714157142571435714457145571465714757148571495715057151571525715357154571555715657157571585715957160571615716257163571645716557166571675716857169571705717157172571735717457175571765717757178571795718057181571825718357184571855718657187571885718957190571915719257193571945719557196571975719857199572005720157202572035720457205572065720757208572095721057211572125721357214572155721657217572185721957220572215722257223572245722557226572275722857229572305723157232572335723457235572365723757238572395724057241572425724357244572455724657247572485724957250572515725257253572545725557256572575725857259572605726157262572635726457265572665726757268572695727057271572725727357274572755727657277572785727957280572815728257283572845728557286572875728857289572905729157292572935729457295572965729757298572995730057301573025730357304573055730657307573085730957310573115731257313573145731557316573175731857319573205732157322573235732457325573265732757328573295733057331573325733357334573355733657337573385733957340573415734257343573445734557346573475734857349573505735157352573535735457355573565735757358573595736057361573625736357364573655736657367573685736957370573715737257373573745737557376573775737857379573805738157382573835738457385573865738757388573895739057391573925739357394573955739657397573985739957400574015740257403574045740557406574075740857409574105741157412574135741457415574165741757418574195742057421574225742357424574255742657427574285742957430574315743257433574345743557436574375743857439574405744157442574435744457445574465744757448574495745057451574525745357454574555745657457574585745957460574615746257463574645746557466574675746857469574705747157472574735747457475574765747757478574795748057481574825748357484574855748657487574885748957490574915749257493574945749557496574975749857499575005750157502575035750457505575065750757508575095751057511575125751357514575155751657517575185751957520575215752257523575245752557526575275752857529575305753157532575335753457535575365753757538575395754057541575425754357544575455754657547575485754957550575515755257553575545755557556575575755857559575605756157562575635756457565575665756757568575695757057571575725757357574575755757657577575785757957580575815758257583575845758557586575875758857589575905759157592575935759457595575965759757598575995760057601576025760357604576055760657607576085760957610576115761257613576145761557616576175761857619576205762157622576235762457625576265762757628576295763057631576325763357634576355763657637576385763957640576415764257643576445764557646576475764857649576505765157652576535765457655576565765757658576595766057661576625766357664576655766657667576685766957670576715767257673576745767557676576775767857679576805768157682576835768457685576865768757688576895769057691576925769357694576955769657697576985769957700577015770257703577045770557706577075770857709577105771157712577135771457715577165771757718577195772057721577225772357724577255772657727577285772957730577315773257733577345773557736577375773857739577405774157742577435774457745577465774757748577495775057751577525775357754577555775657757577585775957760577615776257763577645776557766577675776857769577705777157772577735777457775577765777757778577795778057781577825778357784577855778657787577885778957790577915779257793577945779557796577975779857799578005780157802578035780457805578065780757808578095781057811578125781357814578155781657817578185781957820578215782257823578245782557826578275782857829578305783157832578335783457835578365783757838578395784057841578425784357844578455784657847578485784957850578515785257853578545785557856578575785857859578605786157862578635786457865578665786757868578695787057871578725787357874578755787657877578785787957880578815788257883578845788557886578875788857889578905789157892578935789457895578965789757898578995790057901579025790357904579055790657907579085790957910579115791257913579145791557916579175791857919579205792157922579235792457925579265792757928579295793057931579325793357934579355793657937579385793957940579415794257943579445794557946579475794857949579505795157952579535795457955579565795757958579595796057961579625796357964579655796657967579685796957970579715797257973579745797557976579775797857979579805798157982579835798457985579865798757988579895799057991579925799357994579955799657997579985799958000580015800258003580045800558006580075800858009580105801158012580135801458015580165801758018580195802058021580225802358024580255802658027580285802958030580315803258033580345803558036580375803858039580405804158042580435804458045580465804758048580495805058051580525805358054580555805658057580585805958060580615806258063580645806558066580675806858069580705807158072580735807458075580765807758078580795808058081580825808358084580855808658087580885808958090580915809258093580945809558096580975809858099581005810158102581035810458105581065810758108581095811058111581125811358114581155811658117581185811958120581215812258123581245812558126581275812858129581305813158132581335813458135581365813758138581395814058141581425814358144581455814658147581485814958150581515815258153581545815558156581575815858159581605816158162581635816458165581665816758168581695817058171581725817358174581755817658177581785817958180581815818258183581845818558186581875818858189581905819158192581935819458195581965819758198581995820058201582025820358204582055820658207582085820958210582115821258213582145821558216582175821858219582205822158222582235822458225582265822758228582295823058231582325823358234582355823658237582385823958240582415824258243582445824558246582475824858249582505825158252582535825458255582565825758258582595826058261582625826358264582655826658267582685826958270582715827258273582745827558276582775827858279582805828158282582835828458285582865828758288582895829058291582925829358294582955829658297582985829958300583015830258303583045830558306583075830858309583105831158312583135831458315583165831758318583195832058321583225832358324583255832658327583285832958330583315833258333583345833558336583375833858339583405834158342583435834458345583465834758348583495835058351583525835358354583555835658357583585835958360583615836258363583645836558366583675836858369583705837158372583735837458375583765837758378583795838058381583825838358384583855838658387583885838958390583915839258393583945839558396583975839858399584005840158402584035840458405584065840758408584095841058411584125841358414584155841658417584185841958420584215842258423584245842558426584275842858429584305843158432584335843458435584365843758438584395844058441584425844358444584455844658447584485844958450584515845258453584545845558456584575845858459584605846158462584635846458465584665846758468584695847058471584725847358474584755847658477584785847958480584815848258483584845848558486584875848858489584905849158492584935849458495584965849758498584995850058501585025850358504585055850658507585085850958510585115851258513585145851558516585175851858519585205852158522585235852458525585265852758528585295853058531585325853358534585355853658537585385853958540585415854258543585445854558546585475854858549585505855158552585535855458555585565855758558585595856058561585625856358564585655856658567585685856958570585715857258573585745857558576585775857858579585805858158582585835858458585585865858758588585895859058591585925859358594585955859658597585985859958600586015860258603586045860558606586075860858609586105861158612586135861458615586165861758618586195862058621586225862358624586255862658627586285862958630586315863258633586345863558636586375863858639586405864158642586435864458645586465864758648586495865058651586525865358654586555865658657586585865958660586615866258663586645866558666586675866858669586705867158672586735867458675586765867758678586795868058681586825868358684586855868658687586885868958690586915869258693586945869558696586975869858699587005870158702587035870458705587065870758708587095871058711587125871358714587155871658717587185871958720587215872258723587245872558726587275872858729587305873158732587335873458735587365873758738587395874058741587425874358744587455874658747587485874958750587515875258753587545875558756587575875858759587605876158762587635876458765587665876758768587695877058771587725877358774587755877658777587785877958780587815878258783587845878558786587875878858789587905879158792587935879458795587965879758798587995880058801588025880358804588055880658807588085880958810588115881258813588145881558816588175881858819588205882158822588235882458825588265882758828588295883058831588325883358834588355883658837588385883958840588415884258843588445884558846588475884858849588505885158852588535885458855588565885758858588595886058861588625886358864588655886658867588685886958870588715887258873588745887558876588775887858879588805888158882588835888458885588865888758888588895889058891588925889358894588955889658897588985889958900589015890258903589045890558906589075890858909589105891158912589135891458915589165891758918589195892058921589225892358924589255892658927589285892958930589315893258933589345893558936589375893858939589405894158942589435894458945589465894758948589495895058951589525895358954589555895658957589585895958960589615896258963589645896558966589675896858969589705897158972589735897458975589765897758978589795898058981589825898358984589855898658987589885898958990589915899258993589945899558996589975899858999590005900159002590035900459005590065900759008590095901059011590125901359014590155901659017590185901959020590215902259023590245902559026590275902859029590305903159032590335903459035590365903759038590395904059041590425904359044590455904659047590485904959050590515905259053590545905559056590575905859059590605906159062590635906459065590665906759068590695907059071590725907359074590755907659077590785907959080590815908259083590845908559086590875908859089590905909159092590935909459095590965909759098590995910059101591025910359104591055910659107591085910959110591115911259113591145911559116591175911859119591205912159122591235912459125591265912759128591295913059131591325913359134591355913659137591385913959140591415914259143591445914559146591475914859149591505915159152591535915459155591565915759158591595916059161591625916359164591655916659167591685916959170591715917259173591745917559176591775917859179591805918159182591835918459185591865918759188591895919059191591925919359194591955919659197591985919959200592015920259203592045920559206592075920859209592105921159212592135921459215592165921759218592195922059221592225922359224592255922659227592285922959230592315923259233592345923559236592375923859239592405924159242592435924459245592465924759248592495925059251592525925359254592555925659257592585925959260592615926259263592645926559266592675926859269592705927159272592735927459275592765927759278592795928059281592825928359284592855928659287592885928959290592915929259293592945929559296592975929859299593005930159302593035930459305593065930759308593095931059311593125931359314593155931659317593185931959320593215932259323593245932559326593275932859329593305933159332593335933459335593365933759338593395934059341593425934359344593455934659347593485934959350593515935259353593545935559356593575935859359593605936159362593635936459365593665936759368593695937059371593725937359374593755937659377593785937959380593815938259383593845938559386593875938859389593905939159392593935939459395593965939759398593995940059401594025940359404594055940659407594085940959410594115941259413594145941559416594175941859419594205942159422594235942459425594265942759428594295943059431594325943359434594355943659437594385943959440594415944259443594445944559446594475944859449594505945159452594535945459455594565945759458594595946059461594625946359464594655946659467594685946959470594715947259473594745947559476594775947859479594805948159482594835948459485594865948759488594895949059491594925949359494594955949659497594985949959500595015950259503595045950559506595075950859509595105951159512595135951459515595165951759518595195952059521595225952359524595255952659527595285952959530595315953259533595345953559536595375953859539595405954159542595435954459545595465954759548595495955059551595525955359554595555955659557595585955959560595615956259563595645956559566595675956859569595705957159572595735957459575595765957759578595795958059581595825958359584595855958659587595885958959590595915959259593595945959559596595975959859599596005960159602596035960459605596065960759608596095961059611596125961359614596155961659617596185961959620596215962259623596245962559626596275962859629596305963159632596335963459635596365963759638596395964059641596425964359644596455964659647596485964959650596515965259653596545965559656596575965859659596605966159662596635966459665596665966759668596695967059671596725967359674596755967659677596785967959680596815968259683596845968559686596875968859689596905969159692596935969459695596965969759698596995970059701597025970359704597055970659707597085970959710597115971259713597145971559716597175971859719597205972159722597235972459725597265972759728597295973059731597325973359734597355973659737597385973959740597415974259743597445974559746597475974859749597505975159752597535975459755597565975759758597595976059761597625976359764597655976659767597685976959770597715977259773597745977559776597775977859779597805978159782597835978459785597865978759788597895979059791597925979359794597955979659797597985979959800598015980259803598045980559806598075980859809598105981159812598135981459815598165981759818598195982059821598225982359824598255982659827598285982959830598315983259833598345983559836598375983859839598405984159842598435984459845598465984759848598495985059851598525985359854598555985659857598585985959860598615986259863598645986559866598675986859869598705987159872598735987459875598765987759878598795988059881598825988359884598855988659887598885988959890598915989259893598945989559896598975989859899599005990159902599035990459905599065990759908599095991059911599125991359914599155991659917599185991959920599215992259923599245992559926599275992859929599305993159932599335993459935599365993759938599395994059941599425994359944599455994659947599485994959950599515995259953599545995559956599575995859959599605996159962599635996459965599665996759968599695997059971599725997359974599755997659977599785997959980599815998259983599845998559986599875998859989599905999159992599935999459995599965999759998599996000060001600026000360004600056000660007600086000960010600116001260013600146001560016600176001860019600206002160022600236002460025600266002760028600296003060031600326003360034600356003660037600386003960040600416004260043600446004560046600476004860049600506005160052600536005460055600566005760058600596006060061600626006360064600656006660067600686006960070600716007260073600746007560076600776007860079600806008160082600836008460085600866008760088600896009060091600926009360094600956009660097600986009960100601016010260103601046010560106601076010860109601106011160112601136011460115601166011760118601196012060121601226012360124601256012660127601286012960130601316013260133601346013560136601376013860139601406014160142601436014460145601466014760148601496015060151601526015360154601556015660157601586015960160601616016260163601646016560166601676016860169601706017160172601736017460175601766017760178601796018060181601826018360184601856018660187601886018960190601916019260193601946019560196601976019860199602006020160202602036020460205602066020760208602096021060211602126021360214602156021660217602186021960220602216022260223602246022560226602276022860229602306023160232602336023460235602366023760238602396024060241602426024360244602456024660247602486024960250602516025260253602546025560256602576025860259602606026160262602636026460265602666026760268602696027060271602726027360274602756027660277602786027960280602816028260283602846028560286602876028860289602906029160292602936029460295602966029760298602996030060301603026030360304603056030660307603086030960310603116031260313603146031560316603176031860319603206032160322603236032460325603266032760328603296033060331603326033360334603356033660337603386033960340603416034260343603446034560346603476034860349603506035160352603536035460355603566035760358603596036060361603626036360364603656036660367603686036960370603716037260373603746037560376603776037860379603806038160382603836038460385603866038760388603896039060391603926039360394603956039660397603986039960400604016040260403604046040560406604076040860409604106041160412604136041460415604166041760418604196042060421604226042360424604256042660427604286042960430604316043260433604346043560436604376043860439604406044160442604436044460445604466044760448604496045060451604526045360454604556045660457604586045960460604616046260463604646046560466604676046860469604706047160472604736047460475604766047760478604796048060481604826048360484604856048660487604886048960490604916049260493604946049560496604976049860499605006050160502605036050460505605066050760508605096051060511605126051360514605156051660517605186051960520605216052260523605246052560526605276052860529605306053160532605336053460535605366053760538605396054060541605426054360544605456054660547605486054960550605516055260553605546055560556605576055860559605606056160562605636056460565605666056760568605696057060571605726057360574605756057660577605786057960580605816058260583605846058560586605876058860589605906059160592605936059460595605966059760598605996060060601606026060360604606056060660607606086060960610606116061260613606146061560616606176061860619606206062160622606236062460625606266062760628606296063060631606326063360634606356063660637606386063960640606416064260643606446064560646606476064860649606506065160652606536065460655606566065760658606596066060661606626066360664606656066660667606686066960670606716067260673606746067560676606776067860679606806068160682606836068460685606866068760688606896069060691606926069360694606956069660697606986069960700607016070260703607046070560706607076070860709607106071160712607136071460715607166071760718607196072060721607226072360724607256072660727607286072960730607316073260733607346073560736607376073860739607406074160742607436074460745607466074760748607496075060751607526075360754607556075660757607586075960760607616076260763607646076560766607676076860769607706077160772607736077460775607766077760778607796078060781607826078360784607856078660787607886078960790607916079260793607946079560796607976079860799608006080160802608036080460805608066080760808608096081060811608126081360814608156081660817608186081960820608216082260823608246082560826608276082860829608306083160832608336083460835608366083760838608396084060841608426084360844608456084660847608486084960850608516085260853608546085560856608576085860859608606086160862608636086460865608666086760868608696087060871608726087360874608756087660877608786087960880608816088260883608846088560886608876088860889608906089160892608936089460895608966089760898608996090060901609026090360904609056090660907609086090960910609116091260913609146091560916609176091860919609206092160922609236092460925609266092760928609296093060931609326093360934609356093660937609386093960940609416094260943609446094560946609476094860949609506095160952609536095460955609566095760958609596096060961609626096360964609656096660967609686096960970609716097260973609746097560976609776097860979609806098160982609836098460985609866098760988609896099060991609926099360994609956099660997609986099961000610016100261003610046100561006610076100861009610106101161012610136101461015610166101761018610196102061021610226102361024610256102661027610286102961030610316103261033610346103561036610376103861039610406104161042610436104461045610466104761048610496105061051610526105361054610556105661057610586105961060610616106261063610646106561066610676106861069610706107161072610736107461075610766107761078610796108061081610826108361084610856108661087610886108961090610916109261093610946109561096610976109861099611006110161102611036110461105611066110761108611096111061111611126111361114611156111661117611186111961120611216112261123611246112561126611276112861129611306113161132611336113461135611366113761138611396114061141611426114361144611456114661147611486114961150611516115261153611546115561156611576115861159611606116161162611636116461165611666116761168611696117061171611726117361174611756117661177611786117961180611816118261183611846118561186611876118861189611906119161192611936119461195611966119761198611996120061201612026120361204612056120661207612086120961210612116121261213612146121561216612176121861219612206122161222612236122461225612266122761228612296123061231612326123361234612356123661237612386123961240612416124261243612446124561246612476124861249612506125161252612536125461255612566125761258612596126061261612626126361264612656126661267612686126961270612716127261273612746127561276612776127861279612806128161282612836128461285612866128761288612896129061291612926129361294612956129661297612986129961300613016130261303613046130561306613076130861309613106131161312613136131461315613166131761318613196132061321613226132361324613256132661327613286132961330613316133261333613346133561336613376133861339613406134161342613436134461345613466134761348613496135061351613526135361354613556135661357613586135961360613616136261363613646136561366613676136861369613706137161372613736137461375613766137761378613796138061381613826138361384613856138661387613886138961390613916139261393613946139561396613976139861399614006140161402614036140461405614066140761408614096141061411614126141361414614156141661417614186141961420614216142261423614246142561426614276142861429614306143161432614336143461435614366143761438614396144061441614426144361444614456144661447614486144961450614516145261453614546145561456614576145861459614606146161462614636146461465614666146761468614696147061471614726147361474614756147661477614786147961480614816148261483614846148561486614876148861489614906149161492614936149461495614966149761498614996150061501615026150361504615056150661507615086150961510615116151261513615146151561516615176151861519615206152161522615236152461525615266152761528615296153061531615326153361534615356153661537615386153961540615416154261543615446154561546615476154861549615506155161552615536155461555615566155761558615596156061561615626156361564615656156661567615686156961570615716157261573615746157561576615776157861579615806158161582615836158461585615866158761588615896159061591615926159361594615956159661597615986159961600616016160261603616046160561606616076160861609616106161161612616136161461615616166161761618616196162061621616226162361624616256162661627616286162961630616316163261633616346163561636616376163861639616406164161642616436164461645616466164761648616496165061651616526165361654616556165661657616586165961660616616166261663616646166561666616676166861669616706167161672616736167461675616766167761678616796168061681616826168361684616856168661687616886168961690616916169261693616946169561696616976169861699617006170161702617036170461705617066170761708617096171061711617126171361714617156171661717617186171961720617216172261723617246172561726617276172861729617306173161732617336173461735617366173761738617396174061741617426174361744617456174661747617486174961750617516175261753617546175561756617576175861759617606176161762617636176461765617666176761768617696177061771617726177361774617756177661777617786177961780617816178261783617846178561786617876178861789617906179161792617936179461795617966179761798617996180061801618026180361804618056180661807618086180961810618116181261813618146181561816618176181861819618206182161822618236182461825618266182761828618296183061831618326183361834618356183661837618386183961840618416184261843618446184561846618476184861849618506185161852618536185461855618566185761858618596186061861618626186361864618656186661867618686186961870618716187261873618746187561876618776187861879618806188161882618836188461885618866188761888618896189061891618926189361894618956189661897618986189961900619016190261903619046190561906619076190861909619106191161912619136191461915619166191761918619196192061921619226192361924619256192661927619286192961930619316193261933619346193561936619376193861939619406194161942619436194461945619466194761948619496195061951619526195361954619556195661957619586195961960619616196261963619646196561966619676196861969619706197161972619736197461975619766197761978619796198061981619826198361984619856198661987619886198961990619916199261993619946199561996619976199861999620006200162002620036200462005620066200762008620096201062011620126201362014620156201662017620186201962020620216202262023620246202562026620276202862029620306203162032620336203462035620366203762038620396204062041620426204362044620456204662047620486204962050620516205262053620546205562056620576205862059620606206162062620636206462065620666206762068620696207062071620726207362074620756207662077620786207962080620816208262083620846208562086620876208862089620906209162092620936209462095620966209762098620996210062101621026210362104621056210662107621086210962110621116211262113621146211562116621176211862119621206212162122621236212462125621266212762128621296213062131621326213362134621356213662137621386213962140621416214262143621446214562146621476214862149621506215162152621536215462155621566215762158621596216062161621626216362164621656216662167621686216962170621716217262173621746217562176621776217862179621806218162182621836218462185621866218762188621896219062191621926219362194621956219662197621986219962200622016220262203622046220562206622076220862209622106221162212622136221462215622166221762218622196222062221622226222362224622256222662227622286222962230622316223262233622346223562236622376223862239622406224162242622436224462245622466224762248622496225062251622526225362254622556225662257622586225962260622616226262263622646226562266622676226862269622706227162272622736227462275622766227762278622796228062281622826228362284622856228662287622886228962290622916229262293622946229562296622976229862299623006230162302623036230462305623066230762308623096231062311623126231362314623156231662317623186231962320623216232262323623246232562326623276232862329623306233162332623336233462335623366233762338623396234062341623426234362344623456234662347623486234962350623516235262353623546235562356623576235862359623606236162362623636236462365623666236762368623696237062371623726237362374623756237662377623786237962380623816238262383623846238562386623876238862389623906239162392623936239462395623966239762398623996240062401624026240362404624056240662407624086240962410624116241262413624146241562416624176241862419624206242162422624236242462425624266242762428624296243062431624326243362434624356243662437624386243962440624416244262443624446244562446624476244862449624506245162452624536245462455624566245762458624596246062461624626246362464624656246662467624686246962470624716247262473624746247562476624776247862479624806248162482624836248462485624866248762488624896249062491624926249362494624956249662497624986249962500625016250262503625046250562506625076250862509625106251162512625136251462515625166251762518625196252062521625226252362524625256252662527625286252962530625316253262533625346253562536625376253862539625406254162542625436254462545625466254762548625496255062551625526255362554625556255662557625586255962560625616256262563625646256562566625676256862569625706257162572625736257462575625766257762578625796258062581625826258362584625856258662587625886258962590625916259262593625946259562596625976259862599626006260162602626036260462605626066260762608626096261062611626126261362614626156261662617626186261962620626216262262623626246262562626626276262862629626306263162632626336263462635626366263762638626396264062641626426264362644626456264662647626486264962650626516265262653626546265562656626576265862659626606266162662626636266462665626666266762668626696267062671626726267362674626756267662677626786267962680626816268262683626846268562686626876268862689626906269162692626936269462695626966269762698626996270062701627026270362704627056270662707627086270962710627116271262713627146271562716627176271862719627206272162722627236272462725627266272762728627296273062731627326273362734627356273662737627386273962740627416274262743627446274562746627476274862749627506275162752627536275462755627566275762758627596276062761627626276362764627656276662767627686276962770627716277262773627746277562776627776277862779627806278162782627836278462785627866278762788627896279062791627926279362794627956279662797627986279962800628016280262803628046280562806628076280862809628106281162812628136281462815628166281762818628196282062821628226282362824628256282662827628286282962830628316283262833628346283562836628376283862839628406284162842628436284462845628466284762848628496285062851628526285362854628556285662857628586285962860628616286262863628646286562866628676286862869628706287162872628736287462875628766287762878628796288062881628826288362884628856288662887628886288962890628916289262893628946289562896628976289862899629006290162902629036290462905629066290762908629096291062911629126291362914629156291662917629186291962920629216292262923629246292562926629276292862929629306293162932629336293462935629366293762938629396294062941629426294362944629456294662947629486294962950629516295262953629546295562956629576295862959629606296162962629636296462965629666296762968629696297062971629726297362974629756297662977629786297962980629816298262983629846298562986629876298862989629906299162992629936299462995629966299762998629996300063001630026300363004630056300663007630086300963010630116301263013630146301563016630176301863019630206302163022630236302463025630266302763028630296303063031630326303363034630356303663037630386303963040630416304263043630446304563046630476304863049630506305163052630536305463055630566305763058630596306063061630626306363064630656306663067630686306963070630716307263073630746307563076630776307863079630806308163082630836308463085630866308763088630896309063091630926309363094630956309663097630986309963100631016310263103631046310563106631076310863109631106311163112631136311463115631166311763118631196312063121631226312363124631256312663127631286312963130631316313263133631346313563136631376313863139631406314163142631436314463145631466314763148631496315063151631526315363154631556315663157631586315963160631616316263163631646316563166631676316863169631706317163172631736317463175631766317763178631796318063181631826318363184631856318663187631886318963190631916319263193631946319563196631976319863199632006320163202632036320463205632066320763208632096321063211632126321363214632156321663217632186321963220632216322263223632246322563226632276322863229632306323163232632336323463235632366323763238632396324063241632426324363244632456324663247632486324963250632516325263253632546325563256632576325863259632606326163262632636326463265632666326763268632696327063271632726327363274632756327663277632786327963280632816328263283632846328563286632876328863289632906329163292632936329463295632966329763298632996330063301633026330363304633056330663307633086330963310633116331263313633146331563316633176331863319633206332163322633236332463325633266332763328633296333063331633326333363334633356333663337633386333963340633416334263343633446334563346633476334863349633506335163352633536335463355633566335763358633596336063361633626336363364633656336663367633686336963370633716337263373633746337563376633776337863379633806338163382633836338463385633866338763388633896339063391633926339363394633956339663397633986339963400634016340263403634046340563406634076340863409634106341163412634136341463415634166341763418634196342063421634226342363424634256342663427634286342963430634316343263433634346343563436634376343863439634406344163442634436344463445634466344763448634496345063451634526345363454634556345663457634586345963460634616346263463634646346563466634676346863469634706347163472634736347463475634766347763478634796348063481634826348363484634856348663487634886348963490634916349263493634946349563496634976349863499635006350163502635036350463505635066350763508635096351063511635126351363514635156351663517635186351963520635216352263523635246352563526635276352863529635306353163532635336353463535635366353763538635396354063541635426354363544635456354663547635486354963550635516355263553635546355563556635576355863559635606356163562635636356463565635666356763568635696357063571635726357363574635756357663577635786357963580635816358263583635846358563586635876358863589635906359163592635936359463595635966359763598635996360063601636026360363604636056360663607636086360963610636116361263613636146361563616636176361863619636206362163622636236362463625636266362763628636296363063631636326363363634636356363663637636386363963640636416364263643636446364563646636476364863649636506365163652636536365463655636566365763658636596366063661636626366363664636656366663667636686366963670636716367263673636746367563676636776367863679636806368163682636836368463685636866368763688636896369063691636926369363694636956369663697636986369963700637016370263703637046370563706637076370863709637106371163712637136371463715637166371763718637196372063721637226372363724637256372663727637286372963730637316373263733637346373563736637376373863739637406374163742637436374463745637466374763748637496375063751637526375363754637556375663757637586375963760637616376263763637646376563766637676376863769637706377163772637736377463775637766377763778637796378063781637826378363784637856378663787637886378963790637916379263793637946379563796637976379863799638006380163802638036380463805638066380763808638096381063811638126381363814638156381663817638186381963820638216382263823638246382563826638276382863829638306383163832638336383463835638366383763838638396384063841638426384363844638456384663847638486384963850638516385263853638546385563856638576385863859638606386163862638636386463865638666386763868638696387063871638726387363874638756387663877638786387963880638816388263883638846388563886638876388863889638906389163892638936389463895638966389763898638996390063901639026390363904639056390663907639086390963910639116391263913639146391563916639176391863919639206392163922639236392463925639266392763928639296393063931639326393363934639356393663937639386393963940639416394263943639446394563946639476394863949639506395163952639536395463955639566395763958639596396063961639626396363964639656396663967639686396963970639716397263973639746397563976639776397863979639806398163982639836398463985639866398763988639896399063991639926399363994639956399663997639986399964000640016400264003640046400564006640076400864009640106401164012640136401464015640166401764018640196402064021640226402364024640256402664027640286402964030640316403264033640346403564036640376403864039640406404164042640436404464045640466404764048640496405064051640526405364054640556405664057640586405964060640616406264063640646406564066640676406864069640706407164072640736407464075640766407764078640796408064081640826408364084640856408664087640886408964090640916409264093640946409564096640976409864099641006410164102641036410464105641066410764108641096411064111641126411364114641156411664117641186411964120641216412264123641246412564126641276412864129641306413164132641336413464135641366413764138641396414064141641426414364144641456414664147641486414964150641516415264153641546415564156641576415864159641606416164162641636416464165641666416764168641696417064171641726417364174641756417664177641786417964180641816418264183641846418564186641876418864189641906419164192641936419464195641966419764198641996420064201642026420364204642056420664207642086420964210642116421264213642146421564216642176421864219642206422164222642236422464225642266422764228642296423064231642326423364234642356423664237642386423964240642416424264243642446424564246642476424864249642506425164252642536425464255642566425764258642596426064261642626426364264642656426664267642686426964270642716427264273642746427564276642776427864279642806428164282642836428464285642866428764288642896429064291642926429364294642956429664297642986429964300643016430264303643046430564306643076430864309643106431164312643136431464315643166431764318643196432064321643226432364324643256432664327643286432964330643316433264333643346433564336643376433864339643406434164342643436434464345643466434764348643496435064351643526435364354643556435664357643586435964360643616436264363643646436564366643676436864369643706437164372643736437464375643766437764378643796438064381643826438364384643856438664387643886438964390643916439264393643946439564396643976439864399644006440164402644036440464405644066440764408644096441064411644126441364414644156441664417644186441964420644216442264423644246442564426644276442864429644306443164432644336443464435644366443764438644396444064441644426444364444644456444664447644486444964450644516445264453644546445564456644576445864459644606446164462644636446464465644666446764468644696447064471644726447364474644756447664477644786447964480644816448264483644846448564486644876448864489644906449164492644936449464495644966449764498644996450064501645026450364504645056450664507645086450964510645116451264513645146451564516645176451864519645206452164522645236452464525645266452764528645296453064531645326453364534645356453664537645386453964540645416454264543645446454564546645476454864549645506455164552645536455464555645566455764558645596456064561645626456364564645656456664567645686456964570645716457264573645746457564576645776457864579645806458164582645836458464585645866458764588645896459064591645926459364594645956459664597645986459964600646016460264603646046460564606646076460864609646106461164612646136461464615646166461764618646196462064621646226462364624646256462664627646286462964630646316463264633646346463564636646376463864639646406464164642646436464464645646466464764648646496465064651646526465364654646556465664657646586465964660646616466264663646646466564666646676466864669646706467164672646736467464675646766467764678646796468064681646826468364684646856468664687646886468964690646916469264693646946469564696646976469864699647006470164702647036470464705647066470764708647096471064711647126471364714647156471664717647186471964720647216472264723647246472564726647276472864729647306473164732647336473464735647366473764738647396474064741647426474364744647456474664747647486474964750647516475264753647546475564756647576475864759647606476164762647636476464765647666476764768647696477064771647726477364774647756477664777647786477964780647816478264783647846478564786647876478864789647906479164792647936479464795647966479764798647996480064801648026480364804648056480664807648086480964810648116481264813648146481564816648176481864819648206482164822648236482464825648266482764828648296483064831648326483364834648356483664837648386483964840648416484264843648446484564846648476484864849648506485164852648536485464855648566485764858648596486064861648626486364864648656486664867648686486964870648716487264873648746487564876648776487864879648806488164882648836488464885648866488764888648896489064891648926489364894648956489664897648986489964900649016490264903649046490564906649076490864909649106491164912649136491464915649166491764918649196492064921649226492364924649256492664927649286492964930649316493264933649346493564936649376493864939649406494164942649436494464945649466494764948649496495064951649526495364954649556495664957649586495964960649616496264963649646496564966649676496864969649706497164972649736497464975649766497764978649796498064981649826498364984649856498664987649886498964990649916499264993649946499564996649976499864999650006500165002650036500465005650066500765008650096501065011650126501365014650156501665017650186501965020650216502265023650246502565026650276502865029650306503165032650336503465035650366503765038650396504065041650426504365044650456504665047650486504965050650516505265053650546505565056650576505865059650606506165062650636506465065650666506765068650696507065071650726507365074650756507665077650786507965080650816508265083650846508565086650876508865089650906509165092650936509465095650966509765098650996510065101651026510365104651056510665107651086510965110651116511265113651146511565116651176511865119651206512165122651236512465125651266512765128651296513065131651326513365134651356513665137651386513965140651416514265143651446514565146651476514865149651506515165152651536515465155651566515765158651596516065161651626516365164651656516665167651686516965170651716517265173651746517565176651776517865179651806518165182651836518465185651866518765188651896519065191651926519365194651956519665197651986519965200652016520265203652046520565206652076520865209652106521165212652136521465215652166521765218652196522065221652226522365224652256522665227652286522965230652316523265233652346523565236652376523865239652406524165242652436524465245652466524765248652496525065251652526525365254652556525665257652586525965260652616526265263652646526565266652676526865269652706527165272652736527465275652766527765278652796528065281652826528365284652856528665287652886528965290652916529265293652946529565296652976529865299653006530165302653036530465305653066530765308653096531065311653126531365314653156531665317653186531965320653216532265323653246532565326653276532865329653306533165332653336533465335653366533765338653396534065341653426534365344653456534665347653486534965350653516535265353653546535565356653576535865359653606536165362653636536465365653666536765368653696537065371653726537365374653756537665377653786537965380653816538265383653846538565386653876538865389653906539165392653936539465395653966539765398653996540065401654026540365404654056540665407654086540965410654116541265413654146541565416654176541865419654206542165422654236542465425654266542765428654296543065431654326543365434654356543665437654386543965440654416544265443654446544565446654476544865449654506545165452654536545465455654566545765458654596546065461654626546365464654656546665467654686546965470654716547265473654746547565476654776547865479654806548165482654836548465485654866548765488654896549065491654926549365494654956549665497654986549965500655016550265503655046550565506655076550865509655106551165512655136551465515655166551765518655196552065521655226552365524655256552665527655286552965530655316553265533655346553565536655376553865539655406554165542655436554465545655466554765548655496555065551655526555365554655556555665557655586555965560655616556265563655646556565566655676556865569655706557165572655736557465575655766557765578655796558065581655826558365584655856558665587655886558965590655916559265593655946559565596655976559865599656006560165602656036560465605656066560765608656096561065611656126561365614656156561665617656186561965620656216562265623656246562565626656276562865629656306563165632656336563465635656366563765638656396564065641656426564365644656456564665647656486564965650656516565265653656546565565656656576565865659656606566165662656636566465665656666566765668656696567065671656726567365674656756567665677656786567965680656816568265683656846568565686656876568865689656906569165692656936569465695656966569765698656996570065701657026570365704657056570665707657086570965710657116571265713657146571565716657176571865719657206572165722657236572465725657266572765728657296573065731657326573365734657356573665737657386573965740657416574265743657446574565746657476574865749657506575165752657536575465755657566575765758657596576065761657626576365764657656576665767657686576965770657716577265773657746577565776657776577865779657806578165782657836578465785657866578765788657896579065791657926579365794657956579665797657986579965800658016580265803658046580565806658076580865809658106581165812658136581465815658166581765818658196582065821658226582365824658256582665827658286582965830658316583265833658346583565836658376583865839658406584165842658436584465845658466584765848658496585065851658526585365854658556585665857658586585965860658616586265863658646586565866658676586865869658706587165872658736587465875658766587765878658796588065881658826588365884658856588665887658886588965890658916589265893658946589565896658976589865899659006590165902659036590465905659066590765908659096591065911659126591365914659156591665917659186591965920659216592265923659246592565926659276592865929659306593165932659336593465935659366593765938659396594065941659426594365944659456594665947659486594965950659516595265953659546595565956659576595865959659606596165962659636596465965659666596765968659696597065971659726597365974659756597665977659786597965980659816598265983659846598565986659876598865989659906599165992659936599465995659966599765998659996600066001660026600366004660056600666007660086600966010660116601266013660146601566016660176601866019660206602166022660236602466025660266602766028660296603066031660326603366034660356603666037660386603966040660416604266043660446604566046660476604866049660506605166052660536605466055660566605766058660596606066061660626606366064660656606666067660686606966070660716607266073660746607566076660776607866079660806608166082660836608466085660866608766088660896609066091660926609366094660956609666097660986609966100661016610266103661046610566106661076610866109661106611166112661136611466115661166611766118661196612066121661226612366124661256612666127661286612966130661316613266133661346613566136661376613866139661406614166142661436614466145661466614766148661496615066151661526615366154661556615666157661586615966160661616616266163661646616566166661676616866169661706617166172661736617466175661766617766178661796618066181661826618366184661856618666187661886618966190661916619266193661946619566196661976619866199662006620166202662036620466205662066620766208662096621066211662126621366214662156621666217662186621966220662216622266223662246622566226662276622866229662306623166232662336623466235662366623766238662396624066241662426624366244662456624666247662486624966250662516625266253662546625566256662576625866259662606626166262662636626466265662666626766268662696627066271662726627366274662756627666277662786627966280662816628266283662846628566286662876628866289662906629166292662936629466295662966629766298662996630066301663026630366304663056630666307663086630966310663116631266313663146631566316663176631866319663206632166322663236632466325663266632766328663296633066331663326633366334663356633666337663386633966340663416634266343663446634566346663476634866349663506635166352663536635466355663566635766358663596636066361663626636366364663656636666367663686636966370663716637266373663746637566376663776637866379663806638166382663836638466385663866638766388663896639066391663926639366394663956639666397663986639966400664016640266403664046640566406664076640866409664106641166412664136641466415664166641766418664196642066421664226642366424664256642666427664286642966430664316643266433664346643566436664376643866439664406644166442664436644466445664466644766448664496645066451664526645366454664556645666457664586645966460664616646266463664646646566466664676646866469664706647166472664736647466475664766647766478664796648066481664826648366484664856648666487664886648966490664916649266493664946649566496664976649866499665006650166502665036650466505665066650766508665096651066511665126651366514665156651666517665186651966520665216652266523665246652566526665276652866529665306653166532665336653466535665366653766538665396654066541665426654366544665456654666547665486654966550665516655266553665546655566556665576655866559665606656166562665636656466565665666656766568665696657066571665726657366574665756657666577665786657966580665816658266583665846658566586665876658866589665906659166592665936659466595665966659766598665996660066601666026660366604666056660666607666086660966610666116661266613666146661566616666176661866619666206662166622666236662466625666266662766628666296663066631666326663366634666356663666637666386663966640666416664266643666446664566646666476664866649666506665166652666536665466655666566665766658666596666066661666626666366664666656666666667666686666966670666716667266673666746667566676666776667866679666806668166682666836668466685666866668766688666896669066691666926669366694666956669666697666986669966700667016670266703667046670566706667076670866709667106671166712667136671466715667166671766718667196672066721667226672366724667256672666727667286672966730667316673266733667346673566736667376673866739667406674166742667436674466745667466674766748667496675066751667526675366754667556675666757667586675966760667616676266763667646676566766667676676866769667706677166772667736677466775667766677766778667796678066781667826678366784667856678666787667886678966790667916679266793667946679566796667976679866799668006680166802668036680466805668066680766808668096681066811668126681366814668156681666817668186681966820668216682266823668246682566826668276682866829668306683166832668336683466835668366683766838668396684066841668426684366844668456684666847668486684966850668516685266853668546685566856668576685866859668606686166862668636686466865668666686766868668696687066871668726687366874668756687666877668786687966880668816688266883668846688566886668876688866889668906689166892668936689466895668966689766898668996690066901669026690366904669056690666907669086690966910669116691266913669146691566916669176691866919669206692166922669236692466925669266692766928669296693066931669326693366934669356693666937669386693966940669416694266943669446694566946669476694866949669506695166952669536695466955669566695766958669596696066961669626696366964669656696666967669686696966970669716697266973669746697566976669776697866979669806698166982669836698466985669866698766988669896699066991669926699366994669956699666997669986699967000670016700267003670046700567006670076700867009670106701167012670136701467015670166701767018670196702067021670226702367024670256702667027670286702967030670316703267033670346703567036670376703867039670406704167042670436704467045670466704767048670496705067051670526705367054670556705667057670586705967060670616706267063670646706567066670676706867069670706707167072670736707467075670766707767078670796708067081670826708367084670856708667087670886708967090670916709267093670946709567096670976709867099671006710167102671036710467105671066710767108671096711067111671126711367114671156711667117671186711967120671216712267123671246712567126671276712867129671306713167132671336713467135671366713767138671396714067141671426714367144671456714667147671486714967150671516715267153671546715567156671576715867159671606716167162671636716467165671666716767168671696717067171671726717367174671756717667177671786717967180671816718267183671846718567186671876718867189671906719167192671936719467195671966719767198671996720067201672026720367204672056720667207672086720967210672116721267213672146721567216672176721867219672206722167222672236722467225672266722767228672296723067231672326723367234672356723667237672386723967240672416724267243672446724567246672476724867249672506725167252672536725467255672566725767258672596726067261672626726367264672656726667267672686726967270672716727267273672746727567276672776727867279672806728167282672836728467285672866728767288672896729067291672926729367294672956729667297 |
- unit pic32mx695f512l;
- interface
- {$goto on}
- {$modeswitch advancedrecords}
- {$INLINE ON}
- {$OPTIMIZATION STACKFRAME}
- {$L startup.o}
- {$PACKRECORDS 2}
- type
- TBits_1 = 0..1;
- TBits_2 = 0..3;
- TBits_3 = 0..7;
- TBits_4 = 0..15;
- TBits_5 = 0..31;
- TBits_6 = 0..63;
- TBits_7 = 0..127;
- TBits_8 = 0..255;
- TBits_9 = 0..511;
- TBits_10 = 0..1023;
- TBits_11 = 0..2047;
- TBits_12 = 0..4095;
- TBits_13 = 0..8191;
- TBits_14 = 0..16383;
- TBits_15 = 0..32767;
- TBits_16 = 0..65535;
- TBits_17 = 0..131071;
- TBits_18 = 0..262143;
- TBits_19 = 0..524287;
- TBits_20 = 0..1048575;
- TBits_21 = 0..2097151;
- TBits_22 = 0..4194303;
- TBits_23 = 0..8388607;
- TBits_24 = 0..16777215;
- TBits_25 = 0..33554431;
- TBits_26 = 0..67108863;
- TBits_27 = 0..134217727;
- TBits_28 = 0..268435455;
- TBits_29 = 0..536870911;
- TBits_30 = 0..1073741823;
- TBits_31 = 0..2147483647;
- TBits_32 = 0..4294967295;
- TWDT_WDTCON = record
- private
- function getON : TBits_1; inline;
- function getSWDTPS : TBits_5; inline;
- function getSWDTPS0 : TBits_1; inline;
- function getSWDTPS1 : TBits_1; inline;
- function getSWDTPS2 : TBits_1; inline;
- function getSWDTPS3 : TBits_1; inline;
- function getSWDTPS4 : TBits_1; inline;
- function getWDTCLR : TBits_1; inline;
- function getWDTPS : TBits_5; inline;
- function getWDTPSTA : TBits_5; inline;
- function getw : TBits_32; inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setSWDTPS(thebits : TBits_5); inline;
- procedure setSWDTPS0(thebits : TBits_1); inline;
- procedure setSWDTPS1(thebits : TBits_1); inline;
- procedure setSWDTPS2(thebits : TBits_1); inline;
- procedure setSWDTPS3(thebits : TBits_1); inline;
- procedure setSWDTPS4(thebits : TBits_1); inline;
- procedure setWDTCLR(thebits : TBits_1); inline;
- procedure setWDTPS(thebits : TBits_5); inline;
- procedure setWDTPSTA(thebits : TBits_5); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearON; inline;
- procedure clearSWDTPS0; inline;
- procedure clearSWDTPS1; inline;
- procedure clearSWDTPS2; inline;
- procedure clearSWDTPS3; inline;
- procedure clearSWDTPS4; inline;
- procedure clearWDTCLR; inline;
- procedure setON; inline;
- procedure setSWDTPS0; inline;
- procedure setSWDTPS1; inline;
- procedure setSWDTPS2; inline;
- procedure setSWDTPS3; inline;
- procedure setSWDTPS4; inline;
- procedure setWDTCLR; inline;
- property ON : TBits_1 read getON write setON;
- property SWDTPS : TBits_5 read getSWDTPS write setSWDTPS;
- property SWDTPS0 : TBits_1 read getSWDTPS0 write setSWDTPS0;
- property SWDTPS1 : TBits_1 read getSWDTPS1 write setSWDTPS1;
- property SWDTPS2 : TBits_1 read getSWDTPS2 write setSWDTPS2;
- property SWDTPS3 : TBits_1 read getSWDTPS3 write setSWDTPS3;
- property SWDTPS4 : TBits_1 read getSWDTPS4 write setSWDTPS4;
- property WDTCLR : TBits_1 read getWDTCLR write setWDTCLR;
- property WDTPS : TBits_5 read getWDTPS write setWDTPS;
- property WDTPSTA : TBits_5 read getWDTPSTA write setWDTPSTA;
- property w : TBits_32 read getw write setw;
- end;
- type
- TWDTRegisters = record
- WDTCONbits : TWDT_WDTCON;
- WDTCON : longWord;
- WDTCONCLR : longWord;
- WDTCONSET : longWord;
- WDTCONINV : longWord;
- end;
- TRTCC_RTCCON = record
- private
- function getCAL : TBits_10; inline;
- function getHALFSEC : TBits_1; inline;
- function getON : TBits_1; inline;
- function getRTCCLKON : TBits_1; inline;
- function getRTCOE : TBits_1; inline;
- function getRTCSYNC : TBits_1; inline;
- function getRTCWREN : TBits_1; inline;
- function getRTSECSEL : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setCAL(thebits : TBits_10); inline;
- procedure setHALFSEC(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setRTCCLKON(thebits : TBits_1); inline;
- procedure setRTCOE(thebits : TBits_1); inline;
- procedure setRTCSYNC(thebits : TBits_1); inline;
- procedure setRTCWREN(thebits : TBits_1); inline;
- procedure setRTSECSEL(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearHALFSEC; inline;
- procedure clearON; inline;
- procedure clearRTCCLKON; inline;
- procedure clearRTCOE; inline;
- procedure clearRTCSYNC; inline;
- procedure clearRTCWREN; inline;
- procedure clearRTSECSEL; inline;
- procedure clearSIDL; inline;
- procedure setHALFSEC; inline;
- procedure setON; inline;
- procedure setRTCCLKON; inline;
- procedure setRTCOE; inline;
- procedure setRTCSYNC; inline;
- procedure setRTCWREN; inline;
- procedure setRTSECSEL; inline;
- procedure setSIDL; inline;
- property CAL : TBits_10 read getCAL write setCAL;
- property HALFSEC : TBits_1 read getHALFSEC write setHALFSEC;
- property ON : TBits_1 read getON write setON;
- property RTCCLKON : TBits_1 read getRTCCLKON write setRTCCLKON;
- property RTCOE : TBits_1 read getRTCOE write setRTCOE;
- property RTCSYNC : TBits_1 read getRTCSYNC write setRTCSYNC;
- property RTCWREN : TBits_1 read getRTCWREN write setRTCWREN;
- property RTSECSEL : TBits_1 read getRTSECSEL write setRTSECSEL;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property w : TBits_32 read getw write setw;
- end;
- TRTCC_RTCALRM = record
- private
- function getALRMEN : TBits_1; inline;
- function getALRMSYNC : TBits_1; inline;
- function getAMASK : TBits_4; inline;
- function getARPT : TBits_8; inline;
- function getCHIME : TBits_1; inline;
- function getPIV : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setALRMEN(thebits : TBits_1); inline;
- procedure setALRMSYNC(thebits : TBits_1); inline;
- procedure setAMASK(thebits : TBits_4); inline;
- procedure setARPT(thebits : TBits_8); inline;
- procedure setCHIME(thebits : TBits_1); inline;
- procedure setPIV(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearALRMEN; inline;
- procedure clearALRMSYNC; inline;
- procedure clearCHIME; inline;
- procedure clearPIV; inline;
- procedure setALRMEN; inline;
- procedure setALRMSYNC; inline;
- procedure setCHIME; inline;
- procedure setPIV; inline;
- property ALRMEN : TBits_1 read getALRMEN write setALRMEN;
- property ALRMSYNC : TBits_1 read getALRMSYNC write setALRMSYNC;
- property AMASK : TBits_4 read getAMASK write setAMASK;
- property ARPT : TBits_8 read getARPT write setARPT;
- property CHIME : TBits_1 read getCHIME write setCHIME;
- property PIV : TBits_1 read getPIV write setPIV;
- property w : TBits_32 read getw write setw;
- end;
- TRTCC_RTCTIME = record
- private
- function getHR01 : TBits_4; inline;
- function getHR10 : TBits_4; inline;
- function getMIN01 : TBits_4; inline;
- function getMIN10 : TBits_4; inline;
- function getSEC01 : TBits_4; inline;
- function getSEC10 : TBits_4; inline;
- function getw : TBits_32; inline;
- procedure setHR01(thebits : TBits_4); inline;
- procedure setHR10(thebits : TBits_4); inline;
- procedure setMIN01(thebits : TBits_4); inline;
- procedure setMIN10(thebits : TBits_4); inline;
- procedure setSEC01(thebits : TBits_4); inline;
- procedure setSEC10(thebits : TBits_4); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property HR01 : TBits_4 read getHR01 write setHR01;
- property HR10 : TBits_4 read getHR10 write setHR10;
- property MIN01 : TBits_4 read getMIN01 write setMIN01;
- property MIN10 : TBits_4 read getMIN10 write setMIN10;
- property SEC01 : TBits_4 read getSEC01 write setSEC01;
- property SEC10 : TBits_4 read getSEC10 write setSEC10;
- property w : TBits_32 read getw write setw;
- end;
- TRTCC_RTCDATE = record
- private
- function getDAY01 : TBits_4; inline;
- function getDAY10 : TBits_4; inline;
- function getMONTH01 : TBits_4; inline;
- function getMONTH10 : TBits_4; inline;
- function getWDAY01 : TBits_4; inline;
- function getYEAR01 : TBits_4; inline;
- function getYEAR10 : TBits_4; inline;
- function getw : TBits_32; inline;
- procedure setDAY01(thebits : TBits_4); inline;
- procedure setDAY10(thebits : TBits_4); inline;
- procedure setMONTH01(thebits : TBits_4); inline;
- procedure setMONTH10(thebits : TBits_4); inline;
- procedure setWDAY01(thebits : TBits_4); inline;
- procedure setYEAR01(thebits : TBits_4); inline;
- procedure setYEAR10(thebits : TBits_4); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property DAY01 : TBits_4 read getDAY01 write setDAY01;
- property DAY10 : TBits_4 read getDAY10 write setDAY10;
- property MONTH01 : TBits_4 read getMONTH01 write setMONTH01;
- property MONTH10 : TBits_4 read getMONTH10 write setMONTH10;
- property WDAY01 : TBits_4 read getWDAY01 write setWDAY01;
- property YEAR01 : TBits_4 read getYEAR01 write setYEAR01;
- property YEAR10 : TBits_4 read getYEAR10 write setYEAR10;
- property w : TBits_32 read getw write setw;
- end;
- TRTCC_ALRMTIME = record
- private
- function getHR01 : TBits_4; inline;
- function getHR10 : TBits_4; inline;
- function getMIN01 : TBits_4; inline;
- function getMIN10 : TBits_4; inline;
- function getSEC01 : TBits_4; inline;
- function getSEC10 : TBits_4; inline;
- function getw : TBits_32; inline;
- procedure setHR01(thebits : TBits_4); inline;
- procedure setHR10(thebits : TBits_4); inline;
- procedure setMIN01(thebits : TBits_4); inline;
- procedure setMIN10(thebits : TBits_4); inline;
- procedure setSEC01(thebits : TBits_4); inline;
- procedure setSEC10(thebits : TBits_4); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property HR01 : TBits_4 read getHR01 write setHR01;
- property HR10 : TBits_4 read getHR10 write setHR10;
- property MIN01 : TBits_4 read getMIN01 write setMIN01;
- property MIN10 : TBits_4 read getMIN10 write setMIN10;
- property SEC01 : TBits_4 read getSEC01 write setSEC01;
- property SEC10 : TBits_4 read getSEC10 write setSEC10;
- property w : TBits_32 read getw write setw;
- end;
- TRTCC_ALRMDATE = record
- private
- function getDAY01 : TBits_4; inline;
- function getDAY10 : TBits_4; inline;
- function getMONTH01 : TBits_4; inline;
- function getMONTH10 : TBits_4; inline;
- function getWDAY01 : TBits_4; inline;
- function getw : TBits_32; inline;
- procedure setDAY01(thebits : TBits_4); inline;
- procedure setDAY10(thebits : TBits_4); inline;
- procedure setMONTH01(thebits : TBits_4); inline;
- procedure setMONTH10(thebits : TBits_4); inline;
- procedure setWDAY01(thebits : TBits_4); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property DAY01 : TBits_4 read getDAY01 write setDAY01;
- property DAY10 : TBits_4 read getDAY10 write setDAY10;
- property MONTH01 : TBits_4 read getMONTH01 write setMONTH01;
- property MONTH10 : TBits_4 read getMONTH10 write setMONTH10;
- property WDAY01 : TBits_4 read getWDAY01 write setWDAY01;
- property w : TBits_32 read getw write setw;
- end;
- type
- TRTCCRegisters = record
- RTCCONbits : TRTCC_RTCCON;
- RTCCON : longWord;
- RTCCONCLR : longWord;
- RTCCONSET : longWord;
- RTCCONINV : longWord;
- RTCALRMbits : TRTCC_RTCALRM;
- RTCALRM : longWord;
- RTCALRMCLR : longWord;
- RTCALRMSET : longWord;
- RTCALRMINV : longWord;
- RTCTIMEbits : TRTCC_RTCTIME;
- RTCTIME : longWord;
- RTCTIMECLR : longWord;
- RTCTIMESET : longWord;
- RTCTIMEINV : longWord;
- RTCDATEbits : TRTCC_RTCDATE;
- RTCDATE : longWord;
- RTCDATECLR : longWord;
- RTCDATESET : longWord;
- RTCDATEINV : longWord;
- ALRMTIMEbits : TRTCC_ALRMTIME;
- ALRMTIME : longWord;
- ALRMTIMECLR : longWord;
- ALRMTIMESET : longWord;
- ALRMTIMEINV : longWord;
- ALRMDATEbits : TRTCC_ALRMDATE;
- ALRMDATE : longWord;
- ALRMDATECLR : longWord;
- ALRMDATESET : longWord;
- ALRMDATEINV : longWord;
- end;
- TTMR1_T1CON = record
- private
- function getON : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getTCKPS : TBits_2; inline;
- function getTCKPS0 : TBits_1; inline;
- function getTCKPS1 : TBits_1; inline;
- function getTCS : TBits_1; inline;
- function getTGATE : TBits_1; inline;
- function getTON : TBits_1; inline;
- function getTSIDL : TBits_1; inline;
- function getTSYNC : TBits_1; inline;
- function getTWDIS : TBits_1; inline;
- function getTWIP : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setTCKPS(thebits : TBits_2); inline;
- procedure setTCKPS0(thebits : TBits_1); inline;
- procedure setTCKPS1(thebits : TBits_1); inline;
- procedure setTCS(thebits : TBits_1); inline;
- procedure setTGATE(thebits : TBits_1); inline;
- procedure setTON(thebits : TBits_1); inline;
- procedure setTSIDL(thebits : TBits_1); inline;
- procedure setTSYNC(thebits : TBits_1); inline;
- procedure setTWDIS(thebits : TBits_1); inline;
- procedure setTWIP(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearON; inline;
- procedure clearSIDL; inline;
- procedure clearTCKPS0; inline;
- procedure clearTCKPS1; inline;
- procedure clearTCS; inline;
- procedure clearTGATE; inline;
- procedure clearTON; inline;
- procedure clearTSIDL; inline;
- procedure clearTSYNC; inline;
- procedure clearTWDIS; inline;
- procedure clearTWIP; inline;
- procedure setON; inline;
- procedure setSIDL; inline;
- procedure setTCKPS0; inline;
- procedure setTCKPS1; inline;
- procedure setTCS; inline;
- procedure setTGATE; inline;
- procedure setTON; inline;
- procedure setTSIDL; inline;
- procedure setTSYNC; inline;
- procedure setTWDIS; inline;
- procedure setTWIP; inline;
- property ON : TBits_1 read getON write setON;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property TCKPS : TBits_2 read getTCKPS write setTCKPS;
- property TCKPS0 : TBits_1 read getTCKPS0 write setTCKPS0;
- property TCKPS1 : TBits_1 read getTCKPS1 write setTCKPS1;
- property TCS : TBits_1 read getTCS write setTCS;
- property TGATE : TBits_1 read getTGATE write setTGATE;
- property TON : TBits_1 read getTON write setTON;
- property TSIDL : TBits_1 read getTSIDL write setTSIDL;
- property TSYNC : TBits_1 read getTSYNC write setTSYNC;
- property TWDIS : TBits_1 read getTWDIS write setTWDIS;
- property TWIP : TBits_1 read getTWIP write setTWIP;
- property w : TBits_32 read getw write setw;
- end;
- type
- TTMR1Registers = record
- T1CONbits : TTMR1_T1CON;
- T1CON : longWord;
- T1CONCLR : longWord;
- T1CONSET : longWord;
- T1CONINV : longWord;
- TMR1 : longWord;
- TMR1CLR : longWord;
- TMR1SET : longWord;
- TMR1INV : longWord;
- PR1 : longWord;
- PR1CLR : longWord;
- PR1SET : longWord;
- PR1INV : longWord;
- end;
- TTMR2_T2CON = record
- private
- function getON : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getT32 : TBits_1; inline;
- function getTCKPS : TBits_3; inline;
- function getTCKPS0 : TBits_1; inline;
- function getTCKPS1 : TBits_1; inline;
- function getTCKPS2 : TBits_1; inline;
- function getTCS : TBits_1; inline;
- function getTGATE : TBits_1; inline;
- function getTON : TBits_1; inline;
- function getTSIDL : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setT32(thebits : TBits_1); inline;
- procedure setTCKPS(thebits : TBits_3); inline;
- procedure setTCKPS0(thebits : TBits_1); inline;
- procedure setTCKPS1(thebits : TBits_1); inline;
- procedure setTCKPS2(thebits : TBits_1); inline;
- procedure setTCS(thebits : TBits_1); inline;
- procedure setTGATE(thebits : TBits_1); inline;
- procedure setTON(thebits : TBits_1); inline;
- procedure setTSIDL(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearON; inline;
- procedure clearSIDL; inline;
- procedure clearT32; inline;
- procedure clearTCKPS0; inline;
- procedure clearTCKPS1; inline;
- procedure clearTCKPS2; inline;
- procedure clearTCS; inline;
- procedure clearTGATE; inline;
- procedure clearTON; inline;
- procedure clearTSIDL; inline;
- procedure setON; inline;
- procedure setSIDL; inline;
- procedure setT32; inline;
- procedure setTCKPS0; inline;
- procedure setTCKPS1; inline;
- procedure setTCKPS2; inline;
- procedure setTCS; inline;
- procedure setTGATE; inline;
- procedure setTON; inline;
- procedure setTSIDL; inline;
- property ON : TBits_1 read getON write setON;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property T32 : TBits_1 read getT32 write setT32;
- property TCKPS : TBits_3 read getTCKPS write setTCKPS;
- property TCKPS0 : TBits_1 read getTCKPS0 write setTCKPS0;
- property TCKPS1 : TBits_1 read getTCKPS1 write setTCKPS1;
- property TCKPS2 : TBits_1 read getTCKPS2 write setTCKPS2;
- property TCS : TBits_1 read getTCS write setTCS;
- property TGATE : TBits_1 read getTGATE write setTGATE;
- property TON : TBits_1 read getTON write setTON;
- property TSIDL : TBits_1 read getTSIDL write setTSIDL;
- property w : TBits_32 read getw write setw;
- end;
- type
- TTMR2Registers = record
- T2CONbits : TTMR2_T2CON;
- T2CON : longWord;
- T2CONCLR : longWord;
- T2CONSET : longWord;
- T2CONINV : longWord;
- TMR2 : longWord;
- TMR2CLR : longWord;
- TMR2SET : longWord;
- TMR2INV : longWord;
- PR2 : longWord;
- PR2CLR : longWord;
- PR2SET : longWord;
- PR2INV : longWord;
- end;
- TTMR3_T3CON = record
- private
- function getON : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getTCKPS : TBits_3; inline;
- function getTCKPS0 : TBits_1; inline;
- function getTCKPS1 : TBits_1; inline;
- function getTCKPS2 : TBits_1; inline;
- function getTCS : TBits_1; inline;
- function getTGATE : TBits_1; inline;
- function getTON : TBits_1; inline;
- function getTSIDL : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setTCKPS(thebits : TBits_3); inline;
- procedure setTCKPS0(thebits : TBits_1); inline;
- procedure setTCKPS1(thebits : TBits_1); inline;
- procedure setTCKPS2(thebits : TBits_1); inline;
- procedure setTCS(thebits : TBits_1); inline;
- procedure setTGATE(thebits : TBits_1); inline;
- procedure setTON(thebits : TBits_1); inline;
- procedure setTSIDL(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearON; inline;
- procedure clearSIDL; inline;
- procedure clearTCKPS0; inline;
- procedure clearTCKPS1; inline;
- procedure clearTCKPS2; inline;
- procedure clearTCS; inline;
- procedure clearTGATE; inline;
- procedure clearTON; inline;
- procedure clearTSIDL; inline;
- procedure setON; inline;
- procedure setSIDL; inline;
- procedure setTCKPS0; inline;
- procedure setTCKPS1; inline;
- procedure setTCKPS2; inline;
- procedure setTCS; inline;
- procedure setTGATE; inline;
- procedure setTON; inline;
- procedure setTSIDL; inline;
- property ON : TBits_1 read getON write setON;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property TCKPS : TBits_3 read getTCKPS write setTCKPS;
- property TCKPS0 : TBits_1 read getTCKPS0 write setTCKPS0;
- property TCKPS1 : TBits_1 read getTCKPS1 write setTCKPS1;
- property TCKPS2 : TBits_1 read getTCKPS2 write setTCKPS2;
- property TCS : TBits_1 read getTCS write setTCS;
- property TGATE : TBits_1 read getTGATE write setTGATE;
- property TON : TBits_1 read getTON write setTON;
- property TSIDL : TBits_1 read getTSIDL write setTSIDL;
- property w : TBits_32 read getw write setw;
- end;
- type
- TTMR3Registers = record
- T3CONbits : TTMR3_T3CON;
- T3CON : longWord;
- T3CONCLR : longWord;
- T3CONSET : longWord;
- T3CONINV : longWord;
- TMR3 : longWord;
- TMR3CLR : longWord;
- TMR3SET : longWord;
- TMR3INV : longWord;
- PR3 : longWord;
- PR3CLR : longWord;
- PR3SET : longWord;
- PR3INV : longWord;
- end;
- TTMR4_T4CON = record
- private
- function getON : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getT32 : TBits_1; inline;
- function getTCKPS : TBits_3; inline;
- function getTCKPS0 : TBits_1; inline;
- function getTCKPS1 : TBits_1; inline;
- function getTCKPS2 : TBits_1; inline;
- function getTCS : TBits_1; inline;
- function getTGATE : TBits_1; inline;
- function getTON : TBits_1; inline;
- function getTSIDL : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setT32(thebits : TBits_1); inline;
- procedure setTCKPS(thebits : TBits_3); inline;
- procedure setTCKPS0(thebits : TBits_1); inline;
- procedure setTCKPS1(thebits : TBits_1); inline;
- procedure setTCKPS2(thebits : TBits_1); inline;
- procedure setTCS(thebits : TBits_1); inline;
- procedure setTGATE(thebits : TBits_1); inline;
- procedure setTON(thebits : TBits_1); inline;
- procedure setTSIDL(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearON; inline;
- procedure clearSIDL; inline;
- procedure clearT32; inline;
- procedure clearTCKPS0; inline;
- procedure clearTCKPS1; inline;
- procedure clearTCKPS2; inline;
- procedure clearTCS; inline;
- procedure clearTGATE; inline;
- procedure clearTON; inline;
- procedure clearTSIDL; inline;
- procedure setON; inline;
- procedure setSIDL; inline;
- procedure setT32; inline;
- procedure setTCKPS0; inline;
- procedure setTCKPS1; inline;
- procedure setTCKPS2; inline;
- procedure setTCS; inline;
- procedure setTGATE; inline;
- procedure setTON; inline;
- procedure setTSIDL; inline;
- property ON : TBits_1 read getON write setON;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property T32 : TBits_1 read getT32 write setT32;
- property TCKPS : TBits_3 read getTCKPS write setTCKPS;
- property TCKPS0 : TBits_1 read getTCKPS0 write setTCKPS0;
- property TCKPS1 : TBits_1 read getTCKPS1 write setTCKPS1;
- property TCKPS2 : TBits_1 read getTCKPS2 write setTCKPS2;
- property TCS : TBits_1 read getTCS write setTCS;
- property TGATE : TBits_1 read getTGATE write setTGATE;
- property TON : TBits_1 read getTON write setTON;
- property TSIDL : TBits_1 read getTSIDL write setTSIDL;
- property w : TBits_32 read getw write setw;
- end;
- type
- TTMR4Registers = record
- T4CONbits : TTMR4_T4CON;
- T4CON : longWord;
- T4CONCLR : longWord;
- T4CONSET : longWord;
- T4CONINV : longWord;
- TMR4 : longWord;
- TMR4CLR : longWord;
- TMR4SET : longWord;
- TMR4INV : longWord;
- PR4 : longWord;
- PR4CLR : longWord;
- PR4SET : longWord;
- PR4INV : longWord;
- end;
- TTMR5_T5CON = record
- private
- function getON : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getTCKPS : TBits_3; inline;
- function getTCKPS0 : TBits_1; inline;
- function getTCKPS1 : TBits_1; inline;
- function getTCKPS2 : TBits_1; inline;
- function getTCS : TBits_1; inline;
- function getTGATE : TBits_1; inline;
- function getTON : TBits_1; inline;
- function getTSIDL : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setTCKPS(thebits : TBits_3); inline;
- procedure setTCKPS0(thebits : TBits_1); inline;
- procedure setTCKPS1(thebits : TBits_1); inline;
- procedure setTCKPS2(thebits : TBits_1); inline;
- procedure setTCS(thebits : TBits_1); inline;
- procedure setTGATE(thebits : TBits_1); inline;
- procedure setTON(thebits : TBits_1); inline;
- procedure setTSIDL(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearON; inline;
- procedure clearSIDL; inline;
- procedure clearTCKPS0; inline;
- procedure clearTCKPS1; inline;
- procedure clearTCKPS2; inline;
- procedure clearTCS; inline;
- procedure clearTGATE; inline;
- procedure clearTON; inline;
- procedure clearTSIDL; inline;
- procedure setON; inline;
- procedure setSIDL; inline;
- procedure setTCKPS0; inline;
- procedure setTCKPS1; inline;
- procedure setTCKPS2; inline;
- procedure setTCS; inline;
- procedure setTGATE; inline;
- procedure setTON; inline;
- procedure setTSIDL; inline;
- property ON : TBits_1 read getON write setON;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property TCKPS : TBits_3 read getTCKPS write setTCKPS;
- property TCKPS0 : TBits_1 read getTCKPS0 write setTCKPS0;
- property TCKPS1 : TBits_1 read getTCKPS1 write setTCKPS1;
- property TCKPS2 : TBits_1 read getTCKPS2 write setTCKPS2;
- property TCS : TBits_1 read getTCS write setTCS;
- property TGATE : TBits_1 read getTGATE write setTGATE;
- property TON : TBits_1 read getTON write setTON;
- property TSIDL : TBits_1 read getTSIDL write setTSIDL;
- property w : TBits_32 read getw write setw;
- end;
- type
- TTMR5Registers = record
- T5CONbits : TTMR5_T5CON;
- T5CON : longWord;
- T5CONCLR : longWord;
- T5CONSET : longWord;
- T5CONINV : longWord;
- TMR5 : longWord;
- TMR5CLR : longWord;
- TMR5SET : longWord;
- TMR5INV : longWord;
- PR5 : longWord;
- PR5CLR : longWord;
- PR5SET : longWord;
- PR5INV : longWord;
- end;
- TICAP1_IC1CON = record
- private
- function getC32 : TBits_1; inline;
- function getFEDGE : TBits_1; inline;
- function getICBNE : TBits_1; inline;
- function getICI : TBits_2; inline;
- function getICI0 : TBits_1; inline;
- function getICI1 : TBits_1; inline;
- function getICM : TBits_3; inline;
- function getICM0 : TBits_1; inline;
- function getICM1 : TBits_1; inline;
- function getICM2 : TBits_1; inline;
- function getICOV : TBits_1; inline;
- function getICSIDL : TBits_1; inline;
- function getICTMR : TBits_1; inline;
- function getON : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setC32(thebits : TBits_1); inline;
- procedure setFEDGE(thebits : TBits_1); inline;
- procedure setICBNE(thebits : TBits_1); inline;
- procedure setICI(thebits : TBits_2); inline;
- procedure setICI0(thebits : TBits_1); inline;
- procedure setICI1(thebits : TBits_1); inline;
- procedure setICM(thebits : TBits_3); inline;
- procedure setICM0(thebits : TBits_1); inline;
- procedure setICM1(thebits : TBits_1); inline;
- procedure setICM2(thebits : TBits_1); inline;
- procedure setICOV(thebits : TBits_1); inline;
- procedure setICSIDL(thebits : TBits_1); inline;
- procedure setICTMR(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearC32; inline;
- procedure clearFEDGE; inline;
- procedure clearICBNE; inline;
- procedure clearICI0; inline;
- procedure clearICI1; inline;
- procedure clearICM0; inline;
- procedure clearICM1; inline;
- procedure clearICM2; inline;
- procedure clearICOV; inline;
- procedure clearICSIDL; inline;
- procedure clearICTMR; inline;
- procedure clearON; inline;
- procedure clearSIDL; inline;
- procedure setC32; inline;
- procedure setFEDGE; inline;
- procedure setICBNE; inline;
- procedure setICI0; inline;
- procedure setICI1; inline;
- procedure setICM0; inline;
- procedure setICM1; inline;
- procedure setICM2; inline;
- procedure setICOV; inline;
- procedure setICSIDL; inline;
- procedure setICTMR; inline;
- procedure setON; inline;
- procedure setSIDL; inline;
- property C32 : TBits_1 read getC32 write setC32;
- property FEDGE : TBits_1 read getFEDGE write setFEDGE;
- property ICBNE : TBits_1 read getICBNE write setICBNE;
- property ICI : TBits_2 read getICI write setICI;
- property ICI0 : TBits_1 read getICI0 write setICI0;
- property ICI1 : TBits_1 read getICI1 write setICI1;
- property ICM : TBits_3 read getICM write setICM;
- property ICM0 : TBits_1 read getICM0 write setICM0;
- property ICM1 : TBits_1 read getICM1 write setICM1;
- property ICM2 : TBits_1 read getICM2 write setICM2;
- property ICOV : TBits_1 read getICOV write setICOV;
- property ICSIDL : TBits_1 read getICSIDL write setICSIDL;
- property ICTMR : TBits_1 read getICTMR write setICTMR;
- property ON : TBits_1 read getON write setON;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property w : TBits_32 read getw write setw;
- end;
- type
- TICAP1Registers = record
- IC1CONbits : TICAP1_IC1CON;
- IC1CON : longWord;
- IC1CONCLR : longWord;
- IC1CONSET : longWord;
- IC1CONINV : longWord;
- IC1BUF : longWord;
- end;
- TICAP2_IC2CON = record
- private
- function getC32 : TBits_1; inline;
- function getFEDGE : TBits_1; inline;
- function getICBNE : TBits_1; inline;
- function getICI : TBits_2; inline;
- function getICI0 : TBits_1; inline;
- function getICI1 : TBits_1; inline;
- function getICM : TBits_3; inline;
- function getICM0 : TBits_1; inline;
- function getICM1 : TBits_1; inline;
- function getICM2 : TBits_1; inline;
- function getICOV : TBits_1; inline;
- function getICSIDL : TBits_1; inline;
- function getICTMR : TBits_1; inline;
- function getON : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setC32(thebits : TBits_1); inline;
- procedure setFEDGE(thebits : TBits_1); inline;
- procedure setICBNE(thebits : TBits_1); inline;
- procedure setICI(thebits : TBits_2); inline;
- procedure setICI0(thebits : TBits_1); inline;
- procedure setICI1(thebits : TBits_1); inline;
- procedure setICM(thebits : TBits_3); inline;
- procedure setICM0(thebits : TBits_1); inline;
- procedure setICM1(thebits : TBits_1); inline;
- procedure setICM2(thebits : TBits_1); inline;
- procedure setICOV(thebits : TBits_1); inline;
- procedure setICSIDL(thebits : TBits_1); inline;
- procedure setICTMR(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearC32; inline;
- procedure clearFEDGE; inline;
- procedure clearICBNE; inline;
- procedure clearICI0; inline;
- procedure clearICI1; inline;
- procedure clearICM0; inline;
- procedure clearICM1; inline;
- procedure clearICM2; inline;
- procedure clearICOV; inline;
- procedure clearICSIDL; inline;
- procedure clearICTMR; inline;
- procedure clearON; inline;
- procedure clearSIDL; inline;
- procedure setC32; inline;
- procedure setFEDGE; inline;
- procedure setICBNE; inline;
- procedure setICI0; inline;
- procedure setICI1; inline;
- procedure setICM0; inline;
- procedure setICM1; inline;
- procedure setICM2; inline;
- procedure setICOV; inline;
- procedure setICSIDL; inline;
- procedure setICTMR; inline;
- procedure setON; inline;
- procedure setSIDL; inline;
- property C32 : TBits_1 read getC32 write setC32;
- property FEDGE : TBits_1 read getFEDGE write setFEDGE;
- property ICBNE : TBits_1 read getICBNE write setICBNE;
- property ICI : TBits_2 read getICI write setICI;
- property ICI0 : TBits_1 read getICI0 write setICI0;
- property ICI1 : TBits_1 read getICI1 write setICI1;
- property ICM : TBits_3 read getICM write setICM;
- property ICM0 : TBits_1 read getICM0 write setICM0;
- property ICM1 : TBits_1 read getICM1 write setICM1;
- property ICM2 : TBits_1 read getICM2 write setICM2;
- property ICOV : TBits_1 read getICOV write setICOV;
- property ICSIDL : TBits_1 read getICSIDL write setICSIDL;
- property ICTMR : TBits_1 read getICTMR write setICTMR;
- property ON : TBits_1 read getON write setON;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property w : TBits_32 read getw write setw;
- end;
- type
- TICAP2Registers = record
- IC2CONbits : TICAP2_IC2CON;
- IC2CON : longWord;
- IC2CONCLR : longWord;
- IC2CONSET : longWord;
- IC2CONINV : longWord;
- IC2BUF : longWord;
- end;
- TICAP3_IC3CON = record
- private
- function getC32 : TBits_1; inline;
- function getFEDGE : TBits_1; inline;
- function getICBNE : TBits_1; inline;
- function getICI : TBits_2; inline;
- function getICI0 : TBits_1; inline;
- function getICI1 : TBits_1; inline;
- function getICM : TBits_3; inline;
- function getICM0 : TBits_1; inline;
- function getICM1 : TBits_1; inline;
- function getICM2 : TBits_1; inline;
- function getICOV : TBits_1; inline;
- function getICSIDL : TBits_1; inline;
- function getICTMR : TBits_1; inline;
- function getON : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setC32(thebits : TBits_1); inline;
- procedure setFEDGE(thebits : TBits_1); inline;
- procedure setICBNE(thebits : TBits_1); inline;
- procedure setICI(thebits : TBits_2); inline;
- procedure setICI0(thebits : TBits_1); inline;
- procedure setICI1(thebits : TBits_1); inline;
- procedure setICM(thebits : TBits_3); inline;
- procedure setICM0(thebits : TBits_1); inline;
- procedure setICM1(thebits : TBits_1); inline;
- procedure setICM2(thebits : TBits_1); inline;
- procedure setICOV(thebits : TBits_1); inline;
- procedure setICSIDL(thebits : TBits_1); inline;
- procedure setICTMR(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearC32; inline;
- procedure clearFEDGE; inline;
- procedure clearICBNE; inline;
- procedure clearICI0; inline;
- procedure clearICI1; inline;
- procedure clearICM0; inline;
- procedure clearICM1; inline;
- procedure clearICM2; inline;
- procedure clearICOV; inline;
- procedure clearICSIDL; inline;
- procedure clearICTMR; inline;
- procedure clearON; inline;
- procedure clearSIDL; inline;
- procedure setC32; inline;
- procedure setFEDGE; inline;
- procedure setICBNE; inline;
- procedure setICI0; inline;
- procedure setICI1; inline;
- procedure setICM0; inline;
- procedure setICM1; inline;
- procedure setICM2; inline;
- procedure setICOV; inline;
- procedure setICSIDL; inline;
- procedure setICTMR; inline;
- procedure setON; inline;
- procedure setSIDL; inline;
- property C32 : TBits_1 read getC32 write setC32;
- property FEDGE : TBits_1 read getFEDGE write setFEDGE;
- property ICBNE : TBits_1 read getICBNE write setICBNE;
- property ICI : TBits_2 read getICI write setICI;
- property ICI0 : TBits_1 read getICI0 write setICI0;
- property ICI1 : TBits_1 read getICI1 write setICI1;
- property ICM : TBits_3 read getICM write setICM;
- property ICM0 : TBits_1 read getICM0 write setICM0;
- property ICM1 : TBits_1 read getICM1 write setICM1;
- property ICM2 : TBits_1 read getICM2 write setICM2;
- property ICOV : TBits_1 read getICOV write setICOV;
- property ICSIDL : TBits_1 read getICSIDL write setICSIDL;
- property ICTMR : TBits_1 read getICTMR write setICTMR;
- property ON : TBits_1 read getON write setON;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property w : TBits_32 read getw write setw;
- end;
- type
- TICAP3Registers = record
- IC3CONbits : TICAP3_IC3CON;
- IC3CON : longWord;
- IC3CONCLR : longWord;
- IC3CONSET : longWord;
- IC3CONINV : longWord;
- IC3BUF : longWord;
- end;
- TICAP4_IC4CON = record
- private
- function getC32 : TBits_1; inline;
- function getFEDGE : TBits_1; inline;
- function getICBNE : TBits_1; inline;
- function getICI : TBits_2; inline;
- function getICI0 : TBits_1; inline;
- function getICI1 : TBits_1; inline;
- function getICM : TBits_3; inline;
- function getICM0 : TBits_1; inline;
- function getICM1 : TBits_1; inline;
- function getICM2 : TBits_1; inline;
- function getICOV : TBits_1; inline;
- function getICSIDL : TBits_1; inline;
- function getICTMR : TBits_1; inline;
- function getON : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setC32(thebits : TBits_1); inline;
- procedure setFEDGE(thebits : TBits_1); inline;
- procedure setICBNE(thebits : TBits_1); inline;
- procedure setICI(thebits : TBits_2); inline;
- procedure setICI0(thebits : TBits_1); inline;
- procedure setICI1(thebits : TBits_1); inline;
- procedure setICM(thebits : TBits_3); inline;
- procedure setICM0(thebits : TBits_1); inline;
- procedure setICM1(thebits : TBits_1); inline;
- procedure setICM2(thebits : TBits_1); inline;
- procedure setICOV(thebits : TBits_1); inline;
- procedure setICSIDL(thebits : TBits_1); inline;
- procedure setICTMR(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearC32; inline;
- procedure clearFEDGE; inline;
- procedure clearICBNE; inline;
- procedure clearICI0; inline;
- procedure clearICI1; inline;
- procedure clearICM0; inline;
- procedure clearICM1; inline;
- procedure clearICM2; inline;
- procedure clearICOV; inline;
- procedure clearICSIDL; inline;
- procedure clearICTMR; inline;
- procedure clearON; inline;
- procedure clearSIDL; inline;
- procedure setC32; inline;
- procedure setFEDGE; inline;
- procedure setICBNE; inline;
- procedure setICI0; inline;
- procedure setICI1; inline;
- procedure setICM0; inline;
- procedure setICM1; inline;
- procedure setICM2; inline;
- procedure setICOV; inline;
- procedure setICSIDL; inline;
- procedure setICTMR; inline;
- procedure setON; inline;
- procedure setSIDL; inline;
- property C32 : TBits_1 read getC32 write setC32;
- property FEDGE : TBits_1 read getFEDGE write setFEDGE;
- property ICBNE : TBits_1 read getICBNE write setICBNE;
- property ICI : TBits_2 read getICI write setICI;
- property ICI0 : TBits_1 read getICI0 write setICI0;
- property ICI1 : TBits_1 read getICI1 write setICI1;
- property ICM : TBits_3 read getICM write setICM;
- property ICM0 : TBits_1 read getICM0 write setICM0;
- property ICM1 : TBits_1 read getICM1 write setICM1;
- property ICM2 : TBits_1 read getICM2 write setICM2;
- property ICOV : TBits_1 read getICOV write setICOV;
- property ICSIDL : TBits_1 read getICSIDL write setICSIDL;
- property ICTMR : TBits_1 read getICTMR write setICTMR;
- property ON : TBits_1 read getON write setON;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property w : TBits_32 read getw write setw;
- end;
- type
- TICAP4Registers = record
- IC4CONbits : TICAP4_IC4CON;
- IC4CON : longWord;
- IC4CONCLR : longWord;
- IC4CONSET : longWord;
- IC4CONINV : longWord;
- IC4BUF : longWord;
- end;
- TICAP5_IC5CON = record
- private
- function getC32 : TBits_1; inline;
- function getFEDGE : TBits_1; inline;
- function getICBNE : TBits_1; inline;
- function getICI : TBits_2; inline;
- function getICI0 : TBits_1; inline;
- function getICI1 : TBits_1; inline;
- function getICM : TBits_3; inline;
- function getICM0 : TBits_1; inline;
- function getICM1 : TBits_1; inline;
- function getICM2 : TBits_1; inline;
- function getICOV : TBits_1; inline;
- function getICSIDL : TBits_1; inline;
- function getICTMR : TBits_1; inline;
- function getON : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setC32(thebits : TBits_1); inline;
- procedure setFEDGE(thebits : TBits_1); inline;
- procedure setICBNE(thebits : TBits_1); inline;
- procedure setICI(thebits : TBits_2); inline;
- procedure setICI0(thebits : TBits_1); inline;
- procedure setICI1(thebits : TBits_1); inline;
- procedure setICM(thebits : TBits_3); inline;
- procedure setICM0(thebits : TBits_1); inline;
- procedure setICM1(thebits : TBits_1); inline;
- procedure setICM2(thebits : TBits_1); inline;
- procedure setICOV(thebits : TBits_1); inline;
- procedure setICSIDL(thebits : TBits_1); inline;
- procedure setICTMR(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearC32; inline;
- procedure clearFEDGE; inline;
- procedure clearICBNE; inline;
- procedure clearICI0; inline;
- procedure clearICI1; inline;
- procedure clearICM0; inline;
- procedure clearICM1; inline;
- procedure clearICM2; inline;
- procedure clearICOV; inline;
- procedure clearICSIDL; inline;
- procedure clearICTMR; inline;
- procedure clearON; inline;
- procedure clearSIDL; inline;
- procedure setC32; inline;
- procedure setFEDGE; inline;
- procedure setICBNE; inline;
- procedure setICI0; inline;
- procedure setICI1; inline;
- procedure setICM0; inline;
- procedure setICM1; inline;
- procedure setICM2; inline;
- procedure setICOV; inline;
- procedure setICSIDL; inline;
- procedure setICTMR; inline;
- procedure setON; inline;
- procedure setSIDL; inline;
- property C32 : TBits_1 read getC32 write setC32;
- property FEDGE : TBits_1 read getFEDGE write setFEDGE;
- property ICBNE : TBits_1 read getICBNE write setICBNE;
- property ICI : TBits_2 read getICI write setICI;
- property ICI0 : TBits_1 read getICI0 write setICI0;
- property ICI1 : TBits_1 read getICI1 write setICI1;
- property ICM : TBits_3 read getICM write setICM;
- property ICM0 : TBits_1 read getICM0 write setICM0;
- property ICM1 : TBits_1 read getICM1 write setICM1;
- property ICM2 : TBits_1 read getICM2 write setICM2;
- property ICOV : TBits_1 read getICOV write setICOV;
- property ICSIDL : TBits_1 read getICSIDL write setICSIDL;
- property ICTMR : TBits_1 read getICTMR write setICTMR;
- property ON : TBits_1 read getON write setON;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property w : TBits_32 read getw write setw;
- end;
- type
- TICAP5Registers = record
- IC5CONbits : TICAP5_IC5CON;
- IC5CON : longWord;
- IC5CONCLR : longWord;
- IC5CONSET : longWord;
- IC5CONINV : longWord;
- IC5BUF : longWord;
- end;
- TOCMP1_OC1CON = record
- private
- function getOC32 : TBits_1; inline;
- function getOCFLT : TBits_1; inline;
- function getOCM : TBits_3; inline;
- function getOCM0 : TBits_1; inline;
- function getOCM1 : TBits_1; inline;
- function getOCM2 : TBits_1; inline;
- function getOCSIDL : TBits_1; inline;
- function getOCTSEL : TBits_1; inline;
- function getON : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setOC32(thebits : TBits_1); inline;
- procedure setOCFLT(thebits : TBits_1); inline;
- procedure setOCM(thebits : TBits_3); inline;
- procedure setOCM0(thebits : TBits_1); inline;
- procedure setOCM1(thebits : TBits_1); inline;
- procedure setOCM2(thebits : TBits_1); inline;
- procedure setOCSIDL(thebits : TBits_1); inline;
- procedure setOCTSEL(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearOC32; inline;
- procedure clearOCFLT; inline;
- procedure clearOCM0; inline;
- procedure clearOCM1; inline;
- procedure clearOCM2; inline;
- procedure clearOCSIDL; inline;
- procedure clearOCTSEL; inline;
- procedure clearON; inline;
- procedure clearSIDL; inline;
- procedure setOC32; inline;
- procedure setOCFLT; inline;
- procedure setOCM0; inline;
- procedure setOCM1; inline;
- procedure setOCM2; inline;
- procedure setOCSIDL; inline;
- procedure setOCTSEL; inline;
- procedure setON; inline;
- procedure setSIDL; inline;
- property OC32 : TBits_1 read getOC32 write setOC32;
- property OCFLT : TBits_1 read getOCFLT write setOCFLT;
- property OCM : TBits_3 read getOCM write setOCM;
- property OCM0 : TBits_1 read getOCM0 write setOCM0;
- property OCM1 : TBits_1 read getOCM1 write setOCM1;
- property OCM2 : TBits_1 read getOCM2 write setOCM2;
- property OCSIDL : TBits_1 read getOCSIDL write setOCSIDL;
- property OCTSEL : TBits_1 read getOCTSEL write setOCTSEL;
- property ON : TBits_1 read getON write setON;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property w : TBits_32 read getw write setw;
- end;
- type
- TOCMP1Registers = record
- OC1CONbits : TOCMP1_OC1CON;
- OC1CON : longWord;
- OC1CONCLR : longWord;
- OC1CONSET : longWord;
- OC1CONINV : longWord;
- OC1R : longWord;
- OC1RCLR : longWord;
- OC1RSET : longWord;
- OC1RINV : longWord;
- OC1RS : longWord;
- OC1RSCLR : longWord;
- OC1RSSET : longWord;
- OC1RSINV : longWord;
- end;
- TOCMP2_OC2CON = record
- private
- function getOC32 : TBits_1; inline;
- function getOCFLT : TBits_1; inline;
- function getOCM : TBits_3; inline;
- function getOCM0 : TBits_1; inline;
- function getOCM1 : TBits_1; inline;
- function getOCM2 : TBits_1; inline;
- function getOCSIDL : TBits_1; inline;
- function getOCTSEL : TBits_1; inline;
- function getON : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setOC32(thebits : TBits_1); inline;
- procedure setOCFLT(thebits : TBits_1); inline;
- procedure setOCM(thebits : TBits_3); inline;
- procedure setOCM0(thebits : TBits_1); inline;
- procedure setOCM1(thebits : TBits_1); inline;
- procedure setOCM2(thebits : TBits_1); inline;
- procedure setOCSIDL(thebits : TBits_1); inline;
- procedure setOCTSEL(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearOC32; inline;
- procedure clearOCFLT; inline;
- procedure clearOCM0; inline;
- procedure clearOCM1; inline;
- procedure clearOCM2; inline;
- procedure clearOCSIDL; inline;
- procedure clearOCTSEL; inline;
- procedure clearON; inline;
- procedure clearSIDL; inline;
- procedure setOC32; inline;
- procedure setOCFLT; inline;
- procedure setOCM0; inline;
- procedure setOCM1; inline;
- procedure setOCM2; inline;
- procedure setOCSIDL; inline;
- procedure setOCTSEL; inline;
- procedure setON; inline;
- procedure setSIDL; inline;
- property OC32 : TBits_1 read getOC32 write setOC32;
- property OCFLT : TBits_1 read getOCFLT write setOCFLT;
- property OCM : TBits_3 read getOCM write setOCM;
- property OCM0 : TBits_1 read getOCM0 write setOCM0;
- property OCM1 : TBits_1 read getOCM1 write setOCM1;
- property OCM2 : TBits_1 read getOCM2 write setOCM2;
- property OCSIDL : TBits_1 read getOCSIDL write setOCSIDL;
- property OCTSEL : TBits_1 read getOCTSEL write setOCTSEL;
- property ON : TBits_1 read getON write setON;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property w : TBits_32 read getw write setw;
- end;
- type
- TOCMP2Registers = record
- OC2CONbits : TOCMP2_OC2CON;
- OC2CON : longWord;
- OC2CONCLR : longWord;
- OC2CONSET : longWord;
- OC2CONINV : longWord;
- OC2R : longWord;
- OC2RCLR : longWord;
- OC2RSET : longWord;
- OC2RINV : longWord;
- OC2RS : longWord;
- OC2RSCLR : longWord;
- OC2RSSET : longWord;
- OC2RSINV : longWord;
- end;
- TOCMP3_OC3CON = record
- private
- function getOC32 : TBits_1; inline;
- function getOCFLT : TBits_1; inline;
- function getOCM : TBits_3; inline;
- function getOCM0 : TBits_1; inline;
- function getOCM1 : TBits_1; inline;
- function getOCM2 : TBits_1; inline;
- function getOCSIDL : TBits_1; inline;
- function getOCTSEL : TBits_1; inline;
- function getON : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setOC32(thebits : TBits_1); inline;
- procedure setOCFLT(thebits : TBits_1); inline;
- procedure setOCM(thebits : TBits_3); inline;
- procedure setOCM0(thebits : TBits_1); inline;
- procedure setOCM1(thebits : TBits_1); inline;
- procedure setOCM2(thebits : TBits_1); inline;
- procedure setOCSIDL(thebits : TBits_1); inline;
- procedure setOCTSEL(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearOC32; inline;
- procedure clearOCFLT; inline;
- procedure clearOCM0; inline;
- procedure clearOCM1; inline;
- procedure clearOCM2; inline;
- procedure clearOCSIDL; inline;
- procedure clearOCTSEL; inline;
- procedure clearON; inline;
- procedure clearSIDL; inline;
- procedure setOC32; inline;
- procedure setOCFLT; inline;
- procedure setOCM0; inline;
- procedure setOCM1; inline;
- procedure setOCM2; inline;
- procedure setOCSIDL; inline;
- procedure setOCTSEL; inline;
- procedure setON; inline;
- procedure setSIDL; inline;
- property OC32 : TBits_1 read getOC32 write setOC32;
- property OCFLT : TBits_1 read getOCFLT write setOCFLT;
- property OCM : TBits_3 read getOCM write setOCM;
- property OCM0 : TBits_1 read getOCM0 write setOCM0;
- property OCM1 : TBits_1 read getOCM1 write setOCM1;
- property OCM2 : TBits_1 read getOCM2 write setOCM2;
- property OCSIDL : TBits_1 read getOCSIDL write setOCSIDL;
- property OCTSEL : TBits_1 read getOCTSEL write setOCTSEL;
- property ON : TBits_1 read getON write setON;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property w : TBits_32 read getw write setw;
- end;
- type
- TOCMP3Registers = record
- OC3CONbits : TOCMP3_OC3CON;
- OC3CON : longWord;
- OC3CONCLR : longWord;
- OC3CONSET : longWord;
- OC3CONINV : longWord;
- OC3R : longWord;
- OC3RCLR : longWord;
- OC3RSET : longWord;
- OC3RINV : longWord;
- OC3RS : longWord;
- OC3RSCLR : longWord;
- OC3RSSET : longWord;
- OC3RSINV : longWord;
- end;
- TOCMP4_OC4CON = record
- private
- function getOC32 : TBits_1; inline;
- function getOCFLT : TBits_1; inline;
- function getOCM : TBits_3; inline;
- function getOCM0 : TBits_1; inline;
- function getOCM1 : TBits_1; inline;
- function getOCM2 : TBits_1; inline;
- function getOCSIDL : TBits_1; inline;
- function getOCTSEL : TBits_1; inline;
- function getON : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setOC32(thebits : TBits_1); inline;
- procedure setOCFLT(thebits : TBits_1); inline;
- procedure setOCM(thebits : TBits_3); inline;
- procedure setOCM0(thebits : TBits_1); inline;
- procedure setOCM1(thebits : TBits_1); inline;
- procedure setOCM2(thebits : TBits_1); inline;
- procedure setOCSIDL(thebits : TBits_1); inline;
- procedure setOCTSEL(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearOC32; inline;
- procedure clearOCFLT; inline;
- procedure clearOCM0; inline;
- procedure clearOCM1; inline;
- procedure clearOCM2; inline;
- procedure clearOCSIDL; inline;
- procedure clearOCTSEL; inline;
- procedure clearON; inline;
- procedure clearSIDL; inline;
- procedure setOC32; inline;
- procedure setOCFLT; inline;
- procedure setOCM0; inline;
- procedure setOCM1; inline;
- procedure setOCM2; inline;
- procedure setOCSIDL; inline;
- procedure setOCTSEL; inline;
- procedure setON; inline;
- procedure setSIDL; inline;
- property OC32 : TBits_1 read getOC32 write setOC32;
- property OCFLT : TBits_1 read getOCFLT write setOCFLT;
- property OCM : TBits_3 read getOCM write setOCM;
- property OCM0 : TBits_1 read getOCM0 write setOCM0;
- property OCM1 : TBits_1 read getOCM1 write setOCM1;
- property OCM2 : TBits_1 read getOCM2 write setOCM2;
- property OCSIDL : TBits_1 read getOCSIDL write setOCSIDL;
- property OCTSEL : TBits_1 read getOCTSEL write setOCTSEL;
- property ON : TBits_1 read getON write setON;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property w : TBits_32 read getw write setw;
- end;
- type
- TOCMP4Registers = record
- OC4CONbits : TOCMP4_OC4CON;
- OC4CON : longWord;
- OC4CONCLR : longWord;
- OC4CONSET : longWord;
- OC4CONINV : longWord;
- OC4R : longWord;
- OC4RCLR : longWord;
- OC4RSET : longWord;
- OC4RINV : longWord;
- OC4RS : longWord;
- OC4RSCLR : longWord;
- OC4RSSET : longWord;
- OC4RSINV : longWord;
- end;
- TOCMP5_OC5CON = record
- private
- function getOC32 : TBits_1; inline;
- function getOCFLT : TBits_1; inline;
- function getOCM : TBits_3; inline;
- function getOCM0 : TBits_1; inline;
- function getOCM1 : TBits_1; inline;
- function getOCM2 : TBits_1; inline;
- function getOCSIDL : TBits_1; inline;
- function getOCTSEL : TBits_1; inline;
- function getON : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setOC32(thebits : TBits_1); inline;
- procedure setOCFLT(thebits : TBits_1); inline;
- procedure setOCM(thebits : TBits_3); inline;
- procedure setOCM0(thebits : TBits_1); inline;
- procedure setOCM1(thebits : TBits_1); inline;
- procedure setOCM2(thebits : TBits_1); inline;
- procedure setOCSIDL(thebits : TBits_1); inline;
- procedure setOCTSEL(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearOC32; inline;
- procedure clearOCFLT; inline;
- procedure clearOCM0; inline;
- procedure clearOCM1; inline;
- procedure clearOCM2; inline;
- procedure clearOCSIDL; inline;
- procedure clearOCTSEL; inline;
- procedure clearON; inline;
- procedure clearSIDL; inline;
- procedure setOC32; inline;
- procedure setOCFLT; inline;
- procedure setOCM0; inline;
- procedure setOCM1; inline;
- procedure setOCM2; inline;
- procedure setOCSIDL; inline;
- procedure setOCTSEL; inline;
- procedure setON; inline;
- procedure setSIDL; inline;
- property OC32 : TBits_1 read getOC32 write setOC32;
- property OCFLT : TBits_1 read getOCFLT write setOCFLT;
- property OCM : TBits_3 read getOCM write setOCM;
- property OCM0 : TBits_1 read getOCM0 write setOCM0;
- property OCM1 : TBits_1 read getOCM1 write setOCM1;
- property OCM2 : TBits_1 read getOCM2 write setOCM2;
- property OCSIDL : TBits_1 read getOCSIDL write setOCSIDL;
- property OCTSEL : TBits_1 read getOCTSEL write setOCTSEL;
- property ON : TBits_1 read getON write setON;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property w : TBits_32 read getw write setw;
- end;
- type
- TOCMP5Registers = record
- OC5CONbits : TOCMP5_OC5CON;
- OC5CON : longWord;
- OC5CONCLR : longWord;
- OC5CONSET : longWord;
- OC5CONINV : longWord;
- OC5R : longWord;
- OC5RCLR : longWord;
- OC5RSET : longWord;
- OC5RINV : longWord;
- OC5RS : longWord;
- OC5RSCLR : longWord;
- OC5RSSET : longWord;
- OC5RSINV : longWord;
- end;
- TI2C3_I2C1ACON = record
- private
- function getA10M : TBits_1; inline;
- function getACKDT : TBits_1; inline;
- function getACKEN : TBits_1; inline;
- function getDISSLW : TBits_1; inline;
- function getGCEN : TBits_1; inline;
- function getI2CEN : TBits_1; inline;
- function getI2CSIDL : TBits_1; inline;
- function getIPMIEN : TBits_1; inline;
- function getON : TBits_1; inline;
- function getPEN : TBits_1; inline;
- function getRCEN : TBits_1; inline;
- function getRSEN : TBits_1; inline;
- function getSCLREL : TBits_1; inline;
- function getSEN : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getSMEN : TBits_1; inline;
- function getSTREN : TBits_1; inline;
- function getSTRICT : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setA10M(thebits : TBits_1); inline;
- procedure setACKDT(thebits : TBits_1); inline;
- procedure setACKEN(thebits : TBits_1); inline;
- procedure setDISSLW(thebits : TBits_1); inline;
- procedure setGCEN(thebits : TBits_1); inline;
- procedure setI2CEN(thebits : TBits_1); inline;
- procedure setI2CSIDL(thebits : TBits_1); inline;
- procedure setIPMIEN(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setPEN(thebits : TBits_1); inline;
- procedure setRCEN(thebits : TBits_1); inline;
- procedure setRSEN(thebits : TBits_1); inline;
- procedure setSCLREL(thebits : TBits_1); inline;
- procedure setSEN(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setSMEN(thebits : TBits_1); inline;
- procedure setSTREN(thebits : TBits_1); inline;
- procedure setSTRICT(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearA10M; inline;
- procedure clearACKDT; inline;
- procedure clearACKEN; inline;
- procedure clearDISSLW; inline;
- procedure clearGCEN; inline;
- procedure clearI2CEN; inline;
- procedure clearI2CSIDL; inline;
- procedure clearIPMIEN; inline;
- procedure clearON; inline;
- procedure clearPEN; inline;
- procedure clearRCEN; inline;
- procedure clearRSEN; inline;
- procedure clearSCLREL; inline;
- procedure clearSEN; inline;
- procedure clearSIDL; inline;
- procedure clearSMEN; inline;
- procedure clearSTREN; inline;
- procedure clearSTRICT; inline;
- procedure setA10M; inline;
- procedure setACKDT; inline;
- procedure setACKEN; inline;
- procedure setDISSLW; inline;
- procedure setGCEN; inline;
- procedure setI2CEN; inline;
- procedure setI2CSIDL; inline;
- procedure setIPMIEN; inline;
- procedure setON; inline;
- procedure setPEN; inline;
- procedure setRCEN; inline;
- procedure setRSEN; inline;
- procedure setSCLREL; inline;
- procedure setSEN; inline;
- procedure setSIDL; inline;
- procedure setSMEN; inline;
- procedure setSTREN; inline;
- procedure setSTRICT; inline;
- property A10M : TBits_1 read getA10M write setA10M;
- property ACKDT : TBits_1 read getACKDT write setACKDT;
- property ACKEN : TBits_1 read getACKEN write setACKEN;
- property DISSLW : TBits_1 read getDISSLW write setDISSLW;
- property GCEN : TBits_1 read getGCEN write setGCEN;
- property I2CEN : TBits_1 read getI2CEN write setI2CEN;
- property I2CSIDL : TBits_1 read getI2CSIDL write setI2CSIDL;
- property IPMIEN : TBits_1 read getIPMIEN write setIPMIEN;
- property ON : TBits_1 read getON write setON;
- property PEN : TBits_1 read getPEN write setPEN;
- property RCEN : TBits_1 read getRCEN write setRCEN;
- property RSEN : TBits_1 read getRSEN write setRSEN;
- property SCLREL : TBits_1 read getSCLREL write setSCLREL;
- property SEN : TBits_1 read getSEN write setSEN;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property SMEN : TBits_1 read getSMEN write setSMEN;
- property STREN : TBits_1 read getSTREN write setSTREN;
- property STRICT : TBits_1 read getSTRICT write setSTRICT;
- property w : TBits_32 read getw write setw;
- end;
- TI2C3_I2C3CON = record
- private
- function getA10M : TBits_1; inline;
- function getACKDT : TBits_1; inline;
- function getACKEN : TBits_1; inline;
- function getDISSLW : TBits_1; inline;
- function getGCEN : TBits_1; inline;
- function getI2CEN : TBits_1; inline;
- function getI2CSIDL : TBits_1; inline;
- function getIPMIEN : TBits_1; inline;
- function getON : TBits_1; inline;
- function getPEN : TBits_1; inline;
- function getRCEN : TBits_1; inline;
- function getRSEN : TBits_1; inline;
- function getSCLREL : TBits_1; inline;
- function getSEN : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getSMEN : TBits_1; inline;
- function getSTREN : TBits_1; inline;
- function getSTRICT : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setA10M(thebits : TBits_1); inline;
- procedure setACKDT(thebits : TBits_1); inline;
- procedure setACKEN(thebits : TBits_1); inline;
- procedure setDISSLW(thebits : TBits_1); inline;
- procedure setGCEN(thebits : TBits_1); inline;
- procedure setI2CEN(thebits : TBits_1); inline;
- procedure setI2CSIDL(thebits : TBits_1); inline;
- procedure setIPMIEN(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setPEN(thebits : TBits_1); inline;
- procedure setRCEN(thebits : TBits_1); inline;
- procedure setRSEN(thebits : TBits_1); inline;
- procedure setSCLREL(thebits : TBits_1); inline;
- procedure setSEN(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setSMEN(thebits : TBits_1); inline;
- procedure setSTREN(thebits : TBits_1); inline;
- procedure setSTRICT(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearA10M; inline;
- procedure clearACKDT; inline;
- procedure clearACKEN; inline;
- procedure clearDISSLW; inline;
- procedure clearGCEN; inline;
- procedure clearI2CEN; inline;
- procedure clearI2CSIDL; inline;
- procedure clearIPMIEN; inline;
- procedure clearON; inline;
- procedure clearPEN; inline;
- procedure clearRCEN; inline;
- procedure clearRSEN; inline;
- procedure clearSCLREL; inline;
- procedure clearSEN; inline;
- procedure clearSIDL; inline;
- procedure clearSMEN; inline;
- procedure clearSTREN; inline;
- procedure clearSTRICT; inline;
- procedure setA10M; inline;
- procedure setACKDT; inline;
- procedure setACKEN; inline;
- procedure setDISSLW; inline;
- procedure setGCEN; inline;
- procedure setI2CEN; inline;
- procedure setI2CSIDL; inline;
- procedure setIPMIEN; inline;
- procedure setON; inline;
- procedure setPEN; inline;
- procedure setRCEN; inline;
- procedure setRSEN; inline;
- procedure setSCLREL; inline;
- procedure setSEN; inline;
- procedure setSIDL; inline;
- procedure setSMEN; inline;
- procedure setSTREN; inline;
- procedure setSTRICT; inline;
- property A10M : TBits_1 read getA10M write setA10M;
- property ACKDT : TBits_1 read getACKDT write setACKDT;
- property ACKEN : TBits_1 read getACKEN write setACKEN;
- property DISSLW : TBits_1 read getDISSLW write setDISSLW;
- property GCEN : TBits_1 read getGCEN write setGCEN;
- property I2CEN : TBits_1 read getI2CEN write setI2CEN;
- property I2CSIDL : TBits_1 read getI2CSIDL write setI2CSIDL;
- property IPMIEN : TBits_1 read getIPMIEN write setIPMIEN;
- property ON : TBits_1 read getON write setON;
- property PEN : TBits_1 read getPEN write setPEN;
- property RCEN : TBits_1 read getRCEN write setRCEN;
- property RSEN : TBits_1 read getRSEN write setRSEN;
- property SCLREL : TBits_1 read getSCLREL write setSCLREL;
- property SEN : TBits_1 read getSEN write setSEN;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property SMEN : TBits_1 read getSMEN write setSMEN;
- property STREN : TBits_1 read getSTREN write setSTREN;
- property STRICT : TBits_1 read getSTRICT write setSTRICT;
- property w : TBits_32 read getw write setw;
- end;
- TI2C3_I2C1ASTAT = record
- private
- function getACKSTAT : TBits_1; inline;
- function getADD10 : TBits_1; inline;
- function getBCL : TBits_1; inline;
- function getD_A : TBits_1; inline;
- function getGCSTAT : TBits_1; inline;
- function getI2COV : TBits_1; inline;
- function getI2CPOV : TBits_1; inline;
- function getIWCOL : TBits_1; inline;
- function getP : TBits_1; inline;
- function getRBF : TBits_1; inline;
- function getR_W : TBits_1; inline;
- function getS : TBits_1; inline;
- function getTBF : TBits_1; inline;
- function getTRSTAT : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setACKSTAT(thebits : TBits_1); inline;
- procedure setADD10(thebits : TBits_1); inline;
- procedure setBCL(thebits : TBits_1); inline;
- procedure setD_A(thebits : TBits_1); inline;
- procedure setGCSTAT(thebits : TBits_1); inline;
- procedure setI2COV(thebits : TBits_1); inline;
- procedure setI2CPOV(thebits : TBits_1); inline;
- procedure setIWCOL(thebits : TBits_1); inline;
- procedure setP(thebits : TBits_1); inline;
- procedure setRBF(thebits : TBits_1); inline;
- procedure setR_W(thebits : TBits_1); inline;
- procedure setS(thebits : TBits_1); inline;
- procedure setTBF(thebits : TBits_1); inline;
- procedure setTRSTAT(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearACKSTAT; inline;
- procedure clearADD10; inline;
- procedure clearBCL; inline;
- procedure clearD_A; inline;
- procedure clearGCSTAT; inline;
- procedure clearI2COV; inline;
- procedure clearI2CPOV; inline;
- procedure clearIWCOL; inline;
- procedure clearP; inline;
- procedure clearRBF; inline;
- procedure clearR_W; inline;
- procedure clearS; inline;
- procedure clearTBF; inline;
- procedure clearTRSTAT; inline;
- procedure setACKSTAT; inline;
- procedure setADD10; inline;
- procedure setBCL; inline;
- procedure setD_A; inline;
- procedure setGCSTAT; inline;
- procedure setI2COV; inline;
- procedure setI2CPOV; inline;
- procedure setIWCOL; inline;
- procedure setP; inline;
- procedure setRBF; inline;
- procedure setR_W; inline;
- procedure setS; inline;
- procedure setTBF; inline;
- procedure setTRSTAT; inline;
- property ACKSTAT : TBits_1 read getACKSTAT write setACKSTAT;
- property ADD10 : TBits_1 read getADD10 write setADD10;
- property BCL : TBits_1 read getBCL write setBCL;
- property D_A : TBits_1 read getD_A write setD_A;
- property GCSTAT : TBits_1 read getGCSTAT write setGCSTAT;
- property I2COV : TBits_1 read getI2COV write setI2COV;
- property I2CPOV : TBits_1 read getI2CPOV write setI2CPOV;
- property IWCOL : TBits_1 read getIWCOL write setIWCOL;
- property P : TBits_1 read getP write setP;
- property RBF : TBits_1 read getRBF write setRBF;
- property R_W : TBits_1 read getR_W write setR_W;
- property S : TBits_1 read getS write setS;
- property TBF : TBits_1 read getTBF write setTBF;
- property TRSTAT : TBits_1 read getTRSTAT write setTRSTAT;
- property w : TBits_32 read getw write setw;
- end;
- TI2C3_I2C3STAT = record
- private
- function getACKSTAT : TBits_1; inline;
- function getADD10 : TBits_1; inline;
- function getBCL : TBits_1; inline;
- function getD_A : TBits_1; inline;
- function getGCSTAT : TBits_1; inline;
- function getI2COV : TBits_1; inline;
- function getI2CPOV : TBits_1; inline;
- function getIWCOL : TBits_1; inline;
- function getP : TBits_1; inline;
- function getRBF : TBits_1; inline;
- function getR_W : TBits_1; inline;
- function getS : TBits_1; inline;
- function getTBF : TBits_1; inline;
- function getTRSTAT : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setACKSTAT(thebits : TBits_1); inline;
- procedure setADD10(thebits : TBits_1); inline;
- procedure setBCL(thebits : TBits_1); inline;
- procedure setD_A(thebits : TBits_1); inline;
- procedure setGCSTAT(thebits : TBits_1); inline;
- procedure setI2COV(thebits : TBits_1); inline;
- procedure setI2CPOV(thebits : TBits_1); inline;
- procedure setIWCOL(thebits : TBits_1); inline;
- procedure setP(thebits : TBits_1); inline;
- procedure setRBF(thebits : TBits_1); inline;
- procedure setR_W(thebits : TBits_1); inline;
- procedure setS(thebits : TBits_1); inline;
- procedure setTBF(thebits : TBits_1); inline;
- procedure setTRSTAT(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearACKSTAT; inline;
- procedure clearADD10; inline;
- procedure clearBCL; inline;
- procedure clearD_A; inline;
- procedure clearGCSTAT; inline;
- procedure clearI2COV; inline;
- procedure clearI2CPOV; inline;
- procedure clearIWCOL; inline;
- procedure clearP; inline;
- procedure clearRBF; inline;
- procedure clearR_W; inline;
- procedure clearS; inline;
- procedure clearTBF; inline;
- procedure clearTRSTAT; inline;
- procedure setACKSTAT; inline;
- procedure setADD10; inline;
- procedure setBCL; inline;
- procedure setD_A; inline;
- procedure setGCSTAT; inline;
- procedure setI2COV; inline;
- procedure setI2CPOV; inline;
- procedure setIWCOL; inline;
- procedure setP; inline;
- procedure setRBF; inline;
- procedure setR_W; inline;
- procedure setS; inline;
- procedure setTBF; inline;
- procedure setTRSTAT; inline;
- property ACKSTAT : TBits_1 read getACKSTAT write setACKSTAT;
- property ADD10 : TBits_1 read getADD10 write setADD10;
- property BCL : TBits_1 read getBCL write setBCL;
- property D_A : TBits_1 read getD_A write setD_A;
- property GCSTAT : TBits_1 read getGCSTAT write setGCSTAT;
- property I2COV : TBits_1 read getI2COV write setI2COV;
- property I2CPOV : TBits_1 read getI2CPOV write setI2CPOV;
- property IWCOL : TBits_1 read getIWCOL write setIWCOL;
- property P : TBits_1 read getP write setP;
- property RBF : TBits_1 read getRBF write setRBF;
- property R_W : TBits_1 read getR_W write setR_W;
- property S : TBits_1 read getS write setS;
- property TBF : TBits_1 read getTBF write setTBF;
- property TRSTAT : TBits_1 read getTRSTAT write setTRSTAT;
- property w : TBits_32 read getw write setw;
- end;
- type
- TI2C3Registers = record
- I2C1ACONbits : TI2C3_I2C1ACON;
- I2C1ACON : longWord;
- I2C3CONbits : TI2C3_I2C3CON;
- I2C3CON : longWord;
- I2C1ACONCLR : longWord;
- I2C3CONCLR : longWord;
- I2C1ACONSET : longWord;
- I2C3CONSET : longWord;
- I2C1ACONINV : longWord;
- I2C3CONINV : longWord;
- I2C1ASTATbits : TI2C3_I2C1ASTAT;
- I2C1ASTAT : longWord;
- I2C3STATbits : TI2C3_I2C3STAT;
- I2C3STAT : longWord;
- I2C1ASTATCLR : longWord;
- I2C3STATCLR : longWord;
- I2C1ASTATSET : longWord;
- I2C3STATSET : longWord;
- I2C1ASTATINV : longWord;
- I2C3STATINV : longWord;
- I2C1AADD : longWord;
- I2C3ADD : longWord;
- I2C1AADDCLR : longWord;
- I2C3ADDCLR : longWord;
- I2C1AADDSET : longWord;
- I2C3ADDSET : longWord;
- I2C1AADDINV : longWord;
- I2C3ADDINV : longWord;
- I2C1AMSK : longWord;
- I2C3MSK : longWord;
- I2C1AMSKCLR : longWord;
- I2C3MSKCLR : longWord;
- I2C1AMSKSET : longWord;
- I2C3MSKSET : longWord;
- I2C1AMSKINV : longWord;
- I2C3MSKINV : longWord;
- I2C1ABRG : longWord;
- I2C3BRG : longWord;
- I2C1ABRGCLR : longWord;
- I2C3BRGCLR : longWord;
- I2C1ABRGSET : longWord;
- I2C3BRGSET : longWord;
- I2C1ABRGINV : longWord;
- I2C3BRGINV : longWord;
- I2C1ATRN : longWord;
- I2C3TRN : longWord;
- I2C1ATRNCLR : longWord;
- I2C3TRNCLR : longWord;
- I2C1ATRNSET : longWord;
- I2C3TRNSET : longWord;
- I2C1ATRNINV : longWord;
- I2C3TRNINV : longWord;
- I2C1ARCV : longWord;
- I2C3RCV : longWord;
- end;
- TI2C4_I2C2ACON = record
- private
- function getA10M : TBits_1; inline;
- function getACKDT : TBits_1; inline;
- function getACKEN : TBits_1; inline;
- function getDISSLW : TBits_1; inline;
- function getGCEN : TBits_1; inline;
- function getI2CEN : TBits_1; inline;
- function getI2CSIDL : TBits_1; inline;
- function getIPMIEN : TBits_1; inline;
- function getON : TBits_1; inline;
- function getPEN : TBits_1; inline;
- function getRCEN : TBits_1; inline;
- function getRSEN : TBits_1; inline;
- function getSCLREL : TBits_1; inline;
- function getSEN : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getSMEN : TBits_1; inline;
- function getSTREN : TBits_1; inline;
- function getSTRICT : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setA10M(thebits : TBits_1); inline;
- procedure setACKDT(thebits : TBits_1); inline;
- procedure setACKEN(thebits : TBits_1); inline;
- procedure setDISSLW(thebits : TBits_1); inline;
- procedure setGCEN(thebits : TBits_1); inline;
- procedure setI2CEN(thebits : TBits_1); inline;
- procedure setI2CSIDL(thebits : TBits_1); inline;
- procedure setIPMIEN(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setPEN(thebits : TBits_1); inline;
- procedure setRCEN(thebits : TBits_1); inline;
- procedure setRSEN(thebits : TBits_1); inline;
- procedure setSCLREL(thebits : TBits_1); inline;
- procedure setSEN(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setSMEN(thebits : TBits_1); inline;
- procedure setSTREN(thebits : TBits_1); inline;
- procedure setSTRICT(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearA10M; inline;
- procedure clearACKDT; inline;
- procedure clearACKEN; inline;
- procedure clearDISSLW; inline;
- procedure clearGCEN; inline;
- procedure clearI2CEN; inline;
- procedure clearI2CSIDL; inline;
- procedure clearIPMIEN; inline;
- procedure clearON; inline;
- procedure clearPEN; inline;
- procedure clearRCEN; inline;
- procedure clearRSEN; inline;
- procedure clearSCLREL; inline;
- procedure clearSEN; inline;
- procedure clearSIDL; inline;
- procedure clearSMEN; inline;
- procedure clearSTREN; inline;
- procedure clearSTRICT; inline;
- procedure setA10M; inline;
- procedure setACKDT; inline;
- procedure setACKEN; inline;
- procedure setDISSLW; inline;
- procedure setGCEN; inline;
- procedure setI2CEN; inline;
- procedure setI2CSIDL; inline;
- procedure setIPMIEN; inline;
- procedure setON; inline;
- procedure setPEN; inline;
- procedure setRCEN; inline;
- procedure setRSEN; inline;
- procedure setSCLREL; inline;
- procedure setSEN; inline;
- procedure setSIDL; inline;
- procedure setSMEN; inline;
- procedure setSTREN; inline;
- procedure setSTRICT; inline;
- property A10M : TBits_1 read getA10M write setA10M;
- property ACKDT : TBits_1 read getACKDT write setACKDT;
- property ACKEN : TBits_1 read getACKEN write setACKEN;
- property DISSLW : TBits_1 read getDISSLW write setDISSLW;
- property GCEN : TBits_1 read getGCEN write setGCEN;
- property I2CEN : TBits_1 read getI2CEN write setI2CEN;
- property I2CSIDL : TBits_1 read getI2CSIDL write setI2CSIDL;
- property IPMIEN : TBits_1 read getIPMIEN write setIPMIEN;
- property ON : TBits_1 read getON write setON;
- property PEN : TBits_1 read getPEN write setPEN;
- property RCEN : TBits_1 read getRCEN write setRCEN;
- property RSEN : TBits_1 read getRSEN write setRSEN;
- property SCLREL : TBits_1 read getSCLREL write setSCLREL;
- property SEN : TBits_1 read getSEN write setSEN;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property SMEN : TBits_1 read getSMEN write setSMEN;
- property STREN : TBits_1 read getSTREN write setSTREN;
- property STRICT : TBits_1 read getSTRICT write setSTRICT;
- property w : TBits_32 read getw write setw;
- end;
- TI2C4_I2C4CON = record
- private
- function getA10M : TBits_1; inline;
- function getACKDT : TBits_1; inline;
- function getACKEN : TBits_1; inline;
- function getDISSLW : TBits_1; inline;
- function getGCEN : TBits_1; inline;
- function getI2CEN : TBits_1; inline;
- function getI2CSIDL : TBits_1; inline;
- function getIPMIEN : TBits_1; inline;
- function getON : TBits_1; inline;
- function getPEN : TBits_1; inline;
- function getRCEN : TBits_1; inline;
- function getRSEN : TBits_1; inline;
- function getSCLREL : TBits_1; inline;
- function getSEN : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getSMEN : TBits_1; inline;
- function getSTREN : TBits_1; inline;
- function getSTRICT : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setA10M(thebits : TBits_1); inline;
- procedure setACKDT(thebits : TBits_1); inline;
- procedure setACKEN(thebits : TBits_1); inline;
- procedure setDISSLW(thebits : TBits_1); inline;
- procedure setGCEN(thebits : TBits_1); inline;
- procedure setI2CEN(thebits : TBits_1); inline;
- procedure setI2CSIDL(thebits : TBits_1); inline;
- procedure setIPMIEN(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setPEN(thebits : TBits_1); inline;
- procedure setRCEN(thebits : TBits_1); inline;
- procedure setRSEN(thebits : TBits_1); inline;
- procedure setSCLREL(thebits : TBits_1); inline;
- procedure setSEN(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setSMEN(thebits : TBits_1); inline;
- procedure setSTREN(thebits : TBits_1); inline;
- procedure setSTRICT(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearA10M; inline;
- procedure clearACKDT; inline;
- procedure clearACKEN; inline;
- procedure clearDISSLW; inline;
- procedure clearGCEN; inline;
- procedure clearI2CEN; inline;
- procedure clearI2CSIDL; inline;
- procedure clearIPMIEN; inline;
- procedure clearON; inline;
- procedure clearPEN; inline;
- procedure clearRCEN; inline;
- procedure clearRSEN; inline;
- procedure clearSCLREL; inline;
- procedure clearSEN; inline;
- procedure clearSIDL; inline;
- procedure clearSMEN; inline;
- procedure clearSTREN; inline;
- procedure clearSTRICT; inline;
- procedure setA10M; inline;
- procedure setACKDT; inline;
- procedure setACKEN; inline;
- procedure setDISSLW; inline;
- procedure setGCEN; inline;
- procedure setI2CEN; inline;
- procedure setI2CSIDL; inline;
- procedure setIPMIEN; inline;
- procedure setON; inline;
- procedure setPEN; inline;
- procedure setRCEN; inline;
- procedure setRSEN; inline;
- procedure setSCLREL; inline;
- procedure setSEN; inline;
- procedure setSIDL; inline;
- procedure setSMEN; inline;
- procedure setSTREN; inline;
- procedure setSTRICT; inline;
- property A10M : TBits_1 read getA10M write setA10M;
- property ACKDT : TBits_1 read getACKDT write setACKDT;
- property ACKEN : TBits_1 read getACKEN write setACKEN;
- property DISSLW : TBits_1 read getDISSLW write setDISSLW;
- property GCEN : TBits_1 read getGCEN write setGCEN;
- property I2CEN : TBits_1 read getI2CEN write setI2CEN;
- property I2CSIDL : TBits_1 read getI2CSIDL write setI2CSIDL;
- property IPMIEN : TBits_1 read getIPMIEN write setIPMIEN;
- property ON : TBits_1 read getON write setON;
- property PEN : TBits_1 read getPEN write setPEN;
- property RCEN : TBits_1 read getRCEN write setRCEN;
- property RSEN : TBits_1 read getRSEN write setRSEN;
- property SCLREL : TBits_1 read getSCLREL write setSCLREL;
- property SEN : TBits_1 read getSEN write setSEN;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property SMEN : TBits_1 read getSMEN write setSMEN;
- property STREN : TBits_1 read getSTREN write setSTREN;
- property STRICT : TBits_1 read getSTRICT write setSTRICT;
- property w : TBits_32 read getw write setw;
- end;
- TI2C4_I2C2ASTAT = record
- private
- function getACKSTAT : TBits_1; inline;
- function getADD10 : TBits_1; inline;
- function getBCL : TBits_1; inline;
- function getD_A : TBits_1; inline;
- function getGCSTAT : TBits_1; inline;
- function getI2COV : TBits_1; inline;
- function getI2CPOV : TBits_1; inline;
- function getIWCOL : TBits_1; inline;
- function getP : TBits_1; inline;
- function getRBF : TBits_1; inline;
- function getR_W : TBits_1; inline;
- function getS : TBits_1; inline;
- function getTBF : TBits_1; inline;
- function getTRSTAT : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setACKSTAT(thebits : TBits_1); inline;
- procedure setADD10(thebits : TBits_1); inline;
- procedure setBCL(thebits : TBits_1); inline;
- procedure setD_A(thebits : TBits_1); inline;
- procedure setGCSTAT(thebits : TBits_1); inline;
- procedure setI2COV(thebits : TBits_1); inline;
- procedure setI2CPOV(thebits : TBits_1); inline;
- procedure setIWCOL(thebits : TBits_1); inline;
- procedure setP(thebits : TBits_1); inline;
- procedure setRBF(thebits : TBits_1); inline;
- procedure setR_W(thebits : TBits_1); inline;
- procedure setS(thebits : TBits_1); inline;
- procedure setTBF(thebits : TBits_1); inline;
- procedure setTRSTAT(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearACKSTAT; inline;
- procedure clearADD10; inline;
- procedure clearBCL; inline;
- procedure clearD_A; inline;
- procedure clearGCSTAT; inline;
- procedure clearI2COV; inline;
- procedure clearI2CPOV; inline;
- procedure clearIWCOL; inline;
- procedure clearP; inline;
- procedure clearRBF; inline;
- procedure clearR_W; inline;
- procedure clearS; inline;
- procedure clearTBF; inline;
- procedure clearTRSTAT; inline;
- procedure setACKSTAT; inline;
- procedure setADD10; inline;
- procedure setBCL; inline;
- procedure setD_A; inline;
- procedure setGCSTAT; inline;
- procedure setI2COV; inline;
- procedure setI2CPOV; inline;
- procedure setIWCOL; inline;
- procedure setP; inline;
- procedure setRBF; inline;
- procedure setR_W; inline;
- procedure setS; inline;
- procedure setTBF; inline;
- procedure setTRSTAT; inline;
- property ACKSTAT : TBits_1 read getACKSTAT write setACKSTAT;
- property ADD10 : TBits_1 read getADD10 write setADD10;
- property BCL : TBits_1 read getBCL write setBCL;
- property D_A : TBits_1 read getD_A write setD_A;
- property GCSTAT : TBits_1 read getGCSTAT write setGCSTAT;
- property I2COV : TBits_1 read getI2COV write setI2COV;
- property I2CPOV : TBits_1 read getI2CPOV write setI2CPOV;
- property IWCOL : TBits_1 read getIWCOL write setIWCOL;
- property P : TBits_1 read getP write setP;
- property RBF : TBits_1 read getRBF write setRBF;
- property R_W : TBits_1 read getR_W write setR_W;
- property S : TBits_1 read getS write setS;
- property TBF : TBits_1 read getTBF write setTBF;
- property TRSTAT : TBits_1 read getTRSTAT write setTRSTAT;
- property w : TBits_32 read getw write setw;
- end;
- TI2C4_I2C4STAT = record
- private
- function getACKSTAT : TBits_1; inline;
- function getADD10 : TBits_1; inline;
- function getBCL : TBits_1; inline;
- function getD_A : TBits_1; inline;
- function getGCSTAT : TBits_1; inline;
- function getI2COV : TBits_1; inline;
- function getI2CPOV : TBits_1; inline;
- function getIWCOL : TBits_1; inline;
- function getP : TBits_1; inline;
- function getRBF : TBits_1; inline;
- function getR_W : TBits_1; inline;
- function getS : TBits_1; inline;
- function getTBF : TBits_1; inline;
- function getTRSTAT : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setACKSTAT(thebits : TBits_1); inline;
- procedure setADD10(thebits : TBits_1); inline;
- procedure setBCL(thebits : TBits_1); inline;
- procedure setD_A(thebits : TBits_1); inline;
- procedure setGCSTAT(thebits : TBits_1); inline;
- procedure setI2COV(thebits : TBits_1); inline;
- procedure setI2CPOV(thebits : TBits_1); inline;
- procedure setIWCOL(thebits : TBits_1); inline;
- procedure setP(thebits : TBits_1); inline;
- procedure setRBF(thebits : TBits_1); inline;
- procedure setR_W(thebits : TBits_1); inline;
- procedure setS(thebits : TBits_1); inline;
- procedure setTBF(thebits : TBits_1); inline;
- procedure setTRSTAT(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearACKSTAT; inline;
- procedure clearADD10; inline;
- procedure clearBCL; inline;
- procedure clearD_A; inline;
- procedure clearGCSTAT; inline;
- procedure clearI2COV; inline;
- procedure clearI2CPOV; inline;
- procedure clearIWCOL; inline;
- procedure clearP; inline;
- procedure clearRBF; inline;
- procedure clearR_W; inline;
- procedure clearS; inline;
- procedure clearTBF; inline;
- procedure clearTRSTAT; inline;
- procedure setACKSTAT; inline;
- procedure setADD10; inline;
- procedure setBCL; inline;
- procedure setD_A; inline;
- procedure setGCSTAT; inline;
- procedure setI2COV; inline;
- procedure setI2CPOV; inline;
- procedure setIWCOL; inline;
- procedure setP; inline;
- procedure setRBF; inline;
- procedure setR_W; inline;
- procedure setS; inline;
- procedure setTBF; inline;
- procedure setTRSTAT; inline;
- property ACKSTAT : TBits_1 read getACKSTAT write setACKSTAT;
- property ADD10 : TBits_1 read getADD10 write setADD10;
- property BCL : TBits_1 read getBCL write setBCL;
- property D_A : TBits_1 read getD_A write setD_A;
- property GCSTAT : TBits_1 read getGCSTAT write setGCSTAT;
- property I2COV : TBits_1 read getI2COV write setI2COV;
- property I2CPOV : TBits_1 read getI2CPOV write setI2CPOV;
- property IWCOL : TBits_1 read getIWCOL write setIWCOL;
- property P : TBits_1 read getP write setP;
- property RBF : TBits_1 read getRBF write setRBF;
- property R_W : TBits_1 read getR_W write setR_W;
- property S : TBits_1 read getS write setS;
- property TBF : TBits_1 read getTBF write setTBF;
- property TRSTAT : TBits_1 read getTRSTAT write setTRSTAT;
- property w : TBits_32 read getw write setw;
- end;
- type
- TI2C4Registers = record
- I2C2ACONbits : TI2C4_I2C2ACON;
- I2C2ACON : longWord;
- I2C4CONbits : TI2C4_I2C4CON;
- I2C4CON : longWord;
- I2C2ACONCLR : longWord;
- I2C4CONCLR : longWord;
- I2C2ACONSET : longWord;
- I2C4CONSET : longWord;
- I2C2ACONINV : longWord;
- I2C4CONINV : longWord;
- I2C2ASTATbits : TI2C4_I2C2ASTAT;
- I2C2ASTAT : longWord;
- I2C4STATbits : TI2C4_I2C4STAT;
- I2C4STAT : longWord;
- I2C2ASTATCLR : longWord;
- I2C4STATCLR : longWord;
- I2C2ASTATSET : longWord;
- I2C4STATSET : longWord;
- I2C2ASTATINV : longWord;
- I2C4STATINV : longWord;
- I2C2AADD : longWord;
- I2C4ADD : longWord;
- I2C2AADDCLR : longWord;
- I2C4ADDCLR : longWord;
- I2C2AADDSET : longWord;
- I2C4ADDSET : longWord;
- I2C2AADDINV : longWord;
- I2C4ADDINV : longWord;
- I2C2AMSK : longWord;
- I2C4MSK : longWord;
- I2C2AMSKCLR : longWord;
- I2C4MSKCLR : longWord;
- I2C2AMSKSET : longWord;
- I2C4MSKSET : longWord;
- I2C2AMSKINV : longWord;
- I2C4MSKINV : longWord;
- I2C2ABRG : longWord;
- I2C4BRG : longWord;
- I2C2ABRGCLR : longWord;
- I2C4BRGCLR : longWord;
- I2C2ABRGSET : longWord;
- I2C4BRGSET : longWord;
- I2C2ABRGINV : longWord;
- I2C4BRGINV : longWord;
- I2C2ATRN : longWord;
- I2C4TRN : longWord;
- I2C2ATRNCLR : longWord;
- I2C4TRNCLR : longWord;
- I2C2ATRNSET : longWord;
- I2C4TRNSET : longWord;
- I2C2ATRNINV : longWord;
- I2C4TRNINV : longWord;
- I2C2ARCV : longWord;
- I2C4RCV : longWord;
- end;
- TI2C5_I2C3ACON = record
- private
- function getA10M : TBits_1; inline;
- function getACKDT : TBits_1; inline;
- function getACKEN : TBits_1; inline;
- function getDISSLW : TBits_1; inline;
- function getGCEN : TBits_1; inline;
- function getI2CEN : TBits_1; inline;
- function getI2CSIDL : TBits_1; inline;
- function getIPMIEN : TBits_1; inline;
- function getON : TBits_1; inline;
- function getPEN : TBits_1; inline;
- function getRCEN : TBits_1; inline;
- function getRSEN : TBits_1; inline;
- function getSCLREL : TBits_1; inline;
- function getSEN : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getSMEN : TBits_1; inline;
- function getSTREN : TBits_1; inline;
- function getSTRICT : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setA10M(thebits : TBits_1); inline;
- procedure setACKDT(thebits : TBits_1); inline;
- procedure setACKEN(thebits : TBits_1); inline;
- procedure setDISSLW(thebits : TBits_1); inline;
- procedure setGCEN(thebits : TBits_1); inline;
- procedure setI2CEN(thebits : TBits_1); inline;
- procedure setI2CSIDL(thebits : TBits_1); inline;
- procedure setIPMIEN(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setPEN(thebits : TBits_1); inline;
- procedure setRCEN(thebits : TBits_1); inline;
- procedure setRSEN(thebits : TBits_1); inline;
- procedure setSCLREL(thebits : TBits_1); inline;
- procedure setSEN(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setSMEN(thebits : TBits_1); inline;
- procedure setSTREN(thebits : TBits_1); inline;
- procedure setSTRICT(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearA10M; inline;
- procedure clearACKDT; inline;
- procedure clearACKEN; inline;
- procedure clearDISSLW; inline;
- procedure clearGCEN; inline;
- procedure clearI2CEN; inline;
- procedure clearI2CSIDL; inline;
- procedure clearIPMIEN; inline;
- procedure clearON; inline;
- procedure clearPEN; inline;
- procedure clearRCEN; inline;
- procedure clearRSEN; inline;
- procedure clearSCLREL; inline;
- procedure clearSEN; inline;
- procedure clearSIDL; inline;
- procedure clearSMEN; inline;
- procedure clearSTREN; inline;
- procedure clearSTRICT; inline;
- procedure setA10M; inline;
- procedure setACKDT; inline;
- procedure setACKEN; inline;
- procedure setDISSLW; inline;
- procedure setGCEN; inline;
- procedure setI2CEN; inline;
- procedure setI2CSIDL; inline;
- procedure setIPMIEN; inline;
- procedure setON; inline;
- procedure setPEN; inline;
- procedure setRCEN; inline;
- procedure setRSEN; inline;
- procedure setSCLREL; inline;
- procedure setSEN; inline;
- procedure setSIDL; inline;
- procedure setSMEN; inline;
- procedure setSTREN; inline;
- procedure setSTRICT; inline;
- property A10M : TBits_1 read getA10M write setA10M;
- property ACKDT : TBits_1 read getACKDT write setACKDT;
- property ACKEN : TBits_1 read getACKEN write setACKEN;
- property DISSLW : TBits_1 read getDISSLW write setDISSLW;
- property GCEN : TBits_1 read getGCEN write setGCEN;
- property I2CEN : TBits_1 read getI2CEN write setI2CEN;
- property I2CSIDL : TBits_1 read getI2CSIDL write setI2CSIDL;
- property IPMIEN : TBits_1 read getIPMIEN write setIPMIEN;
- property ON : TBits_1 read getON write setON;
- property PEN : TBits_1 read getPEN write setPEN;
- property RCEN : TBits_1 read getRCEN write setRCEN;
- property RSEN : TBits_1 read getRSEN write setRSEN;
- property SCLREL : TBits_1 read getSCLREL write setSCLREL;
- property SEN : TBits_1 read getSEN write setSEN;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property SMEN : TBits_1 read getSMEN write setSMEN;
- property STREN : TBits_1 read getSTREN write setSTREN;
- property STRICT : TBits_1 read getSTRICT write setSTRICT;
- property w : TBits_32 read getw write setw;
- end;
- TI2C5_I2C5CON = record
- private
- function getA10M : TBits_1; inline;
- function getACKDT : TBits_1; inline;
- function getACKEN : TBits_1; inline;
- function getDISSLW : TBits_1; inline;
- function getGCEN : TBits_1; inline;
- function getI2CEN : TBits_1; inline;
- function getI2CSIDL : TBits_1; inline;
- function getIPMIEN : TBits_1; inline;
- function getON : TBits_1; inline;
- function getPEN : TBits_1; inline;
- function getRCEN : TBits_1; inline;
- function getRSEN : TBits_1; inline;
- function getSCLREL : TBits_1; inline;
- function getSEN : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getSMEN : TBits_1; inline;
- function getSTREN : TBits_1; inline;
- function getSTRICT : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setA10M(thebits : TBits_1); inline;
- procedure setACKDT(thebits : TBits_1); inline;
- procedure setACKEN(thebits : TBits_1); inline;
- procedure setDISSLW(thebits : TBits_1); inline;
- procedure setGCEN(thebits : TBits_1); inline;
- procedure setI2CEN(thebits : TBits_1); inline;
- procedure setI2CSIDL(thebits : TBits_1); inline;
- procedure setIPMIEN(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setPEN(thebits : TBits_1); inline;
- procedure setRCEN(thebits : TBits_1); inline;
- procedure setRSEN(thebits : TBits_1); inline;
- procedure setSCLREL(thebits : TBits_1); inline;
- procedure setSEN(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setSMEN(thebits : TBits_1); inline;
- procedure setSTREN(thebits : TBits_1); inline;
- procedure setSTRICT(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearA10M; inline;
- procedure clearACKDT; inline;
- procedure clearACKEN; inline;
- procedure clearDISSLW; inline;
- procedure clearGCEN; inline;
- procedure clearI2CEN; inline;
- procedure clearI2CSIDL; inline;
- procedure clearIPMIEN; inline;
- procedure clearON; inline;
- procedure clearPEN; inline;
- procedure clearRCEN; inline;
- procedure clearRSEN; inline;
- procedure clearSCLREL; inline;
- procedure clearSEN; inline;
- procedure clearSIDL; inline;
- procedure clearSMEN; inline;
- procedure clearSTREN; inline;
- procedure clearSTRICT; inline;
- procedure setA10M; inline;
- procedure setACKDT; inline;
- procedure setACKEN; inline;
- procedure setDISSLW; inline;
- procedure setGCEN; inline;
- procedure setI2CEN; inline;
- procedure setI2CSIDL; inline;
- procedure setIPMIEN; inline;
- procedure setON; inline;
- procedure setPEN; inline;
- procedure setRCEN; inline;
- procedure setRSEN; inline;
- procedure setSCLREL; inline;
- procedure setSEN; inline;
- procedure setSIDL; inline;
- procedure setSMEN; inline;
- procedure setSTREN; inline;
- procedure setSTRICT; inline;
- property A10M : TBits_1 read getA10M write setA10M;
- property ACKDT : TBits_1 read getACKDT write setACKDT;
- property ACKEN : TBits_1 read getACKEN write setACKEN;
- property DISSLW : TBits_1 read getDISSLW write setDISSLW;
- property GCEN : TBits_1 read getGCEN write setGCEN;
- property I2CEN : TBits_1 read getI2CEN write setI2CEN;
- property I2CSIDL : TBits_1 read getI2CSIDL write setI2CSIDL;
- property IPMIEN : TBits_1 read getIPMIEN write setIPMIEN;
- property ON : TBits_1 read getON write setON;
- property PEN : TBits_1 read getPEN write setPEN;
- property RCEN : TBits_1 read getRCEN write setRCEN;
- property RSEN : TBits_1 read getRSEN write setRSEN;
- property SCLREL : TBits_1 read getSCLREL write setSCLREL;
- property SEN : TBits_1 read getSEN write setSEN;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property SMEN : TBits_1 read getSMEN write setSMEN;
- property STREN : TBits_1 read getSTREN write setSTREN;
- property STRICT : TBits_1 read getSTRICT write setSTRICT;
- property w : TBits_32 read getw write setw;
- end;
- TI2C5_I2C3ASTAT = record
- private
- function getACKSTAT : TBits_1; inline;
- function getADD10 : TBits_1; inline;
- function getBCL : TBits_1; inline;
- function getD_A : TBits_1; inline;
- function getGCSTAT : TBits_1; inline;
- function getI2COV : TBits_1; inline;
- function getI2CPOV : TBits_1; inline;
- function getIWCOL : TBits_1; inline;
- function getP : TBits_1; inline;
- function getRBF : TBits_1; inline;
- function getR_W : TBits_1; inline;
- function getS : TBits_1; inline;
- function getTBF : TBits_1; inline;
- function getTRSTAT : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setACKSTAT(thebits : TBits_1); inline;
- procedure setADD10(thebits : TBits_1); inline;
- procedure setBCL(thebits : TBits_1); inline;
- procedure setD_A(thebits : TBits_1); inline;
- procedure setGCSTAT(thebits : TBits_1); inline;
- procedure setI2COV(thebits : TBits_1); inline;
- procedure setI2CPOV(thebits : TBits_1); inline;
- procedure setIWCOL(thebits : TBits_1); inline;
- procedure setP(thebits : TBits_1); inline;
- procedure setRBF(thebits : TBits_1); inline;
- procedure setR_W(thebits : TBits_1); inline;
- procedure setS(thebits : TBits_1); inline;
- procedure setTBF(thebits : TBits_1); inline;
- procedure setTRSTAT(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearACKSTAT; inline;
- procedure clearADD10; inline;
- procedure clearBCL; inline;
- procedure clearD_A; inline;
- procedure clearGCSTAT; inline;
- procedure clearI2COV; inline;
- procedure clearI2CPOV; inline;
- procedure clearIWCOL; inline;
- procedure clearP; inline;
- procedure clearRBF; inline;
- procedure clearR_W; inline;
- procedure clearS; inline;
- procedure clearTBF; inline;
- procedure clearTRSTAT; inline;
- procedure setACKSTAT; inline;
- procedure setADD10; inline;
- procedure setBCL; inline;
- procedure setD_A; inline;
- procedure setGCSTAT; inline;
- procedure setI2COV; inline;
- procedure setI2CPOV; inline;
- procedure setIWCOL; inline;
- procedure setP; inline;
- procedure setRBF; inline;
- procedure setR_W; inline;
- procedure setS; inline;
- procedure setTBF; inline;
- procedure setTRSTAT; inline;
- property ACKSTAT : TBits_1 read getACKSTAT write setACKSTAT;
- property ADD10 : TBits_1 read getADD10 write setADD10;
- property BCL : TBits_1 read getBCL write setBCL;
- property D_A : TBits_1 read getD_A write setD_A;
- property GCSTAT : TBits_1 read getGCSTAT write setGCSTAT;
- property I2COV : TBits_1 read getI2COV write setI2COV;
- property I2CPOV : TBits_1 read getI2CPOV write setI2CPOV;
- property IWCOL : TBits_1 read getIWCOL write setIWCOL;
- property P : TBits_1 read getP write setP;
- property RBF : TBits_1 read getRBF write setRBF;
- property R_W : TBits_1 read getR_W write setR_W;
- property S : TBits_1 read getS write setS;
- property TBF : TBits_1 read getTBF write setTBF;
- property TRSTAT : TBits_1 read getTRSTAT write setTRSTAT;
- property w : TBits_32 read getw write setw;
- end;
- TI2C5_I2C5STAT = record
- private
- function getACKSTAT : TBits_1; inline;
- function getADD10 : TBits_1; inline;
- function getBCL : TBits_1; inline;
- function getD_A : TBits_1; inline;
- function getGCSTAT : TBits_1; inline;
- function getI2COV : TBits_1; inline;
- function getI2CPOV : TBits_1; inline;
- function getIWCOL : TBits_1; inline;
- function getP : TBits_1; inline;
- function getRBF : TBits_1; inline;
- function getR_W : TBits_1; inline;
- function getS : TBits_1; inline;
- function getTBF : TBits_1; inline;
- function getTRSTAT : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setACKSTAT(thebits : TBits_1); inline;
- procedure setADD10(thebits : TBits_1); inline;
- procedure setBCL(thebits : TBits_1); inline;
- procedure setD_A(thebits : TBits_1); inline;
- procedure setGCSTAT(thebits : TBits_1); inline;
- procedure setI2COV(thebits : TBits_1); inline;
- procedure setI2CPOV(thebits : TBits_1); inline;
- procedure setIWCOL(thebits : TBits_1); inline;
- procedure setP(thebits : TBits_1); inline;
- procedure setRBF(thebits : TBits_1); inline;
- procedure setR_W(thebits : TBits_1); inline;
- procedure setS(thebits : TBits_1); inline;
- procedure setTBF(thebits : TBits_1); inline;
- procedure setTRSTAT(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearACKSTAT; inline;
- procedure clearADD10; inline;
- procedure clearBCL; inline;
- procedure clearD_A; inline;
- procedure clearGCSTAT; inline;
- procedure clearI2COV; inline;
- procedure clearI2CPOV; inline;
- procedure clearIWCOL; inline;
- procedure clearP; inline;
- procedure clearRBF; inline;
- procedure clearR_W; inline;
- procedure clearS; inline;
- procedure clearTBF; inline;
- procedure clearTRSTAT; inline;
- procedure setACKSTAT; inline;
- procedure setADD10; inline;
- procedure setBCL; inline;
- procedure setD_A; inline;
- procedure setGCSTAT; inline;
- procedure setI2COV; inline;
- procedure setI2CPOV; inline;
- procedure setIWCOL; inline;
- procedure setP; inline;
- procedure setRBF; inline;
- procedure setR_W; inline;
- procedure setS; inline;
- procedure setTBF; inline;
- procedure setTRSTAT; inline;
- property ACKSTAT : TBits_1 read getACKSTAT write setACKSTAT;
- property ADD10 : TBits_1 read getADD10 write setADD10;
- property BCL : TBits_1 read getBCL write setBCL;
- property D_A : TBits_1 read getD_A write setD_A;
- property GCSTAT : TBits_1 read getGCSTAT write setGCSTAT;
- property I2COV : TBits_1 read getI2COV write setI2COV;
- property I2CPOV : TBits_1 read getI2CPOV write setI2CPOV;
- property IWCOL : TBits_1 read getIWCOL write setIWCOL;
- property P : TBits_1 read getP write setP;
- property RBF : TBits_1 read getRBF write setRBF;
- property R_W : TBits_1 read getR_W write setR_W;
- property S : TBits_1 read getS write setS;
- property TBF : TBits_1 read getTBF write setTBF;
- property TRSTAT : TBits_1 read getTRSTAT write setTRSTAT;
- property w : TBits_32 read getw write setw;
- end;
- type
- TI2C5Registers = record
- I2C3ACONbits : TI2C5_I2C3ACON;
- I2C3ACON : longWord;
- I2C5CONbits : TI2C5_I2C5CON;
- I2C5CON : longWord;
- I2C3ACONCLR : longWord;
- I2C5CONCLR : longWord;
- I2C3ACONSET : longWord;
- I2C5CONSET : longWord;
- I2C3ACONINV : longWord;
- I2C5CONINV : longWord;
- I2C3ASTATbits : TI2C5_I2C3ASTAT;
- I2C3ASTAT : longWord;
- I2C5STATbits : TI2C5_I2C5STAT;
- I2C5STAT : longWord;
- I2C3ASTATCLR : longWord;
- I2C5STATCLR : longWord;
- I2C3ASTATSET : longWord;
- I2C5STATSET : longWord;
- I2C3ASTATINV : longWord;
- I2C5STATINV : longWord;
- I2C3AADD : longWord;
- I2C5ADD : longWord;
- I2C3AADDCLR : longWord;
- I2C5ADDCLR : longWord;
- I2C3AADDSET : longWord;
- I2C5ADDSET : longWord;
- I2C3AADDINV : longWord;
- I2C5ADDINV : longWord;
- I2C3AMSK : longWord;
- I2C5MSK : longWord;
- I2C3AMSKCLR : longWord;
- I2C5MSKCLR : longWord;
- I2C3AMSKSET : longWord;
- I2C5MSKSET : longWord;
- I2C3AMSKINV : longWord;
- I2C5MSKINV : longWord;
- I2C3ABRG : longWord;
- I2C5BRG : longWord;
- I2C3ABRGCLR : longWord;
- I2C5BRGCLR : longWord;
- I2C3ABRGSET : longWord;
- I2C5BRGSET : longWord;
- I2C3ABRGINV : longWord;
- I2C5BRGINV : longWord;
- I2C3ATRN : longWord;
- I2C5TRN : longWord;
- I2C3ATRNCLR : longWord;
- I2C5TRNCLR : longWord;
- I2C3ATRNSET : longWord;
- I2C5TRNSET : longWord;
- I2C3ATRNINV : longWord;
- I2C5TRNINV : longWord;
- I2C3ARCV : longWord;
- I2C5RCV : longWord;
- end;
- TI2C1_I2C1CON = record
- private
- function getA10M : TBits_1; inline;
- function getACKDT : TBits_1; inline;
- function getACKEN : TBits_1; inline;
- function getDISSLW : TBits_1; inline;
- function getGCEN : TBits_1; inline;
- function getI2CEN : TBits_1; inline;
- function getI2CSIDL : TBits_1; inline;
- function getIPMIEN : TBits_1; inline;
- function getON : TBits_1; inline;
- function getPEN : TBits_1; inline;
- function getRCEN : TBits_1; inline;
- function getRSEN : TBits_1; inline;
- function getSCLREL : TBits_1; inline;
- function getSEN : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getSMEN : TBits_1; inline;
- function getSTREN : TBits_1; inline;
- function getSTRICT : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setA10M(thebits : TBits_1); inline;
- procedure setACKDT(thebits : TBits_1); inline;
- procedure setACKEN(thebits : TBits_1); inline;
- procedure setDISSLW(thebits : TBits_1); inline;
- procedure setGCEN(thebits : TBits_1); inline;
- procedure setI2CEN(thebits : TBits_1); inline;
- procedure setI2CSIDL(thebits : TBits_1); inline;
- procedure setIPMIEN(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setPEN(thebits : TBits_1); inline;
- procedure setRCEN(thebits : TBits_1); inline;
- procedure setRSEN(thebits : TBits_1); inline;
- procedure setSCLREL(thebits : TBits_1); inline;
- procedure setSEN(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setSMEN(thebits : TBits_1); inline;
- procedure setSTREN(thebits : TBits_1); inline;
- procedure setSTRICT(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearA10M; inline;
- procedure clearACKDT; inline;
- procedure clearACKEN; inline;
- procedure clearDISSLW; inline;
- procedure clearGCEN; inline;
- procedure clearI2CEN; inline;
- procedure clearI2CSIDL; inline;
- procedure clearIPMIEN; inline;
- procedure clearON; inline;
- procedure clearPEN; inline;
- procedure clearRCEN; inline;
- procedure clearRSEN; inline;
- procedure clearSCLREL; inline;
- procedure clearSEN; inline;
- procedure clearSIDL; inline;
- procedure clearSMEN; inline;
- procedure clearSTREN; inline;
- procedure clearSTRICT; inline;
- procedure setA10M; inline;
- procedure setACKDT; inline;
- procedure setACKEN; inline;
- procedure setDISSLW; inline;
- procedure setGCEN; inline;
- procedure setI2CEN; inline;
- procedure setI2CSIDL; inline;
- procedure setIPMIEN; inline;
- procedure setON; inline;
- procedure setPEN; inline;
- procedure setRCEN; inline;
- procedure setRSEN; inline;
- procedure setSCLREL; inline;
- procedure setSEN; inline;
- procedure setSIDL; inline;
- procedure setSMEN; inline;
- procedure setSTREN; inline;
- procedure setSTRICT; inline;
- property A10M : TBits_1 read getA10M write setA10M;
- property ACKDT : TBits_1 read getACKDT write setACKDT;
- property ACKEN : TBits_1 read getACKEN write setACKEN;
- property DISSLW : TBits_1 read getDISSLW write setDISSLW;
- property GCEN : TBits_1 read getGCEN write setGCEN;
- property I2CEN : TBits_1 read getI2CEN write setI2CEN;
- property I2CSIDL : TBits_1 read getI2CSIDL write setI2CSIDL;
- property IPMIEN : TBits_1 read getIPMIEN write setIPMIEN;
- property ON : TBits_1 read getON write setON;
- property PEN : TBits_1 read getPEN write setPEN;
- property RCEN : TBits_1 read getRCEN write setRCEN;
- property RSEN : TBits_1 read getRSEN write setRSEN;
- property SCLREL : TBits_1 read getSCLREL write setSCLREL;
- property SEN : TBits_1 read getSEN write setSEN;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property SMEN : TBits_1 read getSMEN write setSMEN;
- property STREN : TBits_1 read getSTREN write setSTREN;
- property STRICT : TBits_1 read getSTRICT write setSTRICT;
- property w : TBits_32 read getw write setw;
- end;
- TI2C1_I2C1STAT = record
- private
- function getACKSTAT : TBits_1; inline;
- function getADD10 : TBits_1; inline;
- function getBCL : TBits_1; inline;
- function getD_A : TBits_1; inline;
- function getGCSTAT : TBits_1; inline;
- function getI2COV : TBits_1; inline;
- function getI2CPOV : TBits_1; inline;
- function getIWCOL : TBits_1; inline;
- function getP : TBits_1; inline;
- function getRBF : TBits_1; inline;
- function getR_W : TBits_1; inline;
- function getS : TBits_1; inline;
- function getTBF : TBits_1; inline;
- function getTRSTAT : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setACKSTAT(thebits : TBits_1); inline;
- procedure setADD10(thebits : TBits_1); inline;
- procedure setBCL(thebits : TBits_1); inline;
- procedure setD_A(thebits : TBits_1); inline;
- procedure setGCSTAT(thebits : TBits_1); inline;
- procedure setI2COV(thebits : TBits_1); inline;
- procedure setI2CPOV(thebits : TBits_1); inline;
- procedure setIWCOL(thebits : TBits_1); inline;
- procedure setP(thebits : TBits_1); inline;
- procedure setRBF(thebits : TBits_1); inline;
- procedure setR_W(thebits : TBits_1); inline;
- procedure setS(thebits : TBits_1); inline;
- procedure setTBF(thebits : TBits_1); inline;
- procedure setTRSTAT(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearACKSTAT; inline;
- procedure clearADD10; inline;
- procedure clearBCL; inline;
- procedure clearD_A; inline;
- procedure clearGCSTAT; inline;
- procedure clearI2COV; inline;
- procedure clearI2CPOV; inline;
- procedure clearIWCOL; inline;
- procedure clearP; inline;
- procedure clearRBF; inline;
- procedure clearR_W; inline;
- procedure clearS; inline;
- procedure clearTBF; inline;
- procedure clearTRSTAT; inline;
- procedure setACKSTAT; inline;
- procedure setADD10; inline;
- procedure setBCL; inline;
- procedure setD_A; inline;
- procedure setGCSTAT; inline;
- procedure setI2COV; inline;
- procedure setI2CPOV; inline;
- procedure setIWCOL; inline;
- procedure setP; inline;
- procedure setRBF; inline;
- procedure setR_W; inline;
- procedure setS; inline;
- procedure setTBF; inline;
- procedure setTRSTAT; inline;
- property ACKSTAT : TBits_1 read getACKSTAT write setACKSTAT;
- property ADD10 : TBits_1 read getADD10 write setADD10;
- property BCL : TBits_1 read getBCL write setBCL;
- property D_A : TBits_1 read getD_A write setD_A;
- property GCSTAT : TBits_1 read getGCSTAT write setGCSTAT;
- property I2COV : TBits_1 read getI2COV write setI2COV;
- property I2CPOV : TBits_1 read getI2CPOV write setI2CPOV;
- property IWCOL : TBits_1 read getIWCOL write setIWCOL;
- property P : TBits_1 read getP write setP;
- property RBF : TBits_1 read getRBF write setRBF;
- property R_W : TBits_1 read getR_W write setR_W;
- property S : TBits_1 read getS write setS;
- property TBF : TBits_1 read getTBF write setTBF;
- property TRSTAT : TBits_1 read getTRSTAT write setTRSTAT;
- property w : TBits_32 read getw write setw;
- end;
- type
- TI2C1Registers = record
- I2C1CONbits : TI2C1_I2C1CON;
- I2C1CON : longWord;
- I2C1CONCLR : longWord;
- I2C1CONSET : longWord;
- I2C1CONINV : longWord;
- I2C1STATbits : TI2C1_I2C1STAT;
- I2C1STAT : longWord;
- I2C1STATCLR : longWord;
- I2C1STATSET : longWord;
- I2C1STATINV : longWord;
- I2C1ADD : longWord;
- I2C1ADDCLR : longWord;
- I2C1ADDSET : longWord;
- I2C1ADDINV : longWord;
- I2C1MSK : longWord;
- I2C1MSKCLR : longWord;
- I2C1MSKSET : longWord;
- I2C1MSKINV : longWord;
- I2C1BRG : longWord;
- I2C1BRGCLR : longWord;
- I2C1BRGSET : longWord;
- I2C1BRGINV : longWord;
- I2C1TRN : longWord;
- I2C1TRNCLR : longWord;
- I2C1TRNSET : longWord;
- I2C1TRNINV : longWord;
- I2C1RCV : longWord;
- end;
- TI2C2_I2C2CON = record
- private
- function getA10M : TBits_1; inline;
- function getACKDT : TBits_1; inline;
- function getACKEN : TBits_1; inline;
- function getDISSLW : TBits_1; inline;
- function getGCEN : TBits_1; inline;
- function getI2CEN : TBits_1; inline;
- function getI2CSIDL : TBits_1; inline;
- function getIPMIEN : TBits_1; inline;
- function getON : TBits_1; inline;
- function getPEN : TBits_1; inline;
- function getRCEN : TBits_1; inline;
- function getRSEN : TBits_1; inline;
- function getSCLREL : TBits_1; inline;
- function getSEN : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getSMEN : TBits_1; inline;
- function getSTREN : TBits_1; inline;
- function getSTRICT : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setA10M(thebits : TBits_1); inline;
- procedure setACKDT(thebits : TBits_1); inline;
- procedure setACKEN(thebits : TBits_1); inline;
- procedure setDISSLW(thebits : TBits_1); inline;
- procedure setGCEN(thebits : TBits_1); inline;
- procedure setI2CEN(thebits : TBits_1); inline;
- procedure setI2CSIDL(thebits : TBits_1); inline;
- procedure setIPMIEN(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setPEN(thebits : TBits_1); inline;
- procedure setRCEN(thebits : TBits_1); inline;
- procedure setRSEN(thebits : TBits_1); inline;
- procedure setSCLREL(thebits : TBits_1); inline;
- procedure setSEN(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setSMEN(thebits : TBits_1); inline;
- procedure setSTREN(thebits : TBits_1); inline;
- procedure setSTRICT(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearA10M; inline;
- procedure clearACKDT; inline;
- procedure clearACKEN; inline;
- procedure clearDISSLW; inline;
- procedure clearGCEN; inline;
- procedure clearI2CEN; inline;
- procedure clearI2CSIDL; inline;
- procedure clearIPMIEN; inline;
- procedure clearON; inline;
- procedure clearPEN; inline;
- procedure clearRCEN; inline;
- procedure clearRSEN; inline;
- procedure clearSCLREL; inline;
- procedure clearSEN; inline;
- procedure clearSIDL; inline;
- procedure clearSMEN; inline;
- procedure clearSTREN; inline;
- procedure clearSTRICT; inline;
- procedure setA10M; inline;
- procedure setACKDT; inline;
- procedure setACKEN; inline;
- procedure setDISSLW; inline;
- procedure setGCEN; inline;
- procedure setI2CEN; inline;
- procedure setI2CSIDL; inline;
- procedure setIPMIEN; inline;
- procedure setON; inline;
- procedure setPEN; inline;
- procedure setRCEN; inline;
- procedure setRSEN; inline;
- procedure setSCLREL; inline;
- procedure setSEN; inline;
- procedure setSIDL; inline;
- procedure setSMEN; inline;
- procedure setSTREN; inline;
- procedure setSTRICT; inline;
- property A10M : TBits_1 read getA10M write setA10M;
- property ACKDT : TBits_1 read getACKDT write setACKDT;
- property ACKEN : TBits_1 read getACKEN write setACKEN;
- property DISSLW : TBits_1 read getDISSLW write setDISSLW;
- property GCEN : TBits_1 read getGCEN write setGCEN;
- property I2CEN : TBits_1 read getI2CEN write setI2CEN;
- property I2CSIDL : TBits_1 read getI2CSIDL write setI2CSIDL;
- property IPMIEN : TBits_1 read getIPMIEN write setIPMIEN;
- property ON : TBits_1 read getON write setON;
- property PEN : TBits_1 read getPEN write setPEN;
- property RCEN : TBits_1 read getRCEN write setRCEN;
- property RSEN : TBits_1 read getRSEN write setRSEN;
- property SCLREL : TBits_1 read getSCLREL write setSCLREL;
- property SEN : TBits_1 read getSEN write setSEN;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property SMEN : TBits_1 read getSMEN write setSMEN;
- property STREN : TBits_1 read getSTREN write setSTREN;
- property STRICT : TBits_1 read getSTRICT write setSTRICT;
- property w : TBits_32 read getw write setw;
- end;
- TI2C2_I2C2STAT = record
- private
- function getACKSTAT : TBits_1; inline;
- function getADD10 : TBits_1; inline;
- function getBCL : TBits_1; inline;
- function getD_A : TBits_1; inline;
- function getGCSTAT : TBits_1; inline;
- function getI2COV : TBits_1; inline;
- function getI2CPOV : TBits_1; inline;
- function getIWCOL : TBits_1; inline;
- function getP : TBits_1; inline;
- function getRBF : TBits_1; inline;
- function getR_W : TBits_1; inline;
- function getS : TBits_1; inline;
- function getTBF : TBits_1; inline;
- function getTRSTAT : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setACKSTAT(thebits : TBits_1); inline;
- procedure setADD10(thebits : TBits_1); inline;
- procedure setBCL(thebits : TBits_1); inline;
- procedure setD_A(thebits : TBits_1); inline;
- procedure setGCSTAT(thebits : TBits_1); inline;
- procedure setI2COV(thebits : TBits_1); inline;
- procedure setI2CPOV(thebits : TBits_1); inline;
- procedure setIWCOL(thebits : TBits_1); inline;
- procedure setP(thebits : TBits_1); inline;
- procedure setRBF(thebits : TBits_1); inline;
- procedure setR_W(thebits : TBits_1); inline;
- procedure setS(thebits : TBits_1); inline;
- procedure setTBF(thebits : TBits_1); inline;
- procedure setTRSTAT(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearACKSTAT; inline;
- procedure clearADD10; inline;
- procedure clearBCL; inline;
- procedure clearD_A; inline;
- procedure clearGCSTAT; inline;
- procedure clearI2COV; inline;
- procedure clearI2CPOV; inline;
- procedure clearIWCOL; inline;
- procedure clearP; inline;
- procedure clearRBF; inline;
- procedure clearR_W; inline;
- procedure clearS; inline;
- procedure clearTBF; inline;
- procedure clearTRSTAT; inline;
- procedure setACKSTAT; inline;
- procedure setADD10; inline;
- procedure setBCL; inline;
- procedure setD_A; inline;
- procedure setGCSTAT; inline;
- procedure setI2COV; inline;
- procedure setI2CPOV; inline;
- procedure setIWCOL; inline;
- procedure setP; inline;
- procedure setRBF; inline;
- procedure setR_W; inline;
- procedure setS; inline;
- procedure setTBF; inline;
- procedure setTRSTAT; inline;
- property ACKSTAT : TBits_1 read getACKSTAT write setACKSTAT;
- property ADD10 : TBits_1 read getADD10 write setADD10;
- property BCL : TBits_1 read getBCL write setBCL;
- property D_A : TBits_1 read getD_A write setD_A;
- property GCSTAT : TBits_1 read getGCSTAT write setGCSTAT;
- property I2COV : TBits_1 read getI2COV write setI2COV;
- property I2CPOV : TBits_1 read getI2CPOV write setI2CPOV;
- property IWCOL : TBits_1 read getIWCOL write setIWCOL;
- property P : TBits_1 read getP write setP;
- property RBF : TBits_1 read getRBF write setRBF;
- property R_W : TBits_1 read getR_W write setR_W;
- property S : TBits_1 read getS write setS;
- property TBF : TBits_1 read getTBF write setTBF;
- property TRSTAT : TBits_1 read getTRSTAT write setTRSTAT;
- property w : TBits_32 read getw write setw;
- end;
- type
- TI2C2Registers = record
- I2C2CONbits : TI2C2_I2C2CON;
- I2C2CON : longWord;
- I2C2CONCLR : longWord;
- I2C2CONSET : longWord;
- I2C2CONINV : longWord;
- I2C2STATbits : TI2C2_I2C2STAT;
- I2C2STAT : longWord;
- I2C2STATCLR : longWord;
- I2C2STATSET : longWord;
- I2C2STATINV : longWord;
- I2C2ADD : longWord;
- I2C2ADDCLR : longWord;
- I2C2ADDSET : longWord;
- I2C2ADDINV : longWord;
- I2C2MSK : longWord;
- I2C2MSKCLR : longWord;
- I2C2MSKSET : longWord;
- I2C2MSKINV : longWord;
- I2C2BRG : longWord;
- I2C2BRGCLR : longWord;
- I2C2BRGSET : longWord;
- I2C2BRGINV : longWord;
- I2C2TRN : longWord;
- I2C2TRNCLR : longWord;
- I2C2TRNSET : longWord;
- I2C2TRNINV : longWord;
- I2C2RCV : longWord;
- end;
- TSPI3_SPI1ACON = record
- private
- function getCKE : TBits_1; inline;
- function getCKP : TBits_1; inline;
- function getDISSDO : TBits_1; inline;
- function getENHBUF : TBits_1; inline;
- function getFRMCNT : TBits_3; inline;
- function getFRMEN : TBits_1; inline;
- function getFRMPOL : TBits_1; inline;
- function getFRMSYNC : TBits_1; inline;
- function getFRMSYPW : TBits_1; inline;
- function getMODE16 : TBits_1; inline;
- function getMODE32 : TBits_1; inline;
- function getMSSEN : TBits_1; inline;
- function getMSTEN : TBits_1; inline;
- function getON : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getSMP : TBits_1; inline;
- function getSPIFE : TBits_1; inline;
- function getSRXISEL : TBits_2; inline;
- function getSSEN : TBits_1; inline;
- function getSTXISEL : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setCKE(thebits : TBits_1); inline;
- procedure setCKP(thebits : TBits_1); inline;
- procedure setDISSDO(thebits : TBits_1); inline;
- procedure setENHBUF(thebits : TBits_1); inline;
- procedure setFRMCNT(thebits : TBits_3); inline;
- procedure setFRMEN(thebits : TBits_1); inline;
- procedure setFRMPOL(thebits : TBits_1); inline;
- procedure setFRMSYNC(thebits : TBits_1); inline;
- procedure setFRMSYPW(thebits : TBits_1); inline;
- procedure setMODE16(thebits : TBits_1); inline;
- procedure setMODE32(thebits : TBits_1); inline;
- procedure setMSSEN(thebits : TBits_1); inline;
- procedure setMSTEN(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setSMP(thebits : TBits_1); inline;
- procedure setSPIFE(thebits : TBits_1); inline;
- procedure setSRXISEL(thebits : TBits_2); inline;
- procedure setSSEN(thebits : TBits_1); inline;
- procedure setSTXISEL(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCKE; inline;
- procedure clearCKP; inline;
- procedure clearDISSDO; inline;
- procedure clearENHBUF; inline;
- procedure clearFRMEN; inline;
- procedure clearFRMPOL; inline;
- procedure clearFRMSYNC; inline;
- procedure clearFRMSYPW; inline;
- procedure clearMODE16; inline;
- procedure clearMODE32; inline;
- procedure clearMSSEN; inline;
- procedure clearMSTEN; inline;
- procedure clearON; inline;
- procedure clearSIDL; inline;
- procedure clearSMP; inline;
- procedure clearSPIFE; inline;
- procedure clearSSEN; inline;
- procedure setCKE; inline;
- procedure setCKP; inline;
- procedure setDISSDO; inline;
- procedure setENHBUF; inline;
- procedure setFRMEN; inline;
- procedure setFRMPOL; inline;
- procedure setFRMSYNC; inline;
- procedure setFRMSYPW; inline;
- procedure setMODE16; inline;
- procedure setMODE32; inline;
- procedure setMSSEN; inline;
- procedure setMSTEN; inline;
- procedure setON; inline;
- procedure setSIDL; inline;
- procedure setSMP; inline;
- procedure setSPIFE; inline;
- procedure setSSEN; inline;
- property CKE : TBits_1 read getCKE write setCKE;
- property CKP : TBits_1 read getCKP write setCKP;
- property DISSDO : TBits_1 read getDISSDO write setDISSDO;
- property ENHBUF : TBits_1 read getENHBUF write setENHBUF;
- property FRMCNT : TBits_3 read getFRMCNT write setFRMCNT;
- property FRMEN : TBits_1 read getFRMEN write setFRMEN;
- property FRMPOL : TBits_1 read getFRMPOL write setFRMPOL;
- property FRMSYNC : TBits_1 read getFRMSYNC write setFRMSYNC;
- property FRMSYPW : TBits_1 read getFRMSYPW write setFRMSYPW;
- property MODE16 : TBits_1 read getMODE16 write setMODE16;
- property MODE32 : TBits_1 read getMODE32 write setMODE32;
- property MSSEN : TBits_1 read getMSSEN write setMSSEN;
- property MSTEN : TBits_1 read getMSTEN write setMSTEN;
- property ON : TBits_1 read getON write setON;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property SMP : TBits_1 read getSMP write setSMP;
- property SPIFE : TBits_1 read getSPIFE write setSPIFE;
- property SRXISEL : TBits_2 read getSRXISEL write setSRXISEL;
- property SSEN : TBits_1 read getSSEN write setSSEN;
- property STXISEL : TBits_2 read getSTXISEL write setSTXISEL;
- property w : TBits_32 read getw write setw;
- end;
- TSPI3_SPI3CON = record
- private
- function getCKE : TBits_1; inline;
- function getCKP : TBits_1; inline;
- function getDISSDO : TBits_1; inline;
- function getENHBUF : TBits_1; inline;
- function getFRMCNT : TBits_3; inline;
- function getFRMEN : TBits_1; inline;
- function getFRMPOL : TBits_1; inline;
- function getFRMSYNC : TBits_1; inline;
- function getFRMSYPW : TBits_1; inline;
- function getMODE16 : TBits_1; inline;
- function getMODE32 : TBits_1; inline;
- function getMSSEN : TBits_1; inline;
- function getMSTEN : TBits_1; inline;
- function getON : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getSMP : TBits_1; inline;
- function getSPIFE : TBits_1; inline;
- function getSRXISEL : TBits_2; inline;
- function getSSEN : TBits_1; inline;
- function getSTXISEL : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setCKE(thebits : TBits_1); inline;
- procedure setCKP(thebits : TBits_1); inline;
- procedure setDISSDO(thebits : TBits_1); inline;
- procedure setENHBUF(thebits : TBits_1); inline;
- procedure setFRMCNT(thebits : TBits_3); inline;
- procedure setFRMEN(thebits : TBits_1); inline;
- procedure setFRMPOL(thebits : TBits_1); inline;
- procedure setFRMSYNC(thebits : TBits_1); inline;
- procedure setFRMSYPW(thebits : TBits_1); inline;
- procedure setMODE16(thebits : TBits_1); inline;
- procedure setMODE32(thebits : TBits_1); inline;
- procedure setMSSEN(thebits : TBits_1); inline;
- procedure setMSTEN(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setSMP(thebits : TBits_1); inline;
- procedure setSPIFE(thebits : TBits_1); inline;
- procedure setSRXISEL(thebits : TBits_2); inline;
- procedure setSSEN(thebits : TBits_1); inline;
- procedure setSTXISEL(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCKE; inline;
- procedure clearCKP; inline;
- procedure clearDISSDO; inline;
- procedure clearENHBUF; inline;
- procedure clearFRMEN; inline;
- procedure clearFRMPOL; inline;
- procedure clearFRMSYNC; inline;
- procedure clearFRMSYPW; inline;
- procedure clearMODE16; inline;
- procedure clearMODE32; inline;
- procedure clearMSSEN; inline;
- procedure clearMSTEN; inline;
- procedure clearON; inline;
- procedure clearSIDL; inline;
- procedure clearSMP; inline;
- procedure clearSPIFE; inline;
- procedure clearSSEN; inline;
- procedure setCKE; inline;
- procedure setCKP; inline;
- procedure setDISSDO; inline;
- procedure setENHBUF; inline;
- procedure setFRMEN; inline;
- procedure setFRMPOL; inline;
- procedure setFRMSYNC; inline;
- procedure setFRMSYPW; inline;
- procedure setMODE16; inline;
- procedure setMODE32; inline;
- procedure setMSSEN; inline;
- procedure setMSTEN; inline;
- procedure setON; inline;
- procedure setSIDL; inline;
- procedure setSMP; inline;
- procedure setSPIFE; inline;
- procedure setSSEN; inline;
- property CKE : TBits_1 read getCKE write setCKE;
- property CKP : TBits_1 read getCKP write setCKP;
- property DISSDO : TBits_1 read getDISSDO write setDISSDO;
- property ENHBUF : TBits_1 read getENHBUF write setENHBUF;
- property FRMCNT : TBits_3 read getFRMCNT write setFRMCNT;
- property FRMEN : TBits_1 read getFRMEN write setFRMEN;
- property FRMPOL : TBits_1 read getFRMPOL write setFRMPOL;
- property FRMSYNC : TBits_1 read getFRMSYNC write setFRMSYNC;
- property FRMSYPW : TBits_1 read getFRMSYPW write setFRMSYPW;
- property MODE16 : TBits_1 read getMODE16 write setMODE16;
- property MODE32 : TBits_1 read getMODE32 write setMODE32;
- property MSSEN : TBits_1 read getMSSEN write setMSSEN;
- property MSTEN : TBits_1 read getMSTEN write setMSTEN;
- property ON : TBits_1 read getON write setON;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property SMP : TBits_1 read getSMP write setSMP;
- property SPIFE : TBits_1 read getSPIFE write setSPIFE;
- property SRXISEL : TBits_2 read getSRXISEL write setSRXISEL;
- property SSEN : TBits_1 read getSSEN write setSSEN;
- property STXISEL : TBits_2 read getSTXISEL write setSTXISEL;
- property w : TBits_32 read getw write setw;
- end;
- TSPI3_SPI1ASTAT = record
- private
- function getRXBUFELM : TBits_5; inline;
- function getSPIBUSY : TBits_1; inline;
- function getSPIRBE : TBits_1; inline;
- function getSPIRBF : TBits_1; inline;
- function getSPIROV : TBits_1; inline;
- function getSPITBE : TBits_1; inline;
- function getSPITBF : TBits_1; inline;
- function getSPITUR : TBits_1; inline;
- function getSRMT : TBits_1; inline;
- function getTXBUFELM : TBits_5; inline;
- function getw : TBits_32; inline;
- procedure setRXBUFELM(thebits : TBits_5); inline;
- procedure setSPIBUSY(thebits : TBits_1); inline;
- procedure setSPIRBE(thebits : TBits_1); inline;
- procedure setSPIRBF(thebits : TBits_1); inline;
- procedure setSPIROV(thebits : TBits_1); inline;
- procedure setSPITBE(thebits : TBits_1); inline;
- procedure setSPITBF(thebits : TBits_1); inline;
- procedure setSPITUR(thebits : TBits_1); inline;
- procedure setSRMT(thebits : TBits_1); inline;
- procedure setTXBUFELM(thebits : TBits_5); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearSPIBUSY; inline;
- procedure clearSPIRBE; inline;
- procedure clearSPIRBF; inline;
- procedure clearSPIROV; inline;
- procedure clearSPITBE; inline;
- procedure clearSPITBF; inline;
- procedure clearSPITUR; inline;
- procedure clearSRMT; inline;
- procedure setSPIBUSY; inline;
- procedure setSPIRBE; inline;
- procedure setSPIRBF; inline;
- procedure setSPIROV; inline;
- procedure setSPITBE; inline;
- procedure setSPITBF; inline;
- procedure setSPITUR; inline;
- procedure setSRMT; inline;
- property RXBUFELM : TBits_5 read getRXBUFELM write setRXBUFELM;
- property SPIBUSY : TBits_1 read getSPIBUSY write setSPIBUSY;
- property SPIRBE : TBits_1 read getSPIRBE write setSPIRBE;
- property SPIRBF : TBits_1 read getSPIRBF write setSPIRBF;
- property SPIROV : TBits_1 read getSPIROV write setSPIROV;
- property SPITBE : TBits_1 read getSPITBE write setSPITBE;
- property SPITBF : TBits_1 read getSPITBF write setSPITBF;
- property SPITUR : TBits_1 read getSPITUR write setSPITUR;
- property SRMT : TBits_1 read getSRMT write setSRMT;
- property TXBUFELM : TBits_5 read getTXBUFELM write setTXBUFELM;
- property w : TBits_32 read getw write setw;
- end;
- TSPI3_SPI3STAT = record
- private
- function getRXBUFELM : TBits_5; inline;
- function getSPIBUSY : TBits_1; inline;
- function getSPIRBE : TBits_1; inline;
- function getSPIRBF : TBits_1; inline;
- function getSPIROV : TBits_1; inline;
- function getSPITBE : TBits_1; inline;
- function getSPITBF : TBits_1; inline;
- function getSPITUR : TBits_1; inline;
- function getSRMT : TBits_1; inline;
- function getTXBUFELM : TBits_5; inline;
- function getw : TBits_32; inline;
- procedure setRXBUFELM(thebits : TBits_5); inline;
- procedure setSPIBUSY(thebits : TBits_1); inline;
- procedure setSPIRBE(thebits : TBits_1); inline;
- procedure setSPIRBF(thebits : TBits_1); inline;
- procedure setSPIROV(thebits : TBits_1); inline;
- procedure setSPITBE(thebits : TBits_1); inline;
- procedure setSPITBF(thebits : TBits_1); inline;
- procedure setSPITUR(thebits : TBits_1); inline;
- procedure setSRMT(thebits : TBits_1); inline;
- procedure setTXBUFELM(thebits : TBits_5); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearSPIBUSY; inline;
- procedure clearSPIRBE; inline;
- procedure clearSPIRBF; inline;
- procedure clearSPIROV; inline;
- procedure clearSPITBE; inline;
- procedure clearSPITBF; inline;
- procedure clearSPITUR; inline;
- procedure clearSRMT; inline;
- procedure setSPIBUSY; inline;
- procedure setSPIRBE; inline;
- procedure setSPIRBF; inline;
- procedure setSPIROV; inline;
- procedure setSPITBE; inline;
- procedure setSPITBF; inline;
- procedure setSPITUR; inline;
- procedure setSRMT; inline;
- property RXBUFELM : TBits_5 read getRXBUFELM write setRXBUFELM;
- property SPIBUSY : TBits_1 read getSPIBUSY write setSPIBUSY;
- property SPIRBE : TBits_1 read getSPIRBE write setSPIRBE;
- property SPIRBF : TBits_1 read getSPIRBF write setSPIRBF;
- property SPIROV : TBits_1 read getSPIROV write setSPIROV;
- property SPITBE : TBits_1 read getSPITBE write setSPITBE;
- property SPITBF : TBits_1 read getSPITBF write setSPITBF;
- property SPITUR : TBits_1 read getSPITUR write setSPITUR;
- property SRMT : TBits_1 read getSRMT write setSRMT;
- property TXBUFELM : TBits_5 read getTXBUFELM write setTXBUFELM;
- property w : TBits_32 read getw write setw;
- end;
- type
- TSPI3Registers = record
- SPI1ACONbits : TSPI3_SPI1ACON;
- SPI1ACON : longWord;
- SPI3CONbits : TSPI3_SPI3CON;
- SPI3CON : longWord;
- SPI1ACONCLR : longWord;
- SPI3CONCLR : longWord;
- SPI1ACONSET : longWord;
- SPI3CONSET : longWord;
- SPI1ACONINV : longWord;
- SPI3CONINV : longWord;
- SPI1ASTATbits : TSPI3_SPI1ASTAT;
- SPI1ASTAT : longWord;
- SPI3STATbits : TSPI3_SPI3STAT;
- SPI3STAT : longWord;
- SPI1ASTATCLR : longWord;
- SPI3STATCLR : longWord;
- SPI1ASTATSET : longWord;
- SPI3STATSET : longWord;
- SPI1ASTATINV : longWord;
- SPI3STATINV : longWord;
- SPI1ABUF : longWord;
- SPI3BUF : longWord;
- SPI1ABRG : longWord;
- SPI3BRG : longWord;
- SPI1ABRGCLR : longWord;
- SPI3BRGCLR : longWord;
- SPI1ABRGSET : longWord;
- SPI3BRGSET : longWord;
- SPI1ABRGINV : longWord;
- SPI3BRGINV : longWord;
- end;
- TSPI2A_SPI2ACON = record
- private
- function getCKE : TBits_1; inline;
- function getCKP : TBits_1; inline;
- function getDISSDO : TBits_1; inline;
- function getENHBUF : TBits_1; inline;
- function getFRMCNT : TBits_3; inline;
- function getFRMEN : TBits_1; inline;
- function getFRMPOL : TBits_1; inline;
- function getFRMSYNC : TBits_1; inline;
- function getFRMSYPW : TBits_1; inline;
- function getMODE16 : TBits_1; inline;
- function getMODE32 : TBits_1; inline;
- function getMSSEN : TBits_1; inline;
- function getMSTEN : TBits_1; inline;
- function getON : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getSMP : TBits_1; inline;
- function getSPIFE : TBits_1; inline;
- function getSRXISEL : TBits_2; inline;
- function getSSEN : TBits_1; inline;
- function getSTXISEL : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setCKE(thebits : TBits_1); inline;
- procedure setCKP(thebits : TBits_1); inline;
- procedure setDISSDO(thebits : TBits_1); inline;
- procedure setENHBUF(thebits : TBits_1); inline;
- procedure setFRMCNT(thebits : TBits_3); inline;
- procedure setFRMEN(thebits : TBits_1); inline;
- procedure setFRMPOL(thebits : TBits_1); inline;
- procedure setFRMSYNC(thebits : TBits_1); inline;
- procedure setFRMSYPW(thebits : TBits_1); inline;
- procedure setMODE16(thebits : TBits_1); inline;
- procedure setMODE32(thebits : TBits_1); inline;
- procedure setMSSEN(thebits : TBits_1); inline;
- procedure setMSTEN(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setSMP(thebits : TBits_1); inline;
- procedure setSPIFE(thebits : TBits_1); inline;
- procedure setSRXISEL(thebits : TBits_2); inline;
- procedure setSSEN(thebits : TBits_1); inline;
- procedure setSTXISEL(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCKE; inline;
- procedure clearCKP; inline;
- procedure clearDISSDO; inline;
- procedure clearENHBUF; inline;
- procedure clearFRMEN; inline;
- procedure clearFRMPOL; inline;
- procedure clearFRMSYNC; inline;
- procedure clearFRMSYPW; inline;
- procedure clearMODE16; inline;
- procedure clearMODE32; inline;
- procedure clearMSSEN; inline;
- procedure clearMSTEN; inline;
- procedure clearON; inline;
- procedure clearSIDL; inline;
- procedure clearSMP; inline;
- procedure clearSPIFE; inline;
- procedure clearSSEN; inline;
- procedure setCKE; inline;
- procedure setCKP; inline;
- procedure setDISSDO; inline;
- procedure setENHBUF; inline;
- procedure setFRMEN; inline;
- procedure setFRMPOL; inline;
- procedure setFRMSYNC; inline;
- procedure setFRMSYPW; inline;
- procedure setMODE16; inline;
- procedure setMODE32; inline;
- procedure setMSSEN; inline;
- procedure setMSTEN; inline;
- procedure setON; inline;
- procedure setSIDL; inline;
- procedure setSMP; inline;
- procedure setSPIFE; inline;
- procedure setSSEN; inline;
- property CKE : TBits_1 read getCKE write setCKE;
- property CKP : TBits_1 read getCKP write setCKP;
- property DISSDO : TBits_1 read getDISSDO write setDISSDO;
- property ENHBUF : TBits_1 read getENHBUF write setENHBUF;
- property FRMCNT : TBits_3 read getFRMCNT write setFRMCNT;
- property FRMEN : TBits_1 read getFRMEN write setFRMEN;
- property FRMPOL : TBits_1 read getFRMPOL write setFRMPOL;
- property FRMSYNC : TBits_1 read getFRMSYNC write setFRMSYNC;
- property FRMSYPW : TBits_1 read getFRMSYPW write setFRMSYPW;
- property MODE16 : TBits_1 read getMODE16 write setMODE16;
- property MODE32 : TBits_1 read getMODE32 write setMODE32;
- property MSSEN : TBits_1 read getMSSEN write setMSSEN;
- property MSTEN : TBits_1 read getMSTEN write setMSTEN;
- property ON : TBits_1 read getON write setON;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property SMP : TBits_1 read getSMP write setSMP;
- property SPIFE : TBits_1 read getSPIFE write setSPIFE;
- property SRXISEL : TBits_2 read getSRXISEL write setSRXISEL;
- property SSEN : TBits_1 read getSSEN write setSSEN;
- property STXISEL : TBits_2 read getSTXISEL write setSTXISEL;
- property w : TBits_32 read getw write setw;
- end;
- TSPI2A_SPI2CON = record
- private
- function getCKE : TBits_1; inline;
- function getCKP : TBits_1; inline;
- function getDISSDO : TBits_1; inline;
- function getENHBUF : TBits_1; inline;
- function getFRMCNT : TBits_3; inline;
- function getFRMEN : TBits_1; inline;
- function getFRMPOL : TBits_1; inline;
- function getFRMSYNC : TBits_1; inline;
- function getFRMSYPW : TBits_1; inline;
- function getMODE16 : TBits_1; inline;
- function getMODE32 : TBits_1; inline;
- function getMSSEN : TBits_1; inline;
- function getMSTEN : TBits_1; inline;
- function getON : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getSMP : TBits_1; inline;
- function getSPIFE : TBits_1; inline;
- function getSRXISEL : TBits_2; inline;
- function getSSEN : TBits_1; inline;
- function getSTXISEL : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setCKE(thebits : TBits_1); inline;
- procedure setCKP(thebits : TBits_1); inline;
- procedure setDISSDO(thebits : TBits_1); inline;
- procedure setENHBUF(thebits : TBits_1); inline;
- procedure setFRMCNT(thebits : TBits_3); inline;
- procedure setFRMEN(thebits : TBits_1); inline;
- procedure setFRMPOL(thebits : TBits_1); inline;
- procedure setFRMSYNC(thebits : TBits_1); inline;
- procedure setFRMSYPW(thebits : TBits_1); inline;
- procedure setMODE16(thebits : TBits_1); inline;
- procedure setMODE32(thebits : TBits_1); inline;
- procedure setMSSEN(thebits : TBits_1); inline;
- procedure setMSTEN(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setSMP(thebits : TBits_1); inline;
- procedure setSPIFE(thebits : TBits_1); inline;
- procedure setSRXISEL(thebits : TBits_2); inline;
- procedure setSSEN(thebits : TBits_1); inline;
- procedure setSTXISEL(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCKE; inline;
- procedure clearCKP; inline;
- procedure clearDISSDO; inline;
- procedure clearENHBUF; inline;
- procedure clearFRMEN; inline;
- procedure clearFRMPOL; inline;
- procedure clearFRMSYNC; inline;
- procedure clearFRMSYPW; inline;
- procedure clearMODE16; inline;
- procedure clearMODE32; inline;
- procedure clearMSSEN; inline;
- procedure clearMSTEN; inline;
- procedure clearON; inline;
- procedure clearSIDL; inline;
- procedure clearSMP; inline;
- procedure clearSPIFE; inline;
- procedure clearSSEN; inline;
- procedure setCKE; inline;
- procedure setCKP; inline;
- procedure setDISSDO; inline;
- procedure setENHBUF; inline;
- procedure setFRMEN; inline;
- procedure setFRMPOL; inline;
- procedure setFRMSYNC; inline;
- procedure setFRMSYPW; inline;
- procedure setMODE16; inline;
- procedure setMODE32; inline;
- procedure setMSSEN; inline;
- procedure setMSTEN; inline;
- procedure setON; inline;
- procedure setSIDL; inline;
- procedure setSMP; inline;
- procedure setSPIFE; inline;
- procedure setSSEN; inline;
- property CKE : TBits_1 read getCKE write setCKE;
- property CKP : TBits_1 read getCKP write setCKP;
- property DISSDO : TBits_1 read getDISSDO write setDISSDO;
- property ENHBUF : TBits_1 read getENHBUF write setENHBUF;
- property FRMCNT : TBits_3 read getFRMCNT write setFRMCNT;
- property FRMEN : TBits_1 read getFRMEN write setFRMEN;
- property FRMPOL : TBits_1 read getFRMPOL write setFRMPOL;
- property FRMSYNC : TBits_1 read getFRMSYNC write setFRMSYNC;
- property FRMSYPW : TBits_1 read getFRMSYPW write setFRMSYPW;
- property MODE16 : TBits_1 read getMODE16 write setMODE16;
- property MODE32 : TBits_1 read getMODE32 write setMODE32;
- property MSSEN : TBits_1 read getMSSEN write setMSSEN;
- property MSTEN : TBits_1 read getMSTEN write setMSTEN;
- property ON : TBits_1 read getON write setON;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property SMP : TBits_1 read getSMP write setSMP;
- property SPIFE : TBits_1 read getSPIFE write setSPIFE;
- property SRXISEL : TBits_2 read getSRXISEL write setSRXISEL;
- property SSEN : TBits_1 read getSSEN write setSSEN;
- property STXISEL : TBits_2 read getSTXISEL write setSTXISEL;
- property w : TBits_32 read getw write setw;
- end;
- TSPI2A_SPI2ASTAT = record
- private
- function getRXBUFELM : TBits_5; inline;
- function getSPIBUSY : TBits_1; inline;
- function getSPIRBE : TBits_1; inline;
- function getSPIRBF : TBits_1; inline;
- function getSPIROV : TBits_1; inline;
- function getSPITBE : TBits_1; inline;
- function getSPITBF : TBits_1; inline;
- function getSPITUR : TBits_1; inline;
- function getSRMT : TBits_1; inline;
- function getTXBUFELM : TBits_5; inline;
- function getw : TBits_32; inline;
- procedure setRXBUFELM(thebits : TBits_5); inline;
- procedure setSPIBUSY(thebits : TBits_1); inline;
- procedure setSPIRBE(thebits : TBits_1); inline;
- procedure setSPIRBF(thebits : TBits_1); inline;
- procedure setSPIROV(thebits : TBits_1); inline;
- procedure setSPITBE(thebits : TBits_1); inline;
- procedure setSPITBF(thebits : TBits_1); inline;
- procedure setSPITUR(thebits : TBits_1); inline;
- procedure setSRMT(thebits : TBits_1); inline;
- procedure setTXBUFELM(thebits : TBits_5); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearSPIBUSY; inline;
- procedure clearSPIRBE; inline;
- procedure clearSPIRBF; inline;
- procedure clearSPIROV; inline;
- procedure clearSPITBE; inline;
- procedure clearSPITBF; inline;
- procedure clearSPITUR; inline;
- procedure clearSRMT; inline;
- procedure setSPIBUSY; inline;
- procedure setSPIRBE; inline;
- procedure setSPIRBF; inline;
- procedure setSPIROV; inline;
- procedure setSPITBE; inline;
- procedure setSPITBF; inline;
- procedure setSPITUR; inline;
- procedure setSRMT; inline;
- property RXBUFELM : TBits_5 read getRXBUFELM write setRXBUFELM;
- property SPIBUSY : TBits_1 read getSPIBUSY write setSPIBUSY;
- property SPIRBE : TBits_1 read getSPIRBE write setSPIRBE;
- property SPIRBF : TBits_1 read getSPIRBF write setSPIRBF;
- property SPIROV : TBits_1 read getSPIROV write setSPIROV;
- property SPITBE : TBits_1 read getSPITBE write setSPITBE;
- property SPITBF : TBits_1 read getSPITBF write setSPITBF;
- property SPITUR : TBits_1 read getSPITUR write setSPITUR;
- property SRMT : TBits_1 read getSRMT write setSRMT;
- property TXBUFELM : TBits_5 read getTXBUFELM write setTXBUFELM;
- property w : TBits_32 read getw write setw;
- end;
- TSPI2A_SPI2STAT = record
- private
- function getRXBUFELM : TBits_5; inline;
- function getSPIBUSY : TBits_1; inline;
- function getSPIRBE : TBits_1; inline;
- function getSPIRBF : TBits_1; inline;
- function getSPIROV : TBits_1; inline;
- function getSPITBE : TBits_1; inline;
- function getSPITBF : TBits_1; inline;
- function getSPITUR : TBits_1; inline;
- function getSRMT : TBits_1; inline;
- function getTXBUFELM : TBits_5; inline;
- function getw : TBits_32; inline;
- procedure setRXBUFELM(thebits : TBits_5); inline;
- procedure setSPIBUSY(thebits : TBits_1); inline;
- procedure setSPIRBE(thebits : TBits_1); inline;
- procedure setSPIRBF(thebits : TBits_1); inline;
- procedure setSPIROV(thebits : TBits_1); inline;
- procedure setSPITBE(thebits : TBits_1); inline;
- procedure setSPITBF(thebits : TBits_1); inline;
- procedure setSPITUR(thebits : TBits_1); inline;
- procedure setSRMT(thebits : TBits_1); inline;
- procedure setTXBUFELM(thebits : TBits_5); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearSPIBUSY; inline;
- procedure clearSPIRBE; inline;
- procedure clearSPIRBF; inline;
- procedure clearSPIROV; inline;
- procedure clearSPITBE; inline;
- procedure clearSPITBF; inline;
- procedure clearSPITUR; inline;
- procedure clearSRMT; inline;
- procedure setSPIBUSY; inline;
- procedure setSPIRBE; inline;
- procedure setSPIRBF; inline;
- procedure setSPIROV; inline;
- procedure setSPITBE; inline;
- procedure setSPITBF; inline;
- procedure setSPITUR; inline;
- procedure setSRMT; inline;
- property RXBUFELM : TBits_5 read getRXBUFELM write setRXBUFELM;
- property SPIBUSY : TBits_1 read getSPIBUSY write setSPIBUSY;
- property SPIRBE : TBits_1 read getSPIRBE write setSPIRBE;
- property SPIRBF : TBits_1 read getSPIRBF write setSPIRBF;
- property SPIROV : TBits_1 read getSPIROV write setSPIROV;
- property SPITBE : TBits_1 read getSPITBE write setSPITBE;
- property SPITBF : TBits_1 read getSPITBF write setSPITBF;
- property SPITUR : TBits_1 read getSPITUR write setSPITUR;
- property SRMT : TBits_1 read getSRMT write setSRMT;
- property TXBUFELM : TBits_5 read getTXBUFELM write setTXBUFELM;
- property w : TBits_32 read getw write setw;
- end;
- type
- TSPI2ARegisters = record
- SPI2ACONbits : TSPI2A_SPI2ACON;
- SPI2ACON : longWord;
- SPI2CONbits : TSPI2A_SPI2CON;
- SPI2CON : longWord;
- SPI2ACONCLR : longWord;
- SPI2CONCLR : longWord;
- SPI2ACONSET : longWord;
- SPI2CONSET : longWord;
- SPI2ACONINV : longWord;
- SPI2CONINV : longWord;
- SPI2ASTATbits : TSPI2A_SPI2ASTAT;
- SPI2ASTAT : longWord;
- SPI2STATbits : TSPI2A_SPI2STAT;
- SPI2STAT : longWord;
- SPI2ASTATCLR : longWord;
- SPI2STATCLR : longWord;
- SPI2ASTATSET : longWord;
- SPI2STATSET : longWord;
- SPI2ASTATINV : longWord;
- SPI2STATINV : longWord;
- SPI2ABUF : longWord;
- SPI2BUF : longWord;
- SPI2ABRG : longWord;
- SPI2BRG : longWord;
- SPI2ABRGCLR : longWord;
- SPI2BRGCLR : longWord;
- SPI2ABRGSET : longWord;
- SPI2BRGSET : longWord;
- SPI2ABRGINV : longWord;
- SPI2BRGINV : longWord;
- end;
- TSPI3A_SPI3ACON = record
- private
- function getCKE : TBits_1; inline;
- function getCKP : TBits_1; inline;
- function getDISSDO : TBits_1; inline;
- function getENHBUF : TBits_1; inline;
- function getFRMCNT : TBits_3; inline;
- function getFRMEN : TBits_1; inline;
- function getFRMPOL : TBits_1; inline;
- function getFRMSYNC : TBits_1; inline;
- function getFRMSYPW : TBits_1; inline;
- function getMODE16 : TBits_1; inline;
- function getMODE32 : TBits_1; inline;
- function getMSSEN : TBits_1; inline;
- function getMSTEN : TBits_1; inline;
- function getON : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getSMP : TBits_1; inline;
- function getSPIFE : TBits_1; inline;
- function getSRXISEL : TBits_2; inline;
- function getSSEN : TBits_1; inline;
- function getSTXISEL : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setCKE(thebits : TBits_1); inline;
- procedure setCKP(thebits : TBits_1); inline;
- procedure setDISSDO(thebits : TBits_1); inline;
- procedure setENHBUF(thebits : TBits_1); inline;
- procedure setFRMCNT(thebits : TBits_3); inline;
- procedure setFRMEN(thebits : TBits_1); inline;
- procedure setFRMPOL(thebits : TBits_1); inline;
- procedure setFRMSYNC(thebits : TBits_1); inline;
- procedure setFRMSYPW(thebits : TBits_1); inline;
- procedure setMODE16(thebits : TBits_1); inline;
- procedure setMODE32(thebits : TBits_1); inline;
- procedure setMSSEN(thebits : TBits_1); inline;
- procedure setMSTEN(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setSMP(thebits : TBits_1); inline;
- procedure setSPIFE(thebits : TBits_1); inline;
- procedure setSRXISEL(thebits : TBits_2); inline;
- procedure setSSEN(thebits : TBits_1); inline;
- procedure setSTXISEL(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCKE; inline;
- procedure clearCKP; inline;
- procedure clearDISSDO; inline;
- procedure clearENHBUF; inline;
- procedure clearFRMEN; inline;
- procedure clearFRMPOL; inline;
- procedure clearFRMSYNC; inline;
- procedure clearFRMSYPW; inline;
- procedure clearMODE16; inline;
- procedure clearMODE32; inline;
- procedure clearMSSEN; inline;
- procedure clearMSTEN; inline;
- procedure clearON; inline;
- procedure clearSIDL; inline;
- procedure clearSMP; inline;
- procedure clearSPIFE; inline;
- procedure clearSSEN; inline;
- procedure setCKE; inline;
- procedure setCKP; inline;
- procedure setDISSDO; inline;
- procedure setENHBUF; inline;
- procedure setFRMEN; inline;
- procedure setFRMPOL; inline;
- procedure setFRMSYNC; inline;
- procedure setFRMSYPW; inline;
- procedure setMODE16; inline;
- procedure setMODE32; inline;
- procedure setMSSEN; inline;
- procedure setMSTEN; inline;
- procedure setON; inline;
- procedure setSIDL; inline;
- procedure setSMP; inline;
- procedure setSPIFE; inline;
- procedure setSSEN; inline;
- property CKE : TBits_1 read getCKE write setCKE;
- property CKP : TBits_1 read getCKP write setCKP;
- property DISSDO : TBits_1 read getDISSDO write setDISSDO;
- property ENHBUF : TBits_1 read getENHBUF write setENHBUF;
- property FRMCNT : TBits_3 read getFRMCNT write setFRMCNT;
- property FRMEN : TBits_1 read getFRMEN write setFRMEN;
- property FRMPOL : TBits_1 read getFRMPOL write setFRMPOL;
- property FRMSYNC : TBits_1 read getFRMSYNC write setFRMSYNC;
- property FRMSYPW : TBits_1 read getFRMSYPW write setFRMSYPW;
- property MODE16 : TBits_1 read getMODE16 write setMODE16;
- property MODE32 : TBits_1 read getMODE32 write setMODE32;
- property MSSEN : TBits_1 read getMSSEN write setMSSEN;
- property MSTEN : TBits_1 read getMSTEN write setMSTEN;
- property ON : TBits_1 read getON write setON;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property SMP : TBits_1 read getSMP write setSMP;
- property SPIFE : TBits_1 read getSPIFE write setSPIFE;
- property SRXISEL : TBits_2 read getSRXISEL write setSRXISEL;
- property SSEN : TBits_1 read getSSEN write setSSEN;
- property STXISEL : TBits_2 read getSTXISEL write setSTXISEL;
- property w : TBits_32 read getw write setw;
- end;
- TSPI3A_SPI4CON = record
- private
- function getCKE : TBits_1; inline;
- function getCKP : TBits_1; inline;
- function getDISSDO : TBits_1; inline;
- function getENHBUF : TBits_1; inline;
- function getFRMCNT : TBits_3; inline;
- function getFRMEN : TBits_1; inline;
- function getFRMPOL : TBits_1; inline;
- function getFRMSYNC : TBits_1; inline;
- function getFRMSYPW : TBits_1; inline;
- function getMODE16 : TBits_1; inline;
- function getMODE32 : TBits_1; inline;
- function getMSSEN : TBits_1; inline;
- function getMSTEN : TBits_1; inline;
- function getON : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getSMP : TBits_1; inline;
- function getSPIFE : TBits_1; inline;
- function getSRXISEL : TBits_2; inline;
- function getSSEN : TBits_1; inline;
- function getSTXISEL : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setCKE(thebits : TBits_1); inline;
- procedure setCKP(thebits : TBits_1); inline;
- procedure setDISSDO(thebits : TBits_1); inline;
- procedure setENHBUF(thebits : TBits_1); inline;
- procedure setFRMCNT(thebits : TBits_3); inline;
- procedure setFRMEN(thebits : TBits_1); inline;
- procedure setFRMPOL(thebits : TBits_1); inline;
- procedure setFRMSYNC(thebits : TBits_1); inline;
- procedure setFRMSYPW(thebits : TBits_1); inline;
- procedure setMODE16(thebits : TBits_1); inline;
- procedure setMODE32(thebits : TBits_1); inline;
- procedure setMSSEN(thebits : TBits_1); inline;
- procedure setMSTEN(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setSMP(thebits : TBits_1); inline;
- procedure setSPIFE(thebits : TBits_1); inline;
- procedure setSRXISEL(thebits : TBits_2); inline;
- procedure setSSEN(thebits : TBits_1); inline;
- procedure setSTXISEL(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCKE; inline;
- procedure clearCKP; inline;
- procedure clearDISSDO; inline;
- procedure clearENHBUF; inline;
- procedure clearFRMEN; inline;
- procedure clearFRMPOL; inline;
- procedure clearFRMSYNC; inline;
- procedure clearFRMSYPW; inline;
- procedure clearMODE16; inline;
- procedure clearMODE32; inline;
- procedure clearMSSEN; inline;
- procedure clearMSTEN; inline;
- procedure clearON; inline;
- procedure clearSIDL; inline;
- procedure clearSMP; inline;
- procedure clearSPIFE; inline;
- procedure clearSSEN; inline;
- procedure setCKE; inline;
- procedure setCKP; inline;
- procedure setDISSDO; inline;
- procedure setENHBUF; inline;
- procedure setFRMEN; inline;
- procedure setFRMPOL; inline;
- procedure setFRMSYNC; inline;
- procedure setFRMSYPW; inline;
- procedure setMODE16; inline;
- procedure setMODE32; inline;
- procedure setMSSEN; inline;
- procedure setMSTEN; inline;
- procedure setON; inline;
- procedure setSIDL; inline;
- procedure setSMP; inline;
- procedure setSPIFE; inline;
- procedure setSSEN; inline;
- property CKE : TBits_1 read getCKE write setCKE;
- property CKP : TBits_1 read getCKP write setCKP;
- property DISSDO : TBits_1 read getDISSDO write setDISSDO;
- property ENHBUF : TBits_1 read getENHBUF write setENHBUF;
- property FRMCNT : TBits_3 read getFRMCNT write setFRMCNT;
- property FRMEN : TBits_1 read getFRMEN write setFRMEN;
- property FRMPOL : TBits_1 read getFRMPOL write setFRMPOL;
- property FRMSYNC : TBits_1 read getFRMSYNC write setFRMSYNC;
- property FRMSYPW : TBits_1 read getFRMSYPW write setFRMSYPW;
- property MODE16 : TBits_1 read getMODE16 write setMODE16;
- property MODE32 : TBits_1 read getMODE32 write setMODE32;
- property MSSEN : TBits_1 read getMSSEN write setMSSEN;
- property MSTEN : TBits_1 read getMSTEN write setMSTEN;
- property ON : TBits_1 read getON write setON;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property SMP : TBits_1 read getSMP write setSMP;
- property SPIFE : TBits_1 read getSPIFE write setSPIFE;
- property SRXISEL : TBits_2 read getSRXISEL write setSRXISEL;
- property SSEN : TBits_1 read getSSEN write setSSEN;
- property STXISEL : TBits_2 read getSTXISEL write setSTXISEL;
- property w : TBits_32 read getw write setw;
- end;
- TSPI3A_SPI3ASTAT = record
- private
- function getRXBUFELM : TBits_5; inline;
- function getSPIBUSY : TBits_1; inline;
- function getSPIRBE : TBits_1; inline;
- function getSPIRBF : TBits_1; inline;
- function getSPIROV : TBits_1; inline;
- function getSPITBE : TBits_1; inline;
- function getSPITBF : TBits_1; inline;
- function getSPITUR : TBits_1; inline;
- function getSRMT : TBits_1; inline;
- function getTXBUFELM : TBits_5; inline;
- function getw : TBits_32; inline;
- procedure setRXBUFELM(thebits : TBits_5); inline;
- procedure setSPIBUSY(thebits : TBits_1); inline;
- procedure setSPIRBE(thebits : TBits_1); inline;
- procedure setSPIRBF(thebits : TBits_1); inline;
- procedure setSPIROV(thebits : TBits_1); inline;
- procedure setSPITBE(thebits : TBits_1); inline;
- procedure setSPITBF(thebits : TBits_1); inline;
- procedure setSPITUR(thebits : TBits_1); inline;
- procedure setSRMT(thebits : TBits_1); inline;
- procedure setTXBUFELM(thebits : TBits_5); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearSPIBUSY; inline;
- procedure clearSPIRBE; inline;
- procedure clearSPIRBF; inline;
- procedure clearSPIROV; inline;
- procedure clearSPITBE; inline;
- procedure clearSPITBF; inline;
- procedure clearSPITUR; inline;
- procedure clearSRMT; inline;
- procedure setSPIBUSY; inline;
- procedure setSPIRBE; inline;
- procedure setSPIRBF; inline;
- procedure setSPIROV; inline;
- procedure setSPITBE; inline;
- procedure setSPITBF; inline;
- procedure setSPITUR; inline;
- procedure setSRMT; inline;
- property RXBUFELM : TBits_5 read getRXBUFELM write setRXBUFELM;
- property SPIBUSY : TBits_1 read getSPIBUSY write setSPIBUSY;
- property SPIRBE : TBits_1 read getSPIRBE write setSPIRBE;
- property SPIRBF : TBits_1 read getSPIRBF write setSPIRBF;
- property SPIROV : TBits_1 read getSPIROV write setSPIROV;
- property SPITBE : TBits_1 read getSPITBE write setSPITBE;
- property SPITBF : TBits_1 read getSPITBF write setSPITBF;
- property SPITUR : TBits_1 read getSPITUR write setSPITUR;
- property SRMT : TBits_1 read getSRMT write setSRMT;
- property TXBUFELM : TBits_5 read getTXBUFELM write setTXBUFELM;
- property w : TBits_32 read getw write setw;
- end;
- TSPI3A_SPI4STAT = record
- private
- function getRXBUFELM : TBits_5; inline;
- function getSPIBUSY : TBits_1; inline;
- function getSPIRBE : TBits_1; inline;
- function getSPIRBF : TBits_1; inline;
- function getSPIROV : TBits_1; inline;
- function getSPITBE : TBits_1; inline;
- function getSPITBF : TBits_1; inline;
- function getSPITUR : TBits_1; inline;
- function getSRMT : TBits_1; inline;
- function getTXBUFELM : TBits_5; inline;
- function getw : TBits_32; inline;
- procedure setRXBUFELM(thebits : TBits_5); inline;
- procedure setSPIBUSY(thebits : TBits_1); inline;
- procedure setSPIRBE(thebits : TBits_1); inline;
- procedure setSPIRBF(thebits : TBits_1); inline;
- procedure setSPIROV(thebits : TBits_1); inline;
- procedure setSPITBE(thebits : TBits_1); inline;
- procedure setSPITBF(thebits : TBits_1); inline;
- procedure setSPITUR(thebits : TBits_1); inline;
- procedure setSRMT(thebits : TBits_1); inline;
- procedure setTXBUFELM(thebits : TBits_5); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearSPIBUSY; inline;
- procedure clearSPIRBE; inline;
- procedure clearSPIRBF; inline;
- procedure clearSPIROV; inline;
- procedure clearSPITBE; inline;
- procedure clearSPITBF; inline;
- procedure clearSPITUR; inline;
- procedure clearSRMT; inline;
- procedure setSPIBUSY; inline;
- procedure setSPIRBE; inline;
- procedure setSPIRBF; inline;
- procedure setSPIROV; inline;
- procedure setSPITBE; inline;
- procedure setSPITBF; inline;
- procedure setSPITUR; inline;
- procedure setSRMT; inline;
- property RXBUFELM : TBits_5 read getRXBUFELM write setRXBUFELM;
- property SPIBUSY : TBits_1 read getSPIBUSY write setSPIBUSY;
- property SPIRBE : TBits_1 read getSPIRBE write setSPIRBE;
- property SPIRBF : TBits_1 read getSPIRBF write setSPIRBF;
- property SPIROV : TBits_1 read getSPIROV write setSPIROV;
- property SPITBE : TBits_1 read getSPITBE write setSPITBE;
- property SPITBF : TBits_1 read getSPITBF write setSPITBF;
- property SPITUR : TBits_1 read getSPITUR write setSPITUR;
- property SRMT : TBits_1 read getSRMT write setSRMT;
- property TXBUFELM : TBits_5 read getTXBUFELM write setTXBUFELM;
- property w : TBits_32 read getw write setw;
- end;
- type
- TSPI3ARegisters = record
- SPI3ACONbits : TSPI3A_SPI3ACON;
- SPI3ACON : longWord;
- SPI4CONbits : TSPI3A_SPI4CON;
- SPI4CON : longWord;
- SPI3ACONCLR : longWord;
- SPI4CONCLR : longWord;
- SPI3ACONSET : longWord;
- SPI4CONSET : longWord;
- SPI3ACONINV : longWord;
- SPI4CONINV : longWord;
- SPI3ASTATbits : TSPI3A_SPI3ASTAT;
- SPI3ASTAT : longWord;
- SPI4STATbits : TSPI3A_SPI4STAT;
- SPI4STAT : longWord;
- SPI3ASTATCLR : longWord;
- SPI4STATCLR : longWord;
- SPI3ASTATSET : longWord;
- SPI4STATSET : longWord;
- SPI3ASTATINV : longWord;
- SPI4STATINV : longWord;
- SPI3ABUF : longWord;
- SPI4BUF : longWord;
- SPI3ABRG : longWord;
- SPI4BRG : longWord;
- SPI3ABRGCLR : longWord;
- SPI4BRGCLR : longWord;
- SPI3ABRGSET : longWord;
- SPI4BRGSET : longWord;
- SPI3ABRGINV : longWord;
- SPI4BRGINV : longWord;
- end;
- TSPI1_SPI1CON = record
- private
- function getCKE : TBits_1; inline;
- function getCKP : TBits_1; inline;
- function getDISSDO : TBits_1; inline;
- function getENHBUF : TBits_1; inline;
- function getFRMCNT : TBits_3; inline;
- function getFRMEN : TBits_1; inline;
- function getFRMPOL : TBits_1; inline;
- function getFRMSYNC : TBits_1; inline;
- function getFRMSYPW : TBits_1; inline;
- function getMODE16 : TBits_1; inline;
- function getMODE32 : TBits_1; inline;
- function getMSSEN : TBits_1; inline;
- function getMSTEN : TBits_1; inline;
- function getON : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getSMP : TBits_1; inline;
- function getSPIFE : TBits_1; inline;
- function getSRXISEL : TBits_2; inline;
- function getSSEN : TBits_1; inline;
- function getSTXISEL : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setCKE(thebits : TBits_1); inline;
- procedure setCKP(thebits : TBits_1); inline;
- procedure setDISSDO(thebits : TBits_1); inline;
- procedure setENHBUF(thebits : TBits_1); inline;
- procedure setFRMCNT(thebits : TBits_3); inline;
- procedure setFRMEN(thebits : TBits_1); inline;
- procedure setFRMPOL(thebits : TBits_1); inline;
- procedure setFRMSYNC(thebits : TBits_1); inline;
- procedure setFRMSYPW(thebits : TBits_1); inline;
- procedure setMODE16(thebits : TBits_1); inline;
- procedure setMODE32(thebits : TBits_1); inline;
- procedure setMSSEN(thebits : TBits_1); inline;
- procedure setMSTEN(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setSMP(thebits : TBits_1); inline;
- procedure setSPIFE(thebits : TBits_1); inline;
- procedure setSRXISEL(thebits : TBits_2); inline;
- procedure setSSEN(thebits : TBits_1); inline;
- procedure setSTXISEL(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCKE; inline;
- procedure clearCKP; inline;
- procedure clearDISSDO; inline;
- procedure clearENHBUF; inline;
- procedure clearFRMEN; inline;
- procedure clearFRMPOL; inline;
- procedure clearFRMSYNC; inline;
- procedure clearFRMSYPW; inline;
- procedure clearMODE16; inline;
- procedure clearMODE32; inline;
- procedure clearMSSEN; inline;
- procedure clearMSTEN; inline;
- procedure clearON; inline;
- procedure clearSIDL; inline;
- procedure clearSMP; inline;
- procedure clearSPIFE; inline;
- procedure clearSSEN; inline;
- procedure setCKE; inline;
- procedure setCKP; inline;
- procedure setDISSDO; inline;
- procedure setENHBUF; inline;
- procedure setFRMEN; inline;
- procedure setFRMPOL; inline;
- procedure setFRMSYNC; inline;
- procedure setFRMSYPW; inline;
- procedure setMODE16; inline;
- procedure setMODE32; inline;
- procedure setMSSEN; inline;
- procedure setMSTEN; inline;
- procedure setON; inline;
- procedure setSIDL; inline;
- procedure setSMP; inline;
- procedure setSPIFE; inline;
- procedure setSSEN; inline;
- property CKE : TBits_1 read getCKE write setCKE;
- property CKP : TBits_1 read getCKP write setCKP;
- property DISSDO : TBits_1 read getDISSDO write setDISSDO;
- property ENHBUF : TBits_1 read getENHBUF write setENHBUF;
- property FRMCNT : TBits_3 read getFRMCNT write setFRMCNT;
- property FRMEN : TBits_1 read getFRMEN write setFRMEN;
- property FRMPOL : TBits_1 read getFRMPOL write setFRMPOL;
- property FRMSYNC : TBits_1 read getFRMSYNC write setFRMSYNC;
- property FRMSYPW : TBits_1 read getFRMSYPW write setFRMSYPW;
- property MODE16 : TBits_1 read getMODE16 write setMODE16;
- property MODE32 : TBits_1 read getMODE32 write setMODE32;
- property MSSEN : TBits_1 read getMSSEN write setMSSEN;
- property MSTEN : TBits_1 read getMSTEN write setMSTEN;
- property ON : TBits_1 read getON write setON;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property SMP : TBits_1 read getSMP write setSMP;
- property SPIFE : TBits_1 read getSPIFE write setSPIFE;
- property SRXISEL : TBits_2 read getSRXISEL write setSRXISEL;
- property SSEN : TBits_1 read getSSEN write setSSEN;
- property STXISEL : TBits_2 read getSTXISEL write setSTXISEL;
- property w : TBits_32 read getw write setw;
- end;
- TSPI1_SPI1STAT = record
- private
- function getRXBUFELM : TBits_5; inline;
- function getSPIBUSY : TBits_1; inline;
- function getSPIRBE : TBits_1; inline;
- function getSPIRBF : TBits_1; inline;
- function getSPIROV : TBits_1; inline;
- function getSPITBE : TBits_1; inline;
- function getSPITBF : TBits_1; inline;
- function getSPITUR : TBits_1; inline;
- function getSRMT : TBits_1; inline;
- function getTXBUFELM : TBits_5; inline;
- function getw : TBits_32; inline;
- procedure setRXBUFELM(thebits : TBits_5); inline;
- procedure setSPIBUSY(thebits : TBits_1); inline;
- procedure setSPIRBE(thebits : TBits_1); inline;
- procedure setSPIRBF(thebits : TBits_1); inline;
- procedure setSPIROV(thebits : TBits_1); inline;
- procedure setSPITBE(thebits : TBits_1); inline;
- procedure setSPITBF(thebits : TBits_1); inline;
- procedure setSPITUR(thebits : TBits_1); inline;
- procedure setSRMT(thebits : TBits_1); inline;
- procedure setTXBUFELM(thebits : TBits_5); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearSPIBUSY; inline;
- procedure clearSPIRBE; inline;
- procedure clearSPIRBF; inline;
- procedure clearSPIROV; inline;
- procedure clearSPITBE; inline;
- procedure clearSPITBF; inline;
- procedure clearSPITUR; inline;
- procedure clearSRMT; inline;
- procedure setSPIBUSY; inline;
- procedure setSPIRBE; inline;
- procedure setSPIRBF; inline;
- procedure setSPIROV; inline;
- procedure setSPITBE; inline;
- procedure setSPITBF; inline;
- procedure setSPITUR; inline;
- procedure setSRMT; inline;
- property RXBUFELM : TBits_5 read getRXBUFELM write setRXBUFELM;
- property SPIBUSY : TBits_1 read getSPIBUSY write setSPIBUSY;
- property SPIRBE : TBits_1 read getSPIRBE write setSPIRBE;
- property SPIRBF : TBits_1 read getSPIRBF write setSPIRBF;
- property SPIROV : TBits_1 read getSPIROV write setSPIROV;
- property SPITBE : TBits_1 read getSPITBE write setSPITBE;
- property SPITBF : TBits_1 read getSPITBF write setSPITBF;
- property SPITUR : TBits_1 read getSPITUR write setSPITUR;
- property SRMT : TBits_1 read getSRMT write setSRMT;
- property TXBUFELM : TBits_5 read getTXBUFELM write setTXBUFELM;
- property w : TBits_32 read getw write setw;
- end;
- type
- TSPI1Registers = record
- SPI1CONbits : TSPI1_SPI1CON;
- SPI1CON : longWord;
- SPI1CONCLR : longWord;
- SPI1CONSET : longWord;
- SPI1CONINV : longWord;
- SPI1STATbits : TSPI1_SPI1STAT;
- SPI1STAT : longWord;
- SPI1STATCLR : longWord;
- SPI1STATSET : longWord;
- SPI1STATINV : longWord;
- SPI1BUF : longWord;
- SPI1BRG : longWord;
- SPI1BRGCLR : longWord;
- SPI1BRGSET : longWord;
- SPI1BRGINV : longWord;
- end;
- TUART1A_U1AMODE = record
- private
- function getABAUD : TBits_1; inline;
- function getBRGH : TBits_1; inline;
- function getIREN : TBits_1; inline;
- function getLPBACK : TBits_1; inline;
- function getON : TBits_1; inline;
- function getPDSEL : TBits_2; inline;
- function getPDSEL0 : TBits_1; inline;
- function getPDSEL1 : TBits_1; inline;
- function getRTSMD : TBits_1; inline;
- function getRXINV : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getSTSEL : TBits_1; inline;
- function getUARTEN : TBits_1; inline;
- function getUEN : TBits_2; inline;
- function getUEN0 : TBits_1; inline;
- function getUEN1 : TBits_1; inline;
- function getUSIDL : TBits_1; inline;
- function getWAKE : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setABAUD(thebits : TBits_1); inline;
- procedure setBRGH(thebits : TBits_1); inline;
- procedure setIREN(thebits : TBits_1); inline;
- procedure setLPBACK(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setPDSEL(thebits : TBits_2); inline;
- procedure setPDSEL0(thebits : TBits_1); inline;
- procedure setPDSEL1(thebits : TBits_1); inline;
- procedure setRTSMD(thebits : TBits_1); inline;
- procedure setRXINV(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setSTSEL(thebits : TBits_1); inline;
- procedure setUARTEN(thebits : TBits_1); inline;
- procedure setUEN(thebits : TBits_2); inline;
- procedure setUEN0(thebits : TBits_1); inline;
- procedure setUEN1(thebits : TBits_1); inline;
- procedure setUSIDL(thebits : TBits_1); inline;
- procedure setWAKE(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearABAUD; inline;
- procedure clearBRGH; inline;
- procedure clearIREN; inline;
- procedure clearLPBACK; inline;
- procedure clearON; inline;
- procedure clearPDSEL0; inline;
- procedure clearPDSEL1; inline;
- procedure clearRTSMD; inline;
- procedure clearRXINV; inline;
- procedure clearSIDL; inline;
- procedure clearSTSEL; inline;
- procedure clearUARTEN; inline;
- procedure clearUEN0; inline;
- procedure clearUEN1; inline;
- procedure clearUSIDL; inline;
- procedure clearWAKE; inline;
- procedure setABAUD; inline;
- procedure setBRGH; inline;
- procedure setIREN; inline;
- procedure setLPBACK; inline;
- procedure setON; inline;
- procedure setPDSEL0; inline;
- procedure setPDSEL1; inline;
- procedure setRTSMD; inline;
- procedure setRXINV; inline;
- procedure setSIDL; inline;
- procedure setSTSEL; inline;
- procedure setUARTEN; inline;
- procedure setUEN0; inline;
- procedure setUEN1; inline;
- procedure setUSIDL; inline;
- procedure setWAKE; inline;
- property ABAUD : TBits_1 read getABAUD write setABAUD;
- property BRGH : TBits_1 read getBRGH write setBRGH;
- property IREN : TBits_1 read getIREN write setIREN;
- property LPBACK : TBits_1 read getLPBACK write setLPBACK;
- property ON : TBits_1 read getON write setON;
- property PDSEL : TBits_2 read getPDSEL write setPDSEL;
- property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
- property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
- property RTSMD : TBits_1 read getRTSMD write setRTSMD;
- property RXINV : TBits_1 read getRXINV write setRXINV;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property STSEL : TBits_1 read getSTSEL write setSTSEL;
- property UARTEN : TBits_1 read getUARTEN write setUARTEN;
- property UEN : TBits_2 read getUEN write setUEN;
- property UEN0 : TBits_1 read getUEN0 write setUEN0;
- property UEN1 : TBits_1 read getUEN1 write setUEN1;
- property USIDL : TBits_1 read getUSIDL write setUSIDL;
- property WAKE : TBits_1 read getWAKE write setWAKE;
- property w : TBits_32 read getw write setw;
- end;
- TUART1A_U1MODE = record
- private
- function getABAUD : TBits_1; inline;
- function getBRGH : TBits_1; inline;
- function getIREN : TBits_1; inline;
- function getLPBACK : TBits_1; inline;
- function getON : TBits_1; inline;
- function getPDSEL : TBits_2; inline;
- function getPDSEL0 : TBits_1; inline;
- function getPDSEL1 : TBits_1; inline;
- function getRTSMD : TBits_1; inline;
- function getRXINV : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getSTSEL : TBits_1; inline;
- function getUARTEN : TBits_1; inline;
- function getUEN : TBits_2; inline;
- function getUEN0 : TBits_1; inline;
- function getUEN1 : TBits_1; inline;
- function getUSIDL : TBits_1; inline;
- function getWAKE : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setABAUD(thebits : TBits_1); inline;
- procedure setBRGH(thebits : TBits_1); inline;
- procedure setIREN(thebits : TBits_1); inline;
- procedure setLPBACK(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setPDSEL(thebits : TBits_2); inline;
- procedure setPDSEL0(thebits : TBits_1); inline;
- procedure setPDSEL1(thebits : TBits_1); inline;
- procedure setRTSMD(thebits : TBits_1); inline;
- procedure setRXINV(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setSTSEL(thebits : TBits_1); inline;
- procedure setUARTEN(thebits : TBits_1); inline;
- procedure setUEN(thebits : TBits_2); inline;
- procedure setUEN0(thebits : TBits_1); inline;
- procedure setUEN1(thebits : TBits_1); inline;
- procedure setUSIDL(thebits : TBits_1); inline;
- procedure setWAKE(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearABAUD; inline;
- procedure clearBRGH; inline;
- procedure clearIREN; inline;
- procedure clearLPBACK; inline;
- procedure clearON; inline;
- procedure clearPDSEL0; inline;
- procedure clearPDSEL1; inline;
- procedure clearRTSMD; inline;
- procedure clearRXINV; inline;
- procedure clearSIDL; inline;
- procedure clearSTSEL; inline;
- procedure clearUARTEN; inline;
- procedure clearUEN0; inline;
- procedure clearUEN1; inline;
- procedure clearUSIDL; inline;
- procedure clearWAKE; inline;
- procedure setABAUD; inline;
- procedure setBRGH; inline;
- procedure setIREN; inline;
- procedure setLPBACK; inline;
- procedure setON; inline;
- procedure setPDSEL0; inline;
- procedure setPDSEL1; inline;
- procedure setRTSMD; inline;
- procedure setRXINV; inline;
- procedure setSIDL; inline;
- procedure setSTSEL; inline;
- procedure setUARTEN; inline;
- procedure setUEN0; inline;
- procedure setUEN1; inline;
- procedure setUSIDL; inline;
- procedure setWAKE; inline;
- property ABAUD : TBits_1 read getABAUD write setABAUD;
- property BRGH : TBits_1 read getBRGH write setBRGH;
- property IREN : TBits_1 read getIREN write setIREN;
- property LPBACK : TBits_1 read getLPBACK write setLPBACK;
- property ON : TBits_1 read getON write setON;
- property PDSEL : TBits_2 read getPDSEL write setPDSEL;
- property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
- property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
- property RTSMD : TBits_1 read getRTSMD write setRTSMD;
- property RXINV : TBits_1 read getRXINV write setRXINV;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property STSEL : TBits_1 read getSTSEL write setSTSEL;
- property UARTEN : TBits_1 read getUARTEN write setUARTEN;
- property UEN : TBits_2 read getUEN write setUEN;
- property UEN0 : TBits_1 read getUEN0 write setUEN0;
- property UEN1 : TBits_1 read getUEN1 write setUEN1;
- property USIDL : TBits_1 read getUSIDL write setUSIDL;
- property WAKE : TBits_1 read getWAKE write setWAKE;
- property w : TBits_32 read getw write setw;
- end;
- TUART1A_U1ASTA = record
- private
- function getADDEN : TBits_1; inline;
- function getADDR : TBits_8; inline;
- function getADM_EN : TBits_1; inline;
- function getFERR : TBits_1; inline;
- function getOERR : TBits_1; inline;
- function getPERR : TBits_1; inline;
- function getRIDLE : TBits_1; inline;
- function getTRMT : TBits_1; inline;
- function getURXDA : TBits_1; inline;
- function getURXEN : TBits_1; inline;
- function getURXISEL : TBits_2; inline;
- function getURXISEL0 : TBits_1; inline;
- function getURXISEL1 : TBits_1; inline;
- function getUTXBF : TBits_1; inline;
- function getUTXBRK : TBits_1; inline;
- function getUTXEN : TBits_1; inline;
- function getUTXINV : TBits_1; inline;
- function getUTXISEL : TBits_2; inline;
- function getUTXISEL0 : TBits_1; inline;
- function getUTXISEL1 : TBits_1; inline;
- function getUTXSEL : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setADDEN(thebits : TBits_1); inline;
- procedure setADDR(thebits : TBits_8); inline;
- procedure setADM_EN(thebits : TBits_1); inline;
- procedure setFERR(thebits : TBits_1); inline;
- procedure setOERR(thebits : TBits_1); inline;
- procedure setPERR(thebits : TBits_1); inline;
- procedure setRIDLE(thebits : TBits_1); inline;
- procedure setTRMT(thebits : TBits_1); inline;
- procedure setURXDA(thebits : TBits_1); inline;
- procedure setURXEN(thebits : TBits_1); inline;
- procedure setURXISEL(thebits : TBits_2); inline;
- procedure setURXISEL0(thebits : TBits_1); inline;
- procedure setURXISEL1(thebits : TBits_1); inline;
- procedure setUTXBF(thebits : TBits_1); inline;
- procedure setUTXBRK(thebits : TBits_1); inline;
- procedure setUTXEN(thebits : TBits_1); inline;
- procedure setUTXINV(thebits : TBits_1); inline;
- procedure setUTXISEL(thebits : TBits_2); inline;
- procedure setUTXISEL0(thebits : TBits_1); inline;
- procedure setUTXISEL1(thebits : TBits_1); inline;
- procedure setUTXSEL(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearADDEN; inline;
- procedure clearADM_EN; inline;
- procedure clearFERR; inline;
- procedure clearOERR; inline;
- procedure clearPERR; inline;
- procedure clearRIDLE; inline;
- procedure clearTRMT; inline;
- procedure clearURXDA; inline;
- procedure clearURXEN; inline;
- procedure clearURXISEL0; inline;
- procedure clearURXISEL1; inline;
- procedure clearUTXBF; inline;
- procedure clearUTXBRK; inline;
- procedure clearUTXEN; inline;
- procedure clearUTXINV; inline;
- procedure clearUTXISEL0; inline;
- procedure clearUTXISEL1; inline;
- procedure setADDEN; inline;
- procedure setADM_EN; inline;
- procedure setFERR; inline;
- procedure setOERR; inline;
- procedure setPERR; inline;
- procedure setRIDLE; inline;
- procedure setTRMT; inline;
- procedure setURXDA; inline;
- procedure setURXEN; inline;
- procedure setURXISEL0; inline;
- procedure setURXISEL1; inline;
- procedure setUTXBF; inline;
- procedure setUTXBRK; inline;
- procedure setUTXEN; inline;
- procedure setUTXINV; inline;
- procedure setUTXISEL0; inline;
- procedure setUTXISEL1; inline;
- property ADDEN : TBits_1 read getADDEN write setADDEN;
- property ADDR : TBits_8 read getADDR write setADDR;
- property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
- property FERR : TBits_1 read getFERR write setFERR;
- property OERR : TBits_1 read getOERR write setOERR;
- property PERR : TBits_1 read getPERR write setPERR;
- property RIDLE : TBits_1 read getRIDLE write setRIDLE;
- property TRMT : TBits_1 read getTRMT write setTRMT;
- property URXDA : TBits_1 read getURXDA write setURXDA;
- property URXEN : TBits_1 read getURXEN write setURXEN;
- property URXISEL : TBits_2 read getURXISEL write setURXISEL;
- property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
- property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
- property UTXBF : TBits_1 read getUTXBF write setUTXBF;
- property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
- property UTXEN : TBits_1 read getUTXEN write setUTXEN;
- property UTXINV : TBits_1 read getUTXINV write setUTXINV;
- property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
- property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
- property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
- property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
- property w : TBits_32 read getw write setw;
- end;
- TUART1A_U1STA = record
- private
- function getADDEN : TBits_1; inline;
- function getADDR : TBits_8; inline;
- function getADM_EN : TBits_1; inline;
- function getFERR : TBits_1; inline;
- function getOERR : TBits_1; inline;
- function getPERR : TBits_1; inline;
- function getRIDLE : TBits_1; inline;
- function getTRMT : TBits_1; inline;
- function getURXDA : TBits_1; inline;
- function getURXEN : TBits_1; inline;
- function getURXISEL : TBits_2; inline;
- function getURXISEL0 : TBits_1; inline;
- function getURXISEL1 : TBits_1; inline;
- function getUTXBF : TBits_1; inline;
- function getUTXBRK : TBits_1; inline;
- function getUTXEN : TBits_1; inline;
- function getUTXINV : TBits_1; inline;
- function getUTXISEL : TBits_2; inline;
- function getUTXISEL0 : TBits_1; inline;
- function getUTXISEL1 : TBits_1; inline;
- function getUTXSEL : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setADDEN(thebits : TBits_1); inline;
- procedure setADDR(thebits : TBits_8); inline;
- procedure setADM_EN(thebits : TBits_1); inline;
- procedure setFERR(thebits : TBits_1); inline;
- procedure setOERR(thebits : TBits_1); inline;
- procedure setPERR(thebits : TBits_1); inline;
- procedure setRIDLE(thebits : TBits_1); inline;
- procedure setTRMT(thebits : TBits_1); inline;
- procedure setURXDA(thebits : TBits_1); inline;
- procedure setURXEN(thebits : TBits_1); inline;
- procedure setURXISEL(thebits : TBits_2); inline;
- procedure setURXISEL0(thebits : TBits_1); inline;
- procedure setURXISEL1(thebits : TBits_1); inline;
- procedure setUTXBF(thebits : TBits_1); inline;
- procedure setUTXBRK(thebits : TBits_1); inline;
- procedure setUTXEN(thebits : TBits_1); inline;
- procedure setUTXINV(thebits : TBits_1); inline;
- procedure setUTXISEL(thebits : TBits_2); inline;
- procedure setUTXISEL0(thebits : TBits_1); inline;
- procedure setUTXISEL1(thebits : TBits_1); inline;
- procedure setUTXSEL(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearADDEN; inline;
- procedure clearADM_EN; inline;
- procedure clearFERR; inline;
- procedure clearOERR; inline;
- procedure clearPERR; inline;
- procedure clearRIDLE; inline;
- procedure clearTRMT; inline;
- procedure clearURXDA; inline;
- procedure clearURXEN; inline;
- procedure clearURXISEL0; inline;
- procedure clearURXISEL1; inline;
- procedure clearUTXBF; inline;
- procedure clearUTXBRK; inline;
- procedure clearUTXEN; inline;
- procedure clearUTXINV; inline;
- procedure clearUTXISEL0; inline;
- procedure clearUTXISEL1; inline;
- procedure setADDEN; inline;
- procedure setADM_EN; inline;
- procedure setFERR; inline;
- procedure setOERR; inline;
- procedure setPERR; inline;
- procedure setRIDLE; inline;
- procedure setTRMT; inline;
- procedure setURXDA; inline;
- procedure setURXEN; inline;
- procedure setURXISEL0; inline;
- procedure setURXISEL1; inline;
- procedure setUTXBF; inline;
- procedure setUTXBRK; inline;
- procedure setUTXEN; inline;
- procedure setUTXINV; inline;
- procedure setUTXISEL0; inline;
- procedure setUTXISEL1; inline;
- property ADDEN : TBits_1 read getADDEN write setADDEN;
- property ADDR : TBits_8 read getADDR write setADDR;
- property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
- property FERR : TBits_1 read getFERR write setFERR;
- property OERR : TBits_1 read getOERR write setOERR;
- property PERR : TBits_1 read getPERR write setPERR;
- property RIDLE : TBits_1 read getRIDLE write setRIDLE;
- property TRMT : TBits_1 read getTRMT write setTRMT;
- property URXDA : TBits_1 read getURXDA write setURXDA;
- property URXEN : TBits_1 read getURXEN write setURXEN;
- property URXISEL : TBits_2 read getURXISEL write setURXISEL;
- property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
- property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
- property UTXBF : TBits_1 read getUTXBF write setUTXBF;
- property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
- property UTXEN : TBits_1 read getUTXEN write setUTXEN;
- property UTXINV : TBits_1 read getUTXINV write setUTXINV;
- property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
- property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
- property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
- property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
- property w : TBits_32 read getw write setw;
- end;
- type
- TUART1ARegisters = record
- U1AMODEbits : TUART1A_U1AMODE;
- U1AMODE : longWord;
- U1MODEbits : TUART1A_U1MODE;
- U1MODE : longWord;
- U1AMODECLR : longWord;
- U1MODECLR : longWord;
- U1AMODESET : longWord;
- U1MODESET : longWord;
- U1AMODEINV : longWord;
- U1MODEINV : longWord;
- U1ASTAbits : TUART1A_U1ASTA;
- U1ASTA : longWord;
- U1STAbits : TUART1A_U1STA;
- U1STA : longWord;
- U1ASTACLR : longWord;
- U1STACLR : longWord;
- U1ASTASET : longWord;
- U1STASET : longWord;
- U1ASTAINV : longWord;
- U1STAINV : longWord;
- U1ATXREG : longWord;
- U1TXREG : longWord;
- U1ARXREG : longWord;
- U1RXREG : longWord;
- U1ABRG : longWord;
- U1BRG : longWord;
- U1ABRGCLR : longWord;
- U1BRGCLR : longWord;
- U1ABRGSET : longWord;
- U1BRGSET : longWord;
- U1ABRGINV : longWord;
- U1BRGINV : longWord;
- end;
- TUART1B_U1BMODE = record
- private
- function getABAUD : TBits_1; inline;
- function getBRGH : TBits_1; inline;
- function getIREN : TBits_1; inline;
- function getLPBACK : TBits_1; inline;
- function getON : TBits_1; inline;
- function getPDSEL : TBits_2; inline;
- function getPDSEL0 : TBits_1; inline;
- function getPDSEL1 : TBits_1; inline;
- function getRXINV : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getSTSEL : TBits_1; inline;
- function getUARTEN : TBits_1; inline;
- function getUSIDL : TBits_1; inline;
- function getWAKE : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setABAUD(thebits : TBits_1); inline;
- procedure setBRGH(thebits : TBits_1); inline;
- procedure setIREN(thebits : TBits_1); inline;
- procedure setLPBACK(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setPDSEL(thebits : TBits_2); inline;
- procedure setPDSEL0(thebits : TBits_1); inline;
- procedure setPDSEL1(thebits : TBits_1); inline;
- procedure setRXINV(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setSTSEL(thebits : TBits_1); inline;
- procedure setUARTEN(thebits : TBits_1); inline;
- procedure setUSIDL(thebits : TBits_1); inline;
- procedure setWAKE(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearABAUD; inline;
- procedure clearBRGH; inline;
- procedure clearIREN; inline;
- procedure clearLPBACK; inline;
- procedure clearON; inline;
- procedure clearPDSEL0; inline;
- procedure clearPDSEL1; inline;
- procedure clearRXINV; inline;
- procedure clearSIDL; inline;
- procedure clearSTSEL; inline;
- procedure clearUARTEN; inline;
- procedure clearUSIDL; inline;
- procedure clearWAKE; inline;
- procedure setABAUD; inline;
- procedure setBRGH; inline;
- procedure setIREN; inline;
- procedure setLPBACK; inline;
- procedure setON; inline;
- procedure setPDSEL0; inline;
- procedure setPDSEL1; inline;
- procedure setRXINV; inline;
- procedure setSIDL; inline;
- procedure setSTSEL; inline;
- procedure setUARTEN; inline;
- procedure setUSIDL; inline;
- procedure setWAKE; inline;
- property ABAUD : TBits_1 read getABAUD write setABAUD;
- property BRGH : TBits_1 read getBRGH write setBRGH;
- property IREN : TBits_1 read getIREN write setIREN;
- property LPBACK : TBits_1 read getLPBACK write setLPBACK;
- property ON : TBits_1 read getON write setON;
- property PDSEL : TBits_2 read getPDSEL write setPDSEL;
- property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
- property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
- property RXINV : TBits_1 read getRXINV write setRXINV;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property STSEL : TBits_1 read getSTSEL write setSTSEL;
- property UARTEN : TBits_1 read getUARTEN write setUARTEN;
- property USIDL : TBits_1 read getUSIDL write setUSIDL;
- property WAKE : TBits_1 read getWAKE write setWAKE;
- property w : TBits_32 read getw write setw;
- end;
- TUART1B_U4MODE = record
- private
- function getABAUD : TBits_1; inline;
- function getBRGH : TBits_1; inline;
- function getIREN : TBits_1; inline;
- function getLPBACK : TBits_1; inline;
- function getON : TBits_1; inline;
- function getPDSEL : TBits_2; inline;
- function getPDSEL0 : TBits_1; inline;
- function getPDSEL1 : TBits_1; inline;
- function getRXINV : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getSTSEL : TBits_1; inline;
- function getUARTEN : TBits_1; inline;
- function getUSIDL : TBits_1; inline;
- function getWAKE : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setABAUD(thebits : TBits_1); inline;
- procedure setBRGH(thebits : TBits_1); inline;
- procedure setIREN(thebits : TBits_1); inline;
- procedure setLPBACK(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setPDSEL(thebits : TBits_2); inline;
- procedure setPDSEL0(thebits : TBits_1); inline;
- procedure setPDSEL1(thebits : TBits_1); inline;
- procedure setRXINV(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setSTSEL(thebits : TBits_1); inline;
- procedure setUARTEN(thebits : TBits_1); inline;
- procedure setUSIDL(thebits : TBits_1); inline;
- procedure setWAKE(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearABAUD; inline;
- procedure clearBRGH; inline;
- procedure clearIREN; inline;
- procedure clearLPBACK; inline;
- procedure clearON; inline;
- procedure clearPDSEL0; inline;
- procedure clearPDSEL1; inline;
- procedure clearRXINV; inline;
- procedure clearSIDL; inline;
- procedure clearSTSEL; inline;
- procedure clearUARTEN; inline;
- procedure clearUSIDL; inline;
- procedure clearWAKE; inline;
- procedure setABAUD; inline;
- procedure setBRGH; inline;
- procedure setIREN; inline;
- procedure setLPBACK; inline;
- procedure setON; inline;
- procedure setPDSEL0; inline;
- procedure setPDSEL1; inline;
- procedure setRXINV; inline;
- procedure setSIDL; inline;
- procedure setSTSEL; inline;
- procedure setUARTEN; inline;
- procedure setUSIDL; inline;
- procedure setWAKE; inline;
- property ABAUD : TBits_1 read getABAUD write setABAUD;
- property BRGH : TBits_1 read getBRGH write setBRGH;
- property IREN : TBits_1 read getIREN write setIREN;
- property LPBACK : TBits_1 read getLPBACK write setLPBACK;
- property ON : TBits_1 read getON write setON;
- property PDSEL : TBits_2 read getPDSEL write setPDSEL;
- property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
- property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
- property RXINV : TBits_1 read getRXINV write setRXINV;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property STSEL : TBits_1 read getSTSEL write setSTSEL;
- property UARTEN : TBits_1 read getUARTEN write setUARTEN;
- property USIDL : TBits_1 read getUSIDL write setUSIDL;
- property WAKE : TBits_1 read getWAKE write setWAKE;
- property w : TBits_32 read getw write setw;
- end;
- TUART1B_U1BSTA = record
- private
- function getADDEN : TBits_1; inline;
- function getADDR : TBits_8; inline;
- function getADM_EN : TBits_1; inline;
- function getFERR : TBits_1; inline;
- function getOERR : TBits_1; inline;
- function getPERR : TBits_1; inline;
- function getRIDLE : TBits_1; inline;
- function getTRMT : TBits_1; inline;
- function getURXDA : TBits_1; inline;
- function getURXEN : TBits_1; inline;
- function getURXISEL : TBits_2; inline;
- function getURXISEL0 : TBits_1; inline;
- function getURXISEL1 : TBits_1; inline;
- function getUTXBF : TBits_1; inline;
- function getUTXBRK : TBits_1; inline;
- function getUTXEN : TBits_1; inline;
- function getUTXINV : TBits_1; inline;
- function getUTXISEL : TBits_2; inline;
- function getUTXISEL0 : TBits_1; inline;
- function getUTXISEL1 : TBits_1; inline;
- function getUTXSEL : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setADDEN(thebits : TBits_1); inline;
- procedure setADDR(thebits : TBits_8); inline;
- procedure setADM_EN(thebits : TBits_1); inline;
- procedure setFERR(thebits : TBits_1); inline;
- procedure setOERR(thebits : TBits_1); inline;
- procedure setPERR(thebits : TBits_1); inline;
- procedure setRIDLE(thebits : TBits_1); inline;
- procedure setTRMT(thebits : TBits_1); inline;
- procedure setURXDA(thebits : TBits_1); inline;
- procedure setURXEN(thebits : TBits_1); inline;
- procedure setURXISEL(thebits : TBits_2); inline;
- procedure setURXISEL0(thebits : TBits_1); inline;
- procedure setURXISEL1(thebits : TBits_1); inline;
- procedure setUTXBF(thebits : TBits_1); inline;
- procedure setUTXBRK(thebits : TBits_1); inline;
- procedure setUTXEN(thebits : TBits_1); inline;
- procedure setUTXINV(thebits : TBits_1); inline;
- procedure setUTXISEL(thebits : TBits_2); inline;
- procedure setUTXISEL0(thebits : TBits_1); inline;
- procedure setUTXISEL1(thebits : TBits_1); inline;
- procedure setUTXSEL(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearADDEN; inline;
- procedure clearADM_EN; inline;
- procedure clearFERR; inline;
- procedure clearOERR; inline;
- procedure clearPERR; inline;
- procedure clearRIDLE; inline;
- procedure clearTRMT; inline;
- procedure clearURXDA; inline;
- procedure clearURXEN; inline;
- procedure clearURXISEL0; inline;
- procedure clearURXISEL1; inline;
- procedure clearUTXBF; inline;
- procedure clearUTXBRK; inline;
- procedure clearUTXEN; inline;
- procedure clearUTXINV; inline;
- procedure clearUTXISEL0; inline;
- procedure clearUTXISEL1; inline;
- procedure setADDEN; inline;
- procedure setADM_EN; inline;
- procedure setFERR; inline;
- procedure setOERR; inline;
- procedure setPERR; inline;
- procedure setRIDLE; inline;
- procedure setTRMT; inline;
- procedure setURXDA; inline;
- procedure setURXEN; inline;
- procedure setURXISEL0; inline;
- procedure setURXISEL1; inline;
- procedure setUTXBF; inline;
- procedure setUTXBRK; inline;
- procedure setUTXEN; inline;
- procedure setUTXINV; inline;
- procedure setUTXISEL0; inline;
- procedure setUTXISEL1; inline;
- property ADDEN : TBits_1 read getADDEN write setADDEN;
- property ADDR : TBits_8 read getADDR write setADDR;
- property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
- property FERR : TBits_1 read getFERR write setFERR;
- property OERR : TBits_1 read getOERR write setOERR;
- property PERR : TBits_1 read getPERR write setPERR;
- property RIDLE : TBits_1 read getRIDLE write setRIDLE;
- property TRMT : TBits_1 read getTRMT write setTRMT;
- property URXDA : TBits_1 read getURXDA write setURXDA;
- property URXEN : TBits_1 read getURXEN write setURXEN;
- property URXISEL : TBits_2 read getURXISEL write setURXISEL;
- property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
- property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
- property UTXBF : TBits_1 read getUTXBF write setUTXBF;
- property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
- property UTXEN : TBits_1 read getUTXEN write setUTXEN;
- property UTXINV : TBits_1 read getUTXINV write setUTXINV;
- property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
- property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
- property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
- property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
- property w : TBits_32 read getw write setw;
- end;
- TUART1B_U4STA = record
- private
- function getADDEN : TBits_1; inline;
- function getADDR : TBits_8; inline;
- function getADM_EN : TBits_1; inline;
- function getFERR : TBits_1; inline;
- function getOERR : TBits_1; inline;
- function getPERR : TBits_1; inline;
- function getRIDLE : TBits_1; inline;
- function getTRMT : TBits_1; inline;
- function getURXDA : TBits_1; inline;
- function getURXEN : TBits_1; inline;
- function getURXISEL : TBits_2; inline;
- function getURXISEL0 : TBits_1; inline;
- function getURXISEL1 : TBits_1; inline;
- function getUTXBF : TBits_1; inline;
- function getUTXBRK : TBits_1; inline;
- function getUTXEN : TBits_1; inline;
- function getUTXINV : TBits_1; inline;
- function getUTXISEL : TBits_2; inline;
- function getUTXISEL0 : TBits_1; inline;
- function getUTXISEL1 : TBits_1; inline;
- function getUTXSEL : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setADDEN(thebits : TBits_1); inline;
- procedure setADDR(thebits : TBits_8); inline;
- procedure setADM_EN(thebits : TBits_1); inline;
- procedure setFERR(thebits : TBits_1); inline;
- procedure setOERR(thebits : TBits_1); inline;
- procedure setPERR(thebits : TBits_1); inline;
- procedure setRIDLE(thebits : TBits_1); inline;
- procedure setTRMT(thebits : TBits_1); inline;
- procedure setURXDA(thebits : TBits_1); inline;
- procedure setURXEN(thebits : TBits_1); inline;
- procedure setURXISEL(thebits : TBits_2); inline;
- procedure setURXISEL0(thebits : TBits_1); inline;
- procedure setURXISEL1(thebits : TBits_1); inline;
- procedure setUTXBF(thebits : TBits_1); inline;
- procedure setUTXBRK(thebits : TBits_1); inline;
- procedure setUTXEN(thebits : TBits_1); inline;
- procedure setUTXINV(thebits : TBits_1); inline;
- procedure setUTXISEL(thebits : TBits_2); inline;
- procedure setUTXISEL0(thebits : TBits_1); inline;
- procedure setUTXISEL1(thebits : TBits_1); inline;
- procedure setUTXSEL(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearADDEN; inline;
- procedure clearADM_EN; inline;
- procedure clearFERR; inline;
- procedure clearOERR; inline;
- procedure clearPERR; inline;
- procedure clearRIDLE; inline;
- procedure clearTRMT; inline;
- procedure clearURXDA; inline;
- procedure clearURXEN; inline;
- procedure clearURXISEL0; inline;
- procedure clearURXISEL1; inline;
- procedure clearUTXBF; inline;
- procedure clearUTXBRK; inline;
- procedure clearUTXEN; inline;
- procedure clearUTXINV; inline;
- procedure clearUTXISEL0; inline;
- procedure clearUTXISEL1; inline;
- procedure setADDEN; inline;
- procedure setADM_EN; inline;
- procedure setFERR; inline;
- procedure setOERR; inline;
- procedure setPERR; inline;
- procedure setRIDLE; inline;
- procedure setTRMT; inline;
- procedure setURXDA; inline;
- procedure setURXEN; inline;
- procedure setURXISEL0; inline;
- procedure setURXISEL1; inline;
- procedure setUTXBF; inline;
- procedure setUTXBRK; inline;
- procedure setUTXEN; inline;
- procedure setUTXINV; inline;
- procedure setUTXISEL0; inline;
- procedure setUTXISEL1; inline;
- property ADDEN : TBits_1 read getADDEN write setADDEN;
- property ADDR : TBits_8 read getADDR write setADDR;
- property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
- property FERR : TBits_1 read getFERR write setFERR;
- property OERR : TBits_1 read getOERR write setOERR;
- property PERR : TBits_1 read getPERR write setPERR;
- property RIDLE : TBits_1 read getRIDLE write setRIDLE;
- property TRMT : TBits_1 read getTRMT write setTRMT;
- property URXDA : TBits_1 read getURXDA write setURXDA;
- property URXEN : TBits_1 read getURXEN write setURXEN;
- property URXISEL : TBits_2 read getURXISEL write setURXISEL;
- property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
- property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
- property UTXBF : TBits_1 read getUTXBF write setUTXBF;
- property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
- property UTXEN : TBits_1 read getUTXEN write setUTXEN;
- property UTXINV : TBits_1 read getUTXINV write setUTXINV;
- property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
- property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
- property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
- property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
- property w : TBits_32 read getw write setw;
- end;
- type
- TUART1BRegisters = record
- U1BMODEbits : TUART1B_U1BMODE;
- U1BMODE : longWord;
- U4MODEbits : TUART1B_U4MODE;
- U4MODE : longWord;
- U1BMODECLR : longWord;
- U4MODECLR : longWord;
- U1BMODESET : longWord;
- U4MODESET : longWord;
- U1BMODEINV : longWord;
- U4MODEINV : longWord;
- U1BSTAbits : TUART1B_U1BSTA;
- U1BSTA : longWord;
- U4STAbits : TUART1B_U4STA;
- U4STA : longWord;
- U1BSTACLR : longWord;
- U4STACLR : longWord;
- U1BSTASET : longWord;
- U4STASET : longWord;
- U1BSTAINV : longWord;
- U4STAINV : longWord;
- U1BTXREG : longWord;
- U4TXREG : longWord;
- U1BRXREG : longWord;
- U4RXREG : longWord;
- U1BBRG : longWord;
- U4BRG : longWord;
- U1BBRGCLR : longWord;
- U4BRGCLR : longWord;
- U1BBRGSET : longWord;
- U4BRGSET : longWord;
- U1BBRGINV : longWord;
- U4BRGINV : longWord;
- end;
- TUART2A_U2AMODE = record
- private
- function getABAUD : TBits_1; inline;
- function getBRGH : TBits_1; inline;
- function getIREN : TBits_1; inline;
- function getLPBACK : TBits_1; inline;
- function getON : TBits_1; inline;
- function getPDSEL : TBits_2; inline;
- function getPDSEL0 : TBits_1; inline;
- function getPDSEL1 : TBits_1; inline;
- function getRTSMD : TBits_1; inline;
- function getRXINV : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getSTSEL : TBits_1; inline;
- function getUARTEN : TBits_1; inline;
- function getUEN : TBits_2; inline;
- function getUEN0 : TBits_1; inline;
- function getUEN1 : TBits_1; inline;
- function getUSIDL : TBits_1; inline;
- function getWAKE : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setABAUD(thebits : TBits_1); inline;
- procedure setBRGH(thebits : TBits_1); inline;
- procedure setIREN(thebits : TBits_1); inline;
- procedure setLPBACK(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setPDSEL(thebits : TBits_2); inline;
- procedure setPDSEL0(thebits : TBits_1); inline;
- procedure setPDSEL1(thebits : TBits_1); inline;
- procedure setRTSMD(thebits : TBits_1); inline;
- procedure setRXINV(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setSTSEL(thebits : TBits_1); inline;
- procedure setUARTEN(thebits : TBits_1); inline;
- procedure setUEN(thebits : TBits_2); inline;
- procedure setUEN0(thebits : TBits_1); inline;
- procedure setUEN1(thebits : TBits_1); inline;
- procedure setUSIDL(thebits : TBits_1); inline;
- procedure setWAKE(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearABAUD; inline;
- procedure clearBRGH; inline;
- procedure clearIREN; inline;
- procedure clearLPBACK; inline;
- procedure clearON; inline;
- procedure clearPDSEL0; inline;
- procedure clearPDSEL1; inline;
- procedure clearRTSMD; inline;
- procedure clearRXINV; inline;
- procedure clearSIDL; inline;
- procedure clearSTSEL; inline;
- procedure clearUARTEN; inline;
- procedure clearUEN0; inline;
- procedure clearUEN1; inline;
- procedure clearUSIDL; inline;
- procedure clearWAKE; inline;
- procedure setABAUD; inline;
- procedure setBRGH; inline;
- procedure setIREN; inline;
- procedure setLPBACK; inline;
- procedure setON; inline;
- procedure setPDSEL0; inline;
- procedure setPDSEL1; inline;
- procedure setRTSMD; inline;
- procedure setRXINV; inline;
- procedure setSIDL; inline;
- procedure setSTSEL; inline;
- procedure setUARTEN; inline;
- procedure setUEN0; inline;
- procedure setUEN1; inline;
- procedure setUSIDL; inline;
- procedure setWAKE; inline;
- property ABAUD : TBits_1 read getABAUD write setABAUD;
- property BRGH : TBits_1 read getBRGH write setBRGH;
- property IREN : TBits_1 read getIREN write setIREN;
- property LPBACK : TBits_1 read getLPBACK write setLPBACK;
- property ON : TBits_1 read getON write setON;
- property PDSEL : TBits_2 read getPDSEL write setPDSEL;
- property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
- property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
- property RTSMD : TBits_1 read getRTSMD write setRTSMD;
- property RXINV : TBits_1 read getRXINV write setRXINV;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property STSEL : TBits_1 read getSTSEL write setSTSEL;
- property UARTEN : TBits_1 read getUARTEN write setUARTEN;
- property UEN : TBits_2 read getUEN write setUEN;
- property UEN0 : TBits_1 read getUEN0 write setUEN0;
- property UEN1 : TBits_1 read getUEN1 write setUEN1;
- property USIDL : TBits_1 read getUSIDL write setUSIDL;
- property WAKE : TBits_1 read getWAKE write setWAKE;
- property w : TBits_32 read getw write setw;
- end;
- TUART2A_U3MODE = record
- private
- function getABAUD : TBits_1; inline;
- function getBRGH : TBits_1; inline;
- function getIREN : TBits_1; inline;
- function getLPBACK : TBits_1; inline;
- function getON : TBits_1; inline;
- function getPDSEL : TBits_2; inline;
- function getPDSEL0 : TBits_1; inline;
- function getPDSEL1 : TBits_1; inline;
- function getRTSMD : TBits_1; inline;
- function getRXINV : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getSTSEL : TBits_1; inline;
- function getUARTEN : TBits_1; inline;
- function getUEN : TBits_2; inline;
- function getUEN0 : TBits_1; inline;
- function getUEN1 : TBits_1; inline;
- function getUSIDL : TBits_1; inline;
- function getWAKE : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setABAUD(thebits : TBits_1); inline;
- procedure setBRGH(thebits : TBits_1); inline;
- procedure setIREN(thebits : TBits_1); inline;
- procedure setLPBACK(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setPDSEL(thebits : TBits_2); inline;
- procedure setPDSEL0(thebits : TBits_1); inline;
- procedure setPDSEL1(thebits : TBits_1); inline;
- procedure setRTSMD(thebits : TBits_1); inline;
- procedure setRXINV(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setSTSEL(thebits : TBits_1); inline;
- procedure setUARTEN(thebits : TBits_1); inline;
- procedure setUEN(thebits : TBits_2); inline;
- procedure setUEN0(thebits : TBits_1); inline;
- procedure setUEN1(thebits : TBits_1); inline;
- procedure setUSIDL(thebits : TBits_1); inline;
- procedure setWAKE(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearABAUD; inline;
- procedure clearBRGH; inline;
- procedure clearIREN; inline;
- procedure clearLPBACK; inline;
- procedure clearON; inline;
- procedure clearPDSEL0; inline;
- procedure clearPDSEL1; inline;
- procedure clearRTSMD; inline;
- procedure clearRXINV; inline;
- procedure clearSIDL; inline;
- procedure clearSTSEL; inline;
- procedure clearUARTEN; inline;
- procedure clearUEN0; inline;
- procedure clearUEN1; inline;
- procedure clearUSIDL; inline;
- procedure clearWAKE; inline;
- procedure setABAUD; inline;
- procedure setBRGH; inline;
- procedure setIREN; inline;
- procedure setLPBACK; inline;
- procedure setON; inline;
- procedure setPDSEL0; inline;
- procedure setPDSEL1; inline;
- procedure setRTSMD; inline;
- procedure setRXINV; inline;
- procedure setSIDL; inline;
- procedure setSTSEL; inline;
- procedure setUARTEN; inline;
- procedure setUEN0; inline;
- procedure setUEN1; inline;
- procedure setUSIDL; inline;
- procedure setWAKE; inline;
- property ABAUD : TBits_1 read getABAUD write setABAUD;
- property BRGH : TBits_1 read getBRGH write setBRGH;
- property IREN : TBits_1 read getIREN write setIREN;
- property LPBACK : TBits_1 read getLPBACK write setLPBACK;
- property ON : TBits_1 read getON write setON;
- property PDSEL : TBits_2 read getPDSEL write setPDSEL;
- property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
- property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
- property RTSMD : TBits_1 read getRTSMD write setRTSMD;
- property RXINV : TBits_1 read getRXINV write setRXINV;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property STSEL : TBits_1 read getSTSEL write setSTSEL;
- property UARTEN : TBits_1 read getUARTEN write setUARTEN;
- property UEN : TBits_2 read getUEN write setUEN;
- property UEN0 : TBits_1 read getUEN0 write setUEN0;
- property UEN1 : TBits_1 read getUEN1 write setUEN1;
- property USIDL : TBits_1 read getUSIDL write setUSIDL;
- property WAKE : TBits_1 read getWAKE write setWAKE;
- property w : TBits_32 read getw write setw;
- end;
- TUART2A_U2ASTA = record
- private
- function getADDEN : TBits_1; inline;
- function getADDR : TBits_8; inline;
- function getADM_EN : TBits_1; inline;
- function getFERR : TBits_1; inline;
- function getOERR : TBits_1; inline;
- function getPERR : TBits_1; inline;
- function getRIDLE : TBits_1; inline;
- function getTRMT : TBits_1; inline;
- function getURXDA : TBits_1; inline;
- function getURXEN : TBits_1; inline;
- function getURXISEL : TBits_2; inline;
- function getURXISEL0 : TBits_1; inline;
- function getURXISEL1 : TBits_1; inline;
- function getUTXBF : TBits_1; inline;
- function getUTXBRK : TBits_1; inline;
- function getUTXEN : TBits_1; inline;
- function getUTXINV : TBits_1; inline;
- function getUTXISEL : TBits_2; inline;
- function getUTXISEL0 : TBits_1; inline;
- function getUTXISEL1 : TBits_1; inline;
- function getUTXSEL : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setADDEN(thebits : TBits_1); inline;
- procedure setADDR(thebits : TBits_8); inline;
- procedure setADM_EN(thebits : TBits_1); inline;
- procedure setFERR(thebits : TBits_1); inline;
- procedure setOERR(thebits : TBits_1); inline;
- procedure setPERR(thebits : TBits_1); inline;
- procedure setRIDLE(thebits : TBits_1); inline;
- procedure setTRMT(thebits : TBits_1); inline;
- procedure setURXDA(thebits : TBits_1); inline;
- procedure setURXEN(thebits : TBits_1); inline;
- procedure setURXISEL(thebits : TBits_2); inline;
- procedure setURXISEL0(thebits : TBits_1); inline;
- procedure setURXISEL1(thebits : TBits_1); inline;
- procedure setUTXBF(thebits : TBits_1); inline;
- procedure setUTXBRK(thebits : TBits_1); inline;
- procedure setUTXEN(thebits : TBits_1); inline;
- procedure setUTXINV(thebits : TBits_1); inline;
- procedure setUTXISEL(thebits : TBits_2); inline;
- procedure setUTXISEL0(thebits : TBits_1); inline;
- procedure setUTXISEL1(thebits : TBits_1); inline;
- procedure setUTXSEL(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearADDEN; inline;
- procedure clearADM_EN; inline;
- procedure clearFERR; inline;
- procedure clearOERR; inline;
- procedure clearPERR; inline;
- procedure clearRIDLE; inline;
- procedure clearTRMT; inline;
- procedure clearURXDA; inline;
- procedure clearURXEN; inline;
- procedure clearURXISEL0; inline;
- procedure clearURXISEL1; inline;
- procedure clearUTXBF; inline;
- procedure clearUTXBRK; inline;
- procedure clearUTXEN; inline;
- procedure clearUTXINV; inline;
- procedure clearUTXISEL0; inline;
- procedure clearUTXISEL1; inline;
- procedure setADDEN; inline;
- procedure setADM_EN; inline;
- procedure setFERR; inline;
- procedure setOERR; inline;
- procedure setPERR; inline;
- procedure setRIDLE; inline;
- procedure setTRMT; inline;
- procedure setURXDA; inline;
- procedure setURXEN; inline;
- procedure setURXISEL0; inline;
- procedure setURXISEL1; inline;
- procedure setUTXBF; inline;
- procedure setUTXBRK; inline;
- procedure setUTXEN; inline;
- procedure setUTXINV; inline;
- procedure setUTXISEL0; inline;
- procedure setUTXISEL1; inline;
- property ADDEN : TBits_1 read getADDEN write setADDEN;
- property ADDR : TBits_8 read getADDR write setADDR;
- property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
- property FERR : TBits_1 read getFERR write setFERR;
- property OERR : TBits_1 read getOERR write setOERR;
- property PERR : TBits_1 read getPERR write setPERR;
- property RIDLE : TBits_1 read getRIDLE write setRIDLE;
- property TRMT : TBits_1 read getTRMT write setTRMT;
- property URXDA : TBits_1 read getURXDA write setURXDA;
- property URXEN : TBits_1 read getURXEN write setURXEN;
- property URXISEL : TBits_2 read getURXISEL write setURXISEL;
- property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
- property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
- property UTXBF : TBits_1 read getUTXBF write setUTXBF;
- property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
- property UTXEN : TBits_1 read getUTXEN write setUTXEN;
- property UTXINV : TBits_1 read getUTXINV write setUTXINV;
- property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
- property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
- property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
- property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
- property w : TBits_32 read getw write setw;
- end;
- TUART2A_U3STA = record
- private
- function getADDEN : TBits_1; inline;
- function getADDR : TBits_8; inline;
- function getADM_EN : TBits_1; inline;
- function getFERR : TBits_1; inline;
- function getOERR : TBits_1; inline;
- function getPERR : TBits_1; inline;
- function getRIDLE : TBits_1; inline;
- function getTRMT : TBits_1; inline;
- function getURXDA : TBits_1; inline;
- function getURXEN : TBits_1; inline;
- function getURXISEL : TBits_2; inline;
- function getURXISEL0 : TBits_1; inline;
- function getURXISEL1 : TBits_1; inline;
- function getUTXBF : TBits_1; inline;
- function getUTXBRK : TBits_1; inline;
- function getUTXEN : TBits_1; inline;
- function getUTXINV : TBits_1; inline;
- function getUTXISEL : TBits_2; inline;
- function getUTXISEL0 : TBits_1; inline;
- function getUTXISEL1 : TBits_1; inline;
- function getUTXSEL : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setADDEN(thebits : TBits_1); inline;
- procedure setADDR(thebits : TBits_8); inline;
- procedure setADM_EN(thebits : TBits_1); inline;
- procedure setFERR(thebits : TBits_1); inline;
- procedure setOERR(thebits : TBits_1); inline;
- procedure setPERR(thebits : TBits_1); inline;
- procedure setRIDLE(thebits : TBits_1); inline;
- procedure setTRMT(thebits : TBits_1); inline;
- procedure setURXDA(thebits : TBits_1); inline;
- procedure setURXEN(thebits : TBits_1); inline;
- procedure setURXISEL(thebits : TBits_2); inline;
- procedure setURXISEL0(thebits : TBits_1); inline;
- procedure setURXISEL1(thebits : TBits_1); inline;
- procedure setUTXBF(thebits : TBits_1); inline;
- procedure setUTXBRK(thebits : TBits_1); inline;
- procedure setUTXEN(thebits : TBits_1); inline;
- procedure setUTXINV(thebits : TBits_1); inline;
- procedure setUTXISEL(thebits : TBits_2); inline;
- procedure setUTXISEL0(thebits : TBits_1); inline;
- procedure setUTXISEL1(thebits : TBits_1); inline;
- procedure setUTXSEL(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearADDEN; inline;
- procedure clearADM_EN; inline;
- procedure clearFERR; inline;
- procedure clearOERR; inline;
- procedure clearPERR; inline;
- procedure clearRIDLE; inline;
- procedure clearTRMT; inline;
- procedure clearURXDA; inline;
- procedure clearURXEN; inline;
- procedure clearURXISEL0; inline;
- procedure clearURXISEL1; inline;
- procedure clearUTXBF; inline;
- procedure clearUTXBRK; inline;
- procedure clearUTXEN; inline;
- procedure clearUTXINV; inline;
- procedure clearUTXISEL0; inline;
- procedure clearUTXISEL1; inline;
- procedure setADDEN; inline;
- procedure setADM_EN; inline;
- procedure setFERR; inline;
- procedure setOERR; inline;
- procedure setPERR; inline;
- procedure setRIDLE; inline;
- procedure setTRMT; inline;
- procedure setURXDA; inline;
- procedure setURXEN; inline;
- procedure setURXISEL0; inline;
- procedure setURXISEL1; inline;
- procedure setUTXBF; inline;
- procedure setUTXBRK; inline;
- procedure setUTXEN; inline;
- procedure setUTXINV; inline;
- procedure setUTXISEL0; inline;
- procedure setUTXISEL1; inline;
- property ADDEN : TBits_1 read getADDEN write setADDEN;
- property ADDR : TBits_8 read getADDR write setADDR;
- property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
- property FERR : TBits_1 read getFERR write setFERR;
- property OERR : TBits_1 read getOERR write setOERR;
- property PERR : TBits_1 read getPERR write setPERR;
- property RIDLE : TBits_1 read getRIDLE write setRIDLE;
- property TRMT : TBits_1 read getTRMT write setTRMT;
- property URXDA : TBits_1 read getURXDA write setURXDA;
- property URXEN : TBits_1 read getURXEN write setURXEN;
- property URXISEL : TBits_2 read getURXISEL write setURXISEL;
- property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
- property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
- property UTXBF : TBits_1 read getUTXBF write setUTXBF;
- property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
- property UTXEN : TBits_1 read getUTXEN write setUTXEN;
- property UTXINV : TBits_1 read getUTXINV write setUTXINV;
- property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
- property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
- property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
- property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
- property w : TBits_32 read getw write setw;
- end;
- type
- TUART2ARegisters = record
- U2AMODEbits : TUART2A_U2AMODE;
- U2AMODE : longWord;
- U3MODEbits : TUART2A_U3MODE;
- U3MODE : longWord;
- U2AMODECLR : longWord;
- U3MODECLR : longWord;
- U2AMODESET : longWord;
- U3MODESET : longWord;
- U2AMODEINV : longWord;
- U3MODEINV : longWord;
- U2ASTAbits : TUART2A_U2ASTA;
- U2ASTA : longWord;
- U3STAbits : TUART2A_U3STA;
- U3STA : longWord;
- U2ASTACLR : longWord;
- U3STACLR : longWord;
- U2ASTASET : longWord;
- U3STASET : longWord;
- U2ASTAINV : longWord;
- U3STAINV : longWord;
- U2ATXREG : longWord;
- U3TXREG : longWord;
- U2ARXREG : longWord;
- U3RXREG : longWord;
- U2ABRG : longWord;
- U3BRG : longWord;
- U2ABRGCLR : longWord;
- U3BRGCLR : longWord;
- U2ABRGSET : longWord;
- U3BRGSET : longWord;
- U2ABRGINV : longWord;
- U3BRGINV : longWord;
- end;
- TUART2B_U2BMODE = record
- private
- function getABAUD : TBits_1; inline;
- function getBRGH : TBits_1; inline;
- function getIREN : TBits_1; inline;
- function getLPBACK : TBits_1; inline;
- function getON : TBits_1; inline;
- function getPDSEL : TBits_2; inline;
- function getPDSEL0 : TBits_1; inline;
- function getPDSEL1 : TBits_1; inline;
- function getRXINV : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getSTSEL : TBits_1; inline;
- function getUARTEN : TBits_1; inline;
- function getUSIDL : TBits_1; inline;
- function getWAKE : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setABAUD(thebits : TBits_1); inline;
- procedure setBRGH(thebits : TBits_1); inline;
- procedure setIREN(thebits : TBits_1); inline;
- procedure setLPBACK(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setPDSEL(thebits : TBits_2); inline;
- procedure setPDSEL0(thebits : TBits_1); inline;
- procedure setPDSEL1(thebits : TBits_1); inline;
- procedure setRXINV(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setSTSEL(thebits : TBits_1); inline;
- procedure setUARTEN(thebits : TBits_1); inline;
- procedure setUSIDL(thebits : TBits_1); inline;
- procedure setWAKE(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearABAUD; inline;
- procedure clearBRGH; inline;
- procedure clearIREN; inline;
- procedure clearLPBACK; inline;
- procedure clearON; inline;
- procedure clearPDSEL0; inline;
- procedure clearPDSEL1; inline;
- procedure clearRXINV; inline;
- procedure clearSIDL; inline;
- procedure clearSTSEL; inline;
- procedure clearUARTEN; inline;
- procedure clearUSIDL; inline;
- procedure clearWAKE; inline;
- procedure setABAUD; inline;
- procedure setBRGH; inline;
- procedure setIREN; inline;
- procedure setLPBACK; inline;
- procedure setON; inline;
- procedure setPDSEL0; inline;
- procedure setPDSEL1; inline;
- procedure setRXINV; inline;
- procedure setSIDL; inline;
- procedure setSTSEL; inline;
- procedure setUARTEN; inline;
- procedure setUSIDL; inline;
- procedure setWAKE; inline;
- property ABAUD : TBits_1 read getABAUD write setABAUD;
- property BRGH : TBits_1 read getBRGH write setBRGH;
- property IREN : TBits_1 read getIREN write setIREN;
- property LPBACK : TBits_1 read getLPBACK write setLPBACK;
- property ON : TBits_1 read getON write setON;
- property PDSEL : TBits_2 read getPDSEL write setPDSEL;
- property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
- property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
- property RXINV : TBits_1 read getRXINV write setRXINV;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property STSEL : TBits_1 read getSTSEL write setSTSEL;
- property UARTEN : TBits_1 read getUARTEN write setUARTEN;
- property USIDL : TBits_1 read getUSIDL write setUSIDL;
- property WAKE : TBits_1 read getWAKE write setWAKE;
- property w : TBits_32 read getw write setw;
- end;
- TUART2B_U6MODE = record
- private
- function getABAUD : TBits_1; inline;
- function getBRGH : TBits_1; inline;
- function getIREN : TBits_1; inline;
- function getLPBACK : TBits_1; inline;
- function getON : TBits_1; inline;
- function getPDSEL : TBits_2; inline;
- function getPDSEL0 : TBits_1; inline;
- function getPDSEL1 : TBits_1; inline;
- function getRXINV : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getSTSEL : TBits_1; inline;
- function getUARTEN : TBits_1; inline;
- function getUSIDL : TBits_1; inline;
- function getWAKE : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setABAUD(thebits : TBits_1); inline;
- procedure setBRGH(thebits : TBits_1); inline;
- procedure setIREN(thebits : TBits_1); inline;
- procedure setLPBACK(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setPDSEL(thebits : TBits_2); inline;
- procedure setPDSEL0(thebits : TBits_1); inline;
- procedure setPDSEL1(thebits : TBits_1); inline;
- procedure setRXINV(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setSTSEL(thebits : TBits_1); inline;
- procedure setUARTEN(thebits : TBits_1); inline;
- procedure setUSIDL(thebits : TBits_1); inline;
- procedure setWAKE(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearABAUD; inline;
- procedure clearBRGH; inline;
- procedure clearIREN; inline;
- procedure clearLPBACK; inline;
- procedure clearON; inline;
- procedure clearPDSEL0; inline;
- procedure clearPDSEL1; inline;
- procedure clearRXINV; inline;
- procedure clearSIDL; inline;
- procedure clearSTSEL; inline;
- procedure clearUARTEN; inline;
- procedure clearUSIDL; inline;
- procedure clearWAKE; inline;
- procedure setABAUD; inline;
- procedure setBRGH; inline;
- procedure setIREN; inline;
- procedure setLPBACK; inline;
- procedure setON; inline;
- procedure setPDSEL0; inline;
- procedure setPDSEL1; inline;
- procedure setRXINV; inline;
- procedure setSIDL; inline;
- procedure setSTSEL; inline;
- procedure setUARTEN; inline;
- procedure setUSIDL; inline;
- procedure setWAKE; inline;
- property ABAUD : TBits_1 read getABAUD write setABAUD;
- property BRGH : TBits_1 read getBRGH write setBRGH;
- property IREN : TBits_1 read getIREN write setIREN;
- property LPBACK : TBits_1 read getLPBACK write setLPBACK;
- property ON : TBits_1 read getON write setON;
- property PDSEL : TBits_2 read getPDSEL write setPDSEL;
- property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
- property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
- property RXINV : TBits_1 read getRXINV write setRXINV;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property STSEL : TBits_1 read getSTSEL write setSTSEL;
- property UARTEN : TBits_1 read getUARTEN write setUARTEN;
- property USIDL : TBits_1 read getUSIDL write setUSIDL;
- property WAKE : TBits_1 read getWAKE write setWAKE;
- property w : TBits_32 read getw write setw;
- end;
- TUART2B_U2BSTA = record
- private
- function getADDEN : TBits_1; inline;
- function getADDR : TBits_8; inline;
- function getADM_EN : TBits_1; inline;
- function getFERR : TBits_1; inline;
- function getOERR : TBits_1; inline;
- function getPERR : TBits_1; inline;
- function getRIDLE : TBits_1; inline;
- function getTRMT : TBits_1; inline;
- function getURXDA : TBits_1; inline;
- function getURXEN : TBits_1; inline;
- function getURXISEL : TBits_2; inline;
- function getURXISEL0 : TBits_1; inline;
- function getURXISEL1 : TBits_1; inline;
- function getUTXBF : TBits_1; inline;
- function getUTXBRK : TBits_1; inline;
- function getUTXEN : TBits_1; inline;
- function getUTXINV : TBits_1; inline;
- function getUTXISEL : TBits_2; inline;
- function getUTXISEL0 : TBits_1; inline;
- function getUTXISEL1 : TBits_1; inline;
- function getUTXSEL : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setADDEN(thebits : TBits_1); inline;
- procedure setADDR(thebits : TBits_8); inline;
- procedure setADM_EN(thebits : TBits_1); inline;
- procedure setFERR(thebits : TBits_1); inline;
- procedure setOERR(thebits : TBits_1); inline;
- procedure setPERR(thebits : TBits_1); inline;
- procedure setRIDLE(thebits : TBits_1); inline;
- procedure setTRMT(thebits : TBits_1); inline;
- procedure setURXDA(thebits : TBits_1); inline;
- procedure setURXEN(thebits : TBits_1); inline;
- procedure setURXISEL(thebits : TBits_2); inline;
- procedure setURXISEL0(thebits : TBits_1); inline;
- procedure setURXISEL1(thebits : TBits_1); inline;
- procedure setUTXBF(thebits : TBits_1); inline;
- procedure setUTXBRK(thebits : TBits_1); inline;
- procedure setUTXEN(thebits : TBits_1); inline;
- procedure setUTXINV(thebits : TBits_1); inline;
- procedure setUTXISEL(thebits : TBits_2); inline;
- procedure setUTXISEL0(thebits : TBits_1); inline;
- procedure setUTXISEL1(thebits : TBits_1); inline;
- procedure setUTXSEL(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearADDEN; inline;
- procedure clearADM_EN; inline;
- procedure clearFERR; inline;
- procedure clearOERR; inline;
- procedure clearPERR; inline;
- procedure clearRIDLE; inline;
- procedure clearTRMT; inline;
- procedure clearURXDA; inline;
- procedure clearURXEN; inline;
- procedure clearURXISEL0; inline;
- procedure clearURXISEL1; inline;
- procedure clearUTXBF; inline;
- procedure clearUTXBRK; inline;
- procedure clearUTXEN; inline;
- procedure clearUTXINV; inline;
- procedure clearUTXISEL0; inline;
- procedure clearUTXISEL1; inline;
- procedure setADDEN; inline;
- procedure setADM_EN; inline;
- procedure setFERR; inline;
- procedure setOERR; inline;
- procedure setPERR; inline;
- procedure setRIDLE; inline;
- procedure setTRMT; inline;
- procedure setURXDA; inline;
- procedure setURXEN; inline;
- procedure setURXISEL0; inline;
- procedure setURXISEL1; inline;
- procedure setUTXBF; inline;
- procedure setUTXBRK; inline;
- procedure setUTXEN; inline;
- procedure setUTXINV; inline;
- procedure setUTXISEL0; inline;
- procedure setUTXISEL1; inline;
- property ADDEN : TBits_1 read getADDEN write setADDEN;
- property ADDR : TBits_8 read getADDR write setADDR;
- property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
- property FERR : TBits_1 read getFERR write setFERR;
- property OERR : TBits_1 read getOERR write setOERR;
- property PERR : TBits_1 read getPERR write setPERR;
- property RIDLE : TBits_1 read getRIDLE write setRIDLE;
- property TRMT : TBits_1 read getTRMT write setTRMT;
- property URXDA : TBits_1 read getURXDA write setURXDA;
- property URXEN : TBits_1 read getURXEN write setURXEN;
- property URXISEL : TBits_2 read getURXISEL write setURXISEL;
- property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
- property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
- property UTXBF : TBits_1 read getUTXBF write setUTXBF;
- property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
- property UTXEN : TBits_1 read getUTXEN write setUTXEN;
- property UTXINV : TBits_1 read getUTXINV write setUTXINV;
- property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
- property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
- property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
- property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
- property w : TBits_32 read getw write setw;
- end;
- TUART2B_U6STA = record
- private
- function getADDEN : TBits_1; inline;
- function getADDR : TBits_8; inline;
- function getADM_EN : TBits_1; inline;
- function getFERR : TBits_1; inline;
- function getOERR : TBits_1; inline;
- function getPERR : TBits_1; inline;
- function getRIDLE : TBits_1; inline;
- function getTRMT : TBits_1; inline;
- function getURXDA : TBits_1; inline;
- function getURXEN : TBits_1; inline;
- function getURXISEL : TBits_2; inline;
- function getURXISEL0 : TBits_1; inline;
- function getURXISEL1 : TBits_1; inline;
- function getUTXBF : TBits_1; inline;
- function getUTXBRK : TBits_1; inline;
- function getUTXEN : TBits_1; inline;
- function getUTXINV : TBits_1; inline;
- function getUTXISEL : TBits_2; inline;
- function getUTXISEL0 : TBits_1; inline;
- function getUTXISEL1 : TBits_1; inline;
- function getUTXSEL : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setADDEN(thebits : TBits_1); inline;
- procedure setADDR(thebits : TBits_8); inline;
- procedure setADM_EN(thebits : TBits_1); inline;
- procedure setFERR(thebits : TBits_1); inline;
- procedure setOERR(thebits : TBits_1); inline;
- procedure setPERR(thebits : TBits_1); inline;
- procedure setRIDLE(thebits : TBits_1); inline;
- procedure setTRMT(thebits : TBits_1); inline;
- procedure setURXDA(thebits : TBits_1); inline;
- procedure setURXEN(thebits : TBits_1); inline;
- procedure setURXISEL(thebits : TBits_2); inline;
- procedure setURXISEL0(thebits : TBits_1); inline;
- procedure setURXISEL1(thebits : TBits_1); inline;
- procedure setUTXBF(thebits : TBits_1); inline;
- procedure setUTXBRK(thebits : TBits_1); inline;
- procedure setUTXEN(thebits : TBits_1); inline;
- procedure setUTXINV(thebits : TBits_1); inline;
- procedure setUTXISEL(thebits : TBits_2); inline;
- procedure setUTXISEL0(thebits : TBits_1); inline;
- procedure setUTXISEL1(thebits : TBits_1); inline;
- procedure setUTXSEL(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearADDEN; inline;
- procedure clearADM_EN; inline;
- procedure clearFERR; inline;
- procedure clearOERR; inline;
- procedure clearPERR; inline;
- procedure clearRIDLE; inline;
- procedure clearTRMT; inline;
- procedure clearURXDA; inline;
- procedure clearURXEN; inline;
- procedure clearURXISEL0; inline;
- procedure clearURXISEL1; inline;
- procedure clearUTXBF; inline;
- procedure clearUTXBRK; inline;
- procedure clearUTXEN; inline;
- procedure clearUTXINV; inline;
- procedure clearUTXISEL0; inline;
- procedure clearUTXISEL1; inline;
- procedure setADDEN; inline;
- procedure setADM_EN; inline;
- procedure setFERR; inline;
- procedure setOERR; inline;
- procedure setPERR; inline;
- procedure setRIDLE; inline;
- procedure setTRMT; inline;
- procedure setURXDA; inline;
- procedure setURXEN; inline;
- procedure setURXISEL0; inline;
- procedure setURXISEL1; inline;
- procedure setUTXBF; inline;
- procedure setUTXBRK; inline;
- procedure setUTXEN; inline;
- procedure setUTXINV; inline;
- procedure setUTXISEL0; inline;
- procedure setUTXISEL1; inline;
- property ADDEN : TBits_1 read getADDEN write setADDEN;
- property ADDR : TBits_8 read getADDR write setADDR;
- property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
- property FERR : TBits_1 read getFERR write setFERR;
- property OERR : TBits_1 read getOERR write setOERR;
- property PERR : TBits_1 read getPERR write setPERR;
- property RIDLE : TBits_1 read getRIDLE write setRIDLE;
- property TRMT : TBits_1 read getTRMT write setTRMT;
- property URXDA : TBits_1 read getURXDA write setURXDA;
- property URXEN : TBits_1 read getURXEN write setURXEN;
- property URXISEL : TBits_2 read getURXISEL write setURXISEL;
- property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
- property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
- property UTXBF : TBits_1 read getUTXBF write setUTXBF;
- property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
- property UTXEN : TBits_1 read getUTXEN write setUTXEN;
- property UTXINV : TBits_1 read getUTXINV write setUTXINV;
- property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
- property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
- property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
- property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
- property w : TBits_32 read getw write setw;
- end;
- type
- TUART2BRegisters = record
- U2BMODEbits : TUART2B_U2BMODE;
- U2BMODE : longWord;
- U6MODEbits : TUART2B_U6MODE;
- U6MODE : longWord;
- U2BMODECLR : longWord;
- U6MODECLR : longWord;
- U2BMODESET : longWord;
- U6MODESET : longWord;
- U2BMODEINV : longWord;
- U6MODEINV : longWord;
- U2BSTAbits : TUART2B_U2BSTA;
- U2BSTA : longWord;
- U6STAbits : TUART2B_U6STA;
- U6STA : longWord;
- U2BSTACLR : longWord;
- U6STACLR : longWord;
- U2BSTASET : longWord;
- U6STASET : longWord;
- U2BSTAINV : longWord;
- U6STAINV : longWord;
- U2BTXREG : longWord;
- U6TXREG : longWord;
- U2BRXREG : longWord;
- U6RXREG : longWord;
- U2BBRG : longWord;
- U6BRG : longWord;
- U2BBRGCLR : longWord;
- U6BRGCLR : longWord;
- U2BBRGSET : longWord;
- U6BRGSET : longWord;
- U2BBRGINV : longWord;
- U6BRGINV : longWord;
- end;
- TUART3A_U2MODE = record
- private
- function getABAUD : TBits_1; inline;
- function getBRGH : TBits_1; inline;
- function getIREN : TBits_1; inline;
- function getLPBACK : TBits_1; inline;
- function getON : TBits_1; inline;
- function getPDSEL : TBits_2; inline;
- function getPDSEL0 : TBits_1; inline;
- function getPDSEL1 : TBits_1; inline;
- function getRTSMD : TBits_1; inline;
- function getRXINV : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getSTSEL : TBits_1; inline;
- function getUARTEN : TBits_1; inline;
- function getUEN : TBits_2; inline;
- function getUEN0 : TBits_1; inline;
- function getUEN1 : TBits_1; inline;
- function getUSIDL : TBits_1; inline;
- function getWAKE : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setABAUD(thebits : TBits_1); inline;
- procedure setBRGH(thebits : TBits_1); inline;
- procedure setIREN(thebits : TBits_1); inline;
- procedure setLPBACK(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setPDSEL(thebits : TBits_2); inline;
- procedure setPDSEL0(thebits : TBits_1); inline;
- procedure setPDSEL1(thebits : TBits_1); inline;
- procedure setRTSMD(thebits : TBits_1); inline;
- procedure setRXINV(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setSTSEL(thebits : TBits_1); inline;
- procedure setUARTEN(thebits : TBits_1); inline;
- procedure setUEN(thebits : TBits_2); inline;
- procedure setUEN0(thebits : TBits_1); inline;
- procedure setUEN1(thebits : TBits_1); inline;
- procedure setUSIDL(thebits : TBits_1); inline;
- procedure setWAKE(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearABAUD; inline;
- procedure clearBRGH; inline;
- procedure clearIREN; inline;
- procedure clearLPBACK; inline;
- procedure clearON; inline;
- procedure clearPDSEL0; inline;
- procedure clearPDSEL1; inline;
- procedure clearRTSMD; inline;
- procedure clearRXINV; inline;
- procedure clearSIDL; inline;
- procedure clearSTSEL; inline;
- procedure clearUARTEN; inline;
- procedure clearUEN0; inline;
- procedure clearUEN1; inline;
- procedure clearUSIDL; inline;
- procedure clearWAKE; inline;
- procedure setABAUD; inline;
- procedure setBRGH; inline;
- procedure setIREN; inline;
- procedure setLPBACK; inline;
- procedure setON; inline;
- procedure setPDSEL0; inline;
- procedure setPDSEL1; inline;
- procedure setRTSMD; inline;
- procedure setRXINV; inline;
- procedure setSIDL; inline;
- procedure setSTSEL; inline;
- procedure setUARTEN; inline;
- procedure setUEN0; inline;
- procedure setUEN1; inline;
- procedure setUSIDL; inline;
- procedure setWAKE; inline;
- property ABAUD : TBits_1 read getABAUD write setABAUD;
- property BRGH : TBits_1 read getBRGH write setBRGH;
- property IREN : TBits_1 read getIREN write setIREN;
- property LPBACK : TBits_1 read getLPBACK write setLPBACK;
- property ON : TBits_1 read getON write setON;
- property PDSEL : TBits_2 read getPDSEL write setPDSEL;
- property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
- property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
- property RTSMD : TBits_1 read getRTSMD write setRTSMD;
- property RXINV : TBits_1 read getRXINV write setRXINV;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property STSEL : TBits_1 read getSTSEL write setSTSEL;
- property UARTEN : TBits_1 read getUARTEN write setUARTEN;
- property UEN : TBits_2 read getUEN write setUEN;
- property UEN0 : TBits_1 read getUEN0 write setUEN0;
- property UEN1 : TBits_1 read getUEN1 write setUEN1;
- property USIDL : TBits_1 read getUSIDL write setUSIDL;
- property WAKE : TBits_1 read getWAKE write setWAKE;
- property w : TBits_32 read getw write setw;
- end;
- TUART3A_U3AMODE = record
- private
- function getABAUD : TBits_1; inline;
- function getBRGH : TBits_1; inline;
- function getIREN : TBits_1; inline;
- function getLPBACK : TBits_1; inline;
- function getON : TBits_1; inline;
- function getPDSEL : TBits_2; inline;
- function getPDSEL0 : TBits_1; inline;
- function getPDSEL1 : TBits_1; inline;
- function getRTSMD : TBits_1; inline;
- function getRXINV : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getSTSEL : TBits_1; inline;
- function getUARTEN : TBits_1; inline;
- function getUEN : TBits_2; inline;
- function getUEN0 : TBits_1; inline;
- function getUEN1 : TBits_1; inline;
- function getUSIDL : TBits_1; inline;
- function getWAKE : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setABAUD(thebits : TBits_1); inline;
- procedure setBRGH(thebits : TBits_1); inline;
- procedure setIREN(thebits : TBits_1); inline;
- procedure setLPBACK(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setPDSEL(thebits : TBits_2); inline;
- procedure setPDSEL0(thebits : TBits_1); inline;
- procedure setPDSEL1(thebits : TBits_1); inline;
- procedure setRTSMD(thebits : TBits_1); inline;
- procedure setRXINV(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setSTSEL(thebits : TBits_1); inline;
- procedure setUARTEN(thebits : TBits_1); inline;
- procedure setUEN(thebits : TBits_2); inline;
- procedure setUEN0(thebits : TBits_1); inline;
- procedure setUEN1(thebits : TBits_1); inline;
- procedure setUSIDL(thebits : TBits_1); inline;
- procedure setWAKE(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearABAUD; inline;
- procedure clearBRGH; inline;
- procedure clearIREN; inline;
- procedure clearLPBACK; inline;
- procedure clearON; inline;
- procedure clearPDSEL0; inline;
- procedure clearPDSEL1; inline;
- procedure clearRTSMD; inline;
- procedure clearRXINV; inline;
- procedure clearSIDL; inline;
- procedure clearSTSEL; inline;
- procedure clearUARTEN; inline;
- procedure clearUEN0; inline;
- procedure clearUEN1; inline;
- procedure clearUSIDL; inline;
- procedure clearWAKE; inline;
- procedure setABAUD; inline;
- procedure setBRGH; inline;
- procedure setIREN; inline;
- procedure setLPBACK; inline;
- procedure setON; inline;
- procedure setPDSEL0; inline;
- procedure setPDSEL1; inline;
- procedure setRTSMD; inline;
- procedure setRXINV; inline;
- procedure setSIDL; inline;
- procedure setSTSEL; inline;
- procedure setUARTEN; inline;
- procedure setUEN0; inline;
- procedure setUEN1; inline;
- procedure setUSIDL; inline;
- procedure setWAKE; inline;
- property ABAUD : TBits_1 read getABAUD write setABAUD;
- property BRGH : TBits_1 read getBRGH write setBRGH;
- property IREN : TBits_1 read getIREN write setIREN;
- property LPBACK : TBits_1 read getLPBACK write setLPBACK;
- property ON : TBits_1 read getON write setON;
- property PDSEL : TBits_2 read getPDSEL write setPDSEL;
- property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
- property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
- property RTSMD : TBits_1 read getRTSMD write setRTSMD;
- property RXINV : TBits_1 read getRXINV write setRXINV;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property STSEL : TBits_1 read getSTSEL write setSTSEL;
- property UARTEN : TBits_1 read getUARTEN write setUARTEN;
- property UEN : TBits_2 read getUEN write setUEN;
- property UEN0 : TBits_1 read getUEN0 write setUEN0;
- property UEN1 : TBits_1 read getUEN1 write setUEN1;
- property USIDL : TBits_1 read getUSIDL write setUSIDL;
- property WAKE : TBits_1 read getWAKE write setWAKE;
- property w : TBits_32 read getw write setw;
- end;
- TUART3A_U2STA = record
- private
- function getADDEN : TBits_1; inline;
- function getADDR : TBits_8; inline;
- function getADM_EN : TBits_1; inline;
- function getFERR : TBits_1; inline;
- function getOERR : TBits_1; inline;
- function getPERR : TBits_1; inline;
- function getRIDLE : TBits_1; inline;
- function getTRMT : TBits_1; inline;
- function getURXDA : TBits_1; inline;
- function getURXEN : TBits_1; inline;
- function getURXISEL : TBits_2; inline;
- function getURXISEL0 : TBits_1; inline;
- function getURXISEL1 : TBits_1; inline;
- function getUTXBF : TBits_1; inline;
- function getUTXBRK : TBits_1; inline;
- function getUTXEN : TBits_1; inline;
- function getUTXINV : TBits_1; inline;
- function getUTXISEL : TBits_2; inline;
- function getUTXISEL0 : TBits_1; inline;
- function getUTXISEL1 : TBits_1; inline;
- function getUTXSEL : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setADDEN(thebits : TBits_1); inline;
- procedure setADDR(thebits : TBits_8); inline;
- procedure setADM_EN(thebits : TBits_1); inline;
- procedure setFERR(thebits : TBits_1); inline;
- procedure setOERR(thebits : TBits_1); inline;
- procedure setPERR(thebits : TBits_1); inline;
- procedure setRIDLE(thebits : TBits_1); inline;
- procedure setTRMT(thebits : TBits_1); inline;
- procedure setURXDA(thebits : TBits_1); inline;
- procedure setURXEN(thebits : TBits_1); inline;
- procedure setURXISEL(thebits : TBits_2); inline;
- procedure setURXISEL0(thebits : TBits_1); inline;
- procedure setURXISEL1(thebits : TBits_1); inline;
- procedure setUTXBF(thebits : TBits_1); inline;
- procedure setUTXBRK(thebits : TBits_1); inline;
- procedure setUTXEN(thebits : TBits_1); inline;
- procedure setUTXINV(thebits : TBits_1); inline;
- procedure setUTXISEL(thebits : TBits_2); inline;
- procedure setUTXISEL0(thebits : TBits_1); inline;
- procedure setUTXISEL1(thebits : TBits_1); inline;
- procedure setUTXSEL(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearADDEN; inline;
- procedure clearADM_EN; inline;
- procedure clearFERR; inline;
- procedure clearOERR; inline;
- procedure clearPERR; inline;
- procedure clearRIDLE; inline;
- procedure clearTRMT; inline;
- procedure clearURXDA; inline;
- procedure clearURXEN; inline;
- procedure clearURXISEL0; inline;
- procedure clearURXISEL1; inline;
- procedure clearUTXBF; inline;
- procedure clearUTXBRK; inline;
- procedure clearUTXEN; inline;
- procedure clearUTXINV; inline;
- procedure clearUTXISEL0; inline;
- procedure clearUTXISEL1; inline;
- procedure setADDEN; inline;
- procedure setADM_EN; inline;
- procedure setFERR; inline;
- procedure setOERR; inline;
- procedure setPERR; inline;
- procedure setRIDLE; inline;
- procedure setTRMT; inline;
- procedure setURXDA; inline;
- procedure setURXEN; inline;
- procedure setURXISEL0; inline;
- procedure setURXISEL1; inline;
- procedure setUTXBF; inline;
- procedure setUTXBRK; inline;
- procedure setUTXEN; inline;
- procedure setUTXINV; inline;
- procedure setUTXISEL0; inline;
- procedure setUTXISEL1; inline;
- property ADDEN : TBits_1 read getADDEN write setADDEN;
- property ADDR : TBits_8 read getADDR write setADDR;
- property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
- property FERR : TBits_1 read getFERR write setFERR;
- property OERR : TBits_1 read getOERR write setOERR;
- property PERR : TBits_1 read getPERR write setPERR;
- property RIDLE : TBits_1 read getRIDLE write setRIDLE;
- property TRMT : TBits_1 read getTRMT write setTRMT;
- property URXDA : TBits_1 read getURXDA write setURXDA;
- property URXEN : TBits_1 read getURXEN write setURXEN;
- property URXISEL : TBits_2 read getURXISEL write setURXISEL;
- property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
- property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
- property UTXBF : TBits_1 read getUTXBF write setUTXBF;
- property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
- property UTXEN : TBits_1 read getUTXEN write setUTXEN;
- property UTXINV : TBits_1 read getUTXINV write setUTXINV;
- property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
- property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
- property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
- property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
- property w : TBits_32 read getw write setw;
- end;
- TUART3A_U3ASTA = record
- private
- function getADDEN : TBits_1; inline;
- function getADDR : TBits_8; inline;
- function getADM_EN : TBits_1; inline;
- function getFERR : TBits_1; inline;
- function getOERR : TBits_1; inline;
- function getPERR : TBits_1; inline;
- function getRIDLE : TBits_1; inline;
- function getTRMT : TBits_1; inline;
- function getURXDA : TBits_1; inline;
- function getURXEN : TBits_1; inline;
- function getURXISEL : TBits_2; inline;
- function getURXISEL0 : TBits_1; inline;
- function getURXISEL1 : TBits_1; inline;
- function getUTXBF : TBits_1; inline;
- function getUTXBRK : TBits_1; inline;
- function getUTXEN : TBits_1; inline;
- function getUTXINV : TBits_1; inline;
- function getUTXISEL : TBits_2; inline;
- function getUTXISEL0 : TBits_1; inline;
- function getUTXISEL1 : TBits_1; inline;
- function getUTXSEL : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setADDEN(thebits : TBits_1); inline;
- procedure setADDR(thebits : TBits_8); inline;
- procedure setADM_EN(thebits : TBits_1); inline;
- procedure setFERR(thebits : TBits_1); inline;
- procedure setOERR(thebits : TBits_1); inline;
- procedure setPERR(thebits : TBits_1); inline;
- procedure setRIDLE(thebits : TBits_1); inline;
- procedure setTRMT(thebits : TBits_1); inline;
- procedure setURXDA(thebits : TBits_1); inline;
- procedure setURXEN(thebits : TBits_1); inline;
- procedure setURXISEL(thebits : TBits_2); inline;
- procedure setURXISEL0(thebits : TBits_1); inline;
- procedure setURXISEL1(thebits : TBits_1); inline;
- procedure setUTXBF(thebits : TBits_1); inline;
- procedure setUTXBRK(thebits : TBits_1); inline;
- procedure setUTXEN(thebits : TBits_1); inline;
- procedure setUTXINV(thebits : TBits_1); inline;
- procedure setUTXISEL(thebits : TBits_2); inline;
- procedure setUTXISEL0(thebits : TBits_1); inline;
- procedure setUTXISEL1(thebits : TBits_1); inline;
- procedure setUTXSEL(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearADDEN; inline;
- procedure clearADM_EN; inline;
- procedure clearFERR; inline;
- procedure clearOERR; inline;
- procedure clearPERR; inline;
- procedure clearRIDLE; inline;
- procedure clearTRMT; inline;
- procedure clearURXDA; inline;
- procedure clearURXEN; inline;
- procedure clearURXISEL0; inline;
- procedure clearURXISEL1; inline;
- procedure clearUTXBF; inline;
- procedure clearUTXBRK; inline;
- procedure clearUTXEN; inline;
- procedure clearUTXINV; inline;
- procedure clearUTXISEL0; inline;
- procedure clearUTXISEL1; inline;
- procedure setADDEN; inline;
- procedure setADM_EN; inline;
- procedure setFERR; inline;
- procedure setOERR; inline;
- procedure setPERR; inline;
- procedure setRIDLE; inline;
- procedure setTRMT; inline;
- procedure setURXDA; inline;
- procedure setURXEN; inline;
- procedure setURXISEL0; inline;
- procedure setURXISEL1; inline;
- procedure setUTXBF; inline;
- procedure setUTXBRK; inline;
- procedure setUTXEN; inline;
- procedure setUTXINV; inline;
- procedure setUTXISEL0; inline;
- procedure setUTXISEL1; inline;
- property ADDEN : TBits_1 read getADDEN write setADDEN;
- property ADDR : TBits_8 read getADDR write setADDR;
- property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
- property FERR : TBits_1 read getFERR write setFERR;
- property OERR : TBits_1 read getOERR write setOERR;
- property PERR : TBits_1 read getPERR write setPERR;
- property RIDLE : TBits_1 read getRIDLE write setRIDLE;
- property TRMT : TBits_1 read getTRMT write setTRMT;
- property URXDA : TBits_1 read getURXDA write setURXDA;
- property URXEN : TBits_1 read getURXEN write setURXEN;
- property URXISEL : TBits_2 read getURXISEL write setURXISEL;
- property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
- property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
- property UTXBF : TBits_1 read getUTXBF write setUTXBF;
- property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
- property UTXEN : TBits_1 read getUTXEN write setUTXEN;
- property UTXINV : TBits_1 read getUTXINV write setUTXINV;
- property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
- property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
- property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
- property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
- property w : TBits_32 read getw write setw;
- end;
- type
- TUART3ARegisters = record
- U2MODEbits : TUART3A_U2MODE;
- U2MODE : longWord;
- U3AMODEbits : TUART3A_U3AMODE;
- U3AMODE : longWord;
- U2MODECLR : longWord;
- U3AMODECLR : longWord;
- U2MODESET : longWord;
- U3AMODESET : longWord;
- U2MODEINV : longWord;
- U3AMODEINV : longWord;
- U2STAbits : TUART3A_U2STA;
- U2STA : longWord;
- U3ASTAbits : TUART3A_U3ASTA;
- U3ASTA : longWord;
- U2STACLR : longWord;
- U3ASTACLR : longWord;
- U2STASET : longWord;
- U3ASTASET : longWord;
- U2STAINV : longWord;
- U3ASTAINV : longWord;
- U2TXREG : longWord;
- U3ATXREG : longWord;
- U2RXREG : longWord;
- U3ARXREG : longWord;
- U2BRG : longWord;
- U3ABRG : longWord;
- U2BRGCLR : longWord;
- U3ABRGCLR : longWord;
- U2BRGSET : longWord;
- U3ABRGSET : longWord;
- U2BRGINV : longWord;
- U3ABRGINV : longWord;
- end;
- TUART5_U3BMODE = record
- private
- function getABAUD : TBits_1; inline;
- function getBRGH : TBits_1; inline;
- function getIREN : TBits_1; inline;
- function getLPBACK : TBits_1; inline;
- function getON : TBits_1; inline;
- function getPDSEL : TBits_2; inline;
- function getPDSEL0 : TBits_1; inline;
- function getPDSEL1 : TBits_1; inline;
- function getRXINV : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getSTSEL : TBits_1; inline;
- function getUARTEN : TBits_1; inline;
- function getUSIDL : TBits_1; inline;
- function getWAKE : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setABAUD(thebits : TBits_1); inline;
- procedure setBRGH(thebits : TBits_1); inline;
- procedure setIREN(thebits : TBits_1); inline;
- procedure setLPBACK(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setPDSEL(thebits : TBits_2); inline;
- procedure setPDSEL0(thebits : TBits_1); inline;
- procedure setPDSEL1(thebits : TBits_1); inline;
- procedure setRXINV(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setSTSEL(thebits : TBits_1); inline;
- procedure setUARTEN(thebits : TBits_1); inline;
- procedure setUSIDL(thebits : TBits_1); inline;
- procedure setWAKE(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearABAUD; inline;
- procedure clearBRGH; inline;
- procedure clearIREN; inline;
- procedure clearLPBACK; inline;
- procedure clearON; inline;
- procedure clearPDSEL0; inline;
- procedure clearPDSEL1; inline;
- procedure clearRXINV; inline;
- procedure clearSIDL; inline;
- procedure clearSTSEL; inline;
- procedure clearUARTEN; inline;
- procedure clearUSIDL; inline;
- procedure clearWAKE; inline;
- procedure setABAUD; inline;
- procedure setBRGH; inline;
- procedure setIREN; inline;
- procedure setLPBACK; inline;
- procedure setON; inline;
- procedure setPDSEL0; inline;
- procedure setPDSEL1; inline;
- procedure setRXINV; inline;
- procedure setSIDL; inline;
- procedure setSTSEL; inline;
- procedure setUARTEN; inline;
- procedure setUSIDL; inline;
- procedure setWAKE; inline;
- property ABAUD : TBits_1 read getABAUD write setABAUD;
- property BRGH : TBits_1 read getBRGH write setBRGH;
- property IREN : TBits_1 read getIREN write setIREN;
- property LPBACK : TBits_1 read getLPBACK write setLPBACK;
- property ON : TBits_1 read getON write setON;
- property PDSEL : TBits_2 read getPDSEL write setPDSEL;
- property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
- property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
- property RXINV : TBits_1 read getRXINV write setRXINV;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property STSEL : TBits_1 read getSTSEL write setSTSEL;
- property UARTEN : TBits_1 read getUARTEN write setUARTEN;
- property USIDL : TBits_1 read getUSIDL write setUSIDL;
- property WAKE : TBits_1 read getWAKE write setWAKE;
- property w : TBits_32 read getw write setw;
- end;
- TUART5_U5MODE = record
- private
- function getABAUD : TBits_1; inline;
- function getBRGH : TBits_1; inline;
- function getIREN : TBits_1; inline;
- function getLPBACK : TBits_1; inline;
- function getON : TBits_1; inline;
- function getPDSEL : TBits_2; inline;
- function getPDSEL0 : TBits_1; inline;
- function getPDSEL1 : TBits_1; inline;
- function getRXINV : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getSTSEL : TBits_1; inline;
- function getUARTEN : TBits_1; inline;
- function getUSIDL : TBits_1; inline;
- function getWAKE : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setABAUD(thebits : TBits_1); inline;
- procedure setBRGH(thebits : TBits_1); inline;
- procedure setIREN(thebits : TBits_1); inline;
- procedure setLPBACK(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setPDSEL(thebits : TBits_2); inline;
- procedure setPDSEL0(thebits : TBits_1); inline;
- procedure setPDSEL1(thebits : TBits_1); inline;
- procedure setRXINV(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setSTSEL(thebits : TBits_1); inline;
- procedure setUARTEN(thebits : TBits_1); inline;
- procedure setUSIDL(thebits : TBits_1); inline;
- procedure setWAKE(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearABAUD; inline;
- procedure clearBRGH; inline;
- procedure clearIREN; inline;
- procedure clearLPBACK; inline;
- procedure clearON; inline;
- procedure clearPDSEL0; inline;
- procedure clearPDSEL1; inline;
- procedure clearRXINV; inline;
- procedure clearSIDL; inline;
- procedure clearSTSEL; inline;
- procedure clearUARTEN; inline;
- procedure clearUSIDL; inline;
- procedure clearWAKE; inline;
- procedure setABAUD; inline;
- procedure setBRGH; inline;
- procedure setIREN; inline;
- procedure setLPBACK; inline;
- procedure setON; inline;
- procedure setPDSEL0; inline;
- procedure setPDSEL1; inline;
- procedure setRXINV; inline;
- procedure setSIDL; inline;
- procedure setSTSEL; inline;
- procedure setUARTEN; inline;
- procedure setUSIDL; inline;
- procedure setWAKE; inline;
- property ABAUD : TBits_1 read getABAUD write setABAUD;
- property BRGH : TBits_1 read getBRGH write setBRGH;
- property IREN : TBits_1 read getIREN write setIREN;
- property LPBACK : TBits_1 read getLPBACK write setLPBACK;
- property ON : TBits_1 read getON write setON;
- property PDSEL : TBits_2 read getPDSEL write setPDSEL;
- property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
- property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
- property RXINV : TBits_1 read getRXINV write setRXINV;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property STSEL : TBits_1 read getSTSEL write setSTSEL;
- property UARTEN : TBits_1 read getUARTEN write setUARTEN;
- property USIDL : TBits_1 read getUSIDL write setUSIDL;
- property WAKE : TBits_1 read getWAKE write setWAKE;
- property w : TBits_32 read getw write setw;
- end;
- TUART5_U3BSTA = record
- private
- function getADDEN : TBits_1; inline;
- function getADDR : TBits_8; inline;
- function getADM_EN : TBits_1; inline;
- function getFERR : TBits_1; inline;
- function getOERR : TBits_1; inline;
- function getPERR : TBits_1; inline;
- function getRIDLE : TBits_1; inline;
- function getTRMT : TBits_1; inline;
- function getURXDA : TBits_1; inline;
- function getURXEN : TBits_1; inline;
- function getURXISEL : TBits_2; inline;
- function getURXISEL0 : TBits_1; inline;
- function getURXISEL1 : TBits_1; inline;
- function getUTXBF : TBits_1; inline;
- function getUTXBRK : TBits_1; inline;
- function getUTXEN : TBits_1; inline;
- function getUTXINV : TBits_1; inline;
- function getUTXISEL : TBits_2; inline;
- function getUTXISEL0 : TBits_1; inline;
- function getUTXISEL1 : TBits_1; inline;
- function getUTXSEL : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setADDEN(thebits : TBits_1); inline;
- procedure setADDR(thebits : TBits_8); inline;
- procedure setADM_EN(thebits : TBits_1); inline;
- procedure setFERR(thebits : TBits_1); inline;
- procedure setOERR(thebits : TBits_1); inline;
- procedure setPERR(thebits : TBits_1); inline;
- procedure setRIDLE(thebits : TBits_1); inline;
- procedure setTRMT(thebits : TBits_1); inline;
- procedure setURXDA(thebits : TBits_1); inline;
- procedure setURXEN(thebits : TBits_1); inline;
- procedure setURXISEL(thebits : TBits_2); inline;
- procedure setURXISEL0(thebits : TBits_1); inline;
- procedure setURXISEL1(thebits : TBits_1); inline;
- procedure setUTXBF(thebits : TBits_1); inline;
- procedure setUTXBRK(thebits : TBits_1); inline;
- procedure setUTXEN(thebits : TBits_1); inline;
- procedure setUTXINV(thebits : TBits_1); inline;
- procedure setUTXISEL(thebits : TBits_2); inline;
- procedure setUTXISEL0(thebits : TBits_1); inline;
- procedure setUTXISEL1(thebits : TBits_1); inline;
- procedure setUTXSEL(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearADDEN; inline;
- procedure clearADM_EN; inline;
- procedure clearFERR; inline;
- procedure clearOERR; inline;
- procedure clearPERR; inline;
- procedure clearRIDLE; inline;
- procedure clearTRMT; inline;
- procedure clearURXDA; inline;
- procedure clearURXEN; inline;
- procedure clearURXISEL0; inline;
- procedure clearURXISEL1; inline;
- procedure clearUTXBF; inline;
- procedure clearUTXBRK; inline;
- procedure clearUTXEN; inline;
- procedure clearUTXINV; inline;
- procedure clearUTXISEL0; inline;
- procedure clearUTXISEL1; inline;
- procedure setADDEN; inline;
- procedure setADM_EN; inline;
- procedure setFERR; inline;
- procedure setOERR; inline;
- procedure setPERR; inline;
- procedure setRIDLE; inline;
- procedure setTRMT; inline;
- procedure setURXDA; inline;
- procedure setURXEN; inline;
- procedure setURXISEL0; inline;
- procedure setURXISEL1; inline;
- procedure setUTXBF; inline;
- procedure setUTXBRK; inline;
- procedure setUTXEN; inline;
- procedure setUTXINV; inline;
- procedure setUTXISEL0; inline;
- procedure setUTXISEL1; inline;
- property ADDEN : TBits_1 read getADDEN write setADDEN;
- property ADDR : TBits_8 read getADDR write setADDR;
- property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
- property FERR : TBits_1 read getFERR write setFERR;
- property OERR : TBits_1 read getOERR write setOERR;
- property PERR : TBits_1 read getPERR write setPERR;
- property RIDLE : TBits_1 read getRIDLE write setRIDLE;
- property TRMT : TBits_1 read getTRMT write setTRMT;
- property URXDA : TBits_1 read getURXDA write setURXDA;
- property URXEN : TBits_1 read getURXEN write setURXEN;
- property URXISEL : TBits_2 read getURXISEL write setURXISEL;
- property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
- property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
- property UTXBF : TBits_1 read getUTXBF write setUTXBF;
- property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
- property UTXEN : TBits_1 read getUTXEN write setUTXEN;
- property UTXINV : TBits_1 read getUTXINV write setUTXINV;
- property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
- property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
- property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
- property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
- property w : TBits_32 read getw write setw;
- end;
- TUART5_U5STA = record
- private
- function getADDEN : TBits_1; inline;
- function getADDR : TBits_8; inline;
- function getADM_EN : TBits_1; inline;
- function getFERR : TBits_1; inline;
- function getOERR : TBits_1; inline;
- function getPERR : TBits_1; inline;
- function getRIDLE : TBits_1; inline;
- function getTRMT : TBits_1; inline;
- function getURXDA : TBits_1; inline;
- function getURXEN : TBits_1; inline;
- function getURXISEL : TBits_2; inline;
- function getURXISEL0 : TBits_1; inline;
- function getURXISEL1 : TBits_1; inline;
- function getUTXBF : TBits_1; inline;
- function getUTXBRK : TBits_1; inline;
- function getUTXEN : TBits_1; inline;
- function getUTXINV : TBits_1; inline;
- function getUTXISEL : TBits_2; inline;
- function getUTXISEL0 : TBits_1; inline;
- function getUTXISEL1 : TBits_1; inline;
- function getUTXSEL : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setADDEN(thebits : TBits_1); inline;
- procedure setADDR(thebits : TBits_8); inline;
- procedure setADM_EN(thebits : TBits_1); inline;
- procedure setFERR(thebits : TBits_1); inline;
- procedure setOERR(thebits : TBits_1); inline;
- procedure setPERR(thebits : TBits_1); inline;
- procedure setRIDLE(thebits : TBits_1); inline;
- procedure setTRMT(thebits : TBits_1); inline;
- procedure setURXDA(thebits : TBits_1); inline;
- procedure setURXEN(thebits : TBits_1); inline;
- procedure setURXISEL(thebits : TBits_2); inline;
- procedure setURXISEL0(thebits : TBits_1); inline;
- procedure setURXISEL1(thebits : TBits_1); inline;
- procedure setUTXBF(thebits : TBits_1); inline;
- procedure setUTXBRK(thebits : TBits_1); inline;
- procedure setUTXEN(thebits : TBits_1); inline;
- procedure setUTXINV(thebits : TBits_1); inline;
- procedure setUTXISEL(thebits : TBits_2); inline;
- procedure setUTXISEL0(thebits : TBits_1); inline;
- procedure setUTXISEL1(thebits : TBits_1); inline;
- procedure setUTXSEL(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearADDEN; inline;
- procedure clearADM_EN; inline;
- procedure clearFERR; inline;
- procedure clearOERR; inline;
- procedure clearPERR; inline;
- procedure clearRIDLE; inline;
- procedure clearTRMT; inline;
- procedure clearURXDA; inline;
- procedure clearURXEN; inline;
- procedure clearURXISEL0; inline;
- procedure clearURXISEL1; inline;
- procedure clearUTXBF; inline;
- procedure clearUTXBRK; inline;
- procedure clearUTXEN; inline;
- procedure clearUTXINV; inline;
- procedure clearUTXISEL0; inline;
- procedure clearUTXISEL1; inline;
- procedure setADDEN; inline;
- procedure setADM_EN; inline;
- procedure setFERR; inline;
- procedure setOERR; inline;
- procedure setPERR; inline;
- procedure setRIDLE; inline;
- procedure setTRMT; inline;
- procedure setURXDA; inline;
- procedure setURXEN; inline;
- procedure setURXISEL0; inline;
- procedure setURXISEL1; inline;
- procedure setUTXBF; inline;
- procedure setUTXBRK; inline;
- procedure setUTXEN; inline;
- procedure setUTXINV; inline;
- procedure setUTXISEL0; inline;
- procedure setUTXISEL1; inline;
- property ADDEN : TBits_1 read getADDEN write setADDEN;
- property ADDR : TBits_8 read getADDR write setADDR;
- property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
- property FERR : TBits_1 read getFERR write setFERR;
- property OERR : TBits_1 read getOERR write setOERR;
- property PERR : TBits_1 read getPERR write setPERR;
- property RIDLE : TBits_1 read getRIDLE write setRIDLE;
- property TRMT : TBits_1 read getTRMT write setTRMT;
- property URXDA : TBits_1 read getURXDA write setURXDA;
- property URXEN : TBits_1 read getURXEN write setURXEN;
- property URXISEL : TBits_2 read getURXISEL write setURXISEL;
- property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
- property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
- property UTXBF : TBits_1 read getUTXBF write setUTXBF;
- property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
- property UTXEN : TBits_1 read getUTXEN write setUTXEN;
- property UTXINV : TBits_1 read getUTXINV write setUTXINV;
- property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
- property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
- property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
- property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
- property w : TBits_32 read getw write setw;
- end;
- type
- TUART5Registers = record
- U3BMODEbits : TUART5_U3BMODE;
- U3BMODE : longWord;
- U5MODEbits : TUART5_U5MODE;
- U5MODE : longWord;
- U3BMODECLR : longWord;
- U5MODECLR : longWord;
- U3BMODESET : longWord;
- U5MODESET : longWord;
- U3BMODEINV : longWord;
- U5MODEINV : longWord;
- U3BSTAbits : TUART5_U3BSTA;
- U3BSTA : longWord;
- U5STAbits : TUART5_U5STA;
- U5STA : longWord;
- U3BSTACLR : longWord;
- U5STACLR : longWord;
- U3BSTASET : longWord;
- U5STASET : longWord;
- U3BSTAINV : longWord;
- U5STAINV : longWord;
- U3BTXREG : longWord;
- U5TXREG : longWord;
- U3BRXREG : longWord;
- U5RXREG : longWord;
- U3BBRG : longWord;
- U5BRG : longWord;
- U3BBRGCLR : longWord;
- U5BRGCLR : longWord;
- U3BBRGSET : longWord;
- U5BRGSET : longWord;
- U3BBRGINV : longWord;
- U5BRGINV : longWord;
- end;
- TPMP_PMCON = record
- private
- function getADRMUX : TBits_2; inline;
- function getADRMUX0 : TBits_1; inline;
- function getADRMUX1 : TBits_1; inline;
- function getALP : TBits_1; inline;
- function getCS1P : TBits_1; inline;
- function getCS2P : TBits_1; inline;
- function getCSF : TBits_2; inline;
- function getCSF0 : TBits_1; inline;
- function getCSF1 : TBits_1; inline;
- function getON : TBits_1; inline;
- function getPMPEN : TBits_1; inline;
- function getPMPTTL : TBits_1; inline;
- function getPSIDL : TBits_1; inline;
- function getPTRDEN : TBits_1; inline;
- function getPTWREN : TBits_1; inline;
- function getRDSP : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getWRSP : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setADRMUX(thebits : TBits_2); inline;
- procedure setADRMUX0(thebits : TBits_1); inline;
- procedure setADRMUX1(thebits : TBits_1); inline;
- procedure setALP(thebits : TBits_1); inline;
- procedure setCS1P(thebits : TBits_1); inline;
- procedure setCS2P(thebits : TBits_1); inline;
- procedure setCSF(thebits : TBits_2); inline;
- procedure setCSF0(thebits : TBits_1); inline;
- procedure setCSF1(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setPMPEN(thebits : TBits_1); inline;
- procedure setPMPTTL(thebits : TBits_1); inline;
- procedure setPSIDL(thebits : TBits_1); inline;
- procedure setPTRDEN(thebits : TBits_1); inline;
- procedure setPTWREN(thebits : TBits_1); inline;
- procedure setRDSP(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setWRSP(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearADRMUX0; inline;
- procedure clearADRMUX1; inline;
- procedure clearALP; inline;
- procedure clearCS1P; inline;
- procedure clearCS2P; inline;
- procedure clearCSF0; inline;
- procedure clearCSF1; inline;
- procedure clearON; inline;
- procedure clearPMPEN; inline;
- procedure clearPMPTTL; inline;
- procedure clearPSIDL; inline;
- procedure clearPTRDEN; inline;
- procedure clearPTWREN; inline;
- procedure clearRDSP; inline;
- procedure clearSIDL; inline;
- procedure clearWRSP; inline;
- procedure setADRMUX0; inline;
- procedure setADRMUX1; inline;
- procedure setALP; inline;
- procedure setCS1P; inline;
- procedure setCS2P; inline;
- procedure setCSF0; inline;
- procedure setCSF1; inline;
- procedure setON; inline;
- procedure setPMPEN; inline;
- procedure setPMPTTL; inline;
- procedure setPSIDL; inline;
- procedure setPTRDEN; inline;
- procedure setPTWREN; inline;
- procedure setRDSP; inline;
- procedure setSIDL; inline;
- procedure setWRSP; inline;
- property ADRMUX : TBits_2 read getADRMUX write setADRMUX;
- property ADRMUX0 : TBits_1 read getADRMUX0 write setADRMUX0;
- property ADRMUX1 : TBits_1 read getADRMUX1 write setADRMUX1;
- property ALP : TBits_1 read getALP write setALP;
- property CS1P : TBits_1 read getCS1P write setCS1P;
- property CS2P : TBits_1 read getCS2P write setCS2P;
- property CSF : TBits_2 read getCSF write setCSF;
- property CSF0 : TBits_1 read getCSF0 write setCSF0;
- property CSF1 : TBits_1 read getCSF1 write setCSF1;
- property ON : TBits_1 read getON write setON;
- property PMPEN : TBits_1 read getPMPEN write setPMPEN;
- property PMPTTL : TBits_1 read getPMPTTL write setPMPTTL;
- property PSIDL : TBits_1 read getPSIDL write setPSIDL;
- property PTRDEN : TBits_1 read getPTRDEN write setPTRDEN;
- property PTWREN : TBits_1 read getPTWREN write setPTWREN;
- property RDSP : TBits_1 read getRDSP write setRDSP;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property WRSP : TBits_1 read getWRSP write setWRSP;
- property w : TBits_32 read getw write setw;
- end;
- TPMP_PMMODE = record
- private
- function getBUSY : TBits_1; inline;
- function getINCM : TBits_2; inline;
- function getINCM0 : TBits_1; inline;
- function getINCM1 : TBits_1; inline;
- function getIRQM : TBits_2; inline;
- function getIRQM0 : TBits_1; inline;
- function getIRQM1 : TBits_1; inline;
- function getMODE : TBits_2; inline;
- function getMODE0 : TBits_1; inline;
- function getMODE1 : TBits_1; inline;
- function getMODE16 : TBits_1; inline;
- function getWAITB : TBits_2; inline;
- function getWAITB0 : TBits_1; inline;
- function getWAITB1 : TBits_1; inline;
- function getWAITE : TBits_2; inline;
- function getWAITE0 : TBits_1; inline;
- function getWAITE1 : TBits_1; inline;
- function getWAITM : TBits_4; inline;
- function getWAITM0 : TBits_1; inline;
- function getWAITM1 : TBits_1; inline;
- function getWAITM2 : TBits_1; inline;
- function getWAITM3 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setBUSY(thebits : TBits_1); inline;
- procedure setINCM(thebits : TBits_2); inline;
- procedure setINCM0(thebits : TBits_1); inline;
- procedure setINCM1(thebits : TBits_1); inline;
- procedure setIRQM(thebits : TBits_2); inline;
- procedure setIRQM0(thebits : TBits_1); inline;
- procedure setIRQM1(thebits : TBits_1); inline;
- procedure setMODE(thebits : TBits_2); inline;
- procedure setMODE0(thebits : TBits_1); inline;
- procedure setMODE1(thebits : TBits_1); inline;
- procedure setMODE16(thebits : TBits_1); inline;
- procedure setWAITB(thebits : TBits_2); inline;
- procedure setWAITB0(thebits : TBits_1); inline;
- procedure setWAITB1(thebits : TBits_1); inline;
- procedure setWAITE(thebits : TBits_2); inline;
- procedure setWAITE0(thebits : TBits_1); inline;
- procedure setWAITE1(thebits : TBits_1); inline;
- procedure setWAITM(thebits : TBits_4); inline;
- procedure setWAITM0(thebits : TBits_1); inline;
- procedure setWAITM1(thebits : TBits_1); inline;
- procedure setWAITM2(thebits : TBits_1); inline;
- procedure setWAITM3(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearBUSY; inline;
- procedure clearINCM0; inline;
- procedure clearINCM1; inline;
- procedure clearIRQM0; inline;
- procedure clearIRQM1; inline;
- procedure clearMODE0; inline;
- procedure clearMODE16; inline;
- procedure clearMODE1; inline;
- procedure clearWAITB0; inline;
- procedure clearWAITB1; inline;
- procedure clearWAITE0; inline;
- procedure clearWAITE1; inline;
- procedure clearWAITM0; inline;
- procedure clearWAITM1; inline;
- procedure clearWAITM2; inline;
- procedure clearWAITM3; inline;
- procedure setBUSY; inline;
- procedure setINCM0; inline;
- procedure setINCM1; inline;
- procedure setIRQM0; inline;
- procedure setIRQM1; inline;
- procedure setMODE0; inline;
- procedure setMODE16; inline;
- procedure setMODE1; inline;
- procedure setWAITB0; inline;
- procedure setWAITB1; inline;
- procedure setWAITE0; inline;
- procedure setWAITE1; inline;
- procedure setWAITM0; inline;
- procedure setWAITM1; inline;
- procedure setWAITM2; inline;
- procedure setWAITM3; inline;
- property BUSY : TBits_1 read getBUSY write setBUSY;
- property INCM : TBits_2 read getINCM write setINCM;
- property INCM0 : TBits_1 read getINCM0 write setINCM0;
- property INCM1 : TBits_1 read getINCM1 write setINCM1;
- property IRQM : TBits_2 read getIRQM write setIRQM;
- property IRQM0 : TBits_1 read getIRQM0 write setIRQM0;
- property IRQM1 : TBits_1 read getIRQM1 write setIRQM1;
- property MODE : TBits_2 read getMODE write setMODE;
- property MODE0 : TBits_1 read getMODE0 write setMODE0;
- property MODE1 : TBits_1 read getMODE1 write setMODE1;
- property MODE16 : TBits_1 read getMODE16 write setMODE16;
- property WAITB : TBits_2 read getWAITB write setWAITB;
- property WAITB0 : TBits_1 read getWAITB0 write setWAITB0;
- property WAITB1 : TBits_1 read getWAITB1 write setWAITB1;
- property WAITE : TBits_2 read getWAITE write setWAITE;
- property WAITE0 : TBits_1 read getWAITE0 write setWAITE0;
- property WAITE1 : TBits_1 read getWAITE1 write setWAITE1;
- property WAITM : TBits_4 read getWAITM write setWAITM;
- property WAITM0 : TBits_1 read getWAITM0 write setWAITM0;
- property WAITM1 : TBits_1 read getWAITM1 write setWAITM1;
- property WAITM2 : TBits_1 read getWAITM2 write setWAITM2;
- property WAITM3 : TBits_1 read getWAITM3 write setWAITM3;
- property w : TBits_32 read getw write setw;
- end;
- TPMP_PMADDR = record
- private
- function getADDR : TBits_14; inline;
- function getCS : TBits_2; inline;
- function getCS1 : TBits_1; inline;
- function getCS2 : TBits_1; inline;
- function getPADDR : TBits_14; inline;
- function getw : TBits_32; inline;
- procedure setADDR(thebits : TBits_14); inline;
- procedure setCS(thebits : TBits_2); inline;
- procedure setCS1(thebits : TBits_1); inline;
- procedure setCS2(thebits : TBits_1); inline;
- procedure setPADDR(thebits : TBits_14); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCS1; inline;
- procedure clearCS2; inline;
- procedure setCS1; inline;
- procedure setCS2; inline;
- property ADDR : TBits_14 read getADDR write setADDR;
- property CS : TBits_2 read getCS write setCS;
- property CS1 : TBits_1 read getCS1 write setCS1;
- property CS2 : TBits_1 read getCS2 write setCS2;
- property PADDR : TBits_14 read getPADDR write setPADDR;
- property w : TBits_32 read getw write setw;
- end;
- TPMP_PMDOUT = record
- private
- function getDATAOUT : TBits_32; inline;
- function getw : TBits_32; inline;
- procedure setDATAOUT(thebits : TBits_32); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property DATAOUT : TBits_32 read getDATAOUT write setDATAOUT;
- property w : TBits_32 read getw write setw;
- end;
- TPMP_PMDIN = record
- private
- function getDATAIN : TBits_32; inline;
- function getw : TBits_32; inline;
- procedure setDATAIN(thebits : TBits_32); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property DATAIN : TBits_32 read getDATAIN write setDATAIN;
- property w : TBits_32 read getw write setw;
- end;
- TPMP_PMAEN = record
- private
- function getPTEN : TBits_16; inline;
- function getPTEN0 : TBits_1; inline;
- function getPTEN1 : TBits_1; inline;
- function getPTEN10 : TBits_1; inline;
- function getPTEN11 : TBits_1; inline;
- function getPTEN12 : TBits_1; inline;
- function getPTEN13 : TBits_1; inline;
- function getPTEN14 : TBits_1; inline;
- function getPTEN15 : TBits_1; inline;
- function getPTEN2 : TBits_1; inline;
- function getPTEN3 : TBits_1; inline;
- function getPTEN4 : TBits_1; inline;
- function getPTEN5 : TBits_1; inline;
- function getPTEN6 : TBits_1; inline;
- function getPTEN7 : TBits_1; inline;
- function getPTEN8 : TBits_1; inline;
- function getPTEN9 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setPTEN(thebits : TBits_16); inline;
- procedure setPTEN0(thebits : TBits_1); inline;
- procedure setPTEN1(thebits : TBits_1); inline;
- procedure setPTEN10(thebits : TBits_1); inline;
- procedure setPTEN11(thebits : TBits_1); inline;
- procedure setPTEN12(thebits : TBits_1); inline;
- procedure setPTEN13(thebits : TBits_1); inline;
- procedure setPTEN14(thebits : TBits_1); inline;
- procedure setPTEN15(thebits : TBits_1); inline;
- procedure setPTEN2(thebits : TBits_1); inline;
- procedure setPTEN3(thebits : TBits_1); inline;
- procedure setPTEN4(thebits : TBits_1); inline;
- procedure setPTEN5(thebits : TBits_1); inline;
- procedure setPTEN6(thebits : TBits_1); inline;
- procedure setPTEN7(thebits : TBits_1); inline;
- procedure setPTEN8(thebits : TBits_1); inline;
- procedure setPTEN9(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearPTEN0; inline;
- procedure clearPTEN10; inline;
- procedure clearPTEN11; inline;
- procedure clearPTEN12; inline;
- procedure clearPTEN13; inline;
- procedure clearPTEN14; inline;
- procedure clearPTEN15; inline;
- procedure clearPTEN1; inline;
- procedure clearPTEN2; inline;
- procedure clearPTEN3; inline;
- procedure clearPTEN4; inline;
- procedure clearPTEN5; inline;
- procedure clearPTEN6; inline;
- procedure clearPTEN7; inline;
- procedure clearPTEN8; inline;
- procedure clearPTEN9; inline;
- procedure setPTEN0; inline;
- procedure setPTEN10; inline;
- procedure setPTEN11; inline;
- procedure setPTEN12; inline;
- procedure setPTEN13; inline;
- procedure setPTEN14; inline;
- procedure setPTEN15; inline;
- procedure setPTEN1; inline;
- procedure setPTEN2; inline;
- procedure setPTEN3; inline;
- procedure setPTEN4; inline;
- procedure setPTEN5; inline;
- procedure setPTEN6; inline;
- procedure setPTEN7; inline;
- procedure setPTEN8; inline;
- procedure setPTEN9; inline;
- property PTEN : TBits_16 read getPTEN write setPTEN;
- property PTEN0 : TBits_1 read getPTEN0 write setPTEN0;
- property PTEN1 : TBits_1 read getPTEN1 write setPTEN1;
- property PTEN10 : TBits_1 read getPTEN10 write setPTEN10;
- property PTEN11 : TBits_1 read getPTEN11 write setPTEN11;
- property PTEN12 : TBits_1 read getPTEN12 write setPTEN12;
- property PTEN13 : TBits_1 read getPTEN13 write setPTEN13;
- property PTEN14 : TBits_1 read getPTEN14 write setPTEN14;
- property PTEN15 : TBits_1 read getPTEN15 write setPTEN15;
- property PTEN2 : TBits_1 read getPTEN2 write setPTEN2;
- property PTEN3 : TBits_1 read getPTEN3 write setPTEN3;
- property PTEN4 : TBits_1 read getPTEN4 write setPTEN4;
- property PTEN5 : TBits_1 read getPTEN5 write setPTEN5;
- property PTEN6 : TBits_1 read getPTEN6 write setPTEN6;
- property PTEN7 : TBits_1 read getPTEN7 write setPTEN7;
- property PTEN8 : TBits_1 read getPTEN8 write setPTEN8;
- property PTEN9 : TBits_1 read getPTEN9 write setPTEN9;
- property w : TBits_32 read getw write setw;
- end;
- TPMP_PMSTAT = record
- private
- function getIB0F : TBits_1; inline;
- function getIB1F : TBits_1; inline;
- function getIB2F : TBits_1; inline;
- function getIB3F : TBits_1; inline;
- function getIBF : TBits_1; inline;
- function getIBOV : TBits_1; inline;
- function getOB0E : TBits_1; inline;
- function getOB1E : TBits_1; inline;
- function getOB2E : TBits_1; inline;
- function getOB3E : TBits_1; inline;
- function getOBE : TBits_1; inline;
- function getOBUF : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setIB0F(thebits : TBits_1); inline;
- procedure setIB1F(thebits : TBits_1); inline;
- procedure setIB2F(thebits : TBits_1); inline;
- procedure setIB3F(thebits : TBits_1); inline;
- procedure setIBF(thebits : TBits_1); inline;
- procedure setIBOV(thebits : TBits_1); inline;
- procedure setOB0E(thebits : TBits_1); inline;
- procedure setOB1E(thebits : TBits_1); inline;
- procedure setOB2E(thebits : TBits_1); inline;
- procedure setOB3E(thebits : TBits_1); inline;
- procedure setOBE(thebits : TBits_1); inline;
- procedure setOBUF(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearIB0F; inline;
- procedure clearIB1F; inline;
- procedure clearIB2F; inline;
- procedure clearIB3F; inline;
- procedure clearIBF; inline;
- procedure clearIBOV; inline;
- procedure clearOB0E; inline;
- procedure clearOB1E; inline;
- procedure clearOB2E; inline;
- procedure clearOB3E; inline;
- procedure clearOBE; inline;
- procedure clearOBUF; inline;
- procedure setIB0F; inline;
- procedure setIB1F; inline;
- procedure setIB2F; inline;
- procedure setIB3F; inline;
- procedure setIBF; inline;
- procedure setIBOV; inline;
- procedure setOB0E; inline;
- procedure setOB1E; inline;
- procedure setOB2E; inline;
- procedure setOB3E; inline;
- procedure setOBE; inline;
- procedure setOBUF; inline;
- property IB0F : TBits_1 read getIB0F write setIB0F;
- property IB1F : TBits_1 read getIB1F write setIB1F;
- property IB2F : TBits_1 read getIB2F write setIB2F;
- property IB3F : TBits_1 read getIB3F write setIB3F;
- property IBF : TBits_1 read getIBF write setIBF;
- property IBOV : TBits_1 read getIBOV write setIBOV;
- property OB0E : TBits_1 read getOB0E write setOB0E;
- property OB1E : TBits_1 read getOB1E write setOB1E;
- property OB2E : TBits_1 read getOB2E write setOB2E;
- property OB3E : TBits_1 read getOB3E write setOB3E;
- property OBE : TBits_1 read getOBE write setOBE;
- property OBUF : TBits_1 read getOBUF write setOBUF;
- property w : TBits_32 read getw write setw;
- end;
- type
- TPMPRegisters = record
- PMCONbits : TPMP_PMCON;
- PMCON : longWord;
- PMCONCLR : longWord;
- PMCONSET : longWord;
- PMCONINV : longWord;
- PMMODEbits : TPMP_PMMODE;
- PMMODE : longWord;
- PMMODECLR : longWord;
- PMMODESET : longWord;
- PMMODEINV : longWord;
- PMADDRbits : TPMP_PMADDR;
- PMADDR : longWord;
- PMADDRCLR : longWord;
- PMADDRSET : longWord;
- PMADDRINV : longWord;
- PMDOUTbits : TPMP_PMDOUT;
- PMDOUT : longWord;
- PMDOUTCLR : longWord;
- PMDOUTSET : longWord;
- PMDOUTINV : longWord;
- PMDINbits : TPMP_PMDIN;
- PMDIN : longWord;
- PMDINCLR : longWord;
- PMDINSET : longWord;
- PMDININV : longWord;
- PMAENbits : TPMP_PMAEN;
- PMAEN : longWord;
- PMAENCLR : longWord;
- PMAENSET : longWord;
- PMAENINV : longWord;
- PMSTATbits : TPMP_PMSTAT;
- PMSTAT : longWord;
- PMSTATCLR : longWord;
- PMSTATSET : longWord;
- PMSTATINV : longWord;
- end;
- TADC10_AD1CON1 = record
- private
- function getADON : TBits_1; inline;
- function getADSIDL : TBits_1; inline;
- function getASAM : TBits_1; inline;
- function getCLRASAM : TBits_1; inline;
- function getDONE : TBits_1; inline;
- function getFORM : TBits_3; inline;
- function getFORM0 : TBits_1; inline;
- function getFORM1 : TBits_1; inline;
- function getFORM2 : TBits_1; inline;
- function getON : TBits_1; inline;
- function getSAMP : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getSSRC : TBits_3; inline;
- function getSSRC0 : TBits_1; inline;
- function getSSRC1 : TBits_1; inline;
- function getSSRC2 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setADON(thebits : TBits_1); inline;
- procedure setADSIDL(thebits : TBits_1); inline;
- procedure setASAM(thebits : TBits_1); inline;
- procedure setCLRASAM(thebits : TBits_1); inline;
- procedure setDONE(thebits : TBits_1); inline;
- procedure setFORM(thebits : TBits_3); inline;
- procedure setFORM0(thebits : TBits_1); inline;
- procedure setFORM1(thebits : TBits_1); inline;
- procedure setFORM2(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setSAMP(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setSSRC(thebits : TBits_3); inline;
- procedure setSSRC0(thebits : TBits_1); inline;
- procedure setSSRC1(thebits : TBits_1); inline;
- procedure setSSRC2(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearADON; inline;
- procedure clearADSIDL; inline;
- procedure clearASAM; inline;
- procedure clearCLRASAM; inline;
- procedure clearDONE; inline;
- procedure clearFORM0; inline;
- procedure clearFORM1; inline;
- procedure clearFORM2; inline;
- procedure clearON; inline;
- procedure clearSAMP; inline;
- procedure clearSIDL; inline;
- procedure clearSSRC0; inline;
- procedure clearSSRC1; inline;
- procedure clearSSRC2; inline;
- procedure setADON; inline;
- procedure setADSIDL; inline;
- procedure setASAM; inline;
- procedure setCLRASAM; inline;
- procedure setDONE; inline;
- procedure setFORM0; inline;
- procedure setFORM1; inline;
- procedure setFORM2; inline;
- procedure setON; inline;
- procedure setSAMP; inline;
- procedure setSIDL; inline;
- procedure setSSRC0; inline;
- procedure setSSRC1; inline;
- procedure setSSRC2; inline;
- property ADON : TBits_1 read getADON write setADON;
- property ADSIDL : TBits_1 read getADSIDL write setADSIDL;
- property ASAM : TBits_1 read getASAM write setASAM;
- property CLRASAM : TBits_1 read getCLRASAM write setCLRASAM;
- property DONE : TBits_1 read getDONE write setDONE;
- property FORM : TBits_3 read getFORM write setFORM;
- property FORM0 : TBits_1 read getFORM0 write setFORM0;
- property FORM1 : TBits_1 read getFORM1 write setFORM1;
- property FORM2 : TBits_1 read getFORM2 write setFORM2;
- property ON : TBits_1 read getON write setON;
- property SAMP : TBits_1 read getSAMP write setSAMP;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property SSRC : TBits_3 read getSSRC write setSSRC;
- property SSRC0 : TBits_1 read getSSRC0 write setSSRC0;
- property SSRC1 : TBits_1 read getSSRC1 write setSSRC1;
- property SSRC2 : TBits_1 read getSSRC2 write setSSRC2;
- property w : TBits_32 read getw write setw;
- end;
- TADC10_AD1CON2 = record
- private
- function getALTS : TBits_1; inline;
- function getBUFM : TBits_1; inline;
- function getBUFS : TBits_1; inline;
- function getCSCNA : TBits_1; inline;
- function getOFFCAL : TBits_1; inline;
- function getSMPI : TBits_4; inline;
- function getSMPI0 : TBits_1; inline;
- function getSMPI1 : TBits_1; inline;
- function getSMPI2 : TBits_1; inline;
- function getSMPI3 : TBits_1; inline;
- function getVCFG : TBits_3; inline;
- function getVCFG0 : TBits_1; inline;
- function getVCFG1 : TBits_1; inline;
- function getVCFG2 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setALTS(thebits : TBits_1); inline;
- procedure setBUFM(thebits : TBits_1); inline;
- procedure setBUFS(thebits : TBits_1); inline;
- procedure setCSCNA(thebits : TBits_1); inline;
- procedure setOFFCAL(thebits : TBits_1); inline;
- procedure setSMPI(thebits : TBits_4); inline;
- procedure setSMPI0(thebits : TBits_1); inline;
- procedure setSMPI1(thebits : TBits_1); inline;
- procedure setSMPI2(thebits : TBits_1); inline;
- procedure setSMPI3(thebits : TBits_1); inline;
- procedure setVCFG(thebits : TBits_3); inline;
- procedure setVCFG0(thebits : TBits_1); inline;
- procedure setVCFG1(thebits : TBits_1); inline;
- procedure setVCFG2(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearALTS; inline;
- procedure clearBUFM; inline;
- procedure clearBUFS; inline;
- procedure clearCSCNA; inline;
- procedure clearOFFCAL; inline;
- procedure clearSMPI0; inline;
- procedure clearSMPI1; inline;
- procedure clearSMPI2; inline;
- procedure clearSMPI3; inline;
- procedure clearVCFG0; inline;
- procedure clearVCFG1; inline;
- procedure clearVCFG2; inline;
- procedure setALTS; inline;
- procedure setBUFM; inline;
- procedure setBUFS; inline;
- procedure setCSCNA; inline;
- procedure setOFFCAL; inline;
- procedure setSMPI0; inline;
- procedure setSMPI1; inline;
- procedure setSMPI2; inline;
- procedure setSMPI3; inline;
- procedure setVCFG0; inline;
- procedure setVCFG1; inline;
- procedure setVCFG2; inline;
- property ALTS : TBits_1 read getALTS write setALTS;
- property BUFM : TBits_1 read getBUFM write setBUFM;
- property BUFS : TBits_1 read getBUFS write setBUFS;
- property CSCNA : TBits_1 read getCSCNA write setCSCNA;
- property OFFCAL : TBits_1 read getOFFCAL write setOFFCAL;
- property SMPI : TBits_4 read getSMPI write setSMPI;
- property SMPI0 : TBits_1 read getSMPI0 write setSMPI0;
- property SMPI1 : TBits_1 read getSMPI1 write setSMPI1;
- property SMPI2 : TBits_1 read getSMPI2 write setSMPI2;
- property SMPI3 : TBits_1 read getSMPI3 write setSMPI3;
- property VCFG : TBits_3 read getVCFG write setVCFG;
- property VCFG0 : TBits_1 read getVCFG0 write setVCFG0;
- property VCFG1 : TBits_1 read getVCFG1 write setVCFG1;
- property VCFG2 : TBits_1 read getVCFG2 write setVCFG2;
- property w : TBits_32 read getw write setw;
- end;
- TADC10_AD1CON3 = record
- private
- function getADCS : TBits_8; inline;
- function getADCS0 : TBits_1; inline;
- function getADCS1 : TBits_1; inline;
- function getADCS2 : TBits_1; inline;
- function getADCS3 : TBits_1; inline;
- function getADCS4 : TBits_1; inline;
- function getADCS5 : TBits_1; inline;
- function getADCS6 : TBits_1; inline;
- function getADCS7 : TBits_1; inline;
- function getADRC : TBits_1; inline;
- function getSAMC : TBits_5; inline;
- function getSAMC0 : TBits_1; inline;
- function getSAMC1 : TBits_1; inline;
- function getSAMC2 : TBits_1; inline;
- function getSAMC3 : TBits_1; inline;
- function getSAMC4 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setADCS(thebits : TBits_8); inline;
- procedure setADCS0(thebits : TBits_1); inline;
- procedure setADCS1(thebits : TBits_1); inline;
- procedure setADCS2(thebits : TBits_1); inline;
- procedure setADCS3(thebits : TBits_1); inline;
- procedure setADCS4(thebits : TBits_1); inline;
- procedure setADCS5(thebits : TBits_1); inline;
- procedure setADCS6(thebits : TBits_1); inline;
- procedure setADCS7(thebits : TBits_1); inline;
- procedure setADRC(thebits : TBits_1); inline;
- procedure setSAMC(thebits : TBits_5); inline;
- procedure setSAMC0(thebits : TBits_1); inline;
- procedure setSAMC1(thebits : TBits_1); inline;
- procedure setSAMC2(thebits : TBits_1); inline;
- procedure setSAMC3(thebits : TBits_1); inline;
- procedure setSAMC4(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearADCS0; inline;
- procedure clearADCS1; inline;
- procedure clearADCS2; inline;
- procedure clearADCS3; inline;
- procedure clearADCS4; inline;
- procedure clearADCS5; inline;
- procedure clearADCS6; inline;
- procedure clearADCS7; inline;
- procedure clearADRC; inline;
- procedure clearSAMC0; inline;
- procedure clearSAMC1; inline;
- procedure clearSAMC2; inline;
- procedure clearSAMC3; inline;
- procedure clearSAMC4; inline;
- procedure setADCS0; inline;
- procedure setADCS1; inline;
- procedure setADCS2; inline;
- procedure setADCS3; inline;
- procedure setADCS4; inline;
- procedure setADCS5; inline;
- procedure setADCS6; inline;
- procedure setADCS7; inline;
- procedure setADRC; inline;
- procedure setSAMC0; inline;
- procedure setSAMC1; inline;
- procedure setSAMC2; inline;
- procedure setSAMC3; inline;
- procedure setSAMC4; inline;
- property ADCS : TBits_8 read getADCS write setADCS;
- property ADCS0 : TBits_1 read getADCS0 write setADCS0;
- property ADCS1 : TBits_1 read getADCS1 write setADCS1;
- property ADCS2 : TBits_1 read getADCS2 write setADCS2;
- property ADCS3 : TBits_1 read getADCS3 write setADCS3;
- property ADCS4 : TBits_1 read getADCS4 write setADCS4;
- property ADCS5 : TBits_1 read getADCS5 write setADCS5;
- property ADCS6 : TBits_1 read getADCS6 write setADCS6;
- property ADCS7 : TBits_1 read getADCS7 write setADCS7;
- property ADRC : TBits_1 read getADRC write setADRC;
- property SAMC : TBits_5 read getSAMC write setSAMC;
- property SAMC0 : TBits_1 read getSAMC0 write setSAMC0;
- property SAMC1 : TBits_1 read getSAMC1 write setSAMC1;
- property SAMC2 : TBits_1 read getSAMC2 write setSAMC2;
- property SAMC3 : TBits_1 read getSAMC3 write setSAMC3;
- property SAMC4 : TBits_1 read getSAMC4 write setSAMC4;
- property w : TBits_32 read getw write setw;
- end;
- TADC10_AD1CHS = record
- private
- function getCH0NA : TBits_1; inline;
- function getCH0NB : TBits_1; inline;
- function getCH0SA : TBits_4; inline;
- function getCH0SA0 : TBits_1; inline;
- function getCH0SA1 : TBits_1; inline;
- function getCH0SA2 : TBits_1; inline;
- function getCH0SA3 : TBits_1; inline;
- function getCH0SB : TBits_4; inline;
- function getCH0SB0 : TBits_1; inline;
- function getCH0SB1 : TBits_1; inline;
- function getCH0SB2 : TBits_1; inline;
- function getCH0SB3 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setCH0NA(thebits : TBits_1); inline;
- procedure setCH0NB(thebits : TBits_1); inline;
- procedure setCH0SA(thebits : TBits_4); inline;
- procedure setCH0SA0(thebits : TBits_1); inline;
- procedure setCH0SA1(thebits : TBits_1); inline;
- procedure setCH0SA2(thebits : TBits_1); inline;
- procedure setCH0SA3(thebits : TBits_1); inline;
- procedure setCH0SB(thebits : TBits_4); inline;
- procedure setCH0SB0(thebits : TBits_1); inline;
- procedure setCH0SB1(thebits : TBits_1); inline;
- procedure setCH0SB2(thebits : TBits_1); inline;
- procedure setCH0SB3(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCH0NA; inline;
- procedure clearCH0NB; inline;
- procedure clearCH0SA0; inline;
- procedure clearCH0SA1; inline;
- procedure clearCH0SA2; inline;
- procedure clearCH0SA3; inline;
- procedure clearCH0SB0; inline;
- procedure clearCH0SB1; inline;
- procedure clearCH0SB2; inline;
- procedure clearCH0SB3; inline;
- procedure setCH0NA; inline;
- procedure setCH0NB; inline;
- procedure setCH0SA0; inline;
- procedure setCH0SA1; inline;
- procedure setCH0SA2; inline;
- procedure setCH0SA3; inline;
- procedure setCH0SB0; inline;
- procedure setCH0SB1; inline;
- procedure setCH0SB2; inline;
- procedure setCH0SB3; inline;
- property CH0NA : TBits_1 read getCH0NA write setCH0NA;
- property CH0NB : TBits_1 read getCH0NB write setCH0NB;
- property CH0SA : TBits_4 read getCH0SA write setCH0SA;
- property CH0SA0 : TBits_1 read getCH0SA0 write setCH0SA0;
- property CH0SA1 : TBits_1 read getCH0SA1 write setCH0SA1;
- property CH0SA2 : TBits_1 read getCH0SA2 write setCH0SA2;
- property CH0SA3 : TBits_1 read getCH0SA3 write setCH0SA3;
- property CH0SB : TBits_4 read getCH0SB write setCH0SB;
- property CH0SB0 : TBits_1 read getCH0SB0 write setCH0SB0;
- property CH0SB1 : TBits_1 read getCH0SB1 write setCH0SB1;
- property CH0SB2 : TBits_1 read getCH0SB2 write setCH0SB2;
- property CH0SB3 : TBits_1 read getCH0SB3 write setCH0SB3;
- property w : TBits_32 read getw write setw;
- end;
- TADC10_AD1CSSL = record
- private
- function getCSSL : TBits_16; inline;
- function getCSSL0 : TBits_1; inline;
- function getCSSL1 : TBits_1; inline;
- function getCSSL10 : TBits_1; inline;
- function getCSSL11 : TBits_1; inline;
- function getCSSL12 : TBits_1; inline;
- function getCSSL13 : TBits_1; inline;
- function getCSSL14 : TBits_1; inline;
- function getCSSL15 : TBits_1; inline;
- function getCSSL2 : TBits_1; inline;
- function getCSSL3 : TBits_1; inline;
- function getCSSL4 : TBits_1; inline;
- function getCSSL5 : TBits_1; inline;
- function getCSSL6 : TBits_1; inline;
- function getCSSL7 : TBits_1; inline;
- function getCSSL8 : TBits_1; inline;
- function getCSSL9 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setCSSL(thebits : TBits_16); inline;
- procedure setCSSL0(thebits : TBits_1); inline;
- procedure setCSSL1(thebits : TBits_1); inline;
- procedure setCSSL10(thebits : TBits_1); inline;
- procedure setCSSL11(thebits : TBits_1); inline;
- procedure setCSSL12(thebits : TBits_1); inline;
- procedure setCSSL13(thebits : TBits_1); inline;
- procedure setCSSL14(thebits : TBits_1); inline;
- procedure setCSSL15(thebits : TBits_1); inline;
- procedure setCSSL2(thebits : TBits_1); inline;
- procedure setCSSL3(thebits : TBits_1); inline;
- procedure setCSSL4(thebits : TBits_1); inline;
- procedure setCSSL5(thebits : TBits_1); inline;
- procedure setCSSL6(thebits : TBits_1); inline;
- procedure setCSSL7(thebits : TBits_1); inline;
- procedure setCSSL8(thebits : TBits_1); inline;
- procedure setCSSL9(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCSSL0; inline;
- procedure clearCSSL10; inline;
- procedure clearCSSL11; inline;
- procedure clearCSSL12; inline;
- procedure clearCSSL13; inline;
- procedure clearCSSL14; inline;
- procedure clearCSSL15; inline;
- procedure clearCSSL1; inline;
- procedure clearCSSL2; inline;
- procedure clearCSSL3; inline;
- procedure clearCSSL4; inline;
- procedure clearCSSL5; inline;
- procedure clearCSSL6; inline;
- procedure clearCSSL7; inline;
- procedure clearCSSL8; inline;
- procedure clearCSSL9; inline;
- procedure setCSSL0; inline;
- procedure setCSSL10; inline;
- procedure setCSSL11; inline;
- procedure setCSSL12; inline;
- procedure setCSSL13; inline;
- procedure setCSSL14; inline;
- procedure setCSSL15; inline;
- procedure setCSSL1; inline;
- procedure setCSSL2; inline;
- procedure setCSSL3; inline;
- procedure setCSSL4; inline;
- procedure setCSSL5; inline;
- procedure setCSSL6; inline;
- procedure setCSSL7; inline;
- procedure setCSSL8; inline;
- procedure setCSSL9; inline;
- property CSSL : TBits_16 read getCSSL write setCSSL;
- property CSSL0 : TBits_1 read getCSSL0 write setCSSL0;
- property CSSL1 : TBits_1 read getCSSL1 write setCSSL1;
- property CSSL10 : TBits_1 read getCSSL10 write setCSSL10;
- property CSSL11 : TBits_1 read getCSSL11 write setCSSL11;
- property CSSL12 : TBits_1 read getCSSL12 write setCSSL12;
- property CSSL13 : TBits_1 read getCSSL13 write setCSSL13;
- property CSSL14 : TBits_1 read getCSSL14 write setCSSL14;
- property CSSL15 : TBits_1 read getCSSL15 write setCSSL15;
- property CSSL2 : TBits_1 read getCSSL2 write setCSSL2;
- property CSSL3 : TBits_1 read getCSSL3 write setCSSL3;
- property CSSL4 : TBits_1 read getCSSL4 write setCSSL4;
- property CSSL5 : TBits_1 read getCSSL5 write setCSSL5;
- property CSSL6 : TBits_1 read getCSSL6 write setCSSL6;
- property CSSL7 : TBits_1 read getCSSL7 write setCSSL7;
- property CSSL8 : TBits_1 read getCSSL8 write setCSSL8;
- property CSSL9 : TBits_1 read getCSSL9 write setCSSL9;
- property w : TBits_32 read getw write setw;
- end;
- TADC10_AD1PCFG = record
- private
- function getPCFG : TBits_16; inline;
- function getPCFG0 : TBits_1; inline;
- function getPCFG1 : TBits_1; inline;
- function getPCFG10 : TBits_1; inline;
- function getPCFG11 : TBits_1; inline;
- function getPCFG12 : TBits_1; inline;
- function getPCFG13 : TBits_1; inline;
- function getPCFG14 : TBits_1; inline;
- function getPCFG15 : TBits_1; inline;
- function getPCFG2 : TBits_1; inline;
- function getPCFG3 : TBits_1; inline;
- function getPCFG4 : TBits_1; inline;
- function getPCFG5 : TBits_1; inline;
- function getPCFG6 : TBits_1; inline;
- function getPCFG7 : TBits_1; inline;
- function getPCFG8 : TBits_1; inline;
- function getPCFG9 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setPCFG(thebits : TBits_16); inline;
- procedure setPCFG0(thebits : TBits_1); inline;
- procedure setPCFG1(thebits : TBits_1); inline;
- procedure setPCFG10(thebits : TBits_1); inline;
- procedure setPCFG11(thebits : TBits_1); inline;
- procedure setPCFG12(thebits : TBits_1); inline;
- procedure setPCFG13(thebits : TBits_1); inline;
- procedure setPCFG14(thebits : TBits_1); inline;
- procedure setPCFG15(thebits : TBits_1); inline;
- procedure setPCFG2(thebits : TBits_1); inline;
- procedure setPCFG3(thebits : TBits_1); inline;
- procedure setPCFG4(thebits : TBits_1); inline;
- procedure setPCFG5(thebits : TBits_1); inline;
- procedure setPCFG6(thebits : TBits_1); inline;
- procedure setPCFG7(thebits : TBits_1); inline;
- procedure setPCFG8(thebits : TBits_1); inline;
- procedure setPCFG9(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearPCFG0; inline;
- procedure clearPCFG10; inline;
- procedure clearPCFG11; inline;
- procedure clearPCFG12; inline;
- procedure clearPCFG13; inline;
- procedure clearPCFG14; inline;
- procedure clearPCFG15; inline;
- procedure clearPCFG1; inline;
- procedure clearPCFG2; inline;
- procedure clearPCFG3; inline;
- procedure clearPCFG4; inline;
- procedure clearPCFG5; inline;
- procedure clearPCFG6; inline;
- procedure clearPCFG7; inline;
- procedure clearPCFG8; inline;
- procedure clearPCFG9; inline;
- procedure setPCFG0; inline;
- procedure setPCFG10; inline;
- procedure setPCFG11; inline;
- procedure setPCFG12; inline;
- procedure setPCFG13; inline;
- procedure setPCFG14; inline;
- procedure setPCFG15; inline;
- procedure setPCFG1; inline;
- procedure setPCFG2; inline;
- procedure setPCFG3; inline;
- procedure setPCFG4; inline;
- procedure setPCFG5; inline;
- procedure setPCFG6; inline;
- procedure setPCFG7; inline;
- procedure setPCFG8; inline;
- procedure setPCFG9; inline;
- property PCFG : TBits_16 read getPCFG write setPCFG;
- property PCFG0 : TBits_1 read getPCFG0 write setPCFG0;
- property PCFG1 : TBits_1 read getPCFG1 write setPCFG1;
- property PCFG10 : TBits_1 read getPCFG10 write setPCFG10;
- property PCFG11 : TBits_1 read getPCFG11 write setPCFG11;
- property PCFG12 : TBits_1 read getPCFG12 write setPCFG12;
- property PCFG13 : TBits_1 read getPCFG13 write setPCFG13;
- property PCFG14 : TBits_1 read getPCFG14 write setPCFG14;
- property PCFG15 : TBits_1 read getPCFG15 write setPCFG15;
- property PCFG2 : TBits_1 read getPCFG2 write setPCFG2;
- property PCFG3 : TBits_1 read getPCFG3 write setPCFG3;
- property PCFG4 : TBits_1 read getPCFG4 write setPCFG4;
- property PCFG5 : TBits_1 read getPCFG5 write setPCFG5;
- property PCFG6 : TBits_1 read getPCFG6 write setPCFG6;
- property PCFG7 : TBits_1 read getPCFG7 write setPCFG7;
- property PCFG8 : TBits_1 read getPCFG8 write setPCFG8;
- property PCFG9 : TBits_1 read getPCFG9 write setPCFG9;
- property w : TBits_32 read getw write setw;
- end;
- type
- TADC10Registers = record
- AD1CON1bits : TADC10_AD1CON1;
- AD1CON1 : longWord;
- AD1CON1CLR : longWord;
- AD1CON1SET : longWord;
- AD1CON1INV : longWord;
- AD1CON2bits : TADC10_AD1CON2;
- AD1CON2 : longWord;
- AD1CON2CLR : longWord;
- AD1CON2SET : longWord;
- AD1CON2INV : longWord;
- AD1CON3bits : TADC10_AD1CON3;
- AD1CON3 : longWord;
- AD1CON3CLR : longWord;
- AD1CON3SET : longWord;
- AD1CON3INV : longWord;
- AD1CHSbits : TADC10_AD1CHS;
- AD1CHS : longWord;
- AD1CHSCLR : longWord;
- AD1CHSSET : longWord;
- AD1CHSINV : longWord;
- AD1CSSLbits : TADC10_AD1CSSL;
- AD1CSSL : longWord;
- AD1CSSLCLR : longWord;
- AD1CSSLSET : longWord;
- AD1CSSLINV : longWord;
- AD1PCFGbits : TADC10_AD1PCFG;
- AD1PCFG : longWord;
- AD1PCFGCLR : longWord;
- AD1PCFGSET : longWord;
- AD1PCFGINV : longWord;
- ADC1BUF0 : longWord;
- ADC1BUF1 : longWord;
- ADC1BUF2 : longWord;
- ADC1BUF3 : longWord;
- ADC1BUF4 : longWord;
- ADC1BUF5 : longWord;
- ADC1BUF6 : longWord;
- ADC1BUF7 : longWord;
- ADC1BUF8 : longWord;
- ADC1BUF9 : longWord;
- ADC1BUFA : longWord;
- ADC1BUFB : longWord;
- ADC1BUFC : longWord;
- ADC1BUFD : longWord;
- ADC1BUFE : longWord;
- ADC1BUFF : longWord;
- end;
- TCVR_CVRCON = record
- private
- function getCVR : TBits_4; inline;
- function getCVR0 : TBits_1; inline;
- function getCVR1 : TBits_1; inline;
- function getCVR2 : TBits_1; inline;
- function getCVR3 : TBits_1; inline;
- function getCVROE : TBits_1; inline;
- function getCVRR : TBits_1; inline;
- function getCVRSS : TBits_1; inline;
- function getON : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setCVR(thebits : TBits_4); inline;
- procedure setCVR0(thebits : TBits_1); inline;
- procedure setCVR1(thebits : TBits_1); inline;
- procedure setCVR2(thebits : TBits_1); inline;
- procedure setCVR3(thebits : TBits_1); inline;
- procedure setCVROE(thebits : TBits_1); inline;
- procedure setCVRR(thebits : TBits_1); inline;
- procedure setCVRSS(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCVR0; inline;
- procedure clearCVR1; inline;
- procedure clearCVR2; inline;
- procedure clearCVR3; inline;
- procedure clearCVROE; inline;
- procedure clearCVRR; inline;
- procedure clearCVRSS; inline;
- procedure clearON; inline;
- procedure setCVR0; inline;
- procedure setCVR1; inline;
- procedure setCVR2; inline;
- procedure setCVR3; inline;
- procedure setCVROE; inline;
- procedure setCVRR; inline;
- procedure setCVRSS; inline;
- procedure setON; inline;
- property CVR : TBits_4 read getCVR write setCVR;
- property CVR0 : TBits_1 read getCVR0 write setCVR0;
- property CVR1 : TBits_1 read getCVR1 write setCVR1;
- property CVR2 : TBits_1 read getCVR2 write setCVR2;
- property CVR3 : TBits_1 read getCVR3 write setCVR3;
- property CVROE : TBits_1 read getCVROE write setCVROE;
- property CVRR : TBits_1 read getCVRR write setCVRR;
- property CVRSS : TBits_1 read getCVRSS write setCVRSS;
- property ON : TBits_1 read getON write setON;
- property w : TBits_32 read getw write setw;
- end;
- type
- TCVRRegisters = record
- CVRCONbits : TCVR_CVRCON;
- CVRCON : longWord;
- CVRCONCLR : longWord;
- CVRCONSET : longWord;
- CVRCONINV : longWord;
- end;
- TCMP_CM1CON = record
- private
- function getCCH : TBits_2; inline;
- function getCCH0 : TBits_1; inline;
- function getCCH1 : TBits_1; inline;
- function getCOE : TBits_1; inline;
- function getCOUT : TBits_1; inline;
- function getCPOL : TBits_1; inline;
- function getCREF : TBits_1; inline;
- function getEVPOL : TBits_2; inline;
- function getEVPOL0 : TBits_1; inline;
- function getEVPOL1 : TBits_1; inline;
- function getON : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setCCH(thebits : TBits_2); inline;
- procedure setCCH0(thebits : TBits_1); inline;
- procedure setCCH1(thebits : TBits_1); inline;
- procedure setCOE(thebits : TBits_1); inline;
- procedure setCOUT(thebits : TBits_1); inline;
- procedure setCPOL(thebits : TBits_1); inline;
- procedure setCREF(thebits : TBits_1); inline;
- procedure setEVPOL(thebits : TBits_2); inline;
- procedure setEVPOL0(thebits : TBits_1); inline;
- procedure setEVPOL1(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCCH0; inline;
- procedure clearCCH1; inline;
- procedure clearCOE; inline;
- procedure clearCOUT; inline;
- procedure clearCPOL; inline;
- procedure clearCREF; inline;
- procedure clearEVPOL0; inline;
- procedure clearEVPOL1; inline;
- procedure clearON; inline;
- procedure setCCH0; inline;
- procedure setCCH1; inline;
- procedure setCOE; inline;
- procedure setCOUT; inline;
- procedure setCPOL; inline;
- procedure setCREF; inline;
- procedure setEVPOL0; inline;
- procedure setEVPOL1; inline;
- procedure setON; inline;
- property CCH : TBits_2 read getCCH write setCCH;
- property CCH0 : TBits_1 read getCCH0 write setCCH0;
- property CCH1 : TBits_1 read getCCH1 write setCCH1;
- property COE : TBits_1 read getCOE write setCOE;
- property COUT : TBits_1 read getCOUT write setCOUT;
- property CPOL : TBits_1 read getCPOL write setCPOL;
- property CREF : TBits_1 read getCREF write setCREF;
- property EVPOL : TBits_2 read getEVPOL write setEVPOL;
- property EVPOL0 : TBits_1 read getEVPOL0 write setEVPOL0;
- property EVPOL1 : TBits_1 read getEVPOL1 write setEVPOL1;
- property ON : TBits_1 read getON write setON;
- property w : TBits_32 read getw write setw;
- end;
- TCMP_CM2CON = record
- private
- function getCCH : TBits_2; inline;
- function getCCH0 : TBits_1; inline;
- function getCCH1 : TBits_1; inline;
- function getCOE : TBits_1; inline;
- function getCOUT : TBits_1; inline;
- function getCPOL : TBits_1; inline;
- function getCREF : TBits_1; inline;
- function getEVPOL : TBits_2; inline;
- function getEVPOL0 : TBits_1; inline;
- function getEVPOL1 : TBits_1; inline;
- function getON : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setCCH(thebits : TBits_2); inline;
- procedure setCCH0(thebits : TBits_1); inline;
- procedure setCCH1(thebits : TBits_1); inline;
- procedure setCOE(thebits : TBits_1); inline;
- procedure setCOUT(thebits : TBits_1); inline;
- procedure setCPOL(thebits : TBits_1); inline;
- procedure setCREF(thebits : TBits_1); inline;
- procedure setEVPOL(thebits : TBits_2); inline;
- procedure setEVPOL0(thebits : TBits_1); inline;
- procedure setEVPOL1(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCCH0; inline;
- procedure clearCCH1; inline;
- procedure clearCOE; inline;
- procedure clearCOUT; inline;
- procedure clearCPOL; inline;
- procedure clearCREF; inline;
- procedure clearEVPOL0; inline;
- procedure clearEVPOL1; inline;
- procedure clearON; inline;
- procedure setCCH0; inline;
- procedure setCCH1; inline;
- procedure setCOE; inline;
- procedure setCOUT; inline;
- procedure setCPOL; inline;
- procedure setCREF; inline;
- procedure setEVPOL0; inline;
- procedure setEVPOL1; inline;
- procedure setON; inline;
- property CCH : TBits_2 read getCCH write setCCH;
- property CCH0 : TBits_1 read getCCH0 write setCCH0;
- property CCH1 : TBits_1 read getCCH1 write setCCH1;
- property COE : TBits_1 read getCOE write setCOE;
- property COUT : TBits_1 read getCOUT write setCOUT;
- property CPOL : TBits_1 read getCPOL write setCPOL;
- property CREF : TBits_1 read getCREF write setCREF;
- property EVPOL : TBits_2 read getEVPOL write setEVPOL;
- property EVPOL0 : TBits_1 read getEVPOL0 write setEVPOL0;
- property EVPOL1 : TBits_1 read getEVPOL1 write setEVPOL1;
- property ON : TBits_1 read getON write setON;
- property w : TBits_32 read getw write setw;
- end;
- TCMP_CMSTAT = record
- private
- function getC1OUT : TBits_1; inline;
- function getC2OUT : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setC1OUT(thebits : TBits_1); inline;
- procedure setC2OUT(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearC1OUT; inline;
- procedure clearC2OUT; inline;
- procedure clearSIDL; inline;
- procedure setC1OUT; inline;
- procedure setC2OUT; inline;
- procedure setSIDL; inline;
- property C1OUT : TBits_1 read getC1OUT write setC1OUT;
- property C2OUT : TBits_1 read getC2OUT write setC2OUT;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property w : TBits_32 read getw write setw;
- end;
- type
- TCMPRegisters = record
- CM1CONbits : TCMP_CM1CON;
- CM1CON : longWord;
- CM1CONCLR : longWord;
- CM1CONSET : longWord;
- CM1CONINV : longWord;
- CM2CONbits : TCMP_CM2CON;
- CM2CON : longWord;
- CM2CONCLR : longWord;
- CM2CONSET : longWord;
- CM2CONINV : longWord;
- CMSTATbits : TCMP_CMSTAT;
- CMSTAT : longWord;
- CMSTATCLR : longWord;
- CMSTATSET : longWord;
- CMSTATINV : longWord;
- end;
- TOSC_OSCCON = record
- private
- function getCF : TBits_1; inline;
- function getCLKLOCK : TBits_1; inline;
- function getCOSC : TBits_3; inline;
- function getCOSC0 : TBits_1; inline;
- function getCOSC1 : TBits_1; inline;
- function getCOSC2 : TBits_1; inline;
- function getFRCDIV : TBits_3; inline;
- function getFRCDIV0 : TBits_1; inline;
- function getFRCDIV1 : TBits_1; inline;
- function getFRCDIV2 : TBits_1; inline;
- function getNOSC : TBits_3; inline;
- function getNOSC0 : TBits_1; inline;
- function getNOSC1 : TBits_1; inline;
- function getNOSC2 : TBits_1; inline;
- function getOSWEN : TBits_1; inline;
- function getPBDIV : TBits_2; inline;
- function getPBDIV0 : TBits_1; inline;
- function getPBDIV1 : TBits_1; inline;
- function getPLLMULT : TBits_3; inline;
- function getPLLMULT0 : TBits_1; inline;
- function getPLLMULT1 : TBits_1; inline;
- function getPLLMULT2 : TBits_1; inline;
- function getPLLODIV : TBits_3; inline;
- function getPLLODIV0 : TBits_1; inline;
- function getPLLODIV1 : TBits_1; inline;
- function getPLLODIV2 : TBits_1; inline;
- function getSLOCK : TBits_1; inline;
- function getSLPEN : TBits_1; inline;
- function getSOSCEN : TBits_1; inline;
- function getSOSCRDY : TBits_1; inline;
- function getUFRCEN : TBits_1; inline;
- function getULOCK : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setCF(thebits : TBits_1); inline;
- procedure setCLKLOCK(thebits : TBits_1); inline;
- procedure setCOSC(thebits : TBits_3); inline;
- procedure setCOSC0(thebits : TBits_1); inline;
- procedure setCOSC1(thebits : TBits_1); inline;
- procedure setCOSC2(thebits : TBits_1); inline;
- procedure setFRCDIV(thebits : TBits_3); inline;
- procedure setFRCDIV0(thebits : TBits_1); inline;
- procedure setFRCDIV1(thebits : TBits_1); inline;
- procedure setFRCDIV2(thebits : TBits_1); inline;
- procedure setNOSC(thebits : TBits_3); inline;
- procedure setNOSC0(thebits : TBits_1); inline;
- procedure setNOSC1(thebits : TBits_1); inline;
- procedure setNOSC2(thebits : TBits_1); inline;
- procedure setOSWEN(thebits : TBits_1); inline;
- procedure setPBDIV(thebits : TBits_2); inline;
- procedure setPBDIV0(thebits : TBits_1); inline;
- procedure setPBDIV1(thebits : TBits_1); inline;
- procedure setPLLMULT(thebits : TBits_3); inline;
- procedure setPLLMULT0(thebits : TBits_1); inline;
- procedure setPLLMULT1(thebits : TBits_1); inline;
- procedure setPLLMULT2(thebits : TBits_1); inline;
- procedure setPLLODIV(thebits : TBits_3); inline;
- procedure setPLLODIV0(thebits : TBits_1); inline;
- procedure setPLLODIV1(thebits : TBits_1); inline;
- procedure setPLLODIV2(thebits : TBits_1); inline;
- procedure setSLOCK(thebits : TBits_1); inline;
- procedure setSLPEN(thebits : TBits_1); inline;
- procedure setSOSCEN(thebits : TBits_1); inline;
- procedure setSOSCRDY(thebits : TBits_1); inline;
- procedure setUFRCEN(thebits : TBits_1); inline;
- procedure setULOCK(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCF; inline;
- procedure clearCLKLOCK; inline;
- procedure clearCOSC0; inline;
- procedure clearCOSC1; inline;
- procedure clearCOSC2; inline;
- procedure clearFRCDIV0; inline;
- procedure clearFRCDIV1; inline;
- procedure clearFRCDIV2; inline;
- procedure clearNOSC0; inline;
- procedure clearNOSC1; inline;
- procedure clearNOSC2; inline;
- procedure clearOSWEN; inline;
- procedure clearPBDIV0; inline;
- procedure clearPBDIV1; inline;
- procedure clearPLLMULT0; inline;
- procedure clearPLLMULT1; inline;
- procedure clearPLLMULT2; inline;
- procedure clearPLLODIV0; inline;
- procedure clearPLLODIV1; inline;
- procedure clearPLLODIV2; inline;
- procedure clearSLOCK; inline;
- procedure clearSLPEN; inline;
- procedure clearSOSCEN; inline;
- procedure clearSOSCRDY; inline;
- procedure clearUFRCEN; inline;
- procedure clearULOCK; inline;
- procedure setCF; inline;
- procedure setCLKLOCK; inline;
- procedure setCOSC0; inline;
- procedure setCOSC1; inline;
- procedure setCOSC2; inline;
- procedure setFRCDIV0; inline;
- procedure setFRCDIV1; inline;
- procedure setFRCDIV2; inline;
- procedure setNOSC0; inline;
- procedure setNOSC1; inline;
- procedure setNOSC2; inline;
- procedure setOSWEN; inline;
- procedure setPBDIV0; inline;
- procedure setPBDIV1; inline;
- procedure setPLLMULT0; inline;
- procedure setPLLMULT1; inline;
- procedure setPLLMULT2; inline;
- procedure setPLLODIV0; inline;
- procedure setPLLODIV1; inline;
- procedure setPLLODIV2; inline;
- procedure setSLOCK; inline;
- procedure setSLPEN; inline;
- procedure setSOSCEN; inline;
- procedure setSOSCRDY; inline;
- procedure setUFRCEN; inline;
- procedure setULOCK; inline;
- property CF : TBits_1 read getCF write setCF;
- property CLKLOCK : TBits_1 read getCLKLOCK write setCLKLOCK;
- property COSC : TBits_3 read getCOSC write setCOSC;
- property COSC0 : TBits_1 read getCOSC0 write setCOSC0;
- property COSC1 : TBits_1 read getCOSC1 write setCOSC1;
- property COSC2 : TBits_1 read getCOSC2 write setCOSC2;
- property FRCDIV : TBits_3 read getFRCDIV write setFRCDIV;
- property FRCDIV0 : TBits_1 read getFRCDIV0 write setFRCDIV0;
- property FRCDIV1 : TBits_1 read getFRCDIV1 write setFRCDIV1;
- property FRCDIV2 : TBits_1 read getFRCDIV2 write setFRCDIV2;
- property NOSC : TBits_3 read getNOSC write setNOSC;
- property NOSC0 : TBits_1 read getNOSC0 write setNOSC0;
- property NOSC1 : TBits_1 read getNOSC1 write setNOSC1;
- property NOSC2 : TBits_1 read getNOSC2 write setNOSC2;
- property OSWEN : TBits_1 read getOSWEN write setOSWEN;
- property PBDIV : TBits_2 read getPBDIV write setPBDIV;
- property PBDIV0 : TBits_1 read getPBDIV0 write setPBDIV0;
- property PBDIV1 : TBits_1 read getPBDIV1 write setPBDIV1;
- property PLLMULT : TBits_3 read getPLLMULT write setPLLMULT;
- property PLLMULT0 : TBits_1 read getPLLMULT0 write setPLLMULT0;
- property PLLMULT1 : TBits_1 read getPLLMULT1 write setPLLMULT1;
- property PLLMULT2 : TBits_1 read getPLLMULT2 write setPLLMULT2;
- property PLLODIV : TBits_3 read getPLLODIV write setPLLODIV;
- property PLLODIV0 : TBits_1 read getPLLODIV0 write setPLLODIV0;
- property PLLODIV1 : TBits_1 read getPLLODIV1 write setPLLODIV1;
- property PLLODIV2 : TBits_1 read getPLLODIV2 write setPLLODIV2;
- property SLOCK : TBits_1 read getSLOCK write setSLOCK;
- property SLPEN : TBits_1 read getSLPEN write setSLPEN;
- property SOSCEN : TBits_1 read getSOSCEN write setSOSCEN;
- property SOSCRDY : TBits_1 read getSOSCRDY write setSOSCRDY;
- property UFRCEN : TBits_1 read getUFRCEN write setUFRCEN;
- property ULOCK : TBits_1 read getULOCK write setULOCK;
- property w : TBits_32 read getw write setw;
- end;
- TOSC_OSCTUN = record
- private
- function getTUN : TBits_6; inline;
- function getTUN0 : TBits_1; inline;
- function getTUN1 : TBits_1; inline;
- function getTUN2 : TBits_1; inline;
- function getTUN3 : TBits_1; inline;
- function getTUN4 : TBits_1; inline;
- function getTUN5 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setTUN(thebits : TBits_6); inline;
- procedure setTUN0(thebits : TBits_1); inline;
- procedure setTUN1(thebits : TBits_1); inline;
- procedure setTUN2(thebits : TBits_1); inline;
- procedure setTUN3(thebits : TBits_1); inline;
- procedure setTUN4(thebits : TBits_1); inline;
- procedure setTUN5(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearTUN0; inline;
- procedure clearTUN1; inline;
- procedure clearTUN2; inline;
- procedure clearTUN3; inline;
- procedure clearTUN4; inline;
- procedure clearTUN5; inline;
- procedure setTUN0; inline;
- procedure setTUN1; inline;
- procedure setTUN2; inline;
- procedure setTUN3; inline;
- procedure setTUN4; inline;
- procedure setTUN5; inline;
- property TUN : TBits_6 read getTUN write setTUN;
- property TUN0 : TBits_1 read getTUN0 write setTUN0;
- property TUN1 : TBits_1 read getTUN1 write setTUN1;
- property TUN2 : TBits_1 read getTUN2 write setTUN2;
- property TUN3 : TBits_1 read getTUN3 write setTUN3;
- property TUN4 : TBits_1 read getTUN4 write setTUN4;
- property TUN5 : TBits_1 read getTUN5 write setTUN5;
- property w : TBits_32 read getw write setw;
- end;
- type
- TOSCRegisters = record
- OSCCONbits : TOSC_OSCCON;
- OSCCON : longWord;
- OSCCONCLR : longWord;
- OSCCONSET : longWord;
- OSCCONINV : longWord;
- OSCTUNbits : TOSC_OSCTUN;
- OSCTUN : longWord;
- OSCTUNCLR : longWord;
- OSCTUNSET : longWord;
- OSCTUNINV : longWord;
- end;
- type
- TCFGRegisters = record
- DDPCON : longWord;
- DEVID : longWord;
- SYSKEY : longWord;
- SYSKEYCLR : longWord;
- SYSKEYSET : longWord;
- SYSKEYINV : longWord;
- end;
- TNVM_NVMCON = record
- private
- function getLVDERR : TBits_1; inline;
- function getLVDSTAT : TBits_1; inline;
- function getNVMOP : TBits_4; inline;
- function getNVMOP0 : TBits_1; inline;
- function getNVMOP1 : TBits_1; inline;
- function getNVMOP2 : TBits_1; inline;
- function getNVMOP3 : TBits_1; inline;
- function getPROGOP : TBits_4; inline;
- function getPROGOP0 : TBits_1; inline;
- function getPROGOP1 : TBits_1; inline;
- function getPROGOP2 : TBits_1; inline;
- function getPROGOP3 : TBits_1; inline;
- function getWR : TBits_1; inline;
- function getWREN : TBits_1; inline;
- function getWRERR : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setLVDERR(thebits : TBits_1); inline;
- procedure setLVDSTAT(thebits : TBits_1); inline;
- procedure setNVMOP(thebits : TBits_4); inline;
- procedure setNVMOP0(thebits : TBits_1); inline;
- procedure setNVMOP1(thebits : TBits_1); inline;
- procedure setNVMOP2(thebits : TBits_1); inline;
- procedure setNVMOP3(thebits : TBits_1); inline;
- procedure setPROGOP(thebits : TBits_4); inline;
- procedure setPROGOP0(thebits : TBits_1); inline;
- procedure setPROGOP1(thebits : TBits_1); inline;
- procedure setPROGOP2(thebits : TBits_1); inline;
- procedure setPROGOP3(thebits : TBits_1); inline;
- procedure setWR(thebits : TBits_1); inline;
- procedure setWREN(thebits : TBits_1); inline;
- procedure setWRERR(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearLVDERR; inline;
- procedure clearLVDSTAT; inline;
- procedure clearNVMOP0; inline;
- procedure clearNVMOP1; inline;
- procedure clearNVMOP2; inline;
- procedure clearNVMOP3; inline;
- procedure clearPROGOP0; inline;
- procedure clearPROGOP1; inline;
- procedure clearPROGOP2; inline;
- procedure clearPROGOP3; inline;
- procedure clearWR; inline;
- procedure clearWREN; inline;
- procedure clearWRERR; inline;
- procedure setLVDERR; inline;
- procedure setLVDSTAT; inline;
- procedure setNVMOP0; inline;
- procedure setNVMOP1; inline;
- procedure setNVMOP2; inline;
- procedure setNVMOP3; inline;
- procedure setPROGOP0; inline;
- procedure setPROGOP1; inline;
- procedure setPROGOP2; inline;
- procedure setPROGOP3; inline;
- procedure setWR; inline;
- procedure setWREN; inline;
- procedure setWRERR; inline;
- property LVDERR : TBits_1 read getLVDERR write setLVDERR;
- property LVDSTAT : TBits_1 read getLVDSTAT write setLVDSTAT;
- property NVMOP : TBits_4 read getNVMOP write setNVMOP;
- property NVMOP0 : TBits_1 read getNVMOP0 write setNVMOP0;
- property NVMOP1 : TBits_1 read getNVMOP1 write setNVMOP1;
- property NVMOP2 : TBits_1 read getNVMOP2 write setNVMOP2;
- property NVMOP3 : TBits_1 read getNVMOP3 write setNVMOP3;
- property PROGOP : TBits_4 read getPROGOP write setPROGOP;
- property PROGOP0 : TBits_1 read getPROGOP0 write setPROGOP0;
- property PROGOP1 : TBits_1 read getPROGOP1 write setPROGOP1;
- property PROGOP2 : TBits_1 read getPROGOP2 write setPROGOP2;
- property PROGOP3 : TBits_1 read getPROGOP3 write setPROGOP3;
- property WR : TBits_1 read getWR write setWR;
- property WREN : TBits_1 read getWREN write setWREN;
- property WRERR : TBits_1 read getWRERR write setWRERR;
- property w : TBits_32 read getw write setw;
- end;
- type
- TNVMRegisters = record
- NVMCONbits : TNVM_NVMCON;
- NVMCON : longWord;
- NVMCONCLR : longWord;
- NVMCONSET : longWord;
- NVMCONINV : longWord;
- NVMKEY : longWord;
- NVMADDR : longWord;
- NVMADDRCLR : longWord;
- NVMADDRSET : longWord;
- NVMADDRINV : longWord;
- NVMDATA : longWord;
- NVMSRCADDR : longWord;
- end;
- TRCON_RCON = record
- private
- function getBOR : TBits_1; inline;
- function getCMR : TBits_1; inline;
- function getEXTR : TBits_1; inline;
- function getIDLE : TBits_1; inline;
- function getPOR : TBits_1; inline;
- function getSLEEP : TBits_1; inline;
- function getSWR : TBits_1; inline;
- function getVREGS : TBits_1; inline;
- function getWDTO : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setBOR(thebits : TBits_1); inline;
- procedure setCMR(thebits : TBits_1); inline;
- procedure setEXTR(thebits : TBits_1); inline;
- procedure setIDLE(thebits : TBits_1); inline;
- procedure setPOR(thebits : TBits_1); inline;
- procedure setSLEEP(thebits : TBits_1); inline;
- procedure setSWR(thebits : TBits_1); inline;
- procedure setVREGS(thebits : TBits_1); inline;
- procedure setWDTO(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearBOR; inline;
- procedure clearCMR; inline;
- procedure clearEXTR; inline;
- procedure clearIDLE; inline;
- procedure clearPOR; inline;
- procedure clearSLEEP; inline;
- procedure clearSWR; inline;
- procedure clearVREGS; inline;
- procedure clearWDTO; inline;
- procedure setBOR; inline;
- procedure setCMR; inline;
- procedure setEXTR; inline;
- procedure setIDLE; inline;
- procedure setPOR; inline;
- procedure setSLEEP; inline;
- procedure setSWR; inline;
- procedure setVREGS; inline;
- procedure setWDTO; inline;
- property BOR : TBits_1 read getBOR write setBOR;
- property CMR : TBits_1 read getCMR write setCMR;
- property EXTR : TBits_1 read getEXTR write setEXTR;
- property IDLE : TBits_1 read getIDLE write setIDLE;
- property POR : TBits_1 read getPOR write setPOR;
- property SLEEP : TBits_1 read getSLEEP write setSLEEP;
- property SWR : TBits_1 read getSWR write setSWR;
- property VREGS : TBits_1 read getVREGS write setVREGS;
- property WDTO : TBits_1 read getWDTO write setWDTO;
- property w : TBits_32 read getw write setw;
- end;
- TRCON_RSWRST = record
- private
- function getSWRST : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setSWRST(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearSWRST; inline;
- procedure setSWRST; inline;
- property SWRST : TBits_1 read getSWRST write setSWRST;
- property w : TBits_32 read getw write setw;
- end;
- type
- TRCONRegisters = record
- RCONbits : TRCON_RCON;
- RCON : longWord;
- RCONCLR : longWord;
- RCONSET : longWord;
- RCONINV : longWord;
- RSWRSTbits : TRCON_RSWRST;
- RSWRST : longWord;
- RSWRSTCLR : longWord;
- RSWRSTSET : longWord;
- RSWRSTINV : longWord;
- end;
- type
- T_DDPSTATRegisters = record
- _DDPSTAT : longWord;
- end;
- type
- T_STRORegisters = record
- _STRO : longWord;
- _STROCLR : longWord;
- _STROSET : longWord;
- _STROINV : longWord;
- end;
- type
- T_APPORegisters = record
- _APPO : longWord;
- _APPOCLR : longWord;
- _APPOSET : longWord;
- _APPOINV : longWord;
- end;
- type
- T_APPIRegisters = record
- _APPI : longWord;
- end;
- TINT_INTCON = record
- private
- function getFRZ : TBits_1; inline;
- function getINT0EP : TBits_1; inline;
- function getINT1EP : TBits_1; inline;
- function getINT2EP : TBits_1; inline;
- function getINT3EP : TBits_1; inline;
- function getINT4EP : TBits_1; inline;
- function getMVEC : TBits_1; inline;
- function getSS0 : TBits_1; inline;
- function getTPC : TBits_3; inline;
- function getw : TBits_32; inline;
- procedure setFRZ(thebits : TBits_1); inline;
- procedure setINT0EP(thebits : TBits_1); inline;
- procedure setINT1EP(thebits : TBits_1); inline;
- procedure setINT2EP(thebits : TBits_1); inline;
- procedure setINT3EP(thebits : TBits_1); inline;
- procedure setINT4EP(thebits : TBits_1); inline;
- procedure setMVEC(thebits : TBits_1); inline;
- procedure setSS0(thebits : TBits_1); inline;
- procedure setTPC(thebits : TBits_3); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearFRZ; inline;
- procedure clearINT0EP; inline;
- procedure clearINT1EP; inline;
- procedure clearINT2EP; inline;
- procedure clearINT3EP; inline;
- procedure clearINT4EP; inline;
- procedure clearMVEC; inline;
- procedure clearSS0; inline;
- procedure setFRZ; inline;
- procedure setINT0EP; inline;
- procedure setINT1EP; inline;
- procedure setINT2EP; inline;
- procedure setINT3EP; inline;
- procedure setINT4EP; inline;
- procedure setMVEC; inline;
- procedure setSS0; inline;
- property FRZ : TBits_1 read getFRZ write setFRZ;
- property INT0EP : TBits_1 read getINT0EP write setINT0EP;
- property INT1EP : TBits_1 read getINT1EP write setINT1EP;
- property INT2EP : TBits_1 read getINT2EP write setINT2EP;
- property INT3EP : TBits_1 read getINT3EP write setINT3EP;
- property INT4EP : TBits_1 read getINT4EP write setINT4EP;
- property MVEC : TBits_1 read getMVEC write setMVEC;
- property SS0 : TBits_1 read getSS0 write setSS0;
- property TPC : TBits_3 read getTPC write setTPC;
- property w : TBits_32 read getw write setw;
- end;
- TINT_IFS0 = record
- private
- function getCS0IF : TBits_1; inline;
- function getCS1IF : TBits_1; inline;
- function getCTIF : TBits_1; inline;
- function getI2C1ABIF : TBits_1; inline;
- function getI2C1AMIF : TBits_1; inline;
- function getI2C1ASIF : TBits_1; inline;
- function getI2C1BIF : TBits_1; inline;
- function getI2C1MIF : TBits_1; inline;
- function getI2C1SIF : TBits_1; inline;
- function getI2C3BIF : TBits_1; inline;
- function getI2C3MIF : TBits_1; inline;
- function getI2C3SIF : TBits_1; inline;
- function getIC1IF : TBits_1; inline;
- function getIC2IF : TBits_1; inline;
- function getIC3IF : TBits_1; inline;
- function getIC4IF : TBits_1; inline;
- function getIC5IF : TBits_1; inline;
- function getINT0IF : TBits_1; inline;
- function getINT1IF : TBits_1; inline;
- function getINT2IF : TBits_1; inline;
- function getINT3IF : TBits_1; inline;
- function getINT4IF : TBits_1; inline;
- function getOC1IF : TBits_1; inline;
- function getOC2IF : TBits_1; inline;
- function getOC3IF : TBits_1; inline;
- function getOC4IF : TBits_1; inline;
- function getOC5IF : TBits_1; inline;
- function getSPI1AEIF : TBits_1; inline;
- function getSPI1ARXIF : TBits_1; inline;
- function getSPI1ATXIF : TBits_1; inline;
- function getSPI1EIF : TBits_1; inline;
- function getSPI1RXIF : TBits_1; inline;
- function getSPI1TXIF : TBits_1; inline;
- function getSPI3EIF : TBits_1; inline;
- function getSPI3RXIF : TBits_1; inline;
- function getSPI3TXIF : TBits_1; inline;
- function getT1IF : TBits_1; inline;
- function getT2IF : TBits_1; inline;
- function getT3IF : TBits_1; inline;
- function getT4IF : TBits_1; inline;
- function getT5IF : TBits_1; inline;
- function getU1AEIF : TBits_1; inline;
- function getU1ARXIF : TBits_1; inline;
- function getU1ATXIF : TBits_1; inline;
- function getU1EIF : TBits_1; inline;
- function getU1RXIF : TBits_1; inline;
- function getU1TXIF : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setCS0IF(thebits : TBits_1); inline;
- procedure setCS1IF(thebits : TBits_1); inline;
- procedure setCTIF(thebits : TBits_1); inline;
- procedure setI2C1ABIF(thebits : TBits_1); inline;
- procedure setI2C1AMIF(thebits : TBits_1); inline;
- procedure setI2C1ASIF(thebits : TBits_1); inline;
- procedure setI2C1BIF(thebits : TBits_1); inline;
- procedure setI2C1MIF(thebits : TBits_1); inline;
- procedure setI2C1SIF(thebits : TBits_1); inline;
- procedure setI2C3BIF(thebits : TBits_1); inline;
- procedure setI2C3MIF(thebits : TBits_1); inline;
- procedure setI2C3SIF(thebits : TBits_1); inline;
- procedure setIC1IF(thebits : TBits_1); inline;
- procedure setIC2IF(thebits : TBits_1); inline;
- procedure setIC3IF(thebits : TBits_1); inline;
- procedure setIC4IF(thebits : TBits_1); inline;
- procedure setIC5IF(thebits : TBits_1); inline;
- procedure setINT0IF(thebits : TBits_1); inline;
- procedure setINT1IF(thebits : TBits_1); inline;
- procedure setINT2IF(thebits : TBits_1); inline;
- procedure setINT3IF(thebits : TBits_1); inline;
- procedure setINT4IF(thebits : TBits_1); inline;
- procedure setOC1IF(thebits : TBits_1); inline;
- procedure setOC2IF(thebits : TBits_1); inline;
- procedure setOC3IF(thebits : TBits_1); inline;
- procedure setOC4IF(thebits : TBits_1); inline;
- procedure setOC5IF(thebits : TBits_1); inline;
- procedure setSPI1AEIF(thebits : TBits_1); inline;
- procedure setSPI1ARXIF(thebits : TBits_1); inline;
- procedure setSPI1ATXIF(thebits : TBits_1); inline;
- procedure setSPI1EIF(thebits : TBits_1); inline;
- procedure setSPI1RXIF(thebits : TBits_1); inline;
- procedure setSPI1TXIF(thebits : TBits_1); inline;
- procedure setSPI3EIF(thebits : TBits_1); inline;
- procedure setSPI3RXIF(thebits : TBits_1); inline;
- procedure setSPI3TXIF(thebits : TBits_1); inline;
- procedure setT1IF(thebits : TBits_1); inline;
- procedure setT2IF(thebits : TBits_1); inline;
- procedure setT3IF(thebits : TBits_1); inline;
- procedure setT4IF(thebits : TBits_1); inline;
- procedure setT5IF(thebits : TBits_1); inline;
- procedure setU1AEIF(thebits : TBits_1); inline;
- procedure setU1ARXIF(thebits : TBits_1); inline;
- procedure setU1ATXIF(thebits : TBits_1); inline;
- procedure setU1EIF(thebits : TBits_1); inline;
- procedure setU1RXIF(thebits : TBits_1); inline;
- procedure setU1TXIF(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCS0IF; inline;
- procedure clearCS1IF; inline;
- procedure clearCTIF; inline;
- procedure clearI2C1ABIF; inline;
- procedure clearI2C1AMIF; inline;
- procedure clearI2C1ASIF; inline;
- procedure clearI2C1BIF; inline;
- procedure clearI2C1MIF; inline;
- procedure clearI2C1SIF; inline;
- procedure clearI2C3BIF; inline;
- procedure clearI2C3MIF; inline;
- procedure clearI2C3SIF; inline;
- procedure clearIC1IF; inline;
- procedure clearIC2IF; inline;
- procedure clearIC3IF; inline;
- procedure clearIC4IF; inline;
- procedure clearIC5IF; inline;
- procedure clearINT0IF; inline;
- procedure clearINT1IF; inline;
- procedure clearINT2IF; inline;
- procedure clearINT3IF; inline;
- procedure clearINT4IF; inline;
- procedure clearOC1IF; inline;
- procedure clearOC2IF; inline;
- procedure clearOC3IF; inline;
- procedure clearOC4IF; inline;
- procedure clearOC5IF; inline;
- procedure clearSPI1AEIF; inline;
- procedure clearSPI1ARXIF; inline;
- procedure clearSPI1ATXIF; inline;
- procedure clearSPI1EIF; inline;
- procedure clearSPI1RXIF; inline;
- procedure clearSPI1TXIF; inline;
- procedure clearSPI3EIF; inline;
- procedure clearSPI3RXIF; inline;
- procedure clearSPI3TXIF; inline;
- procedure clearT1IF; inline;
- procedure clearT2IF; inline;
- procedure clearT3IF; inline;
- procedure clearT4IF; inline;
- procedure clearT5IF; inline;
- procedure clearU1AEIF; inline;
- procedure clearU1ARXIF; inline;
- procedure clearU1ATXIF; inline;
- procedure clearU1EIF; inline;
- procedure clearU1RXIF; inline;
- procedure clearU1TXIF; inline;
- procedure setCS0IF; inline;
- procedure setCS1IF; inline;
- procedure setCTIF; inline;
- procedure setI2C1ABIF; inline;
- procedure setI2C1AMIF; inline;
- procedure setI2C1ASIF; inline;
- procedure setI2C1BIF; inline;
- procedure setI2C1MIF; inline;
- procedure setI2C1SIF; inline;
- procedure setI2C3BIF; inline;
- procedure setI2C3MIF; inline;
- procedure setI2C3SIF; inline;
- procedure setIC1IF; inline;
- procedure setIC2IF; inline;
- procedure setIC3IF; inline;
- procedure setIC4IF; inline;
- procedure setIC5IF; inline;
- procedure setINT0IF; inline;
- procedure setINT1IF; inline;
- procedure setINT2IF; inline;
- procedure setINT3IF; inline;
- procedure setINT4IF; inline;
- procedure setOC1IF; inline;
- procedure setOC2IF; inline;
- procedure setOC3IF; inline;
- procedure setOC4IF; inline;
- procedure setOC5IF; inline;
- procedure setSPI1AEIF; inline;
- procedure setSPI1ARXIF; inline;
- procedure setSPI1ATXIF; inline;
- procedure setSPI1EIF; inline;
- procedure setSPI1RXIF; inline;
- procedure setSPI1TXIF; inline;
- procedure setSPI3EIF; inline;
- procedure setSPI3RXIF; inline;
- procedure setSPI3TXIF; inline;
- procedure setT1IF; inline;
- procedure setT2IF; inline;
- procedure setT3IF; inline;
- procedure setT4IF; inline;
- procedure setT5IF; inline;
- procedure setU1AEIF; inline;
- procedure setU1ARXIF; inline;
- procedure setU1ATXIF; inline;
- procedure setU1EIF; inline;
- procedure setU1RXIF; inline;
- procedure setU1TXIF; inline;
- property CS0IF : TBits_1 read getCS0IF write setCS0IF;
- property CS1IF : TBits_1 read getCS1IF write setCS1IF;
- property CTIF : TBits_1 read getCTIF write setCTIF;
- property I2C1ABIF : TBits_1 read getI2C1ABIF write setI2C1ABIF;
- property I2C1AMIF : TBits_1 read getI2C1AMIF write setI2C1AMIF;
- property I2C1ASIF : TBits_1 read getI2C1ASIF write setI2C1ASIF;
- property I2C1BIF : TBits_1 read getI2C1BIF write setI2C1BIF;
- property I2C1MIF : TBits_1 read getI2C1MIF write setI2C1MIF;
- property I2C1SIF : TBits_1 read getI2C1SIF write setI2C1SIF;
- property I2C3BIF : TBits_1 read getI2C3BIF write setI2C3BIF;
- property I2C3MIF : TBits_1 read getI2C3MIF write setI2C3MIF;
- property I2C3SIF : TBits_1 read getI2C3SIF write setI2C3SIF;
- property IC1IF : TBits_1 read getIC1IF write setIC1IF;
- property IC2IF : TBits_1 read getIC2IF write setIC2IF;
- property IC3IF : TBits_1 read getIC3IF write setIC3IF;
- property IC4IF : TBits_1 read getIC4IF write setIC4IF;
- property IC5IF : TBits_1 read getIC5IF write setIC5IF;
- property INT0IF : TBits_1 read getINT0IF write setINT0IF;
- property INT1IF : TBits_1 read getINT1IF write setINT1IF;
- property INT2IF : TBits_1 read getINT2IF write setINT2IF;
- property INT3IF : TBits_1 read getINT3IF write setINT3IF;
- property INT4IF : TBits_1 read getINT4IF write setINT4IF;
- property OC1IF : TBits_1 read getOC1IF write setOC1IF;
- property OC2IF : TBits_1 read getOC2IF write setOC2IF;
- property OC3IF : TBits_1 read getOC3IF write setOC3IF;
- property OC4IF : TBits_1 read getOC4IF write setOC4IF;
- property OC5IF : TBits_1 read getOC5IF write setOC5IF;
- property SPI1AEIF : TBits_1 read getSPI1AEIF write setSPI1AEIF;
- property SPI1ARXIF : TBits_1 read getSPI1ARXIF write setSPI1ARXIF;
- property SPI1ATXIF : TBits_1 read getSPI1ATXIF write setSPI1ATXIF;
- property SPI1EIF : TBits_1 read getSPI1EIF write setSPI1EIF;
- property SPI1RXIF : TBits_1 read getSPI1RXIF write setSPI1RXIF;
- property SPI1TXIF : TBits_1 read getSPI1TXIF write setSPI1TXIF;
- property SPI3EIF : TBits_1 read getSPI3EIF write setSPI3EIF;
- property SPI3RXIF : TBits_1 read getSPI3RXIF write setSPI3RXIF;
- property SPI3TXIF : TBits_1 read getSPI3TXIF write setSPI3TXIF;
- property T1IF : TBits_1 read getT1IF write setT1IF;
- property T2IF : TBits_1 read getT2IF write setT2IF;
- property T3IF : TBits_1 read getT3IF write setT3IF;
- property T4IF : TBits_1 read getT4IF write setT4IF;
- property T5IF : TBits_1 read getT5IF write setT5IF;
- property U1AEIF : TBits_1 read getU1AEIF write setU1AEIF;
- property U1ARXIF : TBits_1 read getU1ARXIF write setU1ARXIF;
- property U1ATXIF : TBits_1 read getU1ATXIF write setU1ATXIF;
- property U1EIF : TBits_1 read getU1EIF write setU1EIF;
- property U1RXIF : TBits_1 read getU1RXIF write setU1RXIF;
- property U1TXIF : TBits_1 read getU1TXIF write setU1TXIF;
- property w : TBits_32 read getw write setw;
- end;
- TINT_IFS1 = record
- private
- function getAD1IF : TBits_1; inline;
- function getCMP1IF : TBits_1; inline;
- function getCMP2IF : TBits_1; inline;
- function getCNIF : TBits_1; inline;
- function getDMA0IF : TBits_1; inline;
- function getDMA1IF : TBits_1; inline;
- function getDMA2IF : TBits_1; inline;
- function getDMA3IF : TBits_1; inline;
- function getDMA4IF : TBits_1; inline;
- function getDMA5IF : TBits_1; inline;
- function getDMA6IF : TBits_1; inline;
- function getDMA7IF : TBits_1; inline;
- function getETHIF : TBits_1; inline;
- function getFCEIF : TBits_1; inline;
- function getFSCMIF : TBits_1; inline;
- function getI2C2ABIF : TBits_1; inline;
- function getI2C2AMIF : TBits_1; inline;
- function getI2C2ASIF : TBits_1; inline;
- function getI2C2BIF : TBits_1; inline;
- function getI2C2MIF : TBits_1; inline;
- function getI2C2SIF : TBits_1; inline;
- function getI2C3ABIF : TBits_1; inline;
- function getI2C3AMIF : TBits_1; inline;
- function getI2C3ASIF : TBits_1; inline;
- function getI2C4BIF : TBits_1; inline;
- function getI2C4MIF : TBits_1; inline;
- function getI2C4SIF : TBits_1; inline;
- function getI2C5BIF : TBits_1; inline;
- function getI2C5MIF : TBits_1; inline;
- function getI2C5SIF : TBits_1; inline;
- function getIC1EIF : TBits_1; inline;
- function getIC2EIF : TBits_1; inline;
- function getIC3EIF : TBits_1; inline;
- function getPMPIF : TBits_1; inline;
- function getRTCCIF : TBits_1; inline;
- function getSPI2AEIF : TBits_1; inline;
- function getSPI2ARXIF : TBits_1; inline;
- function getSPI2ATXIF : TBits_1; inline;
- function getSPI2EIF : TBits_1; inline;
- function getSPI2RXIF : TBits_1; inline;
- function getSPI2TXIF : TBits_1; inline;
- function getSPI3AEIF : TBits_1; inline;
- function getSPI3ARXIF : TBits_1; inline;
- function getSPI3ATXIF : TBits_1; inline;
- function getSPI4EIF : TBits_1; inline;
- function getSPI4RXIF : TBits_1; inline;
- function getSPI4TXIF : TBits_1; inline;
- function getU2AEIF : TBits_1; inline;
- function getU2ARXIF : TBits_1; inline;
- function getU2ATXIF : TBits_1; inline;
- function getU2EIF : TBits_1; inline;
- function getU2RXIF : TBits_1; inline;
- function getU2TXIF : TBits_1; inline;
- function getU3AEIF : TBits_1; inline;
- function getU3ARXIF : TBits_1; inline;
- function getU3ATXIF : TBits_1; inline;
- function getU3EIF : TBits_1; inline;
- function getU3RXIF : TBits_1; inline;
- function getU3TXIF : TBits_1; inline;
- function getUSBIF : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setAD1IF(thebits : TBits_1); inline;
- procedure setCMP1IF(thebits : TBits_1); inline;
- procedure setCMP2IF(thebits : TBits_1); inline;
- procedure setCNIF(thebits : TBits_1); inline;
- procedure setDMA0IF(thebits : TBits_1); inline;
- procedure setDMA1IF(thebits : TBits_1); inline;
- procedure setDMA2IF(thebits : TBits_1); inline;
- procedure setDMA3IF(thebits : TBits_1); inline;
- procedure setDMA4IF(thebits : TBits_1); inline;
- procedure setDMA5IF(thebits : TBits_1); inline;
- procedure setDMA6IF(thebits : TBits_1); inline;
- procedure setDMA7IF(thebits : TBits_1); inline;
- procedure setETHIF(thebits : TBits_1); inline;
- procedure setFCEIF(thebits : TBits_1); inline;
- procedure setFSCMIF(thebits : TBits_1); inline;
- procedure setI2C2ABIF(thebits : TBits_1); inline;
- procedure setI2C2AMIF(thebits : TBits_1); inline;
- procedure setI2C2ASIF(thebits : TBits_1); inline;
- procedure setI2C2BIF(thebits : TBits_1); inline;
- procedure setI2C2MIF(thebits : TBits_1); inline;
- procedure setI2C2SIF(thebits : TBits_1); inline;
- procedure setI2C3ABIF(thebits : TBits_1); inline;
- procedure setI2C3AMIF(thebits : TBits_1); inline;
- procedure setI2C3ASIF(thebits : TBits_1); inline;
- procedure setI2C4BIF(thebits : TBits_1); inline;
- procedure setI2C4MIF(thebits : TBits_1); inline;
- procedure setI2C4SIF(thebits : TBits_1); inline;
- procedure setI2C5BIF(thebits : TBits_1); inline;
- procedure setI2C5MIF(thebits : TBits_1); inline;
- procedure setI2C5SIF(thebits : TBits_1); inline;
- procedure setIC1EIF(thebits : TBits_1); inline;
- procedure setIC2EIF(thebits : TBits_1); inline;
- procedure setIC3EIF(thebits : TBits_1); inline;
- procedure setPMPIF(thebits : TBits_1); inline;
- procedure setRTCCIF(thebits : TBits_1); inline;
- procedure setSPI2AEIF(thebits : TBits_1); inline;
- procedure setSPI2ARXIF(thebits : TBits_1); inline;
- procedure setSPI2ATXIF(thebits : TBits_1); inline;
- procedure setSPI2EIF(thebits : TBits_1); inline;
- procedure setSPI2RXIF(thebits : TBits_1); inline;
- procedure setSPI2TXIF(thebits : TBits_1); inline;
- procedure setSPI3AEIF(thebits : TBits_1); inline;
- procedure setSPI3ARXIF(thebits : TBits_1); inline;
- procedure setSPI3ATXIF(thebits : TBits_1); inline;
- procedure setSPI4EIF(thebits : TBits_1); inline;
- procedure setSPI4RXIF(thebits : TBits_1); inline;
- procedure setSPI4TXIF(thebits : TBits_1); inline;
- procedure setU2AEIF(thebits : TBits_1); inline;
- procedure setU2ARXIF(thebits : TBits_1); inline;
- procedure setU2ATXIF(thebits : TBits_1); inline;
- procedure setU2EIF(thebits : TBits_1); inline;
- procedure setU2RXIF(thebits : TBits_1); inline;
- procedure setU2TXIF(thebits : TBits_1); inline;
- procedure setU3AEIF(thebits : TBits_1); inline;
- procedure setU3ARXIF(thebits : TBits_1); inline;
- procedure setU3ATXIF(thebits : TBits_1); inline;
- procedure setU3EIF(thebits : TBits_1); inline;
- procedure setU3RXIF(thebits : TBits_1); inline;
- procedure setU3TXIF(thebits : TBits_1); inline;
- procedure setUSBIF(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearAD1IF; inline;
- procedure clearCMP1IF; inline;
- procedure clearCMP2IF; inline;
- procedure clearCNIF; inline;
- procedure clearDMA0IF; inline;
- procedure clearDMA1IF; inline;
- procedure clearDMA2IF; inline;
- procedure clearDMA3IF; inline;
- procedure clearDMA4IF; inline;
- procedure clearDMA5IF; inline;
- procedure clearDMA6IF; inline;
- procedure clearDMA7IF; inline;
- procedure clearETHIF; inline;
- procedure clearFCEIF; inline;
- procedure clearFSCMIF; inline;
- procedure clearI2C2ABIF; inline;
- procedure clearI2C2AMIF; inline;
- procedure clearI2C2ASIF; inline;
- procedure clearI2C2BIF; inline;
- procedure clearI2C2MIF; inline;
- procedure clearI2C2SIF; inline;
- procedure clearI2C3ABIF; inline;
- procedure clearI2C3AMIF; inline;
- procedure clearI2C3ASIF; inline;
- procedure clearI2C4BIF; inline;
- procedure clearI2C4MIF; inline;
- procedure clearI2C4SIF; inline;
- procedure clearI2C5BIF; inline;
- procedure clearI2C5MIF; inline;
- procedure clearI2C5SIF; inline;
- procedure clearIC1EIF; inline;
- procedure clearIC2EIF; inline;
- procedure clearIC3EIF; inline;
- procedure clearPMPIF; inline;
- procedure clearRTCCIF; inline;
- procedure clearSPI2AEIF; inline;
- procedure clearSPI2ARXIF; inline;
- procedure clearSPI2ATXIF; inline;
- procedure clearSPI2EIF; inline;
- procedure clearSPI2RXIF; inline;
- procedure clearSPI2TXIF; inline;
- procedure clearSPI3AEIF; inline;
- procedure clearSPI3ARXIF; inline;
- procedure clearSPI3ATXIF; inline;
- procedure clearSPI4EIF; inline;
- procedure clearSPI4RXIF; inline;
- procedure clearSPI4TXIF; inline;
- procedure clearU2AEIF; inline;
- procedure clearU2ARXIF; inline;
- procedure clearU2ATXIF; inline;
- procedure clearU2EIF; inline;
- procedure clearU2RXIF; inline;
- procedure clearU2TXIF; inline;
- procedure clearU3AEIF; inline;
- procedure clearU3ARXIF; inline;
- procedure clearU3ATXIF; inline;
- procedure clearU3EIF; inline;
- procedure clearU3RXIF; inline;
- procedure clearU3TXIF; inline;
- procedure clearUSBIF; inline;
- procedure setAD1IF; inline;
- procedure setCMP1IF; inline;
- procedure setCMP2IF; inline;
- procedure setCNIF; inline;
- procedure setDMA0IF; inline;
- procedure setDMA1IF; inline;
- procedure setDMA2IF; inline;
- procedure setDMA3IF; inline;
- procedure setDMA4IF; inline;
- procedure setDMA5IF; inline;
- procedure setDMA6IF; inline;
- procedure setDMA7IF; inline;
- procedure setETHIF; inline;
- procedure setFCEIF; inline;
- procedure setFSCMIF; inline;
- procedure setI2C2ABIF; inline;
- procedure setI2C2AMIF; inline;
- procedure setI2C2ASIF; inline;
- procedure setI2C2BIF; inline;
- procedure setI2C2MIF; inline;
- procedure setI2C2SIF; inline;
- procedure setI2C3ABIF; inline;
- procedure setI2C3AMIF; inline;
- procedure setI2C3ASIF; inline;
- procedure setI2C4BIF; inline;
- procedure setI2C4MIF; inline;
- procedure setI2C4SIF; inline;
- procedure setI2C5BIF; inline;
- procedure setI2C5MIF; inline;
- procedure setI2C5SIF; inline;
- procedure setIC1EIF; inline;
- procedure setIC2EIF; inline;
- procedure setIC3EIF; inline;
- procedure setPMPIF; inline;
- procedure setRTCCIF; inline;
- procedure setSPI2AEIF; inline;
- procedure setSPI2ARXIF; inline;
- procedure setSPI2ATXIF; inline;
- procedure setSPI2EIF; inline;
- procedure setSPI2RXIF; inline;
- procedure setSPI2TXIF; inline;
- procedure setSPI3AEIF; inline;
- procedure setSPI3ARXIF; inline;
- procedure setSPI3ATXIF; inline;
- procedure setSPI4EIF; inline;
- procedure setSPI4RXIF; inline;
- procedure setSPI4TXIF; inline;
- procedure setU2AEIF; inline;
- procedure setU2ARXIF; inline;
- procedure setU2ATXIF; inline;
- procedure setU2EIF; inline;
- procedure setU2RXIF; inline;
- procedure setU2TXIF; inline;
- procedure setU3AEIF; inline;
- procedure setU3ARXIF; inline;
- procedure setU3ATXIF; inline;
- procedure setU3EIF; inline;
- procedure setU3RXIF; inline;
- procedure setU3TXIF; inline;
- procedure setUSBIF; inline;
- property AD1IF : TBits_1 read getAD1IF write setAD1IF;
- property CMP1IF : TBits_1 read getCMP1IF write setCMP1IF;
- property CMP2IF : TBits_1 read getCMP2IF write setCMP2IF;
- property CNIF : TBits_1 read getCNIF write setCNIF;
- property DMA0IF : TBits_1 read getDMA0IF write setDMA0IF;
- property DMA1IF : TBits_1 read getDMA1IF write setDMA1IF;
- property DMA2IF : TBits_1 read getDMA2IF write setDMA2IF;
- property DMA3IF : TBits_1 read getDMA3IF write setDMA3IF;
- property DMA4IF : TBits_1 read getDMA4IF write setDMA4IF;
- property DMA5IF : TBits_1 read getDMA5IF write setDMA5IF;
- property DMA6IF : TBits_1 read getDMA6IF write setDMA6IF;
- property DMA7IF : TBits_1 read getDMA7IF write setDMA7IF;
- property ETHIF : TBits_1 read getETHIF write setETHIF;
- property FCEIF : TBits_1 read getFCEIF write setFCEIF;
- property FSCMIF : TBits_1 read getFSCMIF write setFSCMIF;
- property I2C2ABIF : TBits_1 read getI2C2ABIF write setI2C2ABIF;
- property I2C2AMIF : TBits_1 read getI2C2AMIF write setI2C2AMIF;
- property I2C2ASIF : TBits_1 read getI2C2ASIF write setI2C2ASIF;
- property I2C2BIF : TBits_1 read getI2C2BIF write setI2C2BIF;
- property I2C2MIF : TBits_1 read getI2C2MIF write setI2C2MIF;
- property I2C2SIF : TBits_1 read getI2C2SIF write setI2C2SIF;
- property I2C3ABIF : TBits_1 read getI2C3ABIF write setI2C3ABIF;
- property I2C3AMIF : TBits_1 read getI2C3AMIF write setI2C3AMIF;
- property I2C3ASIF : TBits_1 read getI2C3ASIF write setI2C3ASIF;
- property I2C4BIF : TBits_1 read getI2C4BIF write setI2C4BIF;
- property I2C4MIF : TBits_1 read getI2C4MIF write setI2C4MIF;
- property I2C4SIF : TBits_1 read getI2C4SIF write setI2C4SIF;
- property I2C5BIF : TBits_1 read getI2C5BIF write setI2C5BIF;
- property I2C5MIF : TBits_1 read getI2C5MIF write setI2C5MIF;
- property I2C5SIF : TBits_1 read getI2C5SIF write setI2C5SIF;
- property IC1EIF : TBits_1 read getIC1EIF write setIC1EIF;
- property IC2EIF : TBits_1 read getIC2EIF write setIC2EIF;
- property IC3EIF : TBits_1 read getIC3EIF write setIC3EIF;
- property PMPIF : TBits_1 read getPMPIF write setPMPIF;
- property RTCCIF : TBits_1 read getRTCCIF write setRTCCIF;
- property SPI2AEIF : TBits_1 read getSPI2AEIF write setSPI2AEIF;
- property SPI2ARXIF : TBits_1 read getSPI2ARXIF write setSPI2ARXIF;
- property SPI2ATXIF : TBits_1 read getSPI2ATXIF write setSPI2ATXIF;
- property SPI2EIF : TBits_1 read getSPI2EIF write setSPI2EIF;
- property SPI2RXIF : TBits_1 read getSPI2RXIF write setSPI2RXIF;
- property SPI2TXIF : TBits_1 read getSPI2TXIF write setSPI2TXIF;
- property SPI3AEIF : TBits_1 read getSPI3AEIF write setSPI3AEIF;
- property SPI3ARXIF : TBits_1 read getSPI3ARXIF write setSPI3ARXIF;
- property SPI3ATXIF : TBits_1 read getSPI3ATXIF write setSPI3ATXIF;
- property SPI4EIF : TBits_1 read getSPI4EIF write setSPI4EIF;
- property SPI4RXIF : TBits_1 read getSPI4RXIF write setSPI4RXIF;
- property SPI4TXIF : TBits_1 read getSPI4TXIF write setSPI4TXIF;
- property U2AEIF : TBits_1 read getU2AEIF write setU2AEIF;
- property U2ARXIF : TBits_1 read getU2ARXIF write setU2ARXIF;
- property U2ATXIF : TBits_1 read getU2ATXIF write setU2ATXIF;
- property U2EIF : TBits_1 read getU2EIF write setU2EIF;
- property U2RXIF : TBits_1 read getU2RXIF write setU2RXIF;
- property U2TXIF : TBits_1 read getU2TXIF write setU2TXIF;
- property U3AEIF : TBits_1 read getU3AEIF write setU3AEIF;
- property U3ARXIF : TBits_1 read getU3ARXIF write setU3ARXIF;
- property U3ATXIF : TBits_1 read getU3ATXIF write setU3ATXIF;
- property U3EIF : TBits_1 read getU3EIF write setU3EIF;
- property U3RXIF : TBits_1 read getU3RXIF write setU3RXIF;
- property U3TXIF : TBits_1 read getU3TXIF write setU3TXIF;
- property USBIF : TBits_1 read getUSBIF write setUSBIF;
- property w : TBits_32 read getw write setw;
- end;
- TINT_IFS2 = record
- private
- function getIC4EIF : TBits_1; inline;
- function getIC5EIF : TBits_1; inline;
- function getPMPEIF : TBits_1; inline;
- function getU1BEIF : TBits_1; inline;
- function getU1BRXIF : TBits_1; inline;
- function getU1BTXIF : TBits_1; inline;
- function getU2BEIF : TBits_1; inline;
- function getU2BRXIF : TBits_1; inline;
- function getU2BTXIF : TBits_1; inline;
- function getU3BEIF : TBits_1; inline;
- function getU3BRXIF : TBits_1; inline;
- function getU3BTXIF : TBits_1; inline;
- function getU4EIF : TBits_1; inline;
- function getU4RXIF : TBits_1; inline;
- function getU4TXIF : TBits_1; inline;
- function getU5EIF : TBits_1; inline;
- function getU5RXIF : TBits_1; inline;
- function getU5TXIF : TBits_1; inline;
- function getU6EIF : TBits_1; inline;
- function getU6RXIF : TBits_1; inline;
- function getU6TXIF : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setIC4EIF(thebits : TBits_1); inline;
- procedure setIC5EIF(thebits : TBits_1); inline;
- procedure setPMPEIF(thebits : TBits_1); inline;
- procedure setU1BEIF(thebits : TBits_1); inline;
- procedure setU1BRXIF(thebits : TBits_1); inline;
- procedure setU1BTXIF(thebits : TBits_1); inline;
- procedure setU2BEIF(thebits : TBits_1); inline;
- procedure setU2BRXIF(thebits : TBits_1); inline;
- procedure setU2BTXIF(thebits : TBits_1); inline;
- procedure setU3BEIF(thebits : TBits_1); inline;
- procedure setU3BRXIF(thebits : TBits_1); inline;
- procedure setU3BTXIF(thebits : TBits_1); inline;
- procedure setU4EIF(thebits : TBits_1); inline;
- procedure setU4RXIF(thebits : TBits_1); inline;
- procedure setU4TXIF(thebits : TBits_1); inline;
- procedure setU5EIF(thebits : TBits_1); inline;
- procedure setU5RXIF(thebits : TBits_1); inline;
- procedure setU5TXIF(thebits : TBits_1); inline;
- procedure setU6EIF(thebits : TBits_1); inline;
- procedure setU6RXIF(thebits : TBits_1); inline;
- procedure setU6TXIF(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearIC4EIF; inline;
- procedure clearIC5EIF; inline;
- procedure clearPMPEIF; inline;
- procedure clearU1BEIF; inline;
- procedure clearU1BRXIF; inline;
- procedure clearU1BTXIF; inline;
- procedure clearU2BEIF; inline;
- procedure clearU2BRXIF; inline;
- procedure clearU2BTXIF; inline;
- procedure clearU3BEIF; inline;
- procedure clearU3BRXIF; inline;
- procedure clearU3BTXIF; inline;
- procedure clearU4EIF; inline;
- procedure clearU4RXIF; inline;
- procedure clearU4TXIF; inline;
- procedure clearU5EIF; inline;
- procedure clearU5RXIF; inline;
- procedure clearU5TXIF; inline;
- procedure clearU6EIF; inline;
- procedure clearU6RXIF; inline;
- procedure clearU6TXIF; inline;
- procedure setIC4EIF; inline;
- procedure setIC5EIF; inline;
- procedure setPMPEIF; inline;
- procedure setU1BEIF; inline;
- procedure setU1BRXIF; inline;
- procedure setU1BTXIF; inline;
- procedure setU2BEIF; inline;
- procedure setU2BRXIF; inline;
- procedure setU2BTXIF; inline;
- procedure setU3BEIF; inline;
- procedure setU3BRXIF; inline;
- procedure setU3BTXIF; inline;
- procedure setU4EIF; inline;
- procedure setU4RXIF; inline;
- procedure setU4TXIF; inline;
- procedure setU5EIF; inline;
- procedure setU5RXIF; inline;
- procedure setU5TXIF; inline;
- procedure setU6EIF; inline;
- procedure setU6RXIF; inline;
- procedure setU6TXIF; inline;
- property IC4EIF : TBits_1 read getIC4EIF write setIC4EIF;
- property IC5EIF : TBits_1 read getIC5EIF write setIC5EIF;
- property PMPEIF : TBits_1 read getPMPEIF write setPMPEIF;
- property U1BEIF : TBits_1 read getU1BEIF write setU1BEIF;
- property U1BRXIF : TBits_1 read getU1BRXIF write setU1BRXIF;
- property U1BTXIF : TBits_1 read getU1BTXIF write setU1BTXIF;
- property U2BEIF : TBits_1 read getU2BEIF write setU2BEIF;
- property U2BRXIF : TBits_1 read getU2BRXIF write setU2BRXIF;
- property U2BTXIF : TBits_1 read getU2BTXIF write setU2BTXIF;
- property U3BEIF : TBits_1 read getU3BEIF write setU3BEIF;
- property U3BRXIF : TBits_1 read getU3BRXIF write setU3BRXIF;
- property U3BTXIF : TBits_1 read getU3BTXIF write setU3BTXIF;
- property U4EIF : TBits_1 read getU4EIF write setU4EIF;
- property U4RXIF : TBits_1 read getU4RXIF write setU4RXIF;
- property U4TXIF : TBits_1 read getU4TXIF write setU4TXIF;
- property U5EIF : TBits_1 read getU5EIF write setU5EIF;
- property U5RXIF : TBits_1 read getU5RXIF write setU5RXIF;
- property U5TXIF : TBits_1 read getU5TXIF write setU5TXIF;
- property U6EIF : TBits_1 read getU6EIF write setU6EIF;
- property U6RXIF : TBits_1 read getU6RXIF write setU6RXIF;
- property U6TXIF : TBits_1 read getU6TXIF write setU6TXIF;
- property w : TBits_32 read getw write setw;
- end;
- TINT_IEC0 = record
- private
- function getCS0IE : TBits_1; inline;
- function getCS1IE : TBits_1; inline;
- function getCTIE : TBits_1; inline;
- function getI2C1ABIE : TBits_1; inline;
- function getI2C1AMIE : TBits_1; inline;
- function getI2C1ASIE : TBits_1; inline;
- function getI2C1BIE : TBits_1; inline;
- function getI2C1MIE : TBits_1; inline;
- function getI2C1SIE : TBits_1; inline;
- function getI2C3BIE : TBits_1; inline;
- function getI2C3MIE : TBits_1; inline;
- function getI2C3SIE : TBits_1; inline;
- function getIC1IE : TBits_1; inline;
- function getIC2IE : TBits_1; inline;
- function getIC3IE : TBits_1; inline;
- function getIC4IE : TBits_1; inline;
- function getIC5IE : TBits_1; inline;
- function getINT0IE : TBits_1; inline;
- function getINT1IE : TBits_1; inline;
- function getINT2IE : TBits_1; inline;
- function getINT3IE : TBits_1; inline;
- function getINT4IE : TBits_1; inline;
- function getOC1IE : TBits_1; inline;
- function getOC2IE : TBits_1; inline;
- function getOC3IE : TBits_1; inline;
- function getOC4IE : TBits_1; inline;
- function getOC5IE : TBits_1; inline;
- function getSPI1AEIE : TBits_1; inline;
- function getSPI1ARXIE : TBits_1; inline;
- function getSPI1ATXIE : TBits_1; inline;
- function getSPI1EIE : TBits_1; inline;
- function getSPI1RXIE : TBits_1; inline;
- function getSPI1TXIE : TBits_1; inline;
- function getSPI3EIE : TBits_1; inline;
- function getSPI3RXIE : TBits_1; inline;
- function getSPI3TXIE : TBits_1; inline;
- function getT1IE : TBits_1; inline;
- function getT2IE : TBits_1; inline;
- function getT3IE : TBits_1; inline;
- function getT4IE : TBits_1; inline;
- function getT5IE : TBits_1; inline;
- function getU1AEIE : TBits_1; inline;
- function getU1ARXIE : TBits_1; inline;
- function getU1ATXIE : TBits_1; inline;
- function getU1EIE : TBits_1; inline;
- function getU1RXIE : TBits_1; inline;
- function getU1TXIE : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setCS0IE(thebits : TBits_1); inline;
- procedure setCS1IE(thebits : TBits_1); inline;
- procedure setCTIE(thebits : TBits_1); inline;
- procedure setI2C1ABIE(thebits : TBits_1); inline;
- procedure setI2C1AMIE(thebits : TBits_1); inline;
- procedure setI2C1ASIE(thebits : TBits_1); inline;
- procedure setI2C1BIE(thebits : TBits_1); inline;
- procedure setI2C1MIE(thebits : TBits_1); inline;
- procedure setI2C1SIE(thebits : TBits_1); inline;
- procedure setI2C3BIE(thebits : TBits_1); inline;
- procedure setI2C3MIE(thebits : TBits_1); inline;
- procedure setI2C3SIE(thebits : TBits_1); inline;
- procedure setIC1IE(thebits : TBits_1); inline;
- procedure setIC2IE(thebits : TBits_1); inline;
- procedure setIC3IE(thebits : TBits_1); inline;
- procedure setIC4IE(thebits : TBits_1); inline;
- procedure setIC5IE(thebits : TBits_1); inline;
- procedure setINT0IE(thebits : TBits_1); inline;
- procedure setINT1IE(thebits : TBits_1); inline;
- procedure setINT2IE(thebits : TBits_1); inline;
- procedure setINT3IE(thebits : TBits_1); inline;
- procedure setINT4IE(thebits : TBits_1); inline;
- procedure setOC1IE(thebits : TBits_1); inline;
- procedure setOC2IE(thebits : TBits_1); inline;
- procedure setOC3IE(thebits : TBits_1); inline;
- procedure setOC4IE(thebits : TBits_1); inline;
- procedure setOC5IE(thebits : TBits_1); inline;
- procedure setSPI1AEIE(thebits : TBits_1); inline;
- procedure setSPI1ARXIE(thebits : TBits_1); inline;
- procedure setSPI1ATXIE(thebits : TBits_1); inline;
- procedure setSPI1EIE(thebits : TBits_1); inline;
- procedure setSPI1RXIE(thebits : TBits_1); inline;
- procedure setSPI1TXIE(thebits : TBits_1); inline;
- procedure setSPI3EIE(thebits : TBits_1); inline;
- procedure setSPI3RXIE(thebits : TBits_1); inline;
- procedure setSPI3TXIE(thebits : TBits_1); inline;
- procedure setT1IE(thebits : TBits_1); inline;
- procedure setT2IE(thebits : TBits_1); inline;
- procedure setT3IE(thebits : TBits_1); inline;
- procedure setT4IE(thebits : TBits_1); inline;
- procedure setT5IE(thebits : TBits_1); inline;
- procedure setU1AEIE(thebits : TBits_1); inline;
- procedure setU1ARXIE(thebits : TBits_1); inline;
- procedure setU1ATXIE(thebits : TBits_1); inline;
- procedure setU1EIE(thebits : TBits_1); inline;
- procedure setU1RXIE(thebits : TBits_1); inline;
- procedure setU1TXIE(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCS0IE; inline;
- procedure clearCS1IE; inline;
- procedure clearCTIE; inline;
- procedure clearI2C1ABIE; inline;
- procedure clearI2C1AMIE; inline;
- procedure clearI2C1ASIE; inline;
- procedure clearI2C1BIE; inline;
- procedure clearI2C1MIE; inline;
- procedure clearI2C1SIE; inline;
- procedure clearI2C3BIE; inline;
- procedure clearI2C3MIE; inline;
- procedure clearI2C3SIE; inline;
- procedure clearIC1IE; inline;
- procedure clearIC2IE; inline;
- procedure clearIC3IE; inline;
- procedure clearIC4IE; inline;
- procedure clearIC5IE; inline;
- procedure clearINT0IE; inline;
- procedure clearINT1IE; inline;
- procedure clearINT2IE; inline;
- procedure clearINT3IE; inline;
- procedure clearINT4IE; inline;
- procedure clearOC1IE; inline;
- procedure clearOC2IE; inline;
- procedure clearOC3IE; inline;
- procedure clearOC4IE; inline;
- procedure clearOC5IE; inline;
- procedure clearSPI1AEIE; inline;
- procedure clearSPI1ARXIE; inline;
- procedure clearSPI1ATXIE; inline;
- procedure clearSPI1EIE; inline;
- procedure clearSPI1RXIE; inline;
- procedure clearSPI1TXIE; inline;
- procedure clearSPI3EIE; inline;
- procedure clearSPI3RXIE; inline;
- procedure clearSPI3TXIE; inline;
- procedure clearT1IE; inline;
- procedure clearT2IE; inline;
- procedure clearT3IE; inline;
- procedure clearT4IE; inline;
- procedure clearT5IE; inline;
- procedure clearU1AEIE; inline;
- procedure clearU1ARXIE; inline;
- procedure clearU1ATXIE; inline;
- procedure clearU1EIE; inline;
- procedure clearU1RXIE; inline;
- procedure clearU1TXIE; inline;
- procedure setCS0IE; inline;
- procedure setCS1IE; inline;
- procedure setCTIE; inline;
- procedure setI2C1ABIE; inline;
- procedure setI2C1AMIE; inline;
- procedure setI2C1ASIE; inline;
- procedure setI2C1BIE; inline;
- procedure setI2C1MIE; inline;
- procedure setI2C1SIE; inline;
- procedure setI2C3BIE; inline;
- procedure setI2C3MIE; inline;
- procedure setI2C3SIE; inline;
- procedure setIC1IE; inline;
- procedure setIC2IE; inline;
- procedure setIC3IE; inline;
- procedure setIC4IE; inline;
- procedure setIC5IE; inline;
- procedure setINT0IE; inline;
- procedure setINT1IE; inline;
- procedure setINT2IE; inline;
- procedure setINT3IE; inline;
- procedure setINT4IE; inline;
- procedure setOC1IE; inline;
- procedure setOC2IE; inline;
- procedure setOC3IE; inline;
- procedure setOC4IE; inline;
- procedure setOC5IE; inline;
- procedure setSPI1AEIE; inline;
- procedure setSPI1ARXIE; inline;
- procedure setSPI1ATXIE; inline;
- procedure setSPI1EIE; inline;
- procedure setSPI1RXIE; inline;
- procedure setSPI1TXIE; inline;
- procedure setSPI3EIE; inline;
- procedure setSPI3RXIE; inline;
- procedure setSPI3TXIE; inline;
- procedure setT1IE; inline;
- procedure setT2IE; inline;
- procedure setT3IE; inline;
- procedure setT4IE; inline;
- procedure setT5IE; inline;
- procedure setU1AEIE; inline;
- procedure setU1ARXIE; inline;
- procedure setU1ATXIE; inline;
- procedure setU1EIE; inline;
- procedure setU1RXIE; inline;
- procedure setU1TXIE; inline;
- property CS0IE : TBits_1 read getCS0IE write setCS0IE;
- property CS1IE : TBits_1 read getCS1IE write setCS1IE;
- property CTIE : TBits_1 read getCTIE write setCTIE;
- property I2C1ABIE : TBits_1 read getI2C1ABIE write setI2C1ABIE;
- property I2C1AMIE : TBits_1 read getI2C1AMIE write setI2C1AMIE;
- property I2C1ASIE : TBits_1 read getI2C1ASIE write setI2C1ASIE;
- property I2C1BIE : TBits_1 read getI2C1BIE write setI2C1BIE;
- property I2C1MIE : TBits_1 read getI2C1MIE write setI2C1MIE;
- property I2C1SIE : TBits_1 read getI2C1SIE write setI2C1SIE;
- property I2C3BIE : TBits_1 read getI2C3BIE write setI2C3BIE;
- property I2C3MIE : TBits_1 read getI2C3MIE write setI2C3MIE;
- property I2C3SIE : TBits_1 read getI2C3SIE write setI2C3SIE;
- property IC1IE : TBits_1 read getIC1IE write setIC1IE;
- property IC2IE : TBits_1 read getIC2IE write setIC2IE;
- property IC3IE : TBits_1 read getIC3IE write setIC3IE;
- property IC4IE : TBits_1 read getIC4IE write setIC4IE;
- property IC5IE : TBits_1 read getIC5IE write setIC5IE;
- property INT0IE : TBits_1 read getINT0IE write setINT0IE;
- property INT1IE : TBits_1 read getINT1IE write setINT1IE;
- property INT2IE : TBits_1 read getINT2IE write setINT2IE;
- property INT3IE : TBits_1 read getINT3IE write setINT3IE;
- property INT4IE : TBits_1 read getINT4IE write setINT4IE;
- property OC1IE : TBits_1 read getOC1IE write setOC1IE;
- property OC2IE : TBits_1 read getOC2IE write setOC2IE;
- property OC3IE : TBits_1 read getOC3IE write setOC3IE;
- property OC4IE : TBits_1 read getOC4IE write setOC4IE;
- property OC5IE : TBits_1 read getOC5IE write setOC5IE;
- property SPI1AEIE : TBits_1 read getSPI1AEIE write setSPI1AEIE;
- property SPI1ARXIE : TBits_1 read getSPI1ARXIE write setSPI1ARXIE;
- property SPI1ATXIE : TBits_1 read getSPI1ATXIE write setSPI1ATXIE;
- property SPI1EIE : TBits_1 read getSPI1EIE write setSPI1EIE;
- property SPI1RXIE : TBits_1 read getSPI1RXIE write setSPI1RXIE;
- property SPI1TXIE : TBits_1 read getSPI1TXIE write setSPI1TXIE;
- property SPI3EIE : TBits_1 read getSPI3EIE write setSPI3EIE;
- property SPI3RXIE : TBits_1 read getSPI3RXIE write setSPI3RXIE;
- property SPI3TXIE : TBits_1 read getSPI3TXIE write setSPI3TXIE;
- property T1IE : TBits_1 read getT1IE write setT1IE;
- property T2IE : TBits_1 read getT2IE write setT2IE;
- property T3IE : TBits_1 read getT3IE write setT3IE;
- property T4IE : TBits_1 read getT4IE write setT4IE;
- property T5IE : TBits_1 read getT5IE write setT5IE;
- property U1AEIE : TBits_1 read getU1AEIE write setU1AEIE;
- property U1ARXIE : TBits_1 read getU1ARXIE write setU1ARXIE;
- property U1ATXIE : TBits_1 read getU1ATXIE write setU1ATXIE;
- property U1EIE : TBits_1 read getU1EIE write setU1EIE;
- property U1RXIE : TBits_1 read getU1RXIE write setU1RXIE;
- property U1TXIE : TBits_1 read getU1TXIE write setU1TXIE;
- property w : TBits_32 read getw write setw;
- end;
- TINT_IEC1 = record
- private
- function getAD1IE : TBits_1; inline;
- function getCMP1IE : TBits_1; inline;
- function getCMP2IE : TBits_1; inline;
- function getCNIE : TBits_1; inline;
- function getDMA0IE : TBits_1; inline;
- function getDMA1IE : TBits_1; inline;
- function getDMA2IE : TBits_1; inline;
- function getDMA3IE : TBits_1; inline;
- function getDMA4IE : TBits_1; inline;
- function getDMA5IE : TBits_1; inline;
- function getDMA6IE : TBits_1; inline;
- function getDMA7IE : TBits_1; inline;
- function getETHIE : TBits_1; inline;
- function getFCEIE : TBits_1; inline;
- function getFSCMIE : TBits_1; inline;
- function getI2C2ABIE : TBits_1; inline;
- function getI2C2AMIE : TBits_1; inline;
- function getI2C2ASIE : TBits_1; inline;
- function getI2C2BIE : TBits_1; inline;
- function getI2C2MIE : TBits_1; inline;
- function getI2C2SIE : TBits_1; inline;
- function getI2C3ABIE : TBits_1; inline;
- function getI2C3AMIE : TBits_1; inline;
- function getI2C3ASIE : TBits_1; inline;
- function getI2C4BIE : TBits_1; inline;
- function getI2C4MIE : TBits_1; inline;
- function getI2C4SIE : TBits_1; inline;
- function getI2C5BIE : TBits_1; inline;
- function getI2C5MIE : TBits_1; inline;
- function getI2C5SIE : TBits_1; inline;
- function getIC1EIE : TBits_1; inline;
- function getIC2EIE : TBits_1; inline;
- function getIC3EIE : TBits_1; inline;
- function getPMPIE : TBits_1; inline;
- function getRTCCIE : TBits_1; inline;
- function getSPI2AEIE : TBits_1; inline;
- function getSPI2ARXIE : TBits_1; inline;
- function getSPI2ATXIE : TBits_1; inline;
- function getSPI2EIE : TBits_1; inline;
- function getSPI2RXIE : TBits_1; inline;
- function getSPI2TXIE : TBits_1; inline;
- function getSPI3AEIE : TBits_1; inline;
- function getSPI3ARXIE : TBits_1; inline;
- function getSPI3ATXIE : TBits_1; inline;
- function getSPI4EIE : TBits_1; inline;
- function getSPI4RXIE : TBits_1; inline;
- function getSPI4TXIE : TBits_1; inline;
- function getU2AEIE : TBits_1; inline;
- function getU2ARXIE : TBits_1; inline;
- function getU2ATXIE : TBits_1; inline;
- function getU2EIE : TBits_1; inline;
- function getU2RXIE : TBits_1; inline;
- function getU2TXIE : TBits_1; inline;
- function getU3AEIE : TBits_1; inline;
- function getU3ARXIE : TBits_1; inline;
- function getU3ATXIE : TBits_1; inline;
- function getU3EIE : TBits_1; inline;
- function getU3RXIE : TBits_1; inline;
- function getU3TXIE : TBits_1; inline;
- function getUSBIE : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setAD1IE(thebits : TBits_1); inline;
- procedure setCMP1IE(thebits : TBits_1); inline;
- procedure setCMP2IE(thebits : TBits_1); inline;
- procedure setCNIE(thebits : TBits_1); inline;
- procedure setDMA0IE(thebits : TBits_1); inline;
- procedure setDMA1IE(thebits : TBits_1); inline;
- procedure setDMA2IE(thebits : TBits_1); inline;
- procedure setDMA3IE(thebits : TBits_1); inline;
- procedure setDMA4IE(thebits : TBits_1); inline;
- procedure setDMA5IE(thebits : TBits_1); inline;
- procedure setDMA6IE(thebits : TBits_1); inline;
- procedure setDMA7IE(thebits : TBits_1); inline;
- procedure setETHIE(thebits : TBits_1); inline;
- procedure setFCEIE(thebits : TBits_1); inline;
- procedure setFSCMIE(thebits : TBits_1); inline;
- procedure setI2C2ABIE(thebits : TBits_1); inline;
- procedure setI2C2AMIE(thebits : TBits_1); inline;
- procedure setI2C2ASIE(thebits : TBits_1); inline;
- procedure setI2C2BIE(thebits : TBits_1); inline;
- procedure setI2C2MIE(thebits : TBits_1); inline;
- procedure setI2C2SIE(thebits : TBits_1); inline;
- procedure setI2C3ABIE(thebits : TBits_1); inline;
- procedure setI2C3AMIE(thebits : TBits_1); inline;
- procedure setI2C3ASIE(thebits : TBits_1); inline;
- procedure setI2C4BIE(thebits : TBits_1); inline;
- procedure setI2C4MIE(thebits : TBits_1); inline;
- procedure setI2C4SIE(thebits : TBits_1); inline;
- procedure setI2C5BIE(thebits : TBits_1); inline;
- procedure setI2C5MIE(thebits : TBits_1); inline;
- procedure setI2C5SIE(thebits : TBits_1); inline;
- procedure setIC1EIE(thebits : TBits_1); inline;
- procedure setIC2EIE(thebits : TBits_1); inline;
- procedure setIC3EIE(thebits : TBits_1); inline;
- procedure setPMPIE(thebits : TBits_1); inline;
- procedure setRTCCIE(thebits : TBits_1); inline;
- procedure setSPI2AEIE(thebits : TBits_1); inline;
- procedure setSPI2ARXIE(thebits : TBits_1); inline;
- procedure setSPI2ATXIE(thebits : TBits_1); inline;
- procedure setSPI2EIE(thebits : TBits_1); inline;
- procedure setSPI2RXIE(thebits : TBits_1); inline;
- procedure setSPI2TXIE(thebits : TBits_1); inline;
- procedure setSPI3AEIE(thebits : TBits_1); inline;
- procedure setSPI3ARXIE(thebits : TBits_1); inline;
- procedure setSPI3ATXIE(thebits : TBits_1); inline;
- procedure setSPI4EIE(thebits : TBits_1); inline;
- procedure setSPI4RXIE(thebits : TBits_1); inline;
- procedure setSPI4TXIE(thebits : TBits_1); inline;
- procedure setU2AEIE(thebits : TBits_1); inline;
- procedure setU2ARXIE(thebits : TBits_1); inline;
- procedure setU2ATXIE(thebits : TBits_1); inline;
- procedure setU2EIE(thebits : TBits_1); inline;
- procedure setU2RXIE(thebits : TBits_1); inline;
- procedure setU2TXIE(thebits : TBits_1); inline;
- procedure setU3AEIE(thebits : TBits_1); inline;
- procedure setU3ARXIE(thebits : TBits_1); inline;
- procedure setU3ATXIE(thebits : TBits_1); inline;
- procedure setU3EIE(thebits : TBits_1); inline;
- procedure setU3RXIE(thebits : TBits_1); inline;
- procedure setU3TXIE(thebits : TBits_1); inline;
- procedure setUSBIE(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearAD1IE; inline;
- procedure clearCMP1IE; inline;
- procedure clearCMP2IE; inline;
- procedure clearCNIE; inline;
- procedure clearDMA0IE; inline;
- procedure clearDMA1IE; inline;
- procedure clearDMA2IE; inline;
- procedure clearDMA3IE; inline;
- procedure clearDMA4IE; inline;
- procedure clearDMA5IE; inline;
- procedure clearDMA6IE; inline;
- procedure clearDMA7IE; inline;
- procedure clearETHIE; inline;
- procedure clearFCEIE; inline;
- procedure clearFSCMIE; inline;
- procedure clearI2C2ABIE; inline;
- procedure clearI2C2AMIE; inline;
- procedure clearI2C2ASIE; inline;
- procedure clearI2C2BIE; inline;
- procedure clearI2C2MIE; inline;
- procedure clearI2C2SIE; inline;
- procedure clearI2C3ABIE; inline;
- procedure clearI2C3AMIE; inline;
- procedure clearI2C3ASIE; inline;
- procedure clearI2C4BIE; inline;
- procedure clearI2C4MIE; inline;
- procedure clearI2C4SIE; inline;
- procedure clearI2C5BIE; inline;
- procedure clearI2C5MIE; inline;
- procedure clearI2C5SIE; inline;
- procedure clearIC1EIE; inline;
- procedure clearIC2EIE; inline;
- procedure clearIC3EIE; inline;
- procedure clearPMPIE; inline;
- procedure clearRTCCIE; inline;
- procedure clearSPI2AEIE; inline;
- procedure clearSPI2ARXIE; inline;
- procedure clearSPI2ATXIE; inline;
- procedure clearSPI2EIE; inline;
- procedure clearSPI2RXIE; inline;
- procedure clearSPI2TXIE; inline;
- procedure clearSPI3AEIE; inline;
- procedure clearSPI3ARXIE; inline;
- procedure clearSPI3ATXIE; inline;
- procedure clearSPI4EIE; inline;
- procedure clearSPI4RXIE; inline;
- procedure clearSPI4TXIE; inline;
- procedure clearU2AEIE; inline;
- procedure clearU2ARXIE; inline;
- procedure clearU2ATXIE; inline;
- procedure clearU2EIE; inline;
- procedure clearU2RXIE; inline;
- procedure clearU2TXIE; inline;
- procedure clearU3AEIE; inline;
- procedure clearU3ARXIE; inline;
- procedure clearU3ATXIE; inline;
- procedure clearU3EIE; inline;
- procedure clearU3RXIE; inline;
- procedure clearU3TXIE; inline;
- procedure clearUSBIE; inline;
- procedure setAD1IE; inline;
- procedure setCMP1IE; inline;
- procedure setCMP2IE; inline;
- procedure setCNIE; inline;
- procedure setDMA0IE; inline;
- procedure setDMA1IE; inline;
- procedure setDMA2IE; inline;
- procedure setDMA3IE; inline;
- procedure setDMA4IE; inline;
- procedure setDMA5IE; inline;
- procedure setDMA6IE; inline;
- procedure setDMA7IE; inline;
- procedure setETHIE; inline;
- procedure setFCEIE; inline;
- procedure setFSCMIE; inline;
- procedure setI2C2ABIE; inline;
- procedure setI2C2AMIE; inline;
- procedure setI2C2ASIE; inline;
- procedure setI2C2BIE; inline;
- procedure setI2C2MIE; inline;
- procedure setI2C2SIE; inline;
- procedure setI2C3ABIE; inline;
- procedure setI2C3AMIE; inline;
- procedure setI2C3ASIE; inline;
- procedure setI2C4BIE; inline;
- procedure setI2C4MIE; inline;
- procedure setI2C4SIE; inline;
- procedure setI2C5BIE; inline;
- procedure setI2C5MIE; inline;
- procedure setI2C5SIE; inline;
- procedure setIC1EIE; inline;
- procedure setIC2EIE; inline;
- procedure setIC3EIE; inline;
- procedure setPMPIE; inline;
- procedure setRTCCIE; inline;
- procedure setSPI2AEIE; inline;
- procedure setSPI2ARXIE; inline;
- procedure setSPI2ATXIE; inline;
- procedure setSPI2EIE; inline;
- procedure setSPI2RXIE; inline;
- procedure setSPI2TXIE; inline;
- procedure setSPI3AEIE; inline;
- procedure setSPI3ARXIE; inline;
- procedure setSPI3ATXIE; inline;
- procedure setSPI4EIE; inline;
- procedure setSPI4RXIE; inline;
- procedure setSPI4TXIE; inline;
- procedure setU2AEIE; inline;
- procedure setU2ARXIE; inline;
- procedure setU2ATXIE; inline;
- procedure setU2EIE; inline;
- procedure setU2RXIE; inline;
- procedure setU2TXIE; inline;
- procedure setU3AEIE; inline;
- procedure setU3ARXIE; inline;
- procedure setU3ATXIE; inline;
- procedure setU3EIE; inline;
- procedure setU3RXIE; inline;
- procedure setU3TXIE; inline;
- procedure setUSBIE; inline;
- property AD1IE : TBits_1 read getAD1IE write setAD1IE;
- property CMP1IE : TBits_1 read getCMP1IE write setCMP1IE;
- property CMP2IE : TBits_1 read getCMP2IE write setCMP2IE;
- property CNIE : TBits_1 read getCNIE write setCNIE;
- property DMA0IE : TBits_1 read getDMA0IE write setDMA0IE;
- property DMA1IE : TBits_1 read getDMA1IE write setDMA1IE;
- property DMA2IE : TBits_1 read getDMA2IE write setDMA2IE;
- property DMA3IE : TBits_1 read getDMA3IE write setDMA3IE;
- property DMA4IE : TBits_1 read getDMA4IE write setDMA4IE;
- property DMA5IE : TBits_1 read getDMA5IE write setDMA5IE;
- property DMA6IE : TBits_1 read getDMA6IE write setDMA6IE;
- property DMA7IE : TBits_1 read getDMA7IE write setDMA7IE;
- property ETHIE : TBits_1 read getETHIE write setETHIE;
- property FCEIE : TBits_1 read getFCEIE write setFCEIE;
- property FSCMIE : TBits_1 read getFSCMIE write setFSCMIE;
- property I2C2ABIE : TBits_1 read getI2C2ABIE write setI2C2ABIE;
- property I2C2AMIE : TBits_1 read getI2C2AMIE write setI2C2AMIE;
- property I2C2ASIE : TBits_1 read getI2C2ASIE write setI2C2ASIE;
- property I2C2BIE : TBits_1 read getI2C2BIE write setI2C2BIE;
- property I2C2MIE : TBits_1 read getI2C2MIE write setI2C2MIE;
- property I2C2SIE : TBits_1 read getI2C2SIE write setI2C2SIE;
- property I2C3ABIE : TBits_1 read getI2C3ABIE write setI2C3ABIE;
- property I2C3AMIE : TBits_1 read getI2C3AMIE write setI2C3AMIE;
- property I2C3ASIE : TBits_1 read getI2C3ASIE write setI2C3ASIE;
- property I2C4BIE : TBits_1 read getI2C4BIE write setI2C4BIE;
- property I2C4MIE : TBits_1 read getI2C4MIE write setI2C4MIE;
- property I2C4SIE : TBits_1 read getI2C4SIE write setI2C4SIE;
- property I2C5BIE : TBits_1 read getI2C5BIE write setI2C5BIE;
- property I2C5MIE : TBits_1 read getI2C5MIE write setI2C5MIE;
- property I2C5SIE : TBits_1 read getI2C5SIE write setI2C5SIE;
- property IC1EIE : TBits_1 read getIC1EIE write setIC1EIE;
- property IC2EIE : TBits_1 read getIC2EIE write setIC2EIE;
- property IC3EIE : TBits_1 read getIC3EIE write setIC3EIE;
- property PMPIE : TBits_1 read getPMPIE write setPMPIE;
- property RTCCIE : TBits_1 read getRTCCIE write setRTCCIE;
- property SPI2AEIE : TBits_1 read getSPI2AEIE write setSPI2AEIE;
- property SPI2ARXIE : TBits_1 read getSPI2ARXIE write setSPI2ARXIE;
- property SPI2ATXIE : TBits_1 read getSPI2ATXIE write setSPI2ATXIE;
- property SPI2EIE : TBits_1 read getSPI2EIE write setSPI2EIE;
- property SPI2RXIE : TBits_1 read getSPI2RXIE write setSPI2RXIE;
- property SPI2TXIE : TBits_1 read getSPI2TXIE write setSPI2TXIE;
- property SPI3AEIE : TBits_1 read getSPI3AEIE write setSPI3AEIE;
- property SPI3ARXIE : TBits_1 read getSPI3ARXIE write setSPI3ARXIE;
- property SPI3ATXIE : TBits_1 read getSPI3ATXIE write setSPI3ATXIE;
- property SPI4EIE : TBits_1 read getSPI4EIE write setSPI4EIE;
- property SPI4RXIE : TBits_1 read getSPI4RXIE write setSPI4RXIE;
- property SPI4TXIE : TBits_1 read getSPI4TXIE write setSPI4TXIE;
- property U2AEIE : TBits_1 read getU2AEIE write setU2AEIE;
- property U2ARXIE : TBits_1 read getU2ARXIE write setU2ARXIE;
- property U2ATXIE : TBits_1 read getU2ATXIE write setU2ATXIE;
- property U2EIE : TBits_1 read getU2EIE write setU2EIE;
- property U2RXIE : TBits_1 read getU2RXIE write setU2RXIE;
- property U2TXIE : TBits_1 read getU2TXIE write setU2TXIE;
- property U3AEIE : TBits_1 read getU3AEIE write setU3AEIE;
- property U3ARXIE : TBits_1 read getU3ARXIE write setU3ARXIE;
- property U3ATXIE : TBits_1 read getU3ATXIE write setU3ATXIE;
- property U3EIE : TBits_1 read getU3EIE write setU3EIE;
- property U3RXIE : TBits_1 read getU3RXIE write setU3RXIE;
- property U3TXIE : TBits_1 read getU3TXIE write setU3TXIE;
- property USBIE : TBits_1 read getUSBIE write setUSBIE;
- property w : TBits_32 read getw write setw;
- end;
- TINT_IEC2 = record
- private
- function getIC4EIE : TBits_1; inline;
- function getIC5EIE : TBits_1; inline;
- function getPMPEIE : TBits_1; inline;
- function getU1BEIE : TBits_1; inline;
- function getU1BRXIE : TBits_1; inline;
- function getU1BTXIE : TBits_1; inline;
- function getU2BEIE : TBits_1; inline;
- function getU2BRXIE : TBits_1; inline;
- function getU2BTXIE : TBits_1; inline;
- function getU3BEIE : TBits_1; inline;
- function getU3BRXIE : TBits_1; inline;
- function getU3BTXIE : TBits_1; inline;
- function getU4EIE : TBits_1; inline;
- function getU4RXIE : TBits_1; inline;
- function getU4TXIE : TBits_1; inline;
- function getU5EIE : TBits_1; inline;
- function getU5RXIE : TBits_1; inline;
- function getU5TXIE : TBits_1; inline;
- function getU6EIE : TBits_1; inline;
- function getU6RXIE : TBits_1; inline;
- function getU6TXIE : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setIC4EIE(thebits : TBits_1); inline;
- procedure setIC5EIE(thebits : TBits_1); inline;
- procedure setPMPEIE(thebits : TBits_1); inline;
- procedure setU1BEIE(thebits : TBits_1); inline;
- procedure setU1BRXIE(thebits : TBits_1); inline;
- procedure setU1BTXIE(thebits : TBits_1); inline;
- procedure setU2BEIE(thebits : TBits_1); inline;
- procedure setU2BRXIE(thebits : TBits_1); inline;
- procedure setU2BTXIE(thebits : TBits_1); inline;
- procedure setU3BEIE(thebits : TBits_1); inline;
- procedure setU3BRXIE(thebits : TBits_1); inline;
- procedure setU3BTXIE(thebits : TBits_1); inline;
- procedure setU4EIE(thebits : TBits_1); inline;
- procedure setU4RXIE(thebits : TBits_1); inline;
- procedure setU4TXIE(thebits : TBits_1); inline;
- procedure setU5EIE(thebits : TBits_1); inline;
- procedure setU5RXIE(thebits : TBits_1); inline;
- procedure setU5TXIE(thebits : TBits_1); inline;
- procedure setU6EIE(thebits : TBits_1); inline;
- procedure setU6RXIE(thebits : TBits_1); inline;
- procedure setU6TXIE(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearIC4EIE; inline;
- procedure clearIC5EIE; inline;
- procedure clearPMPEIE; inline;
- procedure clearU1BEIE; inline;
- procedure clearU1BRXIE; inline;
- procedure clearU1BTXIE; inline;
- procedure clearU2BEIE; inline;
- procedure clearU2BRXIE; inline;
- procedure clearU2BTXIE; inline;
- procedure clearU3BEIE; inline;
- procedure clearU3BRXIE; inline;
- procedure clearU3BTXIE; inline;
- procedure clearU4EIE; inline;
- procedure clearU4RXIE; inline;
- procedure clearU4TXIE; inline;
- procedure clearU5EIE; inline;
- procedure clearU5RXIE; inline;
- procedure clearU5TXIE; inline;
- procedure clearU6EIE; inline;
- procedure clearU6RXIE; inline;
- procedure clearU6TXIE; inline;
- procedure setIC4EIE; inline;
- procedure setIC5EIE; inline;
- procedure setPMPEIE; inline;
- procedure setU1BEIE; inline;
- procedure setU1BRXIE; inline;
- procedure setU1BTXIE; inline;
- procedure setU2BEIE; inline;
- procedure setU2BRXIE; inline;
- procedure setU2BTXIE; inline;
- procedure setU3BEIE; inline;
- procedure setU3BRXIE; inline;
- procedure setU3BTXIE; inline;
- procedure setU4EIE; inline;
- procedure setU4RXIE; inline;
- procedure setU4TXIE; inline;
- procedure setU5EIE; inline;
- procedure setU5RXIE; inline;
- procedure setU5TXIE; inline;
- procedure setU6EIE; inline;
- procedure setU6RXIE; inline;
- procedure setU6TXIE; inline;
- property IC4EIE : TBits_1 read getIC4EIE write setIC4EIE;
- property IC5EIE : TBits_1 read getIC5EIE write setIC5EIE;
- property PMPEIE : TBits_1 read getPMPEIE write setPMPEIE;
- property U1BEIE : TBits_1 read getU1BEIE write setU1BEIE;
- property U1BRXIE : TBits_1 read getU1BRXIE write setU1BRXIE;
- property U1BTXIE : TBits_1 read getU1BTXIE write setU1BTXIE;
- property U2BEIE : TBits_1 read getU2BEIE write setU2BEIE;
- property U2BRXIE : TBits_1 read getU2BRXIE write setU2BRXIE;
- property U2BTXIE : TBits_1 read getU2BTXIE write setU2BTXIE;
- property U3BEIE : TBits_1 read getU3BEIE write setU3BEIE;
- property U3BRXIE : TBits_1 read getU3BRXIE write setU3BRXIE;
- property U3BTXIE : TBits_1 read getU3BTXIE write setU3BTXIE;
- property U4EIE : TBits_1 read getU4EIE write setU4EIE;
- property U4RXIE : TBits_1 read getU4RXIE write setU4RXIE;
- property U4TXIE : TBits_1 read getU4TXIE write setU4TXIE;
- property U5EIE : TBits_1 read getU5EIE write setU5EIE;
- property U5RXIE : TBits_1 read getU5RXIE write setU5RXIE;
- property U5TXIE : TBits_1 read getU5TXIE write setU5TXIE;
- property U6EIE : TBits_1 read getU6EIE write setU6EIE;
- property U6RXIE : TBits_1 read getU6RXIE write setU6RXIE;
- property U6TXIE : TBits_1 read getU6TXIE write setU6TXIE;
- property w : TBits_32 read getw write setw;
- end;
- TINT_IPC0 = record
- private
- function getCS0IP : TBits_3; inline;
- function getCS0IS : TBits_2; inline;
- function getCS1IP : TBits_3; inline;
- function getCS1IS : TBits_2; inline;
- function getCTIP : TBits_3; inline;
- function getCTIS : TBits_2; inline;
- function getINT0IP : TBits_3; inline;
- function getINT0IS : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setCS0IP(thebits : TBits_3); inline;
- procedure setCS0IS(thebits : TBits_2); inline;
- procedure setCS1IP(thebits : TBits_3); inline;
- procedure setCS1IS(thebits : TBits_2); inline;
- procedure setCTIP(thebits : TBits_3); inline;
- procedure setCTIS(thebits : TBits_2); inline;
- procedure setINT0IP(thebits : TBits_3); inline;
- procedure setINT0IS(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property CS0IP : TBits_3 read getCS0IP write setCS0IP;
- property CS0IS : TBits_2 read getCS0IS write setCS0IS;
- property CS1IP : TBits_3 read getCS1IP write setCS1IP;
- property CS1IS : TBits_2 read getCS1IS write setCS1IS;
- property CTIP : TBits_3 read getCTIP write setCTIP;
- property CTIS : TBits_2 read getCTIS write setCTIS;
- property INT0IP : TBits_3 read getINT0IP write setINT0IP;
- property INT0IS : TBits_2 read getINT0IS write setINT0IS;
- property w : TBits_32 read getw write setw;
- end;
- TINT_IPC1 = record
- private
- function getIC1IP : TBits_3; inline;
- function getIC1IS : TBits_2; inline;
- function getINT1IP : TBits_3; inline;
- function getINT1IS : TBits_2; inline;
- function getOC1IP : TBits_3; inline;
- function getOC1IS : TBits_2; inline;
- function getT1IP : TBits_3; inline;
- function getT1IS : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setIC1IP(thebits : TBits_3); inline;
- procedure setIC1IS(thebits : TBits_2); inline;
- procedure setINT1IP(thebits : TBits_3); inline;
- procedure setINT1IS(thebits : TBits_2); inline;
- procedure setOC1IP(thebits : TBits_3); inline;
- procedure setOC1IS(thebits : TBits_2); inline;
- procedure setT1IP(thebits : TBits_3); inline;
- procedure setT1IS(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property IC1IP : TBits_3 read getIC1IP write setIC1IP;
- property IC1IS : TBits_2 read getIC1IS write setIC1IS;
- property INT1IP : TBits_3 read getINT1IP write setINT1IP;
- property INT1IS : TBits_2 read getINT1IS write setINT1IS;
- property OC1IP : TBits_3 read getOC1IP write setOC1IP;
- property OC1IS : TBits_2 read getOC1IS write setOC1IS;
- property T1IP : TBits_3 read getT1IP write setT1IP;
- property T1IS : TBits_2 read getT1IS write setT1IS;
- property w : TBits_32 read getw write setw;
- end;
- TINT_IPC2 = record
- private
- function getIC2IP : TBits_3; inline;
- function getIC2IS : TBits_2; inline;
- function getINT2IP : TBits_3; inline;
- function getINT2IS : TBits_2; inline;
- function getOC2IP : TBits_3; inline;
- function getOC2IS : TBits_2; inline;
- function getT2IP : TBits_3; inline;
- function getT2IS : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setIC2IP(thebits : TBits_3); inline;
- procedure setIC2IS(thebits : TBits_2); inline;
- procedure setINT2IP(thebits : TBits_3); inline;
- procedure setINT2IS(thebits : TBits_2); inline;
- procedure setOC2IP(thebits : TBits_3); inline;
- procedure setOC2IS(thebits : TBits_2); inline;
- procedure setT2IP(thebits : TBits_3); inline;
- procedure setT2IS(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property IC2IP : TBits_3 read getIC2IP write setIC2IP;
- property IC2IS : TBits_2 read getIC2IS write setIC2IS;
- property INT2IP : TBits_3 read getINT2IP write setINT2IP;
- property INT2IS : TBits_2 read getINT2IS write setINT2IS;
- property OC2IP : TBits_3 read getOC2IP write setOC2IP;
- property OC2IS : TBits_2 read getOC2IS write setOC2IS;
- property T2IP : TBits_3 read getT2IP write setT2IP;
- property T2IS : TBits_2 read getT2IS write setT2IS;
- property w : TBits_32 read getw write setw;
- end;
- TINT_IPC3 = record
- private
- function getIC3IP : TBits_3; inline;
- function getIC3IS : TBits_2; inline;
- function getINT3IP : TBits_3; inline;
- function getINT3IS : TBits_2; inline;
- function getOC3IP : TBits_3; inline;
- function getOC3IS : TBits_2; inline;
- function getT3IP : TBits_3; inline;
- function getT3IS : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setIC3IP(thebits : TBits_3); inline;
- procedure setIC3IS(thebits : TBits_2); inline;
- procedure setINT3IP(thebits : TBits_3); inline;
- procedure setINT3IS(thebits : TBits_2); inline;
- procedure setOC3IP(thebits : TBits_3); inline;
- procedure setOC3IS(thebits : TBits_2); inline;
- procedure setT3IP(thebits : TBits_3); inline;
- procedure setT3IS(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property IC3IP : TBits_3 read getIC3IP write setIC3IP;
- property IC3IS : TBits_2 read getIC3IS write setIC3IS;
- property INT3IP : TBits_3 read getINT3IP write setINT3IP;
- property INT3IS : TBits_2 read getINT3IS write setINT3IS;
- property OC3IP : TBits_3 read getOC3IP write setOC3IP;
- property OC3IS : TBits_2 read getOC3IS write setOC3IS;
- property T3IP : TBits_3 read getT3IP write setT3IP;
- property T3IS : TBits_2 read getT3IS write setT3IS;
- property w : TBits_32 read getw write setw;
- end;
- TINT_IPC4 = record
- private
- function getIC4IP : TBits_3; inline;
- function getIC4IS : TBits_2; inline;
- function getINT4IP : TBits_3; inline;
- function getINT4IS : TBits_2; inline;
- function getOC4IP : TBits_3; inline;
- function getOC4IS : TBits_2; inline;
- function getT4IP : TBits_3; inline;
- function getT4IS : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setIC4IP(thebits : TBits_3); inline;
- procedure setIC4IS(thebits : TBits_2); inline;
- procedure setINT4IP(thebits : TBits_3); inline;
- procedure setINT4IS(thebits : TBits_2); inline;
- procedure setOC4IP(thebits : TBits_3); inline;
- procedure setOC4IS(thebits : TBits_2); inline;
- procedure setT4IP(thebits : TBits_3); inline;
- procedure setT4IS(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property IC4IP : TBits_3 read getIC4IP write setIC4IP;
- property IC4IS : TBits_2 read getIC4IS write setIC4IS;
- property INT4IP : TBits_3 read getINT4IP write setINT4IP;
- property INT4IS : TBits_2 read getINT4IS write setINT4IS;
- property OC4IP : TBits_3 read getOC4IP write setOC4IP;
- property OC4IS : TBits_2 read getOC4IS write setOC4IS;
- property T4IP : TBits_3 read getT4IP write setT4IP;
- property T4IS : TBits_2 read getT4IS write setT4IS;
- property w : TBits_32 read getw write setw;
- end;
- TINT_IPC5 = record
- private
- function getIC5IP : TBits_3; inline;
- function getIC5IS : TBits_2; inline;
- function getOC5IP : TBits_3; inline;
- function getOC5IS : TBits_2; inline;
- function getSPI1IP : TBits_3; inline;
- function getSPI1IS : TBits_2; inline;
- function getT5IP : TBits_3; inline;
- function getT5IS : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setIC5IP(thebits : TBits_3); inline;
- procedure setIC5IS(thebits : TBits_2); inline;
- procedure setOC5IP(thebits : TBits_3); inline;
- procedure setOC5IS(thebits : TBits_2); inline;
- procedure setSPI1IP(thebits : TBits_3); inline;
- procedure setSPI1IS(thebits : TBits_2); inline;
- procedure setT5IP(thebits : TBits_3); inline;
- procedure setT5IS(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property IC5IP : TBits_3 read getIC5IP write setIC5IP;
- property IC5IS : TBits_2 read getIC5IS write setIC5IS;
- property OC5IP : TBits_3 read getOC5IP write setOC5IP;
- property OC5IS : TBits_2 read getOC5IS write setOC5IS;
- property SPI1IP : TBits_3 read getSPI1IP write setSPI1IP;
- property SPI1IS : TBits_2 read getSPI1IS write setSPI1IS;
- property T5IP : TBits_3 read getT5IP write setT5IP;
- property T5IS : TBits_2 read getT5IS write setT5IS;
- property w : TBits_32 read getw write setw;
- end;
- TINT_IPC6 = record
- private
- function getAD1IP : TBits_3; inline;
- function getAD1IS : TBits_2; inline;
- function getCNIP : TBits_3; inline;
- function getCNIS : TBits_2; inline;
- function getI2C1AIP : TBits_3; inline;
- function getI2C1AIS : TBits_2; inline;
- function getI2C1IP : TBits_3; inline;
- function getI2C1IS : TBits_2; inline;
- function getI2C3IP : TBits_3; inline;
- function getI2C3IS : TBits_2; inline;
- function getSPI1AIP : TBits_3; inline;
- function getSPI1AIS : TBits_2; inline;
- function getSPI3IP : TBits_3; inline;
- function getSPI3IS : TBits_2; inline;
- function getU1AIP : TBits_3; inline;
- function getU1AIS : TBits_2; inline;
- function getU1IP : TBits_3; inline;
- function getU1IS : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setAD1IP(thebits : TBits_3); inline;
- procedure setAD1IS(thebits : TBits_2); inline;
- procedure setCNIP(thebits : TBits_3); inline;
- procedure setCNIS(thebits : TBits_2); inline;
- procedure setI2C1AIP(thebits : TBits_3); inline;
- procedure setI2C1AIS(thebits : TBits_2); inline;
- procedure setI2C1IP(thebits : TBits_3); inline;
- procedure setI2C1IS(thebits : TBits_2); inline;
- procedure setI2C3IP(thebits : TBits_3); inline;
- procedure setI2C3IS(thebits : TBits_2); inline;
- procedure setSPI1AIP(thebits : TBits_3); inline;
- procedure setSPI1AIS(thebits : TBits_2); inline;
- procedure setSPI3IP(thebits : TBits_3); inline;
- procedure setSPI3IS(thebits : TBits_2); inline;
- procedure setU1AIP(thebits : TBits_3); inline;
- procedure setU1AIS(thebits : TBits_2); inline;
- procedure setU1IP(thebits : TBits_3); inline;
- procedure setU1IS(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property AD1IP : TBits_3 read getAD1IP write setAD1IP;
- property AD1IS : TBits_2 read getAD1IS write setAD1IS;
- property CNIP : TBits_3 read getCNIP write setCNIP;
- property CNIS : TBits_2 read getCNIS write setCNIS;
- property I2C1AIP : TBits_3 read getI2C1AIP write setI2C1AIP;
- property I2C1AIS : TBits_2 read getI2C1AIS write setI2C1AIS;
- property I2C1IP : TBits_3 read getI2C1IP write setI2C1IP;
- property I2C1IS : TBits_2 read getI2C1IS write setI2C1IS;
- property I2C3IP : TBits_3 read getI2C3IP write setI2C3IP;
- property I2C3IS : TBits_2 read getI2C3IS write setI2C3IS;
- property SPI1AIP : TBits_3 read getSPI1AIP write setSPI1AIP;
- property SPI1AIS : TBits_2 read getSPI1AIS write setSPI1AIS;
- property SPI3IP : TBits_3 read getSPI3IP write setSPI3IP;
- property SPI3IS : TBits_2 read getSPI3IS write setSPI3IS;
- property U1AIP : TBits_3 read getU1AIP write setU1AIP;
- property U1AIS : TBits_2 read getU1AIS write setU1AIS;
- property U1IP : TBits_3 read getU1IP write setU1IP;
- property U1IS : TBits_2 read getU1IS write setU1IS;
- property w : TBits_32 read getw write setw;
- end;
- TINT_IPC7 = record
- private
- function getCMP1IP : TBits_3; inline;
- function getCMP1IS : TBits_2; inline;
- function getCMP2IP : TBits_3; inline;
- function getCMP2IS : TBits_2; inline;
- function getI2C2AIP : TBits_3; inline;
- function getI2C2AIS : TBits_2; inline;
- function getI2C4IP : TBits_3; inline;
- function getI2C4IS : TBits_2; inline;
- function getPMPIP : TBits_3; inline;
- function getPMPIS : TBits_2; inline;
- function getSPI2AIP : TBits_3; inline;
- function getSPI2AIS : TBits_2; inline;
- function getSPI2IP : TBits_3; inline;
- function getSPI2IS : TBits_2; inline;
- function getU2AIP : TBits_3; inline;
- function getU2AIS : TBits_2; inline;
- function getU3IP : TBits_3; inline;
- function getU3IS : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setCMP1IP(thebits : TBits_3); inline;
- procedure setCMP1IS(thebits : TBits_2); inline;
- procedure setCMP2IP(thebits : TBits_3); inline;
- procedure setCMP2IS(thebits : TBits_2); inline;
- procedure setI2C2AIP(thebits : TBits_3); inline;
- procedure setI2C2AIS(thebits : TBits_2); inline;
- procedure setI2C4IP(thebits : TBits_3); inline;
- procedure setI2C4IS(thebits : TBits_2); inline;
- procedure setPMPIP(thebits : TBits_3); inline;
- procedure setPMPIS(thebits : TBits_2); inline;
- procedure setSPI2AIP(thebits : TBits_3); inline;
- procedure setSPI2AIS(thebits : TBits_2); inline;
- procedure setSPI2IP(thebits : TBits_3); inline;
- procedure setSPI2IS(thebits : TBits_2); inline;
- procedure setU2AIP(thebits : TBits_3); inline;
- procedure setU2AIS(thebits : TBits_2); inline;
- procedure setU3IP(thebits : TBits_3); inline;
- procedure setU3IS(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property CMP1IP : TBits_3 read getCMP1IP write setCMP1IP;
- property CMP1IS : TBits_2 read getCMP1IS write setCMP1IS;
- property CMP2IP : TBits_3 read getCMP2IP write setCMP2IP;
- property CMP2IS : TBits_2 read getCMP2IS write setCMP2IS;
- property I2C2AIP : TBits_3 read getI2C2AIP write setI2C2AIP;
- property I2C2AIS : TBits_2 read getI2C2AIS write setI2C2AIS;
- property I2C4IP : TBits_3 read getI2C4IP write setI2C4IP;
- property I2C4IS : TBits_2 read getI2C4IS write setI2C4IS;
- property PMPIP : TBits_3 read getPMPIP write setPMPIP;
- property PMPIS : TBits_2 read getPMPIS write setPMPIS;
- property SPI2AIP : TBits_3 read getSPI2AIP write setSPI2AIP;
- property SPI2AIS : TBits_2 read getSPI2AIS write setSPI2AIS;
- property SPI2IP : TBits_3 read getSPI2IP write setSPI2IP;
- property SPI2IS : TBits_2 read getSPI2IS write setSPI2IS;
- property U2AIP : TBits_3 read getU2AIP write setU2AIP;
- property U2AIS : TBits_2 read getU2AIS write setU2AIS;
- property U3IP : TBits_3 read getU3IP write setU3IP;
- property U3IS : TBits_2 read getU3IS write setU3IS;
- property w : TBits_32 read getw write setw;
- end;
- TINT_IPC8 = record
- private
- function getFSCMIP : TBits_3; inline;
- function getFSCMIS : TBits_2; inline;
- function getI2C2IP : TBits_3; inline;
- function getI2C2IS : TBits_2; inline;
- function getI2C3AIP : TBits_3; inline;
- function getI2C3AIS : TBits_2; inline;
- function getI2C5IP : TBits_3; inline;
- function getI2C5IS : TBits_2; inline;
- function getRTCCIP : TBits_3; inline;
- function getRTCCIS : TBits_2; inline;
- function getSPI3AIP : TBits_3; inline;
- function getSPI3AIS : TBits_2; inline;
- function getSPI4IP : TBits_3; inline;
- function getSPI4IS : TBits_2; inline;
- function getU2IP : TBits_3; inline;
- function getU2IS : TBits_2; inline;
- function getU3AIP : TBits_3; inline;
- function getU3AIS : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setFSCMIP(thebits : TBits_3); inline;
- procedure setFSCMIS(thebits : TBits_2); inline;
- procedure setI2C2IP(thebits : TBits_3); inline;
- procedure setI2C2IS(thebits : TBits_2); inline;
- procedure setI2C3AIP(thebits : TBits_3); inline;
- procedure setI2C3AIS(thebits : TBits_2); inline;
- procedure setI2C5IP(thebits : TBits_3); inline;
- procedure setI2C5IS(thebits : TBits_2); inline;
- procedure setRTCCIP(thebits : TBits_3); inline;
- procedure setRTCCIS(thebits : TBits_2); inline;
- procedure setSPI3AIP(thebits : TBits_3); inline;
- procedure setSPI3AIS(thebits : TBits_2); inline;
- procedure setSPI4IP(thebits : TBits_3); inline;
- procedure setSPI4IS(thebits : TBits_2); inline;
- procedure setU2IP(thebits : TBits_3); inline;
- procedure setU2IS(thebits : TBits_2); inline;
- procedure setU3AIP(thebits : TBits_3); inline;
- procedure setU3AIS(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property FSCMIP : TBits_3 read getFSCMIP write setFSCMIP;
- property FSCMIS : TBits_2 read getFSCMIS write setFSCMIS;
- property I2C2IP : TBits_3 read getI2C2IP write setI2C2IP;
- property I2C2IS : TBits_2 read getI2C2IS write setI2C2IS;
- property I2C3AIP : TBits_3 read getI2C3AIP write setI2C3AIP;
- property I2C3AIS : TBits_2 read getI2C3AIS write setI2C3AIS;
- property I2C5IP : TBits_3 read getI2C5IP write setI2C5IP;
- property I2C5IS : TBits_2 read getI2C5IS write setI2C5IS;
- property RTCCIP : TBits_3 read getRTCCIP write setRTCCIP;
- property RTCCIS : TBits_2 read getRTCCIS write setRTCCIS;
- property SPI3AIP : TBits_3 read getSPI3AIP write setSPI3AIP;
- property SPI3AIS : TBits_2 read getSPI3AIS write setSPI3AIS;
- property SPI4IP : TBits_3 read getSPI4IP write setSPI4IP;
- property SPI4IS : TBits_2 read getSPI4IS write setSPI4IS;
- property U2IP : TBits_3 read getU2IP write setU2IP;
- property U2IS : TBits_2 read getU2IS write setU2IS;
- property U3AIP : TBits_3 read getU3AIP write setU3AIP;
- property U3AIS : TBits_2 read getU3AIS write setU3AIS;
- property w : TBits_32 read getw write setw;
- end;
- TINT_IPC9 = record
- private
- function getDMA0IP : TBits_3; inline;
- function getDMA0IS : TBits_2; inline;
- function getDMA1IP : TBits_3; inline;
- function getDMA1IS : TBits_2; inline;
- function getDMA2IP : TBits_3; inline;
- function getDMA2IS : TBits_2; inline;
- function getDMA3IP : TBits_3; inline;
- function getDMA3IS : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setDMA0IP(thebits : TBits_3); inline;
- procedure setDMA0IS(thebits : TBits_2); inline;
- procedure setDMA1IP(thebits : TBits_3); inline;
- procedure setDMA1IS(thebits : TBits_2); inline;
- procedure setDMA2IP(thebits : TBits_3); inline;
- procedure setDMA2IS(thebits : TBits_2); inline;
- procedure setDMA3IP(thebits : TBits_3); inline;
- procedure setDMA3IS(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property DMA0IP : TBits_3 read getDMA0IP write setDMA0IP;
- property DMA0IS : TBits_2 read getDMA0IS write setDMA0IS;
- property DMA1IP : TBits_3 read getDMA1IP write setDMA1IP;
- property DMA1IS : TBits_2 read getDMA1IS write setDMA1IS;
- property DMA2IP : TBits_3 read getDMA2IP write setDMA2IP;
- property DMA2IS : TBits_2 read getDMA2IS write setDMA2IS;
- property DMA3IP : TBits_3 read getDMA3IP write setDMA3IP;
- property DMA3IS : TBits_2 read getDMA3IS write setDMA3IS;
- property w : TBits_32 read getw write setw;
- end;
- TINT_IPC10 = record
- private
- function getDMA4IP : TBits_3; inline;
- function getDMA4IS : TBits_2; inline;
- function getDMA5IP : TBits_3; inline;
- function getDMA5IS : TBits_2; inline;
- function getDMA6IP : TBits_3; inline;
- function getDMA6IS : TBits_2; inline;
- function getDMA7IP : TBits_3; inline;
- function getDMA7IS : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setDMA4IP(thebits : TBits_3); inline;
- procedure setDMA4IS(thebits : TBits_2); inline;
- procedure setDMA5IP(thebits : TBits_3); inline;
- procedure setDMA5IS(thebits : TBits_2); inline;
- procedure setDMA6IP(thebits : TBits_3); inline;
- procedure setDMA6IS(thebits : TBits_2); inline;
- procedure setDMA7IP(thebits : TBits_3); inline;
- procedure setDMA7IS(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property DMA4IP : TBits_3 read getDMA4IP write setDMA4IP;
- property DMA4IS : TBits_2 read getDMA4IS write setDMA4IS;
- property DMA5IP : TBits_3 read getDMA5IP write setDMA5IP;
- property DMA5IS : TBits_2 read getDMA5IS write setDMA5IS;
- property DMA6IP : TBits_3 read getDMA6IP write setDMA6IP;
- property DMA6IS : TBits_2 read getDMA6IS write setDMA6IS;
- property DMA7IP : TBits_3 read getDMA7IP write setDMA7IP;
- property DMA7IS : TBits_2 read getDMA7IS write setDMA7IS;
- property w : TBits_32 read getw write setw;
- end;
- TINT_IPC11 = record
- private
- function getFCEIP : TBits_3; inline;
- function getFCEIS : TBits_2; inline;
- function getUSBIP : TBits_3; inline;
- function getUSBIS : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setFCEIP(thebits : TBits_3); inline;
- procedure setFCEIS(thebits : TBits_2); inline;
- procedure setUSBIP(thebits : TBits_3); inline;
- procedure setUSBIS(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property FCEIP : TBits_3 read getFCEIP write setFCEIP;
- property FCEIS : TBits_2 read getFCEIS write setFCEIS;
- property USBIP : TBits_3 read getUSBIP write setUSBIP;
- property USBIS : TBits_2 read getUSBIS write setUSBIS;
- property w : TBits_32 read getw write setw;
- end;
- TINT_IPC12 = record
- private
- function getETHIP : TBits_3; inline;
- function getETHIS : TBits_2; inline;
- function getU1BIP : TBits_3; inline;
- function getU1BIS : TBits_2; inline;
- function getU2BIP : TBits_3; inline;
- function getU2BIS : TBits_2; inline;
- function getU3BIP : TBits_3; inline;
- function getU3BIS : TBits_2; inline;
- function getU4IP : TBits_3; inline;
- function getU4IS : TBits_2; inline;
- function getU5IP : TBits_3; inline;
- function getU5IS : TBits_2; inline;
- function getU6IP : TBits_3; inline;
- function getU6IS : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setETHIP(thebits : TBits_3); inline;
- procedure setETHIS(thebits : TBits_2); inline;
- procedure setU1BIP(thebits : TBits_3); inline;
- procedure setU1BIS(thebits : TBits_2); inline;
- procedure setU2BIP(thebits : TBits_3); inline;
- procedure setU2BIS(thebits : TBits_2); inline;
- procedure setU3BIP(thebits : TBits_3); inline;
- procedure setU3BIS(thebits : TBits_2); inline;
- procedure setU4IP(thebits : TBits_3); inline;
- procedure setU4IS(thebits : TBits_2); inline;
- procedure setU5IP(thebits : TBits_3); inline;
- procedure setU5IS(thebits : TBits_2); inline;
- procedure setU6IP(thebits : TBits_3); inline;
- procedure setU6IS(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property ETHIP : TBits_3 read getETHIP write setETHIP;
- property ETHIS : TBits_2 read getETHIS write setETHIS;
- property U1BIP : TBits_3 read getU1BIP write setU1BIP;
- property U1BIS : TBits_2 read getU1BIS write setU1BIS;
- property U2BIP : TBits_3 read getU2BIP write setU2BIP;
- property U2BIS : TBits_2 read getU2BIS write setU2BIS;
- property U3BIP : TBits_3 read getU3BIP write setU3BIP;
- property U3BIS : TBits_2 read getU3BIS write setU3BIS;
- property U4IP : TBits_3 read getU4IP write setU4IP;
- property U4IS : TBits_2 read getU4IS write setU4IS;
- property U5IP : TBits_3 read getU5IP write setU5IP;
- property U5IS : TBits_2 read getU5IS write setU5IS;
- property U6IP : TBits_3 read getU6IP write setU6IP;
- property U6IS : TBits_2 read getU6IS write setU6IS;
- property w : TBits_32 read getw write setw;
- end;
- type
- TINTRegisters = record
- INTCONbits : TINT_INTCON;
- INTCON : longWord;
- INTCONCLR : longWord;
- INTCONSET : longWord;
- INTCONINV : longWord;
- INTSTAT : longWord;
- IPTMR : longWord;
- IPTMRCLR : longWord;
- IPTMRSET : longWord;
- IPTMRINV : longWord;
- IFS0bits : TINT_IFS0;
- IFS0 : longWord;
- IFS0CLR : longWord;
- IFS0SET : longWord;
- IFS0INV : longWord;
- IFS1bits : TINT_IFS1;
- IFS1 : longWord;
- IFS1CLR : longWord;
- IFS1SET : longWord;
- IFS1INV : longWord;
- IFS2bits : TINT_IFS2;
- IFS2 : longWord;
- IFS2CLR : longWord;
- IFS2SET : longWord;
- IFS2INV : longWord;
- IEC0bits : TINT_IEC0;
- IEC0 : longWord;
- IEC0CLR : longWord;
- IEC0SET : longWord;
- IEC0INV : longWord;
- IEC1bits : TINT_IEC1;
- IEC1 : longWord;
- IEC1CLR : longWord;
- IEC1SET : longWord;
- IEC1INV : longWord;
- IEC2bits : TINT_IEC2;
- IEC2 : longWord;
- IEC2CLR : longWord;
- IEC2SET : longWord;
- IEC2INV : longWord;
- IPC0bits : TINT_IPC0;
- IPC0 : longWord;
- IPC0CLR : longWord;
- IPC0SET : longWord;
- IPC0INV : longWord;
- IPC1bits : TINT_IPC1;
- IPC1 : longWord;
- IPC1CLR : longWord;
- IPC1SET : longWord;
- IPC1INV : longWord;
- IPC2bits : TINT_IPC2;
- IPC2 : longWord;
- IPC2CLR : longWord;
- IPC2SET : longWord;
- IPC2INV : longWord;
- IPC3bits : TINT_IPC3;
- IPC3 : longWord;
- IPC3CLR : longWord;
- IPC3SET : longWord;
- IPC3INV : longWord;
- IPC4bits : TINT_IPC4;
- IPC4 : longWord;
- IPC4CLR : longWord;
- IPC4SET : longWord;
- IPC4INV : longWord;
- IPC5bits : TINT_IPC5;
- IPC5 : longWord;
- IPC5CLR : longWord;
- IPC5SET : longWord;
- IPC5INV : longWord;
- IPC6bits : TINT_IPC6;
- IPC6 : longWord;
- IPC6CLR : longWord;
- IPC6SET : longWord;
- IPC6INV : longWord;
- IPC7bits : TINT_IPC7;
- IPC7 : longWord;
- IPC7CLR : longWord;
- IPC7SET : longWord;
- IPC7INV : longWord;
- IPC8bits : TINT_IPC8;
- IPC8 : longWord;
- IPC8CLR : longWord;
- IPC8SET : longWord;
- IPC8INV : longWord;
- IPC9bits : TINT_IPC9;
- IPC9 : longWord;
- IPC9CLR : longWord;
- IPC9SET : longWord;
- IPC9INV : longWord;
- IPC10bits : TINT_IPC10;
- IPC10 : longWord;
- IPC10CLR : longWord;
- IPC10SET : longWord;
- IPC10INV : longWord;
- IPC11bits : TINT_IPC11;
- IPC11 : longWord;
- IPC11CLR : longWord;
- IPC11SET : longWord;
- IPC11INV : longWord;
- IPC12bits : TINT_IPC12;
- IPC12 : longWord;
- IPC12CLR : longWord;
- IPC12SET : longWord;
- IPC12INV : longWord;
- end;
- TBMX_BMXCON = record
- private
- function getBMXARB : TBits_3; inline;
- function getBMXCHEDMA : TBits_1; inline;
- function getBMXERRDMA : TBits_1; inline;
- function getBMXERRDS : TBits_1; inline;
- function getBMXERRICD : TBits_1; inline;
- function getBMXERRIS : TBits_1; inline;
- function getBMXERRIXI : TBits_1; inline;
- function getBMXWSDRM : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setBMXARB(thebits : TBits_3); inline;
- procedure setBMXCHEDMA(thebits : TBits_1); inline;
- procedure setBMXERRDMA(thebits : TBits_1); inline;
- procedure setBMXERRDS(thebits : TBits_1); inline;
- procedure setBMXERRICD(thebits : TBits_1); inline;
- procedure setBMXERRIS(thebits : TBits_1); inline;
- procedure setBMXERRIXI(thebits : TBits_1); inline;
- procedure setBMXWSDRM(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearBMXCHEDMA; inline;
- procedure clearBMXERRDMA; inline;
- procedure clearBMXERRDS; inline;
- procedure clearBMXERRICD; inline;
- procedure clearBMXERRIS; inline;
- procedure clearBMXERRIXI; inline;
- procedure clearBMXWSDRM; inline;
- procedure setBMXCHEDMA; inline;
- procedure setBMXERRDMA; inline;
- procedure setBMXERRDS; inline;
- procedure setBMXERRICD; inline;
- procedure setBMXERRIS; inline;
- procedure setBMXERRIXI; inline;
- procedure setBMXWSDRM; inline;
- property BMXARB : TBits_3 read getBMXARB write setBMXARB;
- property BMXCHEDMA : TBits_1 read getBMXCHEDMA write setBMXCHEDMA;
- property BMXERRDMA : TBits_1 read getBMXERRDMA write setBMXERRDMA;
- property BMXERRDS : TBits_1 read getBMXERRDS write setBMXERRDS;
- property BMXERRICD : TBits_1 read getBMXERRICD write setBMXERRICD;
- property BMXERRIS : TBits_1 read getBMXERRIS write setBMXERRIS;
- property BMXERRIXI : TBits_1 read getBMXERRIXI write setBMXERRIXI;
- property BMXWSDRM : TBits_1 read getBMXWSDRM write setBMXWSDRM;
- property w : TBits_32 read getw write setw;
- end;
- type
- TBMXRegisters = record
- BMXCONbits : TBMX_BMXCON;
- BMXCON : longWord;
- BMXCONCLR : longWord;
- BMXCONSET : longWord;
- BMXCONINV : longWord;
- BMXDKPBA : longWord;
- BMXDKPBACLR : longWord;
- BMXDKPBASET : longWord;
- BMXDKPBAINV : longWord;
- BMXDUDBA : longWord;
- BMXDUDBACLR : longWord;
- BMXDUDBASET : longWord;
- BMXDUDBAINV : longWord;
- BMXDUPBA : longWord;
- BMXDUPBACLR : longWord;
- BMXDUPBASET : longWord;
- BMXDUPBAINV : longWord;
- BMXDRMSZ : longWord;
- BMXPUPBA : longWord;
- BMXPUPBACLR : longWord;
- BMXPUPBASET : longWord;
- BMXPUPBAINV : longWord;
- BMXPFMSZ : longWord;
- BMXBOOTSZ : longWord;
- end;
- TDMAC_DMACON = record
- private
- function getDMABUSY : TBits_1; inline;
- function getON : TBits_1; inline;
- function getSUSPEND : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setDMABUSY(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setSUSPEND(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearDMABUSY; inline;
- procedure clearON; inline;
- procedure clearSUSPEND; inline;
- procedure setDMABUSY; inline;
- procedure setON; inline;
- procedure setSUSPEND; inline;
- property DMABUSY : TBits_1 read getDMABUSY write setDMABUSY;
- property ON : TBits_1 read getON write setON;
- property SUSPEND : TBits_1 read getSUSPEND write setSUSPEND;
- property w : TBits_32 read getw write setw;
- end;
- TDMAC_DMASTAT = record
- private
- function getDMACH : TBits_3; inline;
- function getRDWR : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setDMACH(thebits : TBits_3); inline;
- procedure setRDWR(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearRDWR; inline;
- procedure setRDWR; inline;
- property DMACH : TBits_3 read getDMACH write setDMACH;
- property RDWR : TBits_1 read getRDWR write setRDWR;
- property w : TBits_32 read getw write setw;
- end;
- TDMAC_DCRCCON = record
- private
- function getBITO : TBits_1; inline;
- function getBYTO : TBits_2; inline;
- function getCRCAPP : TBits_1; inline;
- function getCRCCH : TBits_3; inline;
- function getCRCEN : TBits_1; inline;
- function getCRCTYP : TBits_1; inline;
- function getPLEN : TBits_5; inline;
- function getWBO : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setBITO(thebits : TBits_1); inline;
- procedure setBYTO(thebits : TBits_2); inline;
- procedure setCRCAPP(thebits : TBits_1); inline;
- procedure setCRCCH(thebits : TBits_3); inline;
- procedure setCRCEN(thebits : TBits_1); inline;
- procedure setCRCTYP(thebits : TBits_1); inline;
- procedure setPLEN(thebits : TBits_5); inline;
- procedure setWBO(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearBITO; inline;
- procedure clearCRCAPP; inline;
- procedure clearCRCEN; inline;
- procedure clearCRCTYP; inline;
- procedure clearWBO; inline;
- procedure setBITO; inline;
- procedure setCRCAPP; inline;
- procedure setCRCEN; inline;
- procedure setCRCTYP; inline;
- procedure setWBO; inline;
- property BITO : TBits_1 read getBITO write setBITO;
- property BYTO : TBits_2 read getBYTO write setBYTO;
- property CRCAPP : TBits_1 read getCRCAPP write setCRCAPP;
- property CRCCH : TBits_3 read getCRCCH write setCRCCH;
- property CRCEN : TBits_1 read getCRCEN write setCRCEN;
- property CRCTYP : TBits_1 read getCRCTYP write setCRCTYP;
- property PLEN : TBits_5 read getPLEN write setPLEN;
- property WBO : TBits_1 read getWBO write setWBO;
- property w : TBits_32 read getw write setw;
- end;
- type
- TDMACRegisters = record
- DMACONbits : TDMAC_DMACON;
- DMACON : longWord;
- DMACONCLR : longWord;
- DMACONSET : longWord;
- DMACONINV : longWord;
- DMASTATbits : TDMAC_DMASTAT;
- DMASTAT : longWord;
- DMASTATCLR : longWord;
- DMASTATSET : longWord;
- DMASTATINV : longWord;
- DMAADDR : longWord;
- DMAADDRCLR : longWord;
- DMAADDRSET : longWord;
- DMAADDRINV : longWord;
- DCRCCONbits : TDMAC_DCRCCON;
- DCRCCON : longWord;
- DCRCCONCLR : longWord;
- DCRCCONSET : longWord;
- DCRCCONINV : longWord;
- DCRCDATA : longWord;
- DCRCDATACLR : longWord;
- DCRCDATASET : longWord;
- DCRCDATAINV : longWord;
- DCRCXOR : longWord;
- DCRCXORCLR : longWord;
- DCRCXORSET : longWord;
- DCRCXORINV : longWord;
- end;
- TDMAC0_DCH0CON = record
- private
- function getCHAED : TBits_1; inline;
- function getCHAEN : TBits_1; inline;
- function getCHBUSY : TBits_1; inline;
- function getCHCHN : TBits_1; inline;
- function getCHCHNS : TBits_1; inline;
- function getCHEDET : TBits_1; inline;
- function getCHEN : TBits_1; inline;
- function getCHPRI : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setCHAED(thebits : TBits_1); inline;
- procedure setCHAEN(thebits : TBits_1); inline;
- procedure setCHBUSY(thebits : TBits_1); inline;
- procedure setCHCHN(thebits : TBits_1); inline;
- procedure setCHCHNS(thebits : TBits_1); inline;
- procedure setCHEDET(thebits : TBits_1); inline;
- procedure setCHEN(thebits : TBits_1); inline;
- procedure setCHPRI(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCHAED; inline;
- procedure clearCHAEN; inline;
- procedure clearCHBUSY; inline;
- procedure clearCHCHN; inline;
- procedure clearCHCHNS; inline;
- procedure clearCHEDET; inline;
- procedure clearCHEN; inline;
- procedure setCHAED; inline;
- procedure setCHAEN; inline;
- procedure setCHBUSY; inline;
- procedure setCHCHN; inline;
- procedure setCHCHNS; inline;
- procedure setCHEDET; inline;
- procedure setCHEN; inline;
- property CHAED : TBits_1 read getCHAED write setCHAED;
- property CHAEN : TBits_1 read getCHAEN write setCHAEN;
- property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
- property CHCHN : TBits_1 read getCHCHN write setCHCHN;
- property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
- property CHEDET : TBits_1 read getCHEDET write setCHEDET;
- property CHEN : TBits_1 read getCHEN write setCHEN;
- property CHPRI : TBits_2 read getCHPRI write setCHPRI;
- property w : TBits_32 read getw write setw;
- end;
- TDMAC0_DCH0ECON = record
- private
- function getAIRQEN : TBits_1; inline;
- function getCABORT : TBits_1; inline;
- function getCFORCE : TBits_1; inline;
- function getCHAIRQ : TBits_8; inline;
- function getCHSIRQ : TBits_8; inline;
- function getPATEN : TBits_1; inline;
- function getSIRQEN : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setAIRQEN(thebits : TBits_1); inline;
- procedure setCABORT(thebits : TBits_1); inline;
- procedure setCFORCE(thebits : TBits_1); inline;
- procedure setCHAIRQ(thebits : TBits_8); inline;
- procedure setCHSIRQ(thebits : TBits_8); inline;
- procedure setPATEN(thebits : TBits_1); inline;
- procedure setSIRQEN(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearAIRQEN; inline;
- procedure clearCABORT; inline;
- procedure clearCFORCE; inline;
- procedure clearPATEN; inline;
- procedure clearSIRQEN; inline;
- procedure setAIRQEN; inline;
- procedure setCABORT; inline;
- procedure setCFORCE; inline;
- procedure setPATEN; inline;
- procedure setSIRQEN; inline;
- property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
- property CABORT : TBits_1 read getCABORT write setCABORT;
- property CFORCE : TBits_1 read getCFORCE write setCFORCE;
- property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
- property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
- property PATEN : TBits_1 read getPATEN write setPATEN;
- property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
- property w : TBits_32 read getw write setw;
- end;
- TDMAC0_DCH0INT = record
- private
- function getCHBCIE : TBits_1; inline;
- function getCHBCIF : TBits_1; inline;
- function getCHCCIE : TBits_1; inline;
- function getCHCCIF : TBits_1; inline;
- function getCHDDIE : TBits_1; inline;
- function getCHDDIF : TBits_1; inline;
- function getCHDHIE : TBits_1; inline;
- function getCHDHIF : TBits_1; inline;
- function getCHERIE : TBits_1; inline;
- function getCHERIF : TBits_1; inline;
- function getCHSDIE : TBits_1; inline;
- function getCHSDIF : TBits_1; inline;
- function getCHSHIE : TBits_1; inline;
- function getCHSHIF : TBits_1; inline;
- function getCHTAIE : TBits_1; inline;
- function getCHTAIF : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setCHBCIE(thebits : TBits_1); inline;
- procedure setCHBCIF(thebits : TBits_1); inline;
- procedure setCHCCIE(thebits : TBits_1); inline;
- procedure setCHCCIF(thebits : TBits_1); inline;
- procedure setCHDDIE(thebits : TBits_1); inline;
- procedure setCHDDIF(thebits : TBits_1); inline;
- procedure setCHDHIE(thebits : TBits_1); inline;
- procedure setCHDHIF(thebits : TBits_1); inline;
- procedure setCHERIE(thebits : TBits_1); inline;
- procedure setCHERIF(thebits : TBits_1); inline;
- procedure setCHSDIE(thebits : TBits_1); inline;
- procedure setCHSDIF(thebits : TBits_1); inline;
- procedure setCHSHIE(thebits : TBits_1); inline;
- procedure setCHSHIF(thebits : TBits_1); inline;
- procedure setCHTAIE(thebits : TBits_1); inline;
- procedure setCHTAIF(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCHBCIE; inline;
- procedure clearCHBCIF; inline;
- procedure clearCHCCIE; inline;
- procedure clearCHCCIF; inline;
- procedure clearCHDDIE; inline;
- procedure clearCHDDIF; inline;
- procedure clearCHDHIE; inline;
- procedure clearCHDHIF; inline;
- procedure clearCHERIE; inline;
- procedure clearCHERIF; inline;
- procedure clearCHSDIE; inline;
- procedure clearCHSDIF; inline;
- procedure clearCHSHIE; inline;
- procedure clearCHSHIF; inline;
- procedure clearCHTAIE; inline;
- procedure clearCHTAIF; inline;
- procedure setCHBCIE; inline;
- procedure setCHBCIF; inline;
- procedure setCHCCIE; inline;
- procedure setCHCCIF; inline;
- procedure setCHDDIE; inline;
- procedure setCHDDIF; inline;
- procedure setCHDHIE; inline;
- procedure setCHDHIF; inline;
- procedure setCHERIE; inline;
- procedure setCHERIF; inline;
- procedure setCHSDIE; inline;
- procedure setCHSDIF; inline;
- procedure setCHSHIE; inline;
- procedure setCHSHIF; inline;
- procedure setCHTAIE; inline;
- procedure setCHTAIF; inline;
- property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
- property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
- property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
- property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
- property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
- property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
- property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
- property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
- property CHERIE : TBits_1 read getCHERIE write setCHERIE;
- property CHERIF : TBits_1 read getCHERIF write setCHERIF;
- property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
- property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
- property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
- property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
- property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
- property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
- property w : TBits_32 read getw write setw;
- end;
- type
- TDMAC0Registers = record
- DCH0CONbits : TDMAC0_DCH0CON;
- DCH0CON : longWord;
- DCH0CONCLR : longWord;
- DCH0CONSET : longWord;
- DCH0CONINV : longWord;
- DCH0ECONbits : TDMAC0_DCH0ECON;
- DCH0ECON : longWord;
- DCH0ECONCLR : longWord;
- DCH0ECONSET : longWord;
- DCH0ECONINV : longWord;
- DCH0INTbits : TDMAC0_DCH0INT;
- DCH0INT : longWord;
- DCH0INTCLR : longWord;
- DCH0INTSET : longWord;
- DCH0INTINV : longWord;
- DCH0SSA : longWord;
- DCH0SSACLR : longWord;
- DCH0SSASET : longWord;
- DCH0SSAINV : longWord;
- DCH0DSA : longWord;
- DCH0DSACLR : longWord;
- DCH0DSASET : longWord;
- DCH0DSAINV : longWord;
- DCH0SSIZ : longWord;
- DCH0SSIZCLR : longWord;
- DCH0SSIZSET : longWord;
- DCH0SSIZINV : longWord;
- DCH0DSIZ : longWord;
- DCH0DSIZCLR : longWord;
- DCH0DSIZSET : longWord;
- DCH0DSIZINV : longWord;
- DCH0SPTR : longWord;
- DCH0SPTRCLR : longWord;
- DCH0SPTRSET : longWord;
- DCH0SPTRINV : longWord;
- DCH0DPTR : longWord;
- DCH0DPTRCLR : longWord;
- DCH0DPTRSET : longWord;
- DCH0DPTRINV : longWord;
- DCH0CSIZ : longWord;
- DCH0CSIZCLR : longWord;
- DCH0CSIZSET : longWord;
- DCH0CSIZINV : longWord;
- DCH0CPTR : longWord;
- DCH0CPTRCLR : longWord;
- DCH0CPTRSET : longWord;
- DCH0CPTRINV : longWord;
- DCH0DAT : longWord;
- DCH0DATCLR : longWord;
- DCH0DATSET : longWord;
- DCH0DATINV : longWord;
- end;
- TDMAC1_DCH1CON = record
- private
- function getCHAED : TBits_1; inline;
- function getCHAEN : TBits_1; inline;
- function getCHBUSY : TBits_1; inline;
- function getCHCHN : TBits_1; inline;
- function getCHCHNS : TBits_1; inline;
- function getCHEDET : TBits_1; inline;
- function getCHEN : TBits_1; inline;
- function getCHPRI : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setCHAED(thebits : TBits_1); inline;
- procedure setCHAEN(thebits : TBits_1); inline;
- procedure setCHBUSY(thebits : TBits_1); inline;
- procedure setCHCHN(thebits : TBits_1); inline;
- procedure setCHCHNS(thebits : TBits_1); inline;
- procedure setCHEDET(thebits : TBits_1); inline;
- procedure setCHEN(thebits : TBits_1); inline;
- procedure setCHPRI(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCHAED; inline;
- procedure clearCHAEN; inline;
- procedure clearCHBUSY; inline;
- procedure clearCHCHN; inline;
- procedure clearCHCHNS; inline;
- procedure clearCHEDET; inline;
- procedure clearCHEN; inline;
- procedure setCHAED; inline;
- procedure setCHAEN; inline;
- procedure setCHBUSY; inline;
- procedure setCHCHN; inline;
- procedure setCHCHNS; inline;
- procedure setCHEDET; inline;
- procedure setCHEN; inline;
- property CHAED : TBits_1 read getCHAED write setCHAED;
- property CHAEN : TBits_1 read getCHAEN write setCHAEN;
- property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
- property CHCHN : TBits_1 read getCHCHN write setCHCHN;
- property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
- property CHEDET : TBits_1 read getCHEDET write setCHEDET;
- property CHEN : TBits_1 read getCHEN write setCHEN;
- property CHPRI : TBits_2 read getCHPRI write setCHPRI;
- property w : TBits_32 read getw write setw;
- end;
- TDMAC1_DCH1ECON = record
- private
- function getAIRQEN : TBits_1; inline;
- function getCABORT : TBits_1; inline;
- function getCFORCE : TBits_1; inline;
- function getCHAIRQ : TBits_8; inline;
- function getCHSIRQ : TBits_8; inline;
- function getPATEN : TBits_1; inline;
- function getSIRQEN : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setAIRQEN(thebits : TBits_1); inline;
- procedure setCABORT(thebits : TBits_1); inline;
- procedure setCFORCE(thebits : TBits_1); inline;
- procedure setCHAIRQ(thebits : TBits_8); inline;
- procedure setCHSIRQ(thebits : TBits_8); inline;
- procedure setPATEN(thebits : TBits_1); inline;
- procedure setSIRQEN(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearAIRQEN; inline;
- procedure clearCABORT; inline;
- procedure clearCFORCE; inline;
- procedure clearPATEN; inline;
- procedure clearSIRQEN; inline;
- procedure setAIRQEN; inline;
- procedure setCABORT; inline;
- procedure setCFORCE; inline;
- procedure setPATEN; inline;
- procedure setSIRQEN; inline;
- property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
- property CABORT : TBits_1 read getCABORT write setCABORT;
- property CFORCE : TBits_1 read getCFORCE write setCFORCE;
- property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
- property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
- property PATEN : TBits_1 read getPATEN write setPATEN;
- property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
- property w : TBits_32 read getw write setw;
- end;
- TDMAC1_DCH1INT = record
- private
- function getCHBCIE : TBits_1; inline;
- function getCHBCIF : TBits_1; inline;
- function getCHCCIE : TBits_1; inline;
- function getCHCCIF : TBits_1; inline;
- function getCHDDIE : TBits_1; inline;
- function getCHDDIF : TBits_1; inline;
- function getCHDHIE : TBits_1; inline;
- function getCHDHIF : TBits_1; inline;
- function getCHERIE : TBits_1; inline;
- function getCHERIF : TBits_1; inline;
- function getCHSDIE : TBits_1; inline;
- function getCHSDIF : TBits_1; inline;
- function getCHSHIE : TBits_1; inline;
- function getCHSHIF : TBits_1; inline;
- function getCHTAIE : TBits_1; inline;
- function getCHTAIF : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setCHBCIE(thebits : TBits_1); inline;
- procedure setCHBCIF(thebits : TBits_1); inline;
- procedure setCHCCIE(thebits : TBits_1); inline;
- procedure setCHCCIF(thebits : TBits_1); inline;
- procedure setCHDDIE(thebits : TBits_1); inline;
- procedure setCHDDIF(thebits : TBits_1); inline;
- procedure setCHDHIE(thebits : TBits_1); inline;
- procedure setCHDHIF(thebits : TBits_1); inline;
- procedure setCHERIE(thebits : TBits_1); inline;
- procedure setCHERIF(thebits : TBits_1); inline;
- procedure setCHSDIE(thebits : TBits_1); inline;
- procedure setCHSDIF(thebits : TBits_1); inline;
- procedure setCHSHIE(thebits : TBits_1); inline;
- procedure setCHSHIF(thebits : TBits_1); inline;
- procedure setCHTAIE(thebits : TBits_1); inline;
- procedure setCHTAIF(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCHBCIE; inline;
- procedure clearCHBCIF; inline;
- procedure clearCHCCIE; inline;
- procedure clearCHCCIF; inline;
- procedure clearCHDDIE; inline;
- procedure clearCHDDIF; inline;
- procedure clearCHDHIE; inline;
- procedure clearCHDHIF; inline;
- procedure clearCHERIE; inline;
- procedure clearCHERIF; inline;
- procedure clearCHSDIE; inline;
- procedure clearCHSDIF; inline;
- procedure clearCHSHIE; inline;
- procedure clearCHSHIF; inline;
- procedure clearCHTAIE; inline;
- procedure clearCHTAIF; inline;
- procedure setCHBCIE; inline;
- procedure setCHBCIF; inline;
- procedure setCHCCIE; inline;
- procedure setCHCCIF; inline;
- procedure setCHDDIE; inline;
- procedure setCHDDIF; inline;
- procedure setCHDHIE; inline;
- procedure setCHDHIF; inline;
- procedure setCHERIE; inline;
- procedure setCHERIF; inline;
- procedure setCHSDIE; inline;
- procedure setCHSDIF; inline;
- procedure setCHSHIE; inline;
- procedure setCHSHIF; inline;
- procedure setCHTAIE; inline;
- procedure setCHTAIF; inline;
- property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
- property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
- property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
- property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
- property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
- property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
- property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
- property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
- property CHERIE : TBits_1 read getCHERIE write setCHERIE;
- property CHERIF : TBits_1 read getCHERIF write setCHERIF;
- property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
- property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
- property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
- property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
- property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
- property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
- property w : TBits_32 read getw write setw;
- end;
- type
- TDMAC1Registers = record
- DCH1CONbits : TDMAC1_DCH1CON;
- DCH1CON : longWord;
- DCH1CONCLR : longWord;
- DCH1CONSET : longWord;
- DCH1CONINV : longWord;
- DCH1ECONbits : TDMAC1_DCH1ECON;
- DCH1ECON : longWord;
- DCH1ECONCLR : longWord;
- DCH1ECONSET : longWord;
- DCH1ECONINV : longWord;
- DCH1INTbits : TDMAC1_DCH1INT;
- DCH1INT : longWord;
- DCH1INTCLR : longWord;
- DCH1INTSET : longWord;
- DCH1INTINV : longWord;
- DCH1SSA : longWord;
- DCH1SSACLR : longWord;
- DCH1SSASET : longWord;
- DCH1SSAINV : longWord;
- DCH1DSA : longWord;
- DCH1DSACLR : longWord;
- DCH1DSASET : longWord;
- DCH1DSAINV : longWord;
- DCH1SSIZ : longWord;
- DCH1SSIZCLR : longWord;
- DCH1SSIZSET : longWord;
- DCH1SSIZINV : longWord;
- DCH1DSIZ : longWord;
- DCH1DSIZCLR : longWord;
- DCH1DSIZSET : longWord;
- DCH1DSIZINV : longWord;
- DCH1SPTR : longWord;
- DCH1SPTRCLR : longWord;
- DCH1SPTRSET : longWord;
- DCH1SPTRINV : longWord;
- DCH1DPTR : longWord;
- DCH1DPTRCLR : longWord;
- DCH1DPTRSET : longWord;
- DCH1DPTRINV : longWord;
- DCH1CSIZ : longWord;
- DCH1CSIZCLR : longWord;
- DCH1CSIZSET : longWord;
- DCH1CSIZINV : longWord;
- DCH1CPTR : longWord;
- DCH1CPTRCLR : longWord;
- DCH1CPTRSET : longWord;
- DCH1CPTRINV : longWord;
- DCH1DAT : longWord;
- DCH1DATCLR : longWord;
- DCH1DATSET : longWord;
- DCH1DATINV : longWord;
- end;
- TDMAC2_DCH2CON = record
- private
- function getCHAED : TBits_1; inline;
- function getCHAEN : TBits_1; inline;
- function getCHBUSY : TBits_1; inline;
- function getCHCHN : TBits_1; inline;
- function getCHCHNS : TBits_1; inline;
- function getCHEDET : TBits_1; inline;
- function getCHEN : TBits_1; inline;
- function getCHPRI : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setCHAED(thebits : TBits_1); inline;
- procedure setCHAEN(thebits : TBits_1); inline;
- procedure setCHBUSY(thebits : TBits_1); inline;
- procedure setCHCHN(thebits : TBits_1); inline;
- procedure setCHCHNS(thebits : TBits_1); inline;
- procedure setCHEDET(thebits : TBits_1); inline;
- procedure setCHEN(thebits : TBits_1); inline;
- procedure setCHPRI(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCHAED; inline;
- procedure clearCHAEN; inline;
- procedure clearCHBUSY; inline;
- procedure clearCHCHN; inline;
- procedure clearCHCHNS; inline;
- procedure clearCHEDET; inline;
- procedure clearCHEN; inline;
- procedure setCHAED; inline;
- procedure setCHAEN; inline;
- procedure setCHBUSY; inline;
- procedure setCHCHN; inline;
- procedure setCHCHNS; inline;
- procedure setCHEDET; inline;
- procedure setCHEN; inline;
- property CHAED : TBits_1 read getCHAED write setCHAED;
- property CHAEN : TBits_1 read getCHAEN write setCHAEN;
- property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
- property CHCHN : TBits_1 read getCHCHN write setCHCHN;
- property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
- property CHEDET : TBits_1 read getCHEDET write setCHEDET;
- property CHEN : TBits_1 read getCHEN write setCHEN;
- property CHPRI : TBits_2 read getCHPRI write setCHPRI;
- property w : TBits_32 read getw write setw;
- end;
- TDMAC2_DCH2ECON = record
- private
- function getAIRQEN : TBits_1; inline;
- function getCABORT : TBits_1; inline;
- function getCFORCE : TBits_1; inline;
- function getCHAIRQ : TBits_8; inline;
- function getCHSIRQ : TBits_8; inline;
- function getPATEN : TBits_1; inline;
- function getSIRQEN : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setAIRQEN(thebits : TBits_1); inline;
- procedure setCABORT(thebits : TBits_1); inline;
- procedure setCFORCE(thebits : TBits_1); inline;
- procedure setCHAIRQ(thebits : TBits_8); inline;
- procedure setCHSIRQ(thebits : TBits_8); inline;
- procedure setPATEN(thebits : TBits_1); inline;
- procedure setSIRQEN(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearAIRQEN; inline;
- procedure clearCABORT; inline;
- procedure clearCFORCE; inline;
- procedure clearPATEN; inline;
- procedure clearSIRQEN; inline;
- procedure setAIRQEN; inline;
- procedure setCABORT; inline;
- procedure setCFORCE; inline;
- procedure setPATEN; inline;
- procedure setSIRQEN; inline;
- property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
- property CABORT : TBits_1 read getCABORT write setCABORT;
- property CFORCE : TBits_1 read getCFORCE write setCFORCE;
- property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
- property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
- property PATEN : TBits_1 read getPATEN write setPATEN;
- property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
- property w : TBits_32 read getw write setw;
- end;
- TDMAC2_DCH2INT = record
- private
- function getCHBCIE : TBits_1; inline;
- function getCHBCIF : TBits_1; inline;
- function getCHCCIE : TBits_1; inline;
- function getCHCCIF : TBits_1; inline;
- function getCHDDIE : TBits_1; inline;
- function getCHDDIF : TBits_1; inline;
- function getCHDHIE : TBits_1; inline;
- function getCHDHIF : TBits_1; inline;
- function getCHERIE : TBits_1; inline;
- function getCHERIF : TBits_1; inline;
- function getCHSDIE : TBits_1; inline;
- function getCHSDIF : TBits_1; inline;
- function getCHSHIE : TBits_1; inline;
- function getCHSHIF : TBits_1; inline;
- function getCHTAIE : TBits_1; inline;
- function getCHTAIF : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setCHBCIE(thebits : TBits_1); inline;
- procedure setCHBCIF(thebits : TBits_1); inline;
- procedure setCHCCIE(thebits : TBits_1); inline;
- procedure setCHCCIF(thebits : TBits_1); inline;
- procedure setCHDDIE(thebits : TBits_1); inline;
- procedure setCHDDIF(thebits : TBits_1); inline;
- procedure setCHDHIE(thebits : TBits_1); inline;
- procedure setCHDHIF(thebits : TBits_1); inline;
- procedure setCHERIE(thebits : TBits_1); inline;
- procedure setCHERIF(thebits : TBits_1); inline;
- procedure setCHSDIE(thebits : TBits_1); inline;
- procedure setCHSDIF(thebits : TBits_1); inline;
- procedure setCHSHIE(thebits : TBits_1); inline;
- procedure setCHSHIF(thebits : TBits_1); inline;
- procedure setCHTAIE(thebits : TBits_1); inline;
- procedure setCHTAIF(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCHBCIE; inline;
- procedure clearCHBCIF; inline;
- procedure clearCHCCIE; inline;
- procedure clearCHCCIF; inline;
- procedure clearCHDDIE; inline;
- procedure clearCHDDIF; inline;
- procedure clearCHDHIE; inline;
- procedure clearCHDHIF; inline;
- procedure clearCHERIE; inline;
- procedure clearCHERIF; inline;
- procedure clearCHSDIE; inline;
- procedure clearCHSDIF; inline;
- procedure clearCHSHIE; inline;
- procedure clearCHSHIF; inline;
- procedure clearCHTAIE; inline;
- procedure clearCHTAIF; inline;
- procedure setCHBCIE; inline;
- procedure setCHBCIF; inline;
- procedure setCHCCIE; inline;
- procedure setCHCCIF; inline;
- procedure setCHDDIE; inline;
- procedure setCHDDIF; inline;
- procedure setCHDHIE; inline;
- procedure setCHDHIF; inline;
- procedure setCHERIE; inline;
- procedure setCHERIF; inline;
- procedure setCHSDIE; inline;
- procedure setCHSDIF; inline;
- procedure setCHSHIE; inline;
- procedure setCHSHIF; inline;
- procedure setCHTAIE; inline;
- procedure setCHTAIF; inline;
- property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
- property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
- property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
- property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
- property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
- property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
- property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
- property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
- property CHERIE : TBits_1 read getCHERIE write setCHERIE;
- property CHERIF : TBits_1 read getCHERIF write setCHERIF;
- property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
- property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
- property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
- property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
- property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
- property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
- property w : TBits_32 read getw write setw;
- end;
- type
- TDMAC2Registers = record
- DCH2CONbits : TDMAC2_DCH2CON;
- DCH2CON : longWord;
- DCH2CONCLR : longWord;
- DCH2CONSET : longWord;
- DCH2CONINV : longWord;
- DCH2ECONbits : TDMAC2_DCH2ECON;
- DCH2ECON : longWord;
- DCH2ECONCLR : longWord;
- DCH2ECONSET : longWord;
- DCH2ECONINV : longWord;
- DCH2INTbits : TDMAC2_DCH2INT;
- DCH2INT : longWord;
- DCH2INTCLR : longWord;
- DCH2INTSET : longWord;
- DCH2INTINV : longWord;
- DCH2SSA : longWord;
- DCH2SSACLR : longWord;
- DCH2SSASET : longWord;
- DCH2SSAINV : longWord;
- DCH2DSA : longWord;
- DCH2DSACLR : longWord;
- DCH2DSASET : longWord;
- DCH2DSAINV : longWord;
- DCH2SSIZ : longWord;
- DCH2SSIZCLR : longWord;
- DCH2SSIZSET : longWord;
- DCH2SSIZINV : longWord;
- DCH2DSIZ : longWord;
- DCH2DSIZCLR : longWord;
- DCH2DSIZSET : longWord;
- DCH2DSIZINV : longWord;
- DCH2SPTR : longWord;
- DCH2SPTRCLR : longWord;
- DCH2SPTRSET : longWord;
- DCH2SPTRINV : longWord;
- DCH2DPTR : longWord;
- DCH2DPTRCLR : longWord;
- DCH2DPTRSET : longWord;
- DCH2DPTRINV : longWord;
- DCH2CSIZ : longWord;
- DCH2CSIZCLR : longWord;
- DCH2CSIZSET : longWord;
- DCH2CSIZINV : longWord;
- DCH2CPTR : longWord;
- DCH2CPTRCLR : longWord;
- DCH2CPTRSET : longWord;
- DCH2CPTRINV : longWord;
- DCH2DAT : longWord;
- DCH2DATCLR : longWord;
- DCH2DATSET : longWord;
- DCH2DATINV : longWord;
- end;
- TDMAC3_DCH3CON = record
- private
- function getCHAED : TBits_1; inline;
- function getCHAEN : TBits_1; inline;
- function getCHBUSY : TBits_1; inline;
- function getCHCHN : TBits_1; inline;
- function getCHCHNS : TBits_1; inline;
- function getCHEDET : TBits_1; inline;
- function getCHEN : TBits_1; inline;
- function getCHPRI : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setCHAED(thebits : TBits_1); inline;
- procedure setCHAEN(thebits : TBits_1); inline;
- procedure setCHBUSY(thebits : TBits_1); inline;
- procedure setCHCHN(thebits : TBits_1); inline;
- procedure setCHCHNS(thebits : TBits_1); inline;
- procedure setCHEDET(thebits : TBits_1); inline;
- procedure setCHEN(thebits : TBits_1); inline;
- procedure setCHPRI(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCHAED; inline;
- procedure clearCHAEN; inline;
- procedure clearCHBUSY; inline;
- procedure clearCHCHN; inline;
- procedure clearCHCHNS; inline;
- procedure clearCHEDET; inline;
- procedure clearCHEN; inline;
- procedure setCHAED; inline;
- procedure setCHAEN; inline;
- procedure setCHBUSY; inline;
- procedure setCHCHN; inline;
- procedure setCHCHNS; inline;
- procedure setCHEDET; inline;
- procedure setCHEN; inline;
- property CHAED : TBits_1 read getCHAED write setCHAED;
- property CHAEN : TBits_1 read getCHAEN write setCHAEN;
- property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
- property CHCHN : TBits_1 read getCHCHN write setCHCHN;
- property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
- property CHEDET : TBits_1 read getCHEDET write setCHEDET;
- property CHEN : TBits_1 read getCHEN write setCHEN;
- property CHPRI : TBits_2 read getCHPRI write setCHPRI;
- property w : TBits_32 read getw write setw;
- end;
- TDMAC3_DCH3ECON = record
- private
- function getAIRQEN : TBits_1; inline;
- function getCABORT : TBits_1; inline;
- function getCFORCE : TBits_1; inline;
- function getCHAIRQ : TBits_8; inline;
- function getCHSIRQ : TBits_8; inline;
- function getPATEN : TBits_1; inline;
- function getSIRQEN : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setAIRQEN(thebits : TBits_1); inline;
- procedure setCABORT(thebits : TBits_1); inline;
- procedure setCFORCE(thebits : TBits_1); inline;
- procedure setCHAIRQ(thebits : TBits_8); inline;
- procedure setCHSIRQ(thebits : TBits_8); inline;
- procedure setPATEN(thebits : TBits_1); inline;
- procedure setSIRQEN(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearAIRQEN; inline;
- procedure clearCABORT; inline;
- procedure clearCFORCE; inline;
- procedure clearPATEN; inline;
- procedure clearSIRQEN; inline;
- procedure setAIRQEN; inline;
- procedure setCABORT; inline;
- procedure setCFORCE; inline;
- procedure setPATEN; inline;
- procedure setSIRQEN; inline;
- property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
- property CABORT : TBits_1 read getCABORT write setCABORT;
- property CFORCE : TBits_1 read getCFORCE write setCFORCE;
- property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
- property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
- property PATEN : TBits_1 read getPATEN write setPATEN;
- property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
- property w : TBits_32 read getw write setw;
- end;
- TDMAC3_DCH3INT = record
- private
- function getCHBCIE : TBits_1; inline;
- function getCHBCIF : TBits_1; inline;
- function getCHCCIE : TBits_1; inline;
- function getCHCCIF : TBits_1; inline;
- function getCHDDIE : TBits_1; inline;
- function getCHDDIF : TBits_1; inline;
- function getCHDHIE : TBits_1; inline;
- function getCHDHIF : TBits_1; inline;
- function getCHERIE : TBits_1; inline;
- function getCHERIF : TBits_1; inline;
- function getCHSDIE : TBits_1; inline;
- function getCHSDIF : TBits_1; inline;
- function getCHSHIE : TBits_1; inline;
- function getCHSHIF : TBits_1; inline;
- function getCHTAIE : TBits_1; inline;
- function getCHTAIF : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setCHBCIE(thebits : TBits_1); inline;
- procedure setCHBCIF(thebits : TBits_1); inline;
- procedure setCHCCIE(thebits : TBits_1); inline;
- procedure setCHCCIF(thebits : TBits_1); inline;
- procedure setCHDDIE(thebits : TBits_1); inline;
- procedure setCHDDIF(thebits : TBits_1); inline;
- procedure setCHDHIE(thebits : TBits_1); inline;
- procedure setCHDHIF(thebits : TBits_1); inline;
- procedure setCHERIE(thebits : TBits_1); inline;
- procedure setCHERIF(thebits : TBits_1); inline;
- procedure setCHSDIE(thebits : TBits_1); inline;
- procedure setCHSDIF(thebits : TBits_1); inline;
- procedure setCHSHIE(thebits : TBits_1); inline;
- procedure setCHSHIF(thebits : TBits_1); inline;
- procedure setCHTAIE(thebits : TBits_1); inline;
- procedure setCHTAIF(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCHBCIE; inline;
- procedure clearCHBCIF; inline;
- procedure clearCHCCIE; inline;
- procedure clearCHCCIF; inline;
- procedure clearCHDDIE; inline;
- procedure clearCHDDIF; inline;
- procedure clearCHDHIE; inline;
- procedure clearCHDHIF; inline;
- procedure clearCHERIE; inline;
- procedure clearCHERIF; inline;
- procedure clearCHSDIE; inline;
- procedure clearCHSDIF; inline;
- procedure clearCHSHIE; inline;
- procedure clearCHSHIF; inline;
- procedure clearCHTAIE; inline;
- procedure clearCHTAIF; inline;
- procedure setCHBCIE; inline;
- procedure setCHBCIF; inline;
- procedure setCHCCIE; inline;
- procedure setCHCCIF; inline;
- procedure setCHDDIE; inline;
- procedure setCHDDIF; inline;
- procedure setCHDHIE; inline;
- procedure setCHDHIF; inline;
- procedure setCHERIE; inline;
- procedure setCHERIF; inline;
- procedure setCHSDIE; inline;
- procedure setCHSDIF; inline;
- procedure setCHSHIE; inline;
- procedure setCHSHIF; inline;
- procedure setCHTAIE; inline;
- procedure setCHTAIF; inline;
- property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
- property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
- property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
- property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
- property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
- property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
- property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
- property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
- property CHERIE : TBits_1 read getCHERIE write setCHERIE;
- property CHERIF : TBits_1 read getCHERIF write setCHERIF;
- property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
- property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
- property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
- property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
- property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
- property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
- property w : TBits_32 read getw write setw;
- end;
- type
- TDMAC3Registers = record
- DCH3CONbits : TDMAC3_DCH3CON;
- DCH3CON : longWord;
- DCH3CONCLR : longWord;
- DCH3CONSET : longWord;
- DCH3CONINV : longWord;
- DCH3ECONbits : TDMAC3_DCH3ECON;
- DCH3ECON : longWord;
- DCH3ECONCLR : longWord;
- DCH3ECONSET : longWord;
- DCH3ECONINV : longWord;
- DCH3INTbits : TDMAC3_DCH3INT;
- DCH3INT : longWord;
- DCH3INTCLR : longWord;
- DCH3INTSET : longWord;
- DCH3INTINV : longWord;
- DCH3SSA : longWord;
- DCH3SSACLR : longWord;
- DCH3SSASET : longWord;
- DCH3SSAINV : longWord;
- DCH3DSA : longWord;
- DCH3DSACLR : longWord;
- DCH3DSASET : longWord;
- DCH3DSAINV : longWord;
- DCH3SSIZ : longWord;
- DCH3SSIZCLR : longWord;
- DCH3SSIZSET : longWord;
- DCH3SSIZINV : longWord;
- DCH3DSIZ : longWord;
- DCH3DSIZCLR : longWord;
- DCH3DSIZSET : longWord;
- DCH3DSIZINV : longWord;
- DCH3SPTR : longWord;
- DCH3SPTRCLR : longWord;
- DCH3SPTRSET : longWord;
- DCH3SPTRINV : longWord;
- DCH3DPTR : longWord;
- DCH3DPTRCLR : longWord;
- DCH3DPTRSET : longWord;
- DCH3DPTRINV : longWord;
- DCH3CSIZ : longWord;
- DCH3CSIZCLR : longWord;
- DCH3CSIZSET : longWord;
- DCH3CSIZINV : longWord;
- DCH3CPTR : longWord;
- DCH3CPTRCLR : longWord;
- DCH3CPTRSET : longWord;
- DCH3CPTRINV : longWord;
- DCH3DAT : longWord;
- DCH3DATCLR : longWord;
- DCH3DATSET : longWord;
- DCH3DATINV : longWord;
- end;
- TDMAC4_DCH4CON = record
- private
- function getCHAED : TBits_1; inline;
- function getCHAEN : TBits_1; inline;
- function getCHBUSY : TBits_1; inline;
- function getCHCHN : TBits_1; inline;
- function getCHCHNS : TBits_1; inline;
- function getCHEDET : TBits_1; inline;
- function getCHEN : TBits_1; inline;
- function getCHPRI : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setCHAED(thebits : TBits_1); inline;
- procedure setCHAEN(thebits : TBits_1); inline;
- procedure setCHBUSY(thebits : TBits_1); inline;
- procedure setCHCHN(thebits : TBits_1); inline;
- procedure setCHCHNS(thebits : TBits_1); inline;
- procedure setCHEDET(thebits : TBits_1); inline;
- procedure setCHEN(thebits : TBits_1); inline;
- procedure setCHPRI(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCHAED; inline;
- procedure clearCHAEN; inline;
- procedure clearCHBUSY; inline;
- procedure clearCHCHN; inline;
- procedure clearCHCHNS; inline;
- procedure clearCHEDET; inline;
- procedure clearCHEN; inline;
- procedure setCHAED; inline;
- procedure setCHAEN; inline;
- procedure setCHBUSY; inline;
- procedure setCHCHN; inline;
- procedure setCHCHNS; inline;
- procedure setCHEDET; inline;
- procedure setCHEN; inline;
- property CHAED : TBits_1 read getCHAED write setCHAED;
- property CHAEN : TBits_1 read getCHAEN write setCHAEN;
- property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
- property CHCHN : TBits_1 read getCHCHN write setCHCHN;
- property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
- property CHEDET : TBits_1 read getCHEDET write setCHEDET;
- property CHEN : TBits_1 read getCHEN write setCHEN;
- property CHPRI : TBits_2 read getCHPRI write setCHPRI;
- property w : TBits_32 read getw write setw;
- end;
- TDMAC4_DCH4ECON = record
- private
- function getAIRQEN : TBits_1; inline;
- function getCABORT : TBits_1; inline;
- function getCFORCE : TBits_1; inline;
- function getCHAIRQ : TBits_8; inline;
- function getCHSIRQ : TBits_8; inline;
- function getPATEN : TBits_1; inline;
- function getSIRQEN : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setAIRQEN(thebits : TBits_1); inline;
- procedure setCABORT(thebits : TBits_1); inline;
- procedure setCFORCE(thebits : TBits_1); inline;
- procedure setCHAIRQ(thebits : TBits_8); inline;
- procedure setCHSIRQ(thebits : TBits_8); inline;
- procedure setPATEN(thebits : TBits_1); inline;
- procedure setSIRQEN(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearAIRQEN; inline;
- procedure clearCABORT; inline;
- procedure clearCFORCE; inline;
- procedure clearPATEN; inline;
- procedure clearSIRQEN; inline;
- procedure setAIRQEN; inline;
- procedure setCABORT; inline;
- procedure setCFORCE; inline;
- procedure setPATEN; inline;
- procedure setSIRQEN; inline;
- property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
- property CABORT : TBits_1 read getCABORT write setCABORT;
- property CFORCE : TBits_1 read getCFORCE write setCFORCE;
- property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
- property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
- property PATEN : TBits_1 read getPATEN write setPATEN;
- property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
- property w : TBits_32 read getw write setw;
- end;
- TDMAC4_DCH4INT = record
- private
- function getCHBCIE : TBits_1; inline;
- function getCHBCIF : TBits_1; inline;
- function getCHCCIE : TBits_1; inline;
- function getCHCCIF : TBits_1; inline;
- function getCHDDIE : TBits_1; inline;
- function getCHDDIF : TBits_1; inline;
- function getCHDHIE : TBits_1; inline;
- function getCHDHIF : TBits_1; inline;
- function getCHERIE : TBits_1; inline;
- function getCHERIF : TBits_1; inline;
- function getCHSDIE : TBits_1; inline;
- function getCHSDIF : TBits_1; inline;
- function getCHSHIE : TBits_1; inline;
- function getCHSHIF : TBits_1; inline;
- function getCHTAIE : TBits_1; inline;
- function getCHTAIF : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setCHBCIE(thebits : TBits_1); inline;
- procedure setCHBCIF(thebits : TBits_1); inline;
- procedure setCHCCIE(thebits : TBits_1); inline;
- procedure setCHCCIF(thebits : TBits_1); inline;
- procedure setCHDDIE(thebits : TBits_1); inline;
- procedure setCHDDIF(thebits : TBits_1); inline;
- procedure setCHDHIE(thebits : TBits_1); inline;
- procedure setCHDHIF(thebits : TBits_1); inline;
- procedure setCHERIE(thebits : TBits_1); inline;
- procedure setCHERIF(thebits : TBits_1); inline;
- procedure setCHSDIE(thebits : TBits_1); inline;
- procedure setCHSDIF(thebits : TBits_1); inline;
- procedure setCHSHIE(thebits : TBits_1); inline;
- procedure setCHSHIF(thebits : TBits_1); inline;
- procedure setCHTAIE(thebits : TBits_1); inline;
- procedure setCHTAIF(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCHBCIE; inline;
- procedure clearCHBCIF; inline;
- procedure clearCHCCIE; inline;
- procedure clearCHCCIF; inline;
- procedure clearCHDDIE; inline;
- procedure clearCHDDIF; inline;
- procedure clearCHDHIE; inline;
- procedure clearCHDHIF; inline;
- procedure clearCHERIE; inline;
- procedure clearCHERIF; inline;
- procedure clearCHSDIE; inline;
- procedure clearCHSDIF; inline;
- procedure clearCHSHIE; inline;
- procedure clearCHSHIF; inline;
- procedure clearCHTAIE; inline;
- procedure clearCHTAIF; inline;
- procedure setCHBCIE; inline;
- procedure setCHBCIF; inline;
- procedure setCHCCIE; inline;
- procedure setCHCCIF; inline;
- procedure setCHDDIE; inline;
- procedure setCHDDIF; inline;
- procedure setCHDHIE; inline;
- procedure setCHDHIF; inline;
- procedure setCHERIE; inline;
- procedure setCHERIF; inline;
- procedure setCHSDIE; inline;
- procedure setCHSDIF; inline;
- procedure setCHSHIE; inline;
- procedure setCHSHIF; inline;
- procedure setCHTAIE; inline;
- procedure setCHTAIF; inline;
- property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
- property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
- property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
- property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
- property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
- property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
- property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
- property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
- property CHERIE : TBits_1 read getCHERIE write setCHERIE;
- property CHERIF : TBits_1 read getCHERIF write setCHERIF;
- property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
- property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
- property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
- property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
- property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
- property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
- property w : TBits_32 read getw write setw;
- end;
- type
- TDMAC4Registers = record
- DCH4CONbits : TDMAC4_DCH4CON;
- DCH4CON : longWord;
- DCH4CONCLR : longWord;
- DCH4CONSET : longWord;
- DCH4CONINV : longWord;
- DCH4ECONbits : TDMAC4_DCH4ECON;
- DCH4ECON : longWord;
- DCH4ECONCLR : longWord;
- DCH4ECONSET : longWord;
- DCH4ECONINV : longWord;
- DCH4INTbits : TDMAC4_DCH4INT;
- DCH4INT : longWord;
- DCH4INTCLR : longWord;
- DCH4INTSET : longWord;
- DCH4INTINV : longWord;
- DCH4SSA : longWord;
- DCH4SSACLR : longWord;
- DCH4SSASET : longWord;
- DCH4SSAINV : longWord;
- DCH4DSA : longWord;
- DCH4DSACLR : longWord;
- DCH4DSASET : longWord;
- DCH4DSAINV : longWord;
- DCH4SSIZ : longWord;
- DCH4SSIZCLR : longWord;
- DCH4SSIZSET : longWord;
- DCH4SSIZINV : longWord;
- DCH4DSIZ : longWord;
- DCH4DSIZCLR : longWord;
- DCH4DSIZSET : longWord;
- DCH4DSIZINV : longWord;
- DCH4SPTR : longWord;
- DCH4SPTRCLR : longWord;
- DCH4SPTRSET : longWord;
- DCH4SPTRINV : longWord;
- DCH4DPTR : longWord;
- DCH4DPTRCLR : longWord;
- DCH4DPTRSET : longWord;
- DCH4DPTRINV : longWord;
- DCH4CSIZ : longWord;
- DCH4CSIZCLR : longWord;
- DCH4CSIZSET : longWord;
- DCH4CSIZINV : longWord;
- DCH4CPTR : longWord;
- DCH4CPTRCLR : longWord;
- DCH4CPTRSET : longWord;
- DCH4CPTRINV : longWord;
- DCH4DAT : longWord;
- DCH4DATCLR : longWord;
- DCH4DATSET : longWord;
- DCH4DATINV : longWord;
- end;
- TDMAC5_DCH5CON = record
- private
- function getCHAED : TBits_1; inline;
- function getCHAEN : TBits_1; inline;
- function getCHBUSY : TBits_1; inline;
- function getCHCHN : TBits_1; inline;
- function getCHCHNS : TBits_1; inline;
- function getCHEDET : TBits_1; inline;
- function getCHEN : TBits_1; inline;
- function getCHPRI : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setCHAED(thebits : TBits_1); inline;
- procedure setCHAEN(thebits : TBits_1); inline;
- procedure setCHBUSY(thebits : TBits_1); inline;
- procedure setCHCHN(thebits : TBits_1); inline;
- procedure setCHCHNS(thebits : TBits_1); inline;
- procedure setCHEDET(thebits : TBits_1); inline;
- procedure setCHEN(thebits : TBits_1); inline;
- procedure setCHPRI(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCHAED; inline;
- procedure clearCHAEN; inline;
- procedure clearCHBUSY; inline;
- procedure clearCHCHN; inline;
- procedure clearCHCHNS; inline;
- procedure clearCHEDET; inline;
- procedure clearCHEN; inline;
- procedure setCHAED; inline;
- procedure setCHAEN; inline;
- procedure setCHBUSY; inline;
- procedure setCHCHN; inline;
- procedure setCHCHNS; inline;
- procedure setCHEDET; inline;
- procedure setCHEN; inline;
- property CHAED : TBits_1 read getCHAED write setCHAED;
- property CHAEN : TBits_1 read getCHAEN write setCHAEN;
- property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
- property CHCHN : TBits_1 read getCHCHN write setCHCHN;
- property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
- property CHEDET : TBits_1 read getCHEDET write setCHEDET;
- property CHEN : TBits_1 read getCHEN write setCHEN;
- property CHPRI : TBits_2 read getCHPRI write setCHPRI;
- property w : TBits_32 read getw write setw;
- end;
- TDMAC5_DCH5ECON = record
- private
- function getAIRQEN : TBits_1; inline;
- function getCABORT : TBits_1; inline;
- function getCFORCE : TBits_1; inline;
- function getCHAIRQ : TBits_8; inline;
- function getCHSIRQ : TBits_8; inline;
- function getPATEN : TBits_1; inline;
- function getSIRQEN : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setAIRQEN(thebits : TBits_1); inline;
- procedure setCABORT(thebits : TBits_1); inline;
- procedure setCFORCE(thebits : TBits_1); inline;
- procedure setCHAIRQ(thebits : TBits_8); inline;
- procedure setCHSIRQ(thebits : TBits_8); inline;
- procedure setPATEN(thebits : TBits_1); inline;
- procedure setSIRQEN(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearAIRQEN; inline;
- procedure clearCABORT; inline;
- procedure clearCFORCE; inline;
- procedure clearPATEN; inline;
- procedure clearSIRQEN; inline;
- procedure setAIRQEN; inline;
- procedure setCABORT; inline;
- procedure setCFORCE; inline;
- procedure setPATEN; inline;
- procedure setSIRQEN; inline;
- property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
- property CABORT : TBits_1 read getCABORT write setCABORT;
- property CFORCE : TBits_1 read getCFORCE write setCFORCE;
- property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
- property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
- property PATEN : TBits_1 read getPATEN write setPATEN;
- property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
- property w : TBits_32 read getw write setw;
- end;
- TDMAC5_DCH5INT = record
- private
- function getCHBCIE : TBits_1; inline;
- function getCHBCIF : TBits_1; inline;
- function getCHCCIE : TBits_1; inline;
- function getCHCCIF : TBits_1; inline;
- function getCHDDIE : TBits_1; inline;
- function getCHDDIF : TBits_1; inline;
- function getCHDHIE : TBits_1; inline;
- function getCHDHIF : TBits_1; inline;
- function getCHERIE : TBits_1; inline;
- function getCHERIF : TBits_1; inline;
- function getCHSDIE : TBits_1; inline;
- function getCHSDIF : TBits_1; inline;
- function getCHSHIE : TBits_1; inline;
- function getCHSHIF : TBits_1; inline;
- function getCHTAIE : TBits_1; inline;
- function getCHTAIF : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setCHBCIE(thebits : TBits_1); inline;
- procedure setCHBCIF(thebits : TBits_1); inline;
- procedure setCHCCIE(thebits : TBits_1); inline;
- procedure setCHCCIF(thebits : TBits_1); inline;
- procedure setCHDDIE(thebits : TBits_1); inline;
- procedure setCHDDIF(thebits : TBits_1); inline;
- procedure setCHDHIE(thebits : TBits_1); inline;
- procedure setCHDHIF(thebits : TBits_1); inline;
- procedure setCHERIE(thebits : TBits_1); inline;
- procedure setCHERIF(thebits : TBits_1); inline;
- procedure setCHSDIE(thebits : TBits_1); inline;
- procedure setCHSDIF(thebits : TBits_1); inline;
- procedure setCHSHIE(thebits : TBits_1); inline;
- procedure setCHSHIF(thebits : TBits_1); inline;
- procedure setCHTAIE(thebits : TBits_1); inline;
- procedure setCHTAIF(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCHBCIE; inline;
- procedure clearCHBCIF; inline;
- procedure clearCHCCIE; inline;
- procedure clearCHCCIF; inline;
- procedure clearCHDDIE; inline;
- procedure clearCHDDIF; inline;
- procedure clearCHDHIE; inline;
- procedure clearCHDHIF; inline;
- procedure clearCHERIE; inline;
- procedure clearCHERIF; inline;
- procedure clearCHSDIE; inline;
- procedure clearCHSDIF; inline;
- procedure clearCHSHIE; inline;
- procedure clearCHSHIF; inline;
- procedure clearCHTAIE; inline;
- procedure clearCHTAIF; inline;
- procedure setCHBCIE; inline;
- procedure setCHBCIF; inline;
- procedure setCHCCIE; inline;
- procedure setCHCCIF; inline;
- procedure setCHDDIE; inline;
- procedure setCHDDIF; inline;
- procedure setCHDHIE; inline;
- procedure setCHDHIF; inline;
- procedure setCHERIE; inline;
- procedure setCHERIF; inline;
- procedure setCHSDIE; inline;
- procedure setCHSDIF; inline;
- procedure setCHSHIE; inline;
- procedure setCHSHIF; inline;
- procedure setCHTAIE; inline;
- procedure setCHTAIF; inline;
- property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
- property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
- property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
- property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
- property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
- property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
- property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
- property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
- property CHERIE : TBits_1 read getCHERIE write setCHERIE;
- property CHERIF : TBits_1 read getCHERIF write setCHERIF;
- property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
- property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
- property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
- property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
- property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
- property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
- property w : TBits_32 read getw write setw;
- end;
- type
- TDMAC5Registers = record
- DCH5CONbits : TDMAC5_DCH5CON;
- DCH5CON : longWord;
- DCH5CONCLR : longWord;
- DCH5CONSET : longWord;
- DCH5CONINV : longWord;
- DCH5ECONbits : TDMAC5_DCH5ECON;
- DCH5ECON : longWord;
- DCH5ECONCLR : longWord;
- DCH5ECONSET : longWord;
- DCH5ECONINV : longWord;
- DCH5INTbits : TDMAC5_DCH5INT;
- DCH5INT : longWord;
- DCH5INTCLR : longWord;
- DCH5INTSET : longWord;
- DCH5INTINV : longWord;
- DCH5SSA : longWord;
- DCH5SSACLR : longWord;
- DCH5SSASET : longWord;
- DCH5SSAINV : longWord;
- DCH5DSA : longWord;
- DCH5DSACLR : longWord;
- DCH5DSASET : longWord;
- DCH5DSAINV : longWord;
- DCH5SSIZ : longWord;
- DCH5SSIZCLR : longWord;
- DCH5SSIZSET : longWord;
- DCH5SSIZINV : longWord;
- DCH5DSIZ : longWord;
- DCH5DSIZCLR : longWord;
- DCH5DSIZSET : longWord;
- DCH5DSIZINV : longWord;
- DCH5SPTR : longWord;
- DCH5SPTRCLR : longWord;
- DCH5SPTRSET : longWord;
- DCH5SPTRINV : longWord;
- DCH5DPTR : longWord;
- DCH5DPTRCLR : longWord;
- DCH5DPTRSET : longWord;
- DCH5DPTRINV : longWord;
- DCH5CSIZ : longWord;
- DCH5CSIZCLR : longWord;
- DCH5CSIZSET : longWord;
- DCH5CSIZINV : longWord;
- DCH5CPTR : longWord;
- DCH5CPTRCLR : longWord;
- DCH5CPTRSET : longWord;
- DCH5CPTRINV : longWord;
- DCH5DAT : longWord;
- DCH5DATCLR : longWord;
- DCH5DATSET : longWord;
- DCH5DATINV : longWord;
- end;
- TDMAC6_DCH6CON = record
- private
- function getCHAED : TBits_1; inline;
- function getCHAEN : TBits_1; inline;
- function getCHBUSY : TBits_1; inline;
- function getCHCHN : TBits_1; inline;
- function getCHCHNS : TBits_1; inline;
- function getCHEDET : TBits_1; inline;
- function getCHEN : TBits_1; inline;
- function getCHPRI : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setCHAED(thebits : TBits_1); inline;
- procedure setCHAEN(thebits : TBits_1); inline;
- procedure setCHBUSY(thebits : TBits_1); inline;
- procedure setCHCHN(thebits : TBits_1); inline;
- procedure setCHCHNS(thebits : TBits_1); inline;
- procedure setCHEDET(thebits : TBits_1); inline;
- procedure setCHEN(thebits : TBits_1); inline;
- procedure setCHPRI(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCHAED; inline;
- procedure clearCHAEN; inline;
- procedure clearCHBUSY; inline;
- procedure clearCHCHN; inline;
- procedure clearCHCHNS; inline;
- procedure clearCHEDET; inline;
- procedure clearCHEN; inline;
- procedure setCHAED; inline;
- procedure setCHAEN; inline;
- procedure setCHBUSY; inline;
- procedure setCHCHN; inline;
- procedure setCHCHNS; inline;
- procedure setCHEDET; inline;
- procedure setCHEN; inline;
- property CHAED : TBits_1 read getCHAED write setCHAED;
- property CHAEN : TBits_1 read getCHAEN write setCHAEN;
- property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
- property CHCHN : TBits_1 read getCHCHN write setCHCHN;
- property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
- property CHEDET : TBits_1 read getCHEDET write setCHEDET;
- property CHEN : TBits_1 read getCHEN write setCHEN;
- property CHPRI : TBits_2 read getCHPRI write setCHPRI;
- property w : TBits_32 read getw write setw;
- end;
- TDMAC6_DCH6ECON = record
- private
- function getAIRQEN : TBits_1; inline;
- function getCABORT : TBits_1; inline;
- function getCFORCE : TBits_1; inline;
- function getCHAIRQ : TBits_8; inline;
- function getCHSIRQ : TBits_8; inline;
- function getPATEN : TBits_1; inline;
- function getSIRQEN : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setAIRQEN(thebits : TBits_1); inline;
- procedure setCABORT(thebits : TBits_1); inline;
- procedure setCFORCE(thebits : TBits_1); inline;
- procedure setCHAIRQ(thebits : TBits_8); inline;
- procedure setCHSIRQ(thebits : TBits_8); inline;
- procedure setPATEN(thebits : TBits_1); inline;
- procedure setSIRQEN(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearAIRQEN; inline;
- procedure clearCABORT; inline;
- procedure clearCFORCE; inline;
- procedure clearPATEN; inline;
- procedure clearSIRQEN; inline;
- procedure setAIRQEN; inline;
- procedure setCABORT; inline;
- procedure setCFORCE; inline;
- procedure setPATEN; inline;
- procedure setSIRQEN; inline;
- property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
- property CABORT : TBits_1 read getCABORT write setCABORT;
- property CFORCE : TBits_1 read getCFORCE write setCFORCE;
- property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
- property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
- property PATEN : TBits_1 read getPATEN write setPATEN;
- property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
- property w : TBits_32 read getw write setw;
- end;
- TDMAC6_DCH6INT = record
- private
- function getCHBCIE : TBits_1; inline;
- function getCHBCIF : TBits_1; inline;
- function getCHCCIE : TBits_1; inline;
- function getCHCCIF : TBits_1; inline;
- function getCHDDIE : TBits_1; inline;
- function getCHDDIF : TBits_1; inline;
- function getCHDHIE : TBits_1; inline;
- function getCHDHIF : TBits_1; inline;
- function getCHERIE : TBits_1; inline;
- function getCHERIF : TBits_1; inline;
- function getCHSDIE : TBits_1; inline;
- function getCHSDIF : TBits_1; inline;
- function getCHSHIE : TBits_1; inline;
- function getCHSHIF : TBits_1; inline;
- function getCHTAIE : TBits_1; inline;
- function getCHTAIF : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setCHBCIE(thebits : TBits_1); inline;
- procedure setCHBCIF(thebits : TBits_1); inline;
- procedure setCHCCIE(thebits : TBits_1); inline;
- procedure setCHCCIF(thebits : TBits_1); inline;
- procedure setCHDDIE(thebits : TBits_1); inline;
- procedure setCHDDIF(thebits : TBits_1); inline;
- procedure setCHDHIE(thebits : TBits_1); inline;
- procedure setCHDHIF(thebits : TBits_1); inline;
- procedure setCHERIE(thebits : TBits_1); inline;
- procedure setCHERIF(thebits : TBits_1); inline;
- procedure setCHSDIE(thebits : TBits_1); inline;
- procedure setCHSDIF(thebits : TBits_1); inline;
- procedure setCHSHIE(thebits : TBits_1); inline;
- procedure setCHSHIF(thebits : TBits_1); inline;
- procedure setCHTAIE(thebits : TBits_1); inline;
- procedure setCHTAIF(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCHBCIE; inline;
- procedure clearCHBCIF; inline;
- procedure clearCHCCIE; inline;
- procedure clearCHCCIF; inline;
- procedure clearCHDDIE; inline;
- procedure clearCHDDIF; inline;
- procedure clearCHDHIE; inline;
- procedure clearCHDHIF; inline;
- procedure clearCHERIE; inline;
- procedure clearCHERIF; inline;
- procedure clearCHSDIE; inline;
- procedure clearCHSDIF; inline;
- procedure clearCHSHIE; inline;
- procedure clearCHSHIF; inline;
- procedure clearCHTAIE; inline;
- procedure clearCHTAIF; inline;
- procedure setCHBCIE; inline;
- procedure setCHBCIF; inline;
- procedure setCHCCIE; inline;
- procedure setCHCCIF; inline;
- procedure setCHDDIE; inline;
- procedure setCHDDIF; inline;
- procedure setCHDHIE; inline;
- procedure setCHDHIF; inline;
- procedure setCHERIE; inline;
- procedure setCHERIF; inline;
- procedure setCHSDIE; inline;
- procedure setCHSDIF; inline;
- procedure setCHSHIE; inline;
- procedure setCHSHIF; inline;
- procedure setCHTAIE; inline;
- procedure setCHTAIF; inline;
- property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
- property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
- property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
- property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
- property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
- property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
- property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
- property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
- property CHERIE : TBits_1 read getCHERIE write setCHERIE;
- property CHERIF : TBits_1 read getCHERIF write setCHERIF;
- property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
- property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
- property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
- property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
- property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
- property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
- property w : TBits_32 read getw write setw;
- end;
- type
- TDMAC6Registers = record
- DCH6CONbits : TDMAC6_DCH6CON;
- DCH6CON : longWord;
- DCH6CONCLR : longWord;
- DCH6CONSET : longWord;
- DCH6CONINV : longWord;
- DCH6ECONbits : TDMAC6_DCH6ECON;
- DCH6ECON : longWord;
- DCH6ECONCLR : longWord;
- DCH6ECONSET : longWord;
- DCH6ECONINV : longWord;
- DCH6INTbits : TDMAC6_DCH6INT;
- DCH6INT : longWord;
- DCH6INTCLR : longWord;
- DCH6INTSET : longWord;
- DCH6INTINV : longWord;
- DCH6SSA : longWord;
- DCH6SSACLR : longWord;
- DCH6SSASET : longWord;
- DCH6SSAINV : longWord;
- DCH6DSA : longWord;
- DCH6DSACLR : longWord;
- DCH6DSASET : longWord;
- DCH6DSAINV : longWord;
- DCH6SSIZ : longWord;
- DCH6SSIZCLR : longWord;
- DCH6SSIZSET : longWord;
- DCH6SSIZINV : longWord;
- DCH6DSIZ : longWord;
- DCH6DSIZCLR : longWord;
- DCH6DSIZSET : longWord;
- DCH6DSIZINV : longWord;
- DCH6SPTR : longWord;
- DCH6SPTRCLR : longWord;
- DCH6SPTRSET : longWord;
- DCH6SPTRINV : longWord;
- DCH6DPTR : longWord;
- DCH6DPTRCLR : longWord;
- DCH6DPTRSET : longWord;
- DCH6DPTRINV : longWord;
- DCH6CSIZ : longWord;
- DCH6CSIZCLR : longWord;
- DCH6CSIZSET : longWord;
- DCH6CSIZINV : longWord;
- DCH6CPTR : longWord;
- DCH6CPTRCLR : longWord;
- DCH6CPTRSET : longWord;
- DCH6CPTRINV : longWord;
- DCH6DAT : longWord;
- DCH6DATCLR : longWord;
- DCH6DATSET : longWord;
- DCH6DATINV : longWord;
- end;
- TDMAC7_DCH7CON = record
- private
- function getCHAED : TBits_1; inline;
- function getCHAEN : TBits_1; inline;
- function getCHBUSY : TBits_1; inline;
- function getCHCHN : TBits_1; inline;
- function getCHCHNS : TBits_1; inline;
- function getCHEDET : TBits_1; inline;
- function getCHEN : TBits_1; inline;
- function getCHPRI : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setCHAED(thebits : TBits_1); inline;
- procedure setCHAEN(thebits : TBits_1); inline;
- procedure setCHBUSY(thebits : TBits_1); inline;
- procedure setCHCHN(thebits : TBits_1); inline;
- procedure setCHCHNS(thebits : TBits_1); inline;
- procedure setCHEDET(thebits : TBits_1); inline;
- procedure setCHEN(thebits : TBits_1); inline;
- procedure setCHPRI(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCHAED; inline;
- procedure clearCHAEN; inline;
- procedure clearCHBUSY; inline;
- procedure clearCHCHN; inline;
- procedure clearCHCHNS; inline;
- procedure clearCHEDET; inline;
- procedure clearCHEN; inline;
- procedure setCHAED; inline;
- procedure setCHAEN; inline;
- procedure setCHBUSY; inline;
- procedure setCHCHN; inline;
- procedure setCHCHNS; inline;
- procedure setCHEDET; inline;
- procedure setCHEN; inline;
- property CHAED : TBits_1 read getCHAED write setCHAED;
- property CHAEN : TBits_1 read getCHAEN write setCHAEN;
- property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
- property CHCHN : TBits_1 read getCHCHN write setCHCHN;
- property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
- property CHEDET : TBits_1 read getCHEDET write setCHEDET;
- property CHEN : TBits_1 read getCHEN write setCHEN;
- property CHPRI : TBits_2 read getCHPRI write setCHPRI;
- property w : TBits_32 read getw write setw;
- end;
- TDMAC7_DCH7ECON = record
- private
- function getAIRQEN : TBits_1; inline;
- function getCABORT : TBits_1; inline;
- function getCFORCE : TBits_1; inline;
- function getCHAIRQ : TBits_8; inline;
- function getCHSIRQ : TBits_8; inline;
- function getPATEN : TBits_1; inline;
- function getSIRQEN : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setAIRQEN(thebits : TBits_1); inline;
- procedure setCABORT(thebits : TBits_1); inline;
- procedure setCFORCE(thebits : TBits_1); inline;
- procedure setCHAIRQ(thebits : TBits_8); inline;
- procedure setCHSIRQ(thebits : TBits_8); inline;
- procedure setPATEN(thebits : TBits_1); inline;
- procedure setSIRQEN(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearAIRQEN; inline;
- procedure clearCABORT; inline;
- procedure clearCFORCE; inline;
- procedure clearPATEN; inline;
- procedure clearSIRQEN; inline;
- procedure setAIRQEN; inline;
- procedure setCABORT; inline;
- procedure setCFORCE; inline;
- procedure setPATEN; inline;
- procedure setSIRQEN; inline;
- property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
- property CABORT : TBits_1 read getCABORT write setCABORT;
- property CFORCE : TBits_1 read getCFORCE write setCFORCE;
- property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
- property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
- property PATEN : TBits_1 read getPATEN write setPATEN;
- property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
- property w : TBits_32 read getw write setw;
- end;
- TDMAC7_DCH7INT = record
- private
- function getCHBCIE : TBits_1; inline;
- function getCHBCIF : TBits_1; inline;
- function getCHCCIE : TBits_1; inline;
- function getCHCCIF : TBits_1; inline;
- function getCHDDIE : TBits_1; inline;
- function getCHDDIF : TBits_1; inline;
- function getCHDHIE : TBits_1; inline;
- function getCHDHIF : TBits_1; inline;
- function getCHERIE : TBits_1; inline;
- function getCHERIF : TBits_1; inline;
- function getCHSDIE : TBits_1; inline;
- function getCHSDIF : TBits_1; inline;
- function getCHSHIE : TBits_1; inline;
- function getCHSHIF : TBits_1; inline;
- function getCHTAIE : TBits_1; inline;
- function getCHTAIF : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setCHBCIE(thebits : TBits_1); inline;
- procedure setCHBCIF(thebits : TBits_1); inline;
- procedure setCHCCIE(thebits : TBits_1); inline;
- procedure setCHCCIF(thebits : TBits_1); inline;
- procedure setCHDDIE(thebits : TBits_1); inline;
- procedure setCHDDIF(thebits : TBits_1); inline;
- procedure setCHDHIE(thebits : TBits_1); inline;
- procedure setCHDHIF(thebits : TBits_1); inline;
- procedure setCHERIE(thebits : TBits_1); inline;
- procedure setCHERIF(thebits : TBits_1); inline;
- procedure setCHSDIE(thebits : TBits_1); inline;
- procedure setCHSDIF(thebits : TBits_1); inline;
- procedure setCHSHIE(thebits : TBits_1); inline;
- procedure setCHSHIF(thebits : TBits_1); inline;
- procedure setCHTAIE(thebits : TBits_1); inline;
- procedure setCHTAIF(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCHBCIE; inline;
- procedure clearCHBCIF; inline;
- procedure clearCHCCIE; inline;
- procedure clearCHCCIF; inline;
- procedure clearCHDDIE; inline;
- procedure clearCHDDIF; inline;
- procedure clearCHDHIE; inline;
- procedure clearCHDHIF; inline;
- procedure clearCHERIE; inline;
- procedure clearCHERIF; inline;
- procedure clearCHSDIE; inline;
- procedure clearCHSDIF; inline;
- procedure clearCHSHIE; inline;
- procedure clearCHSHIF; inline;
- procedure clearCHTAIE; inline;
- procedure clearCHTAIF; inline;
- procedure setCHBCIE; inline;
- procedure setCHBCIF; inline;
- procedure setCHCCIE; inline;
- procedure setCHCCIF; inline;
- procedure setCHDDIE; inline;
- procedure setCHDDIF; inline;
- procedure setCHDHIE; inline;
- procedure setCHDHIF; inline;
- procedure setCHERIE; inline;
- procedure setCHERIF; inline;
- procedure setCHSDIE; inline;
- procedure setCHSDIF; inline;
- procedure setCHSHIE; inline;
- procedure setCHSHIF; inline;
- procedure setCHTAIE; inline;
- procedure setCHTAIF; inline;
- property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
- property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
- property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
- property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
- property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
- property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
- property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
- property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
- property CHERIE : TBits_1 read getCHERIE write setCHERIE;
- property CHERIF : TBits_1 read getCHERIF write setCHERIF;
- property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
- property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
- property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
- property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
- property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
- property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
- property w : TBits_32 read getw write setw;
- end;
- type
- TDMAC7Registers = record
- DCH7CONbits : TDMAC7_DCH7CON;
- DCH7CON : longWord;
- DCH7CONCLR : longWord;
- DCH7CONSET : longWord;
- DCH7CONINV : longWord;
- DCH7ECONbits : TDMAC7_DCH7ECON;
- DCH7ECON : longWord;
- DCH7ECONCLR : longWord;
- DCH7ECONSET : longWord;
- DCH7ECONINV : longWord;
- DCH7INTbits : TDMAC7_DCH7INT;
- DCH7INT : longWord;
- DCH7INTCLR : longWord;
- DCH7INTSET : longWord;
- DCH7INTINV : longWord;
- DCH7SSA : longWord;
- DCH7SSACLR : longWord;
- DCH7SSASET : longWord;
- DCH7SSAINV : longWord;
- DCH7DSA : longWord;
- DCH7DSACLR : longWord;
- DCH7DSASET : longWord;
- DCH7DSAINV : longWord;
- DCH7SSIZ : longWord;
- DCH7SSIZCLR : longWord;
- DCH7SSIZSET : longWord;
- DCH7SSIZINV : longWord;
- DCH7DSIZ : longWord;
- DCH7DSIZCLR : longWord;
- DCH7DSIZSET : longWord;
- DCH7DSIZINV : longWord;
- DCH7SPTR : longWord;
- DCH7SPTRCLR : longWord;
- DCH7SPTRSET : longWord;
- DCH7SPTRINV : longWord;
- DCH7DPTR : longWord;
- DCH7DPTRCLR : longWord;
- DCH7DPTRSET : longWord;
- DCH7DPTRINV : longWord;
- DCH7CSIZ : longWord;
- DCH7CSIZCLR : longWord;
- DCH7CSIZSET : longWord;
- DCH7CSIZINV : longWord;
- DCH7CPTR : longWord;
- DCH7CPTRCLR : longWord;
- DCH7CPTRSET : longWord;
- DCH7CPTRINV : longWord;
- DCH7DAT : longWord;
- DCH7DATCLR : longWord;
- DCH7DATSET : longWord;
- DCH7DATINV : longWord;
- end;
- TPCACHE_CHECON = record
- private
- function getCHECOH : TBits_1; inline;
- function getDCSZ : TBits_2; inline;
- function getPFMWS : TBits_3; inline;
- function getPREFEN : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setCHECOH(thebits : TBits_1); inline;
- procedure setDCSZ(thebits : TBits_2); inline;
- procedure setPFMWS(thebits : TBits_3); inline;
- procedure setPREFEN(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCHECOH; inline;
- procedure setCHECOH; inline;
- property CHECOH : TBits_1 read getCHECOH write setCHECOH;
- property DCSZ : TBits_2 read getDCSZ write setDCSZ;
- property PFMWS : TBits_3 read getPFMWS write setPFMWS;
- property PREFEN : TBits_2 read getPREFEN write setPREFEN;
- property w : TBits_32 read getw write setw;
- end;
- TPCACHE_CHETAG = record
- private
- function getLLOCK : TBits_1; inline;
- function getLTAG : TBits_20; inline;
- function getLTAGBOOT : TBits_1; inline;
- function getLTYPE : TBits_1; inline;
- function getLVALID : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setLLOCK(thebits : TBits_1); inline;
- procedure setLTAG(thebits : TBits_20); inline;
- procedure setLTAGBOOT(thebits : TBits_1); inline;
- procedure setLTYPE(thebits : TBits_1); inline;
- procedure setLVALID(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearLLOCK; inline;
- procedure clearLTAGBOOT; inline;
- procedure clearLTYPE; inline;
- procedure clearLVALID; inline;
- procedure setLLOCK; inline;
- procedure setLTAGBOOT; inline;
- procedure setLTYPE; inline;
- procedure setLVALID; inline;
- property LLOCK : TBits_1 read getLLOCK write setLLOCK;
- property LTAG : TBits_20 read getLTAG write setLTAG;
- property LTAGBOOT : TBits_1 read getLTAGBOOT write setLTAGBOOT;
- property LTYPE : TBits_1 read getLTYPE write setLTYPE;
- property LVALID : TBits_1 read getLVALID write setLVALID;
- property w : TBits_32 read getw write setw;
- end;
- type
- TPCACHERegisters = record
- CHECONbits : TPCACHE_CHECON;
- CHECON : longWord;
- CHECONCLR : longWord;
- CHECONSET : longWord;
- CHECONINV : longWord;
- CHEACC : longWord;
- CHEACCCLR : longWord;
- CHEACCSET : longWord;
- CHEACCINV : longWord;
- CHETAGbits : TPCACHE_CHETAG;
- CHETAG : longWord;
- CHETAGCLR : longWord;
- CHETAGSET : longWord;
- CHETAGINV : longWord;
- CHEMSK : longWord;
- CHEMSKCLR : longWord;
- CHEMSKSET : longWord;
- CHEMSKINV : longWord;
- CHEW0 : longWord;
- CHEW1 : longWord;
- CHEW2 : longWord;
- CHEW3 : longWord;
- CHELRU : longWord;
- CHEHIT : longWord;
- CHEMIS : longWord;
- CHEPFABT : longWord;
- end;
- TUSB_U1IR = record
- private
- function getATTACHIF : TBits_1; inline;
- function getDETACHIF : TBits_1; inline;
- function getIDLEIF : TBits_1; inline;
- function getRESUMEIF : TBits_1; inline;
- function getSOFIF : TBits_1; inline;
- function getSTALLIF : TBits_1; inline;
- function getTRNIF : TBits_1; inline;
- function getUERRIF : TBits_1; inline;
- function getURSTIF : TBits_1; inline;
- function getURSTIF_DETACHIF : TBits_1; inline;
- procedure setATTACHIF(thebits : TBits_1); inline;
- procedure setDETACHIF(thebits : TBits_1); inline;
- procedure setIDLEIF(thebits : TBits_1); inline;
- procedure setRESUMEIF(thebits : TBits_1); inline;
- procedure setSOFIF(thebits : TBits_1); inline;
- procedure setSTALLIF(thebits : TBits_1); inline;
- procedure setTRNIF(thebits : TBits_1); inline;
- procedure setUERRIF(thebits : TBits_1); inline;
- procedure setURSTIF(thebits : TBits_1); inline;
- procedure setURSTIF_DETACHIF(thebits : TBits_1); inline;
- public
- procedure clearATTACHIF; inline;
- procedure clearDETACHIF; inline;
- procedure clearIDLEIF; inline;
- procedure clearRESUMEIF; inline;
- procedure clearSOFIF; inline;
- procedure clearSTALLIF; inline;
- procedure clearTRNIF; inline;
- procedure clearUERRIF; inline;
- procedure clearURSTIF; inline;
- procedure clearURSTIF_DETACHIF; inline;
- procedure setATTACHIF; inline;
- procedure setDETACHIF; inline;
- procedure setIDLEIF; inline;
- procedure setRESUMEIF; inline;
- procedure setSOFIF; inline;
- procedure setSTALLIF; inline;
- procedure setTRNIF; inline;
- procedure setUERRIF; inline;
- procedure setURSTIF; inline;
- procedure setURSTIF_DETACHIF; inline;
- property ATTACHIF : TBits_1 read getATTACHIF write setATTACHIF;
- property DETACHIF : TBits_1 read getDETACHIF write setDETACHIF;
- property IDLEIF : TBits_1 read getIDLEIF write setIDLEIF;
- property RESUMEIF : TBits_1 read getRESUMEIF write setRESUMEIF;
- property SOFIF : TBits_1 read getSOFIF write setSOFIF;
- property STALLIF : TBits_1 read getSTALLIF write setSTALLIF;
- property TRNIF : TBits_1 read getTRNIF write setTRNIF;
- property UERRIF : TBits_1 read getUERRIF write setUERRIF;
- property URSTIF : TBits_1 read getURSTIF write setURSTIF;
- property URSTIF_DETACHIF : TBits_1 read getURSTIF_DETACHIF write setURSTIF_DETACHIF;
- end;
- TUSB_U1IE = record
- private
- function getATTACHIE : TBits_1; inline;
- function getDETACHIE : TBits_1; inline;
- function getIDLEIE : TBits_1; inline;
- function getRESUMEIE : TBits_1; inline;
- function getSOFIE : TBits_1; inline;
- function getSTALLIE : TBits_1; inline;
- function getTRNIE : TBits_1; inline;
- function getUERRIE : TBits_1; inline;
- function getURSTIE : TBits_1; inline;
- function getURSTIE_DETACHIE : TBits_1; inline;
- procedure setATTACHIE(thebits : TBits_1); inline;
- procedure setDETACHIE(thebits : TBits_1); inline;
- procedure setIDLEIE(thebits : TBits_1); inline;
- procedure setRESUMEIE(thebits : TBits_1); inline;
- procedure setSOFIE(thebits : TBits_1); inline;
- procedure setSTALLIE(thebits : TBits_1); inline;
- procedure setTRNIE(thebits : TBits_1); inline;
- procedure setUERRIE(thebits : TBits_1); inline;
- procedure setURSTIE(thebits : TBits_1); inline;
- procedure setURSTIE_DETACHIE(thebits : TBits_1); inline;
- public
- procedure clearATTACHIE; inline;
- procedure clearDETACHIE; inline;
- procedure clearIDLEIE; inline;
- procedure clearRESUMEIE; inline;
- procedure clearSOFIE; inline;
- procedure clearSTALLIE; inline;
- procedure clearTRNIE; inline;
- procedure clearUERRIE; inline;
- procedure clearURSTIE; inline;
- procedure clearURSTIE_DETACHIE; inline;
- procedure setATTACHIE; inline;
- procedure setDETACHIE; inline;
- procedure setIDLEIE; inline;
- procedure setRESUMEIE; inline;
- procedure setSOFIE; inline;
- procedure setSTALLIE; inline;
- procedure setTRNIE; inline;
- procedure setUERRIE; inline;
- procedure setURSTIE; inline;
- procedure setURSTIE_DETACHIE; inline;
- property ATTACHIE : TBits_1 read getATTACHIE write setATTACHIE;
- property DETACHIE : TBits_1 read getDETACHIE write setDETACHIE;
- property IDLEIE : TBits_1 read getIDLEIE write setIDLEIE;
- property RESUMEIE : TBits_1 read getRESUMEIE write setRESUMEIE;
- property SOFIE : TBits_1 read getSOFIE write setSOFIE;
- property STALLIE : TBits_1 read getSTALLIE write setSTALLIE;
- property TRNIE : TBits_1 read getTRNIE write setTRNIE;
- property UERRIE : TBits_1 read getUERRIE write setUERRIE;
- property URSTIE : TBits_1 read getURSTIE write setURSTIE;
- property URSTIE_DETACHIE : TBits_1 read getURSTIE_DETACHIE write setURSTIE_DETACHIE;
- end;
- TUSB_U1EIR = record
- private
- function getBMXEF : TBits_1; inline;
- function getBTOEF : TBits_1; inline;
- function getBTSEF : TBits_1; inline;
- function getCRC16EF : TBits_1; inline;
- function getCRC5EF : TBits_1; inline;
- function getCRC5EF_EOFEF : TBits_1; inline;
- function getDFN8EF : TBits_1; inline;
- function getDMAEF : TBits_1; inline;
- function getEOFEF : TBits_1; inline;
- function getPIDEF : TBits_1; inline;
- procedure setBMXEF(thebits : TBits_1); inline;
- procedure setBTOEF(thebits : TBits_1); inline;
- procedure setBTSEF(thebits : TBits_1); inline;
- procedure setCRC16EF(thebits : TBits_1); inline;
- procedure setCRC5EF(thebits : TBits_1); inline;
- procedure setCRC5EF_EOFEF(thebits : TBits_1); inline;
- procedure setDFN8EF(thebits : TBits_1); inline;
- procedure setDMAEF(thebits : TBits_1); inline;
- procedure setEOFEF(thebits : TBits_1); inline;
- procedure setPIDEF(thebits : TBits_1); inline;
- public
- procedure clearBMXEF; inline;
- procedure clearBTOEF; inline;
- procedure clearBTSEF; inline;
- procedure clearCRC16EF; inline;
- procedure clearCRC5EF; inline;
- procedure clearCRC5EF_EOFEF; inline;
- procedure clearDFN8EF; inline;
- procedure clearDMAEF; inline;
- procedure clearEOFEF; inline;
- procedure clearPIDEF; inline;
- procedure setBMXEF; inline;
- procedure setBTOEF; inline;
- procedure setBTSEF; inline;
- procedure setCRC16EF; inline;
- procedure setCRC5EF; inline;
- procedure setCRC5EF_EOFEF; inline;
- procedure setDFN8EF; inline;
- procedure setDMAEF; inline;
- procedure setEOFEF; inline;
- procedure setPIDEF; inline;
- property BMXEF : TBits_1 read getBMXEF write setBMXEF;
- property BTOEF : TBits_1 read getBTOEF write setBTOEF;
- property BTSEF : TBits_1 read getBTSEF write setBTSEF;
- property CRC16EF : TBits_1 read getCRC16EF write setCRC16EF;
- property CRC5EF : TBits_1 read getCRC5EF write setCRC5EF;
- property CRC5EF_EOFEF : TBits_1 read getCRC5EF_EOFEF write setCRC5EF_EOFEF;
- property DFN8EF : TBits_1 read getDFN8EF write setDFN8EF;
- property DMAEF : TBits_1 read getDMAEF write setDMAEF;
- property EOFEF : TBits_1 read getEOFEF write setEOFEF;
- property PIDEF : TBits_1 read getPIDEF write setPIDEF;
- end;
- TUSB_U1EIE = record
- private
- function getBMXEE : TBits_1; inline;
- function getBTOEE : TBits_1; inline;
- function getBTSEE : TBits_1; inline;
- function getCRC16EE : TBits_1; inline;
- function getCRC5EE : TBits_1; inline;
- function getCRC5EE_EOFEE : TBits_1; inline;
- function getDFN8EE : TBits_1; inline;
- function getDMAEE : TBits_1; inline;
- function getEOFEE : TBits_1; inline;
- function getPIDEE : TBits_1; inline;
- procedure setBMXEE(thebits : TBits_1); inline;
- procedure setBTOEE(thebits : TBits_1); inline;
- procedure setBTSEE(thebits : TBits_1); inline;
- procedure setCRC16EE(thebits : TBits_1); inline;
- procedure setCRC5EE(thebits : TBits_1); inline;
- procedure setCRC5EE_EOFEE(thebits : TBits_1); inline;
- procedure setDFN8EE(thebits : TBits_1); inline;
- procedure setDMAEE(thebits : TBits_1); inline;
- procedure setEOFEE(thebits : TBits_1); inline;
- procedure setPIDEE(thebits : TBits_1); inline;
- public
- procedure clearBMXEE; inline;
- procedure clearBTOEE; inline;
- procedure clearBTSEE; inline;
- procedure clearCRC16EE; inline;
- procedure clearCRC5EE; inline;
- procedure clearCRC5EE_EOFEE; inline;
- procedure clearDFN8EE; inline;
- procedure clearDMAEE; inline;
- procedure clearEOFEE; inline;
- procedure clearPIDEE; inline;
- procedure setBMXEE; inline;
- procedure setBTOEE; inline;
- procedure setBTSEE; inline;
- procedure setCRC16EE; inline;
- procedure setCRC5EE; inline;
- procedure setCRC5EE_EOFEE; inline;
- procedure setDFN8EE; inline;
- procedure setDMAEE; inline;
- procedure setEOFEE; inline;
- procedure setPIDEE; inline;
- property BMXEE : TBits_1 read getBMXEE write setBMXEE;
- property BTOEE : TBits_1 read getBTOEE write setBTOEE;
- property BTSEE : TBits_1 read getBTSEE write setBTSEE;
- property CRC16EE : TBits_1 read getCRC16EE write setCRC16EE;
- property CRC5EE : TBits_1 read getCRC5EE write setCRC5EE;
- property CRC5EE_EOFEE : TBits_1 read getCRC5EE_EOFEE write setCRC5EE_EOFEE;
- property DFN8EE : TBits_1 read getDFN8EE write setDFN8EE;
- property DMAEE : TBits_1 read getDMAEE write setDMAEE;
- property EOFEE : TBits_1 read getEOFEE write setEOFEE;
- property PIDEE : TBits_1 read getPIDEE write setPIDEE;
- end;
- TUSB_U1STAT = record
- private
- function getDIR : TBits_1; inline;
- function getENDPT : TBits_4; inline;
- function getENDPT0 : TBits_1; inline;
- function getENDPT1 : TBits_1; inline;
- function getENDPT2 : TBits_1; inline;
- function getENDPT3 : TBits_1; inline;
- function getPPBI : TBits_1; inline;
- procedure setDIR(thebits : TBits_1); inline;
- procedure setENDPT(thebits : TBits_4); inline;
- procedure setENDPT0(thebits : TBits_1); inline;
- procedure setENDPT1(thebits : TBits_1); inline;
- procedure setENDPT2(thebits : TBits_1); inline;
- procedure setENDPT3(thebits : TBits_1); inline;
- procedure setPPBI(thebits : TBits_1); inline;
- public
- procedure clearDIR; inline;
- procedure clearENDPT0; inline;
- procedure clearENDPT1; inline;
- procedure clearENDPT2; inline;
- procedure clearENDPT3; inline;
- procedure clearPPBI; inline;
- procedure setDIR; inline;
- procedure setENDPT0; inline;
- procedure setENDPT1; inline;
- procedure setENDPT2; inline;
- procedure setENDPT3; inline;
- procedure setPPBI; inline;
- property DIR : TBits_1 read getDIR write setDIR;
- property ENDPT : TBits_4 read getENDPT write setENDPT;
- property ENDPT0 : TBits_1 read getENDPT0 write setENDPT0;
- property ENDPT1 : TBits_1 read getENDPT1 write setENDPT1;
- property ENDPT2 : TBits_1 read getENDPT2 write setENDPT2;
- property ENDPT3 : TBits_1 read getENDPT3 write setENDPT3;
- property PPBI : TBits_1 read getPPBI write setPPBI;
- end;
- TUSB_U1CON = record
- private
- function getHOSTEN : TBits_1; inline;
- function getJSTATE : TBits_1; inline;
- function getPKTDIS : TBits_1; inline;
- function getPKTDIS_TOKBUSY : TBits_1; inline;
- function getPPBRST : TBits_1; inline;
- function getRESUME : TBits_1; inline;
- function getSE0 : TBits_1; inline;
- function getSOFEN : TBits_1; inline;
- function getTOKBUSY : TBits_1; inline;
- function getUSBEN : TBits_1; inline;
- function getUSBEN_SOFEN : TBits_1; inline;
- function getUSBRST : TBits_1; inline;
- procedure setHOSTEN(thebits : TBits_1); inline;
- procedure setJSTATE(thebits : TBits_1); inline;
- procedure setPKTDIS(thebits : TBits_1); inline;
- procedure setPKTDIS_TOKBUSY(thebits : TBits_1); inline;
- procedure setPPBRST(thebits : TBits_1); inline;
- procedure setRESUME(thebits : TBits_1); inline;
- procedure setSE0(thebits : TBits_1); inline;
- procedure setSOFEN(thebits : TBits_1); inline;
- procedure setTOKBUSY(thebits : TBits_1); inline;
- procedure setUSBEN(thebits : TBits_1); inline;
- procedure setUSBEN_SOFEN(thebits : TBits_1); inline;
- procedure setUSBRST(thebits : TBits_1); inline;
- public
- procedure clearHOSTEN; inline;
- procedure clearJSTATE; inline;
- procedure clearPKTDIS; inline;
- procedure clearPKTDIS_TOKBUSY; inline;
- procedure clearPPBRST; inline;
- procedure clearRESUME; inline;
- procedure clearSE0; inline;
- procedure clearSOFEN; inline;
- procedure clearTOKBUSY; inline;
- procedure clearUSBEN; inline;
- procedure clearUSBEN_SOFEN; inline;
- procedure clearUSBRST; inline;
- procedure setHOSTEN; inline;
- procedure setJSTATE; inline;
- procedure setPKTDIS; inline;
- procedure setPKTDIS_TOKBUSY; inline;
- procedure setPPBRST; inline;
- procedure setRESUME; inline;
- procedure setSE0; inline;
- procedure setSOFEN; inline;
- procedure setTOKBUSY; inline;
- procedure setUSBEN; inline;
- procedure setUSBEN_SOFEN; inline;
- procedure setUSBRST; inline;
- property HOSTEN : TBits_1 read getHOSTEN write setHOSTEN;
- property JSTATE : TBits_1 read getJSTATE write setJSTATE;
- property PKTDIS : TBits_1 read getPKTDIS write setPKTDIS;
- property PKTDIS_TOKBUSY : TBits_1 read getPKTDIS_TOKBUSY write setPKTDIS_TOKBUSY;
- property PPBRST : TBits_1 read getPPBRST write setPPBRST;
- property RESUME : TBits_1 read getRESUME write setRESUME;
- property SE0 : TBits_1 read getSE0 write setSE0;
- property SOFEN : TBits_1 read getSOFEN write setSOFEN;
- property TOKBUSY : TBits_1 read getTOKBUSY write setTOKBUSY;
- property USBEN : TBits_1 read getUSBEN write setUSBEN;
- property USBEN_SOFEN : TBits_1 read getUSBEN_SOFEN write setUSBEN_SOFEN;
- property USBRST : TBits_1 read getUSBRST write setUSBRST;
- end;
- TUSB_U1ADDR = record
- private
- function getDEVADDR : TBits_7; inline;
- function getDEVADDR0 : TBits_1; inline;
- function getDEVADDR1 : TBits_1; inline;
- function getDEVADDR2 : TBits_1; inline;
- function getDEVADDR3 : TBits_1; inline;
- function getDEVADDR4 : TBits_1; inline;
- function getDEVADDR5 : TBits_1; inline;
- function getDEVADDR6 : TBits_1; inline;
- function getLSPDEN : TBits_1; inline;
- procedure setDEVADDR(thebits : TBits_7); inline;
- procedure setDEVADDR0(thebits : TBits_1); inline;
- procedure setDEVADDR1(thebits : TBits_1); inline;
- procedure setDEVADDR2(thebits : TBits_1); inline;
- procedure setDEVADDR3(thebits : TBits_1); inline;
- procedure setDEVADDR4(thebits : TBits_1); inline;
- procedure setDEVADDR5(thebits : TBits_1); inline;
- procedure setDEVADDR6(thebits : TBits_1); inline;
- procedure setLSPDEN(thebits : TBits_1); inline;
- public
- procedure clearDEVADDR0; inline;
- procedure clearDEVADDR1; inline;
- procedure clearDEVADDR2; inline;
- procedure clearDEVADDR3; inline;
- procedure clearDEVADDR4; inline;
- procedure clearDEVADDR5; inline;
- procedure clearDEVADDR6; inline;
- procedure clearLSPDEN; inline;
- procedure setDEVADDR0; inline;
- procedure setDEVADDR1; inline;
- procedure setDEVADDR2; inline;
- procedure setDEVADDR3; inline;
- procedure setDEVADDR4; inline;
- procedure setDEVADDR5; inline;
- procedure setDEVADDR6; inline;
- procedure setLSPDEN; inline;
- property DEVADDR : TBits_7 read getDEVADDR write setDEVADDR;
- property DEVADDR0 : TBits_1 read getDEVADDR0 write setDEVADDR0;
- property DEVADDR1 : TBits_1 read getDEVADDR1 write setDEVADDR1;
- property DEVADDR2 : TBits_1 read getDEVADDR2 write setDEVADDR2;
- property DEVADDR3 : TBits_1 read getDEVADDR3 write setDEVADDR3;
- property DEVADDR4 : TBits_1 read getDEVADDR4 write setDEVADDR4;
- property DEVADDR5 : TBits_1 read getDEVADDR5 write setDEVADDR5;
- property DEVADDR6 : TBits_1 read getDEVADDR6 write setDEVADDR6;
- property LSPDEN : TBits_1 read getLSPDEN write setLSPDEN;
- end;
- TUSB_U1FRML = record
- private
- function getFRM0 : TBits_1; inline;
- function getFRM1 : TBits_1; inline;
- function getFRM2 : TBits_1; inline;
- function getFRM3 : TBits_1; inline;
- function getFRM4 : TBits_1; inline;
- function getFRM5 : TBits_1; inline;
- function getFRM6 : TBits_1; inline;
- function getFRM7 : TBits_1; inline;
- function getFRML : TBits_8; inline;
- procedure setFRM0(thebits : TBits_1); inline;
- procedure setFRM1(thebits : TBits_1); inline;
- procedure setFRM2(thebits : TBits_1); inline;
- procedure setFRM3(thebits : TBits_1); inline;
- procedure setFRM4(thebits : TBits_1); inline;
- procedure setFRM5(thebits : TBits_1); inline;
- procedure setFRM6(thebits : TBits_1); inline;
- procedure setFRM7(thebits : TBits_1); inline;
- procedure setFRML(thebits : TBits_8); inline;
- public
- procedure clearFRM0; inline;
- procedure clearFRM1; inline;
- procedure clearFRM2; inline;
- procedure clearFRM3; inline;
- procedure clearFRM4; inline;
- procedure clearFRM5; inline;
- procedure clearFRM6; inline;
- procedure clearFRM7; inline;
- procedure setFRM0; inline;
- procedure setFRM1; inline;
- procedure setFRM2; inline;
- procedure setFRM3; inline;
- procedure setFRM4; inline;
- procedure setFRM5; inline;
- procedure setFRM6; inline;
- procedure setFRM7; inline;
- property FRM0 : TBits_1 read getFRM0 write setFRM0;
- property FRM1 : TBits_1 read getFRM1 write setFRM1;
- property FRM2 : TBits_1 read getFRM2 write setFRM2;
- property FRM3 : TBits_1 read getFRM3 write setFRM3;
- property FRM4 : TBits_1 read getFRM4 write setFRM4;
- property FRM5 : TBits_1 read getFRM5 write setFRM5;
- property FRM6 : TBits_1 read getFRM6 write setFRM6;
- property FRM7 : TBits_1 read getFRM7 write setFRM7;
- property FRML : TBits_8 read getFRML write setFRML;
- end;
- TUSB_U1FRMH = record
- private
- function getFRM10 : TBits_1; inline;
- function getFRM8 : TBits_1; inline;
- function getFRM9 : TBits_1; inline;
- function getFRMH : TBits_3; inline;
- procedure setFRM10(thebits : TBits_1); inline;
- procedure setFRM8(thebits : TBits_1); inline;
- procedure setFRM9(thebits : TBits_1); inline;
- procedure setFRMH(thebits : TBits_3); inline;
- public
- procedure clearFRM10; inline;
- procedure clearFRM8; inline;
- procedure clearFRM9; inline;
- procedure setFRM10; inline;
- procedure setFRM8; inline;
- procedure setFRM9; inline;
- property FRM10 : TBits_1 read getFRM10 write setFRM10;
- property FRM8 : TBits_1 read getFRM8 write setFRM8;
- property FRM9 : TBits_1 read getFRM9 write setFRM9;
- property FRMH : TBits_3 read getFRMH write setFRMH;
- end;
- TUSB_U1TOK = record
- private
- function getEP : TBits_4; inline;
- function getEP0 : TBits_1; inline;
- function getEP1 : TBits_1; inline;
- function getEP2 : TBits_1; inline;
- function getEP3 : TBits_1; inline;
- function getPID : TBits_4; inline;
- function getPID0 : TBits_1; inline;
- function getPID1 : TBits_1; inline;
- function getPID2 : TBits_1; inline;
- function getPID3 : TBits_1; inline;
- procedure setEP(thebits : TBits_4); inline;
- procedure setEP0(thebits : TBits_1); inline;
- procedure setEP1(thebits : TBits_1); inline;
- procedure setEP2(thebits : TBits_1); inline;
- procedure setEP3(thebits : TBits_1); inline;
- procedure setPID(thebits : TBits_4); inline;
- procedure setPID0(thebits : TBits_1); inline;
- procedure setPID1(thebits : TBits_1); inline;
- procedure setPID2(thebits : TBits_1); inline;
- procedure setPID3(thebits : TBits_1); inline;
- public
- procedure clearEP0; inline;
- procedure clearEP1; inline;
- procedure clearEP2; inline;
- procedure clearEP3; inline;
- procedure clearPID0; inline;
- procedure clearPID1; inline;
- procedure clearPID2; inline;
- procedure clearPID3; inline;
- procedure setEP0; inline;
- procedure setEP1; inline;
- procedure setEP2; inline;
- procedure setEP3; inline;
- procedure setPID0; inline;
- procedure setPID1; inline;
- procedure setPID2; inline;
- procedure setPID3; inline;
- property EP : TBits_4 read getEP write setEP;
- property EP0 : TBits_1 read getEP0 write setEP0;
- property EP1 : TBits_1 read getEP1 write setEP1;
- property EP2 : TBits_1 read getEP2 write setEP2;
- property EP3 : TBits_1 read getEP3 write setEP3;
- property PID : TBits_4 read getPID write setPID;
- property PID0 : TBits_1 read getPID0 write setPID0;
- property PID1 : TBits_1 read getPID1 write setPID1;
- property PID2 : TBits_1 read getPID2 write setPID2;
- property PID3 : TBits_1 read getPID3 write setPID3;
- end;
- type
- TUSBRegisters = record
- U1OTGIR : longWord;
- U1OTGIRCLR : longWord;
- U1OTGIE : longWord;
- U1OTGIECLR : longWord;
- U1OTGIESET : longWord;
- U1OTGIEINV : longWord;
- U1OTGSTAT : longWord;
- U1OTGCON : longWord;
- U1OTGCONCLR : longWord;
- U1OTGCONSET : longWord;
- U1OTGCONINV : longWord;
- U1PWRC : longWord;
- U1PWRCCLR : longWord;
- U1PWRCSET : longWord;
- U1PWRCINV : longWord;
- U1IRbits : TUSB_U1IR;
- U1IR : longWord;
- U1IRCLR : longWord;
- U1IEbits : TUSB_U1IE;
- U1IE : longWord;
- U1IECLR : longWord;
- U1IESET : longWord;
- U1IEINV : longWord;
- U1EIRbits : TUSB_U1EIR;
- U1EIR : longWord;
- U1EIRCLR : longWord;
- U1EIEbits : TUSB_U1EIE;
- U1EIE : longWord;
- U1EIECLR : longWord;
- U1EIESET : longWord;
- U1EIEINV : longWord;
- U1STATbits : TUSB_U1STAT;
- U1STAT : longWord;
- U1CONbits : TUSB_U1CON;
- U1CON : longWord;
- U1CONCLR : longWord;
- U1CONSET : longWord;
- U1CONINV : longWord;
- U1ADDRbits : TUSB_U1ADDR;
- U1ADDR : longWord;
- U1ADDRCLR : longWord;
- U1ADDRSET : longWord;
- U1ADDRINV : longWord;
- U1BDTP1 : longWord;
- U1BDTP1CLR : longWord;
- U1BDTP1SET : longWord;
- U1BDTP1INV : longWord;
- U1FRMLbits : TUSB_U1FRML;
- U1FRML : longWord;
- U1FRMHbits : TUSB_U1FRMH;
- U1FRMH : longWord;
- U1TOKbits : TUSB_U1TOK;
- U1TOK : longWord;
- U1TOKCLR : longWord;
- U1TOKSET : longWord;
- U1TOKINV : longWord;
- U1SOF : longWord;
- U1SOFCLR : longWord;
- U1SOFSET : longWord;
- U1SOFINV : longWord;
- U1BDTP2 : longWord;
- U1BDTP2CLR : longWord;
- U1BDTP2SET : longWord;
- U1BDTP2INV : longWord;
- U1BDTP3 : longWord;
- U1BDTP3CLR : longWord;
- U1BDTP3SET : longWord;
- U1BDTP3INV : longWord;
- U1CNFG1 : longWord;
- U1CNFG1CLR : longWord;
- U1CNFG1SET : longWord;
- U1CNFG1INV : longWord;
- U1EP0 : longWord;
- U1EP0CLR : longWord;
- U1EP0SET : longWord;
- U1EP0INV : longWord;
- U1EP1 : longWord;
- U1EP1CLR : longWord;
- U1EP1SET : longWord;
- U1EP1INV : longWord;
- U1EP2 : longWord;
- U1EP2CLR : longWord;
- U1EP2SET : longWord;
- U1EP2INV : longWord;
- U1EP3 : longWord;
- U1EP3CLR : longWord;
- U1EP3SET : longWord;
- U1EP3INV : longWord;
- U1EP4 : longWord;
- U1EP4CLR : longWord;
- U1EP4SET : longWord;
- U1EP4INV : longWord;
- U1EP5 : longWord;
- U1EP5CLR : longWord;
- U1EP5SET : longWord;
- U1EP5INV : longWord;
- U1EP6 : longWord;
- U1EP6CLR : longWord;
- U1EP6SET : longWord;
- U1EP6INV : longWord;
- U1EP7 : longWord;
- U1EP7CLR : longWord;
- U1EP7SET : longWord;
- U1EP7INV : longWord;
- U1EP8 : longWord;
- U1EP8CLR : longWord;
- U1EP8SET : longWord;
- U1EP8INV : longWord;
- U1EP9 : longWord;
- U1EP9CLR : longWord;
- U1EP9SET : longWord;
- U1EP9INV : longWord;
- U1EP10 : longWord;
- U1EP10CLR : longWord;
- U1EP10SET : longWord;
- U1EP10INV : longWord;
- U1EP11 : longWord;
- U1EP11CLR : longWord;
- U1EP11SET : longWord;
- U1EP11INV : longWord;
- U1EP12 : longWord;
- U1EP12CLR : longWord;
- U1EP12SET : longWord;
- U1EP12INV : longWord;
- U1EP13 : longWord;
- U1EP13CLR : longWord;
- U1EP13SET : longWord;
- U1EP13INV : longWord;
- U1EP14 : longWord;
- U1EP14CLR : longWord;
- U1EP14SET : longWord;
- U1EP14INV : longWord;
- U1EP15 : longWord;
- U1EP15CLR : longWord;
- U1EP15SET : longWord;
- U1EP15INV : longWord;
- end;
- TPORTA_TRISA = record
- private
- function getTRISA0 : TBits_1; inline;
- function getTRISA1 : TBits_1; inline;
- function getTRISA10 : TBits_1; inline;
- function getTRISA14 : TBits_1; inline;
- function getTRISA15 : TBits_1; inline;
- function getTRISA2 : TBits_1; inline;
- function getTRISA3 : TBits_1; inline;
- function getTRISA4 : TBits_1; inline;
- function getTRISA5 : TBits_1; inline;
- function getTRISA6 : TBits_1; inline;
- function getTRISA7 : TBits_1; inline;
- function getTRISA9 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setTRISA0(thebits : TBits_1); inline;
- procedure setTRISA1(thebits : TBits_1); inline;
- procedure setTRISA10(thebits : TBits_1); inline;
- procedure setTRISA14(thebits : TBits_1); inline;
- procedure setTRISA15(thebits : TBits_1); inline;
- procedure setTRISA2(thebits : TBits_1); inline;
- procedure setTRISA3(thebits : TBits_1); inline;
- procedure setTRISA4(thebits : TBits_1); inline;
- procedure setTRISA5(thebits : TBits_1); inline;
- procedure setTRISA6(thebits : TBits_1); inline;
- procedure setTRISA7(thebits : TBits_1); inline;
- procedure setTRISA9(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearTRISA0; inline;
- procedure clearTRISA10; inline;
- procedure clearTRISA14; inline;
- procedure clearTRISA15; inline;
- procedure clearTRISA1; inline;
- procedure clearTRISA2; inline;
- procedure clearTRISA3; inline;
- procedure clearTRISA4; inline;
- procedure clearTRISA5; inline;
- procedure clearTRISA6; inline;
- procedure clearTRISA7; inline;
- procedure clearTRISA9; inline;
- procedure setTRISA0; inline;
- procedure setTRISA10; inline;
- procedure setTRISA14; inline;
- procedure setTRISA15; inline;
- procedure setTRISA1; inline;
- procedure setTRISA2; inline;
- procedure setTRISA3; inline;
- procedure setTRISA4; inline;
- procedure setTRISA5; inline;
- procedure setTRISA6; inline;
- procedure setTRISA7; inline;
- procedure setTRISA9; inline;
- property TRISA0 : TBits_1 read getTRISA0 write setTRISA0;
- property TRISA1 : TBits_1 read getTRISA1 write setTRISA1;
- property TRISA10 : TBits_1 read getTRISA10 write setTRISA10;
- property TRISA14 : TBits_1 read getTRISA14 write setTRISA14;
- property TRISA15 : TBits_1 read getTRISA15 write setTRISA15;
- property TRISA2 : TBits_1 read getTRISA2 write setTRISA2;
- property TRISA3 : TBits_1 read getTRISA3 write setTRISA3;
- property TRISA4 : TBits_1 read getTRISA4 write setTRISA4;
- property TRISA5 : TBits_1 read getTRISA5 write setTRISA5;
- property TRISA6 : TBits_1 read getTRISA6 write setTRISA6;
- property TRISA7 : TBits_1 read getTRISA7 write setTRISA7;
- property TRISA9 : TBits_1 read getTRISA9 write setTRISA9;
- property w : TBits_32 read getw write setw;
- end;
- TPORTA_PORTA = record
- private
- function getRA0 : TBits_1; inline;
- function getRA1 : TBits_1; inline;
- function getRA10 : TBits_1; inline;
- function getRA14 : TBits_1; inline;
- function getRA15 : TBits_1; inline;
- function getRA2 : TBits_1; inline;
- function getRA3 : TBits_1; inline;
- function getRA4 : TBits_1; inline;
- function getRA5 : TBits_1; inline;
- function getRA6 : TBits_1; inline;
- function getRA7 : TBits_1; inline;
- function getRA9 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setRA0(thebits : TBits_1); inline;
- procedure setRA1(thebits : TBits_1); inline;
- procedure setRA10(thebits : TBits_1); inline;
- procedure setRA14(thebits : TBits_1); inline;
- procedure setRA15(thebits : TBits_1); inline;
- procedure setRA2(thebits : TBits_1); inline;
- procedure setRA3(thebits : TBits_1); inline;
- procedure setRA4(thebits : TBits_1); inline;
- procedure setRA5(thebits : TBits_1); inline;
- procedure setRA6(thebits : TBits_1); inline;
- procedure setRA7(thebits : TBits_1); inline;
- procedure setRA9(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearRA0; inline;
- procedure clearRA10; inline;
- procedure clearRA14; inline;
- procedure clearRA15; inline;
- procedure clearRA1; inline;
- procedure clearRA2; inline;
- procedure clearRA3; inline;
- procedure clearRA4; inline;
- procedure clearRA5; inline;
- procedure clearRA6; inline;
- procedure clearRA7; inline;
- procedure clearRA9; inline;
- procedure setRA0; inline;
- procedure setRA10; inline;
- procedure setRA14; inline;
- procedure setRA15; inline;
- procedure setRA1; inline;
- procedure setRA2; inline;
- procedure setRA3; inline;
- procedure setRA4; inline;
- procedure setRA5; inline;
- procedure setRA6; inline;
- procedure setRA7; inline;
- procedure setRA9; inline;
- property RA0 : TBits_1 read getRA0 write setRA0;
- property RA1 : TBits_1 read getRA1 write setRA1;
- property RA10 : TBits_1 read getRA10 write setRA10;
- property RA14 : TBits_1 read getRA14 write setRA14;
- property RA15 : TBits_1 read getRA15 write setRA15;
- property RA2 : TBits_1 read getRA2 write setRA2;
- property RA3 : TBits_1 read getRA3 write setRA3;
- property RA4 : TBits_1 read getRA4 write setRA4;
- property RA5 : TBits_1 read getRA5 write setRA5;
- property RA6 : TBits_1 read getRA6 write setRA6;
- property RA7 : TBits_1 read getRA7 write setRA7;
- property RA9 : TBits_1 read getRA9 write setRA9;
- property w : TBits_32 read getw write setw;
- end;
- TPortA_bits=(RA0=0,RA1=1,RA2=2,RA3=3,RA4=4,RA5=5,RA6=6,RA7=7,RA9=9,RA10=10,RA14=14,RA15=15);
- TPortA_bitset = set of TPortA_bits;
- TPORTA_LATA = record
- private
- function getLATA0 : TBits_1; inline;
- function getLATA1 : TBits_1; inline;
- function getLATA10 : TBits_1; inline;
- function getLATA14 : TBits_1; inline;
- function getLATA15 : TBits_1; inline;
- function getLATA2 : TBits_1; inline;
- function getLATA3 : TBits_1; inline;
- function getLATA4 : TBits_1; inline;
- function getLATA5 : TBits_1; inline;
- function getLATA6 : TBits_1; inline;
- function getLATA7 : TBits_1; inline;
- function getLATA9 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setLATA0(thebits : TBits_1); inline;
- procedure setLATA1(thebits : TBits_1); inline;
- procedure setLATA10(thebits : TBits_1); inline;
- procedure setLATA14(thebits : TBits_1); inline;
- procedure setLATA15(thebits : TBits_1); inline;
- procedure setLATA2(thebits : TBits_1); inline;
- procedure setLATA3(thebits : TBits_1); inline;
- procedure setLATA4(thebits : TBits_1); inline;
- procedure setLATA5(thebits : TBits_1); inline;
- procedure setLATA6(thebits : TBits_1); inline;
- procedure setLATA7(thebits : TBits_1); inline;
- procedure setLATA9(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearLATA0; inline;
- procedure clearLATA10; inline;
- procedure clearLATA14; inline;
- procedure clearLATA15; inline;
- procedure clearLATA1; inline;
- procedure clearLATA2; inline;
- procedure clearLATA3; inline;
- procedure clearLATA4; inline;
- procedure clearLATA5; inline;
- procedure clearLATA6; inline;
- procedure clearLATA7; inline;
- procedure clearLATA9; inline;
- procedure setLATA0; inline;
- procedure setLATA10; inline;
- procedure setLATA14; inline;
- procedure setLATA15; inline;
- procedure setLATA1; inline;
- procedure setLATA2; inline;
- procedure setLATA3; inline;
- procedure setLATA4; inline;
- procedure setLATA5; inline;
- procedure setLATA6; inline;
- procedure setLATA7; inline;
- procedure setLATA9; inline;
- property LATA0 : TBits_1 read getLATA0 write setLATA0;
- property LATA1 : TBits_1 read getLATA1 write setLATA1;
- property LATA10 : TBits_1 read getLATA10 write setLATA10;
- property LATA14 : TBits_1 read getLATA14 write setLATA14;
- property LATA15 : TBits_1 read getLATA15 write setLATA15;
- property LATA2 : TBits_1 read getLATA2 write setLATA2;
- property LATA3 : TBits_1 read getLATA3 write setLATA3;
- property LATA4 : TBits_1 read getLATA4 write setLATA4;
- property LATA5 : TBits_1 read getLATA5 write setLATA5;
- property LATA6 : TBits_1 read getLATA6 write setLATA6;
- property LATA7 : TBits_1 read getLATA7 write setLATA7;
- property LATA9 : TBits_1 read getLATA9 write setLATA9;
- property w : TBits_32 read getw write setw;
- end;
- TPORTA_ODCA = record
- private
- function getODCA0 : TBits_1; inline;
- function getODCA1 : TBits_1; inline;
- function getODCA10 : TBits_1; inline;
- function getODCA14 : TBits_1; inline;
- function getODCA15 : TBits_1; inline;
- function getODCA2 : TBits_1; inline;
- function getODCA3 : TBits_1; inline;
- function getODCA4 : TBits_1; inline;
- function getODCA5 : TBits_1; inline;
- function getODCA6 : TBits_1; inline;
- function getODCA7 : TBits_1; inline;
- function getODCA9 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setODCA0(thebits : TBits_1); inline;
- procedure setODCA1(thebits : TBits_1); inline;
- procedure setODCA10(thebits : TBits_1); inline;
- procedure setODCA14(thebits : TBits_1); inline;
- procedure setODCA15(thebits : TBits_1); inline;
- procedure setODCA2(thebits : TBits_1); inline;
- procedure setODCA3(thebits : TBits_1); inline;
- procedure setODCA4(thebits : TBits_1); inline;
- procedure setODCA5(thebits : TBits_1); inline;
- procedure setODCA6(thebits : TBits_1); inline;
- procedure setODCA7(thebits : TBits_1); inline;
- procedure setODCA9(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearODCA0; inline;
- procedure clearODCA10; inline;
- procedure clearODCA14; inline;
- procedure clearODCA15; inline;
- procedure clearODCA1; inline;
- procedure clearODCA2; inline;
- procedure clearODCA3; inline;
- procedure clearODCA4; inline;
- procedure clearODCA5; inline;
- procedure clearODCA6; inline;
- procedure clearODCA7; inline;
- procedure clearODCA9; inline;
- procedure setODCA0; inline;
- procedure setODCA10; inline;
- procedure setODCA14; inline;
- procedure setODCA15; inline;
- procedure setODCA1; inline;
- procedure setODCA2; inline;
- procedure setODCA3; inline;
- procedure setODCA4; inline;
- procedure setODCA5; inline;
- procedure setODCA6; inline;
- procedure setODCA7; inline;
- procedure setODCA9; inline;
- property ODCA0 : TBits_1 read getODCA0 write setODCA0;
- property ODCA1 : TBits_1 read getODCA1 write setODCA1;
- property ODCA10 : TBits_1 read getODCA10 write setODCA10;
- property ODCA14 : TBits_1 read getODCA14 write setODCA14;
- property ODCA15 : TBits_1 read getODCA15 write setODCA15;
- property ODCA2 : TBits_1 read getODCA2 write setODCA2;
- property ODCA3 : TBits_1 read getODCA3 write setODCA3;
- property ODCA4 : TBits_1 read getODCA4 write setODCA4;
- property ODCA5 : TBits_1 read getODCA5 write setODCA5;
- property ODCA6 : TBits_1 read getODCA6 write setODCA6;
- property ODCA7 : TBits_1 read getODCA7 write setODCA7;
- property ODCA9 : TBits_1 read getODCA9 write setODCA9;
- property w : TBits_32 read getw write setw;
- end;
- type
- TPORTARegisters = record
- TRISAbits : TPORTA_TRISA;
- TRISA : longWord;
- TRISACLR : longWord;
- TRISASET : longWord;
- TRISAINV : longWord;
- PORTAbits : TPORTA_PORTA;
- PORTA : longWord;
- PORTACLR : longWord;
- PORTASET : longWord;
- PORTAINV : longWord;
- LATAbits : TPORTA_LATA;
- LATA : longWord;
- LATACLR : longWord;
- LATASET : longWord;
- LATAINV : longWord;
- ODCAbits : TPORTA_ODCA;
- ODCA : longWord;
- ODCACLR : longWord;
- ODCASET : longWord;
- ODCAINV : longWord;
- end;
- TPORTB_TRISB = record
- private
- function getTRISB0 : TBits_1; inline;
- function getTRISB1 : TBits_1; inline;
- function getTRISB10 : TBits_1; inline;
- function getTRISB11 : TBits_1; inline;
- function getTRISB12 : TBits_1; inline;
- function getTRISB13 : TBits_1; inline;
- function getTRISB14 : TBits_1; inline;
- function getTRISB15 : TBits_1; inline;
- function getTRISB2 : TBits_1; inline;
- function getTRISB3 : TBits_1; inline;
- function getTRISB4 : TBits_1; inline;
- function getTRISB5 : TBits_1; inline;
- function getTRISB6 : TBits_1; inline;
- function getTRISB7 : TBits_1; inline;
- function getTRISB8 : TBits_1; inline;
- function getTRISB9 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setTRISB0(thebits : TBits_1); inline;
- procedure setTRISB1(thebits : TBits_1); inline;
- procedure setTRISB10(thebits : TBits_1); inline;
- procedure setTRISB11(thebits : TBits_1); inline;
- procedure setTRISB12(thebits : TBits_1); inline;
- procedure setTRISB13(thebits : TBits_1); inline;
- procedure setTRISB14(thebits : TBits_1); inline;
- procedure setTRISB15(thebits : TBits_1); inline;
- procedure setTRISB2(thebits : TBits_1); inline;
- procedure setTRISB3(thebits : TBits_1); inline;
- procedure setTRISB4(thebits : TBits_1); inline;
- procedure setTRISB5(thebits : TBits_1); inline;
- procedure setTRISB6(thebits : TBits_1); inline;
- procedure setTRISB7(thebits : TBits_1); inline;
- procedure setTRISB8(thebits : TBits_1); inline;
- procedure setTRISB9(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearTRISB0; inline;
- procedure clearTRISB10; inline;
- procedure clearTRISB11; inline;
- procedure clearTRISB12; inline;
- procedure clearTRISB13; inline;
- procedure clearTRISB14; inline;
- procedure clearTRISB15; inline;
- procedure clearTRISB1; inline;
- procedure clearTRISB2; inline;
- procedure clearTRISB3; inline;
- procedure clearTRISB4; inline;
- procedure clearTRISB5; inline;
- procedure clearTRISB6; inline;
- procedure clearTRISB7; inline;
- procedure clearTRISB8; inline;
- procedure clearTRISB9; inline;
- procedure setTRISB0; inline;
- procedure setTRISB10; inline;
- procedure setTRISB11; inline;
- procedure setTRISB12; inline;
- procedure setTRISB13; inline;
- procedure setTRISB14; inline;
- procedure setTRISB15; inline;
- procedure setTRISB1; inline;
- procedure setTRISB2; inline;
- procedure setTRISB3; inline;
- procedure setTRISB4; inline;
- procedure setTRISB5; inline;
- procedure setTRISB6; inline;
- procedure setTRISB7; inline;
- procedure setTRISB8; inline;
- procedure setTRISB9; inline;
- property TRISB0 : TBits_1 read getTRISB0 write setTRISB0;
- property TRISB1 : TBits_1 read getTRISB1 write setTRISB1;
- property TRISB10 : TBits_1 read getTRISB10 write setTRISB10;
- property TRISB11 : TBits_1 read getTRISB11 write setTRISB11;
- property TRISB12 : TBits_1 read getTRISB12 write setTRISB12;
- property TRISB13 : TBits_1 read getTRISB13 write setTRISB13;
- property TRISB14 : TBits_1 read getTRISB14 write setTRISB14;
- property TRISB15 : TBits_1 read getTRISB15 write setTRISB15;
- property TRISB2 : TBits_1 read getTRISB2 write setTRISB2;
- property TRISB3 : TBits_1 read getTRISB3 write setTRISB3;
- property TRISB4 : TBits_1 read getTRISB4 write setTRISB4;
- property TRISB5 : TBits_1 read getTRISB5 write setTRISB5;
- property TRISB6 : TBits_1 read getTRISB6 write setTRISB6;
- property TRISB7 : TBits_1 read getTRISB7 write setTRISB7;
- property TRISB8 : TBits_1 read getTRISB8 write setTRISB8;
- property TRISB9 : TBits_1 read getTRISB9 write setTRISB9;
- property w : TBits_32 read getw write setw;
- end;
- TPORTB_PORTB = record
- private
- function getRB0 : TBits_1; inline;
- function getRB1 : TBits_1; inline;
- function getRB10 : TBits_1; inline;
- function getRB11 : TBits_1; inline;
- function getRB12 : TBits_1; inline;
- function getRB13 : TBits_1; inline;
- function getRB14 : TBits_1; inline;
- function getRB15 : TBits_1; inline;
- function getRB2 : TBits_1; inline;
- function getRB3 : TBits_1; inline;
- function getRB4 : TBits_1; inline;
- function getRB5 : TBits_1; inline;
- function getRB6 : TBits_1; inline;
- function getRB7 : TBits_1; inline;
- function getRB8 : TBits_1; inline;
- function getRB9 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setRB0(thebits : TBits_1); inline;
- procedure setRB1(thebits : TBits_1); inline;
- procedure setRB10(thebits : TBits_1); inline;
- procedure setRB11(thebits : TBits_1); inline;
- procedure setRB12(thebits : TBits_1); inline;
- procedure setRB13(thebits : TBits_1); inline;
- procedure setRB14(thebits : TBits_1); inline;
- procedure setRB15(thebits : TBits_1); inline;
- procedure setRB2(thebits : TBits_1); inline;
- procedure setRB3(thebits : TBits_1); inline;
- procedure setRB4(thebits : TBits_1); inline;
- procedure setRB5(thebits : TBits_1); inline;
- procedure setRB6(thebits : TBits_1); inline;
- procedure setRB7(thebits : TBits_1); inline;
- procedure setRB8(thebits : TBits_1); inline;
- procedure setRB9(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearRB0; inline;
- procedure clearRB10; inline;
- procedure clearRB11; inline;
- procedure clearRB12; inline;
- procedure clearRB13; inline;
- procedure clearRB14; inline;
- procedure clearRB15; inline;
- procedure clearRB1; inline;
- procedure clearRB2; inline;
- procedure clearRB3; inline;
- procedure clearRB4; inline;
- procedure clearRB5; inline;
- procedure clearRB6; inline;
- procedure clearRB7; inline;
- procedure clearRB8; inline;
- procedure clearRB9; inline;
- procedure setRB0; inline;
- procedure setRB10; inline;
- procedure setRB11; inline;
- procedure setRB12; inline;
- procedure setRB13; inline;
- procedure setRB14; inline;
- procedure setRB15; inline;
- procedure setRB1; inline;
- procedure setRB2; inline;
- procedure setRB3; inline;
- procedure setRB4; inline;
- procedure setRB5; inline;
- procedure setRB6; inline;
- procedure setRB7; inline;
- procedure setRB8; inline;
- procedure setRB9; inline;
- property RB0 : TBits_1 read getRB0 write setRB0;
- property RB1 : TBits_1 read getRB1 write setRB1;
- property RB10 : TBits_1 read getRB10 write setRB10;
- property RB11 : TBits_1 read getRB11 write setRB11;
- property RB12 : TBits_1 read getRB12 write setRB12;
- property RB13 : TBits_1 read getRB13 write setRB13;
- property RB14 : TBits_1 read getRB14 write setRB14;
- property RB15 : TBits_1 read getRB15 write setRB15;
- property RB2 : TBits_1 read getRB2 write setRB2;
- property RB3 : TBits_1 read getRB3 write setRB3;
- property RB4 : TBits_1 read getRB4 write setRB4;
- property RB5 : TBits_1 read getRB5 write setRB5;
- property RB6 : TBits_1 read getRB6 write setRB6;
- property RB7 : TBits_1 read getRB7 write setRB7;
- property RB8 : TBits_1 read getRB8 write setRB8;
- property RB9 : TBits_1 read getRB9 write setRB9;
- property w : TBits_32 read getw write setw;
- end;
- TPortB_bits=(RB0=0,RB1=1,RB2=2,RB3=3,RB4=4,RB5=5,RB6=6,RB7=7,RB8=8,RB9=9,RB10=10,RB11=11,RB12=12,RB13=13,RB14=14,RB15=15);
- TPortB_bitset = set of TPortB_bits;
- TPORTB_LATB = record
- private
- function getLATB0 : TBits_1; inline;
- function getLATB1 : TBits_1; inline;
- function getLATB10 : TBits_1; inline;
- function getLATB11 : TBits_1; inline;
- function getLATB12 : TBits_1; inline;
- function getLATB13 : TBits_1; inline;
- function getLATB14 : TBits_1; inline;
- function getLATB15 : TBits_1; inline;
- function getLATB2 : TBits_1; inline;
- function getLATB3 : TBits_1; inline;
- function getLATB4 : TBits_1; inline;
- function getLATB5 : TBits_1; inline;
- function getLATB6 : TBits_1; inline;
- function getLATB7 : TBits_1; inline;
- function getLATB8 : TBits_1; inline;
- function getLATB9 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setLATB0(thebits : TBits_1); inline;
- procedure setLATB1(thebits : TBits_1); inline;
- procedure setLATB10(thebits : TBits_1); inline;
- procedure setLATB11(thebits : TBits_1); inline;
- procedure setLATB12(thebits : TBits_1); inline;
- procedure setLATB13(thebits : TBits_1); inline;
- procedure setLATB14(thebits : TBits_1); inline;
- procedure setLATB15(thebits : TBits_1); inline;
- procedure setLATB2(thebits : TBits_1); inline;
- procedure setLATB3(thebits : TBits_1); inline;
- procedure setLATB4(thebits : TBits_1); inline;
- procedure setLATB5(thebits : TBits_1); inline;
- procedure setLATB6(thebits : TBits_1); inline;
- procedure setLATB7(thebits : TBits_1); inline;
- procedure setLATB8(thebits : TBits_1); inline;
- procedure setLATB9(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearLATB0; inline;
- procedure clearLATB10; inline;
- procedure clearLATB11; inline;
- procedure clearLATB12; inline;
- procedure clearLATB13; inline;
- procedure clearLATB14; inline;
- procedure clearLATB15; inline;
- procedure clearLATB1; inline;
- procedure clearLATB2; inline;
- procedure clearLATB3; inline;
- procedure clearLATB4; inline;
- procedure clearLATB5; inline;
- procedure clearLATB6; inline;
- procedure clearLATB7; inline;
- procedure clearLATB8; inline;
- procedure clearLATB9; inline;
- procedure setLATB0; inline;
- procedure setLATB10; inline;
- procedure setLATB11; inline;
- procedure setLATB12; inline;
- procedure setLATB13; inline;
- procedure setLATB14; inline;
- procedure setLATB15; inline;
- procedure setLATB1; inline;
- procedure setLATB2; inline;
- procedure setLATB3; inline;
- procedure setLATB4; inline;
- procedure setLATB5; inline;
- procedure setLATB6; inline;
- procedure setLATB7; inline;
- procedure setLATB8; inline;
- procedure setLATB9; inline;
- property LATB0 : TBits_1 read getLATB0 write setLATB0;
- property LATB1 : TBits_1 read getLATB1 write setLATB1;
- property LATB10 : TBits_1 read getLATB10 write setLATB10;
- property LATB11 : TBits_1 read getLATB11 write setLATB11;
- property LATB12 : TBits_1 read getLATB12 write setLATB12;
- property LATB13 : TBits_1 read getLATB13 write setLATB13;
- property LATB14 : TBits_1 read getLATB14 write setLATB14;
- property LATB15 : TBits_1 read getLATB15 write setLATB15;
- property LATB2 : TBits_1 read getLATB2 write setLATB2;
- property LATB3 : TBits_1 read getLATB3 write setLATB3;
- property LATB4 : TBits_1 read getLATB4 write setLATB4;
- property LATB5 : TBits_1 read getLATB5 write setLATB5;
- property LATB6 : TBits_1 read getLATB6 write setLATB6;
- property LATB7 : TBits_1 read getLATB7 write setLATB7;
- property LATB8 : TBits_1 read getLATB8 write setLATB8;
- property LATB9 : TBits_1 read getLATB9 write setLATB9;
- property w : TBits_32 read getw write setw;
- end;
- TPORTB_ODCB = record
- private
- function getODCB0 : TBits_1; inline;
- function getODCB1 : TBits_1; inline;
- function getODCB10 : TBits_1; inline;
- function getODCB11 : TBits_1; inline;
- function getODCB12 : TBits_1; inline;
- function getODCB13 : TBits_1; inline;
- function getODCB14 : TBits_1; inline;
- function getODCB15 : TBits_1; inline;
- function getODCB2 : TBits_1; inline;
- function getODCB3 : TBits_1; inline;
- function getODCB4 : TBits_1; inline;
- function getODCB5 : TBits_1; inline;
- function getODCB6 : TBits_1; inline;
- function getODCB7 : TBits_1; inline;
- function getODCB8 : TBits_1; inline;
- function getODCB9 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setODCB0(thebits : TBits_1); inline;
- procedure setODCB1(thebits : TBits_1); inline;
- procedure setODCB10(thebits : TBits_1); inline;
- procedure setODCB11(thebits : TBits_1); inline;
- procedure setODCB12(thebits : TBits_1); inline;
- procedure setODCB13(thebits : TBits_1); inline;
- procedure setODCB14(thebits : TBits_1); inline;
- procedure setODCB15(thebits : TBits_1); inline;
- procedure setODCB2(thebits : TBits_1); inline;
- procedure setODCB3(thebits : TBits_1); inline;
- procedure setODCB4(thebits : TBits_1); inline;
- procedure setODCB5(thebits : TBits_1); inline;
- procedure setODCB6(thebits : TBits_1); inline;
- procedure setODCB7(thebits : TBits_1); inline;
- procedure setODCB8(thebits : TBits_1); inline;
- procedure setODCB9(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearODCB0; inline;
- procedure clearODCB10; inline;
- procedure clearODCB11; inline;
- procedure clearODCB12; inline;
- procedure clearODCB13; inline;
- procedure clearODCB14; inline;
- procedure clearODCB15; inline;
- procedure clearODCB1; inline;
- procedure clearODCB2; inline;
- procedure clearODCB3; inline;
- procedure clearODCB4; inline;
- procedure clearODCB5; inline;
- procedure clearODCB6; inline;
- procedure clearODCB7; inline;
- procedure clearODCB8; inline;
- procedure clearODCB9; inline;
- procedure setODCB0; inline;
- procedure setODCB10; inline;
- procedure setODCB11; inline;
- procedure setODCB12; inline;
- procedure setODCB13; inline;
- procedure setODCB14; inline;
- procedure setODCB15; inline;
- procedure setODCB1; inline;
- procedure setODCB2; inline;
- procedure setODCB3; inline;
- procedure setODCB4; inline;
- procedure setODCB5; inline;
- procedure setODCB6; inline;
- procedure setODCB7; inline;
- procedure setODCB8; inline;
- procedure setODCB9; inline;
- property ODCB0 : TBits_1 read getODCB0 write setODCB0;
- property ODCB1 : TBits_1 read getODCB1 write setODCB1;
- property ODCB10 : TBits_1 read getODCB10 write setODCB10;
- property ODCB11 : TBits_1 read getODCB11 write setODCB11;
- property ODCB12 : TBits_1 read getODCB12 write setODCB12;
- property ODCB13 : TBits_1 read getODCB13 write setODCB13;
- property ODCB14 : TBits_1 read getODCB14 write setODCB14;
- property ODCB15 : TBits_1 read getODCB15 write setODCB15;
- property ODCB2 : TBits_1 read getODCB2 write setODCB2;
- property ODCB3 : TBits_1 read getODCB3 write setODCB3;
- property ODCB4 : TBits_1 read getODCB4 write setODCB4;
- property ODCB5 : TBits_1 read getODCB5 write setODCB5;
- property ODCB6 : TBits_1 read getODCB6 write setODCB6;
- property ODCB7 : TBits_1 read getODCB7 write setODCB7;
- property ODCB8 : TBits_1 read getODCB8 write setODCB8;
- property ODCB9 : TBits_1 read getODCB9 write setODCB9;
- property w : TBits_32 read getw write setw;
- end;
- type
- TPORTBRegisters = record
- TRISBbits : TPORTB_TRISB;
- TRISB : longWord;
- TRISBCLR : longWord;
- TRISBSET : longWord;
- TRISBINV : longWord;
- PORTBbits : TPORTB_PORTB;
- PORTB : longWord;
- PORTBCLR : longWord;
- PORTBSET : longWord;
- PORTBINV : longWord;
- LATBbits : TPORTB_LATB;
- LATB : longWord;
- LATBCLR : longWord;
- LATBSET : longWord;
- LATBINV : longWord;
- ODCBbits : TPORTB_ODCB;
- ODCB : longWord;
- ODCBCLR : longWord;
- ODCBSET : longWord;
- ODCBINV : longWord;
- end;
- TPORTC_TRISC = record
- private
- function getTRISC1 : TBits_1; inline;
- function getTRISC12 : TBits_1; inline;
- function getTRISC13 : TBits_1; inline;
- function getTRISC14 : TBits_1; inline;
- function getTRISC15 : TBits_1; inline;
- function getTRISC2 : TBits_1; inline;
- function getTRISC3 : TBits_1; inline;
- function getTRISC4 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setTRISC1(thebits : TBits_1); inline;
- procedure setTRISC12(thebits : TBits_1); inline;
- procedure setTRISC13(thebits : TBits_1); inline;
- procedure setTRISC14(thebits : TBits_1); inline;
- procedure setTRISC15(thebits : TBits_1); inline;
- procedure setTRISC2(thebits : TBits_1); inline;
- procedure setTRISC3(thebits : TBits_1); inline;
- procedure setTRISC4(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearTRISC12; inline;
- procedure clearTRISC13; inline;
- procedure clearTRISC14; inline;
- procedure clearTRISC15; inline;
- procedure clearTRISC1; inline;
- procedure clearTRISC2; inline;
- procedure clearTRISC3; inline;
- procedure clearTRISC4; inline;
- procedure setTRISC12; inline;
- procedure setTRISC13; inline;
- procedure setTRISC14; inline;
- procedure setTRISC15; inline;
- procedure setTRISC1; inline;
- procedure setTRISC2; inline;
- procedure setTRISC3; inline;
- procedure setTRISC4; inline;
- property TRISC1 : TBits_1 read getTRISC1 write setTRISC1;
- property TRISC12 : TBits_1 read getTRISC12 write setTRISC12;
- property TRISC13 : TBits_1 read getTRISC13 write setTRISC13;
- property TRISC14 : TBits_1 read getTRISC14 write setTRISC14;
- property TRISC15 : TBits_1 read getTRISC15 write setTRISC15;
- property TRISC2 : TBits_1 read getTRISC2 write setTRISC2;
- property TRISC3 : TBits_1 read getTRISC3 write setTRISC3;
- property TRISC4 : TBits_1 read getTRISC4 write setTRISC4;
- property w : TBits_32 read getw write setw;
- end;
- TPORTC_PORTC = record
- private
- function getRC1 : TBits_1; inline;
- function getRC12 : TBits_1; inline;
- function getRC13 : TBits_1; inline;
- function getRC14 : TBits_1; inline;
- function getRC15 : TBits_1; inline;
- function getRC2 : TBits_1; inline;
- function getRC3 : TBits_1; inline;
- function getRC4 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setRC1(thebits : TBits_1); inline;
- procedure setRC12(thebits : TBits_1); inline;
- procedure setRC13(thebits : TBits_1); inline;
- procedure setRC14(thebits : TBits_1); inline;
- procedure setRC15(thebits : TBits_1); inline;
- procedure setRC2(thebits : TBits_1); inline;
- procedure setRC3(thebits : TBits_1); inline;
- procedure setRC4(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearRC12; inline;
- procedure clearRC13; inline;
- procedure clearRC14; inline;
- procedure clearRC15; inline;
- procedure clearRC1; inline;
- procedure clearRC2; inline;
- procedure clearRC3; inline;
- procedure clearRC4; inline;
- procedure setRC12; inline;
- procedure setRC13; inline;
- procedure setRC14; inline;
- procedure setRC15; inline;
- procedure setRC1; inline;
- procedure setRC2; inline;
- procedure setRC3; inline;
- procedure setRC4; inline;
- property RC1 : TBits_1 read getRC1 write setRC1;
- property RC12 : TBits_1 read getRC12 write setRC12;
- property RC13 : TBits_1 read getRC13 write setRC13;
- property RC14 : TBits_1 read getRC14 write setRC14;
- property RC15 : TBits_1 read getRC15 write setRC15;
- property RC2 : TBits_1 read getRC2 write setRC2;
- property RC3 : TBits_1 read getRC3 write setRC3;
- property RC4 : TBits_1 read getRC4 write setRC4;
- property w : TBits_32 read getw write setw;
- end;
- TPortC_bits=(RC1=1,RC2=2,RC3=3,RC4=4,RC12=12,RC13=13,RC14=14,RC15=15);
- TPortC_bitset = set of TPortC_bits;
- TPORTC_LATC = record
- private
- function getLATC1 : TBits_1; inline;
- function getLATC12 : TBits_1; inline;
- function getLATC13 : TBits_1; inline;
- function getLATC14 : TBits_1; inline;
- function getLATC15 : TBits_1; inline;
- function getLATC2 : TBits_1; inline;
- function getLATC3 : TBits_1; inline;
- function getLATC4 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setLATC1(thebits : TBits_1); inline;
- procedure setLATC12(thebits : TBits_1); inline;
- procedure setLATC13(thebits : TBits_1); inline;
- procedure setLATC14(thebits : TBits_1); inline;
- procedure setLATC15(thebits : TBits_1); inline;
- procedure setLATC2(thebits : TBits_1); inline;
- procedure setLATC3(thebits : TBits_1); inline;
- procedure setLATC4(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearLATC12; inline;
- procedure clearLATC13; inline;
- procedure clearLATC14; inline;
- procedure clearLATC15; inline;
- procedure clearLATC1; inline;
- procedure clearLATC2; inline;
- procedure clearLATC3; inline;
- procedure clearLATC4; inline;
- procedure setLATC12; inline;
- procedure setLATC13; inline;
- procedure setLATC14; inline;
- procedure setLATC15; inline;
- procedure setLATC1; inline;
- procedure setLATC2; inline;
- procedure setLATC3; inline;
- procedure setLATC4; inline;
- property LATC1 : TBits_1 read getLATC1 write setLATC1;
- property LATC12 : TBits_1 read getLATC12 write setLATC12;
- property LATC13 : TBits_1 read getLATC13 write setLATC13;
- property LATC14 : TBits_1 read getLATC14 write setLATC14;
- property LATC15 : TBits_1 read getLATC15 write setLATC15;
- property LATC2 : TBits_1 read getLATC2 write setLATC2;
- property LATC3 : TBits_1 read getLATC3 write setLATC3;
- property LATC4 : TBits_1 read getLATC4 write setLATC4;
- property w : TBits_32 read getw write setw;
- end;
- TPORTC_ODCC = record
- private
- function getODCC1 : TBits_1; inline;
- function getODCC12 : TBits_1; inline;
- function getODCC13 : TBits_1; inline;
- function getODCC14 : TBits_1; inline;
- function getODCC15 : TBits_1; inline;
- function getODCC2 : TBits_1; inline;
- function getODCC3 : TBits_1; inline;
- function getODCC4 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setODCC1(thebits : TBits_1); inline;
- procedure setODCC12(thebits : TBits_1); inline;
- procedure setODCC13(thebits : TBits_1); inline;
- procedure setODCC14(thebits : TBits_1); inline;
- procedure setODCC15(thebits : TBits_1); inline;
- procedure setODCC2(thebits : TBits_1); inline;
- procedure setODCC3(thebits : TBits_1); inline;
- procedure setODCC4(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearODCC12; inline;
- procedure clearODCC13; inline;
- procedure clearODCC14; inline;
- procedure clearODCC15; inline;
- procedure clearODCC1; inline;
- procedure clearODCC2; inline;
- procedure clearODCC3; inline;
- procedure clearODCC4; inline;
- procedure setODCC12; inline;
- procedure setODCC13; inline;
- procedure setODCC14; inline;
- procedure setODCC15; inline;
- procedure setODCC1; inline;
- procedure setODCC2; inline;
- procedure setODCC3; inline;
- procedure setODCC4; inline;
- property ODCC1 : TBits_1 read getODCC1 write setODCC1;
- property ODCC12 : TBits_1 read getODCC12 write setODCC12;
- property ODCC13 : TBits_1 read getODCC13 write setODCC13;
- property ODCC14 : TBits_1 read getODCC14 write setODCC14;
- property ODCC15 : TBits_1 read getODCC15 write setODCC15;
- property ODCC2 : TBits_1 read getODCC2 write setODCC2;
- property ODCC3 : TBits_1 read getODCC3 write setODCC3;
- property ODCC4 : TBits_1 read getODCC4 write setODCC4;
- property w : TBits_32 read getw write setw;
- end;
- type
- TPORTCRegisters = record
- TRISCbits : TPORTC_TRISC;
- TRISC : longWord;
- TRISCCLR : longWord;
- TRISCSET : longWord;
- TRISCINV : longWord;
- PORTCbits : TPORTC_PORTC;
- PORTC : longWord;
- PORTCCLR : longWord;
- PORTCSET : longWord;
- PORTCINV : longWord;
- LATCbits : TPORTC_LATC;
- LATC : longWord;
- LATCCLR : longWord;
- LATCSET : longWord;
- LATCINV : longWord;
- ODCCbits : TPORTC_ODCC;
- ODCC : longWord;
- ODCCCLR : longWord;
- ODCCSET : longWord;
- ODCCINV : longWord;
- end;
- TPORTD_TRISD = record
- private
- function getTRISD0 : TBits_1; inline;
- function getTRISD1 : TBits_1; inline;
- function getTRISD10 : TBits_1; inline;
- function getTRISD11 : TBits_1; inline;
- function getTRISD12 : TBits_1; inline;
- function getTRISD13 : TBits_1; inline;
- function getTRISD14 : TBits_1; inline;
- function getTRISD15 : TBits_1; inline;
- function getTRISD2 : TBits_1; inline;
- function getTRISD3 : TBits_1; inline;
- function getTRISD4 : TBits_1; inline;
- function getTRISD5 : TBits_1; inline;
- function getTRISD6 : TBits_1; inline;
- function getTRISD7 : TBits_1; inline;
- function getTRISD8 : TBits_1; inline;
- function getTRISD9 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setTRISD0(thebits : TBits_1); inline;
- procedure setTRISD1(thebits : TBits_1); inline;
- procedure setTRISD10(thebits : TBits_1); inline;
- procedure setTRISD11(thebits : TBits_1); inline;
- procedure setTRISD12(thebits : TBits_1); inline;
- procedure setTRISD13(thebits : TBits_1); inline;
- procedure setTRISD14(thebits : TBits_1); inline;
- procedure setTRISD15(thebits : TBits_1); inline;
- procedure setTRISD2(thebits : TBits_1); inline;
- procedure setTRISD3(thebits : TBits_1); inline;
- procedure setTRISD4(thebits : TBits_1); inline;
- procedure setTRISD5(thebits : TBits_1); inline;
- procedure setTRISD6(thebits : TBits_1); inline;
- procedure setTRISD7(thebits : TBits_1); inline;
- procedure setTRISD8(thebits : TBits_1); inline;
- procedure setTRISD9(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearTRISD0; inline;
- procedure clearTRISD10; inline;
- procedure clearTRISD11; inline;
- procedure clearTRISD12; inline;
- procedure clearTRISD13; inline;
- procedure clearTRISD14; inline;
- procedure clearTRISD15; inline;
- procedure clearTRISD1; inline;
- procedure clearTRISD2; inline;
- procedure clearTRISD3; inline;
- procedure clearTRISD4; inline;
- procedure clearTRISD5; inline;
- procedure clearTRISD6; inline;
- procedure clearTRISD7; inline;
- procedure clearTRISD8; inline;
- procedure clearTRISD9; inline;
- procedure setTRISD0; inline;
- procedure setTRISD10; inline;
- procedure setTRISD11; inline;
- procedure setTRISD12; inline;
- procedure setTRISD13; inline;
- procedure setTRISD14; inline;
- procedure setTRISD15; inline;
- procedure setTRISD1; inline;
- procedure setTRISD2; inline;
- procedure setTRISD3; inline;
- procedure setTRISD4; inline;
- procedure setTRISD5; inline;
- procedure setTRISD6; inline;
- procedure setTRISD7; inline;
- procedure setTRISD8; inline;
- procedure setTRISD9; inline;
- property TRISD0 : TBits_1 read getTRISD0 write setTRISD0;
- property TRISD1 : TBits_1 read getTRISD1 write setTRISD1;
- property TRISD10 : TBits_1 read getTRISD10 write setTRISD10;
- property TRISD11 : TBits_1 read getTRISD11 write setTRISD11;
- property TRISD12 : TBits_1 read getTRISD12 write setTRISD12;
- property TRISD13 : TBits_1 read getTRISD13 write setTRISD13;
- property TRISD14 : TBits_1 read getTRISD14 write setTRISD14;
- property TRISD15 : TBits_1 read getTRISD15 write setTRISD15;
- property TRISD2 : TBits_1 read getTRISD2 write setTRISD2;
- property TRISD3 : TBits_1 read getTRISD3 write setTRISD3;
- property TRISD4 : TBits_1 read getTRISD4 write setTRISD4;
- property TRISD5 : TBits_1 read getTRISD5 write setTRISD5;
- property TRISD6 : TBits_1 read getTRISD6 write setTRISD6;
- property TRISD7 : TBits_1 read getTRISD7 write setTRISD7;
- property TRISD8 : TBits_1 read getTRISD8 write setTRISD8;
- property TRISD9 : TBits_1 read getTRISD9 write setTRISD9;
- property w : TBits_32 read getw write setw;
- end;
- TPORTD_PORTD = record
- private
- function getRD0 : TBits_1; inline;
- function getRD1 : TBits_1; inline;
- function getRD10 : TBits_1; inline;
- function getRD11 : TBits_1; inline;
- function getRD12 : TBits_1; inline;
- function getRD13 : TBits_1; inline;
- function getRD14 : TBits_1; inline;
- function getRD15 : TBits_1; inline;
- function getRD2 : TBits_1; inline;
- function getRD3 : TBits_1; inline;
- function getRD4 : TBits_1; inline;
- function getRD5 : TBits_1; inline;
- function getRD6 : TBits_1; inline;
- function getRD7 : TBits_1; inline;
- function getRD8 : TBits_1; inline;
- function getRD9 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setRD0(thebits : TBits_1); inline;
- procedure setRD1(thebits : TBits_1); inline;
- procedure setRD10(thebits : TBits_1); inline;
- procedure setRD11(thebits : TBits_1); inline;
- procedure setRD12(thebits : TBits_1); inline;
- procedure setRD13(thebits : TBits_1); inline;
- procedure setRD14(thebits : TBits_1); inline;
- procedure setRD15(thebits : TBits_1); inline;
- procedure setRD2(thebits : TBits_1); inline;
- procedure setRD3(thebits : TBits_1); inline;
- procedure setRD4(thebits : TBits_1); inline;
- procedure setRD5(thebits : TBits_1); inline;
- procedure setRD6(thebits : TBits_1); inline;
- procedure setRD7(thebits : TBits_1); inline;
- procedure setRD8(thebits : TBits_1); inline;
- procedure setRD9(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearRD0; inline;
- procedure clearRD10; inline;
- procedure clearRD11; inline;
- procedure clearRD12; inline;
- procedure clearRD13; inline;
- procedure clearRD14; inline;
- procedure clearRD15; inline;
- procedure clearRD1; inline;
- procedure clearRD2; inline;
- procedure clearRD3; inline;
- procedure clearRD4; inline;
- procedure clearRD5; inline;
- procedure clearRD6; inline;
- procedure clearRD7; inline;
- procedure clearRD8; inline;
- procedure clearRD9; inline;
- procedure setRD0; inline;
- procedure setRD10; inline;
- procedure setRD11; inline;
- procedure setRD12; inline;
- procedure setRD13; inline;
- procedure setRD14; inline;
- procedure setRD15; inline;
- procedure setRD1; inline;
- procedure setRD2; inline;
- procedure setRD3; inline;
- procedure setRD4; inline;
- procedure setRD5; inline;
- procedure setRD6; inline;
- procedure setRD7; inline;
- procedure setRD8; inline;
- procedure setRD9; inline;
- property RD0 : TBits_1 read getRD0 write setRD0;
- property RD1 : TBits_1 read getRD1 write setRD1;
- property RD10 : TBits_1 read getRD10 write setRD10;
- property RD11 : TBits_1 read getRD11 write setRD11;
- property RD12 : TBits_1 read getRD12 write setRD12;
- property RD13 : TBits_1 read getRD13 write setRD13;
- property RD14 : TBits_1 read getRD14 write setRD14;
- property RD15 : TBits_1 read getRD15 write setRD15;
- property RD2 : TBits_1 read getRD2 write setRD2;
- property RD3 : TBits_1 read getRD3 write setRD3;
- property RD4 : TBits_1 read getRD4 write setRD4;
- property RD5 : TBits_1 read getRD5 write setRD5;
- property RD6 : TBits_1 read getRD6 write setRD6;
- property RD7 : TBits_1 read getRD7 write setRD7;
- property RD8 : TBits_1 read getRD8 write setRD8;
- property RD9 : TBits_1 read getRD9 write setRD9;
- property w : TBits_32 read getw write setw;
- end;
- TPortD_bits=(RD0=0,RD1=1,RD2=2,RD3=3,RD4=4,RD5=5,RD6=6,RD7=7,RD8=8,RD9=9,RD10=10,RD11=11,RD12=12,RD13=13,RD14=14,RD15=15);
- TPortD_bitset = set of TPortD_bits;
- TPORTD_LATD = record
- private
- function getLATD0 : TBits_1; inline;
- function getLATD1 : TBits_1; inline;
- function getLATD10 : TBits_1; inline;
- function getLATD11 : TBits_1; inline;
- function getLATD12 : TBits_1; inline;
- function getLATD13 : TBits_1; inline;
- function getLATD14 : TBits_1; inline;
- function getLATD15 : TBits_1; inline;
- function getLATD2 : TBits_1; inline;
- function getLATD3 : TBits_1; inline;
- function getLATD4 : TBits_1; inline;
- function getLATD5 : TBits_1; inline;
- function getLATD6 : TBits_1; inline;
- function getLATD7 : TBits_1; inline;
- function getLATD8 : TBits_1; inline;
- function getLATD9 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setLATD0(thebits : TBits_1); inline;
- procedure setLATD1(thebits : TBits_1); inline;
- procedure setLATD10(thebits : TBits_1); inline;
- procedure setLATD11(thebits : TBits_1); inline;
- procedure setLATD12(thebits : TBits_1); inline;
- procedure setLATD13(thebits : TBits_1); inline;
- procedure setLATD14(thebits : TBits_1); inline;
- procedure setLATD15(thebits : TBits_1); inline;
- procedure setLATD2(thebits : TBits_1); inline;
- procedure setLATD3(thebits : TBits_1); inline;
- procedure setLATD4(thebits : TBits_1); inline;
- procedure setLATD5(thebits : TBits_1); inline;
- procedure setLATD6(thebits : TBits_1); inline;
- procedure setLATD7(thebits : TBits_1); inline;
- procedure setLATD8(thebits : TBits_1); inline;
- procedure setLATD9(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearLATD0; inline;
- procedure clearLATD10; inline;
- procedure clearLATD11; inline;
- procedure clearLATD12; inline;
- procedure clearLATD13; inline;
- procedure clearLATD14; inline;
- procedure clearLATD15; inline;
- procedure clearLATD1; inline;
- procedure clearLATD2; inline;
- procedure clearLATD3; inline;
- procedure clearLATD4; inline;
- procedure clearLATD5; inline;
- procedure clearLATD6; inline;
- procedure clearLATD7; inline;
- procedure clearLATD8; inline;
- procedure clearLATD9; inline;
- procedure setLATD0; inline;
- procedure setLATD10; inline;
- procedure setLATD11; inline;
- procedure setLATD12; inline;
- procedure setLATD13; inline;
- procedure setLATD14; inline;
- procedure setLATD15; inline;
- procedure setLATD1; inline;
- procedure setLATD2; inline;
- procedure setLATD3; inline;
- procedure setLATD4; inline;
- procedure setLATD5; inline;
- procedure setLATD6; inline;
- procedure setLATD7; inline;
- procedure setLATD8; inline;
- procedure setLATD9; inline;
- property LATD0 : TBits_1 read getLATD0 write setLATD0;
- property LATD1 : TBits_1 read getLATD1 write setLATD1;
- property LATD10 : TBits_1 read getLATD10 write setLATD10;
- property LATD11 : TBits_1 read getLATD11 write setLATD11;
- property LATD12 : TBits_1 read getLATD12 write setLATD12;
- property LATD13 : TBits_1 read getLATD13 write setLATD13;
- property LATD14 : TBits_1 read getLATD14 write setLATD14;
- property LATD15 : TBits_1 read getLATD15 write setLATD15;
- property LATD2 : TBits_1 read getLATD2 write setLATD2;
- property LATD3 : TBits_1 read getLATD3 write setLATD3;
- property LATD4 : TBits_1 read getLATD4 write setLATD4;
- property LATD5 : TBits_1 read getLATD5 write setLATD5;
- property LATD6 : TBits_1 read getLATD6 write setLATD6;
- property LATD7 : TBits_1 read getLATD7 write setLATD7;
- property LATD8 : TBits_1 read getLATD8 write setLATD8;
- property LATD9 : TBits_1 read getLATD9 write setLATD9;
- property w : TBits_32 read getw write setw;
- end;
- TPORTD_ODCD = record
- private
- function getODCD0 : TBits_1; inline;
- function getODCD1 : TBits_1; inline;
- function getODCD10 : TBits_1; inline;
- function getODCD11 : TBits_1; inline;
- function getODCD12 : TBits_1; inline;
- function getODCD13 : TBits_1; inline;
- function getODCD14 : TBits_1; inline;
- function getODCD15 : TBits_1; inline;
- function getODCD2 : TBits_1; inline;
- function getODCD3 : TBits_1; inline;
- function getODCD4 : TBits_1; inline;
- function getODCD5 : TBits_1; inline;
- function getODCD6 : TBits_1; inline;
- function getODCD7 : TBits_1; inline;
- function getODCD8 : TBits_1; inline;
- function getODCD9 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setODCD0(thebits : TBits_1); inline;
- procedure setODCD1(thebits : TBits_1); inline;
- procedure setODCD10(thebits : TBits_1); inline;
- procedure setODCD11(thebits : TBits_1); inline;
- procedure setODCD12(thebits : TBits_1); inline;
- procedure setODCD13(thebits : TBits_1); inline;
- procedure setODCD14(thebits : TBits_1); inline;
- procedure setODCD15(thebits : TBits_1); inline;
- procedure setODCD2(thebits : TBits_1); inline;
- procedure setODCD3(thebits : TBits_1); inline;
- procedure setODCD4(thebits : TBits_1); inline;
- procedure setODCD5(thebits : TBits_1); inline;
- procedure setODCD6(thebits : TBits_1); inline;
- procedure setODCD7(thebits : TBits_1); inline;
- procedure setODCD8(thebits : TBits_1); inline;
- procedure setODCD9(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearODCD0; inline;
- procedure clearODCD10; inline;
- procedure clearODCD11; inline;
- procedure clearODCD12; inline;
- procedure clearODCD13; inline;
- procedure clearODCD14; inline;
- procedure clearODCD15; inline;
- procedure clearODCD1; inline;
- procedure clearODCD2; inline;
- procedure clearODCD3; inline;
- procedure clearODCD4; inline;
- procedure clearODCD5; inline;
- procedure clearODCD6; inline;
- procedure clearODCD7; inline;
- procedure clearODCD8; inline;
- procedure clearODCD9; inline;
- procedure setODCD0; inline;
- procedure setODCD10; inline;
- procedure setODCD11; inline;
- procedure setODCD12; inline;
- procedure setODCD13; inline;
- procedure setODCD14; inline;
- procedure setODCD15; inline;
- procedure setODCD1; inline;
- procedure setODCD2; inline;
- procedure setODCD3; inline;
- procedure setODCD4; inline;
- procedure setODCD5; inline;
- procedure setODCD6; inline;
- procedure setODCD7; inline;
- procedure setODCD8; inline;
- procedure setODCD9; inline;
- property ODCD0 : TBits_1 read getODCD0 write setODCD0;
- property ODCD1 : TBits_1 read getODCD1 write setODCD1;
- property ODCD10 : TBits_1 read getODCD10 write setODCD10;
- property ODCD11 : TBits_1 read getODCD11 write setODCD11;
- property ODCD12 : TBits_1 read getODCD12 write setODCD12;
- property ODCD13 : TBits_1 read getODCD13 write setODCD13;
- property ODCD14 : TBits_1 read getODCD14 write setODCD14;
- property ODCD15 : TBits_1 read getODCD15 write setODCD15;
- property ODCD2 : TBits_1 read getODCD2 write setODCD2;
- property ODCD3 : TBits_1 read getODCD3 write setODCD3;
- property ODCD4 : TBits_1 read getODCD4 write setODCD4;
- property ODCD5 : TBits_1 read getODCD5 write setODCD5;
- property ODCD6 : TBits_1 read getODCD6 write setODCD6;
- property ODCD7 : TBits_1 read getODCD7 write setODCD7;
- property ODCD8 : TBits_1 read getODCD8 write setODCD8;
- property ODCD9 : TBits_1 read getODCD9 write setODCD9;
- property w : TBits_32 read getw write setw;
- end;
- type
- TPORTDRegisters = record
- TRISDbits : TPORTD_TRISD;
- TRISD : longWord;
- TRISDCLR : longWord;
- TRISDSET : longWord;
- TRISDINV : longWord;
- PORTDbits : TPORTD_PORTD;
- PORTD : longWord;
- PORTDCLR : longWord;
- PORTDSET : longWord;
- PORTDINV : longWord;
- LATDbits : TPORTD_LATD;
- LATD : longWord;
- LATDCLR : longWord;
- LATDSET : longWord;
- LATDINV : longWord;
- ODCDbits : TPORTD_ODCD;
- ODCD : longWord;
- ODCDCLR : longWord;
- ODCDSET : longWord;
- ODCDINV : longWord;
- end;
- TPORTE_TRISE = record
- private
- function getTRISE0 : TBits_1; inline;
- function getTRISE1 : TBits_1; inline;
- function getTRISE2 : TBits_1; inline;
- function getTRISE3 : TBits_1; inline;
- function getTRISE4 : TBits_1; inline;
- function getTRISE5 : TBits_1; inline;
- function getTRISE6 : TBits_1; inline;
- function getTRISE7 : TBits_1; inline;
- function getTRISE8 : TBits_1; inline;
- function getTRISE9 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setTRISE0(thebits : TBits_1); inline;
- procedure setTRISE1(thebits : TBits_1); inline;
- procedure setTRISE2(thebits : TBits_1); inline;
- procedure setTRISE3(thebits : TBits_1); inline;
- procedure setTRISE4(thebits : TBits_1); inline;
- procedure setTRISE5(thebits : TBits_1); inline;
- procedure setTRISE6(thebits : TBits_1); inline;
- procedure setTRISE7(thebits : TBits_1); inline;
- procedure setTRISE8(thebits : TBits_1); inline;
- procedure setTRISE9(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearTRISE0; inline;
- procedure clearTRISE1; inline;
- procedure clearTRISE2; inline;
- procedure clearTRISE3; inline;
- procedure clearTRISE4; inline;
- procedure clearTRISE5; inline;
- procedure clearTRISE6; inline;
- procedure clearTRISE7; inline;
- procedure clearTRISE8; inline;
- procedure clearTRISE9; inline;
- procedure setTRISE0; inline;
- procedure setTRISE1; inline;
- procedure setTRISE2; inline;
- procedure setTRISE3; inline;
- procedure setTRISE4; inline;
- procedure setTRISE5; inline;
- procedure setTRISE6; inline;
- procedure setTRISE7; inline;
- procedure setTRISE8; inline;
- procedure setTRISE9; inline;
- property TRISE0 : TBits_1 read getTRISE0 write setTRISE0;
- property TRISE1 : TBits_1 read getTRISE1 write setTRISE1;
- property TRISE2 : TBits_1 read getTRISE2 write setTRISE2;
- property TRISE3 : TBits_1 read getTRISE3 write setTRISE3;
- property TRISE4 : TBits_1 read getTRISE4 write setTRISE4;
- property TRISE5 : TBits_1 read getTRISE5 write setTRISE5;
- property TRISE6 : TBits_1 read getTRISE6 write setTRISE6;
- property TRISE7 : TBits_1 read getTRISE7 write setTRISE7;
- property TRISE8 : TBits_1 read getTRISE8 write setTRISE8;
- property TRISE9 : TBits_1 read getTRISE9 write setTRISE9;
- property w : TBits_32 read getw write setw;
- end;
- TPORTE_PORTE = record
- private
- function getRE0 : TBits_1; inline;
- function getRE1 : TBits_1; inline;
- function getRE2 : TBits_1; inline;
- function getRE3 : TBits_1; inline;
- function getRE4 : TBits_1; inline;
- function getRE5 : TBits_1; inline;
- function getRE6 : TBits_1; inline;
- function getRE7 : TBits_1; inline;
- function getRE8 : TBits_1; inline;
- function getRE9 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setRE0(thebits : TBits_1); inline;
- procedure setRE1(thebits : TBits_1); inline;
- procedure setRE2(thebits : TBits_1); inline;
- procedure setRE3(thebits : TBits_1); inline;
- procedure setRE4(thebits : TBits_1); inline;
- procedure setRE5(thebits : TBits_1); inline;
- procedure setRE6(thebits : TBits_1); inline;
- procedure setRE7(thebits : TBits_1); inline;
- procedure setRE8(thebits : TBits_1); inline;
- procedure setRE9(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearRE0; inline;
- procedure clearRE1; inline;
- procedure clearRE2; inline;
- procedure clearRE3; inline;
- procedure clearRE4; inline;
- procedure clearRE5; inline;
- procedure clearRE6; inline;
- procedure clearRE7; inline;
- procedure clearRE8; inline;
- procedure clearRE9; inline;
- procedure setRE0; inline;
- procedure setRE1; inline;
- procedure setRE2; inline;
- procedure setRE3; inline;
- procedure setRE4; inline;
- procedure setRE5; inline;
- procedure setRE6; inline;
- procedure setRE7; inline;
- procedure setRE8; inline;
- procedure setRE9; inline;
- property RE0 : TBits_1 read getRE0 write setRE0;
- property RE1 : TBits_1 read getRE1 write setRE1;
- property RE2 : TBits_1 read getRE2 write setRE2;
- property RE3 : TBits_1 read getRE3 write setRE3;
- property RE4 : TBits_1 read getRE4 write setRE4;
- property RE5 : TBits_1 read getRE5 write setRE5;
- property RE6 : TBits_1 read getRE6 write setRE6;
- property RE7 : TBits_1 read getRE7 write setRE7;
- property RE8 : TBits_1 read getRE8 write setRE8;
- property RE9 : TBits_1 read getRE9 write setRE9;
- property w : TBits_32 read getw write setw;
- end;
- TPortE_bits=(RE0=0,RE1=1,RE2=2,RE3=3,RE4=4,RE5=5,RE6=6,RE7=7,RE8=8,RE9=9);
- TPortE_bitset = set of TPortE_bits;
- TPORTE_LATE = record
- private
- function getLATE0 : TBits_1; inline;
- function getLATE1 : TBits_1; inline;
- function getLATE2 : TBits_1; inline;
- function getLATE3 : TBits_1; inline;
- function getLATE4 : TBits_1; inline;
- function getLATE5 : TBits_1; inline;
- function getLATE6 : TBits_1; inline;
- function getLATE7 : TBits_1; inline;
- function getLATE8 : TBits_1; inline;
- function getLATE9 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setLATE0(thebits : TBits_1); inline;
- procedure setLATE1(thebits : TBits_1); inline;
- procedure setLATE2(thebits : TBits_1); inline;
- procedure setLATE3(thebits : TBits_1); inline;
- procedure setLATE4(thebits : TBits_1); inline;
- procedure setLATE5(thebits : TBits_1); inline;
- procedure setLATE6(thebits : TBits_1); inline;
- procedure setLATE7(thebits : TBits_1); inline;
- procedure setLATE8(thebits : TBits_1); inline;
- procedure setLATE9(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearLATE0; inline;
- procedure clearLATE1; inline;
- procedure clearLATE2; inline;
- procedure clearLATE3; inline;
- procedure clearLATE4; inline;
- procedure clearLATE5; inline;
- procedure clearLATE6; inline;
- procedure clearLATE7; inline;
- procedure clearLATE8; inline;
- procedure clearLATE9; inline;
- procedure setLATE0; inline;
- procedure setLATE1; inline;
- procedure setLATE2; inline;
- procedure setLATE3; inline;
- procedure setLATE4; inline;
- procedure setLATE5; inline;
- procedure setLATE6; inline;
- procedure setLATE7; inline;
- procedure setLATE8; inline;
- procedure setLATE9; inline;
- property LATE0 : TBits_1 read getLATE0 write setLATE0;
- property LATE1 : TBits_1 read getLATE1 write setLATE1;
- property LATE2 : TBits_1 read getLATE2 write setLATE2;
- property LATE3 : TBits_1 read getLATE3 write setLATE3;
- property LATE4 : TBits_1 read getLATE4 write setLATE4;
- property LATE5 : TBits_1 read getLATE5 write setLATE5;
- property LATE6 : TBits_1 read getLATE6 write setLATE6;
- property LATE7 : TBits_1 read getLATE7 write setLATE7;
- property LATE8 : TBits_1 read getLATE8 write setLATE8;
- property LATE9 : TBits_1 read getLATE9 write setLATE9;
- property w : TBits_32 read getw write setw;
- end;
- TPORTE_ODCE = record
- private
- function getODCE0 : TBits_1; inline;
- function getODCE1 : TBits_1; inline;
- function getODCE2 : TBits_1; inline;
- function getODCE3 : TBits_1; inline;
- function getODCE4 : TBits_1; inline;
- function getODCE5 : TBits_1; inline;
- function getODCE6 : TBits_1; inline;
- function getODCE7 : TBits_1; inline;
- function getODCE8 : TBits_1; inline;
- function getODCE9 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setODCE0(thebits : TBits_1); inline;
- procedure setODCE1(thebits : TBits_1); inline;
- procedure setODCE2(thebits : TBits_1); inline;
- procedure setODCE3(thebits : TBits_1); inline;
- procedure setODCE4(thebits : TBits_1); inline;
- procedure setODCE5(thebits : TBits_1); inline;
- procedure setODCE6(thebits : TBits_1); inline;
- procedure setODCE7(thebits : TBits_1); inline;
- procedure setODCE8(thebits : TBits_1); inline;
- procedure setODCE9(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearODCE0; inline;
- procedure clearODCE1; inline;
- procedure clearODCE2; inline;
- procedure clearODCE3; inline;
- procedure clearODCE4; inline;
- procedure clearODCE5; inline;
- procedure clearODCE6; inline;
- procedure clearODCE7; inline;
- procedure clearODCE8; inline;
- procedure clearODCE9; inline;
- procedure setODCE0; inline;
- procedure setODCE1; inline;
- procedure setODCE2; inline;
- procedure setODCE3; inline;
- procedure setODCE4; inline;
- procedure setODCE5; inline;
- procedure setODCE6; inline;
- procedure setODCE7; inline;
- procedure setODCE8; inline;
- procedure setODCE9; inline;
- property ODCE0 : TBits_1 read getODCE0 write setODCE0;
- property ODCE1 : TBits_1 read getODCE1 write setODCE1;
- property ODCE2 : TBits_1 read getODCE2 write setODCE2;
- property ODCE3 : TBits_1 read getODCE3 write setODCE3;
- property ODCE4 : TBits_1 read getODCE4 write setODCE4;
- property ODCE5 : TBits_1 read getODCE5 write setODCE5;
- property ODCE6 : TBits_1 read getODCE6 write setODCE6;
- property ODCE7 : TBits_1 read getODCE7 write setODCE7;
- property ODCE8 : TBits_1 read getODCE8 write setODCE8;
- property ODCE9 : TBits_1 read getODCE9 write setODCE9;
- property w : TBits_32 read getw write setw;
- end;
- type
- TPORTERegisters = record
- TRISEbits : TPORTE_TRISE;
- TRISE : longWord;
- TRISECLR : longWord;
- TRISESET : longWord;
- TRISEINV : longWord;
- PORTEbits : TPORTE_PORTE;
- PORTE : longWord;
- PORTECLR : longWord;
- PORTESET : longWord;
- PORTEINV : longWord;
- LATEbits : TPORTE_LATE;
- LATE : longWord;
- LATECLR : longWord;
- LATESET : longWord;
- LATEINV : longWord;
- ODCEbits : TPORTE_ODCE;
- ODCE : longWord;
- ODCECLR : longWord;
- ODCESET : longWord;
- ODCEINV : longWord;
- end;
- TPORTF_TRISF = record
- private
- function getTRISF0 : TBits_1; inline;
- function getTRISF1 : TBits_1; inline;
- function getTRISF12 : TBits_1; inline;
- function getTRISF13 : TBits_1; inline;
- function getTRISF2 : TBits_1; inline;
- function getTRISF3 : TBits_1; inline;
- function getTRISF4 : TBits_1; inline;
- function getTRISF5 : TBits_1; inline;
- function getTRISF8 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setTRISF0(thebits : TBits_1); inline;
- procedure setTRISF1(thebits : TBits_1); inline;
- procedure setTRISF12(thebits : TBits_1); inline;
- procedure setTRISF13(thebits : TBits_1); inline;
- procedure setTRISF2(thebits : TBits_1); inline;
- procedure setTRISF3(thebits : TBits_1); inline;
- procedure setTRISF4(thebits : TBits_1); inline;
- procedure setTRISF5(thebits : TBits_1); inline;
- procedure setTRISF8(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearTRISF0; inline;
- procedure clearTRISF12; inline;
- procedure clearTRISF13; inline;
- procedure clearTRISF1; inline;
- procedure clearTRISF2; inline;
- procedure clearTRISF3; inline;
- procedure clearTRISF4; inline;
- procedure clearTRISF5; inline;
- procedure clearTRISF8; inline;
- procedure setTRISF0; inline;
- procedure setTRISF12; inline;
- procedure setTRISF13; inline;
- procedure setTRISF1; inline;
- procedure setTRISF2; inline;
- procedure setTRISF3; inline;
- procedure setTRISF4; inline;
- procedure setTRISF5; inline;
- procedure setTRISF8; inline;
- property TRISF0 : TBits_1 read getTRISF0 write setTRISF0;
- property TRISF1 : TBits_1 read getTRISF1 write setTRISF1;
- property TRISF12 : TBits_1 read getTRISF12 write setTRISF12;
- property TRISF13 : TBits_1 read getTRISF13 write setTRISF13;
- property TRISF2 : TBits_1 read getTRISF2 write setTRISF2;
- property TRISF3 : TBits_1 read getTRISF3 write setTRISF3;
- property TRISF4 : TBits_1 read getTRISF4 write setTRISF4;
- property TRISF5 : TBits_1 read getTRISF5 write setTRISF5;
- property TRISF8 : TBits_1 read getTRISF8 write setTRISF8;
- property w : TBits_32 read getw write setw;
- end;
- TPORTF_PORTF = record
- private
- function getRF0 : TBits_1; inline;
- function getRF1 : TBits_1; inline;
- function getRF12 : TBits_1; inline;
- function getRF13 : TBits_1; inline;
- function getRF2 : TBits_1; inline;
- function getRF3 : TBits_1; inline;
- function getRF4 : TBits_1; inline;
- function getRF5 : TBits_1; inline;
- function getRF8 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setRF0(thebits : TBits_1); inline;
- procedure setRF1(thebits : TBits_1); inline;
- procedure setRF12(thebits : TBits_1); inline;
- procedure setRF13(thebits : TBits_1); inline;
- procedure setRF2(thebits : TBits_1); inline;
- procedure setRF3(thebits : TBits_1); inline;
- procedure setRF4(thebits : TBits_1); inline;
- procedure setRF5(thebits : TBits_1); inline;
- procedure setRF8(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearRF0; inline;
- procedure clearRF12; inline;
- procedure clearRF13; inline;
- procedure clearRF1; inline;
- procedure clearRF2; inline;
- procedure clearRF3; inline;
- procedure clearRF4; inline;
- procedure clearRF5; inline;
- procedure clearRF8; inline;
- procedure setRF0; inline;
- procedure setRF12; inline;
- procedure setRF13; inline;
- procedure setRF1; inline;
- procedure setRF2; inline;
- procedure setRF3; inline;
- procedure setRF4; inline;
- procedure setRF5; inline;
- procedure setRF8; inline;
- property RF0 : TBits_1 read getRF0 write setRF0;
- property RF1 : TBits_1 read getRF1 write setRF1;
- property RF12 : TBits_1 read getRF12 write setRF12;
- property RF13 : TBits_1 read getRF13 write setRF13;
- property RF2 : TBits_1 read getRF2 write setRF2;
- property RF3 : TBits_1 read getRF3 write setRF3;
- property RF4 : TBits_1 read getRF4 write setRF4;
- property RF5 : TBits_1 read getRF5 write setRF5;
- property RF8 : TBits_1 read getRF8 write setRF8;
- property w : TBits_32 read getw write setw;
- end;
- TPortF_bits=(RF0=0,RF1=1,RF2=2,RF3=3,RF4=4,RF5=5,RF8=8,RF12=12,RF13=13);
- TPortF_bitset = set of TPortF_bits;
- TPORTF_LATF = record
- private
- function getLATF0 : TBits_1; inline;
- function getLATF1 : TBits_1; inline;
- function getLATF12 : TBits_1; inline;
- function getLATF13 : TBits_1; inline;
- function getLATF2 : TBits_1; inline;
- function getLATF3 : TBits_1; inline;
- function getLATF4 : TBits_1; inline;
- function getLATF5 : TBits_1; inline;
- function getLATF8 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setLATF0(thebits : TBits_1); inline;
- procedure setLATF1(thebits : TBits_1); inline;
- procedure setLATF12(thebits : TBits_1); inline;
- procedure setLATF13(thebits : TBits_1); inline;
- procedure setLATF2(thebits : TBits_1); inline;
- procedure setLATF3(thebits : TBits_1); inline;
- procedure setLATF4(thebits : TBits_1); inline;
- procedure setLATF5(thebits : TBits_1); inline;
- procedure setLATF8(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearLATF0; inline;
- procedure clearLATF12; inline;
- procedure clearLATF13; inline;
- procedure clearLATF1; inline;
- procedure clearLATF2; inline;
- procedure clearLATF3; inline;
- procedure clearLATF4; inline;
- procedure clearLATF5; inline;
- procedure clearLATF8; inline;
- procedure setLATF0; inline;
- procedure setLATF12; inline;
- procedure setLATF13; inline;
- procedure setLATF1; inline;
- procedure setLATF2; inline;
- procedure setLATF3; inline;
- procedure setLATF4; inline;
- procedure setLATF5; inline;
- procedure setLATF8; inline;
- property LATF0 : TBits_1 read getLATF0 write setLATF0;
- property LATF1 : TBits_1 read getLATF1 write setLATF1;
- property LATF12 : TBits_1 read getLATF12 write setLATF12;
- property LATF13 : TBits_1 read getLATF13 write setLATF13;
- property LATF2 : TBits_1 read getLATF2 write setLATF2;
- property LATF3 : TBits_1 read getLATF3 write setLATF3;
- property LATF4 : TBits_1 read getLATF4 write setLATF4;
- property LATF5 : TBits_1 read getLATF5 write setLATF5;
- property LATF8 : TBits_1 read getLATF8 write setLATF8;
- property w : TBits_32 read getw write setw;
- end;
- TPORTF_ODCF = record
- private
- function getODCF0 : TBits_1; inline;
- function getODCF1 : TBits_1; inline;
- function getODCF12 : TBits_1; inline;
- function getODCF13 : TBits_1; inline;
- function getODCF2 : TBits_1; inline;
- function getODCF3 : TBits_1; inline;
- function getODCF4 : TBits_1; inline;
- function getODCF5 : TBits_1; inline;
- function getODCF8 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setODCF0(thebits : TBits_1); inline;
- procedure setODCF1(thebits : TBits_1); inline;
- procedure setODCF12(thebits : TBits_1); inline;
- procedure setODCF13(thebits : TBits_1); inline;
- procedure setODCF2(thebits : TBits_1); inline;
- procedure setODCF3(thebits : TBits_1); inline;
- procedure setODCF4(thebits : TBits_1); inline;
- procedure setODCF5(thebits : TBits_1); inline;
- procedure setODCF8(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearODCF0; inline;
- procedure clearODCF12; inline;
- procedure clearODCF13; inline;
- procedure clearODCF1; inline;
- procedure clearODCF2; inline;
- procedure clearODCF3; inline;
- procedure clearODCF4; inline;
- procedure clearODCF5; inline;
- procedure clearODCF8; inline;
- procedure setODCF0; inline;
- procedure setODCF12; inline;
- procedure setODCF13; inline;
- procedure setODCF1; inline;
- procedure setODCF2; inline;
- procedure setODCF3; inline;
- procedure setODCF4; inline;
- procedure setODCF5; inline;
- procedure setODCF8; inline;
- property ODCF0 : TBits_1 read getODCF0 write setODCF0;
- property ODCF1 : TBits_1 read getODCF1 write setODCF1;
- property ODCF12 : TBits_1 read getODCF12 write setODCF12;
- property ODCF13 : TBits_1 read getODCF13 write setODCF13;
- property ODCF2 : TBits_1 read getODCF2 write setODCF2;
- property ODCF3 : TBits_1 read getODCF3 write setODCF3;
- property ODCF4 : TBits_1 read getODCF4 write setODCF4;
- property ODCF5 : TBits_1 read getODCF5 write setODCF5;
- property ODCF8 : TBits_1 read getODCF8 write setODCF8;
- property w : TBits_32 read getw write setw;
- end;
- type
- TPORTFRegisters = record
- TRISFbits : TPORTF_TRISF;
- TRISF : longWord;
- TRISFCLR : longWord;
- TRISFSET : longWord;
- TRISFINV : longWord;
- PORTFbits : TPORTF_PORTF;
- PORTF : longWord;
- PORTFCLR : longWord;
- PORTFSET : longWord;
- PORTFINV : longWord;
- LATFbits : TPORTF_LATF;
- LATF : longWord;
- LATFCLR : longWord;
- LATFSET : longWord;
- LATFINV : longWord;
- ODCFbits : TPORTF_ODCF;
- ODCF : longWord;
- ODCFCLR : longWord;
- ODCFSET : longWord;
- ODCFINV : longWord;
- end;
- TPORTG_TRISG = record
- private
- function getTRISG0 : TBits_1; inline;
- function getTRISG1 : TBits_1; inline;
- function getTRISG12 : TBits_1; inline;
- function getTRISG13 : TBits_1; inline;
- function getTRISG14 : TBits_1; inline;
- function getTRISG15 : TBits_1; inline;
- function getTRISG2 : TBits_1; inline;
- function getTRISG3 : TBits_1; inline;
- function getTRISG6 : TBits_1; inline;
- function getTRISG7 : TBits_1; inline;
- function getTRISG8 : TBits_1; inline;
- function getTRISG9 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setTRISG0(thebits : TBits_1); inline;
- procedure setTRISG1(thebits : TBits_1); inline;
- procedure setTRISG12(thebits : TBits_1); inline;
- procedure setTRISG13(thebits : TBits_1); inline;
- procedure setTRISG14(thebits : TBits_1); inline;
- procedure setTRISG15(thebits : TBits_1); inline;
- procedure setTRISG2(thebits : TBits_1); inline;
- procedure setTRISG3(thebits : TBits_1); inline;
- procedure setTRISG6(thebits : TBits_1); inline;
- procedure setTRISG7(thebits : TBits_1); inline;
- procedure setTRISG8(thebits : TBits_1); inline;
- procedure setTRISG9(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearTRISG0; inline;
- procedure clearTRISG12; inline;
- procedure clearTRISG13; inline;
- procedure clearTRISG14; inline;
- procedure clearTRISG15; inline;
- procedure clearTRISG1; inline;
- procedure clearTRISG2; inline;
- procedure clearTRISG3; inline;
- procedure clearTRISG6; inline;
- procedure clearTRISG7; inline;
- procedure clearTRISG8; inline;
- procedure clearTRISG9; inline;
- procedure setTRISG0; inline;
- procedure setTRISG12; inline;
- procedure setTRISG13; inline;
- procedure setTRISG14; inline;
- procedure setTRISG15; inline;
- procedure setTRISG1; inline;
- procedure setTRISG2; inline;
- procedure setTRISG3; inline;
- procedure setTRISG6; inline;
- procedure setTRISG7; inline;
- procedure setTRISG8; inline;
- procedure setTRISG9; inline;
- property TRISG0 : TBits_1 read getTRISG0 write setTRISG0;
- property TRISG1 : TBits_1 read getTRISG1 write setTRISG1;
- property TRISG12 : TBits_1 read getTRISG12 write setTRISG12;
- property TRISG13 : TBits_1 read getTRISG13 write setTRISG13;
- property TRISG14 : TBits_1 read getTRISG14 write setTRISG14;
- property TRISG15 : TBits_1 read getTRISG15 write setTRISG15;
- property TRISG2 : TBits_1 read getTRISG2 write setTRISG2;
- property TRISG3 : TBits_1 read getTRISG3 write setTRISG3;
- property TRISG6 : TBits_1 read getTRISG6 write setTRISG6;
- property TRISG7 : TBits_1 read getTRISG7 write setTRISG7;
- property TRISG8 : TBits_1 read getTRISG8 write setTRISG8;
- property TRISG9 : TBits_1 read getTRISG9 write setTRISG9;
- property w : TBits_32 read getw write setw;
- end;
- TPORTG_PORTG = record
- private
- function getRG0 : TBits_1; inline;
- function getRG1 : TBits_1; inline;
- function getRG12 : TBits_1; inline;
- function getRG13 : TBits_1; inline;
- function getRG14 : TBits_1; inline;
- function getRG15 : TBits_1; inline;
- function getRG2 : TBits_1; inline;
- function getRG3 : TBits_1; inline;
- function getRG6 : TBits_1; inline;
- function getRG7 : TBits_1; inline;
- function getRG8 : TBits_1; inline;
- function getRG9 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setRG0(thebits : TBits_1); inline;
- procedure setRG1(thebits : TBits_1); inline;
- procedure setRG12(thebits : TBits_1); inline;
- procedure setRG13(thebits : TBits_1); inline;
- procedure setRG14(thebits : TBits_1); inline;
- procedure setRG15(thebits : TBits_1); inline;
- procedure setRG2(thebits : TBits_1); inline;
- procedure setRG3(thebits : TBits_1); inline;
- procedure setRG6(thebits : TBits_1); inline;
- procedure setRG7(thebits : TBits_1); inline;
- procedure setRG8(thebits : TBits_1); inline;
- procedure setRG9(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearRG0; inline;
- procedure clearRG12; inline;
- procedure clearRG13; inline;
- procedure clearRG14; inline;
- procedure clearRG15; inline;
- procedure clearRG1; inline;
- procedure clearRG2; inline;
- procedure clearRG3; inline;
- procedure clearRG6; inline;
- procedure clearRG7; inline;
- procedure clearRG8; inline;
- procedure clearRG9; inline;
- procedure setRG0; inline;
- procedure setRG12; inline;
- procedure setRG13; inline;
- procedure setRG14; inline;
- procedure setRG15; inline;
- procedure setRG1; inline;
- procedure setRG2; inline;
- procedure setRG3; inline;
- procedure setRG6; inline;
- procedure setRG7; inline;
- procedure setRG8; inline;
- procedure setRG9; inline;
- property RG0 : TBits_1 read getRG0 write setRG0;
- property RG1 : TBits_1 read getRG1 write setRG1;
- property RG12 : TBits_1 read getRG12 write setRG12;
- property RG13 : TBits_1 read getRG13 write setRG13;
- property RG14 : TBits_1 read getRG14 write setRG14;
- property RG15 : TBits_1 read getRG15 write setRG15;
- property RG2 : TBits_1 read getRG2 write setRG2;
- property RG3 : TBits_1 read getRG3 write setRG3;
- property RG6 : TBits_1 read getRG6 write setRG6;
- property RG7 : TBits_1 read getRG7 write setRG7;
- property RG8 : TBits_1 read getRG8 write setRG8;
- property RG9 : TBits_1 read getRG9 write setRG9;
- property w : TBits_32 read getw write setw;
- end;
- TPortG_bits=(RG0=0,RG1=1,RG2=2,RG3=3,RG6=6,RG7=7,RG8=8,RG9=9,RG12=12,RG13=13,RG14=14,RG15=15);
- TPortG_bitset = set of TPortG_bits;
- TPORTG_LATG = record
- private
- function getLATG0 : TBits_1; inline;
- function getLATG1 : TBits_1; inline;
- function getLATG12 : TBits_1; inline;
- function getLATG13 : TBits_1; inline;
- function getLATG14 : TBits_1; inline;
- function getLATG15 : TBits_1; inline;
- function getLATG2 : TBits_1; inline;
- function getLATG3 : TBits_1; inline;
- function getLATG6 : TBits_1; inline;
- function getLATG7 : TBits_1; inline;
- function getLATG8 : TBits_1; inline;
- function getLATG9 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setLATG0(thebits : TBits_1); inline;
- procedure setLATG1(thebits : TBits_1); inline;
- procedure setLATG12(thebits : TBits_1); inline;
- procedure setLATG13(thebits : TBits_1); inline;
- procedure setLATG14(thebits : TBits_1); inline;
- procedure setLATG15(thebits : TBits_1); inline;
- procedure setLATG2(thebits : TBits_1); inline;
- procedure setLATG3(thebits : TBits_1); inline;
- procedure setLATG6(thebits : TBits_1); inline;
- procedure setLATG7(thebits : TBits_1); inline;
- procedure setLATG8(thebits : TBits_1); inline;
- procedure setLATG9(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearLATG0; inline;
- procedure clearLATG12; inline;
- procedure clearLATG13; inline;
- procedure clearLATG14; inline;
- procedure clearLATG15; inline;
- procedure clearLATG1; inline;
- procedure clearLATG2; inline;
- procedure clearLATG3; inline;
- procedure clearLATG6; inline;
- procedure clearLATG7; inline;
- procedure clearLATG8; inline;
- procedure clearLATG9; inline;
- procedure setLATG0; inline;
- procedure setLATG12; inline;
- procedure setLATG13; inline;
- procedure setLATG14; inline;
- procedure setLATG15; inline;
- procedure setLATG1; inline;
- procedure setLATG2; inline;
- procedure setLATG3; inline;
- procedure setLATG6; inline;
- procedure setLATG7; inline;
- procedure setLATG8; inline;
- procedure setLATG9; inline;
- property LATG0 : TBits_1 read getLATG0 write setLATG0;
- property LATG1 : TBits_1 read getLATG1 write setLATG1;
- property LATG12 : TBits_1 read getLATG12 write setLATG12;
- property LATG13 : TBits_1 read getLATG13 write setLATG13;
- property LATG14 : TBits_1 read getLATG14 write setLATG14;
- property LATG15 : TBits_1 read getLATG15 write setLATG15;
- property LATG2 : TBits_1 read getLATG2 write setLATG2;
- property LATG3 : TBits_1 read getLATG3 write setLATG3;
- property LATG6 : TBits_1 read getLATG6 write setLATG6;
- property LATG7 : TBits_1 read getLATG7 write setLATG7;
- property LATG8 : TBits_1 read getLATG8 write setLATG8;
- property LATG9 : TBits_1 read getLATG9 write setLATG9;
- property w : TBits_32 read getw write setw;
- end;
- TPORTG_ODCG = record
- private
- function getODCG0 : TBits_1; inline;
- function getODCG1 : TBits_1; inline;
- function getODCG12 : TBits_1; inline;
- function getODCG13 : TBits_1; inline;
- function getODCG14 : TBits_1; inline;
- function getODCG15 : TBits_1; inline;
- function getODCG2 : TBits_1; inline;
- function getODCG3 : TBits_1; inline;
- function getODCG6 : TBits_1; inline;
- function getODCG7 : TBits_1; inline;
- function getODCG8 : TBits_1; inline;
- function getODCG9 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setODCG0(thebits : TBits_1); inline;
- procedure setODCG1(thebits : TBits_1); inline;
- procedure setODCG12(thebits : TBits_1); inline;
- procedure setODCG13(thebits : TBits_1); inline;
- procedure setODCG14(thebits : TBits_1); inline;
- procedure setODCG15(thebits : TBits_1); inline;
- procedure setODCG2(thebits : TBits_1); inline;
- procedure setODCG3(thebits : TBits_1); inline;
- procedure setODCG6(thebits : TBits_1); inline;
- procedure setODCG7(thebits : TBits_1); inline;
- procedure setODCG8(thebits : TBits_1); inline;
- procedure setODCG9(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearODCG0; inline;
- procedure clearODCG12; inline;
- procedure clearODCG13; inline;
- procedure clearODCG14; inline;
- procedure clearODCG15; inline;
- procedure clearODCG1; inline;
- procedure clearODCG2; inline;
- procedure clearODCG3; inline;
- procedure clearODCG6; inline;
- procedure clearODCG7; inline;
- procedure clearODCG8; inline;
- procedure clearODCG9; inline;
- procedure setODCG0; inline;
- procedure setODCG12; inline;
- procedure setODCG13; inline;
- procedure setODCG14; inline;
- procedure setODCG15; inline;
- procedure setODCG1; inline;
- procedure setODCG2; inline;
- procedure setODCG3; inline;
- procedure setODCG6; inline;
- procedure setODCG7; inline;
- procedure setODCG8; inline;
- procedure setODCG9; inline;
- property ODCG0 : TBits_1 read getODCG0 write setODCG0;
- property ODCG1 : TBits_1 read getODCG1 write setODCG1;
- property ODCG12 : TBits_1 read getODCG12 write setODCG12;
- property ODCG13 : TBits_1 read getODCG13 write setODCG13;
- property ODCG14 : TBits_1 read getODCG14 write setODCG14;
- property ODCG15 : TBits_1 read getODCG15 write setODCG15;
- property ODCG2 : TBits_1 read getODCG2 write setODCG2;
- property ODCG3 : TBits_1 read getODCG3 write setODCG3;
- property ODCG6 : TBits_1 read getODCG6 write setODCG6;
- property ODCG7 : TBits_1 read getODCG7 write setODCG7;
- property ODCG8 : TBits_1 read getODCG8 write setODCG8;
- property ODCG9 : TBits_1 read getODCG9 write setODCG9;
- property w : TBits_32 read getw write setw;
- end;
- TPORTG_CNCON = record
- private
- function getON : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearON; inline;
- procedure clearSIDL; inline;
- procedure setON; inline;
- procedure setSIDL; inline;
- property ON : TBits_1 read getON write setON;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property w : TBits_32 read getw write setw;
- end;
- TPORTG_CNEN = record
- private
- function getCNEN0 : TBits_1; inline;
- function getCNEN1 : TBits_1; inline;
- function getCNEN10 : TBits_1; inline;
- function getCNEN11 : TBits_1; inline;
- function getCNEN12 : TBits_1; inline;
- function getCNEN13 : TBits_1; inline;
- function getCNEN14 : TBits_1; inline;
- function getCNEN15 : TBits_1; inline;
- function getCNEN16 : TBits_1; inline;
- function getCNEN17 : TBits_1; inline;
- function getCNEN18 : TBits_1; inline;
- function getCNEN19 : TBits_1; inline;
- function getCNEN2 : TBits_1; inline;
- function getCNEN20 : TBits_1; inline;
- function getCNEN21 : TBits_1; inline;
- function getCNEN3 : TBits_1; inline;
- function getCNEN4 : TBits_1; inline;
- function getCNEN5 : TBits_1; inline;
- function getCNEN6 : TBits_1; inline;
- function getCNEN7 : TBits_1; inline;
- function getCNEN8 : TBits_1; inline;
- function getCNEN9 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setCNEN0(thebits : TBits_1); inline;
- procedure setCNEN1(thebits : TBits_1); inline;
- procedure setCNEN10(thebits : TBits_1); inline;
- procedure setCNEN11(thebits : TBits_1); inline;
- procedure setCNEN12(thebits : TBits_1); inline;
- procedure setCNEN13(thebits : TBits_1); inline;
- procedure setCNEN14(thebits : TBits_1); inline;
- procedure setCNEN15(thebits : TBits_1); inline;
- procedure setCNEN16(thebits : TBits_1); inline;
- procedure setCNEN17(thebits : TBits_1); inline;
- procedure setCNEN18(thebits : TBits_1); inline;
- procedure setCNEN19(thebits : TBits_1); inline;
- procedure setCNEN2(thebits : TBits_1); inline;
- procedure setCNEN20(thebits : TBits_1); inline;
- procedure setCNEN21(thebits : TBits_1); inline;
- procedure setCNEN3(thebits : TBits_1); inline;
- procedure setCNEN4(thebits : TBits_1); inline;
- procedure setCNEN5(thebits : TBits_1); inline;
- procedure setCNEN6(thebits : TBits_1); inline;
- procedure setCNEN7(thebits : TBits_1); inline;
- procedure setCNEN8(thebits : TBits_1); inline;
- procedure setCNEN9(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCNEN0; inline;
- procedure clearCNEN10; inline;
- procedure clearCNEN11; inline;
- procedure clearCNEN12; inline;
- procedure clearCNEN13; inline;
- procedure clearCNEN14; inline;
- procedure clearCNEN15; inline;
- procedure clearCNEN16; inline;
- procedure clearCNEN17; inline;
- procedure clearCNEN18; inline;
- procedure clearCNEN19; inline;
- procedure clearCNEN1; inline;
- procedure clearCNEN20; inline;
- procedure clearCNEN21; inline;
- procedure clearCNEN2; inline;
- procedure clearCNEN3; inline;
- procedure clearCNEN4; inline;
- procedure clearCNEN5; inline;
- procedure clearCNEN6; inline;
- procedure clearCNEN7; inline;
- procedure clearCNEN8; inline;
- procedure clearCNEN9; inline;
- procedure setCNEN0; inline;
- procedure setCNEN10; inline;
- procedure setCNEN11; inline;
- procedure setCNEN12; inline;
- procedure setCNEN13; inline;
- procedure setCNEN14; inline;
- procedure setCNEN15; inline;
- procedure setCNEN16; inline;
- procedure setCNEN17; inline;
- procedure setCNEN18; inline;
- procedure setCNEN19; inline;
- procedure setCNEN1; inline;
- procedure setCNEN20; inline;
- procedure setCNEN21; inline;
- procedure setCNEN2; inline;
- procedure setCNEN3; inline;
- procedure setCNEN4; inline;
- procedure setCNEN5; inline;
- procedure setCNEN6; inline;
- procedure setCNEN7; inline;
- procedure setCNEN8; inline;
- procedure setCNEN9; inline;
- property CNEN0 : TBits_1 read getCNEN0 write setCNEN0;
- property CNEN1 : TBits_1 read getCNEN1 write setCNEN1;
- property CNEN10 : TBits_1 read getCNEN10 write setCNEN10;
- property CNEN11 : TBits_1 read getCNEN11 write setCNEN11;
- property CNEN12 : TBits_1 read getCNEN12 write setCNEN12;
- property CNEN13 : TBits_1 read getCNEN13 write setCNEN13;
- property CNEN14 : TBits_1 read getCNEN14 write setCNEN14;
- property CNEN15 : TBits_1 read getCNEN15 write setCNEN15;
- property CNEN16 : TBits_1 read getCNEN16 write setCNEN16;
- property CNEN17 : TBits_1 read getCNEN17 write setCNEN17;
- property CNEN18 : TBits_1 read getCNEN18 write setCNEN18;
- property CNEN19 : TBits_1 read getCNEN19 write setCNEN19;
- property CNEN2 : TBits_1 read getCNEN2 write setCNEN2;
- property CNEN20 : TBits_1 read getCNEN20 write setCNEN20;
- property CNEN21 : TBits_1 read getCNEN21 write setCNEN21;
- property CNEN3 : TBits_1 read getCNEN3 write setCNEN3;
- property CNEN4 : TBits_1 read getCNEN4 write setCNEN4;
- property CNEN5 : TBits_1 read getCNEN5 write setCNEN5;
- property CNEN6 : TBits_1 read getCNEN6 write setCNEN6;
- property CNEN7 : TBits_1 read getCNEN7 write setCNEN7;
- property CNEN8 : TBits_1 read getCNEN8 write setCNEN8;
- property CNEN9 : TBits_1 read getCNEN9 write setCNEN9;
- property w : TBits_32 read getw write setw;
- end;
- TPORTG_CNPUE = record
- private
- function getCNPUE0 : TBits_1; inline;
- function getCNPUE1 : TBits_1; inline;
- function getCNPUE10 : TBits_1; inline;
- function getCNPUE11 : TBits_1; inline;
- function getCNPUE12 : TBits_1; inline;
- function getCNPUE13 : TBits_1; inline;
- function getCNPUE14 : TBits_1; inline;
- function getCNPUE15 : TBits_1; inline;
- function getCNPUE16 : TBits_1; inline;
- function getCNPUE17 : TBits_1; inline;
- function getCNPUE18 : TBits_1; inline;
- function getCNPUE19 : TBits_1; inline;
- function getCNPUE2 : TBits_1; inline;
- function getCNPUE20 : TBits_1; inline;
- function getCNPUE21 : TBits_1; inline;
- function getCNPUE3 : TBits_1; inline;
- function getCNPUE4 : TBits_1; inline;
- function getCNPUE5 : TBits_1; inline;
- function getCNPUE6 : TBits_1; inline;
- function getCNPUE7 : TBits_1; inline;
- function getCNPUE8 : TBits_1; inline;
- function getCNPUE9 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setCNPUE0(thebits : TBits_1); inline;
- procedure setCNPUE1(thebits : TBits_1); inline;
- procedure setCNPUE10(thebits : TBits_1); inline;
- procedure setCNPUE11(thebits : TBits_1); inline;
- procedure setCNPUE12(thebits : TBits_1); inline;
- procedure setCNPUE13(thebits : TBits_1); inline;
- procedure setCNPUE14(thebits : TBits_1); inline;
- procedure setCNPUE15(thebits : TBits_1); inline;
- procedure setCNPUE16(thebits : TBits_1); inline;
- procedure setCNPUE17(thebits : TBits_1); inline;
- procedure setCNPUE18(thebits : TBits_1); inline;
- procedure setCNPUE19(thebits : TBits_1); inline;
- procedure setCNPUE2(thebits : TBits_1); inline;
- procedure setCNPUE20(thebits : TBits_1); inline;
- procedure setCNPUE21(thebits : TBits_1); inline;
- procedure setCNPUE3(thebits : TBits_1); inline;
- procedure setCNPUE4(thebits : TBits_1); inline;
- procedure setCNPUE5(thebits : TBits_1); inline;
- procedure setCNPUE6(thebits : TBits_1); inline;
- procedure setCNPUE7(thebits : TBits_1); inline;
- procedure setCNPUE8(thebits : TBits_1); inline;
- procedure setCNPUE9(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCNPUE0; inline;
- procedure clearCNPUE10; inline;
- procedure clearCNPUE11; inline;
- procedure clearCNPUE12; inline;
- procedure clearCNPUE13; inline;
- procedure clearCNPUE14; inline;
- procedure clearCNPUE15; inline;
- procedure clearCNPUE16; inline;
- procedure clearCNPUE17; inline;
- procedure clearCNPUE18; inline;
- procedure clearCNPUE19; inline;
- procedure clearCNPUE1; inline;
- procedure clearCNPUE20; inline;
- procedure clearCNPUE21; inline;
- procedure clearCNPUE2; inline;
- procedure clearCNPUE3; inline;
- procedure clearCNPUE4; inline;
- procedure clearCNPUE5; inline;
- procedure clearCNPUE6; inline;
- procedure clearCNPUE7; inline;
- procedure clearCNPUE8; inline;
- procedure clearCNPUE9; inline;
- procedure setCNPUE0; inline;
- procedure setCNPUE10; inline;
- procedure setCNPUE11; inline;
- procedure setCNPUE12; inline;
- procedure setCNPUE13; inline;
- procedure setCNPUE14; inline;
- procedure setCNPUE15; inline;
- procedure setCNPUE16; inline;
- procedure setCNPUE17; inline;
- procedure setCNPUE18; inline;
- procedure setCNPUE19; inline;
- procedure setCNPUE1; inline;
- procedure setCNPUE20; inline;
- procedure setCNPUE21; inline;
- procedure setCNPUE2; inline;
- procedure setCNPUE3; inline;
- procedure setCNPUE4; inline;
- procedure setCNPUE5; inline;
- procedure setCNPUE6; inline;
- procedure setCNPUE7; inline;
- procedure setCNPUE8; inline;
- procedure setCNPUE9; inline;
- property CNPUE0 : TBits_1 read getCNPUE0 write setCNPUE0;
- property CNPUE1 : TBits_1 read getCNPUE1 write setCNPUE1;
- property CNPUE10 : TBits_1 read getCNPUE10 write setCNPUE10;
- property CNPUE11 : TBits_1 read getCNPUE11 write setCNPUE11;
- property CNPUE12 : TBits_1 read getCNPUE12 write setCNPUE12;
- property CNPUE13 : TBits_1 read getCNPUE13 write setCNPUE13;
- property CNPUE14 : TBits_1 read getCNPUE14 write setCNPUE14;
- property CNPUE15 : TBits_1 read getCNPUE15 write setCNPUE15;
- property CNPUE16 : TBits_1 read getCNPUE16 write setCNPUE16;
- property CNPUE17 : TBits_1 read getCNPUE17 write setCNPUE17;
- property CNPUE18 : TBits_1 read getCNPUE18 write setCNPUE18;
- property CNPUE19 : TBits_1 read getCNPUE19 write setCNPUE19;
- property CNPUE2 : TBits_1 read getCNPUE2 write setCNPUE2;
- property CNPUE20 : TBits_1 read getCNPUE20 write setCNPUE20;
- property CNPUE21 : TBits_1 read getCNPUE21 write setCNPUE21;
- property CNPUE3 : TBits_1 read getCNPUE3 write setCNPUE3;
- property CNPUE4 : TBits_1 read getCNPUE4 write setCNPUE4;
- property CNPUE5 : TBits_1 read getCNPUE5 write setCNPUE5;
- property CNPUE6 : TBits_1 read getCNPUE6 write setCNPUE6;
- property CNPUE7 : TBits_1 read getCNPUE7 write setCNPUE7;
- property CNPUE8 : TBits_1 read getCNPUE8 write setCNPUE8;
- property CNPUE9 : TBits_1 read getCNPUE9 write setCNPUE9;
- property w : TBits_32 read getw write setw;
- end;
- type
- TPORTGRegisters = record
- TRISGbits : TPORTG_TRISG;
- TRISG : longWord;
- TRISGCLR : longWord;
- TRISGSET : longWord;
- TRISGINV : longWord;
- PORTGbits : TPORTG_PORTG;
- PORTG : longWord;
- PORTGCLR : longWord;
- PORTGSET : longWord;
- PORTGINV : longWord;
- LATGbits : TPORTG_LATG;
- LATG : longWord;
- LATGCLR : longWord;
- LATGSET : longWord;
- LATGINV : longWord;
- ODCGbits : TPORTG_ODCG;
- ODCG : longWord;
- ODCGCLR : longWord;
- ODCGSET : longWord;
- ODCGINV : longWord;
- CNCONbits : TPORTG_CNCON;
- CNCON : longWord;
- CNCONCLR : longWord;
- CNCONSET : longWord;
- CNCONINV : longWord;
- CNENbits : TPORTG_CNEN;
- CNEN : longWord;
- CNENCLR : longWord;
- CNENSET : longWord;
- CNENINV : longWord;
- CNPUEbits : TPORTG_CNPUE;
- CNPUE : longWord;
- CNPUECLR : longWord;
- CNPUESET : longWord;
- CNPUEINV : longWord;
- end;
- TETH_ETHCON1 = record
- private
- function getAUTOFC : TBits_1; inline;
- function getBUFCDEC : TBits_1; inline;
- function getMANFC : TBits_1; inline;
- function getON : TBits_1; inline;
- function getPTV : TBits_16; inline;
- function getRXEN : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getTXRTS : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setAUTOFC(thebits : TBits_1); inline;
- procedure setBUFCDEC(thebits : TBits_1); inline;
- procedure setMANFC(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setPTV(thebits : TBits_16); inline;
- procedure setRXEN(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setTXRTS(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearAUTOFC; inline;
- procedure clearBUFCDEC; inline;
- procedure clearMANFC; inline;
- procedure clearON; inline;
- procedure clearRXEN; inline;
- procedure clearSIDL; inline;
- procedure clearTXRTS; inline;
- procedure setAUTOFC; inline;
- procedure setBUFCDEC; inline;
- procedure setMANFC; inline;
- procedure setON; inline;
- procedure setRXEN; inline;
- procedure setSIDL; inline;
- procedure setTXRTS; inline;
- property AUTOFC : TBits_1 read getAUTOFC write setAUTOFC;
- property BUFCDEC : TBits_1 read getBUFCDEC write setBUFCDEC;
- property MANFC : TBits_1 read getMANFC write setMANFC;
- property ON : TBits_1 read getON write setON;
- property PTV : TBits_16 read getPTV write setPTV;
- property RXEN : TBits_1 read getRXEN write setRXEN;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property TXRTS : TBits_1 read getTXRTS write setTXRTS;
- property w : TBits_32 read getw write setw;
- end;
- TETH_ETHCON2 = record
- private
- function getRXBUF_SZ : TBits_7; inline;
- function getw : TBits_32; inline;
- procedure setRXBUF_SZ(thebits : TBits_7); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property RXBUF_SZ : TBits_7 read getRXBUF_SZ write setRXBUF_SZ;
- property w : TBits_32 read getw write setw;
- end;
- TETH_ETHTXST = record
- private
- function getTXSTADDR : TBits_30; inline;
- function getw : TBits_32; inline;
- procedure setTXSTADDR(thebits : TBits_30); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property TXSTADDR : TBits_30 read getTXSTADDR write setTXSTADDR;
- property w : TBits_32 read getw write setw;
- end;
- TETH_ETHRXST = record
- private
- function getRXSTADDR : TBits_30; inline;
- function getw : TBits_32; inline;
- procedure setRXSTADDR(thebits : TBits_30); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property RXSTADDR : TBits_30 read getRXSTADDR write setRXSTADDR;
- property w : TBits_32 read getw write setw;
- end;
- TETH_ETHHT0 = record
- private
- function getHTLOWER : TBits_32; inline;
- function getw : TBits_32; inline;
- procedure setHTLOWER(thebits : TBits_32); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property HTLOWER : TBits_32 read getHTLOWER write setHTLOWER;
- property w : TBits_32 read getw write setw;
- end;
- TETH_ETHHT1 = record
- private
- function getHTUPPER : TBits_32; inline;
- function getw : TBits_32; inline;
- procedure setHTUPPER(thebits : TBits_32); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property HTUPPER : TBits_32 read getHTUPPER write setHTUPPER;
- property w : TBits_32 read getw write setw;
- end;
- TETH_ETHPMM0 = record
- private
- function getPMMLOWER : TBits_32; inline;
- function getw : TBits_32; inline;
- procedure setPMMLOWER(thebits : TBits_32); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property PMMLOWER : TBits_32 read getPMMLOWER write setPMMLOWER;
- property w : TBits_32 read getw write setw;
- end;
- TETH_ETHPMM1 = record
- private
- function getPMMUPPER : TBits_32; inline;
- function getw : TBits_32; inline;
- procedure setPMMUPPER(thebits : TBits_32); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property PMMUPPER : TBits_32 read getPMMUPPER write setPMMUPPER;
- property w : TBits_32 read getw write setw;
- end;
- TETH_ETHPMCS = record
- private
- function getPMCS : TBits_16; inline;
- function getw : TBits_32; inline;
- procedure setPMCS(thebits : TBits_16); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property PMCS : TBits_16 read getPMCS write setPMCS;
- property w : TBits_32 read getw write setw;
- end;
- TETH_ETHPMO = record
- private
- function getPMO : TBits_16; inline;
- function getw : TBits_32; inline;
- procedure setPMO(thebits : TBits_16); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property PMO : TBits_16 read getPMO write setPMO;
- property w : TBits_32 read getw write setw;
- end;
- TETH_ETHRXFC = record
- private
- function getBCEN : TBits_1; inline;
- function getCRCERREN : TBits_1; inline;
- function getCRCOKEN : TBits_1; inline;
- function getHTEN : TBits_1; inline;
- function getMCEN : TBits_1; inline;
- function getMPEN : TBits_1; inline;
- function getNOTMEEN : TBits_1; inline;
- function getNOTPM : TBits_1; inline;
- function getPMMODE : TBits_4; inline;
- function getRUNTEN : TBits_1; inline;
- function getRUNTERREN : TBits_1; inline;
- function getUCEN : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setBCEN(thebits : TBits_1); inline;
- procedure setCRCERREN(thebits : TBits_1); inline;
- procedure setCRCOKEN(thebits : TBits_1); inline;
- procedure setHTEN(thebits : TBits_1); inline;
- procedure setMCEN(thebits : TBits_1); inline;
- procedure setMPEN(thebits : TBits_1); inline;
- procedure setNOTMEEN(thebits : TBits_1); inline;
- procedure setNOTPM(thebits : TBits_1); inline;
- procedure setPMMODE(thebits : TBits_4); inline;
- procedure setRUNTEN(thebits : TBits_1); inline;
- procedure setRUNTERREN(thebits : TBits_1); inline;
- procedure setUCEN(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearBCEN; inline;
- procedure clearCRCERREN; inline;
- procedure clearCRCOKEN; inline;
- procedure clearHTEN; inline;
- procedure clearMCEN; inline;
- procedure clearMPEN; inline;
- procedure clearNOTMEEN; inline;
- procedure clearNOTPM; inline;
- procedure clearRUNTEN; inline;
- procedure clearRUNTERREN; inline;
- procedure clearUCEN; inline;
- procedure setBCEN; inline;
- procedure setCRCERREN; inline;
- procedure setCRCOKEN; inline;
- procedure setHTEN; inline;
- procedure setMCEN; inline;
- procedure setMPEN; inline;
- procedure setNOTMEEN; inline;
- procedure setNOTPM; inline;
- procedure setRUNTEN; inline;
- procedure setRUNTERREN; inline;
- procedure setUCEN; inline;
- property BCEN : TBits_1 read getBCEN write setBCEN;
- property CRCERREN : TBits_1 read getCRCERREN write setCRCERREN;
- property CRCOKEN : TBits_1 read getCRCOKEN write setCRCOKEN;
- property HTEN : TBits_1 read getHTEN write setHTEN;
- property MCEN : TBits_1 read getMCEN write setMCEN;
- property MPEN : TBits_1 read getMPEN write setMPEN;
- property NOTMEEN : TBits_1 read getNOTMEEN write setNOTMEEN;
- property NOTPM : TBits_1 read getNOTPM write setNOTPM;
- property PMMODE : TBits_4 read getPMMODE write setPMMODE;
- property RUNTEN : TBits_1 read getRUNTEN write setRUNTEN;
- property RUNTERREN : TBits_1 read getRUNTERREN write setRUNTERREN;
- property UCEN : TBits_1 read getUCEN write setUCEN;
- property w : TBits_32 read getw write setw;
- end;
- TETH_ETHRXWM = record
- private
- function getRXEWM : TBits_8; inline;
- function getRXFWM : TBits_8; inline;
- function getw : TBits_32; inline;
- procedure setRXEWM(thebits : TBits_8); inline;
- procedure setRXFWM(thebits : TBits_8); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property RXEWM : TBits_8 read getRXEWM write setRXEWM;
- property RXFWM : TBits_8 read getRXFWM write setRXFWM;
- property w : TBits_32 read getw write setw;
- end;
- TETH_ETHIEN = record
- private
- function getEWMARKIE : TBits_1; inline;
- function getFWMARKIE : TBits_1; inline;
- function getPKTPENDIE : TBits_1; inline;
- function getRXACTIE : TBits_1; inline;
- function getRXBUFNAIE : TBits_1; inline;
- function getRXBUSEIE : TBits_1; inline;
- function getRXDONEIE : TBits_1; inline;
- function getRXOVFLWIE : TBits_1; inline;
- function getTXABORTIE : TBits_1; inline;
- function getTXBUSEIE : TBits_1; inline;
- function getTXDONEIE : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setEWMARKIE(thebits : TBits_1); inline;
- procedure setFWMARKIE(thebits : TBits_1); inline;
- procedure setPKTPENDIE(thebits : TBits_1); inline;
- procedure setRXACTIE(thebits : TBits_1); inline;
- procedure setRXBUFNAIE(thebits : TBits_1); inline;
- procedure setRXBUSEIE(thebits : TBits_1); inline;
- procedure setRXDONEIE(thebits : TBits_1); inline;
- procedure setRXOVFLWIE(thebits : TBits_1); inline;
- procedure setTXABORTIE(thebits : TBits_1); inline;
- procedure setTXBUSEIE(thebits : TBits_1); inline;
- procedure setTXDONEIE(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearEWMARKIE; inline;
- procedure clearFWMARKIE; inline;
- procedure clearPKTPENDIE; inline;
- procedure clearRXACTIE; inline;
- procedure clearRXBUFNAIE; inline;
- procedure clearRXBUSEIE; inline;
- procedure clearRXDONEIE; inline;
- procedure clearRXOVFLWIE; inline;
- procedure clearTXABORTIE; inline;
- procedure clearTXBUSEIE; inline;
- procedure clearTXDONEIE; inline;
- procedure setEWMARKIE; inline;
- procedure setFWMARKIE; inline;
- procedure setPKTPENDIE; inline;
- procedure setRXACTIE; inline;
- procedure setRXBUFNAIE; inline;
- procedure setRXBUSEIE; inline;
- procedure setRXDONEIE; inline;
- procedure setRXOVFLWIE; inline;
- procedure setTXABORTIE; inline;
- procedure setTXBUSEIE; inline;
- procedure setTXDONEIE; inline;
- property EWMARKIE : TBits_1 read getEWMARKIE write setEWMARKIE;
- property FWMARKIE : TBits_1 read getFWMARKIE write setFWMARKIE;
- property PKTPENDIE : TBits_1 read getPKTPENDIE write setPKTPENDIE;
- property RXACTIE : TBits_1 read getRXACTIE write setRXACTIE;
- property RXBUFNAIE : TBits_1 read getRXBUFNAIE write setRXBUFNAIE;
- property RXBUSEIE : TBits_1 read getRXBUSEIE write setRXBUSEIE;
- property RXDONEIE : TBits_1 read getRXDONEIE write setRXDONEIE;
- property RXOVFLWIE : TBits_1 read getRXOVFLWIE write setRXOVFLWIE;
- property TXABORTIE : TBits_1 read getTXABORTIE write setTXABORTIE;
- property TXBUSEIE : TBits_1 read getTXBUSEIE write setTXBUSEIE;
- property TXDONEIE : TBits_1 read getTXDONEIE write setTXDONEIE;
- property w : TBits_32 read getw write setw;
- end;
- TETH_ETHIRQ = record
- private
- function getEWMARK : TBits_1; inline;
- function getFWMARK : TBits_1; inline;
- function getPKTPEND : TBits_1; inline;
- function getRXACT : TBits_1; inline;
- function getRXBUFNA : TBits_1; inline;
- function getRXBUSE : TBits_1; inline;
- function getRXDONE : TBits_1; inline;
- function getRXOVFLW : TBits_1; inline;
- function getTXABORT : TBits_1; inline;
- function getTXBUSE : TBits_1; inline;
- function getTXDONE : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setEWMARK(thebits : TBits_1); inline;
- procedure setFWMARK(thebits : TBits_1); inline;
- procedure setPKTPEND(thebits : TBits_1); inline;
- procedure setRXACT(thebits : TBits_1); inline;
- procedure setRXBUFNA(thebits : TBits_1); inline;
- procedure setRXBUSE(thebits : TBits_1); inline;
- procedure setRXDONE(thebits : TBits_1); inline;
- procedure setRXOVFLW(thebits : TBits_1); inline;
- procedure setTXABORT(thebits : TBits_1); inline;
- procedure setTXBUSE(thebits : TBits_1); inline;
- procedure setTXDONE(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearEWMARK; inline;
- procedure clearFWMARK; inline;
- procedure clearPKTPEND; inline;
- procedure clearRXACT; inline;
- procedure clearRXBUFNA; inline;
- procedure clearRXBUSE; inline;
- procedure clearRXDONE; inline;
- procedure clearRXOVFLW; inline;
- procedure clearTXABORT; inline;
- procedure clearTXBUSE; inline;
- procedure clearTXDONE; inline;
- procedure setEWMARK; inline;
- procedure setFWMARK; inline;
- procedure setPKTPEND; inline;
- procedure setRXACT; inline;
- procedure setRXBUFNA; inline;
- procedure setRXBUSE; inline;
- procedure setRXDONE; inline;
- procedure setRXOVFLW; inline;
- procedure setTXABORT; inline;
- procedure setTXBUSE; inline;
- procedure setTXDONE; inline;
- property EWMARK : TBits_1 read getEWMARK write setEWMARK;
- property FWMARK : TBits_1 read getFWMARK write setFWMARK;
- property PKTPEND : TBits_1 read getPKTPEND write setPKTPEND;
- property RXACT : TBits_1 read getRXACT write setRXACT;
- property RXBUFNA : TBits_1 read getRXBUFNA write setRXBUFNA;
- property RXBUSE : TBits_1 read getRXBUSE write setRXBUSE;
- property RXDONE : TBits_1 read getRXDONE write setRXDONE;
- property RXOVFLW : TBits_1 read getRXOVFLW write setRXOVFLW;
- property TXABORT : TBits_1 read getTXABORT write setTXABORT;
- property TXBUSE : TBits_1 read getTXBUSE write setTXBUSE;
- property TXDONE : TBits_1 read getTXDONE write setTXDONE;
- property w : TBits_32 read getw write setw;
- end;
- TETH_ETHSTAT = record
- private
- function getBUFCNT : TBits_8; inline;
- function getBUSY : TBits_1; inline;
- function getETHBUSY : TBits_1; inline;
- function getRXBUSY : TBits_1; inline;
- function getTXBUSY : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setBUFCNT(thebits : TBits_8); inline;
- procedure setBUSY(thebits : TBits_1); inline;
- procedure setETHBUSY(thebits : TBits_1); inline;
- procedure setRXBUSY(thebits : TBits_1); inline;
- procedure setTXBUSY(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearBUSY; inline;
- procedure clearETHBUSY; inline;
- procedure clearRXBUSY; inline;
- procedure clearTXBUSY; inline;
- procedure setBUSY; inline;
- procedure setETHBUSY; inline;
- procedure setRXBUSY; inline;
- procedure setTXBUSY; inline;
- property BUFCNT : TBits_8 read getBUFCNT write setBUFCNT;
- property BUSY : TBits_1 read getBUSY write setBUSY;
- property ETHBUSY : TBits_1 read getETHBUSY write setETHBUSY;
- property RXBUSY : TBits_1 read getRXBUSY write setRXBUSY;
- property TXBUSY : TBits_1 read getTXBUSY write setTXBUSY;
- property w : TBits_32 read getw write setw;
- end;
- TETH_ETHRXOVFLOW = record
- private
- function getRXOVFLWCNT : TBits_16; inline;
- function getw : TBits_32; inline;
- procedure setRXOVFLWCNT(thebits : TBits_16); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property RXOVFLWCNT : TBits_16 read getRXOVFLWCNT write setRXOVFLWCNT;
- property w : TBits_32 read getw write setw;
- end;
- TETH_ETHFRMTXOK = record
- private
- function getFRMTXOKCNT : TBits_16; inline;
- function getw : TBits_32; inline;
- procedure setFRMTXOKCNT(thebits : TBits_16); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property FRMTXOKCNT : TBits_16 read getFRMTXOKCNT write setFRMTXOKCNT;
- property w : TBits_32 read getw write setw;
- end;
- TETH_ETHSCOLFRM = record
- private
- function getSCOLFRMCNT : TBits_16; inline;
- function getw : TBits_32; inline;
- procedure setSCOLFRMCNT(thebits : TBits_16); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property SCOLFRMCNT : TBits_16 read getSCOLFRMCNT write setSCOLFRMCNT;
- property w : TBits_32 read getw write setw;
- end;
- TETH_ETHMCOLFRM = record
- private
- function getMCOLFRMCNT : TBits_16; inline;
- function getMCOLFRM_CNT : TBits_16; inline;
- function getw : TBits_32; inline;
- procedure setMCOLFRMCNT(thebits : TBits_16); inline;
- procedure setMCOLFRM_CNT(thebits : TBits_16); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property MCOLFRMCNT : TBits_16 read getMCOLFRMCNT write setMCOLFRMCNT;
- property MCOLFRM_CNT : TBits_16 read getMCOLFRM_CNT write setMCOLFRM_CNT;
- property w : TBits_32 read getw write setw;
- end;
- TETH_ETHFRMRXOK = record
- private
- function getFRMRXOKCNT : TBits_16; inline;
- function getw : TBits_32; inline;
- procedure setFRMRXOKCNT(thebits : TBits_16); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property FRMRXOKCNT : TBits_16 read getFRMRXOKCNT write setFRMRXOKCNT;
- property w : TBits_32 read getw write setw;
- end;
- TETH_ETHFCSERR = record
- private
- function getFCSERRCNT : TBits_16; inline;
- function getw : TBits_32; inline;
- procedure setFCSERRCNT(thebits : TBits_16); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property FCSERRCNT : TBits_16 read getFCSERRCNT write setFCSERRCNT;
- property w : TBits_32 read getw write setw;
- end;
- TETH_ETHALGNERR = record
- private
- function getALGNERRCNT : TBits_16; inline;
- function getw : TBits_32; inline;
- procedure setALGNERRCNT(thebits : TBits_16); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property ALGNERRCNT : TBits_16 read getALGNERRCNT write setALGNERRCNT;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMAC1CFG1 = record
- private
- function getLOOPBACK : TBits_1; inline;
- function getPASSALL : TBits_1; inline;
- function getRESETRFUN : TBits_1; inline;
- function getRESETRMCS : TBits_1; inline;
- function getRESETTFUN : TBits_1; inline;
- function getRESETTMCS : TBits_1; inline;
- function getRXENABLE : TBits_1; inline;
- function getRXPAUSE : TBits_1; inline;
- function getSIMRESET : TBits_1; inline;
- function getSOFTRESET : TBits_1; inline;
- function getTXPAUSE : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setLOOPBACK(thebits : TBits_1); inline;
- procedure setPASSALL(thebits : TBits_1); inline;
- procedure setRESETRFUN(thebits : TBits_1); inline;
- procedure setRESETRMCS(thebits : TBits_1); inline;
- procedure setRESETTFUN(thebits : TBits_1); inline;
- procedure setRESETTMCS(thebits : TBits_1); inline;
- procedure setRXENABLE(thebits : TBits_1); inline;
- procedure setRXPAUSE(thebits : TBits_1); inline;
- procedure setSIMRESET(thebits : TBits_1); inline;
- procedure setSOFTRESET(thebits : TBits_1); inline;
- procedure setTXPAUSE(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearLOOPBACK; inline;
- procedure clearPASSALL; inline;
- procedure clearRESETRFUN; inline;
- procedure clearRESETRMCS; inline;
- procedure clearRESETTFUN; inline;
- procedure clearRESETTMCS; inline;
- procedure clearRXENABLE; inline;
- procedure clearRXPAUSE; inline;
- procedure clearSIMRESET; inline;
- procedure clearSOFTRESET; inline;
- procedure clearTXPAUSE; inline;
- procedure setLOOPBACK; inline;
- procedure setPASSALL; inline;
- procedure setRESETRFUN; inline;
- procedure setRESETRMCS; inline;
- procedure setRESETTFUN; inline;
- procedure setRESETTMCS; inline;
- procedure setRXENABLE; inline;
- procedure setRXPAUSE; inline;
- procedure setSIMRESET; inline;
- procedure setSOFTRESET; inline;
- procedure setTXPAUSE; inline;
- property LOOPBACK : TBits_1 read getLOOPBACK write setLOOPBACK;
- property PASSALL : TBits_1 read getPASSALL write setPASSALL;
- property RESETRFUN : TBits_1 read getRESETRFUN write setRESETRFUN;
- property RESETRMCS : TBits_1 read getRESETRMCS write setRESETRMCS;
- property RESETTFUN : TBits_1 read getRESETTFUN write setRESETTFUN;
- property RESETTMCS : TBits_1 read getRESETTMCS write setRESETTMCS;
- property RXENABLE : TBits_1 read getRXENABLE write setRXENABLE;
- property RXPAUSE : TBits_1 read getRXPAUSE write setRXPAUSE;
- property SIMRESET : TBits_1 read getSIMRESET write setSIMRESET;
- property SOFTRESET : TBits_1 read getSOFTRESET write setSOFTRESET;
- property TXPAUSE : TBits_1 read getTXPAUSE write setTXPAUSE;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMACxCFG1 = record
- private
- function getLOOPBACK : TBits_1; inline;
- function getPASSALL : TBits_1; inline;
- function getRESETRFUN : TBits_1; inline;
- function getRESETRMCS : TBits_1; inline;
- function getRESETTFUN : TBits_1; inline;
- function getRESETTMCS : TBits_1; inline;
- function getRXENABLE : TBits_1; inline;
- function getRXPAUSE : TBits_1; inline;
- function getSIMRESET : TBits_1; inline;
- function getSOFTRESET : TBits_1; inline;
- function getTXPAUSE : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setLOOPBACK(thebits : TBits_1); inline;
- procedure setPASSALL(thebits : TBits_1); inline;
- procedure setRESETRFUN(thebits : TBits_1); inline;
- procedure setRESETRMCS(thebits : TBits_1); inline;
- procedure setRESETTFUN(thebits : TBits_1); inline;
- procedure setRESETTMCS(thebits : TBits_1); inline;
- procedure setRXENABLE(thebits : TBits_1); inline;
- procedure setRXPAUSE(thebits : TBits_1); inline;
- procedure setSIMRESET(thebits : TBits_1); inline;
- procedure setSOFTRESET(thebits : TBits_1); inline;
- procedure setTXPAUSE(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearLOOPBACK; inline;
- procedure clearPASSALL; inline;
- procedure clearRESETRFUN; inline;
- procedure clearRESETRMCS; inline;
- procedure clearRESETTFUN; inline;
- procedure clearRESETTMCS; inline;
- procedure clearRXENABLE; inline;
- procedure clearRXPAUSE; inline;
- procedure clearSIMRESET; inline;
- procedure clearSOFTRESET; inline;
- procedure clearTXPAUSE; inline;
- procedure setLOOPBACK; inline;
- procedure setPASSALL; inline;
- procedure setRESETRFUN; inline;
- procedure setRESETRMCS; inline;
- procedure setRESETTFUN; inline;
- procedure setRESETTMCS; inline;
- procedure setRXENABLE; inline;
- procedure setRXPAUSE; inline;
- procedure setSIMRESET; inline;
- procedure setSOFTRESET; inline;
- procedure setTXPAUSE; inline;
- property LOOPBACK : TBits_1 read getLOOPBACK write setLOOPBACK;
- property PASSALL : TBits_1 read getPASSALL write setPASSALL;
- property RESETRFUN : TBits_1 read getRESETRFUN write setRESETRFUN;
- property RESETRMCS : TBits_1 read getRESETRMCS write setRESETRMCS;
- property RESETTFUN : TBits_1 read getRESETTFUN write setRESETTFUN;
- property RESETTMCS : TBits_1 read getRESETTMCS write setRESETTMCS;
- property RXENABLE : TBits_1 read getRXENABLE write setRXENABLE;
- property RXPAUSE : TBits_1 read getRXPAUSE write setRXPAUSE;
- property SIMRESET : TBits_1 read getSIMRESET write setSIMRESET;
- property SOFTRESET : TBits_1 read getSOFTRESET write setSOFTRESET;
- property TXPAUSE : TBits_1 read getTXPAUSE write setTXPAUSE;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMAC1CFG2 = record
- private
- function getAUTOPAD : TBits_1; inline;
- function getBPNOBKOFF : TBits_1; inline;
- function getCRCENABLE : TBits_1; inline;
- function getDELAYCRC : TBits_1; inline;
- function getEXCESSDFR : TBits_1; inline;
- function getFULLDPLX : TBits_1; inline;
- function getHUGEFRM : TBits_1; inline;
- function getLENGTHCK : TBits_1; inline;
- function getLONGPRE : TBits_1; inline;
- function getNOBKOFF : TBits_1; inline;
- function getPADENABLE : TBits_1; inline;
- function getPUREPRE : TBits_1; inline;
- function getVLANPAD : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setAUTOPAD(thebits : TBits_1); inline;
- procedure setBPNOBKOFF(thebits : TBits_1); inline;
- procedure setCRCENABLE(thebits : TBits_1); inline;
- procedure setDELAYCRC(thebits : TBits_1); inline;
- procedure setEXCESSDFR(thebits : TBits_1); inline;
- procedure setFULLDPLX(thebits : TBits_1); inline;
- procedure setHUGEFRM(thebits : TBits_1); inline;
- procedure setLENGTHCK(thebits : TBits_1); inline;
- procedure setLONGPRE(thebits : TBits_1); inline;
- procedure setNOBKOFF(thebits : TBits_1); inline;
- procedure setPADENABLE(thebits : TBits_1); inline;
- procedure setPUREPRE(thebits : TBits_1); inline;
- procedure setVLANPAD(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearAUTOPAD; inline;
- procedure clearBPNOBKOFF; inline;
- procedure clearCRCENABLE; inline;
- procedure clearDELAYCRC; inline;
- procedure clearEXCESSDFR; inline;
- procedure clearFULLDPLX; inline;
- procedure clearHUGEFRM; inline;
- procedure clearLENGTHCK; inline;
- procedure clearLONGPRE; inline;
- procedure clearNOBKOFF; inline;
- procedure clearPADENABLE; inline;
- procedure clearPUREPRE; inline;
- procedure clearVLANPAD; inline;
- procedure setAUTOPAD; inline;
- procedure setBPNOBKOFF; inline;
- procedure setCRCENABLE; inline;
- procedure setDELAYCRC; inline;
- procedure setEXCESSDFR; inline;
- procedure setFULLDPLX; inline;
- procedure setHUGEFRM; inline;
- procedure setLENGTHCK; inline;
- procedure setLONGPRE; inline;
- procedure setNOBKOFF; inline;
- procedure setPADENABLE; inline;
- procedure setPUREPRE; inline;
- procedure setVLANPAD; inline;
- property AUTOPAD : TBits_1 read getAUTOPAD write setAUTOPAD;
- property BPNOBKOFF : TBits_1 read getBPNOBKOFF write setBPNOBKOFF;
- property CRCENABLE : TBits_1 read getCRCENABLE write setCRCENABLE;
- property DELAYCRC : TBits_1 read getDELAYCRC write setDELAYCRC;
- property EXCESSDFR : TBits_1 read getEXCESSDFR write setEXCESSDFR;
- property FULLDPLX : TBits_1 read getFULLDPLX write setFULLDPLX;
- property HUGEFRM : TBits_1 read getHUGEFRM write setHUGEFRM;
- property LENGTHCK : TBits_1 read getLENGTHCK write setLENGTHCK;
- property LONGPRE : TBits_1 read getLONGPRE write setLONGPRE;
- property NOBKOFF : TBits_1 read getNOBKOFF write setNOBKOFF;
- property PADENABLE : TBits_1 read getPADENABLE write setPADENABLE;
- property PUREPRE : TBits_1 read getPUREPRE write setPUREPRE;
- property VLANPAD : TBits_1 read getVLANPAD write setVLANPAD;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMACxCFG2 = record
- private
- function getAUTOPAD : TBits_1; inline;
- function getBPNOBKOFF : TBits_1; inline;
- function getCRCENABLE : TBits_1; inline;
- function getDELAYCRC : TBits_1; inline;
- function getEXCESSDFR : TBits_1; inline;
- function getFULLDPLX : TBits_1; inline;
- function getHUGEFRM : TBits_1; inline;
- function getLENGTHCK : TBits_1; inline;
- function getLONGPRE : TBits_1; inline;
- function getNOBKOFF : TBits_1; inline;
- function getPADENABLE : TBits_1; inline;
- function getPUREPRE : TBits_1; inline;
- function getVLANPAD : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setAUTOPAD(thebits : TBits_1); inline;
- procedure setBPNOBKOFF(thebits : TBits_1); inline;
- procedure setCRCENABLE(thebits : TBits_1); inline;
- procedure setDELAYCRC(thebits : TBits_1); inline;
- procedure setEXCESSDFR(thebits : TBits_1); inline;
- procedure setFULLDPLX(thebits : TBits_1); inline;
- procedure setHUGEFRM(thebits : TBits_1); inline;
- procedure setLENGTHCK(thebits : TBits_1); inline;
- procedure setLONGPRE(thebits : TBits_1); inline;
- procedure setNOBKOFF(thebits : TBits_1); inline;
- procedure setPADENABLE(thebits : TBits_1); inline;
- procedure setPUREPRE(thebits : TBits_1); inline;
- procedure setVLANPAD(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearAUTOPAD; inline;
- procedure clearBPNOBKOFF; inline;
- procedure clearCRCENABLE; inline;
- procedure clearDELAYCRC; inline;
- procedure clearEXCESSDFR; inline;
- procedure clearFULLDPLX; inline;
- procedure clearHUGEFRM; inline;
- procedure clearLENGTHCK; inline;
- procedure clearLONGPRE; inline;
- procedure clearNOBKOFF; inline;
- procedure clearPADENABLE; inline;
- procedure clearPUREPRE; inline;
- procedure clearVLANPAD; inline;
- procedure setAUTOPAD; inline;
- procedure setBPNOBKOFF; inline;
- procedure setCRCENABLE; inline;
- procedure setDELAYCRC; inline;
- procedure setEXCESSDFR; inline;
- procedure setFULLDPLX; inline;
- procedure setHUGEFRM; inline;
- procedure setLENGTHCK; inline;
- procedure setLONGPRE; inline;
- procedure setNOBKOFF; inline;
- procedure setPADENABLE; inline;
- procedure setPUREPRE; inline;
- procedure setVLANPAD; inline;
- property AUTOPAD : TBits_1 read getAUTOPAD write setAUTOPAD;
- property BPNOBKOFF : TBits_1 read getBPNOBKOFF write setBPNOBKOFF;
- property CRCENABLE : TBits_1 read getCRCENABLE write setCRCENABLE;
- property DELAYCRC : TBits_1 read getDELAYCRC write setDELAYCRC;
- property EXCESSDFR : TBits_1 read getEXCESSDFR write setEXCESSDFR;
- property FULLDPLX : TBits_1 read getFULLDPLX write setFULLDPLX;
- property HUGEFRM : TBits_1 read getHUGEFRM write setHUGEFRM;
- property LENGTHCK : TBits_1 read getLENGTHCK write setLENGTHCK;
- property LONGPRE : TBits_1 read getLONGPRE write setLONGPRE;
- property NOBKOFF : TBits_1 read getNOBKOFF write setNOBKOFF;
- property PADENABLE : TBits_1 read getPADENABLE write setPADENABLE;
- property PUREPRE : TBits_1 read getPUREPRE write setPUREPRE;
- property VLANPAD : TBits_1 read getVLANPAD write setVLANPAD;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMAC1IPGT = record
- private
- function getB2BIPKTGP : TBits_7; inline;
- function getw : TBits_32; inline;
- procedure setB2BIPKTGP(thebits : TBits_7); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property B2BIPKTGP : TBits_7 read getB2BIPKTGP write setB2BIPKTGP;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMACxIPGT = record
- private
- function getB2BIPKTGP : TBits_7; inline;
- function getw : TBits_32; inline;
- procedure setB2BIPKTGP(thebits : TBits_7); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property B2BIPKTGP : TBits_7 read getB2BIPKTGP write setB2BIPKTGP;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMAC1IPGR = record
- private
- function getNB2BIPKTGP1 : TBits_7; inline;
- function getNB2BIPKTGP2 : TBits_7; inline;
- function getw : TBits_32; inline;
- procedure setNB2BIPKTGP1(thebits : TBits_7); inline;
- procedure setNB2BIPKTGP2(thebits : TBits_7); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property NB2BIPKTGP1 : TBits_7 read getNB2BIPKTGP1 write setNB2BIPKTGP1;
- property NB2BIPKTGP2 : TBits_7 read getNB2BIPKTGP2 write setNB2BIPKTGP2;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMACxIPGR = record
- private
- function getNB2BIPKTGP1 : TBits_7; inline;
- function getNB2BIPKTGP2 : TBits_7; inline;
- function getw : TBits_32; inline;
- procedure setNB2BIPKTGP1(thebits : TBits_7); inline;
- procedure setNB2BIPKTGP2(thebits : TBits_7); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property NB2BIPKTGP1 : TBits_7 read getNB2BIPKTGP1 write setNB2BIPKTGP1;
- property NB2BIPKTGP2 : TBits_7 read getNB2BIPKTGP2 write setNB2BIPKTGP2;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMAC1CLRT = record
- private
- function getCWINDOW : TBits_6; inline;
- function getRETX : TBits_4; inline;
- function getw : TBits_32; inline;
- procedure setCWINDOW(thebits : TBits_6); inline;
- procedure setRETX(thebits : TBits_4); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property CWINDOW : TBits_6 read getCWINDOW write setCWINDOW;
- property RETX : TBits_4 read getRETX write setRETX;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMACxCLRT = record
- private
- function getCWINDOW : TBits_6; inline;
- function getRETX : TBits_4; inline;
- function getw : TBits_32; inline;
- procedure setCWINDOW(thebits : TBits_6); inline;
- procedure setRETX(thebits : TBits_4); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property CWINDOW : TBits_6 read getCWINDOW write setCWINDOW;
- property RETX : TBits_4 read getRETX write setRETX;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMAC1MAXF = record
- private
- function getMACMAXF : TBits_16; inline;
- function getw : TBits_32; inline;
- procedure setMACMAXF(thebits : TBits_16); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property MACMAXF : TBits_16 read getMACMAXF write setMACMAXF;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMACxMAXF = record
- private
- function getMACMAXF : TBits_16; inline;
- function getw : TBits_32; inline;
- procedure setMACMAXF(thebits : TBits_16); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property MACMAXF : TBits_16 read getMACMAXF write setMACMAXF;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMAC1SUPP = record
- private
- function getRESETRMII : TBits_1; inline;
- function getSPEEDRMII : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setRESETRMII(thebits : TBits_1); inline;
- procedure setSPEEDRMII(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearRESETRMII; inline;
- procedure clearSPEEDRMII; inline;
- procedure setRESETRMII; inline;
- procedure setSPEEDRMII; inline;
- property RESETRMII : TBits_1 read getRESETRMII write setRESETRMII;
- property SPEEDRMII : TBits_1 read getSPEEDRMII write setSPEEDRMII;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMACxSUPP = record
- private
- function getRESETRMII : TBits_1; inline;
- function getSPEEDRMII : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setRESETRMII(thebits : TBits_1); inline;
- procedure setSPEEDRMII(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearRESETRMII; inline;
- procedure clearSPEEDRMII; inline;
- procedure setRESETRMII; inline;
- procedure setSPEEDRMII; inline;
- property RESETRMII : TBits_1 read getRESETRMII write setRESETRMII;
- property SPEEDRMII : TBits_1 read getSPEEDRMII write setSPEEDRMII;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMAC1TEST = record
- private
- function getSHRTQNTA : TBits_1; inline;
- function getTESTBP : TBits_1; inline;
- function getTESTPAUSE : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setSHRTQNTA(thebits : TBits_1); inline;
- procedure setTESTBP(thebits : TBits_1); inline;
- procedure setTESTPAUSE(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearSHRTQNTA; inline;
- procedure clearTESTBP; inline;
- procedure clearTESTPAUSE; inline;
- procedure setSHRTQNTA; inline;
- procedure setTESTBP; inline;
- procedure setTESTPAUSE; inline;
- property SHRTQNTA : TBits_1 read getSHRTQNTA write setSHRTQNTA;
- property TESTBP : TBits_1 read getTESTBP write setTESTBP;
- property TESTPAUSE : TBits_1 read getTESTPAUSE write setTESTPAUSE;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMACxTEST = record
- private
- function getSHRTQNTA : TBits_1; inline;
- function getTESTBP : TBits_1; inline;
- function getTESTPAUSE : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setSHRTQNTA(thebits : TBits_1); inline;
- procedure setTESTBP(thebits : TBits_1); inline;
- procedure setTESTPAUSE(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearSHRTQNTA; inline;
- procedure clearTESTBP; inline;
- procedure clearTESTPAUSE; inline;
- procedure setSHRTQNTA; inline;
- procedure setTESTBP; inline;
- procedure setTESTPAUSE; inline;
- property SHRTQNTA : TBits_1 read getSHRTQNTA write setSHRTQNTA;
- property TESTBP : TBits_1 read getTESTBP write setTESTBP;
- property TESTPAUSE : TBits_1 read getTESTPAUSE write setTESTPAUSE;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMAC1MCFG = record
- private
- function getCLKSEL : TBits_4; inline;
- function getNOPRE : TBits_1; inline;
- function getRESETMGMT : TBits_1; inline;
- function getSCANINC : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setCLKSEL(thebits : TBits_4); inline;
- procedure setNOPRE(thebits : TBits_1); inline;
- procedure setRESETMGMT(thebits : TBits_1); inline;
- procedure setSCANINC(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearNOPRE; inline;
- procedure clearRESETMGMT; inline;
- procedure clearSCANINC; inline;
- procedure setNOPRE; inline;
- procedure setRESETMGMT; inline;
- procedure setSCANINC; inline;
- property CLKSEL : TBits_4 read getCLKSEL write setCLKSEL;
- property NOPRE : TBits_1 read getNOPRE write setNOPRE;
- property RESETMGMT : TBits_1 read getRESETMGMT write setRESETMGMT;
- property SCANINC : TBits_1 read getSCANINC write setSCANINC;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMACxMCFG = record
- private
- function getCLKSEL : TBits_4; inline;
- function getNOPRE : TBits_1; inline;
- function getRESETMGMT : TBits_1; inline;
- function getSCANINC : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setCLKSEL(thebits : TBits_4); inline;
- procedure setNOPRE(thebits : TBits_1); inline;
- procedure setRESETMGMT(thebits : TBits_1); inline;
- procedure setSCANINC(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearNOPRE; inline;
- procedure clearRESETMGMT; inline;
- procedure clearSCANINC; inline;
- procedure setNOPRE; inline;
- procedure setRESETMGMT; inline;
- procedure setSCANINC; inline;
- property CLKSEL : TBits_4 read getCLKSEL write setCLKSEL;
- property NOPRE : TBits_1 read getNOPRE write setNOPRE;
- property RESETMGMT : TBits_1 read getRESETMGMT write setRESETMGMT;
- property SCANINC : TBits_1 read getSCANINC write setSCANINC;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMAC1MCMD = record
- private
- function getREAD : TBits_1; inline;
- function getSCAN : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setREAD(thebits : TBits_1); inline;
- procedure setSCAN(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearREAD; inline;
- procedure clearSCAN; inline;
- procedure setREAD; inline;
- procedure setSCAN; inline;
- property READ : TBits_1 read getREAD write setREAD;
- property SCAN : TBits_1 read getSCAN write setSCAN;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMACxMCMD = record
- private
- function getREAD : TBits_1; inline;
- function getSCAN : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setREAD(thebits : TBits_1); inline;
- procedure setSCAN(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearREAD; inline;
- procedure clearSCAN; inline;
- procedure setREAD; inline;
- procedure setSCAN; inline;
- property READ : TBits_1 read getREAD write setREAD;
- property SCAN : TBits_1 read getSCAN write setSCAN;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMAC1MADR = record
- private
- function getPHYADDR : TBits_5; inline;
- function getREGADDR : TBits_5; inline;
- function getw : TBits_32; inline;
- procedure setPHYADDR(thebits : TBits_5); inline;
- procedure setREGADDR(thebits : TBits_5); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property PHYADDR : TBits_5 read getPHYADDR write setPHYADDR;
- property REGADDR : TBits_5 read getREGADDR write setREGADDR;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMACxMADR = record
- private
- function getPHYADDR : TBits_5; inline;
- function getREGADDR : TBits_5; inline;
- function getw : TBits_32; inline;
- procedure setPHYADDR(thebits : TBits_5); inline;
- procedure setREGADDR(thebits : TBits_5); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property PHYADDR : TBits_5 read getPHYADDR write setPHYADDR;
- property REGADDR : TBits_5 read getREGADDR write setREGADDR;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMAC1MWTD = record
- private
- function getMWTD : TBits_16; inline;
- function getw : TBits_32; inline;
- procedure setMWTD(thebits : TBits_16); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property MWTD : TBits_16 read getMWTD write setMWTD;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMACxMWTD = record
- private
- function getMWTD : TBits_16; inline;
- function getw : TBits_32; inline;
- procedure setMWTD(thebits : TBits_16); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property MWTD : TBits_16 read getMWTD write setMWTD;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMAC1MRDD = record
- private
- function getMRDD : TBits_16; inline;
- function getw : TBits_32; inline;
- procedure setMRDD(thebits : TBits_16); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property MRDD : TBits_16 read getMRDD write setMRDD;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMACxMRDD = record
- private
- function getMRDD : TBits_16; inline;
- function getw : TBits_32; inline;
- procedure setMRDD(thebits : TBits_16); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property MRDD : TBits_16 read getMRDD write setMRDD;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMAC1MIND = record
- private
- function getLINKFAIL : TBits_1; inline;
- function getMIIMBUSY : TBits_1; inline;
- function getNOTVALID : TBits_1; inline;
- function getSCAN : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setLINKFAIL(thebits : TBits_1); inline;
- procedure setMIIMBUSY(thebits : TBits_1); inline;
- procedure setNOTVALID(thebits : TBits_1); inline;
- procedure setSCAN(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearLINKFAIL; inline;
- procedure clearMIIMBUSY; inline;
- procedure clearNOTVALID; inline;
- procedure clearSCAN; inline;
- procedure setLINKFAIL; inline;
- procedure setMIIMBUSY; inline;
- procedure setNOTVALID; inline;
- procedure setSCAN; inline;
- property LINKFAIL : TBits_1 read getLINKFAIL write setLINKFAIL;
- property MIIMBUSY : TBits_1 read getMIIMBUSY write setMIIMBUSY;
- property NOTVALID : TBits_1 read getNOTVALID write setNOTVALID;
- property SCAN : TBits_1 read getSCAN write setSCAN;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMACxMIND = record
- private
- function getLINKFAIL : TBits_1; inline;
- function getMIIMBUSY : TBits_1; inline;
- function getNOTVALID : TBits_1; inline;
- function getSCAN : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setLINKFAIL(thebits : TBits_1); inline;
- procedure setMIIMBUSY(thebits : TBits_1); inline;
- procedure setNOTVALID(thebits : TBits_1); inline;
- procedure setSCAN(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearLINKFAIL; inline;
- procedure clearMIIMBUSY; inline;
- procedure clearNOTVALID; inline;
- procedure clearSCAN; inline;
- procedure setLINKFAIL; inline;
- procedure setMIIMBUSY; inline;
- procedure setNOTVALID; inline;
- procedure setSCAN; inline;
- property LINKFAIL : TBits_1 read getLINKFAIL write setLINKFAIL;
- property MIIMBUSY : TBits_1 read getMIIMBUSY write setMIIMBUSY;
- property NOTVALID : TBits_1 read getNOTVALID write setNOTVALID;
- property SCAN : TBits_1 read getSCAN write setSCAN;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMAC1SA0 = record
- private
- function getSTNADDR5 : TBits_8; inline;
- function getSTNADDR6 : TBits_8; inline;
- function getw : TBits_32; inline;
- procedure setSTNADDR5(thebits : TBits_8); inline;
- procedure setSTNADDR6(thebits : TBits_8); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property STNADDR5 : TBits_8 read getSTNADDR5 write setSTNADDR5;
- property STNADDR6 : TBits_8 read getSTNADDR6 write setSTNADDR6;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMACxSA0 = record
- private
- function getSTNADDR5 : TBits_8; inline;
- function getSTNADDR6 : TBits_8; inline;
- function getw : TBits_32; inline;
- procedure setSTNADDR5(thebits : TBits_8); inline;
- procedure setSTNADDR6(thebits : TBits_8); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property STNADDR5 : TBits_8 read getSTNADDR5 write setSTNADDR5;
- property STNADDR6 : TBits_8 read getSTNADDR6 write setSTNADDR6;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMAC1SA1 = record
- private
- function getSTNADDR3 : TBits_8; inline;
- function getSTNADDR4 : TBits_8; inline;
- function getw : TBits_32; inline;
- procedure setSTNADDR3(thebits : TBits_8); inline;
- procedure setSTNADDR4(thebits : TBits_8); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property STNADDR3 : TBits_8 read getSTNADDR3 write setSTNADDR3;
- property STNADDR4 : TBits_8 read getSTNADDR4 write setSTNADDR4;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMACxSA1 = record
- private
- function getSTNADDR3 : TBits_8; inline;
- function getSTNADDR4 : TBits_8; inline;
- function getw : TBits_32; inline;
- procedure setSTNADDR3(thebits : TBits_8); inline;
- procedure setSTNADDR4(thebits : TBits_8); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property STNADDR3 : TBits_8 read getSTNADDR3 write setSTNADDR3;
- property STNADDR4 : TBits_8 read getSTNADDR4 write setSTNADDR4;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMAC1SA2 = record
- private
- function getSTNADDR1 : TBits_8; inline;
- function getSTNADDR2 : TBits_8; inline;
- function getw : TBits_32; inline;
- procedure setSTNADDR1(thebits : TBits_8); inline;
- procedure setSTNADDR2(thebits : TBits_8); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property STNADDR1 : TBits_8 read getSTNADDR1 write setSTNADDR1;
- property STNADDR2 : TBits_8 read getSTNADDR2 write setSTNADDR2;
- property w : TBits_32 read getw write setw;
- end;
- TETH_EMACxSA2 = record
- private
- function getSTNADDR1 : TBits_8; inline;
- function getSTNADDR2 : TBits_8; inline;
- function getw : TBits_32; inline;
- procedure setSTNADDR1(thebits : TBits_8); inline;
- procedure setSTNADDR2(thebits : TBits_8); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property STNADDR1 : TBits_8 read getSTNADDR1 write setSTNADDR1;
- property STNADDR2 : TBits_8 read getSTNADDR2 write setSTNADDR2;
- property w : TBits_32 read getw write setw;
- end;
- type
- TETHRegisters = record
- ETHCON1bits : TETH_ETHCON1;
- ETHCON1 : longWord;
- ETHCON1CLR : longWord;
- ETHCON1SET : longWord;
- ETHCON1INV : longWord;
- ETHCON2bits : TETH_ETHCON2;
- ETHCON2 : longWord;
- ETHCON2CLR : longWord;
- ETHCON2SET : longWord;
- ETHCON2INV : longWord;
- ETHTXSTbits : TETH_ETHTXST;
- ETHTXST : longWord;
- ETHTXSTCLR : longWord;
- ETHTXSTSET : longWord;
- ETHTXSTINV : longWord;
- ETHRXSTbits : TETH_ETHRXST;
- ETHRXST : longWord;
- ETHRXSTCLR : longWord;
- ETHRXSTSET : longWord;
- ETHRXSTINV : longWord;
- ETHHT0bits : TETH_ETHHT0;
- ETHHT0 : longWord;
- ETHHT0CLR : longWord;
- ETHHT0SET : longWord;
- ETHHT0INV : longWord;
- ETHHT1bits : TETH_ETHHT1;
- ETHHT1 : longWord;
- ETHHT1CLR : longWord;
- ETHHT1SET : longWord;
- ETHHT1INV : longWord;
- ETHPMM0bits : TETH_ETHPMM0;
- ETHPMM0 : longWord;
- ETHPMM0CLR : longWord;
- ETHPMM0SET : longWord;
- ETHPMM0INV : longWord;
- ETHPMM1bits : TETH_ETHPMM1;
- ETHPMM1 : longWord;
- ETHPMM1CLR : longWord;
- ETHPMM1SET : longWord;
- ETHPMM1INV : longWord;
- ETHPMCSbits : TETH_ETHPMCS;
- ETHPMCS : longWord;
- ETHPMCSCLR : longWord;
- ETHPMCSSET : longWord;
- ETHPMCSINV : longWord;
- ETHPMObits : TETH_ETHPMO;
- ETHPMO : longWord;
- ETHPMOCLR : longWord;
- ETHPMOSET : longWord;
- ETHPMOINV : longWord;
- ETHRXFCbits : TETH_ETHRXFC;
- ETHRXFC : longWord;
- ETHRXFCCLR : longWord;
- ETHRXFCSET : longWord;
- ETHRXFCINV : longWord;
- ETHRXWMbits : TETH_ETHRXWM;
- ETHRXWM : longWord;
- ETHRXWMCLR : longWord;
- ETHRXWMSET : longWord;
- ETHRXWMINV : longWord;
- ETHIENbits : TETH_ETHIEN;
- ETHIEN : longWord;
- ETHIENCLR : longWord;
- ETHIENSET : longWord;
- ETHIENINV : longWord;
- ETHIRQbits : TETH_ETHIRQ;
- ETHIRQ : longWord;
- ETHIRQCLR : longWord;
- ETHIRQSET : longWord;
- ETHIRQINV : longWord;
- ETHSTATbits : TETH_ETHSTAT;
- ETHSTAT : longWord;
- ETHSTATCLR : longWord;
- ETHSTATSET : longWord;
- ETHSTATINV : longWord;
- ETHRXOVFLOWbits : TETH_ETHRXOVFLOW;
- ETHRXOVFLOW : longWord;
- ETHRXOVFLOWCLR : longWord;
- ETHRXOVFLOWSET : longWord;
- ETHRXOVFLOWINV : longWord;
- ETHFRMTXOKbits : TETH_ETHFRMTXOK;
- ETHFRMTXOK : longWord;
- ETHFRMTXOKCLR : longWord;
- ETHFRMTXOKSET : longWord;
- ETHFRMTXOKINV : longWord;
- ETHSCOLFRMbits : TETH_ETHSCOLFRM;
- ETHSCOLFRM : longWord;
- ETHSCOLFRMCLR : longWord;
- ETHSCOLFRMSET : longWord;
- ETHSCOLFRMINV : longWord;
- ETHMCOLFRMbits : TETH_ETHMCOLFRM;
- ETHMCOLFRM : longWord;
- ETHMCOLFRMCLR : longWord;
- ETHMCOLFRMSET : longWord;
- ETHMCOLFRMINV : longWord;
- ETHFRMRXOKbits : TETH_ETHFRMRXOK;
- ETHFRMRXOK : longWord;
- ETHFRMRXOKCLR : longWord;
- ETHFRMRXOKSET : longWord;
- ETHFRMRXOKINV : longWord;
- ETHFCSERRbits : TETH_ETHFCSERR;
- ETHFCSERR : longWord;
- ETHFCSERRCLR : longWord;
- ETHFCSERRSET : longWord;
- ETHFCSERRINV : longWord;
- ETHALGNERRbits : TETH_ETHALGNERR;
- ETHALGNERR : longWord;
- ETHALGNERRCLR : longWord;
- ETHALGNERRSET : longWord;
- ETHALGNERRINV : longWord;
- EMAC1CFG1bits : TETH_EMAC1CFG1;
- EMAC1CFG1 : longWord;
- EMACxCFG1bits : TETH_EMACxCFG1;
- EMACxCFG1 : longWord;
- EMAC1CFG1CLR : longWord;
- EMACxCFG1CLR : longWord;
- EMAC1CFG1SET : longWord;
- EMACxCFG1SET : longWord;
- EMAC1CFG1INV : longWord;
- EMACxCFG1INV : longWord;
- EMAC1CFG2bits : TETH_EMAC1CFG2;
- EMAC1CFG2 : longWord;
- EMACxCFG2bits : TETH_EMACxCFG2;
- EMACxCFG2 : longWord;
- EMAC1CFG2CLR : longWord;
- EMACxCFG2CLR : longWord;
- EMAC1CFG2SET : longWord;
- EMACxCFG2SET : longWord;
- EMAC1CFG2INV : longWord;
- EMACxCFG2INV : longWord;
- EMAC1IPGTbits : TETH_EMAC1IPGT;
- EMAC1IPGT : longWord;
- EMACxIPGTbits : TETH_EMACxIPGT;
- EMACxIPGT : longWord;
- EMAC1IPGTCLR : longWord;
- EMACxIPGTCLR : longWord;
- EMAC1IPGTSET : longWord;
- EMACxIPGTSET : longWord;
- EMAC1IPGTINV : longWord;
- EMACxIPGTINV : longWord;
- EMAC1IPGRbits : TETH_EMAC1IPGR;
- EMAC1IPGR : longWord;
- EMACxIPGRbits : TETH_EMACxIPGR;
- EMACxIPGR : longWord;
- EMAC1IPGRCLR : longWord;
- EMACxIPGRCLR : longWord;
- EMAC1IPGRSET : longWord;
- EMACxIPGRSET : longWord;
- EMAC1IPGRINV : longWord;
- EMACxIPGRINV : longWord;
- EMAC1CLRTbits : TETH_EMAC1CLRT;
- EMAC1CLRT : longWord;
- EMACxCLRTbits : TETH_EMACxCLRT;
- EMACxCLRT : longWord;
- EMAC1CLRTCLR : longWord;
- EMACxCLRTCLR : longWord;
- EMAC1CLRTSET : longWord;
- EMACxCLRTSET : longWord;
- EMAC1CLRTINV : longWord;
- EMACxCLRTINV : longWord;
- EMAC1MAXFbits : TETH_EMAC1MAXF;
- EMAC1MAXF : longWord;
- EMACxMAXFbits : TETH_EMACxMAXF;
- EMACxMAXF : longWord;
- EMAC1MAXFCLR : longWord;
- EMACxMAXFCLR : longWord;
- EMAC1MAXFSET : longWord;
- EMACxMAXFSET : longWord;
- EMAC1MAXFINV : longWord;
- EMACxMAXFINV : longWord;
- EMAC1SUPPbits : TETH_EMAC1SUPP;
- EMAC1SUPP : longWord;
- EMACxSUPPbits : TETH_EMACxSUPP;
- EMACxSUPP : longWord;
- EMAC1SUPPCLR : longWord;
- EMACxSUPPCLR : longWord;
- EMAC1SUPPSET : longWord;
- EMACxSUPPSET : longWord;
- EMAC1SUPPINV : longWord;
- EMACxSUPPINV : longWord;
- EMAC1TESTbits : TETH_EMAC1TEST;
- EMAC1TEST : longWord;
- EMACxTESTbits : TETH_EMACxTEST;
- EMACxTEST : longWord;
- EMAC1TESTCLR : longWord;
- EMACxTESTCLR : longWord;
- EMAC1TESTSET : longWord;
- EMACxTESTSET : longWord;
- EMAC1TESTINV : longWord;
- EMACxTESTINV : longWord;
- EMAC1MCFGbits : TETH_EMAC1MCFG;
- EMAC1MCFG : longWord;
- EMACxMCFGbits : TETH_EMACxMCFG;
- EMACxMCFG : longWord;
- EMAC1MCFGCLR : longWord;
- EMACxMCFGCLR : longWord;
- EMAC1MCFGSET : longWord;
- EMACxMCFGSET : longWord;
- EMAC1MCFGINV : longWord;
- EMACxMCFGINV : longWord;
- EMAC1MCMDbits : TETH_EMAC1MCMD;
- EMAC1MCMD : longWord;
- EMACxMCMDbits : TETH_EMACxMCMD;
- EMACxMCMD : longWord;
- EMAC1MCMDCLR : longWord;
- EMACxMCMDCLR : longWord;
- EMAC1MCMDSET : longWord;
- EMACxMCMDSET : longWord;
- EMAC1MCMDINV : longWord;
- EMACxMCMDINV : longWord;
- EMAC1MADRbits : TETH_EMAC1MADR;
- EMAC1MADR : longWord;
- EMACxMADRbits : TETH_EMACxMADR;
- EMACxMADR : longWord;
- EMAC1MADRCLR : longWord;
- EMACxMADRCLR : longWord;
- EMAC1MADRSET : longWord;
- EMACxMADRSET : longWord;
- EMAC1MADRINV : longWord;
- EMACxMADRINV : longWord;
- EMAC1MWTDbits : TETH_EMAC1MWTD;
- EMAC1MWTD : longWord;
- EMACxMWTDbits : TETH_EMACxMWTD;
- EMACxMWTD : longWord;
- EMAC1MWTDCLR : longWord;
- EMACxMWTDCLR : longWord;
- EMAC1MWTDSET : longWord;
- EMACxMWTDSET : longWord;
- EMAC1MWTDINV : longWord;
- EMACxMWTDINV : longWord;
- EMAC1MRDDbits : TETH_EMAC1MRDD;
- EMAC1MRDD : longWord;
- EMACxMRDDbits : TETH_EMACxMRDD;
- EMACxMRDD : longWord;
- EMAC1MRDDCLR : longWord;
- EMACxMRDDCLR : longWord;
- EMAC1MRDDSET : longWord;
- EMACxMRDDSET : longWord;
- EMAC1MRDDINV : longWord;
- EMACxMRDDINV : longWord;
- EMAC1MINDbits : TETH_EMAC1MIND;
- EMAC1MIND : longWord;
- EMACxMINDbits : TETH_EMACxMIND;
- EMACxMIND : longWord;
- EMAC1MINDCLR : longWord;
- EMACxMINDCLR : longWord;
- EMAC1MINDSET : longWord;
- EMACxMINDSET : longWord;
- EMAC1MINDINV : longWord;
- EMACxMINDINV : longWord;
- EMAC1SA0bits : TETH_EMAC1SA0;
- EMAC1SA0 : longWord;
- EMACxSA0bits : TETH_EMACxSA0;
- EMACxSA0 : longWord;
- EMAC1SA0CLR : longWord;
- EMACxSA0CLR : longWord;
- EMAC1SA0SET : longWord;
- EMACxSA0SET : longWord;
- EMAC1SA0INV : longWord;
- EMACxSA0INV : longWord;
- EMAC1SA1bits : TETH_EMAC1SA1;
- EMAC1SA1 : longWord;
- EMACxSA1bits : TETH_EMACxSA1;
- EMACxSA1 : longWord;
- EMAC1SA1CLR : longWord;
- EMACxSA1CLR : longWord;
- EMAC1SA1SET : longWord;
- EMACxSA1SET : longWord;
- EMAC1SA1INV : longWord;
- EMACxSA1INV : longWord;
- EMAC1SA2bits : TETH_EMAC1SA2;
- EMAC1SA2 : longWord;
- EMACxSA2bits : TETH_EMACxSA2;
- EMACxSA2 : longWord;
- EMAC1SA2CLR : longWord;
- EMACxSA2CLR : longWord;
- EMAC1SA2SET : longWord;
- EMACxSA2SET : longWord;
- EMAC1SA2INV : longWord;
- EMACxSA2INV : longWord;
- end;
- TDEVCFG_DEVCFG3 = record
- private
- function getFETHIO : TBits_1; inline;
- function getFMIIEN : TBits_1; inline;
- function getFSRSSEL : TBits_3; inline;
- function getFUSBIDIO : TBits_1; inline;
- function getFVBUSONIO : TBits_1; inline;
- function getUSERID : TBits_16; inline;
- function getw : TBits_32; inline;
- procedure setFETHIO(thebits : TBits_1); inline;
- procedure setFMIIEN(thebits : TBits_1); inline;
- procedure setFSRSSEL(thebits : TBits_3); inline;
- procedure setFUSBIDIO(thebits : TBits_1); inline;
- procedure setFVBUSONIO(thebits : TBits_1); inline;
- procedure setUSERID(thebits : TBits_16); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearFETHIO; inline;
- procedure clearFMIIEN; inline;
- procedure clearFUSBIDIO; inline;
- procedure clearFVBUSONIO; inline;
- procedure setFETHIO; inline;
- procedure setFMIIEN; inline;
- procedure setFUSBIDIO; inline;
- procedure setFVBUSONIO; inline;
- property FETHIO : TBits_1 read getFETHIO write setFETHIO;
- property FMIIEN : TBits_1 read getFMIIEN write setFMIIEN;
- property FSRSSEL : TBits_3 read getFSRSSEL write setFSRSSEL;
- property FUSBIDIO : TBits_1 read getFUSBIDIO write setFUSBIDIO;
- property FVBUSONIO : TBits_1 read getFVBUSONIO write setFVBUSONIO;
- property USERID : TBits_16 read getUSERID write setUSERID;
- property w : TBits_32 read getw write setw;
- end;
- TDEVCFG_DEVCFG2 = record
- private
- function getFPLLIDIV : TBits_3; inline;
- function getFPLLMUL : TBits_3; inline;
- function getFPLLODIV : TBits_3; inline;
- function getUPLLEN : TBits_1; inline;
- function getUPLLIDIV : TBits_3; inline;
- function getw : TBits_32; inline;
- procedure setFPLLIDIV(thebits : TBits_3); inline;
- procedure setFPLLMUL(thebits : TBits_3); inline;
- procedure setFPLLODIV(thebits : TBits_3); inline;
- procedure setUPLLEN(thebits : TBits_1); inline;
- procedure setUPLLIDIV(thebits : TBits_3); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearUPLLEN; inline;
- procedure setUPLLEN; inline;
- property FPLLIDIV : TBits_3 read getFPLLIDIV write setFPLLIDIV;
- property FPLLMUL : TBits_3 read getFPLLMUL write setFPLLMUL;
- property FPLLODIV : TBits_3 read getFPLLODIV write setFPLLODIV;
- property UPLLEN : TBits_1 read getUPLLEN write setUPLLEN;
- property UPLLIDIV : TBits_3 read getUPLLIDIV write setUPLLIDIV;
- property w : TBits_32 read getw write setw;
- end;
- TDEVCFG_DEVCFG1 = record
- private
- function getFCKSM : TBits_2; inline;
- function getFNOSC : TBits_3; inline;
- function getFPBDIV : TBits_2; inline;
- function getFSOSCEN : TBits_1; inline;
- function getFWDTEN : TBits_1; inline;
- function getIESO : TBits_1; inline;
- function getOSCIOFNC : TBits_1; inline;
- function getPOSCMOD : TBits_2; inline;
- function getWDTPS : TBits_5; inline;
- function getw : TBits_32; inline;
- procedure setFCKSM(thebits : TBits_2); inline;
- procedure setFNOSC(thebits : TBits_3); inline;
- procedure setFPBDIV(thebits : TBits_2); inline;
- procedure setFSOSCEN(thebits : TBits_1); inline;
- procedure setFWDTEN(thebits : TBits_1); inline;
- procedure setIESO(thebits : TBits_1); inline;
- procedure setOSCIOFNC(thebits : TBits_1); inline;
- procedure setPOSCMOD(thebits : TBits_2); inline;
- procedure setWDTPS(thebits : TBits_5); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearFSOSCEN; inline;
- procedure clearFWDTEN; inline;
- procedure clearIESO; inline;
- procedure clearOSCIOFNC; inline;
- procedure setFSOSCEN; inline;
- procedure setFWDTEN; inline;
- procedure setIESO; inline;
- procedure setOSCIOFNC; inline;
- property FCKSM : TBits_2 read getFCKSM write setFCKSM;
- property FNOSC : TBits_3 read getFNOSC write setFNOSC;
- property FPBDIV : TBits_2 read getFPBDIV write setFPBDIV;
- property FSOSCEN : TBits_1 read getFSOSCEN write setFSOSCEN;
- property FWDTEN : TBits_1 read getFWDTEN write setFWDTEN;
- property IESO : TBits_1 read getIESO write setIESO;
- property OSCIOFNC : TBits_1 read getOSCIOFNC write setOSCIOFNC;
- property POSCMOD : TBits_2 read getPOSCMOD write setPOSCMOD;
- property WDTPS : TBits_5 read getWDTPS write setWDTPS;
- property w : TBits_32 read getw write setw;
- end;
- TDEVCFG_DEVCFG0 = record
- private
- function getBWP : TBits_1; inline;
- function getCP : TBits_1; inline;
- function getDEBUG : TBits_2; inline;
- function getFDEBUG : TBits_2; inline;
- function getICESEL : TBits_1; inline;
- function getPWP : TBits_8; inline;
- function getw : TBits_32; inline;
- procedure setBWP(thebits : TBits_1); inline;
- procedure setCP(thebits : TBits_1); inline;
- procedure setDEBUG(thebits : TBits_2); inline;
- procedure setFDEBUG(thebits : TBits_2); inline;
- procedure setICESEL(thebits : TBits_1); inline;
- procedure setPWP(thebits : TBits_8); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearBWP; inline;
- procedure clearCP; inline;
- procedure clearICESEL; inline;
- procedure setBWP; inline;
- procedure setCP; inline;
- procedure setICESEL; inline;
- property BWP : TBits_1 read getBWP write setBWP;
- property CP : TBits_1 read getCP write setCP;
- property DEBUG : TBits_2 read getDEBUG write setDEBUG;
- property FDEBUG : TBits_2 read getFDEBUG write setFDEBUG;
- property ICESEL : TBits_1 read getICESEL write setICESEL;
- property PWP : TBits_8 read getPWP write setPWP;
- property w : TBits_32 read getw write setw;
- end;
- const
- _CORE_TIMER_IRQ = 0;
- _CORE_SOFTWARE_0_IRQ = 1;
- _CORE_SOFTWARE_1_IRQ = 2;
- _EXTERNAL_0_IRQ = 3;
- _TIMER_1_IRQ = 4;
- _INPUT_CAPTURE_1_IRQ = 5;
- _OUTPUT_COMPARE_1_IRQ = 6;
- _EXTERNAL_1_IRQ = 7;
- _TIMER_2_IRQ = 8;
- _INPUT_CAPTURE_2_IRQ = 9;
- _OUTPUT_COMPARE_2_IRQ = 10;
- _EXTERNAL_2_IRQ = 11;
- _TIMER_3_IRQ = 12;
- _INPUT_CAPTURE_3_IRQ = 13;
- _OUTPUT_COMPARE_3_IRQ = 14;
- _EXTERNAL_3_IRQ = 15;
- _TIMER_4_IRQ = 16;
- _INPUT_CAPTURE_4_IRQ = 17;
- _OUTPUT_COMPARE_4_IRQ = 18;
- _EXTERNAL_4_IRQ = 19;
- _TIMER_5_IRQ = 20;
- _INPUT_CAPTURE_5_IRQ = 21;
- _OUTPUT_COMPARE_5_IRQ = 22;
- _SPI1_ERR_IRQ = 23;
- _SPI1_RX_IRQ = 24;
- _SPI1_TX_IRQ = 25;
- _I2C1A_ERR_IRQ = 26;
- _I2C3_BUS_IRQ = 26;
- _SPI1A_ERR_IRQ = 26;
- _SPI3_ERR_IRQ = 26;
- _UART1A_ERR_IRQ = 26;
- _UART1_ERR_IRQ = 26;
- _I2C1A_RX_IRQ = 27;
- _I2C3_SLAVE_IRQ = 27;
- _SPI1A_RX_IRQ = 27;
- _SPI3_RX_IRQ = 27;
- _UART1A_RX_IRQ = 27;
- _UART1_RX_IRQ = 27;
- _I2C1A_TX_IRQ = 28;
- _I2C3_MASTER_IRQ = 28;
- _SPI1A_TX_IRQ = 28;
- _SPI3_TX_IRQ = 28;
- _UART1A_TX_IRQ = 28;
- _UART1_TX_IRQ = 28;
- _I2C1_BUS_IRQ = 29;
- _I2C1_SLAVE_IRQ = 30;
- _I2C1_MASTER_IRQ = 31;
- _CHANGE_NOTICE_IRQ = 32;
- _ADC_IRQ = 33;
- _PMP_IRQ = 34;
- _COMPARATOR_1_IRQ = 35;
- _COMPARATOR_2_IRQ = 36;
- _I2C2A_ERR_IRQ = 37;
- _I2C4_BUS_IRQ = 37;
- _SPI2_ERR_IRQ = 37;
- _SPI2A_ERR_IRQ = 37;
- _UART2A_ERR_IRQ = 37;
- _UART3_ERR_IRQ = 37;
- _I2C2A_RX_IRQ = 38;
- _I2C4_SLAVE_IRQ = 38;
- _SPI2_RX_IRQ = 38;
- _SPI2A_RX_IRQ = 38;
- _UART2A_RX_IRQ = 38;
- _UART3_RX_IRQ = 38;
- _I2C2A_TX_IRQ = 39;
- _I2C4_MASTER_IRQ = 39;
- _SPI2A_TX_IRQ = 39;
- _SPI2_TX_IRQ = 39;
- _UART2A_TX_IRQ = 39;
- _UART3_TX_IRQ = 39;
- _I2C3A_ERR_IRQ = 40;
- _I2C5_BUS_IRQ = 40;
- _SPI3A_ERR_IRQ = 40;
- _SPI4_ERR_IRQ = 40;
- _UART2_ERR_IRQ = 40;
- _UART3A_ERR_IRQ = 40;
- _I2C3A_RX_IRQ = 41;
- _I2C5_SLAVE_IRQ = 41;
- _SPI3A_RX_IRQ = 41;
- _SPI4_RX_IRQ = 41;
- _UART2_RX_IRQ = 41;
- _UART3A_RX_IRQ = 41;
- _I2C3A_TX_IRQ = 42;
- _I2C5_MASTER_IRQ = 42;
- _SPI3A_TX_IRQ = 42;
- _SPI4_TX_IRQ = 42;
- _UART2_TX_IRQ = 42;
- _UART3A_TX_IRQ = 42;
- _I2C2_BUS_IRQ = 43;
- _I2C2_SLAVE_IRQ = 44;
- _I2C2_MASTER_IRQ = 45;
- _FAIL_SAFE_MONITOR_IRQ = 46;
- _RTCC_IRQ = 47;
- _DMA0_IRQ = 48;
- _DMA1_IRQ = 49;
- _DMA2_IRQ = 50;
- _DMA3_IRQ = 51;
- _DMA4_IRQ = 52;
- _DMA5_IRQ = 53;
- _DMA6_IRQ = 54;
- _DMA7_IRQ = 55;
- _FLASH_CONTROL_IRQ = 56;
- _USB_IRQ = 57;
- _ETHERNET_IRQ = 60;
- _INPUT_CAPTURE_ERROR_1_IRQ = 61;
- _INPUT_CAPTURE_ERROR_2_IRQ = 62;
- _INPUT_CAPTURE_ERROR_3_IRQ = 63;
- _INPUT_CAPTURE_ERROR_4_IRQ = 64;
- _INPUT_CAPTURE_ERROR_5_IRQ = 65;
- _PMP_ERROR_IRQ = 66;
- _UART1B_ERR_IRQ = 67;
- _UART4_ERR_IRQ = 67;
- _UART1B_RX_IRQ = 68;
- _UART4_RX_IRQ = 68;
- _UART1B_TX_IRQ = 69;
- _UART4_TX_IRQ = 69;
- _UART2B_ERR_IRQ = 70;
- _UART6_ERR_IRQ = 70;
- _UART2B_RX_IRQ = 71;
- _UART6_RX_IRQ = 71;
- _UART2B_TX_IRQ = 72;
- _UART6_TX_IRQ = 72;
- _UART3B_ERR_IRQ = 73;
- _UART5_ERR_IRQ = 73;
- _UART3B_RX_IRQ = 74;
- _UART5_RX_IRQ = 74;
- _UART3B_TX_IRQ = 75;
- _UART5_TX_IRQ = 75;
- const
- ADC10_BASE_ADDRESS = $BF809000;
- var
- ADC10 : TADC10Registers absolute ADC10_BASE_ADDRESS;
- const
- BMX_BASE_ADDRESS = $BF882000;
- var
- BMX : TBMXRegisters absolute BMX_BASE_ADDRESS;
- const
- CFG_BASE_ADDRESS = $BF80F200;
- var
- CFG : TCFGRegisters absolute CFG_BASE_ADDRESS;
- const
- CMP_BASE_ADDRESS = $BF80A000;
- var
- CMP : TCMPRegisters absolute CMP_BASE_ADDRESS;
- const
- CVR_BASE_ADDRESS = $BF809800;
- var
- CVR : TCVRRegisters absolute CVR_BASE_ADDRESS;
- const
- DMAC_BASE_ADDRESS = $BF883000;
- var
- DMAC : TDMACRegisters absolute DMAC_BASE_ADDRESS;
- const
- DMAC0_BASE_ADDRESS = $BF883060;
- var
- DMAC0 : TDMAC0Registers absolute DMAC0_BASE_ADDRESS;
- const
- DMAC1_BASE_ADDRESS = $BF883120;
- var
- DMAC1 : TDMAC1Registers absolute DMAC1_BASE_ADDRESS;
- const
- DMAC2_BASE_ADDRESS = $BF8831E0;
- var
- DMAC2 : TDMAC2Registers absolute DMAC2_BASE_ADDRESS;
- const
- DMAC3_BASE_ADDRESS = $BF8832A0;
- var
- DMAC3 : TDMAC3Registers absolute DMAC3_BASE_ADDRESS;
- const
- DMAC4_BASE_ADDRESS = $BF883360;
- var
- DMAC4 : TDMAC4Registers absolute DMAC4_BASE_ADDRESS;
- const
- DMAC5_BASE_ADDRESS = $BF883420;
- var
- DMAC5 : TDMAC5Registers absolute DMAC5_BASE_ADDRESS;
- const
- DMAC6_BASE_ADDRESS = $BF8834E0;
- var
- DMAC6 : TDMAC6Registers absolute DMAC6_BASE_ADDRESS;
- const
- DMAC7_BASE_ADDRESS = $BF8835A0;
- var
- DMAC7 : TDMAC7Registers absolute DMAC7_BASE_ADDRESS;
- const
- ETH_BASE_ADDRESS = $BF889000;
- var
- ETH : TETHRegisters absolute ETH_BASE_ADDRESS;
- const
- I2C1_BASE_ADDRESS = $BF805300;
- var
- I2C1 : TI2C1Registers absolute I2C1_BASE_ADDRESS;
- const
- I2C2_BASE_ADDRESS = $BF805400;
- var
- I2C2 : TI2C2Registers absolute I2C2_BASE_ADDRESS;
- const
- I2C3_BASE_ADDRESS = $BF805000;
- var
- I2C3 : TI2C3Registers absolute I2C3_BASE_ADDRESS;
- const
- I2C4_BASE_ADDRESS = $BF805100;
- var
- I2C4 : TI2C4Registers absolute I2C4_BASE_ADDRESS;
- const
- I2C5_BASE_ADDRESS = $BF805200;
- var
- I2C5 : TI2C5Registers absolute I2C5_BASE_ADDRESS;
- const
- ICAP1_BASE_ADDRESS = $BF802000;
- var
- ICAP1 : TICAP1Registers absolute ICAP1_BASE_ADDRESS;
- const
- ICAP2_BASE_ADDRESS = $BF802200;
- var
- ICAP2 : TICAP2Registers absolute ICAP2_BASE_ADDRESS;
- const
- ICAP3_BASE_ADDRESS = $BF802400;
- var
- ICAP3 : TICAP3Registers absolute ICAP3_BASE_ADDRESS;
- const
- ICAP4_BASE_ADDRESS = $BF802600;
- var
- ICAP4 : TICAP4Registers absolute ICAP4_BASE_ADDRESS;
- const
- ICAP5_BASE_ADDRESS = $BF802800;
- var
- ICAP5 : TICAP5Registers absolute ICAP5_BASE_ADDRESS;
- const
- INT_BASE_ADDRESS = $BF881000;
- var
- INT : TINTRegisters absolute INT_BASE_ADDRESS;
- const
- NVM_BASE_ADDRESS = $BF80F400;
- var
- NVM : TNVMRegisters absolute NVM_BASE_ADDRESS;
- const
- OCMP1_BASE_ADDRESS = $BF803000;
- var
- OCMP1 : TOCMP1Registers absolute OCMP1_BASE_ADDRESS;
- const
- OCMP2_BASE_ADDRESS = $BF803200;
- var
- OCMP2 : TOCMP2Registers absolute OCMP2_BASE_ADDRESS;
- const
- OCMP3_BASE_ADDRESS = $BF803400;
- var
- OCMP3 : TOCMP3Registers absolute OCMP3_BASE_ADDRESS;
- const
- OCMP4_BASE_ADDRESS = $BF803600;
- var
- OCMP4 : TOCMP4Registers absolute OCMP4_BASE_ADDRESS;
- const
- OCMP5_BASE_ADDRESS = $BF803800;
- var
- OCMP5 : TOCMP5Registers absolute OCMP5_BASE_ADDRESS;
- const
- OSC_BASE_ADDRESS = $BF80F000;
- var
- OSC : TOSCRegisters absolute OSC_BASE_ADDRESS;
- const
- PCACHE_BASE_ADDRESS = $BF884000;
- var
- PCACHE : TPCACHERegisters absolute PCACHE_BASE_ADDRESS;
- const
- PMP_BASE_ADDRESS = $BF807000;
- var
- PMP : TPMPRegisters absolute PMP_BASE_ADDRESS;
- const
- PORTA_BASE_ADDRESS = $BF886000;
- var
- PORTA : TPORTARegisters absolute PORTA_BASE_ADDRESS;
- const
- PORTB_BASE_ADDRESS = $BF886040;
- var
- PORTB : TPORTBRegisters absolute PORTB_BASE_ADDRESS;
- const
- PORTC_BASE_ADDRESS = $BF886080;
- var
- PORTC : TPORTCRegisters absolute PORTC_BASE_ADDRESS;
- const
- PORTD_BASE_ADDRESS = $BF8860C0;
- var
- PORTD : TPORTDRegisters absolute PORTD_BASE_ADDRESS;
- const
- PORTE_BASE_ADDRESS = $BF886100;
- var
- PORTE : TPORTERegisters absolute PORTE_BASE_ADDRESS;
- const
- PORTF_BASE_ADDRESS = $BF886140;
- var
- PORTF : TPORTFRegisters absolute PORTF_BASE_ADDRESS;
- const
- PORTG_BASE_ADDRESS = $BF886180;
- var
- PORTG : TPORTGRegisters absolute PORTG_BASE_ADDRESS;
- const
- RCON_BASE_ADDRESS = $BF80F600;
- var
- RCON : TRCONRegisters absolute RCON_BASE_ADDRESS;
- const
- RTCC_BASE_ADDRESS = $BF800200;
- var
- RTCC : TRTCCRegisters absolute RTCC_BASE_ADDRESS;
- const
- SPI1_BASE_ADDRESS = $BF805E00;
- var
- SPI1 : TSPI1Registers absolute SPI1_BASE_ADDRESS;
- const
- SPI2A_BASE_ADDRESS = $BF805A00;
- var
- SPI2A : TSPI2ARegisters absolute SPI2A_BASE_ADDRESS;
- const
- SPI3_BASE_ADDRESS = $BF805800;
- var
- SPI3 : TSPI3Registers absolute SPI3_BASE_ADDRESS;
- const
- SPI3A_BASE_ADDRESS = $BF805C00;
- var
- SPI3A : TSPI3ARegisters absolute SPI3A_BASE_ADDRESS;
- const
- TMR1_BASE_ADDRESS = $BF800600;
- var
- TMR1 : TTMR1Registers absolute TMR1_BASE_ADDRESS;
- const
- TMR2_BASE_ADDRESS = $BF800800;
- var
- TMR2 : TTMR2Registers absolute TMR2_BASE_ADDRESS;
- const
- TMR3_BASE_ADDRESS = $BF800A00;
- var
- TMR3 : TTMR3Registers absolute TMR3_BASE_ADDRESS;
- const
- TMR4_BASE_ADDRESS = $BF800C00;
- var
- TMR4 : TTMR4Registers absolute TMR4_BASE_ADDRESS;
- const
- TMR5_BASE_ADDRESS = $BF800E00;
- var
- TMR5 : TTMR5Registers absolute TMR5_BASE_ADDRESS;
- const
- UART1A_BASE_ADDRESS = $BF806000;
- var
- UART1A : TUART1ARegisters absolute UART1A_BASE_ADDRESS;
- const
- UART1B_BASE_ADDRESS = $BF806200;
- var
- UART1B : TUART1BRegisters absolute UART1B_BASE_ADDRESS;
- const
- UART2A_BASE_ADDRESS = $BF806400;
- var
- UART2A : TUART2ARegisters absolute UART2A_BASE_ADDRESS;
- const
- UART2B_BASE_ADDRESS = $BF806600;
- var
- UART2B : TUART2BRegisters absolute UART2B_BASE_ADDRESS;
- const
- UART3A_BASE_ADDRESS = $BF806800;
- var
- UART3A : TUART3ARegisters absolute UART3A_BASE_ADDRESS;
- const
- UART5_BASE_ADDRESS = $BF806A00;
- var
- UART5 : TUART5Registers absolute UART5_BASE_ADDRESS;
- const
- USB_BASE_ADDRESS = $BF885040;
- var
- USB : TUSBRegisters absolute USB_BASE_ADDRESS;
- const
- WDT_BASE_ADDRESS = $BF800000;
- var
- WDT : TWDTRegisters absolute WDT_BASE_ADDRESS;
- const
- _APPI_BASE_ADDRESS = $BF880190;
- var
- _APPI : T_APPIRegisters absolute _APPI_BASE_ADDRESS;
- const
- _APPO_BASE_ADDRESS = $BF880180;
- var
- _APPO : T_APPORegisters absolute _APPO_BASE_ADDRESS;
- const
- _DDPSTAT_BASE_ADDRESS = $BF880140;
- var
- _DDPSTAT : T_DDPSTATRegisters absolute _DDPSTAT_BASE_ADDRESS;
- const
- _STRO_BASE_ADDRESS = $BF880170;
- var
- _STRO : T_STRORegisters absolute _STRO_BASE_ADDRESS;
- implementation
- type
- TDefRegMap = record
- val : longWord;
- clr : longWord;
- &set : longWord;
- inv : longWord;
- end;
- pTDefRegMap = ^TDefRegMap;
- procedure TWDT_WDTCON.setWDTCLR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TWDT_WDTCON.clearWDTCLR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TWDT_WDTCON.setWDTCLR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TWDT_WDTCON.getWDTCLR : TBits_1; inline;
- begin
- getWDTCLR := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TWDT_WDTCON.setSWDTPS(thebits : TBits_5); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF83 or ( thebits shl 2 );
- end;
- function TWDT_WDTCON.getSWDTPS : TBits_5; inline;
- begin
- getSWDTPS := (pTDefRegMap(@Self)^.val and $0000007C) shr 2;
- end;
- procedure TWDT_WDTCON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TWDT_WDTCON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TWDT_WDTCON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TWDT_WDTCON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TWDT_WDTCON.setSWDTPS0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TWDT_WDTCON.clearSWDTPS0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TWDT_WDTCON.setSWDTPS0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TWDT_WDTCON.getSWDTPS0 : TBits_1; inline;
- begin
- getSWDTPS0 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TWDT_WDTCON.setSWDTPS1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TWDT_WDTCON.clearSWDTPS1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TWDT_WDTCON.setSWDTPS1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TWDT_WDTCON.getSWDTPS1 : TBits_1; inline;
- begin
- getSWDTPS1 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TWDT_WDTCON.setSWDTPS2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TWDT_WDTCON.clearSWDTPS2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TWDT_WDTCON.setSWDTPS2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TWDT_WDTCON.getSWDTPS2 : TBits_1; inline;
- begin
- getSWDTPS2 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TWDT_WDTCON.setSWDTPS3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TWDT_WDTCON.clearSWDTPS3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TWDT_WDTCON.setSWDTPS3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TWDT_WDTCON.getSWDTPS3 : TBits_1; inline;
- begin
- getSWDTPS3 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TWDT_WDTCON.setSWDTPS4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TWDT_WDTCON.clearSWDTPS4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TWDT_WDTCON.setSWDTPS4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TWDT_WDTCON.getSWDTPS4 : TBits_1; inline;
- begin
- getSWDTPS4 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TWDT_WDTCON.setWDTPSTA(thebits : TBits_5); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF83 or ( thebits shl 2 );
- end;
- function TWDT_WDTCON.getWDTPSTA : TBits_5; inline;
- begin
- getWDTPSTA := (pTDefRegMap(@Self)^.val and $0000007C) shr 2;
- end;
- procedure TWDT_WDTCON.setWDTPS(thebits : TBits_5); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF83 or ( thebits shl 2 );
- end;
- function TWDT_WDTCON.getWDTPS : TBits_5; inline;
- begin
- getWDTPS := (pTDefRegMap(@Self)^.val and $0000007C) shr 2;
- end;
- procedure TWDT_WDTCON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TWDT_WDTCON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TRTCC_RTCCON.setRTCOE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TRTCC_RTCCON.clearRTCOE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TRTCC_RTCCON.setRTCOE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TRTCC_RTCCON.getRTCOE : TBits_1; inline;
- begin
- getRTCOE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TRTCC_RTCCON.setHALFSEC; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TRTCC_RTCCON.clearHALFSEC; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TRTCC_RTCCON.setHALFSEC(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TRTCC_RTCCON.getHALFSEC : TBits_1; inline;
- begin
- getHALFSEC := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TRTCC_RTCCON.setRTCSYNC; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TRTCC_RTCCON.clearRTCSYNC; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TRTCC_RTCCON.setRTCSYNC(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TRTCC_RTCCON.getRTCSYNC : TBits_1; inline;
- begin
- getRTCSYNC := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TRTCC_RTCCON.setRTCWREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TRTCC_RTCCON.clearRTCWREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TRTCC_RTCCON.setRTCWREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TRTCC_RTCCON.getRTCWREN : TBits_1; inline;
- begin
- getRTCWREN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TRTCC_RTCCON.setRTCCLKON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TRTCC_RTCCON.clearRTCCLKON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TRTCC_RTCCON.setRTCCLKON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TRTCC_RTCCON.getRTCCLKON : TBits_1; inline;
- begin
- getRTCCLKON := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TRTCC_RTCCON.setRTSECSEL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TRTCC_RTCCON.clearRTSECSEL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TRTCC_RTCCON.setRTSECSEL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TRTCC_RTCCON.getRTSECSEL : TBits_1; inline;
- begin
- getRTSECSEL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TRTCC_RTCCON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TRTCC_RTCCON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TRTCC_RTCCON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TRTCC_RTCCON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TRTCC_RTCCON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TRTCC_RTCCON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TRTCC_RTCCON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TRTCC_RTCCON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TRTCC_RTCCON.setCAL(thebits : TBits_10); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FC00FFFF or ( thebits shl 16 );
- end;
- function TRTCC_RTCCON.getCAL : TBits_10; inline;
- begin
- getCAL := (pTDefRegMap(@Self)^.val and $03FF0000) shr 16;
- end;
- procedure TRTCC_RTCCON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TRTCC_RTCCON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TRTCC_RTCALRM.setARPT(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
- end;
- function TRTCC_RTCALRM.getARPT : TBits_8; inline;
- begin
- getARPT := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
- end;
- procedure TRTCC_RTCALRM.setAMASK(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
- end;
- function TRTCC_RTCALRM.getAMASK : TBits_4; inline;
- begin
- getAMASK := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
- end;
- procedure TRTCC_RTCALRM.setALRMSYNC; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TRTCC_RTCALRM.clearALRMSYNC; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TRTCC_RTCALRM.setALRMSYNC(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TRTCC_RTCALRM.getALRMSYNC : TBits_1; inline;
- begin
- getALRMSYNC := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TRTCC_RTCALRM.setPIV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TRTCC_RTCALRM.clearPIV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TRTCC_RTCALRM.setPIV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TRTCC_RTCALRM.getPIV : TBits_1; inline;
- begin
- getPIV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TRTCC_RTCALRM.setCHIME; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TRTCC_RTCALRM.clearCHIME; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TRTCC_RTCALRM.setCHIME(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TRTCC_RTCALRM.getCHIME : TBits_1; inline;
- begin
- getCHIME := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TRTCC_RTCALRM.setALRMEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TRTCC_RTCALRM.clearALRMEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TRTCC_RTCALRM.setALRMEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TRTCC_RTCALRM.getALRMEN : TBits_1; inline;
- begin
- getALRMEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TRTCC_RTCALRM.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TRTCC_RTCALRM.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TRTCC_RTCTIME.setSEC01(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
- end;
- function TRTCC_RTCTIME.getSEC01 : TBits_4; inline;
- begin
- getSEC01 := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
- end;
- procedure TRTCC_RTCTIME.setSEC10(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0FFF or ( thebits shl 12 );
- end;
- function TRTCC_RTCTIME.getSEC10 : TBits_4; inline;
- begin
- getSEC10 := (pTDefRegMap(@Self)^.val and $0000F000) shr 12;
- end;
- procedure TRTCC_RTCTIME.setMIN01(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF0FFFF or ( thebits shl 16 );
- end;
- function TRTCC_RTCTIME.getMIN01 : TBits_4; inline;
- begin
- getMIN01 := (pTDefRegMap(@Self)^.val and $000F0000) shr 16;
- end;
- procedure TRTCC_RTCTIME.setMIN10(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF0FFFFF or ( thebits shl 20 );
- end;
- function TRTCC_RTCTIME.getMIN10 : TBits_4; inline;
- begin
- getMIN10 := (pTDefRegMap(@Self)^.val and $00F00000) shr 20;
- end;
- procedure TRTCC_RTCTIME.setHR01(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F0FFFFFF or ( thebits shl 24 );
- end;
- function TRTCC_RTCTIME.getHR01 : TBits_4; inline;
- begin
- getHR01 := (pTDefRegMap(@Self)^.val and $0F000000) shr 24;
- end;
- procedure TRTCC_RTCTIME.setHR10(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $0FFFFFFF or ( thebits shl 28 );
- end;
- function TRTCC_RTCTIME.getHR10 : TBits_4; inline;
- begin
- getHR10 := (pTDefRegMap(@Self)^.val and $F0000000) shr 28;
- end;
- procedure TRTCC_RTCTIME.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TRTCC_RTCTIME.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TRTCC_RTCDATE.setWDAY01(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
- end;
- function TRTCC_RTCDATE.getWDAY01 : TBits_4; inline;
- begin
- getWDAY01 := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
- end;
- procedure TRTCC_RTCDATE.setDAY01(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
- end;
- function TRTCC_RTCDATE.getDAY01 : TBits_4; inline;
- begin
- getDAY01 := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
- end;
- procedure TRTCC_RTCDATE.setDAY10(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0FFF or ( thebits shl 12 );
- end;
- function TRTCC_RTCDATE.getDAY10 : TBits_4; inline;
- begin
- getDAY10 := (pTDefRegMap(@Self)^.val and $0000F000) shr 12;
- end;
- procedure TRTCC_RTCDATE.setMONTH01(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF0FFFF or ( thebits shl 16 );
- end;
- function TRTCC_RTCDATE.getMONTH01 : TBits_4; inline;
- begin
- getMONTH01 := (pTDefRegMap(@Self)^.val and $000F0000) shr 16;
- end;
- procedure TRTCC_RTCDATE.setMONTH10(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF0FFFFF or ( thebits shl 20 );
- end;
- function TRTCC_RTCDATE.getMONTH10 : TBits_4; inline;
- begin
- getMONTH10 := (pTDefRegMap(@Self)^.val and $00F00000) shr 20;
- end;
- procedure TRTCC_RTCDATE.setYEAR01(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F0FFFFFF or ( thebits shl 24 );
- end;
- function TRTCC_RTCDATE.getYEAR01 : TBits_4; inline;
- begin
- getYEAR01 := (pTDefRegMap(@Self)^.val and $0F000000) shr 24;
- end;
- procedure TRTCC_RTCDATE.setYEAR10(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $0FFFFFFF or ( thebits shl 28 );
- end;
- function TRTCC_RTCDATE.getYEAR10 : TBits_4; inline;
- begin
- getYEAR10 := (pTDefRegMap(@Self)^.val and $F0000000) shr 28;
- end;
- procedure TRTCC_RTCDATE.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TRTCC_RTCDATE.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TRTCC_ALRMTIME.setSEC01(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
- end;
- function TRTCC_ALRMTIME.getSEC01 : TBits_4; inline;
- begin
- getSEC01 := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
- end;
- procedure TRTCC_ALRMTIME.setSEC10(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0FFF or ( thebits shl 12 );
- end;
- function TRTCC_ALRMTIME.getSEC10 : TBits_4; inline;
- begin
- getSEC10 := (pTDefRegMap(@Self)^.val and $0000F000) shr 12;
- end;
- procedure TRTCC_ALRMTIME.setMIN01(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF0FFFF or ( thebits shl 16 );
- end;
- function TRTCC_ALRMTIME.getMIN01 : TBits_4; inline;
- begin
- getMIN01 := (pTDefRegMap(@Self)^.val and $000F0000) shr 16;
- end;
- procedure TRTCC_ALRMTIME.setMIN10(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF0FFFFF or ( thebits shl 20 );
- end;
- function TRTCC_ALRMTIME.getMIN10 : TBits_4; inline;
- begin
- getMIN10 := (pTDefRegMap(@Self)^.val and $00F00000) shr 20;
- end;
- procedure TRTCC_ALRMTIME.setHR01(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F0FFFFFF or ( thebits shl 24 );
- end;
- function TRTCC_ALRMTIME.getHR01 : TBits_4; inline;
- begin
- getHR01 := (pTDefRegMap(@Self)^.val and $0F000000) shr 24;
- end;
- procedure TRTCC_ALRMTIME.setHR10(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $0FFFFFFF or ( thebits shl 28 );
- end;
- function TRTCC_ALRMTIME.getHR10 : TBits_4; inline;
- begin
- getHR10 := (pTDefRegMap(@Self)^.val and $F0000000) shr 28;
- end;
- procedure TRTCC_ALRMTIME.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TRTCC_ALRMTIME.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TRTCC_ALRMDATE.setWDAY01(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
- end;
- function TRTCC_ALRMDATE.getWDAY01 : TBits_4; inline;
- begin
- getWDAY01 := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
- end;
- procedure TRTCC_ALRMDATE.setDAY01(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
- end;
- function TRTCC_ALRMDATE.getDAY01 : TBits_4; inline;
- begin
- getDAY01 := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
- end;
- procedure TRTCC_ALRMDATE.setDAY10(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0FFF or ( thebits shl 12 );
- end;
- function TRTCC_ALRMDATE.getDAY10 : TBits_4; inline;
- begin
- getDAY10 := (pTDefRegMap(@Self)^.val and $0000F000) shr 12;
- end;
- procedure TRTCC_ALRMDATE.setMONTH01(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF0FFFF or ( thebits shl 16 );
- end;
- function TRTCC_ALRMDATE.getMONTH01 : TBits_4; inline;
- begin
- getMONTH01 := (pTDefRegMap(@Self)^.val and $000F0000) shr 16;
- end;
- procedure TRTCC_ALRMDATE.setMONTH10(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF0FFFFF or ( thebits shl 20 );
- end;
- function TRTCC_ALRMDATE.getMONTH10 : TBits_4; inline;
- begin
- getMONTH10 := (pTDefRegMap(@Self)^.val and $00F00000) shr 20;
- end;
- procedure TRTCC_ALRMDATE.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TRTCC_ALRMDATE.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TTMR1_T1CON.setTCS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TTMR1_T1CON.clearTCS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TTMR1_T1CON.setTCS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TTMR1_T1CON.getTCS : TBits_1; inline;
- begin
- getTCS := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TTMR1_T1CON.setTSYNC; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TTMR1_T1CON.clearTSYNC; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TTMR1_T1CON.setTSYNC(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TTMR1_T1CON.getTSYNC : TBits_1; inline;
- begin
- getTSYNC := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TTMR1_T1CON.setTCKPS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFCF or ( thebits shl 4 );
- end;
- function TTMR1_T1CON.getTCKPS : TBits_2; inline;
- begin
- getTCKPS := (pTDefRegMap(@Self)^.val and $00000030) shr 4;
- end;
- procedure TTMR1_T1CON.setTGATE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TTMR1_T1CON.clearTGATE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TTMR1_T1CON.setTGATE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TTMR1_T1CON.getTGATE : TBits_1; inline;
- begin
- getTGATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TTMR1_T1CON.setTWIP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TTMR1_T1CON.clearTWIP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TTMR1_T1CON.setTWIP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TTMR1_T1CON.getTWIP : TBits_1; inline;
- begin
- getTWIP := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TTMR1_T1CON.setTWDIS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TTMR1_T1CON.clearTWDIS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TTMR1_T1CON.setTWDIS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TTMR1_T1CON.getTWDIS : TBits_1; inline;
- begin
- getTWDIS := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TTMR1_T1CON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TTMR1_T1CON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TTMR1_T1CON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TTMR1_T1CON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TTMR1_T1CON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TTMR1_T1CON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TTMR1_T1CON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TTMR1_T1CON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TTMR1_T1CON.setTCKPS0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TTMR1_T1CON.clearTCKPS0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TTMR1_T1CON.setTCKPS0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TTMR1_T1CON.getTCKPS0 : TBits_1; inline;
- begin
- getTCKPS0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TTMR1_T1CON.setTCKPS1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TTMR1_T1CON.clearTCKPS1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TTMR1_T1CON.setTCKPS1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TTMR1_T1CON.getTCKPS1 : TBits_1; inline;
- begin
- getTCKPS1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TTMR1_T1CON.setTSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TTMR1_T1CON.clearTSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TTMR1_T1CON.setTSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TTMR1_T1CON.getTSIDL : TBits_1; inline;
- begin
- getTSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TTMR1_T1CON.setTON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TTMR1_T1CON.clearTON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TTMR1_T1CON.setTON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TTMR1_T1CON.getTON : TBits_1; inline;
- begin
- getTON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TTMR1_T1CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TTMR1_T1CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TTMR2_T2CON.setTCS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TTMR2_T2CON.clearTCS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TTMR2_T2CON.setTCS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TTMR2_T2CON.getTCS : TBits_1; inline;
- begin
- getTCS := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TTMR2_T2CON.setT32; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TTMR2_T2CON.clearT32; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TTMR2_T2CON.setT32(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TTMR2_T2CON.getT32 : TBits_1; inline;
- begin
- getT32 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TTMR2_T2CON.setTCKPS(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF8F or ( thebits shl 4 );
- end;
- function TTMR2_T2CON.getTCKPS : TBits_3; inline;
- begin
- getTCKPS := (pTDefRegMap(@Self)^.val and $00000070) shr 4;
- end;
- procedure TTMR2_T2CON.setTGATE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TTMR2_T2CON.clearTGATE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TTMR2_T2CON.setTGATE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TTMR2_T2CON.getTGATE : TBits_1; inline;
- begin
- getTGATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TTMR2_T2CON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TTMR2_T2CON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TTMR2_T2CON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TTMR2_T2CON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TTMR2_T2CON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TTMR2_T2CON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TTMR2_T2CON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TTMR2_T2CON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TTMR2_T2CON.setTCKPS0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TTMR2_T2CON.clearTCKPS0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TTMR2_T2CON.setTCKPS0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TTMR2_T2CON.getTCKPS0 : TBits_1; inline;
- begin
- getTCKPS0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TTMR2_T2CON.setTCKPS1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TTMR2_T2CON.clearTCKPS1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TTMR2_T2CON.setTCKPS1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TTMR2_T2CON.getTCKPS1 : TBits_1; inline;
- begin
- getTCKPS1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TTMR2_T2CON.setTCKPS2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TTMR2_T2CON.clearTCKPS2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TTMR2_T2CON.setTCKPS2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TTMR2_T2CON.getTCKPS2 : TBits_1; inline;
- begin
- getTCKPS2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TTMR2_T2CON.setTSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TTMR2_T2CON.clearTSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TTMR2_T2CON.setTSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TTMR2_T2CON.getTSIDL : TBits_1; inline;
- begin
- getTSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TTMR2_T2CON.setTON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TTMR2_T2CON.clearTON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TTMR2_T2CON.setTON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TTMR2_T2CON.getTON : TBits_1; inline;
- begin
- getTON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TTMR2_T2CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TTMR2_T2CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TTMR3_T3CON.setTCS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TTMR3_T3CON.clearTCS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TTMR3_T3CON.setTCS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TTMR3_T3CON.getTCS : TBits_1; inline;
- begin
- getTCS := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TTMR3_T3CON.setTCKPS(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF8F or ( thebits shl 4 );
- end;
- function TTMR3_T3CON.getTCKPS : TBits_3; inline;
- begin
- getTCKPS := (pTDefRegMap(@Self)^.val and $00000070) shr 4;
- end;
- procedure TTMR3_T3CON.setTGATE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TTMR3_T3CON.clearTGATE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TTMR3_T3CON.setTGATE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TTMR3_T3CON.getTGATE : TBits_1; inline;
- begin
- getTGATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TTMR3_T3CON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TTMR3_T3CON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TTMR3_T3CON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TTMR3_T3CON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TTMR3_T3CON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TTMR3_T3CON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TTMR3_T3CON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TTMR3_T3CON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TTMR3_T3CON.setTCKPS0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TTMR3_T3CON.clearTCKPS0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TTMR3_T3CON.setTCKPS0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TTMR3_T3CON.getTCKPS0 : TBits_1; inline;
- begin
- getTCKPS0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TTMR3_T3CON.setTCKPS1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TTMR3_T3CON.clearTCKPS1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TTMR3_T3CON.setTCKPS1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TTMR3_T3CON.getTCKPS1 : TBits_1; inline;
- begin
- getTCKPS1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TTMR3_T3CON.setTCKPS2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TTMR3_T3CON.clearTCKPS2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TTMR3_T3CON.setTCKPS2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TTMR3_T3CON.getTCKPS2 : TBits_1; inline;
- begin
- getTCKPS2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TTMR3_T3CON.setTSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TTMR3_T3CON.clearTSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TTMR3_T3CON.setTSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TTMR3_T3CON.getTSIDL : TBits_1; inline;
- begin
- getTSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TTMR3_T3CON.setTON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TTMR3_T3CON.clearTON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TTMR3_T3CON.setTON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TTMR3_T3CON.getTON : TBits_1; inline;
- begin
- getTON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TTMR3_T3CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TTMR3_T3CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TTMR4_T4CON.setTCS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TTMR4_T4CON.clearTCS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TTMR4_T4CON.setTCS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TTMR4_T4CON.getTCS : TBits_1; inline;
- begin
- getTCS := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TTMR4_T4CON.setT32; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TTMR4_T4CON.clearT32; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TTMR4_T4CON.setT32(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TTMR4_T4CON.getT32 : TBits_1; inline;
- begin
- getT32 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TTMR4_T4CON.setTCKPS(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF8F or ( thebits shl 4 );
- end;
- function TTMR4_T4CON.getTCKPS : TBits_3; inline;
- begin
- getTCKPS := (pTDefRegMap(@Self)^.val and $00000070) shr 4;
- end;
- procedure TTMR4_T4CON.setTGATE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TTMR4_T4CON.clearTGATE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TTMR4_T4CON.setTGATE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TTMR4_T4CON.getTGATE : TBits_1; inline;
- begin
- getTGATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TTMR4_T4CON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TTMR4_T4CON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TTMR4_T4CON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TTMR4_T4CON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TTMR4_T4CON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TTMR4_T4CON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TTMR4_T4CON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TTMR4_T4CON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TTMR4_T4CON.setTCKPS0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TTMR4_T4CON.clearTCKPS0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TTMR4_T4CON.setTCKPS0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TTMR4_T4CON.getTCKPS0 : TBits_1; inline;
- begin
- getTCKPS0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TTMR4_T4CON.setTCKPS1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TTMR4_T4CON.clearTCKPS1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TTMR4_T4CON.setTCKPS1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TTMR4_T4CON.getTCKPS1 : TBits_1; inline;
- begin
- getTCKPS1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TTMR4_T4CON.setTCKPS2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TTMR4_T4CON.clearTCKPS2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TTMR4_T4CON.setTCKPS2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TTMR4_T4CON.getTCKPS2 : TBits_1; inline;
- begin
- getTCKPS2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TTMR4_T4CON.setTSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TTMR4_T4CON.clearTSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TTMR4_T4CON.setTSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TTMR4_T4CON.getTSIDL : TBits_1; inline;
- begin
- getTSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TTMR4_T4CON.setTON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TTMR4_T4CON.clearTON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TTMR4_T4CON.setTON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TTMR4_T4CON.getTON : TBits_1; inline;
- begin
- getTON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TTMR4_T4CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TTMR4_T4CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TTMR5_T5CON.setTCS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TTMR5_T5CON.clearTCS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TTMR5_T5CON.setTCS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TTMR5_T5CON.getTCS : TBits_1; inline;
- begin
- getTCS := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TTMR5_T5CON.setTCKPS(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF8F or ( thebits shl 4 );
- end;
- function TTMR5_T5CON.getTCKPS : TBits_3; inline;
- begin
- getTCKPS := (pTDefRegMap(@Self)^.val and $00000070) shr 4;
- end;
- procedure TTMR5_T5CON.setTGATE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TTMR5_T5CON.clearTGATE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TTMR5_T5CON.setTGATE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TTMR5_T5CON.getTGATE : TBits_1; inline;
- begin
- getTGATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TTMR5_T5CON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TTMR5_T5CON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TTMR5_T5CON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TTMR5_T5CON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TTMR5_T5CON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TTMR5_T5CON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TTMR5_T5CON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TTMR5_T5CON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TTMR5_T5CON.setTCKPS0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TTMR5_T5CON.clearTCKPS0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TTMR5_T5CON.setTCKPS0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TTMR5_T5CON.getTCKPS0 : TBits_1; inline;
- begin
- getTCKPS0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TTMR5_T5CON.setTCKPS1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TTMR5_T5CON.clearTCKPS1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TTMR5_T5CON.setTCKPS1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TTMR5_T5CON.getTCKPS1 : TBits_1; inline;
- begin
- getTCKPS1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TTMR5_T5CON.setTCKPS2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TTMR5_T5CON.clearTCKPS2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TTMR5_T5CON.setTCKPS2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TTMR5_T5CON.getTCKPS2 : TBits_1; inline;
- begin
- getTCKPS2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TTMR5_T5CON.setTSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TTMR5_T5CON.clearTSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TTMR5_T5CON.setTSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TTMR5_T5CON.getTSIDL : TBits_1; inline;
- begin
- getTSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TTMR5_T5CON.setTON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TTMR5_T5CON.clearTON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TTMR5_T5CON.setTON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TTMR5_T5CON.getTON : TBits_1; inline;
- begin
- getTON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TTMR5_T5CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TTMR5_T5CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TICAP1_IC1CON.setICM(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
- end;
- function TICAP1_IC1CON.getICM : TBits_3; inline;
- begin
- getICM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
- end;
- procedure TICAP1_IC1CON.setICBNE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TICAP1_IC1CON.clearICBNE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TICAP1_IC1CON.setICBNE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TICAP1_IC1CON.getICBNE : TBits_1; inline;
- begin
- getICBNE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TICAP1_IC1CON.setICOV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TICAP1_IC1CON.clearICOV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TICAP1_IC1CON.setICOV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TICAP1_IC1CON.getICOV : TBits_1; inline;
- begin
- getICOV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TICAP1_IC1CON.setICI(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
- end;
- function TICAP1_IC1CON.getICI : TBits_2; inline;
- begin
- getICI := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
- end;
- procedure TICAP1_IC1CON.setICTMR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TICAP1_IC1CON.clearICTMR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TICAP1_IC1CON.setICTMR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TICAP1_IC1CON.getICTMR : TBits_1; inline;
- begin
- getICTMR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TICAP1_IC1CON.setC32; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TICAP1_IC1CON.clearC32; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TICAP1_IC1CON.setC32(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TICAP1_IC1CON.getC32 : TBits_1; inline;
- begin
- getC32 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TICAP1_IC1CON.setFEDGE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TICAP1_IC1CON.clearFEDGE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TICAP1_IC1CON.setFEDGE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TICAP1_IC1CON.getFEDGE : TBits_1; inline;
- begin
- getFEDGE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TICAP1_IC1CON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TICAP1_IC1CON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TICAP1_IC1CON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TICAP1_IC1CON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TICAP1_IC1CON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TICAP1_IC1CON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TICAP1_IC1CON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TICAP1_IC1CON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TICAP1_IC1CON.setICM0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TICAP1_IC1CON.clearICM0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TICAP1_IC1CON.setICM0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TICAP1_IC1CON.getICM0 : TBits_1; inline;
- begin
- getICM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TICAP1_IC1CON.setICM1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TICAP1_IC1CON.clearICM1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TICAP1_IC1CON.setICM1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TICAP1_IC1CON.getICM1 : TBits_1; inline;
- begin
- getICM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TICAP1_IC1CON.setICM2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TICAP1_IC1CON.clearICM2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TICAP1_IC1CON.setICM2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TICAP1_IC1CON.getICM2 : TBits_1; inline;
- begin
- getICM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TICAP1_IC1CON.setICI0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TICAP1_IC1CON.clearICI0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TICAP1_IC1CON.setICI0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TICAP1_IC1CON.getICI0 : TBits_1; inline;
- begin
- getICI0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TICAP1_IC1CON.setICI1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TICAP1_IC1CON.clearICI1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TICAP1_IC1CON.setICI1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TICAP1_IC1CON.getICI1 : TBits_1; inline;
- begin
- getICI1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TICAP1_IC1CON.setICSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TICAP1_IC1CON.clearICSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TICAP1_IC1CON.setICSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TICAP1_IC1CON.getICSIDL : TBits_1; inline;
- begin
- getICSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TICAP1_IC1CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TICAP1_IC1CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TICAP2_IC2CON.setICM(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
- end;
- function TICAP2_IC2CON.getICM : TBits_3; inline;
- begin
- getICM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
- end;
- procedure TICAP2_IC2CON.setICBNE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TICAP2_IC2CON.clearICBNE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TICAP2_IC2CON.setICBNE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TICAP2_IC2CON.getICBNE : TBits_1; inline;
- begin
- getICBNE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TICAP2_IC2CON.setICOV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TICAP2_IC2CON.clearICOV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TICAP2_IC2CON.setICOV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TICAP2_IC2CON.getICOV : TBits_1; inline;
- begin
- getICOV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TICAP2_IC2CON.setICI(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
- end;
- function TICAP2_IC2CON.getICI : TBits_2; inline;
- begin
- getICI := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
- end;
- procedure TICAP2_IC2CON.setICTMR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TICAP2_IC2CON.clearICTMR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TICAP2_IC2CON.setICTMR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TICAP2_IC2CON.getICTMR : TBits_1; inline;
- begin
- getICTMR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TICAP2_IC2CON.setC32; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TICAP2_IC2CON.clearC32; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TICAP2_IC2CON.setC32(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TICAP2_IC2CON.getC32 : TBits_1; inline;
- begin
- getC32 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TICAP2_IC2CON.setFEDGE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TICAP2_IC2CON.clearFEDGE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TICAP2_IC2CON.setFEDGE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TICAP2_IC2CON.getFEDGE : TBits_1; inline;
- begin
- getFEDGE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TICAP2_IC2CON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TICAP2_IC2CON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TICAP2_IC2CON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TICAP2_IC2CON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TICAP2_IC2CON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TICAP2_IC2CON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TICAP2_IC2CON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TICAP2_IC2CON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TICAP2_IC2CON.setICM0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TICAP2_IC2CON.clearICM0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TICAP2_IC2CON.setICM0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TICAP2_IC2CON.getICM0 : TBits_1; inline;
- begin
- getICM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TICAP2_IC2CON.setICM1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TICAP2_IC2CON.clearICM1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TICAP2_IC2CON.setICM1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TICAP2_IC2CON.getICM1 : TBits_1; inline;
- begin
- getICM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TICAP2_IC2CON.setICM2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TICAP2_IC2CON.clearICM2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TICAP2_IC2CON.setICM2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TICAP2_IC2CON.getICM2 : TBits_1; inline;
- begin
- getICM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TICAP2_IC2CON.setICI0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TICAP2_IC2CON.clearICI0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TICAP2_IC2CON.setICI0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TICAP2_IC2CON.getICI0 : TBits_1; inline;
- begin
- getICI0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TICAP2_IC2CON.setICI1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TICAP2_IC2CON.clearICI1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TICAP2_IC2CON.setICI1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TICAP2_IC2CON.getICI1 : TBits_1; inline;
- begin
- getICI1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TICAP2_IC2CON.setICSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TICAP2_IC2CON.clearICSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TICAP2_IC2CON.setICSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TICAP2_IC2CON.getICSIDL : TBits_1; inline;
- begin
- getICSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TICAP2_IC2CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TICAP2_IC2CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TICAP3_IC3CON.setICM(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
- end;
- function TICAP3_IC3CON.getICM : TBits_3; inline;
- begin
- getICM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
- end;
- procedure TICAP3_IC3CON.setICBNE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TICAP3_IC3CON.clearICBNE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TICAP3_IC3CON.setICBNE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TICAP3_IC3CON.getICBNE : TBits_1; inline;
- begin
- getICBNE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TICAP3_IC3CON.setICOV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TICAP3_IC3CON.clearICOV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TICAP3_IC3CON.setICOV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TICAP3_IC3CON.getICOV : TBits_1; inline;
- begin
- getICOV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TICAP3_IC3CON.setICI(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
- end;
- function TICAP3_IC3CON.getICI : TBits_2; inline;
- begin
- getICI := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
- end;
- procedure TICAP3_IC3CON.setICTMR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TICAP3_IC3CON.clearICTMR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TICAP3_IC3CON.setICTMR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TICAP3_IC3CON.getICTMR : TBits_1; inline;
- begin
- getICTMR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TICAP3_IC3CON.setC32; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TICAP3_IC3CON.clearC32; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TICAP3_IC3CON.setC32(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TICAP3_IC3CON.getC32 : TBits_1; inline;
- begin
- getC32 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TICAP3_IC3CON.setFEDGE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TICAP3_IC3CON.clearFEDGE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TICAP3_IC3CON.setFEDGE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TICAP3_IC3CON.getFEDGE : TBits_1; inline;
- begin
- getFEDGE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TICAP3_IC3CON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TICAP3_IC3CON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TICAP3_IC3CON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TICAP3_IC3CON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TICAP3_IC3CON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TICAP3_IC3CON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TICAP3_IC3CON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TICAP3_IC3CON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TICAP3_IC3CON.setICM0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TICAP3_IC3CON.clearICM0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TICAP3_IC3CON.setICM0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TICAP3_IC3CON.getICM0 : TBits_1; inline;
- begin
- getICM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TICAP3_IC3CON.setICM1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TICAP3_IC3CON.clearICM1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TICAP3_IC3CON.setICM1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TICAP3_IC3CON.getICM1 : TBits_1; inline;
- begin
- getICM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TICAP3_IC3CON.setICM2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TICAP3_IC3CON.clearICM2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TICAP3_IC3CON.setICM2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TICAP3_IC3CON.getICM2 : TBits_1; inline;
- begin
- getICM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TICAP3_IC3CON.setICI0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TICAP3_IC3CON.clearICI0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TICAP3_IC3CON.setICI0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TICAP3_IC3CON.getICI0 : TBits_1; inline;
- begin
- getICI0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TICAP3_IC3CON.setICI1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TICAP3_IC3CON.clearICI1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TICAP3_IC3CON.setICI1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TICAP3_IC3CON.getICI1 : TBits_1; inline;
- begin
- getICI1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TICAP3_IC3CON.setICSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TICAP3_IC3CON.clearICSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TICAP3_IC3CON.setICSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TICAP3_IC3CON.getICSIDL : TBits_1; inline;
- begin
- getICSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TICAP3_IC3CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TICAP3_IC3CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TICAP4_IC4CON.setICM(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
- end;
- function TICAP4_IC4CON.getICM : TBits_3; inline;
- begin
- getICM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
- end;
- procedure TICAP4_IC4CON.setICBNE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TICAP4_IC4CON.clearICBNE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TICAP4_IC4CON.setICBNE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TICAP4_IC4CON.getICBNE : TBits_1; inline;
- begin
- getICBNE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TICAP4_IC4CON.setICOV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TICAP4_IC4CON.clearICOV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TICAP4_IC4CON.setICOV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TICAP4_IC4CON.getICOV : TBits_1; inline;
- begin
- getICOV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TICAP4_IC4CON.setICI(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
- end;
- function TICAP4_IC4CON.getICI : TBits_2; inline;
- begin
- getICI := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
- end;
- procedure TICAP4_IC4CON.setICTMR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TICAP4_IC4CON.clearICTMR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TICAP4_IC4CON.setICTMR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TICAP4_IC4CON.getICTMR : TBits_1; inline;
- begin
- getICTMR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TICAP4_IC4CON.setC32; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TICAP4_IC4CON.clearC32; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TICAP4_IC4CON.setC32(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TICAP4_IC4CON.getC32 : TBits_1; inline;
- begin
- getC32 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TICAP4_IC4CON.setFEDGE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TICAP4_IC4CON.clearFEDGE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TICAP4_IC4CON.setFEDGE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TICAP4_IC4CON.getFEDGE : TBits_1; inline;
- begin
- getFEDGE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TICAP4_IC4CON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TICAP4_IC4CON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TICAP4_IC4CON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TICAP4_IC4CON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TICAP4_IC4CON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TICAP4_IC4CON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TICAP4_IC4CON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TICAP4_IC4CON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TICAP4_IC4CON.setICM0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TICAP4_IC4CON.clearICM0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TICAP4_IC4CON.setICM0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TICAP4_IC4CON.getICM0 : TBits_1; inline;
- begin
- getICM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TICAP4_IC4CON.setICM1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TICAP4_IC4CON.clearICM1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TICAP4_IC4CON.setICM1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TICAP4_IC4CON.getICM1 : TBits_1; inline;
- begin
- getICM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TICAP4_IC4CON.setICM2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TICAP4_IC4CON.clearICM2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TICAP4_IC4CON.setICM2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TICAP4_IC4CON.getICM2 : TBits_1; inline;
- begin
- getICM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TICAP4_IC4CON.setICI0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TICAP4_IC4CON.clearICI0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TICAP4_IC4CON.setICI0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TICAP4_IC4CON.getICI0 : TBits_1; inline;
- begin
- getICI0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TICAP4_IC4CON.setICI1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TICAP4_IC4CON.clearICI1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TICAP4_IC4CON.setICI1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TICAP4_IC4CON.getICI1 : TBits_1; inline;
- begin
- getICI1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TICAP4_IC4CON.setICSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TICAP4_IC4CON.clearICSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TICAP4_IC4CON.setICSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TICAP4_IC4CON.getICSIDL : TBits_1; inline;
- begin
- getICSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TICAP4_IC4CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TICAP4_IC4CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TICAP5_IC5CON.setICM(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
- end;
- function TICAP5_IC5CON.getICM : TBits_3; inline;
- begin
- getICM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
- end;
- procedure TICAP5_IC5CON.setICBNE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TICAP5_IC5CON.clearICBNE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TICAP5_IC5CON.setICBNE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TICAP5_IC5CON.getICBNE : TBits_1; inline;
- begin
- getICBNE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TICAP5_IC5CON.setICOV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TICAP5_IC5CON.clearICOV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TICAP5_IC5CON.setICOV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TICAP5_IC5CON.getICOV : TBits_1; inline;
- begin
- getICOV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TICAP5_IC5CON.setICI(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
- end;
- function TICAP5_IC5CON.getICI : TBits_2; inline;
- begin
- getICI := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
- end;
- procedure TICAP5_IC5CON.setICTMR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TICAP5_IC5CON.clearICTMR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TICAP5_IC5CON.setICTMR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TICAP5_IC5CON.getICTMR : TBits_1; inline;
- begin
- getICTMR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TICAP5_IC5CON.setC32; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TICAP5_IC5CON.clearC32; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TICAP5_IC5CON.setC32(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TICAP5_IC5CON.getC32 : TBits_1; inline;
- begin
- getC32 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TICAP5_IC5CON.setFEDGE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TICAP5_IC5CON.clearFEDGE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TICAP5_IC5CON.setFEDGE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TICAP5_IC5CON.getFEDGE : TBits_1; inline;
- begin
- getFEDGE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TICAP5_IC5CON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TICAP5_IC5CON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TICAP5_IC5CON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TICAP5_IC5CON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TICAP5_IC5CON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TICAP5_IC5CON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TICAP5_IC5CON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TICAP5_IC5CON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TICAP5_IC5CON.setICM0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TICAP5_IC5CON.clearICM0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TICAP5_IC5CON.setICM0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TICAP5_IC5CON.getICM0 : TBits_1; inline;
- begin
- getICM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TICAP5_IC5CON.setICM1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TICAP5_IC5CON.clearICM1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TICAP5_IC5CON.setICM1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TICAP5_IC5CON.getICM1 : TBits_1; inline;
- begin
- getICM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TICAP5_IC5CON.setICM2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TICAP5_IC5CON.clearICM2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TICAP5_IC5CON.setICM2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TICAP5_IC5CON.getICM2 : TBits_1; inline;
- begin
- getICM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TICAP5_IC5CON.setICI0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TICAP5_IC5CON.clearICI0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TICAP5_IC5CON.setICI0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TICAP5_IC5CON.getICI0 : TBits_1; inline;
- begin
- getICI0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TICAP5_IC5CON.setICI1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TICAP5_IC5CON.clearICI1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TICAP5_IC5CON.setICI1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TICAP5_IC5CON.getICI1 : TBits_1; inline;
- begin
- getICI1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TICAP5_IC5CON.setICSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TICAP5_IC5CON.clearICSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TICAP5_IC5CON.setICSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TICAP5_IC5CON.getICSIDL : TBits_1; inline;
- begin
- getICSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TICAP5_IC5CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TICAP5_IC5CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TOCMP1_OC1CON.setOCM(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
- end;
- function TOCMP1_OC1CON.getOCM : TBits_3; inline;
- begin
- getOCM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
- end;
- procedure TOCMP1_OC1CON.setOCTSEL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TOCMP1_OC1CON.clearOCTSEL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TOCMP1_OC1CON.setOCTSEL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TOCMP1_OC1CON.getOCTSEL : TBits_1; inline;
- begin
- getOCTSEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TOCMP1_OC1CON.setOCFLT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TOCMP1_OC1CON.clearOCFLT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TOCMP1_OC1CON.setOCFLT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TOCMP1_OC1CON.getOCFLT : TBits_1; inline;
- begin
- getOCFLT := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TOCMP1_OC1CON.setOC32; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TOCMP1_OC1CON.clearOC32; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TOCMP1_OC1CON.setOC32(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TOCMP1_OC1CON.getOC32 : TBits_1; inline;
- begin
- getOC32 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TOCMP1_OC1CON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TOCMP1_OC1CON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TOCMP1_OC1CON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TOCMP1_OC1CON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TOCMP1_OC1CON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TOCMP1_OC1CON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TOCMP1_OC1CON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TOCMP1_OC1CON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TOCMP1_OC1CON.setOCM0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TOCMP1_OC1CON.clearOCM0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TOCMP1_OC1CON.setOCM0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TOCMP1_OC1CON.getOCM0 : TBits_1; inline;
- begin
- getOCM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TOCMP1_OC1CON.setOCM1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TOCMP1_OC1CON.clearOCM1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TOCMP1_OC1CON.setOCM1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TOCMP1_OC1CON.getOCM1 : TBits_1; inline;
- begin
- getOCM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TOCMP1_OC1CON.setOCM2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TOCMP1_OC1CON.clearOCM2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TOCMP1_OC1CON.setOCM2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TOCMP1_OC1CON.getOCM2 : TBits_1; inline;
- begin
- getOCM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TOCMP1_OC1CON.setOCSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TOCMP1_OC1CON.clearOCSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TOCMP1_OC1CON.setOCSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TOCMP1_OC1CON.getOCSIDL : TBits_1; inline;
- begin
- getOCSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TOCMP1_OC1CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TOCMP1_OC1CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TOCMP2_OC2CON.setOCM(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
- end;
- function TOCMP2_OC2CON.getOCM : TBits_3; inline;
- begin
- getOCM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
- end;
- procedure TOCMP2_OC2CON.setOCTSEL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TOCMP2_OC2CON.clearOCTSEL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TOCMP2_OC2CON.setOCTSEL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TOCMP2_OC2CON.getOCTSEL : TBits_1; inline;
- begin
- getOCTSEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TOCMP2_OC2CON.setOCFLT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TOCMP2_OC2CON.clearOCFLT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TOCMP2_OC2CON.setOCFLT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TOCMP2_OC2CON.getOCFLT : TBits_1; inline;
- begin
- getOCFLT := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TOCMP2_OC2CON.setOC32; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TOCMP2_OC2CON.clearOC32; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TOCMP2_OC2CON.setOC32(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TOCMP2_OC2CON.getOC32 : TBits_1; inline;
- begin
- getOC32 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TOCMP2_OC2CON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TOCMP2_OC2CON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TOCMP2_OC2CON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TOCMP2_OC2CON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TOCMP2_OC2CON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TOCMP2_OC2CON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TOCMP2_OC2CON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TOCMP2_OC2CON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TOCMP2_OC2CON.setOCM0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TOCMP2_OC2CON.clearOCM0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TOCMP2_OC2CON.setOCM0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TOCMP2_OC2CON.getOCM0 : TBits_1; inline;
- begin
- getOCM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TOCMP2_OC2CON.setOCM1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TOCMP2_OC2CON.clearOCM1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TOCMP2_OC2CON.setOCM1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TOCMP2_OC2CON.getOCM1 : TBits_1; inline;
- begin
- getOCM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TOCMP2_OC2CON.setOCM2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TOCMP2_OC2CON.clearOCM2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TOCMP2_OC2CON.setOCM2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TOCMP2_OC2CON.getOCM2 : TBits_1; inline;
- begin
- getOCM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TOCMP2_OC2CON.setOCSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TOCMP2_OC2CON.clearOCSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TOCMP2_OC2CON.setOCSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TOCMP2_OC2CON.getOCSIDL : TBits_1; inline;
- begin
- getOCSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TOCMP2_OC2CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TOCMP2_OC2CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TOCMP3_OC3CON.setOCM(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
- end;
- function TOCMP3_OC3CON.getOCM : TBits_3; inline;
- begin
- getOCM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
- end;
- procedure TOCMP3_OC3CON.setOCTSEL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TOCMP3_OC3CON.clearOCTSEL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TOCMP3_OC3CON.setOCTSEL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TOCMP3_OC3CON.getOCTSEL : TBits_1; inline;
- begin
- getOCTSEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TOCMP3_OC3CON.setOCFLT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TOCMP3_OC3CON.clearOCFLT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TOCMP3_OC3CON.setOCFLT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TOCMP3_OC3CON.getOCFLT : TBits_1; inline;
- begin
- getOCFLT := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TOCMP3_OC3CON.setOC32; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TOCMP3_OC3CON.clearOC32; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TOCMP3_OC3CON.setOC32(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TOCMP3_OC3CON.getOC32 : TBits_1; inline;
- begin
- getOC32 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TOCMP3_OC3CON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TOCMP3_OC3CON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TOCMP3_OC3CON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TOCMP3_OC3CON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TOCMP3_OC3CON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TOCMP3_OC3CON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TOCMP3_OC3CON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TOCMP3_OC3CON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TOCMP3_OC3CON.setOCM0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TOCMP3_OC3CON.clearOCM0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TOCMP3_OC3CON.setOCM0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TOCMP3_OC3CON.getOCM0 : TBits_1; inline;
- begin
- getOCM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TOCMP3_OC3CON.setOCM1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TOCMP3_OC3CON.clearOCM1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TOCMP3_OC3CON.setOCM1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TOCMP3_OC3CON.getOCM1 : TBits_1; inline;
- begin
- getOCM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TOCMP3_OC3CON.setOCM2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TOCMP3_OC3CON.clearOCM2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TOCMP3_OC3CON.setOCM2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TOCMP3_OC3CON.getOCM2 : TBits_1; inline;
- begin
- getOCM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TOCMP3_OC3CON.setOCSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TOCMP3_OC3CON.clearOCSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TOCMP3_OC3CON.setOCSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TOCMP3_OC3CON.getOCSIDL : TBits_1; inline;
- begin
- getOCSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TOCMP3_OC3CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TOCMP3_OC3CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TOCMP4_OC4CON.setOCM(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
- end;
- function TOCMP4_OC4CON.getOCM : TBits_3; inline;
- begin
- getOCM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
- end;
- procedure TOCMP4_OC4CON.setOCTSEL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TOCMP4_OC4CON.clearOCTSEL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TOCMP4_OC4CON.setOCTSEL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TOCMP4_OC4CON.getOCTSEL : TBits_1; inline;
- begin
- getOCTSEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TOCMP4_OC4CON.setOCFLT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TOCMP4_OC4CON.clearOCFLT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TOCMP4_OC4CON.setOCFLT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TOCMP4_OC4CON.getOCFLT : TBits_1; inline;
- begin
- getOCFLT := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TOCMP4_OC4CON.setOC32; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TOCMP4_OC4CON.clearOC32; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TOCMP4_OC4CON.setOC32(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TOCMP4_OC4CON.getOC32 : TBits_1; inline;
- begin
- getOC32 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TOCMP4_OC4CON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TOCMP4_OC4CON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TOCMP4_OC4CON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TOCMP4_OC4CON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TOCMP4_OC4CON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TOCMP4_OC4CON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TOCMP4_OC4CON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TOCMP4_OC4CON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TOCMP4_OC4CON.setOCM0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TOCMP4_OC4CON.clearOCM0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TOCMP4_OC4CON.setOCM0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TOCMP4_OC4CON.getOCM0 : TBits_1; inline;
- begin
- getOCM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TOCMP4_OC4CON.setOCM1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TOCMP4_OC4CON.clearOCM1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TOCMP4_OC4CON.setOCM1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TOCMP4_OC4CON.getOCM1 : TBits_1; inline;
- begin
- getOCM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TOCMP4_OC4CON.setOCM2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TOCMP4_OC4CON.clearOCM2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TOCMP4_OC4CON.setOCM2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TOCMP4_OC4CON.getOCM2 : TBits_1; inline;
- begin
- getOCM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TOCMP4_OC4CON.setOCSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TOCMP4_OC4CON.clearOCSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TOCMP4_OC4CON.setOCSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TOCMP4_OC4CON.getOCSIDL : TBits_1; inline;
- begin
- getOCSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TOCMP4_OC4CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TOCMP4_OC4CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TOCMP5_OC5CON.setOCM(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
- end;
- function TOCMP5_OC5CON.getOCM : TBits_3; inline;
- begin
- getOCM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
- end;
- procedure TOCMP5_OC5CON.setOCTSEL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TOCMP5_OC5CON.clearOCTSEL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TOCMP5_OC5CON.setOCTSEL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TOCMP5_OC5CON.getOCTSEL : TBits_1; inline;
- begin
- getOCTSEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TOCMP5_OC5CON.setOCFLT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TOCMP5_OC5CON.clearOCFLT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TOCMP5_OC5CON.setOCFLT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TOCMP5_OC5CON.getOCFLT : TBits_1; inline;
- begin
- getOCFLT := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TOCMP5_OC5CON.setOC32; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TOCMP5_OC5CON.clearOC32; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TOCMP5_OC5CON.setOC32(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TOCMP5_OC5CON.getOC32 : TBits_1; inline;
- begin
- getOC32 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TOCMP5_OC5CON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TOCMP5_OC5CON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TOCMP5_OC5CON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TOCMP5_OC5CON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TOCMP5_OC5CON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TOCMP5_OC5CON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TOCMP5_OC5CON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TOCMP5_OC5CON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TOCMP5_OC5CON.setOCM0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TOCMP5_OC5CON.clearOCM0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TOCMP5_OC5CON.setOCM0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TOCMP5_OC5CON.getOCM0 : TBits_1; inline;
- begin
- getOCM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TOCMP5_OC5CON.setOCM1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TOCMP5_OC5CON.clearOCM1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TOCMP5_OC5CON.setOCM1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TOCMP5_OC5CON.getOCM1 : TBits_1; inline;
- begin
- getOCM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TOCMP5_OC5CON.setOCM2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TOCMP5_OC5CON.clearOCM2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TOCMP5_OC5CON.setOCM2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TOCMP5_OC5CON.getOCM2 : TBits_1; inline;
- begin
- getOCM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TOCMP5_OC5CON.setOCSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TOCMP5_OC5CON.clearOCSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TOCMP5_OC5CON.setOCSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TOCMP5_OC5CON.getOCSIDL : TBits_1; inline;
- begin
- getOCSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TOCMP5_OC5CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TOCMP5_OC5CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TI2C3_I2C1ACON.setSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TI2C3_I2C1ACON.clearSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TI2C3_I2C1ACON.setSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TI2C3_I2C1ACON.getSEN : TBits_1; inline;
- begin
- getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TI2C3_I2C1ACON.setRSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TI2C3_I2C1ACON.clearRSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TI2C3_I2C1ACON.setRSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TI2C3_I2C1ACON.getRSEN : TBits_1; inline;
- begin
- getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TI2C3_I2C1ACON.setPEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TI2C3_I2C1ACON.clearPEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TI2C3_I2C1ACON.setPEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TI2C3_I2C1ACON.getPEN : TBits_1; inline;
- begin
- getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TI2C3_I2C1ACON.setRCEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TI2C3_I2C1ACON.clearRCEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TI2C3_I2C1ACON.setRCEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TI2C3_I2C1ACON.getRCEN : TBits_1; inline;
- begin
- getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TI2C3_I2C1ACON.setACKEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TI2C3_I2C1ACON.clearACKEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TI2C3_I2C1ACON.setACKEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TI2C3_I2C1ACON.getACKEN : TBits_1; inline;
- begin
- getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TI2C3_I2C1ACON.setACKDT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TI2C3_I2C1ACON.clearACKDT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TI2C3_I2C1ACON.setACKDT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TI2C3_I2C1ACON.getACKDT : TBits_1; inline;
- begin
- getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TI2C3_I2C1ACON.setSTREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TI2C3_I2C1ACON.clearSTREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TI2C3_I2C1ACON.setSTREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TI2C3_I2C1ACON.getSTREN : TBits_1; inline;
- begin
- getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TI2C3_I2C1ACON.setGCEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TI2C3_I2C1ACON.clearGCEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TI2C3_I2C1ACON.setGCEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TI2C3_I2C1ACON.getGCEN : TBits_1; inline;
- begin
- getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TI2C3_I2C1ACON.setSMEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TI2C3_I2C1ACON.clearSMEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TI2C3_I2C1ACON.setSMEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TI2C3_I2C1ACON.getSMEN : TBits_1; inline;
- begin
- getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TI2C3_I2C1ACON.setDISSLW; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TI2C3_I2C1ACON.clearDISSLW; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TI2C3_I2C1ACON.setDISSLW(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TI2C3_I2C1ACON.getDISSLW : TBits_1; inline;
- begin
- getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TI2C3_I2C1ACON.setA10M; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TI2C3_I2C1ACON.clearA10M; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TI2C3_I2C1ACON.setA10M(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TI2C3_I2C1ACON.getA10M : TBits_1; inline;
- begin
- getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TI2C3_I2C1ACON.setSTRICT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TI2C3_I2C1ACON.clearSTRICT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TI2C3_I2C1ACON.setSTRICT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TI2C3_I2C1ACON.getSTRICT : TBits_1; inline;
- begin
- getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TI2C3_I2C1ACON.setSCLREL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TI2C3_I2C1ACON.clearSCLREL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TI2C3_I2C1ACON.setSCLREL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TI2C3_I2C1ACON.getSCLREL : TBits_1; inline;
- begin
- getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TI2C3_I2C1ACON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TI2C3_I2C1ACON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TI2C3_I2C1ACON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TI2C3_I2C1ACON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TI2C3_I2C1ACON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TI2C3_I2C1ACON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TI2C3_I2C1ACON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TI2C3_I2C1ACON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TI2C3_I2C1ACON.setIPMIEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TI2C3_I2C1ACON.clearIPMIEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TI2C3_I2C1ACON.setIPMIEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TI2C3_I2C1ACON.getIPMIEN : TBits_1; inline;
- begin
- getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TI2C3_I2C1ACON.setI2CSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TI2C3_I2C1ACON.clearI2CSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TI2C3_I2C1ACON.setI2CSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TI2C3_I2C1ACON.getI2CSIDL : TBits_1; inline;
- begin
- getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TI2C3_I2C1ACON.setI2CEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TI2C3_I2C1ACON.clearI2CEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TI2C3_I2C1ACON.setI2CEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TI2C3_I2C1ACON.getI2CEN : TBits_1; inline;
- begin
- getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TI2C3_I2C1ACON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TI2C3_I2C1ACON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TI2C3_I2C3CON.setSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TI2C3_I2C3CON.clearSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TI2C3_I2C3CON.setSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TI2C3_I2C3CON.getSEN : TBits_1; inline;
- begin
- getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TI2C3_I2C3CON.setRSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TI2C3_I2C3CON.clearRSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TI2C3_I2C3CON.setRSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TI2C3_I2C3CON.getRSEN : TBits_1; inline;
- begin
- getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TI2C3_I2C3CON.setPEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TI2C3_I2C3CON.clearPEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TI2C3_I2C3CON.setPEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TI2C3_I2C3CON.getPEN : TBits_1; inline;
- begin
- getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TI2C3_I2C3CON.setRCEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TI2C3_I2C3CON.clearRCEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TI2C3_I2C3CON.setRCEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TI2C3_I2C3CON.getRCEN : TBits_1; inline;
- begin
- getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TI2C3_I2C3CON.setACKEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TI2C3_I2C3CON.clearACKEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TI2C3_I2C3CON.setACKEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TI2C3_I2C3CON.getACKEN : TBits_1; inline;
- begin
- getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TI2C3_I2C3CON.setACKDT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TI2C3_I2C3CON.clearACKDT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TI2C3_I2C3CON.setACKDT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TI2C3_I2C3CON.getACKDT : TBits_1; inline;
- begin
- getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TI2C3_I2C3CON.setSTREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TI2C3_I2C3CON.clearSTREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TI2C3_I2C3CON.setSTREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TI2C3_I2C3CON.getSTREN : TBits_1; inline;
- begin
- getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TI2C3_I2C3CON.setGCEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TI2C3_I2C3CON.clearGCEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TI2C3_I2C3CON.setGCEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TI2C3_I2C3CON.getGCEN : TBits_1; inline;
- begin
- getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TI2C3_I2C3CON.setSMEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TI2C3_I2C3CON.clearSMEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TI2C3_I2C3CON.setSMEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TI2C3_I2C3CON.getSMEN : TBits_1; inline;
- begin
- getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TI2C3_I2C3CON.setDISSLW; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TI2C3_I2C3CON.clearDISSLW; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TI2C3_I2C3CON.setDISSLW(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TI2C3_I2C3CON.getDISSLW : TBits_1; inline;
- begin
- getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TI2C3_I2C3CON.setA10M; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TI2C3_I2C3CON.clearA10M; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TI2C3_I2C3CON.setA10M(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TI2C3_I2C3CON.getA10M : TBits_1; inline;
- begin
- getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TI2C3_I2C3CON.setSTRICT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TI2C3_I2C3CON.clearSTRICT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TI2C3_I2C3CON.setSTRICT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TI2C3_I2C3CON.getSTRICT : TBits_1; inline;
- begin
- getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TI2C3_I2C3CON.setSCLREL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TI2C3_I2C3CON.clearSCLREL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TI2C3_I2C3CON.setSCLREL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TI2C3_I2C3CON.getSCLREL : TBits_1; inline;
- begin
- getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TI2C3_I2C3CON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TI2C3_I2C3CON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TI2C3_I2C3CON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TI2C3_I2C3CON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TI2C3_I2C3CON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TI2C3_I2C3CON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TI2C3_I2C3CON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TI2C3_I2C3CON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TI2C3_I2C3CON.setIPMIEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TI2C3_I2C3CON.clearIPMIEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TI2C3_I2C3CON.setIPMIEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TI2C3_I2C3CON.getIPMIEN : TBits_1; inline;
- begin
- getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TI2C3_I2C3CON.setI2CSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TI2C3_I2C3CON.clearI2CSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TI2C3_I2C3CON.setI2CSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TI2C3_I2C3CON.getI2CSIDL : TBits_1; inline;
- begin
- getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TI2C3_I2C3CON.setI2CEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TI2C3_I2C3CON.clearI2CEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TI2C3_I2C3CON.setI2CEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TI2C3_I2C3CON.getI2CEN : TBits_1; inline;
- begin
- getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TI2C3_I2C3CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TI2C3_I2C3CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TI2C3_I2C1ASTAT.setTBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TI2C3_I2C1ASTAT.clearTBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TI2C3_I2C1ASTAT.setTBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TI2C3_I2C1ASTAT.getTBF : TBits_1; inline;
- begin
- getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TI2C3_I2C1ASTAT.setRBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TI2C3_I2C1ASTAT.clearRBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TI2C3_I2C1ASTAT.setRBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TI2C3_I2C1ASTAT.getRBF : TBits_1; inline;
- begin
- getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TI2C3_I2C1ASTAT.setR_W; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TI2C3_I2C1ASTAT.clearR_W; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TI2C3_I2C1ASTAT.setR_W(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TI2C3_I2C1ASTAT.getR_W : TBits_1; inline;
- begin
- getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TI2C3_I2C1ASTAT.setS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TI2C3_I2C1ASTAT.clearS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TI2C3_I2C1ASTAT.setS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TI2C3_I2C1ASTAT.getS : TBits_1; inline;
- begin
- getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TI2C3_I2C1ASTAT.setP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TI2C3_I2C1ASTAT.clearP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TI2C3_I2C1ASTAT.setP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TI2C3_I2C1ASTAT.getP : TBits_1; inline;
- begin
- getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TI2C3_I2C1ASTAT.setD_A; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TI2C3_I2C1ASTAT.clearD_A; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TI2C3_I2C1ASTAT.setD_A(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TI2C3_I2C1ASTAT.getD_A : TBits_1; inline;
- begin
- getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TI2C3_I2C1ASTAT.setI2COV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TI2C3_I2C1ASTAT.clearI2COV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TI2C3_I2C1ASTAT.setI2COV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TI2C3_I2C1ASTAT.getI2COV : TBits_1; inline;
- begin
- getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TI2C3_I2C1ASTAT.setIWCOL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TI2C3_I2C1ASTAT.clearIWCOL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TI2C3_I2C1ASTAT.setIWCOL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TI2C3_I2C1ASTAT.getIWCOL : TBits_1; inline;
- begin
- getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TI2C3_I2C1ASTAT.setADD10; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TI2C3_I2C1ASTAT.clearADD10; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TI2C3_I2C1ASTAT.setADD10(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TI2C3_I2C1ASTAT.getADD10 : TBits_1; inline;
- begin
- getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TI2C3_I2C1ASTAT.setGCSTAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TI2C3_I2C1ASTAT.clearGCSTAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TI2C3_I2C1ASTAT.setGCSTAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TI2C3_I2C1ASTAT.getGCSTAT : TBits_1; inline;
- begin
- getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TI2C3_I2C1ASTAT.setBCL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TI2C3_I2C1ASTAT.clearBCL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TI2C3_I2C1ASTAT.setBCL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TI2C3_I2C1ASTAT.getBCL : TBits_1; inline;
- begin
- getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TI2C3_I2C1ASTAT.setTRSTAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TI2C3_I2C1ASTAT.clearTRSTAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TI2C3_I2C1ASTAT.setTRSTAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TI2C3_I2C1ASTAT.getTRSTAT : TBits_1; inline;
- begin
- getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TI2C3_I2C1ASTAT.setACKSTAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TI2C3_I2C1ASTAT.clearACKSTAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TI2C3_I2C1ASTAT.setACKSTAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TI2C3_I2C1ASTAT.getACKSTAT : TBits_1; inline;
- begin
- getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TI2C3_I2C1ASTAT.setI2CPOV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TI2C3_I2C1ASTAT.clearI2CPOV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TI2C3_I2C1ASTAT.setI2CPOV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TI2C3_I2C1ASTAT.getI2CPOV : TBits_1; inline;
- begin
- getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TI2C3_I2C1ASTAT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TI2C3_I2C1ASTAT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TI2C3_I2C3STAT.setTBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TI2C3_I2C3STAT.clearTBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TI2C3_I2C3STAT.setTBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TI2C3_I2C3STAT.getTBF : TBits_1; inline;
- begin
- getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TI2C3_I2C3STAT.setRBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TI2C3_I2C3STAT.clearRBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TI2C3_I2C3STAT.setRBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TI2C3_I2C3STAT.getRBF : TBits_1; inline;
- begin
- getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TI2C3_I2C3STAT.setR_W; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TI2C3_I2C3STAT.clearR_W; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TI2C3_I2C3STAT.setR_W(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TI2C3_I2C3STAT.getR_W : TBits_1; inline;
- begin
- getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TI2C3_I2C3STAT.setS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TI2C3_I2C3STAT.clearS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TI2C3_I2C3STAT.setS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TI2C3_I2C3STAT.getS : TBits_1; inline;
- begin
- getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TI2C3_I2C3STAT.setP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TI2C3_I2C3STAT.clearP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TI2C3_I2C3STAT.setP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TI2C3_I2C3STAT.getP : TBits_1; inline;
- begin
- getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TI2C3_I2C3STAT.setD_A; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TI2C3_I2C3STAT.clearD_A; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TI2C3_I2C3STAT.setD_A(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TI2C3_I2C3STAT.getD_A : TBits_1; inline;
- begin
- getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TI2C3_I2C3STAT.setI2COV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TI2C3_I2C3STAT.clearI2COV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TI2C3_I2C3STAT.setI2COV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TI2C3_I2C3STAT.getI2COV : TBits_1; inline;
- begin
- getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TI2C3_I2C3STAT.setIWCOL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TI2C3_I2C3STAT.clearIWCOL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TI2C3_I2C3STAT.setIWCOL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TI2C3_I2C3STAT.getIWCOL : TBits_1; inline;
- begin
- getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TI2C3_I2C3STAT.setADD10; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TI2C3_I2C3STAT.clearADD10; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TI2C3_I2C3STAT.setADD10(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TI2C3_I2C3STAT.getADD10 : TBits_1; inline;
- begin
- getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TI2C3_I2C3STAT.setGCSTAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TI2C3_I2C3STAT.clearGCSTAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TI2C3_I2C3STAT.setGCSTAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TI2C3_I2C3STAT.getGCSTAT : TBits_1; inline;
- begin
- getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TI2C3_I2C3STAT.setBCL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TI2C3_I2C3STAT.clearBCL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TI2C3_I2C3STAT.setBCL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TI2C3_I2C3STAT.getBCL : TBits_1; inline;
- begin
- getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TI2C3_I2C3STAT.setTRSTAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TI2C3_I2C3STAT.clearTRSTAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TI2C3_I2C3STAT.setTRSTAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TI2C3_I2C3STAT.getTRSTAT : TBits_1; inline;
- begin
- getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TI2C3_I2C3STAT.setACKSTAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TI2C3_I2C3STAT.clearACKSTAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TI2C3_I2C3STAT.setACKSTAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TI2C3_I2C3STAT.getACKSTAT : TBits_1; inline;
- begin
- getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TI2C3_I2C3STAT.setI2CPOV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TI2C3_I2C3STAT.clearI2CPOV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TI2C3_I2C3STAT.setI2CPOV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TI2C3_I2C3STAT.getI2CPOV : TBits_1; inline;
- begin
- getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TI2C3_I2C3STAT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TI2C3_I2C3STAT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TI2C4_I2C2ACON.setSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TI2C4_I2C2ACON.clearSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TI2C4_I2C2ACON.setSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TI2C4_I2C2ACON.getSEN : TBits_1; inline;
- begin
- getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TI2C4_I2C2ACON.setRSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TI2C4_I2C2ACON.clearRSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TI2C4_I2C2ACON.setRSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TI2C4_I2C2ACON.getRSEN : TBits_1; inline;
- begin
- getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TI2C4_I2C2ACON.setPEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TI2C4_I2C2ACON.clearPEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TI2C4_I2C2ACON.setPEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TI2C4_I2C2ACON.getPEN : TBits_1; inline;
- begin
- getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TI2C4_I2C2ACON.setRCEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TI2C4_I2C2ACON.clearRCEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TI2C4_I2C2ACON.setRCEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TI2C4_I2C2ACON.getRCEN : TBits_1; inline;
- begin
- getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TI2C4_I2C2ACON.setACKEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TI2C4_I2C2ACON.clearACKEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TI2C4_I2C2ACON.setACKEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TI2C4_I2C2ACON.getACKEN : TBits_1; inline;
- begin
- getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TI2C4_I2C2ACON.setACKDT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TI2C4_I2C2ACON.clearACKDT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TI2C4_I2C2ACON.setACKDT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TI2C4_I2C2ACON.getACKDT : TBits_1; inline;
- begin
- getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TI2C4_I2C2ACON.setSTREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TI2C4_I2C2ACON.clearSTREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TI2C4_I2C2ACON.setSTREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TI2C4_I2C2ACON.getSTREN : TBits_1; inline;
- begin
- getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TI2C4_I2C2ACON.setGCEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TI2C4_I2C2ACON.clearGCEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TI2C4_I2C2ACON.setGCEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TI2C4_I2C2ACON.getGCEN : TBits_1; inline;
- begin
- getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TI2C4_I2C2ACON.setSMEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TI2C4_I2C2ACON.clearSMEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TI2C4_I2C2ACON.setSMEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TI2C4_I2C2ACON.getSMEN : TBits_1; inline;
- begin
- getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TI2C4_I2C2ACON.setDISSLW; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TI2C4_I2C2ACON.clearDISSLW; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TI2C4_I2C2ACON.setDISSLW(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TI2C4_I2C2ACON.getDISSLW : TBits_1; inline;
- begin
- getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TI2C4_I2C2ACON.setA10M; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TI2C4_I2C2ACON.clearA10M; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TI2C4_I2C2ACON.setA10M(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TI2C4_I2C2ACON.getA10M : TBits_1; inline;
- begin
- getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TI2C4_I2C2ACON.setSTRICT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TI2C4_I2C2ACON.clearSTRICT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TI2C4_I2C2ACON.setSTRICT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TI2C4_I2C2ACON.getSTRICT : TBits_1; inline;
- begin
- getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TI2C4_I2C2ACON.setSCLREL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TI2C4_I2C2ACON.clearSCLREL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TI2C4_I2C2ACON.setSCLREL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TI2C4_I2C2ACON.getSCLREL : TBits_1; inline;
- begin
- getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TI2C4_I2C2ACON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TI2C4_I2C2ACON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TI2C4_I2C2ACON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TI2C4_I2C2ACON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TI2C4_I2C2ACON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TI2C4_I2C2ACON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TI2C4_I2C2ACON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TI2C4_I2C2ACON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TI2C4_I2C2ACON.setIPMIEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TI2C4_I2C2ACON.clearIPMIEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TI2C4_I2C2ACON.setIPMIEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TI2C4_I2C2ACON.getIPMIEN : TBits_1; inline;
- begin
- getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TI2C4_I2C2ACON.setI2CSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TI2C4_I2C2ACON.clearI2CSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TI2C4_I2C2ACON.setI2CSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TI2C4_I2C2ACON.getI2CSIDL : TBits_1; inline;
- begin
- getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TI2C4_I2C2ACON.setI2CEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TI2C4_I2C2ACON.clearI2CEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TI2C4_I2C2ACON.setI2CEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TI2C4_I2C2ACON.getI2CEN : TBits_1; inline;
- begin
- getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TI2C4_I2C2ACON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TI2C4_I2C2ACON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TI2C4_I2C4CON.setSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TI2C4_I2C4CON.clearSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TI2C4_I2C4CON.setSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TI2C4_I2C4CON.getSEN : TBits_1; inline;
- begin
- getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TI2C4_I2C4CON.setRSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TI2C4_I2C4CON.clearRSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TI2C4_I2C4CON.setRSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TI2C4_I2C4CON.getRSEN : TBits_1; inline;
- begin
- getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TI2C4_I2C4CON.setPEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TI2C4_I2C4CON.clearPEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TI2C4_I2C4CON.setPEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TI2C4_I2C4CON.getPEN : TBits_1; inline;
- begin
- getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TI2C4_I2C4CON.setRCEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TI2C4_I2C4CON.clearRCEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TI2C4_I2C4CON.setRCEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TI2C4_I2C4CON.getRCEN : TBits_1; inline;
- begin
- getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TI2C4_I2C4CON.setACKEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TI2C4_I2C4CON.clearACKEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TI2C4_I2C4CON.setACKEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TI2C4_I2C4CON.getACKEN : TBits_1; inline;
- begin
- getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TI2C4_I2C4CON.setACKDT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TI2C4_I2C4CON.clearACKDT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TI2C4_I2C4CON.setACKDT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TI2C4_I2C4CON.getACKDT : TBits_1; inline;
- begin
- getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TI2C4_I2C4CON.setSTREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TI2C4_I2C4CON.clearSTREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TI2C4_I2C4CON.setSTREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TI2C4_I2C4CON.getSTREN : TBits_1; inline;
- begin
- getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TI2C4_I2C4CON.setGCEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TI2C4_I2C4CON.clearGCEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TI2C4_I2C4CON.setGCEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TI2C4_I2C4CON.getGCEN : TBits_1; inline;
- begin
- getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TI2C4_I2C4CON.setSMEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TI2C4_I2C4CON.clearSMEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TI2C4_I2C4CON.setSMEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TI2C4_I2C4CON.getSMEN : TBits_1; inline;
- begin
- getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TI2C4_I2C4CON.setDISSLW; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TI2C4_I2C4CON.clearDISSLW; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TI2C4_I2C4CON.setDISSLW(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TI2C4_I2C4CON.getDISSLW : TBits_1; inline;
- begin
- getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TI2C4_I2C4CON.setA10M; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TI2C4_I2C4CON.clearA10M; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TI2C4_I2C4CON.setA10M(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TI2C4_I2C4CON.getA10M : TBits_1; inline;
- begin
- getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TI2C4_I2C4CON.setSTRICT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TI2C4_I2C4CON.clearSTRICT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TI2C4_I2C4CON.setSTRICT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TI2C4_I2C4CON.getSTRICT : TBits_1; inline;
- begin
- getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TI2C4_I2C4CON.setSCLREL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TI2C4_I2C4CON.clearSCLREL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TI2C4_I2C4CON.setSCLREL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TI2C4_I2C4CON.getSCLREL : TBits_1; inline;
- begin
- getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TI2C4_I2C4CON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TI2C4_I2C4CON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TI2C4_I2C4CON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TI2C4_I2C4CON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TI2C4_I2C4CON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TI2C4_I2C4CON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TI2C4_I2C4CON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TI2C4_I2C4CON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TI2C4_I2C4CON.setIPMIEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TI2C4_I2C4CON.clearIPMIEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TI2C4_I2C4CON.setIPMIEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TI2C4_I2C4CON.getIPMIEN : TBits_1; inline;
- begin
- getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TI2C4_I2C4CON.setI2CSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TI2C4_I2C4CON.clearI2CSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TI2C4_I2C4CON.setI2CSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TI2C4_I2C4CON.getI2CSIDL : TBits_1; inline;
- begin
- getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TI2C4_I2C4CON.setI2CEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TI2C4_I2C4CON.clearI2CEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TI2C4_I2C4CON.setI2CEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TI2C4_I2C4CON.getI2CEN : TBits_1; inline;
- begin
- getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TI2C4_I2C4CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TI2C4_I2C4CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TI2C4_I2C2ASTAT.setTBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TI2C4_I2C2ASTAT.clearTBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TI2C4_I2C2ASTAT.setTBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TI2C4_I2C2ASTAT.getTBF : TBits_1; inline;
- begin
- getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TI2C4_I2C2ASTAT.setRBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TI2C4_I2C2ASTAT.clearRBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TI2C4_I2C2ASTAT.setRBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TI2C4_I2C2ASTAT.getRBF : TBits_1; inline;
- begin
- getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TI2C4_I2C2ASTAT.setR_W; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TI2C4_I2C2ASTAT.clearR_W; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TI2C4_I2C2ASTAT.setR_W(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TI2C4_I2C2ASTAT.getR_W : TBits_1; inline;
- begin
- getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TI2C4_I2C2ASTAT.setS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TI2C4_I2C2ASTAT.clearS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TI2C4_I2C2ASTAT.setS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TI2C4_I2C2ASTAT.getS : TBits_1; inline;
- begin
- getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TI2C4_I2C2ASTAT.setP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TI2C4_I2C2ASTAT.clearP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TI2C4_I2C2ASTAT.setP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TI2C4_I2C2ASTAT.getP : TBits_1; inline;
- begin
- getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TI2C4_I2C2ASTAT.setD_A; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TI2C4_I2C2ASTAT.clearD_A; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TI2C4_I2C2ASTAT.setD_A(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TI2C4_I2C2ASTAT.getD_A : TBits_1; inline;
- begin
- getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TI2C4_I2C2ASTAT.setI2COV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TI2C4_I2C2ASTAT.clearI2COV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TI2C4_I2C2ASTAT.setI2COV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TI2C4_I2C2ASTAT.getI2COV : TBits_1; inline;
- begin
- getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TI2C4_I2C2ASTAT.setIWCOL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TI2C4_I2C2ASTAT.clearIWCOL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TI2C4_I2C2ASTAT.setIWCOL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TI2C4_I2C2ASTAT.getIWCOL : TBits_1; inline;
- begin
- getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TI2C4_I2C2ASTAT.setADD10; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TI2C4_I2C2ASTAT.clearADD10; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TI2C4_I2C2ASTAT.setADD10(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TI2C4_I2C2ASTAT.getADD10 : TBits_1; inline;
- begin
- getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TI2C4_I2C2ASTAT.setGCSTAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TI2C4_I2C2ASTAT.clearGCSTAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TI2C4_I2C2ASTAT.setGCSTAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TI2C4_I2C2ASTAT.getGCSTAT : TBits_1; inline;
- begin
- getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TI2C4_I2C2ASTAT.setBCL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TI2C4_I2C2ASTAT.clearBCL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TI2C4_I2C2ASTAT.setBCL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TI2C4_I2C2ASTAT.getBCL : TBits_1; inline;
- begin
- getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TI2C4_I2C2ASTAT.setTRSTAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TI2C4_I2C2ASTAT.clearTRSTAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TI2C4_I2C2ASTAT.setTRSTAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TI2C4_I2C2ASTAT.getTRSTAT : TBits_1; inline;
- begin
- getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TI2C4_I2C2ASTAT.setACKSTAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TI2C4_I2C2ASTAT.clearACKSTAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TI2C4_I2C2ASTAT.setACKSTAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TI2C4_I2C2ASTAT.getACKSTAT : TBits_1; inline;
- begin
- getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TI2C4_I2C2ASTAT.setI2CPOV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TI2C4_I2C2ASTAT.clearI2CPOV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TI2C4_I2C2ASTAT.setI2CPOV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TI2C4_I2C2ASTAT.getI2CPOV : TBits_1; inline;
- begin
- getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TI2C4_I2C2ASTAT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TI2C4_I2C2ASTAT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TI2C4_I2C4STAT.setTBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TI2C4_I2C4STAT.clearTBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TI2C4_I2C4STAT.setTBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TI2C4_I2C4STAT.getTBF : TBits_1; inline;
- begin
- getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TI2C4_I2C4STAT.setRBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TI2C4_I2C4STAT.clearRBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TI2C4_I2C4STAT.setRBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TI2C4_I2C4STAT.getRBF : TBits_1; inline;
- begin
- getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TI2C4_I2C4STAT.setR_W; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TI2C4_I2C4STAT.clearR_W; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TI2C4_I2C4STAT.setR_W(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TI2C4_I2C4STAT.getR_W : TBits_1; inline;
- begin
- getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TI2C4_I2C4STAT.setS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TI2C4_I2C4STAT.clearS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TI2C4_I2C4STAT.setS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TI2C4_I2C4STAT.getS : TBits_1; inline;
- begin
- getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TI2C4_I2C4STAT.setP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TI2C4_I2C4STAT.clearP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TI2C4_I2C4STAT.setP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TI2C4_I2C4STAT.getP : TBits_1; inline;
- begin
- getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TI2C4_I2C4STAT.setD_A; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TI2C4_I2C4STAT.clearD_A; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TI2C4_I2C4STAT.setD_A(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TI2C4_I2C4STAT.getD_A : TBits_1; inline;
- begin
- getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TI2C4_I2C4STAT.setI2COV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TI2C4_I2C4STAT.clearI2COV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TI2C4_I2C4STAT.setI2COV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TI2C4_I2C4STAT.getI2COV : TBits_1; inline;
- begin
- getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TI2C4_I2C4STAT.setIWCOL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TI2C4_I2C4STAT.clearIWCOL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TI2C4_I2C4STAT.setIWCOL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TI2C4_I2C4STAT.getIWCOL : TBits_1; inline;
- begin
- getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TI2C4_I2C4STAT.setADD10; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TI2C4_I2C4STAT.clearADD10; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TI2C4_I2C4STAT.setADD10(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TI2C4_I2C4STAT.getADD10 : TBits_1; inline;
- begin
- getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TI2C4_I2C4STAT.setGCSTAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TI2C4_I2C4STAT.clearGCSTAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TI2C4_I2C4STAT.setGCSTAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TI2C4_I2C4STAT.getGCSTAT : TBits_1; inline;
- begin
- getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TI2C4_I2C4STAT.setBCL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TI2C4_I2C4STAT.clearBCL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TI2C4_I2C4STAT.setBCL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TI2C4_I2C4STAT.getBCL : TBits_1; inline;
- begin
- getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TI2C4_I2C4STAT.setTRSTAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TI2C4_I2C4STAT.clearTRSTAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TI2C4_I2C4STAT.setTRSTAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TI2C4_I2C4STAT.getTRSTAT : TBits_1; inline;
- begin
- getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TI2C4_I2C4STAT.setACKSTAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TI2C4_I2C4STAT.clearACKSTAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TI2C4_I2C4STAT.setACKSTAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TI2C4_I2C4STAT.getACKSTAT : TBits_1; inline;
- begin
- getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TI2C4_I2C4STAT.setI2CPOV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TI2C4_I2C4STAT.clearI2CPOV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TI2C4_I2C4STAT.setI2CPOV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TI2C4_I2C4STAT.getI2CPOV : TBits_1; inline;
- begin
- getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TI2C4_I2C4STAT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TI2C4_I2C4STAT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TI2C5_I2C3ACON.setSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TI2C5_I2C3ACON.clearSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TI2C5_I2C3ACON.setSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TI2C5_I2C3ACON.getSEN : TBits_1; inline;
- begin
- getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TI2C5_I2C3ACON.setRSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TI2C5_I2C3ACON.clearRSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TI2C5_I2C3ACON.setRSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TI2C5_I2C3ACON.getRSEN : TBits_1; inline;
- begin
- getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TI2C5_I2C3ACON.setPEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TI2C5_I2C3ACON.clearPEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TI2C5_I2C3ACON.setPEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TI2C5_I2C3ACON.getPEN : TBits_1; inline;
- begin
- getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TI2C5_I2C3ACON.setRCEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TI2C5_I2C3ACON.clearRCEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TI2C5_I2C3ACON.setRCEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TI2C5_I2C3ACON.getRCEN : TBits_1; inline;
- begin
- getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TI2C5_I2C3ACON.setACKEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TI2C5_I2C3ACON.clearACKEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TI2C5_I2C3ACON.setACKEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TI2C5_I2C3ACON.getACKEN : TBits_1; inline;
- begin
- getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TI2C5_I2C3ACON.setACKDT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TI2C5_I2C3ACON.clearACKDT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TI2C5_I2C3ACON.setACKDT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TI2C5_I2C3ACON.getACKDT : TBits_1; inline;
- begin
- getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TI2C5_I2C3ACON.setSTREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TI2C5_I2C3ACON.clearSTREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TI2C5_I2C3ACON.setSTREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TI2C5_I2C3ACON.getSTREN : TBits_1; inline;
- begin
- getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TI2C5_I2C3ACON.setGCEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TI2C5_I2C3ACON.clearGCEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TI2C5_I2C3ACON.setGCEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TI2C5_I2C3ACON.getGCEN : TBits_1; inline;
- begin
- getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TI2C5_I2C3ACON.setSMEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TI2C5_I2C3ACON.clearSMEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TI2C5_I2C3ACON.setSMEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TI2C5_I2C3ACON.getSMEN : TBits_1; inline;
- begin
- getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TI2C5_I2C3ACON.setDISSLW; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TI2C5_I2C3ACON.clearDISSLW; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TI2C5_I2C3ACON.setDISSLW(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TI2C5_I2C3ACON.getDISSLW : TBits_1; inline;
- begin
- getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TI2C5_I2C3ACON.setA10M; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TI2C5_I2C3ACON.clearA10M; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TI2C5_I2C3ACON.setA10M(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TI2C5_I2C3ACON.getA10M : TBits_1; inline;
- begin
- getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TI2C5_I2C3ACON.setSTRICT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TI2C5_I2C3ACON.clearSTRICT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TI2C5_I2C3ACON.setSTRICT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TI2C5_I2C3ACON.getSTRICT : TBits_1; inline;
- begin
- getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TI2C5_I2C3ACON.setSCLREL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TI2C5_I2C3ACON.clearSCLREL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TI2C5_I2C3ACON.setSCLREL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TI2C5_I2C3ACON.getSCLREL : TBits_1; inline;
- begin
- getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TI2C5_I2C3ACON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TI2C5_I2C3ACON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TI2C5_I2C3ACON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TI2C5_I2C3ACON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TI2C5_I2C3ACON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TI2C5_I2C3ACON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TI2C5_I2C3ACON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TI2C5_I2C3ACON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TI2C5_I2C3ACON.setIPMIEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TI2C5_I2C3ACON.clearIPMIEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TI2C5_I2C3ACON.setIPMIEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TI2C5_I2C3ACON.getIPMIEN : TBits_1; inline;
- begin
- getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TI2C5_I2C3ACON.setI2CSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TI2C5_I2C3ACON.clearI2CSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TI2C5_I2C3ACON.setI2CSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TI2C5_I2C3ACON.getI2CSIDL : TBits_1; inline;
- begin
- getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TI2C5_I2C3ACON.setI2CEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TI2C5_I2C3ACON.clearI2CEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TI2C5_I2C3ACON.setI2CEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TI2C5_I2C3ACON.getI2CEN : TBits_1; inline;
- begin
- getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TI2C5_I2C3ACON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TI2C5_I2C3ACON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TI2C5_I2C5CON.setSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TI2C5_I2C5CON.clearSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TI2C5_I2C5CON.setSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TI2C5_I2C5CON.getSEN : TBits_1; inline;
- begin
- getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TI2C5_I2C5CON.setRSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TI2C5_I2C5CON.clearRSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TI2C5_I2C5CON.setRSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TI2C5_I2C5CON.getRSEN : TBits_1; inline;
- begin
- getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TI2C5_I2C5CON.setPEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TI2C5_I2C5CON.clearPEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TI2C5_I2C5CON.setPEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TI2C5_I2C5CON.getPEN : TBits_1; inline;
- begin
- getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TI2C5_I2C5CON.setRCEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TI2C5_I2C5CON.clearRCEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TI2C5_I2C5CON.setRCEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TI2C5_I2C5CON.getRCEN : TBits_1; inline;
- begin
- getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TI2C5_I2C5CON.setACKEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TI2C5_I2C5CON.clearACKEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TI2C5_I2C5CON.setACKEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TI2C5_I2C5CON.getACKEN : TBits_1; inline;
- begin
- getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TI2C5_I2C5CON.setACKDT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TI2C5_I2C5CON.clearACKDT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TI2C5_I2C5CON.setACKDT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TI2C5_I2C5CON.getACKDT : TBits_1; inline;
- begin
- getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TI2C5_I2C5CON.setSTREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TI2C5_I2C5CON.clearSTREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TI2C5_I2C5CON.setSTREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TI2C5_I2C5CON.getSTREN : TBits_1; inline;
- begin
- getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TI2C5_I2C5CON.setGCEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TI2C5_I2C5CON.clearGCEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TI2C5_I2C5CON.setGCEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TI2C5_I2C5CON.getGCEN : TBits_1; inline;
- begin
- getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TI2C5_I2C5CON.setSMEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TI2C5_I2C5CON.clearSMEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TI2C5_I2C5CON.setSMEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TI2C5_I2C5CON.getSMEN : TBits_1; inline;
- begin
- getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TI2C5_I2C5CON.setDISSLW; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TI2C5_I2C5CON.clearDISSLW; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TI2C5_I2C5CON.setDISSLW(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TI2C5_I2C5CON.getDISSLW : TBits_1; inline;
- begin
- getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TI2C5_I2C5CON.setA10M; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TI2C5_I2C5CON.clearA10M; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TI2C5_I2C5CON.setA10M(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TI2C5_I2C5CON.getA10M : TBits_1; inline;
- begin
- getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TI2C5_I2C5CON.setSTRICT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TI2C5_I2C5CON.clearSTRICT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TI2C5_I2C5CON.setSTRICT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TI2C5_I2C5CON.getSTRICT : TBits_1; inline;
- begin
- getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TI2C5_I2C5CON.setSCLREL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TI2C5_I2C5CON.clearSCLREL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TI2C5_I2C5CON.setSCLREL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TI2C5_I2C5CON.getSCLREL : TBits_1; inline;
- begin
- getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TI2C5_I2C5CON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TI2C5_I2C5CON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TI2C5_I2C5CON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TI2C5_I2C5CON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TI2C5_I2C5CON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TI2C5_I2C5CON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TI2C5_I2C5CON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TI2C5_I2C5CON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TI2C5_I2C5CON.setIPMIEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TI2C5_I2C5CON.clearIPMIEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TI2C5_I2C5CON.setIPMIEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TI2C5_I2C5CON.getIPMIEN : TBits_1; inline;
- begin
- getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TI2C5_I2C5CON.setI2CSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TI2C5_I2C5CON.clearI2CSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TI2C5_I2C5CON.setI2CSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TI2C5_I2C5CON.getI2CSIDL : TBits_1; inline;
- begin
- getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TI2C5_I2C5CON.setI2CEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TI2C5_I2C5CON.clearI2CEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TI2C5_I2C5CON.setI2CEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TI2C5_I2C5CON.getI2CEN : TBits_1; inline;
- begin
- getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TI2C5_I2C5CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TI2C5_I2C5CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TI2C5_I2C3ASTAT.setTBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TI2C5_I2C3ASTAT.clearTBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TI2C5_I2C3ASTAT.setTBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TI2C5_I2C3ASTAT.getTBF : TBits_1; inline;
- begin
- getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TI2C5_I2C3ASTAT.setRBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TI2C5_I2C3ASTAT.clearRBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TI2C5_I2C3ASTAT.setRBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TI2C5_I2C3ASTAT.getRBF : TBits_1; inline;
- begin
- getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TI2C5_I2C3ASTAT.setR_W; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TI2C5_I2C3ASTAT.clearR_W; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TI2C5_I2C3ASTAT.setR_W(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TI2C5_I2C3ASTAT.getR_W : TBits_1; inline;
- begin
- getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TI2C5_I2C3ASTAT.setS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TI2C5_I2C3ASTAT.clearS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TI2C5_I2C3ASTAT.setS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TI2C5_I2C3ASTAT.getS : TBits_1; inline;
- begin
- getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TI2C5_I2C3ASTAT.setP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TI2C5_I2C3ASTAT.clearP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TI2C5_I2C3ASTAT.setP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TI2C5_I2C3ASTAT.getP : TBits_1; inline;
- begin
- getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TI2C5_I2C3ASTAT.setD_A; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TI2C5_I2C3ASTAT.clearD_A; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TI2C5_I2C3ASTAT.setD_A(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TI2C5_I2C3ASTAT.getD_A : TBits_1; inline;
- begin
- getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TI2C5_I2C3ASTAT.setI2COV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TI2C5_I2C3ASTAT.clearI2COV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TI2C5_I2C3ASTAT.setI2COV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TI2C5_I2C3ASTAT.getI2COV : TBits_1; inline;
- begin
- getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TI2C5_I2C3ASTAT.setIWCOL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TI2C5_I2C3ASTAT.clearIWCOL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TI2C5_I2C3ASTAT.setIWCOL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TI2C5_I2C3ASTAT.getIWCOL : TBits_1; inline;
- begin
- getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TI2C5_I2C3ASTAT.setADD10; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TI2C5_I2C3ASTAT.clearADD10; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TI2C5_I2C3ASTAT.setADD10(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TI2C5_I2C3ASTAT.getADD10 : TBits_1; inline;
- begin
- getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TI2C5_I2C3ASTAT.setGCSTAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TI2C5_I2C3ASTAT.clearGCSTAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TI2C5_I2C3ASTAT.setGCSTAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TI2C5_I2C3ASTAT.getGCSTAT : TBits_1; inline;
- begin
- getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TI2C5_I2C3ASTAT.setBCL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TI2C5_I2C3ASTAT.clearBCL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TI2C5_I2C3ASTAT.setBCL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TI2C5_I2C3ASTAT.getBCL : TBits_1; inline;
- begin
- getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TI2C5_I2C3ASTAT.setTRSTAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TI2C5_I2C3ASTAT.clearTRSTAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TI2C5_I2C3ASTAT.setTRSTAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TI2C5_I2C3ASTAT.getTRSTAT : TBits_1; inline;
- begin
- getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TI2C5_I2C3ASTAT.setACKSTAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TI2C5_I2C3ASTAT.clearACKSTAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TI2C5_I2C3ASTAT.setACKSTAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TI2C5_I2C3ASTAT.getACKSTAT : TBits_1; inline;
- begin
- getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TI2C5_I2C3ASTAT.setI2CPOV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TI2C5_I2C3ASTAT.clearI2CPOV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TI2C5_I2C3ASTAT.setI2CPOV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TI2C5_I2C3ASTAT.getI2CPOV : TBits_1; inline;
- begin
- getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TI2C5_I2C3ASTAT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TI2C5_I2C3ASTAT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TI2C5_I2C5STAT.setTBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TI2C5_I2C5STAT.clearTBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TI2C5_I2C5STAT.setTBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TI2C5_I2C5STAT.getTBF : TBits_1; inline;
- begin
- getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TI2C5_I2C5STAT.setRBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TI2C5_I2C5STAT.clearRBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TI2C5_I2C5STAT.setRBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TI2C5_I2C5STAT.getRBF : TBits_1; inline;
- begin
- getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TI2C5_I2C5STAT.setR_W; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TI2C5_I2C5STAT.clearR_W; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TI2C5_I2C5STAT.setR_W(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TI2C5_I2C5STAT.getR_W : TBits_1; inline;
- begin
- getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TI2C5_I2C5STAT.setS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TI2C5_I2C5STAT.clearS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TI2C5_I2C5STAT.setS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TI2C5_I2C5STAT.getS : TBits_1; inline;
- begin
- getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TI2C5_I2C5STAT.setP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TI2C5_I2C5STAT.clearP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TI2C5_I2C5STAT.setP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TI2C5_I2C5STAT.getP : TBits_1; inline;
- begin
- getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TI2C5_I2C5STAT.setD_A; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TI2C5_I2C5STAT.clearD_A; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TI2C5_I2C5STAT.setD_A(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TI2C5_I2C5STAT.getD_A : TBits_1; inline;
- begin
- getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TI2C5_I2C5STAT.setI2COV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TI2C5_I2C5STAT.clearI2COV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TI2C5_I2C5STAT.setI2COV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TI2C5_I2C5STAT.getI2COV : TBits_1; inline;
- begin
- getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TI2C5_I2C5STAT.setIWCOL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TI2C5_I2C5STAT.clearIWCOL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TI2C5_I2C5STAT.setIWCOL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TI2C5_I2C5STAT.getIWCOL : TBits_1; inline;
- begin
- getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TI2C5_I2C5STAT.setADD10; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TI2C5_I2C5STAT.clearADD10; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TI2C5_I2C5STAT.setADD10(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TI2C5_I2C5STAT.getADD10 : TBits_1; inline;
- begin
- getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TI2C5_I2C5STAT.setGCSTAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TI2C5_I2C5STAT.clearGCSTAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TI2C5_I2C5STAT.setGCSTAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TI2C5_I2C5STAT.getGCSTAT : TBits_1; inline;
- begin
- getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TI2C5_I2C5STAT.setBCL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TI2C5_I2C5STAT.clearBCL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TI2C5_I2C5STAT.setBCL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TI2C5_I2C5STAT.getBCL : TBits_1; inline;
- begin
- getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TI2C5_I2C5STAT.setTRSTAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TI2C5_I2C5STAT.clearTRSTAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TI2C5_I2C5STAT.setTRSTAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TI2C5_I2C5STAT.getTRSTAT : TBits_1; inline;
- begin
- getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TI2C5_I2C5STAT.setACKSTAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TI2C5_I2C5STAT.clearACKSTAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TI2C5_I2C5STAT.setACKSTAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TI2C5_I2C5STAT.getACKSTAT : TBits_1; inline;
- begin
- getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TI2C5_I2C5STAT.setI2CPOV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TI2C5_I2C5STAT.clearI2CPOV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TI2C5_I2C5STAT.setI2CPOV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TI2C5_I2C5STAT.getI2CPOV : TBits_1; inline;
- begin
- getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TI2C5_I2C5STAT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TI2C5_I2C5STAT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TI2C1_I2C1CON.setSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TI2C1_I2C1CON.clearSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TI2C1_I2C1CON.setSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TI2C1_I2C1CON.getSEN : TBits_1; inline;
- begin
- getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TI2C1_I2C1CON.setRSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TI2C1_I2C1CON.clearRSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TI2C1_I2C1CON.setRSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TI2C1_I2C1CON.getRSEN : TBits_1; inline;
- begin
- getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TI2C1_I2C1CON.setPEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TI2C1_I2C1CON.clearPEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TI2C1_I2C1CON.setPEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TI2C1_I2C1CON.getPEN : TBits_1; inline;
- begin
- getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TI2C1_I2C1CON.setRCEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TI2C1_I2C1CON.clearRCEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TI2C1_I2C1CON.setRCEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TI2C1_I2C1CON.getRCEN : TBits_1; inline;
- begin
- getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TI2C1_I2C1CON.setACKEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TI2C1_I2C1CON.clearACKEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TI2C1_I2C1CON.setACKEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TI2C1_I2C1CON.getACKEN : TBits_1; inline;
- begin
- getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TI2C1_I2C1CON.setACKDT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TI2C1_I2C1CON.clearACKDT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TI2C1_I2C1CON.setACKDT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TI2C1_I2C1CON.getACKDT : TBits_1; inline;
- begin
- getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TI2C1_I2C1CON.setSTREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TI2C1_I2C1CON.clearSTREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TI2C1_I2C1CON.setSTREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TI2C1_I2C1CON.getSTREN : TBits_1; inline;
- begin
- getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TI2C1_I2C1CON.setGCEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TI2C1_I2C1CON.clearGCEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TI2C1_I2C1CON.setGCEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TI2C1_I2C1CON.getGCEN : TBits_1; inline;
- begin
- getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TI2C1_I2C1CON.setSMEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TI2C1_I2C1CON.clearSMEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TI2C1_I2C1CON.setSMEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TI2C1_I2C1CON.getSMEN : TBits_1; inline;
- begin
- getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TI2C1_I2C1CON.setDISSLW; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TI2C1_I2C1CON.clearDISSLW; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TI2C1_I2C1CON.setDISSLW(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TI2C1_I2C1CON.getDISSLW : TBits_1; inline;
- begin
- getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TI2C1_I2C1CON.setA10M; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TI2C1_I2C1CON.clearA10M; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TI2C1_I2C1CON.setA10M(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TI2C1_I2C1CON.getA10M : TBits_1; inline;
- begin
- getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TI2C1_I2C1CON.setSTRICT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TI2C1_I2C1CON.clearSTRICT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TI2C1_I2C1CON.setSTRICT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TI2C1_I2C1CON.getSTRICT : TBits_1; inline;
- begin
- getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TI2C1_I2C1CON.setSCLREL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TI2C1_I2C1CON.clearSCLREL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TI2C1_I2C1CON.setSCLREL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TI2C1_I2C1CON.getSCLREL : TBits_1; inline;
- begin
- getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TI2C1_I2C1CON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TI2C1_I2C1CON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TI2C1_I2C1CON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TI2C1_I2C1CON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TI2C1_I2C1CON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TI2C1_I2C1CON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TI2C1_I2C1CON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TI2C1_I2C1CON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TI2C1_I2C1CON.setIPMIEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TI2C1_I2C1CON.clearIPMIEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TI2C1_I2C1CON.setIPMIEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TI2C1_I2C1CON.getIPMIEN : TBits_1; inline;
- begin
- getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TI2C1_I2C1CON.setI2CSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TI2C1_I2C1CON.clearI2CSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TI2C1_I2C1CON.setI2CSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TI2C1_I2C1CON.getI2CSIDL : TBits_1; inline;
- begin
- getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TI2C1_I2C1CON.setI2CEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TI2C1_I2C1CON.clearI2CEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TI2C1_I2C1CON.setI2CEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TI2C1_I2C1CON.getI2CEN : TBits_1; inline;
- begin
- getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TI2C1_I2C1CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TI2C1_I2C1CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TI2C1_I2C1STAT.setTBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TI2C1_I2C1STAT.clearTBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TI2C1_I2C1STAT.setTBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TI2C1_I2C1STAT.getTBF : TBits_1; inline;
- begin
- getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TI2C1_I2C1STAT.setRBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TI2C1_I2C1STAT.clearRBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TI2C1_I2C1STAT.setRBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TI2C1_I2C1STAT.getRBF : TBits_1; inline;
- begin
- getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TI2C1_I2C1STAT.setR_W; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TI2C1_I2C1STAT.clearR_W; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TI2C1_I2C1STAT.setR_W(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TI2C1_I2C1STAT.getR_W : TBits_1; inline;
- begin
- getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TI2C1_I2C1STAT.setS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TI2C1_I2C1STAT.clearS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TI2C1_I2C1STAT.setS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TI2C1_I2C1STAT.getS : TBits_1; inline;
- begin
- getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TI2C1_I2C1STAT.setP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TI2C1_I2C1STAT.clearP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TI2C1_I2C1STAT.setP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TI2C1_I2C1STAT.getP : TBits_1; inline;
- begin
- getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TI2C1_I2C1STAT.setD_A; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TI2C1_I2C1STAT.clearD_A; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TI2C1_I2C1STAT.setD_A(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TI2C1_I2C1STAT.getD_A : TBits_1; inline;
- begin
- getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TI2C1_I2C1STAT.setI2COV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TI2C1_I2C1STAT.clearI2COV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TI2C1_I2C1STAT.setI2COV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TI2C1_I2C1STAT.getI2COV : TBits_1; inline;
- begin
- getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TI2C1_I2C1STAT.setIWCOL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TI2C1_I2C1STAT.clearIWCOL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TI2C1_I2C1STAT.setIWCOL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TI2C1_I2C1STAT.getIWCOL : TBits_1; inline;
- begin
- getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TI2C1_I2C1STAT.setADD10; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TI2C1_I2C1STAT.clearADD10; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TI2C1_I2C1STAT.setADD10(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TI2C1_I2C1STAT.getADD10 : TBits_1; inline;
- begin
- getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TI2C1_I2C1STAT.setGCSTAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TI2C1_I2C1STAT.clearGCSTAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TI2C1_I2C1STAT.setGCSTAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TI2C1_I2C1STAT.getGCSTAT : TBits_1; inline;
- begin
- getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TI2C1_I2C1STAT.setBCL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TI2C1_I2C1STAT.clearBCL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TI2C1_I2C1STAT.setBCL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TI2C1_I2C1STAT.getBCL : TBits_1; inline;
- begin
- getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TI2C1_I2C1STAT.setTRSTAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TI2C1_I2C1STAT.clearTRSTAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TI2C1_I2C1STAT.setTRSTAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TI2C1_I2C1STAT.getTRSTAT : TBits_1; inline;
- begin
- getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TI2C1_I2C1STAT.setACKSTAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TI2C1_I2C1STAT.clearACKSTAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TI2C1_I2C1STAT.setACKSTAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TI2C1_I2C1STAT.getACKSTAT : TBits_1; inline;
- begin
- getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TI2C1_I2C1STAT.setI2CPOV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TI2C1_I2C1STAT.clearI2CPOV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TI2C1_I2C1STAT.setI2CPOV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TI2C1_I2C1STAT.getI2CPOV : TBits_1; inline;
- begin
- getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TI2C1_I2C1STAT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TI2C1_I2C1STAT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TI2C2_I2C2CON.setSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TI2C2_I2C2CON.clearSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TI2C2_I2C2CON.setSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TI2C2_I2C2CON.getSEN : TBits_1; inline;
- begin
- getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TI2C2_I2C2CON.setRSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TI2C2_I2C2CON.clearRSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TI2C2_I2C2CON.setRSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TI2C2_I2C2CON.getRSEN : TBits_1; inline;
- begin
- getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TI2C2_I2C2CON.setPEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TI2C2_I2C2CON.clearPEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TI2C2_I2C2CON.setPEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TI2C2_I2C2CON.getPEN : TBits_1; inline;
- begin
- getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TI2C2_I2C2CON.setRCEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TI2C2_I2C2CON.clearRCEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TI2C2_I2C2CON.setRCEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TI2C2_I2C2CON.getRCEN : TBits_1; inline;
- begin
- getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TI2C2_I2C2CON.setACKEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TI2C2_I2C2CON.clearACKEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TI2C2_I2C2CON.setACKEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TI2C2_I2C2CON.getACKEN : TBits_1; inline;
- begin
- getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TI2C2_I2C2CON.setACKDT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TI2C2_I2C2CON.clearACKDT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TI2C2_I2C2CON.setACKDT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TI2C2_I2C2CON.getACKDT : TBits_1; inline;
- begin
- getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TI2C2_I2C2CON.setSTREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TI2C2_I2C2CON.clearSTREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TI2C2_I2C2CON.setSTREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TI2C2_I2C2CON.getSTREN : TBits_1; inline;
- begin
- getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TI2C2_I2C2CON.setGCEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TI2C2_I2C2CON.clearGCEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TI2C2_I2C2CON.setGCEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TI2C2_I2C2CON.getGCEN : TBits_1; inline;
- begin
- getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TI2C2_I2C2CON.setSMEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TI2C2_I2C2CON.clearSMEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TI2C2_I2C2CON.setSMEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TI2C2_I2C2CON.getSMEN : TBits_1; inline;
- begin
- getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TI2C2_I2C2CON.setDISSLW; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TI2C2_I2C2CON.clearDISSLW; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TI2C2_I2C2CON.setDISSLW(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TI2C2_I2C2CON.getDISSLW : TBits_1; inline;
- begin
- getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TI2C2_I2C2CON.setA10M; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TI2C2_I2C2CON.clearA10M; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TI2C2_I2C2CON.setA10M(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TI2C2_I2C2CON.getA10M : TBits_1; inline;
- begin
- getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TI2C2_I2C2CON.setSTRICT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TI2C2_I2C2CON.clearSTRICT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TI2C2_I2C2CON.setSTRICT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TI2C2_I2C2CON.getSTRICT : TBits_1; inline;
- begin
- getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TI2C2_I2C2CON.setSCLREL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TI2C2_I2C2CON.clearSCLREL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TI2C2_I2C2CON.setSCLREL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TI2C2_I2C2CON.getSCLREL : TBits_1; inline;
- begin
- getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TI2C2_I2C2CON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TI2C2_I2C2CON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TI2C2_I2C2CON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TI2C2_I2C2CON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TI2C2_I2C2CON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TI2C2_I2C2CON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TI2C2_I2C2CON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TI2C2_I2C2CON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TI2C2_I2C2CON.setIPMIEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TI2C2_I2C2CON.clearIPMIEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TI2C2_I2C2CON.setIPMIEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TI2C2_I2C2CON.getIPMIEN : TBits_1; inline;
- begin
- getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TI2C2_I2C2CON.setI2CSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TI2C2_I2C2CON.clearI2CSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TI2C2_I2C2CON.setI2CSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TI2C2_I2C2CON.getI2CSIDL : TBits_1; inline;
- begin
- getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TI2C2_I2C2CON.setI2CEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TI2C2_I2C2CON.clearI2CEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TI2C2_I2C2CON.setI2CEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TI2C2_I2C2CON.getI2CEN : TBits_1; inline;
- begin
- getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TI2C2_I2C2CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TI2C2_I2C2CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TI2C2_I2C2STAT.setTBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TI2C2_I2C2STAT.clearTBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TI2C2_I2C2STAT.setTBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TI2C2_I2C2STAT.getTBF : TBits_1; inline;
- begin
- getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TI2C2_I2C2STAT.setRBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TI2C2_I2C2STAT.clearRBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TI2C2_I2C2STAT.setRBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TI2C2_I2C2STAT.getRBF : TBits_1; inline;
- begin
- getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TI2C2_I2C2STAT.setR_W; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TI2C2_I2C2STAT.clearR_W; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TI2C2_I2C2STAT.setR_W(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TI2C2_I2C2STAT.getR_W : TBits_1; inline;
- begin
- getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TI2C2_I2C2STAT.setS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TI2C2_I2C2STAT.clearS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TI2C2_I2C2STAT.setS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TI2C2_I2C2STAT.getS : TBits_1; inline;
- begin
- getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TI2C2_I2C2STAT.setP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TI2C2_I2C2STAT.clearP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TI2C2_I2C2STAT.setP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TI2C2_I2C2STAT.getP : TBits_1; inline;
- begin
- getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TI2C2_I2C2STAT.setD_A; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TI2C2_I2C2STAT.clearD_A; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TI2C2_I2C2STAT.setD_A(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TI2C2_I2C2STAT.getD_A : TBits_1; inline;
- begin
- getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TI2C2_I2C2STAT.setI2COV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TI2C2_I2C2STAT.clearI2COV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TI2C2_I2C2STAT.setI2COV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TI2C2_I2C2STAT.getI2COV : TBits_1; inline;
- begin
- getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TI2C2_I2C2STAT.setIWCOL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TI2C2_I2C2STAT.clearIWCOL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TI2C2_I2C2STAT.setIWCOL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TI2C2_I2C2STAT.getIWCOL : TBits_1; inline;
- begin
- getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TI2C2_I2C2STAT.setADD10; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TI2C2_I2C2STAT.clearADD10; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TI2C2_I2C2STAT.setADD10(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TI2C2_I2C2STAT.getADD10 : TBits_1; inline;
- begin
- getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TI2C2_I2C2STAT.setGCSTAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TI2C2_I2C2STAT.clearGCSTAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TI2C2_I2C2STAT.setGCSTAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TI2C2_I2C2STAT.getGCSTAT : TBits_1; inline;
- begin
- getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TI2C2_I2C2STAT.setBCL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TI2C2_I2C2STAT.clearBCL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TI2C2_I2C2STAT.setBCL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TI2C2_I2C2STAT.getBCL : TBits_1; inline;
- begin
- getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TI2C2_I2C2STAT.setTRSTAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TI2C2_I2C2STAT.clearTRSTAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TI2C2_I2C2STAT.setTRSTAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TI2C2_I2C2STAT.getTRSTAT : TBits_1; inline;
- begin
- getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TI2C2_I2C2STAT.setACKSTAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TI2C2_I2C2STAT.clearACKSTAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TI2C2_I2C2STAT.setACKSTAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TI2C2_I2C2STAT.getACKSTAT : TBits_1; inline;
- begin
- getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TI2C2_I2C2STAT.setI2CPOV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TI2C2_I2C2STAT.clearI2CPOV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TI2C2_I2C2STAT.setI2CPOV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TI2C2_I2C2STAT.getI2CPOV : TBits_1; inline;
- begin
- getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TI2C2_I2C2STAT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TI2C2_I2C2STAT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TSPI3_SPI1ACON.setSRXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TSPI3_SPI1ACON.getSRXISEL : TBits_2; inline;
- begin
- getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TSPI3_SPI1ACON.setSTXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
- end;
- function TSPI3_SPI1ACON.getSTXISEL : TBits_2; inline;
- begin
- getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
- end;
- procedure TSPI3_SPI1ACON.setMSTEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TSPI3_SPI1ACON.clearMSTEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TSPI3_SPI1ACON.setMSTEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TSPI3_SPI1ACON.getMSTEN : TBits_1; inline;
- begin
- getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TSPI3_SPI1ACON.setCKP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TSPI3_SPI1ACON.clearCKP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TSPI3_SPI1ACON.setCKP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TSPI3_SPI1ACON.getCKP : TBits_1; inline;
- begin
- getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TSPI3_SPI1ACON.setSSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TSPI3_SPI1ACON.clearSSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TSPI3_SPI1ACON.setSSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TSPI3_SPI1ACON.getSSEN : TBits_1; inline;
- begin
- getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TSPI3_SPI1ACON.setCKE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TSPI3_SPI1ACON.clearCKE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TSPI3_SPI1ACON.setCKE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TSPI3_SPI1ACON.getCKE : TBits_1; inline;
- begin
- getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TSPI3_SPI1ACON.setSMP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TSPI3_SPI1ACON.clearSMP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TSPI3_SPI1ACON.setSMP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TSPI3_SPI1ACON.getSMP : TBits_1; inline;
- begin
- getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TSPI3_SPI1ACON.setMODE16; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TSPI3_SPI1ACON.clearMODE16; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TSPI3_SPI1ACON.setMODE16(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TSPI3_SPI1ACON.getMODE16 : TBits_1; inline;
- begin
- getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TSPI3_SPI1ACON.setMODE32; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TSPI3_SPI1ACON.clearMODE32; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TSPI3_SPI1ACON.setMODE32(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TSPI3_SPI1ACON.getMODE32 : TBits_1; inline;
- begin
- getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TSPI3_SPI1ACON.setDISSDO; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TSPI3_SPI1ACON.clearDISSDO; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TSPI3_SPI1ACON.setDISSDO(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TSPI3_SPI1ACON.getDISSDO : TBits_1; inline;
- begin
- getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TSPI3_SPI1ACON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TSPI3_SPI1ACON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TSPI3_SPI1ACON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TSPI3_SPI1ACON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TSPI3_SPI1ACON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TSPI3_SPI1ACON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TSPI3_SPI1ACON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TSPI3_SPI1ACON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TSPI3_SPI1ACON.setENHBUF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- procedure TSPI3_SPI1ACON.clearENHBUF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00010000;
- end;
- procedure TSPI3_SPI1ACON.setENHBUF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00010000
- else
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- function TSPI3_SPI1ACON.getENHBUF : TBits_1; inline;
- begin
- getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
- end;
- procedure TSPI3_SPI1ACON.setSPIFE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- procedure TSPI3_SPI1ACON.clearSPIFE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00020000;
- end;
- procedure TSPI3_SPI1ACON.setSPIFE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00020000
- else
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- function TSPI3_SPI1ACON.getSPIFE : TBits_1; inline;
- begin
- getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
- end;
- procedure TSPI3_SPI1ACON.setFRMCNT(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
- end;
- function TSPI3_SPI1ACON.getFRMCNT : TBits_3; inline;
- begin
- getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
- end;
- procedure TSPI3_SPI1ACON.setFRMSYPW; inline;
- begin
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- procedure TSPI3_SPI1ACON.clearFRMSYPW; inline;
- begin
- pTDefRegMap(@Self)^.clr := $08000000;
- end;
- procedure TSPI3_SPI1ACON.setFRMSYPW(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $08000000
- else
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- function TSPI3_SPI1ACON.getFRMSYPW : TBits_1; inline;
- begin
- getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
- end;
- procedure TSPI3_SPI1ACON.setMSSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- procedure TSPI3_SPI1ACON.clearMSSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $10000000;
- end;
- procedure TSPI3_SPI1ACON.setMSSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $10000000
- else
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- function TSPI3_SPI1ACON.getMSSEN : TBits_1; inline;
- begin
- getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
- end;
- procedure TSPI3_SPI1ACON.setFRMPOL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- procedure TSPI3_SPI1ACON.clearFRMPOL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $20000000;
- end;
- procedure TSPI3_SPI1ACON.setFRMPOL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $20000000
- else
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- function TSPI3_SPI1ACON.getFRMPOL : TBits_1; inline;
- begin
- getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
- end;
- procedure TSPI3_SPI1ACON.setFRMSYNC; inline;
- begin
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- procedure TSPI3_SPI1ACON.clearFRMSYNC; inline;
- begin
- pTDefRegMap(@Self)^.clr := $40000000;
- end;
- procedure TSPI3_SPI1ACON.setFRMSYNC(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $40000000
- else
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- function TSPI3_SPI1ACON.getFRMSYNC : TBits_1; inline;
- begin
- getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
- end;
- procedure TSPI3_SPI1ACON.setFRMEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- procedure TSPI3_SPI1ACON.clearFRMEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $80000000;
- end;
- procedure TSPI3_SPI1ACON.setFRMEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $80000000
- else
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- function TSPI3_SPI1ACON.getFRMEN : TBits_1; inline;
- begin
- getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
- end;
- procedure TSPI3_SPI1ACON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TSPI3_SPI1ACON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TSPI3_SPI3CON.setSRXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TSPI3_SPI3CON.getSRXISEL : TBits_2; inline;
- begin
- getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TSPI3_SPI3CON.setSTXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
- end;
- function TSPI3_SPI3CON.getSTXISEL : TBits_2; inline;
- begin
- getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
- end;
- procedure TSPI3_SPI3CON.setMSTEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TSPI3_SPI3CON.clearMSTEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TSPI3_SPI3CON.setMSTEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TSPI3_SPI3CON.getMSTEN : TBits_1; inline;
- begin
- getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TSPI3_SPI3CON.setCKP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TSPI3_SPI3CON.clearCKP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TSPI3_SPI3CON.setCKP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TSPI3_SPI3CON.getCKP : TBits_1; inline;
- begin
- getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TSPI3_SPI3CON.setSSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TSPI3_SPI3CON.clearSSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TSPI3_SPI3CON.setSSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TSPI3_SPI3CON.getSSEN : TBits_1; inline;
- begin
- getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TSPI3_SPI3CON.setCKE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TSPI3_SPI3CON.clearCKE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TSPI3_SPI3CON.setCKE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TSPI3_SPI3CON.getCKE : TBits_1; inline;
- begin
- getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TSPI3_SPI3CON.setSMP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TSPI3_SPI3CON.clearSMP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TSPI3_SPI3CON.setSMP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TSPI3_SPI3CON.getSMP : TBits_1; inline;
- begin
- getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TSPI3_SPI3CON.setMODE16; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TSPI3_SPI3CON.clearMODE16; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TSPI3_SPI3CON.setMODE16(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TSPI3_SPI3CON.getMODE16 : TBits_1; inline;
- begin
- getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TSPI3_SPI3CON.setMODE32; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TSPI3_SPI3CON.clearMODE32; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TSPI3_SPI3CON.setMODE32(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TSPI3_SPI3CON.getMODE32 : TBits_1; inline;
- begin
- getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TSPI3_SPI3CON.setDISSDO; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TSPI3_SPI3CON.clearDISSDO; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TSPI3_SPI3CON.setDISSDO(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TSPI3_SPI3CON.getDISSDO : TBits_1; inline;
- begin
- getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TSPI3_SPI3CON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TSPI3_SPI3CON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TSPI3_SPI3CON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TSPI3_SPI3CON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TSPI3_SPI3CON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TSPI3_SPI3CON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TSPI3_SPI3CON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TSPI3_SPI3CON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TSPI3_SPI3CON.setENHBUF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- procedure TSPI3_SPI3CON.clearENHBUF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00010000;
- end;
- procedure TSPI3_SPI3CON.setENHBUF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00010000
- else
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- function TSPI3_SPI3CON.getENHBUF : TBits_1; inline;
- begin
- getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
- end;
- procedure TSPI3_SPI3CON.setSPIFE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- procedure TSPI3_SPI3CON.clearSPIFE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00020000;
- end;
- procedure TSPI3_SPI3CON.setSPIFE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00020000
- else
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- function TSPI3_SPI3CON.getSPIFE : TBits_1; inline;
- begin
- getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
- end;
- procedure TSPI3_SPI3CON.setFRMCNT(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
- end;
- function TSPI3_SPI3CON.getFRMCNT : TBits_3; inline;
- begin
- getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
- end;
- procedure TSPI3_SPI3CON.setFRMSYPW; inline;
- begin
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- procedure TSPI3_SPI3CON.clearFRMSYPW; inline;
- begin
- pTDefRegMap(@Self)^.clr := $08000000;
- end;
- procedure TSPI3_SPI3CON.setFRMSYPW(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $08000000
- else
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- function TSPI3_SPI3CON.getFRMSYPW : TBits_1; inline;
- begin
- getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
- end;
- procedure TSPI3_SPI3CON.setMSSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- procedure TSPI3_SPI3CON.clearMSSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $10000000;
- end;
- procedure TSPI3_SPI3CON.setMSSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $10000000
- else
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- function TSPI3_SPI3CON.getMSSEN : TBits_1; inline;
- begin
- getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
- end;
- procedure TSPI3_SPI3CON.setFRMPOL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- procedure TSPI3_SPI3CON.clearFRMPOL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $20000000;
- end;
- procedure TSPI3_SPI3CON.setFRMPOL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $20000000
- else
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- function TSPI3_SPI3CON.getFRMPOL : TBits_1; inline;
- begin
- getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
- end;
- procedure TSPI3_SPI3CON.setFRMSYNC; inline;
- begin
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- procedure TSPI3_SPI3CON.clearFRMSYNC; inline;
- begin
- pTDefRegMap(@Self)^.clr := $40000000;
- end;
- procedure TSPI3_SPI3CON.setFRMSYNC(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $40000000
- else
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- function TSPI3_SPI3CON.getFRMSYNC : TBits_1; inline;
- begin
- getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
- end;
- procedure TSPI3_SPI3CON.setFRMEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- procedure TSPI3_SPI3CON.clearFRMEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $80000000;
- end;
- procedure TSPI3_SPI3CON.setFRMEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $80000000
- else
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- function TSPI3_SPI3CON.getFRMEN : TBits_1; inline;
- begin
- getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
- end;
- procedure TSPI3_SPI3CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TSPI3_SPI3CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TSPI3_SPI1ASTAT.setSPIRBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TSPI3_SPI1ASTAT.clearSPIRBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TSPI3_SPI1ASTAT.setSPIRBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TSPI3_SPI1ASTAT.getSPIRBF : TBits_1; inline;
- begin
- getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TSPI3_SPI1ASTAT.setSPITBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TSPI3_SPI1ASTAT.clearSPITBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TSPI3_SPI1ASTAT.setSPITBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TSPI3_SPI1ASTAT.getSPITBF : TBits_1; inline;
- begin
- getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TSPI3_SPI1ASTAT.setSPITBE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TSPI3_SPI1ASTAT.clearSPITBE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TSPI3_SPI1ASTAT.setSPITBE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TSPI3_SPI1ASTAT.getSPITBE : TBits_1; inline;
- begin
- getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TSPI3_SPI1ASTAT.setSPIRBE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TSPI3_SPI1ASTAT.clearSPIRBE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TSPI3_SPI1ASTAT.setSPIRBE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TSPI3_SPI1ASTAT.getSPIRBE : TBits_1; inline;
- begin
- getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TSPI3_SPI1ASTAT.setSPIROV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TSPI3_SPI1ASTAT.clearSPIROV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TSPI3_SPI1ASTAT.setSPIROV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TSPI3_SPI1ASTAT.getSPIROV : TBits_1; inline;
- begin
- getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TSPI3_SPI1ASTAT.setSRMT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TSPI3_SPI1ASTAT.clearSRMT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TSPI3_SPI1ASTAT.setSRMT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TSPI3_SPI1ASTAT.getSRMT : TBits_1; inline;
- begin
- getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TSPI3_SPI1ASTAT.setSPITUR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TSPI3_SPI1ASTAT.clearSPITUR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TSPI3_SPI1ASTAT.setSPITUR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TSPI3_SPI1ASTAT.getSPITUR : TBits_1; inline;
- begin
- getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TSPI3_SPI1ASTAT.setSPIBUSY; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TSPI3_SPI1ASTAT.clearSPIBUSY; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TSPI3_SPI1ASTAT.setSPIBUSY(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TSPI3_SPI1ASTAT.getSPIBUSY : TBits_1; inline;
- begin
- getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TSPI3_SPI1ASTAT.setTXBUFELM(thebits : TBits_5); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
- end;
- function TSPI3_SPI1ASTAT.getTXBUFELM : TBits_5; inline;
- begin
- getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
- end;
- procedure TSPI3_SPI1ASTAT.setRXBUFELM(thebits : TBits_5); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
- end;
- function TSPI3_SPI1ASTAT.getRXBUFELM : TBits_5; inline;
- begin
- getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
- end;
- procedure TSPI3_SPI1ASTAT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TSPI3_SPI1ASTAT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TSPI3_SPI3STAT.setSPIRBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TSPI3_SPI3STAT.clearSPIRBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TSPI3_SPI3STAT.setSPIRBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TSPI3_SPI3STAT.getSPIRBF : TBits_1; inline;
- begin
- getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TSPI3_SPI3STAT.setSPITBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TSPI3_SPI3STAT.clearSPITBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TSPI3_SPI3STAT.setSPITBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TSPI3_SPI3STAT.getSPITBF : TBits_1; inline;
- begin
- getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TSPI3_SPI3STAT.setSPITBE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TSPI3_SPI3STAT.clearSPITBE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TSPI3_SPI3STAT.setSPITBE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TSPI3_SPI3STAT.getSPITBE : TBits_1; inline;
- begin
- getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TSPI3_SPI3STAT.setSPIRBE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TSPI3_SPI3STAT.clearSPIRBE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TSPI3_SPI3STAT.setSPIRBE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TSPI3_SPI3STAT.getSPIRBE : TBits_1; inline;
- begin
- getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TSPI3_SPI3STAT.setSPIROV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TSPI3_SPI3STAT.clearSPIROV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TSPI3_SPI3STAT.setSPIROV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TSPI3_SPI3STAT.getSPIROV : TBits_1; inline;
- begin
- getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TSPI3_SPI3STAT.setSRMT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TSPI3_SPI3STAT.clearSRMT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TSPI3_SPI3STAT.setSRMT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TSPI3_SPI3STAT.getSRMT : TBits_1; inline;
- begin
- getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TSPI3_SPI3STAT.setSPITUR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TSPI3_SPI3STAT.clearSPITUR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TSPI3_SPI3STAT.setSPITUR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TSPI3_SPI3STAT.getSPITUR : TBits_1; inline;
- begin
- getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TSPI3_SPI3STAT.setSPIBUSY; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TSPI3_SPI3STAT.clearSPIBUSY; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TSPI3_SPI3STAT.setSPIBUSY(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TSPI3_SPI3STAT.getSPIBUSY : TBits_1; inline;
- begin
- getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TSPI3_SPI3STAT.setTXBUFELM(thebits : TBits_5); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
- end;
- function TSPI3_SPI3STAT.getTXBUFELM : TBits_5; inline;
- begin
- getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
- end;
- procedure TSPI3_SPI3STAT.setRXBUFELM(thebits : TBits_5); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
- end;
- function TSPI3_SPI3STAT.getRXBUFELM : TBits_5; inline;
- begin
- getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
- end;
- procedure TSPI3_SPI3STAT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TSPI3_SPI3STAT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TSPI2A_SPI2ACON.setSRXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TSPI2A_SPI2ACON.getSRXISEL : TBits_2; inline;
- begin
- getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TSPI2A_SPI2ACON.setSTXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
- end;
- function TSPI2A_SPI2ACON.getSTXISEL : TBits_2; inline;
- begin
- getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
- end;
- procedure TSPI2A_SPI2ACON.setMSTEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TSPI2A_SPI2ACON.clearMSTEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TSPI2A_SPI2ACON.setMSTEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TSPI2A_SPI2ACON.getMSTEN : TBits_1; inline;
- begin
- getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TSPI2A_SPI2ACON.setCKP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TSPI2A_SPI2ACON.clearCKP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TSPI2A_SPI2ACON.setCKP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TSPI2A_SPI2ACON.getCKP : TBits_1; inline;
- begin
- getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TSPI2A_SPI2ACON.setSSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TSPI2A_SPI2ACON.clearSSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TSPI2A_SPI2ACON.setSSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TSPI2A_SPI2ACON.getSSEN : TBits_1; inline;
- begin
- getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TSPI2A_SPI2ACON.setCKE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TSPI2A_SPI2ACON.clearCKE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TSPI2A_SPI2ACON.setCKE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TSPI2A_SPI2ACON.getCKE : TBits_1; inline;
- begin
- getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TSPI2A_SPI2ACON.setSMP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TSPI2A_SPI2ACON.clearSMP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TSPI2A_SPI2ACON.setSMP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TSPI2A_SPI2ACON.getSMP : TBits_1; inline;
- begin
- getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TSPI2A_SPI2ACON.setMODE16; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TSPI2A_SPI2ACON.clearMODE16; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TSPI2A_SPI2ACON.setMODE16(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TSPI2A_SPI2ACON.getMODE16 : TBits_1; inline;
- begin
- getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TSPI2A_SPI2ACON.setMODE32; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TSPI2A_SPI2ACON.clearMODE32; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TSPI2A_SPI2ACON.setMODE32(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TSPI2A_SPI2ACON.getMODE32 : TBits_1; inline;
- begin
- getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TSPI2A_SPI2ACON.setDISSDO; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TSPI2A_SPI2ACON.clearDISSDO; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TSPI2A_SPI2ACON.setDISSDO(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TSPI2A_SPI2ACON.getDISSDO : TBits_1; inline;
- begin
- getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TSPI2A_SPI2ACON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TSPI2A_SPI2ACON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TSPI2A_SPI2ACON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TSPI2A_SPI2ACON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TSPI2A_SPI2ACON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TSPI2A_SPI2ACON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TSPI2A_SPI2ACON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TSPI2A_SPI2ACON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TSPI2A_SPI2ACON.setENHBUF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- procedure TSPI2A_SPI2ACON.clearENHBUF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00010000;
- end;
- procedure TSPI2A_SPI2ACON.setENHBUF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00010000
- else
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- function TSPI2A_SPI2ACON.getENHBUF : TBits_1; inline;
- begin
- getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
- end;
- procedure TSPI2A_SPI2ACON.setSPIFE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- procedure TSPI2A_SPI2ACON.clearSPIFE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00020000;
- end;
- procedure TSPI2A_SPI2ACON.setSPIFE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00020000
- else
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- function TSPI2A_SPI2ACON.getSPIFE : TBits_1; inline;
- begin
- getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
- end;
- procedure TSPI2A_SPI2ACON.setFRMCNT(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
- end;
- function TSPI2A_SPI2ACON.getFRMCNT : TBits_3; inline;
- begin
- getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
- end;
- procedure TSPI2A_SPI2ACON.setFRMSYPW; inline;
- begin
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- procedure TSPI2A_SPI2ACON.clearFRMSYPW; inline;
- begin
- pTDefRegMap(@Self)^.clr := $08000000;
- end;
- procedure TSPI2A_SPI2ACON.setFRMSYPW(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $08000000
- else
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- function TSPI2A_SPI2ACON.getFRMSYPW : TBits_1; inline;
- begin
- getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
- end;
- procedure TSPI2A_SPI2ACON.setMSSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- procedure TSPI2A_SPI2ACON.clearMSSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $10000000;
- end;
- procedure TSPI2A_SPI2ACON.setMSSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $10000000
- else
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- function TSPI2A_SPI2ACON.getMSSEN : TBits_1; inline;
- begin
- getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
- end;
- procedure TSPI2A_SPI2ACON.setFRMPOL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- procedure TSPI2A_SPI2ACON.clearFRMPOL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $20000000;
- end;
- procedure TSPI2A_SPI2ACON.setFRMPOL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $20000000
- else
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- function TSPI2A_SPI2ACON.getFRMPOL : TBits_1; inline;
- begin
- getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
- end;
- procedure TSPI2A_SPI2ACON.setFRMSYNC; inline;
- begin
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- procedure TSPI2A_SPI2ACON.clearFRMSYNC; inline;
- begin
- pTDefRegMap(@Self)^.clr := $40000000;
- end;
- procedure TSPI2A_SPI2ACON.setFRMSYNC(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $40000000
- else
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- function TSPI2A_SPI2ACON.getFRMSYNC : TBits_1; inline;
- begin
- getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
- end;
- procedure TSPI2A_SPI2ACON.setFRMEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- procedure TSPI2A_SPI2ACON.clearFRMEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $80000000;
- end;
- procedure TSPI2A_SPI2ACON.setFRMEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $80000000
- else
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- function TSPI2A_SPI2ACON.getFRMEN : TBits_1; inline;
- begin
- getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
- end;
- procedure TSPI2A_SPI2ACON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TSPI2A_SPI2ACON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TSPI2A_SPI2CON.setSRXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TSPI2A_SPI2CON.getSRXISEL : TBits_2; inline;
- begin
- getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TSPI2A_SPI2CON.setSTXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
- end;
- function TSPI2A_SPI2CON.getSTXISEL : TBits_2; inline;
- begin
- getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
- end;
- procedure TSPI2A_SPI2CON.setMSTEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TSPI2A_SPI2CON.clearMSTEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TSPI2A_SPI2CON.setMSTEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TSPI2A_SPI2CON.getMSTEN : TBits_1; inline;
- begin
- getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TSPI2A_SPI2CON.setCKP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TSPI2A_SPI2CON.clearCKP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TSPI2A_SPI2CON.setCKP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TSPI2A_SPI2CON.getCKP : TBits_1; inline;
- begin
- getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TSPI2A_SPI2CON.setSSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TSPI2A_SPI2CON.clearSSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TSPI2A_SPI2CON.setSSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TSPI2A_SPI2CON.getSSEN : TBits_1; inline;
- begin
- getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TSPI2A_SPI2CON.setCKE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TSPI2A_SPI2CON.clearCKE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TSPI2A_SPI2CON.setCKE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TSPI2A_SPI2CON.getCKE : TBits_1; inline;
- begin
- getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TSPI2A_SPI2CON.setSMP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TSPI2A_SPI2CON.clearSMP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TSPI2A_SPI2CON.setSMP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TSPI2A_SPI2CON.getSMP : TBits_1; inline;
- begin
- getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TSPI2A_SPI2CON.setMODE16; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TSPI2A_SPI2CON.clearMODE16; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TSPI2A_SPI2CON.setMODE16(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TSPI2A_SPI2CON.getMODE16 : TBits_1; inline;
- begin
- getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TSPI2A_SPI2CON.setMODE32; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TSPI2A_SPI2CON.clearMODE32; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TSPI2A_SPI2CON.setMODE32(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TSPI2A_SPI2CON.getMODE32 : TBits_1; inline;
- begin
- getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TSPI2A_SPI2CON.setDISSDO; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TSPI2A_SPI2CON.clearDISSDO; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TSPI2A_SPI2CON.setDISSDO(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TSPI2A_SPI2CON.getDISSDO : TBits_1; inline;
- begin
- getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TSPI2A_SPI2CON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TSPI2A_SPI2CON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TSPI2A_SPI2CON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TSPI2A_SPI2CON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TSPI2A_SPI2CON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TSPI2A_SPI2CON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TSPI2A_SPI2CON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TSPI2A_SPI2CON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TSPI2A_SPI2CON.setENHBUF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- procedure TSPI2A_SPI2CON.clearENHBUF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00010000;
- end;
- procedure TSPI2A_SPI2CON.setENHBUF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00010000
- else
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- function TSPI2A_SPI2CON.getENHBUF : TBits_1; inline;
- begin
- getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
- end;
- procedure TSPI2A_SPI2CON.setSPIFE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- procedure TSPI2A_SPI2CON.clearSPIFE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00020000;
- end;
- procedure TSPI2A_SPI2CON.setSPIFE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00020000
- else
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- function TSPI2A_SPI2CON.getSPIFE : TBits_1; inline;
- begin
- getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
- end;
- procedure TSPI2A_SPI2CON.setFRMCNT(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
- end;
- function TSPI2A_SPI2CON.getFRMCNT : TBits_3; inline;
- begin
- getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
- end;
- procedure TSPI2A_SPI2CON.setFRMSYPW; inline;
- begin
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- procedure TSPI2A_SPI2CON.clearFRMSYPW; inline;
- begin
- pTDefRegMap(@Self)^.clr := $08000000;
- end;
- procedure TSPI2A_SPI2CON.setFRMSYPW(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $08000000
- else
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- function TSPI2A_SPI2CON.getFRMSYPW : TBits_1; inline;
- begin
- getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
- end;
- procedure TSPI2A_SPI2CON.setMSSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- procedure TSPI2A_SPI2CON.clearMSSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $10000000;
- end;
- procedure TSPI2A_SPI2CON.setMSSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $10000000
- else
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- function TSPI2A_SPI2CON.getMSSEN : TBits_1; inline;
- begin
- getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
- end;
- procedure TSPI2A_SPI2CON.setFRMPOL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- procedure TSPI2A_SPI2CON.clearFRMPOL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $20000000;
- end;
- procedure TSPI2A_SPI2CON.setFRMPOL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $20000000
- else
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- function TSPI2A_SPI2CON.getFRMPOL : TBits_1; inline;
- begin
- getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
- end;
- procedure TSPI2A_SPI2CON.setFRMSYNC; inline;
- begin
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- procedure TSPI2A_SPI2CON.clearFRMSYNC; inline;
- begin
- pTDefRegMap(@Self)^.clr := $40000000;
- end;
- procedure TSPI2A_SPI2CON.setFRMSYNC(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $40000000
- else
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- function TSPI2A_SPI2CON.getFRMSYNC : TBits_1; inline;
- begin
- getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
- end;
- procedure TSPI2A_SPI2CON.setFRMEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- procedure TSPI2A_SPI2CON.clearFRMEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $80000000;
- end;
- procedure TSPI2A_SPI2CON.setFRMEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $80000000
- else
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- function TSPI2A_SPI2CON.getFRMEN : TBits_1; inline;
- begin
- getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
- end;
- procedure TSPI2A_SPI2CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TSPI2A_SPI2CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TSPI2A_SPI2ASTAT.setSPIRBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TSPI2A_SPI2ASTAT.clearSPIRBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TSPI2A_SPI2ASTAT.setSPIRBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TSPI2A_SPI2ASTAT.getSPIRBF : TBits_1; inline;
- begin
- getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TSPI2A_SPI2ASTAT.setSPITBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TSPI2A_SPI2ASTAT.clearSPITBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TSPI2A_SPI2ASTAT.setSPITBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TSPI2A_SPI2ASTAT.getSPITBF : TBits_1; inline;
- begin
- getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TSPI2A_SPI2ASTAT.setSPITBE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TSPI2A_SPI2ASTAT.clearSPITBE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TSPI2A_SPI2ASTAT.setSPITBE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TSPI2A_SPI2ASTAT.getSPITBE : TBits_1; inline;
- begin
- getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TSPI2A_SPI2ASTAT.setSPIRBE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TSPI2A_SPI2ASTAT.clearSPIRBE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TSPI2A_SPI2ASTAT.setSPIRBE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TSPI2A_SPI2ASTAT.getSPIRBE : TBits_1; inline;
- begin
- getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TSPI2A_SPI2ASTAT.setSPIROV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TSPI2A_SPI2ASTAT.clearSPIROV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TSPI2A_SPI2ASTAT.setSPIROV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TSPI2A_SPI2ASTAT.getSPIROV : TBits_1; inline;
- begin
- getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TSPI2A_SPI2ASTAT.setSRMT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TSPI2A_SPI2ASTAT.clearSRMT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TSPI2A_SPI2ASTAT.setSRMT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TSPI2A_SPI2ASTAT.getSRMT : TBits_1; inline;
- begin
- getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TSPI2A_SPI2ASTAT.setSPITUR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TSPI2A_SPI2ASTAT.clearSPITUR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TSPI2A_SPI2ASTAT.setSPITUR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TSPI2A_SPI2ASTAT.getSPITUR : TBits_1; inline;
- begin
- getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TSPI2A_SPI2ASTAT.setSPIBUSY; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TSPI2A_SPI2ASTAT.clearSPIBUSY; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TSPI2A_SPI2ASTAT.setSPIBUSY(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TSPI2A_SPI2ASTAT.getSPIBUSY : TBits_1; inline;
- begin
- getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TSPI2A_SPI2ASTAT.setTXBUFELM(thebits : TBits_5); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
- end;
- function TSPI2A_SPI2ASTAT.getTXBUFELM : TBits_5; inline;
- begin
- getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
- end;
- procedure TSPI2A_SPI2ASTAT.setRXBUFELM(thebits : TBits_5); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
- end;
- function TSPI2A_SPI2ASTAT.getRXBUFELM : TBits_5; inline;
- begin
- getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
- end;
- procedure TSPI2A_SPI2ASTAT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TSPI2A_SPI2ASTAT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TSPI2A_SPI2STAT.setSPIRBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TSPI2A_SPI2STAT.clearSPIRBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TSPI2A_SPI2STAT.setSPIRBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TSPI2A_SPI2STAT.getSPIRBF : TBits_1; inline;
- begin
- getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TSPI2A_SPI2STAT.setSPITBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TSPI2A_SPI2STAT.clearSPITBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TSPI2A_SPI2STAT.setSPITBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TSPI2A_SPI2STAT.getSPITBF : TBits_1; inline;
- begin
- getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TSPI2A_SPI2STAT.setSPITBE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TSPI2A_SPI2STAT.clearSPITBE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TSPI2A_SPI2STAT.setSPITBE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TSPI2A_SPI2STAT.getSPITBE : TBits_1; inline;
- begin
- getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TSPI2A_SPI2STAT.setSPIRBE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TSPI2A_SPI2STAT.clearSPIRBE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TSPI2A_SPI2STAT.setSPIRBE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TSPI2A_SPI2STAT.getSPIRBE : TBits_1; inline;
- begin
- getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TSPI2A_SPI2STAT.setSPIROV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TSPI2A_SPI2STAT.clearSPIROV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TSPI2A_SPI2STAT.setSPIROV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TSPI2A_SPI2STAT.getSPIROV : TBits_1; inline;
- begin
- getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TSPI2A_SPI2STAT.setSRMT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TSPI2A_SPI2STAT.clearSRMT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TSPI2A_SPI2STAT.setSRMT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TSPI2A_SPI2STAT.getSRMT : TBits_1; inline;
- begin
- getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TSPI2A_SPI2STAT.setSPITUR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TSPI2A_SPI2STAT.clearSPITUR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TSPI2A_SPI2STAT.setSPITUR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TSPI2A_SPI2STAT.getSPITUR : TBits_1; inline;
- begin
- getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TSPI2A_SPI2STAT.setSPIBUSY; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TSPI2A_SPI2STAT.clearSPIBUSY; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TSPI2A_SPI2STAT.setSPIBUSY(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TSPI2A_SPI2STAT.getSPIBUSY : TBits_1; inline;
- begin
- getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TSPI2A_SPI2STAT.setTXBUFELM(thebits : TBits_5); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
- end;
- function TSPI2A_SPI2STAT.getTXBUFELM : TBits_5; inline;
- begin
- getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
- end;
- procedure TSPI2A_SPI2STAT.setRXBUFELM(thebits : TBits_5); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
- end;
- function TSPI2A_SPI2STAT.getRXBUFELM : TBits_5; inline;
- begin
- getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
- end;
- procedure TSPI2A_SPI2STAT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TSPI2A_SPI2STAT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TSPI3A_SPI3ACON.setSRXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TSPI3A_SPI3ACON.getSRXISEL : TBits_2; inline;
- begin
- getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TSPI3A_SPI3ACON.setSTXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
- end;
- function TSPI3A_SPI3ACON.getSTXISEL : TBits_2; inline;
- begin
- getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
- end;
- procedure TSPI3A_SPI3ACON.setMSTEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TSPI3A_SPI3ACON.clearMSTEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TSPI3A_SPI3ACON.setMSTEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TSPI3A_SPI3ACON.getMSTEN : TBits_1; inline;
- begin
- getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TSPI3A_SPI3ACON.setCKP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TSPI3A_SPI3ACON.clearCKP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TSPI3A_SPI3ACON.setCKP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TSPI3A_SPI3ACON.getCKP : TBits_1; inline;
- begin
- getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TSPI3A_SPI3ACON.setSSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TSPI3A_SPI3ACON.clearSSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TSPI3A_SPI3ACON.setSSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TSPI3A_SPI3ACON.getSSEN : TBits_1; inline;
- begin
- getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TSPI3A_SPI3ACON.setCKE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TSPI3A_SPI3ACON.clearCKE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TSPI3A_SPI3ACON.setCKE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TSPI3A_SPI3ACON.getCKE : TBits_1; inline;
- begin
- getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TSPI3A_SPI3ACON.setSMP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TSPI3A_SPI3ACON.clearSMP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TSPI3A_SPI3ACON.setSMP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TSPI3A_SPI3ACON.getSMP : TBits_1; inline;
- begin
- getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TSPI3A_SPI3ACON.setMODE16; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TSPI3A_SPI3ACON.clearMODE16; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TSPI3A_SPI3ACON.setMODE16(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TSPI3A_SPI3ACON.getMODE16 : TBits_1; inline;
- begin
- getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TSPI3A_SPI3ACON.setMODE32; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TSPI3A_SPI3ACON.clearMODE32; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TSPI3A_SPI3ACON.setMODE32(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TSPI3A_SPI3ACON.getMODE32 : TBits_1; inline;
- begin
- getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TSPI3A_SPI3ACON.setDISSDO; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TSPI3A_SPI3ACON.clearDISSDO; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TSPI3A_SPI3ACON.setDISSDO(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TSPI3A_SPI3ACON.getDISSDO : TBits_1; inline;
- begin
- getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TSPI3A_SPI3ACON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TSPI3A_SPI3ACON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TSPI3A_SPI3ACON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TSPI3A_SPI3ACON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TSPI3A_SPI3ACON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TSPI3A_SPI3ACON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TSPI3A_SPI3ACON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TSPI3A_SPI3ACON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TSPI3A_SPI3ACON.setENHBUF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- procedure TSPI3A_SPI3ACON.clearENHBUF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00010000;
- end;
- procedure TSPI3A_SPI3ACON.setENHBUF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00010000
- else
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- function TSPI3A_SPI3ACON.getENHBUF : TBits_1; inline;
- begin
- getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
- end;
- procedure TSPI3A_SPI3ACON.setSPIFE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- procedure TSPI3A_SPI3ACON.clearSPIFE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00020000;
- end;
- procedure TSPI3A_SPI3ACON.setSPIFE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00020000
- else
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- function TSPI3A_SPI3ACON.getSPIFE : TBits_1; inline;
- begin
- getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
- end;
- procedure TSPI3A_SPI3ACON.setFRMCNT(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
- end;
- function TSPI3A_SPI3ACON.getFRMCNT : TBits_3; inline;
- begin
- getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
- end;
- procedure TSPI3A_SPI3ACON.setFRMSYPW; inline;
- begin
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- procedure TSPI3A_SPI3ACON.clearFRMSYPW; inline;
- begin
- pTDefRegMap(@Self)^.clr := $08000000;
- end;
- procedure TSPI3A_SPI3ACON.setFRMSYPW(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $08000000
- else
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- function TSPI3A_SPI3ACON.getFRMSYPW : TBits_1; inline;
- begin
- getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
- end;
- procedure TSPI3A_SPI3ACON.setMSSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- procedure TSPI3A_SPI3ACON.clearMSSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $10000000;
- end;
- procedure TSPI3A_SPI3ACON.setMSSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $10000000
- else
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- function TSPI3A_SPI3ACON.getMSSEN : TBits_1; inline;
- begin
- getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
- end;
- procedure TSPI3A_SPI3ACON.setFRMPOL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- procedure TSPI3A_SPI3ACON.clearFRMPOL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $20000000;
- end;
- procedure TSPI3A_SPI3ACON.setFRMPOL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $20000000
- else
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- function TSPI3A_SPI3ACON.getFRMPOL : TBits_1; inline;
- begin
- getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
- end;
- procedure TSPI3A_SPI3ACON.setFRMSYNC; inline;
- begin
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- procedure TSPI3A_SPI3ACON.clearFRMSYNC; inline;
- begin
- pTDefRegMap(@Self)^.clr := $40000000;
- end;
- procedure TSPI3A_SPI3ACON.setFRMSYNC(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $40000000
- else
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- function TSPI3A_SPI3ACON.getFRMSYNC : TBits_1; inline;
- begin
- getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
- end;
- procedure TSPI3A_SPI3ACON.setFRMEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- procedure TSPI3A_SPI3ACON.clearFRMEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $80000000;
- end;
- procedure TSPI3A_SPI3ACON.setFRMEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $80000000
- else
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- function TSPI3A_SPI3ACON.getFRMEN : TBits_1; inline;
- begin
- getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
- end;
- procedure TSPI3A_SPI3ACON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TSPI3A_SPI3ACON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TSPI3A_SPI4CON.setSRXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TSPI3A_SPI4CON.getSRXISEL : TBits_2; inline;
- begin
- getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TSPI3A_SPI4CON.setSTXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
- end;
- function TSPI3A_SPI4CON.getSTXISEL : TBits_2; inline;
- begin
- getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
- end;
- procedure TSPI3A_SPI4CON.setMSTEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TSPI3A_SPI4CON.clearMSTEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TSPI3A_SPI4CON.setMSTEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TSPI3A_SPI4CON.getMSTEN : TBits_1; inline;
- begin
- getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TSPI3A_SPI4CON.setCKP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TSPI3A_SPI4CON.clearCKP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TSPI3A_SPI4CON.setCKP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TSPI3A_SPI4CON.getCKP : TBits_1; inline;
- begin
- getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TSPI3A_SPI4CON.setSSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TSPI3A_SPI4CON.clearSSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TSPI3A_SPI4CON.setSSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TSPI3A_SPI4CON.getSSEN : TBits_1; inline;
- begin
- getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TSPI3A_SPI4CON.setCKE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TSPI3A_SPI4CON.clearCKE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TSPI3A_SPI4CON.setCKE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TSPI3A_SPI4CON.getCKE : TBits_1; inline;
- begin
- getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TSPI3A_SPI4CON.setSMP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TSPI3A_SPI4CON.clearSMP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TSPI3A_SPI4CON.setSMP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TSPI3A_SPI4CON.getSMP : TBits_1; inline;
- begin
- getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TSPI3A_SPI4CON.setMODE16; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TSPI3A_SPI4CON.clearMODE16; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TSPI3A_SPI4CON.setMODE16(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TSPI3A_SPI4CON.getMODE16 : TBits_1; inline;
- begin
- getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TSPI3A_SPI4CON.setMODE32; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TSPI3A_SPI4CON.clearMODE32; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TSPI3A_SPI4CON.setMODE32(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TSPI3A_SPI4CON.getMODE32 : TBits_1; inline;
- begin
- getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TSPI3A_SPI4CON.setDISSDO; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TSPI3A_SPI4CON.clearDISSDO; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TSPI3A_SPI4CON.setDISSDO(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TSPI3A_SPI4CON.getDISSDO : TBits_1; inline;
- begin
- getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TSPI3A_SPI4CON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TSPI3A_SPI4CON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TSPI3A_SPI4CON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TSPI3A_SPI4CON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TSPI3A_SPI4CON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TSPI3A_SPI4CON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TSPI3A_SPI4CON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TSPI3A_SPI4CON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TSPI3A_SPI4CON.setENHBUF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- procedure TSPI3A_SPI4CON.clearENHBUF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00010000;
- end;
- procedure TSPI3A_SPI4CON.setENHBUF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00010000
- else
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- function TSPI3A_SPI4CON.getENHBUF : TBits_1; inline;
- begin
- getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
- end;
- procedure TSPI3A_SPI4CON.setSPIFE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- procedure TSPI3A_SPI4CON.clearSPIFE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00020000;
- end;
- procedure TSPI3A_SPI4CON.setSPIFE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00020000
- else
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- function TSPI3A_SPI4CON.getSPIFE : TBits_1; inline;
- begin
- getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
- end;
- procedure TSPI3A_SPI4CON.setFRMCNT(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
- end;
- function TSPI3A_SPI4CON.getFRMCNT : TBits_3; inline;
- begin
- getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
- end;
- procedure TSPI3A_SPI4CON.setFRMSYPW; inline;
- begin
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- procedure TSPI3A_SPI4CON.clearFRMSYPW; inline;
- begin
- pTDefRegMap(@Self)^.clr := $08000000;
- end;
- procedure TSPI3A_SPI4CON.setFRMSYPW(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $08000000
- else
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- function TSPI3A_SPI4CON.getFRMSYPW : TBits_1; inline;
- begin
- getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
- end;
- procedure TSPI3A_SPI4CON.setMSSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- procedure TSPI3A_SPI4CON.clearMSSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $10000000;
- end;
- procedure TSPI3A_SPI4CON.setMSSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $10000000
- else
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- function TSPI3A_SPI4CON.getMSSEN : TBits_1; inline;
- begin
- getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
- end;
- procedure TSPI3A_SPI4CON.setFRMPOL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- procedure TSPI3A_SPI4CON.clearFRMPOL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $20000000;
- end;
- procedure TSPI3A_SPI4CON.setFRMPOL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $20000000
- else
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- function TSPI3A_SPI4CON.getFRMPOL : TBits_1; inline;
- begin
- getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
- end;
- procedure TSPI3A_SPI4CON.setFRMSYNC; inline;
- begin
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- procedure TSPI3A_SPI4CON.clearFRMSYNC; inline;
- begin
- pTDefRegMap(@Self)^.clr := $40000000;
- end;
- procedure TSPI3A_SPI4CON.setFRMSYNC(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $40000000
- else
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- function TSPI3A_SPI4CON.getFRMSYNC : TBits_1; inline;
- begin
- getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
- end;
- procedure TSPI3A_SPI4CON.setFRMEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- procedure TSPI3A_SPI4CON.clearFRMEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $80000000;
- end;
- procedure TSPI3A_SPI4CON.setFRMEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $80000000
- else
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- function TSPI3A_SPI4CON.getFRMEN : TBits_1; inline;
- begin
- getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
- end;
- procedure TSPI3A_SPI4CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TSPI3A_SPI4CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TSPI3A_SPI3ASTAT.setSPIRBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TSPI3A_SPI3ASTAT.clearSPIRBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TSPI3A_SPI3ASTAT.setSPIRBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TSPI3A_SPI3ASTAT.getSPIRBF : TBits_1; inline;
- begin
- getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TSPI3A_SPI3ASTAT.setSPITBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TSPI3A_SPI3ASTAT.clearSPITBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TSPI3A_SPI3ASTAT.setSPITBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TSPI3A_SPI3ASTAT.getSPITBF : TBits_1; inline;
- begin
- getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TSPI3A_SPI3ASTAT.setSPITBE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TSPI3A_SPI3ASTAT.clearSPITBE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TSPI3A_SPI3ASTAT.setSPITBE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TSPI3A_SPI3ASTAT.getSPITBE : TBits_1; inline;
- begin
- getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TSPI3A_SPI3ASTAT.setSPIRBE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TSPI3A_SPI3ASTAT.clearSPIRBE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TSPI3A_SPI3ASTAT.setSPIRBE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TSPI3A_SPI3ASTAT.getSPIRBE : TBits_1; inline;
- begin
- getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TSPI3A_SPI3ASTAT.setSPIROV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TSPI3A_SPI3ASTAT.clearSPIROV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TSPI3A_SPI3ASTAT.setSPIROV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TSPI3A_SPI3ASTAT.getSPIROV : TBits_1; inline;
- begin
- getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TSPI3A_SPI3ASTAT.setSRMT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TSPI3A_SPI3ASTAT.clearSRMT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TSPI3A_SPI3ASTAT.setSRMT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TSPI3A_SPI3ASTAT.getSRMT : TBits_1; inline;
- begin
- getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TSPI3A_SPI3ASTAT.setSPITUR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TSPI3A_SPI3ASTAT.clearSPITUR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TSPI3A_SPI3ASTAT.setSPITUR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TSPI3A_SPI3ASTAT.getSPITUR : TBits_1; inline;
- begin
- getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TSPI3A_SPI3ASTAT.setSPIBUSY; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TSPI3A_SPI3ASTAT.clearSPIBUSY; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TSPI3A_SPI3ASTAT.setSPIBUSY(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TSPI3A_SPI3ASTAT.getSPIBUSY : TBits_1; inline;
- begin
- getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TSPI3A_SPI3ASTAT.setTXBUFELM(thebits : TBits_5); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
- end;
- function TSPI3A_SPI3ASTAT.getTXBUFELM : TBits_5; inline;
- begin
- getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
- end;
- procedure TSPI3A_SPI3ASTAT.setRXBUFELM(thebits : TBits_5); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
- end;
- function TSPI3A_SPI3ASTAT.getRXBUFELM : TBits_5; inline;
- begin
- getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
- end;
- procedure TSPI3A_SPI3ASTAT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TSPI3A_SPI3ASTAT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TSPI3A_SPI4STAT.setSPIRBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TSPI3A_SPI4STAT.clearSPIRBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TSPI3A_SPI4STAT.setSPIRBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TSPI3A_SPI4STAT.getSPIRBF : TBits_1; inline;
- begin
- getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TSPI3A_SPI4STAT.setSPITBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TSPI3A_SPI4STAT.clearSPITBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TSPI3A_SPI4STAT.setSPITBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TSPI3A_SPI4STAT.getSPITBF : TBits_1; inline;
- begin
- getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TSPI3A_SPI4STAT.setSPITBE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TSPI3A_SPI4STAT.clearSPITBE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TSPI3A_SPI4STAT.setSPITBE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TSPI3A_SPI4STAT.getSPITBE : TBits_1; inline;
- begin
- getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TSPI3A_SPI4STAT.setSPIRBE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TSPI3A_SPI4STAT.clearSPIRBE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TSPI3A_SPI4STAT.setSPIRBE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TSPI3A_SPI4STAT.getSPIRBE : TBits_1; inline;
- begin
- getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TSPI3A_SPI4STAT.setSPIROV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TSPI3A_SPI4STAT.clearSPIROV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TSPI3A_SPI4STAT.setSPIROV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TSPI3A_SPI4STAT.getSPIROV : TBits_1; inline;
- begin
- getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TSPI3A_SPI4STAT.setSRMT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TSPI3A_SPI4STAT.clearSRMT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TSPI3A_SPI4STAT.setSRMT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TSPI3A_SPI4STAT.getSRMT : TBits_1; inline;
- begin
- getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TSPI3A_SPI4STAT.setSPITUR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TSPI3A_SPI4STAT.clearSPITUR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TSPI3A_SPI4STAT.setSPITUR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TSPI3A_SPI4STAT.getSPITUR : TBits_1; inline;
- begin
- getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TSPI3A_SPI4STAT.setSPIBUSY; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TSPI3A_SPI4STAT.clearSPIBUSY; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TSPI3A_SPI4STAT.setSPIBUSY(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TSPI3A_SPI4STAT.getSPIBUSY : TBits_1; inline;
- begin
- getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TSPI3A_SPI4STAT.setTXBUFELM(thebits : TBits_5); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
- end;
- function TSPI3A_SPI4STAT.getTXBUFELM : TBits_5; inline;
- begin
- getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
- end;
- procedure TSPI3A_SPI4STAT.setRXBUFELM(thebits : TBits_5); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
- end;
- function TSPI3A_SPI4STAT.getRXBUFELM : TBits_5; inline;
- begin
- getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
- end;
- procedure TSPI3A_SPI4STAT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TSPI3A_SPI4STAT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TSPI1_SPI1CON.setSRXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TSPI1_SPI1CON.getSRXISEL : TBits_2; inline;
- begin
- getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TSPI1_SPI1CON.setSTXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
- end;
- function TSPI1_SPI1CON.getSTXISEL : TBits_2; inline;
- begin
- getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
- end;
- procedure TSPI1_SPI1CON.setMSTEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TSPI1_SPI1CON.clearMSTEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TSPI1_SPI1CON.setMSTEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TSPI1_SPI1CON.getMSTEN : TBits_1; inline;
- begin
- getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TSPI1_SPI1CON.setCKP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TSPI1_SPI1CON.clearCKP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TSPI1_SPI1CON.setCKP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TSPI1_SPI1CON.getCKP : TBits_1; inline;
- begin
- getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TSPI1_SPI1CON.setSSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TSPI1_SPI1CON.clearSSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TSPI1_SPI1CON.setSSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TSPI1_SPI1CON.getSSEN : TBits_1; inline;
- begin
- getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TSPI1_SPI1CON.setCKE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TSPI1_SPI1CON.clearCKE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TSPI1_SPI1CON.setCKE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TSPI1_SPI1CON.getCKE : TBits_1; inline;
- begin
- getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TSPI1_SPI1CON.setSMP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TSPI1_SPI1CON.clearSMP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TSPI1_SPI1CON.setSMP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TSPI1_SPI1CON.getSMP : TBits_1; inline;
- begin
- getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TSPI1_SPI1CON.setMODE16; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TSPI1_SPI1CON.clearMODE16; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TSPI1_SPI1CON.setMODE16(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TSPI1_SPI1CON.getMODE16 : TBits_1; inline;
- begin
- getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TSPI1_SPI1CON.setMODE32; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TSPI1_SPI1CON.clearMODE32; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TSPI1_SPI1CON.setMODE32(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TSPI1_SPI1CON.getMODE32 : TBits_1; inline;
- begin
- getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TSPI1_SPI1CON.setDISSDO; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TSPI1_SPI1CON.clearDISSDO; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TSPI1_SPI1CON.setDISSDO(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TSPI1_SPI1CON.getDISSDO : TBits_1; inline;
- begin
- getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TSPI1_SPI1CON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TSPI1_SPI1CON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TSPI1_SPI1CON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TSPI1_SPI1CON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TSPI1_SPI1CON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TSPI1_SPI1CON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TSPI1_SPI1CON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TSPI1_SPI1CON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TSPI1_SPI1CON.setENHBUF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- procedure TSPI1_SPI1CON.clearENHBUF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00010000;
- end;
- procedure TSPI1_SPI1CON.setENHBUF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00010000
- else
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- function TSPI1_SPI1CON.getENHBUF : TBits_1; inline;
- begin
- getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
- end;
- procedure TSPI1_SPI1CON.setSPIFE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- procedure TSPI1_SPI1CON.clearSPIFE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00020000;
- end;
- procedure TSPI1_SPI1CON.setSPIFE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00020000
- else
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- function TSPI1_SPI1CON.getSPIFE : TBits_1; inline;
- begin
- getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
- end;
- procedure TSPI1_SPI1CON.setFRMCNT(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
- end;
- function TSPI1_SPI1CON.getFRMCNT : TBits_3; inline;
- begin
- getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
- end;
- procedure TSPI1_SPI1CON.setFRMSYPW; inline;
- begin
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- procedure TSPI1_SPI1CON.clearFRMSYPW; inline;
- begin
- pTDefRegMap(@Self)^.clr := $08000000;
- end;
- procedure TSPI1_SPI1CON.setFRMSYPW(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $08000000
- else
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- function TSPI1_SPI1CON.getFRMSYPW : TBits_1; inline;
- begin
- getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
- end;
- procedure TSPI1_SPI1CON.setMSSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- procedure TSPI1_SPI1CON.clearMSSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $10000000;
- end;
- procedure TSPI1_SPI1CON.setMSSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $10000000
- else
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- function TSPI1_SPI1CON.getMSSEN : TBits_1; inline;
- begin
- getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
- end;
- procedure TSPI1_SPI1CON.setFRMPOL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- procedure TSPI1_SPI1CON.clearFRMPOL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $20000000;
- end;
- procedure TSPI1_SPI1CON.setFRMPOL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $20000000
- else
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- function TSPI1_SPI1CON.getFRMPOL : TBits_1; inline;
- begin
- getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
- end;
- procedure TSPI1_SPI1CON.setFRMSYNC; inline;
- begin
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- procedure TSPI1_SPI1CON.clearFRMSYNC; inline;
- begin
- pTDefRegMap(@Self)^.clr := $40000000;
- end;
- procedure TSPI1_SPI1CON.setFRMSYNC(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $40000000
- else
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- function TSPI1_SPI1CON.getFRMSYNC : TBits_1; inline;
- begin
- getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
- end;
- procedure TSPI1_SPI1CON.setFRMEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- procedure TSPI1_SPI1CON.clearFRMEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $80000000;
- end;
- procedure TSPI1_SPI1CON.setFRMEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $80000000
- else
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- function TSPI1_SPI1CON.getFRMEN : TBits_1; inline;
- begin
- getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
- end;
- procedure TSPI1_SPI1CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TSPI1_SPI1CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TSPI1_SPI1STAT.setSPIRBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TSPI1_SPI1STAT.clearSPIRBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TSPI1_SPI1STAT.setSPIRBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TSPI1_SPI1STAT.getSPIRBF : TBits_1; inline;
- begin
- getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TSPI1_SPI1STAT.setSPITBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TSPI1_SPI1STAT.clearSPITBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TSPI1_SPI1STAT.setSPITBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TSPI1_SPI1STAT.getSPITBF : TBits_1; inline;
- begin
- getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TSPI1_SPI1STAT.setSPITBE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TSPI1_SPI1STAT.clearSPITBE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TSPI1_SPI1STAT.setSPITBE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TSPI1_SPI1STAT.getSPITBE : TBits_1; inline;
- begin
- getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TSPI1_SPI1STAT.setSPIRBE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TSPI1_SPI1STAT.clearSPIRBE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TSPI1_SPI1STAT.setSPIRBE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TSPI1_SPI1STAT.getSPIRBE : TBits_1; inline;
- begin
- getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TSPI1_SPI1STAT.setSPIROV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TSPI1_SPI1STAT.clearSPIROV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TSPI1_SPI1STAT.setSPIROV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TSPI1_SPI1STAT.getSPIROV : TBits_1; inline;
- begin
- getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TSPI1_SPI1STAT.setSRMT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TSPI1_SPI1STAT.clearSRMT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TSPI1_SPI1STAT.setSRMT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TSPI1_SPI1STAT.getSRMT : TBits_1; inline;
- begin
- getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TSPI1_SPI1STAT.setSPITUR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TSPI1_SPI1STAT.clearSPITUR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TSPI1_SPI1STAT.setSPITUR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TSPI1_SPI1STAT.getSPITUR : TBits_1; inline;
- begin
- getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TSPI1_SPI1STAT.setSPIBUSY; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TSPI1_SPI1STAT.clearSPIBUSY; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TSPI1_SPI1STAT.setSPIBUSY(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TSPI1_SPI1STAT.getSPIBUSY : TBits_1; inline;
- begin
- getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TSPI1_SPI1STAT.setTXBUFELM(thebits : TBits_5); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
- end;
- function TSPI1_SPI1STAT.getTXBUFELM : TBits_5; inline;
- begin
- getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
- end;
- procedure TSPI1_SPI1STAT.setRXBUFELM(thebits : TBits_5); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
- end;
- function TSPI1_SPI1STAT.getRXBUFELM : TBits_5; inline;
- begin
- getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
- end;
- procedure TSPI1_SPI1STAT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TSPI1_SPI1STAT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUART1A_U1AMODE.setSTSEL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUART1A_U1AMODE.clearSTSEL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUART1A_U1AMODE.setSTSEL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUART1A_U1AMODE.getSTSEL : TBits_1; inline;
- begin
- getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUART1A_U1AMODE.setPDSEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
- end;
- function TUART1A_U1AMODE.getPDSEL : TBits_2; inline;
- begin
- getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
- end;
- procedure TUART1A_U1AMODE.setBRGH; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUART1A_U1AMODE.clearBRGH; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUART1A_U1AMODE.setBRGH(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUART1A_U1AMODE.getBRGH : TBits_1; inline;
- begin
- getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUART1A_U1AMODE.setRXINV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUART1A_U1AMODE.clearRXINV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUART1A_U1AMODE.setRXINV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUART1A_U1AMODE.getRXINV : TBits_1; inline;
- begin
- getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUART1A_U1AMODE.setABAUD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUART1A_U1AMODE.clearABAUD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUART1A_U1AMODE.setABAUD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUART1A_U1AMODE.getABAUD : TBits_1; inline;
- begin
- getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUART1A_U1AMODE.setLPBACK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUART1A_U1AMODE.clearLPBACK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUART1A_U1AMODE.setLPBACK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUART1A_U1AMODE.getLPBACK : TBits_1; inline;
- begin
- getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUART1A_U1AMODE.setWAKE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUART1A_U1AMODE.clearWAKE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUART1A_U1AMODE.setWAKE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUART1A_U1AMODE.getWAKE : TBits_1; inline;
- begin
- getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUART1A_U1AMODE.setUEN(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
- end;
- function TUART1A_U1AMODE.getUEN : TBits_2; inline;
- begin
- getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
- end;
- procedure TUART1A_U1AMODE.setRTSMD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TUART1A_U1AMODE.clearRTSMD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TUART1A_U1AMODE.setRTSMD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TUART1A_U1AMODE.getRTSMD : TBits_1; inline;
- begin
- getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TUART1A_U1AMODE.setIREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TUART1A_U1AMODE.clearIREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TUART1A_U1AMODE.setIREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TUART1A_U1AMODE.getIREN : TBits_1; inline;
- begin
- getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TUART1A_U1AMODE.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART1A_U1AMODE.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART1A_U1AMODE.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART1A_U1AMODE.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART1A_U1AMODE.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART1A_U1AMODE.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART1A_U1AMODE.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART1A_U1AMODE.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART1A_U1AMODE.setPDSEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUART1A_U1AMODE.clearPDSEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUART1A_U1AMODE.setPDSEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUART1A_U1AMODE.getPDSEL0 : TBits_1; inline;
- begin
- getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUART1A_U1AMODE.setPDSEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUART1A_U1AMODE.clearPDSEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUART1A_U1AMODE.setPDSEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUART1A_U1AMODE.getPDSEL1 : TBits_1; inline;
- begin
- getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUART1A_U1AMODE.setUEN0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TUART1A_U1AMODE.clearUEN0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TUART1A_U1AMODE.setUEN0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TUART1A_U1AMODE.getUEN0 : TBits_1; inline;
- begin
- getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TUART1A_U1AMODE.setUEN1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TUART1A_U1AMODE.clearUEN1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TUART1A_U1AMODE.setUEN1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TUART1A_U1AMODE.getUEN1 : TBits_1; inline;
- begin
- getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TUART1A_U1AMODE.setUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART1A_U1AMODE.clearUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART1A_U1AMODE.setUSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART1A_U1AMODE.getUSIDL : TBits_1; inline;
- begin
- getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART1A_U1AMODE.setUARTEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART1A_U1AMODE.clearUARTEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART1A_U1AMODE.setUARTEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART1A_U1AMODE.getUARTEN : TBits_1; inline;
- begin
- getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART1A_U1AMODE.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TUART1A_U1AMODE.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUART1A_U1MODE.setSTSEL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUART1A_U1MODE.clearSTSEL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUART1A_U1MODE.setSTSEL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUART1A_U1MODE.getSTSEL : TBits_1; inline;
- begin
- getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUART1A_U1MODE.setPDSEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
- end;
- function TUART1A_U1MODE.getPDSEL : TBits_2; inline;
- begin
- getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
- end;
- procedure TUART1A_U1MODE.setBRGH; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUART1A_U1MODE.clearBRGH; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUART1A_U1MODE.setBRGH(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUART1A_U1MODE.getBRGH : TBits_1; inline;
- begin
- getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUART1A_U1MODE.setRXINV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUART1A_U1MODE.clearRXINV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUART1A_U1MODE.setRXINV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUART1A_U1MODE.getRXINV : TBits_1; inline;
- begin
- getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUART1A_U1MODE.setABAUD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUART1A_U1MODE.clearABAUD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUART1A_U1MODE.setABAUD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUART1A_U1MODE.getABAUD : TBits_1; inline;
- begin
- getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUART1A_U1MODE.setLPBACK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUART1A_U1MODE.clearLPBACK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUART1A_U1MODE.setLPBACK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUART1A_U1MODE.getLPBACK : TBits_1; inline;
- begin
- getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUART1A_U1MODE.setWAKE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUART1A_U1MODE.clearWAKE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUART1A_U1MODE.setWAKE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUART1A_U1MODE.getWAKE : TBits_1; inline;
- begin
- getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUART1A_U1MODE.setUEN(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
- end;
- function TUART1A_U1MODE.getUEN : TBits_2; inline;
- begin
- getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
- end;
- procedure TUART1A_U1MODE.setRTSMD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TUART1A_U1MODE.clearRTSMD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TUART1A_U1MODE.setRTSMD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TUART1A_U1MODE.getRTSMD : TBits_1; inline;
- begin
- getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TUART1A_U1MODE.setIREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TUART1A_U1MODE.clearIREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TUART1A_U1MODE.setIREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TUART1A_U1MODE.getIREN : TBits_1; inline;
- begin
- getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TUART1A_U1MODE.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART1A_U1MODE.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART1A_U1MODE.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART1A_U1MODE.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART1A_U1MODE.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART1A_U1MODE.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART1A_U1MODE.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART1A_U1MODE.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART1A_U1MODE.setPDSEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUART1A_U1MODE.clearPDSEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUART1A_U1MODE.setPDSEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUART1A_U1MODE.getPDSEL0 : TBits_1; inline;
- begin
- getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUART1A_U1MODE.setPDSEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUART1A_U1MODE.clearPDSEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUART1A_U1MODE.setPDSEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUART1A_U1MODE.getPDSEL1 : TBits_1; inline;
- begin
- getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUART1A_U1MODE.setUEN0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TUART1A_U1MODE.clearUEN0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TUART1A_U1MODE.setUEN0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TUART1A_U1MODE.getUEN0 : TBits_1; inline;
- begin
- getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TUART1A_U1MODE.setUEN1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TUART1A_U1MODE.clearUEN1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TUART1A_U1MODE.setUEN1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TUART1A_U1MODE.getUEN1 : TBits_1; inline;
- begin
- getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TUART1A_U1MODE.setUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART1A_U1MODE.clearUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART1A_U1MODE.setUSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART1A_U1MODE.getUSIDL : TBits_1; inline;
- begin
- getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART1A_U1MODE.setUARTEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART1A_U1MODE.clearUARTEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART1A_U1MODE.setUARTEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART1A_U1MODE.getUARTEN : TBits_1; inline;
- begin
- getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART1A_U1MODE.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TUART1A_U1MODE.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUART1A_U1ASTA.setURXDA; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUART1A_U1ASTA.clearURXDA; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUART1A_U1ASTA.setURXDA(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUART1A_U1ASTA.getURXDA : TBits_1; inline;
- begin
- getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUART1A_U1ASTA.setOERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUART1A_U1ASTA.clearOERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUART1A_U1ASTA.setOERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUART1A_U1ASTA.getOERR : TBits_1; inline;
- begin
- getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUART1A_U1ASTA.setFERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUART1A_U1ASTA.clearFERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUART1A_U1ASTA.setFERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUART1A_U1ASTA.getFERR : TBits_1; inline;
- begin
- getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUART1A_U1ASTA.setPERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUART1A_U1ASTA.clearPERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUART1A_U1ASTA.setPERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUART1A_U1ASTA.getPERR : TBits_1; inline;
- begin
- getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUART1A_U1ASTA.setRIDLE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUART1A_U1ASTA.clearRIDLE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUART1A_U1ASTA.setRIDLE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUART1A_U1ASTA.getRIDLE : TBits_1; inline;
- begin
- getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUART1A_U1ASTA.setADDEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUART1A_U1ASTA.clearADDEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUART1A_U1ASTA.setADDEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUART1A_U1ASTA.getADDEN : TBits_1; inline;
- begin
- getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUART1A_U1ASTA.setURXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
- end;
- function TUART1A_U1ASTA.getURXISEL : TBits_2; inline;
- begin
- getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
- end;
- procedure TUART1A_U1ASTA.setTRMT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TUART1A_U1ASTA.clearTRMT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TUART1A_U1ASTA.setTRMT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TUART1A_U1ASTA.getTRMT : TBits_1; inline;
- begin
- getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TUART1A_U1ASTA.setUTXBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TUART1A_U1ASTA.clearUTXBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TUART1A_U1ASTA.setUTXBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TUART1A_U1ASTA.getUTXBF : TBits_1; inline;
- begin
- getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TUART1A_U1ASTA.setUTXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TUART1A_U1ASTA.clearUTXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TUART1A_U1ASTA.setUTXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TUART1A_U1ASTA.getUTXEN : TBits_1; inline;
- begin
- getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TUART1A_U1ASTA.setUTXBRK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TUART1A_U1ASTA.clearUTXBRK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TUART1A_U1ASTA.setUTXBRK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TUART1A_U1ASTA.getUTXBRK : TBits_1; inline;
- begin
- getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TUART1A_U1ASTA.setURXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TUART1A_U1ASTA.clearURXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TUART1A_U1ASTA.setURXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TUART1A_U1ASTA.getURXEN : TBits_1; inline;
- begin
- getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TUART1A_U1ASTA.setUTXINV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART1A_U1ASTA.clearUTXINV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART1A_U1ASTA.setUTXINV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART1A_U1ASTA.getUTXINV : TBits_1; inline;
- begin
- getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART1A_U1ASTA.setUTXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TUART1A_U1ASTA.getUTXISEL : TBits_2; inline;
- begin
- getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TUART1A_U1ASTA.setADDR(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
- end;
- function TUART1A_U1ASTA.getADDR : TBits_8; inline;
- begin
- getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
- end;
- procedure TUART1A_U1ASTA.setADM_EN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- procedure TUART1A_U1ASTA.clearADM_EN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $01000000;
- end;
- procedure TUART1A_U1ASTA.setADM_EN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $01000000
- else
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- function TUART1A_U1ASTA.getADM_EN : TBits_1; inline;
- begin
- getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
- end;
- procedure TUART1A_U1ASTA.setURXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUART1A_U1ASTA.clearURXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUART1A_U1ASTA.setURXISEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUART1A_U1ASTA.getURXISEL0 : TBits_1; inline;
- begin
- getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUART1A_U1ASTA.setURXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUART1A_U1ASTA.clearURXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUART1A_U1ASTA.setURXISEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUART1A_U1ASTA.getURXISEL1 : TBits_1; inline;
- begin
- getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUART1A_U1ASTA.setUTXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TUART1A_U1ASTA.clearUTXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TUART1A_U1ASTA.setUTXISEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TUART1A_U1ASTA.getUTXISEL0 : TBits_1; inline;
- begin
- getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TUART1A_U1ASTA.setUTXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART1A_U1ASTA.clearUTXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART1A_U1ASTA.setUTXISEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART1A_U1ASTA.getUTXISEL1 : TBits_1; inline;
- begin
- getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART1A_U1ASTA.setUTXSEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TUART1A_U1ASTA.getUTXSEL : TBits_2; inline;
- begin
- getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TUART1A_U1ASTA.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TUART1A_U1ASTA.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUART1A_U1STA.setURXDA; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUART1A_U1STA.clearURXDA; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUART1A_U1STA.setURXDA(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUART1A_U1STA.getURXDA : TBits_1; inline;
- begin
- getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUART1A_U1STA.setOERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUART1A_U1STA.clearOERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUART1A_U1STA.setOERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUART1A_U1STA.getOERR : TBits_1; inline;
- begin
- getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUART1A_U1STA.setFERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUART1A_U1STA.clearFERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUART1A_U1STA.setFERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUART1A_U1STA.getFERR : TBits_1; inline;
- begin
- getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUART1A_U1STA.setPERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUART1A_U1STA.clearPERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUART1A_U1STA.setPERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUART1A_U1STA.getPERR : TBits_1; inline;
- begin
- getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUART1A_U1STA.setRIDLE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUART1A_U1STA.clearRIDLE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUART1A_U1STA.setRIDLE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUART1A_U1STA.getRIDLE : TBits_1; inline;
- begin
- getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUART1A_U1STA.setADDEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUART1A_U1STA.clearADDEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUART1A_U1STA.setADDEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUART1A_U1STA.getADDEN : TBits_1; inline;
- begin
- getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUART1A_U1STA.setURXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
- end;
- function TUART1A_U1STA.getURXISEL : TBits_2; inline;
- begin
- getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
- end;
- procedure TUART1A_U1STA.setTRMT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TUART1A_U1STA.clearTRMT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TUART1A_U1STA.setTRMT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TUART1A_U1STA.getTRMT : TBits_1; inline;
- begin
- getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TUART1A_U1STA.setUTXBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TUART1A_U1STA.clearUTXBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TUART1A_U1STA.setUTXBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TUART1A_U1STA.getUTXBF : TBits_1; inline;
- begin
- getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TUART1A_U1STA.setUTXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TUART1A_U1STA.clearUTXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TUART1A_U1STA.setUTXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TUART1A_U1STA.getUTXEN : TBits_1; inline;
- begin
- getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TUART1A_U1STA.setUTXBRK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TUART1A_U1STA.clearUTXBRK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TUART1A_U1STA.setUTXBRK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TUART1A_U1STA.getUTXBRK : TBits_1; inline;
- begin
- getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TUART1A_U1STA.setURXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TUART1A_U1STA.clearURXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TUART1A_U1STA.setURXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TUART1A_U1STA.getURXEN : TBits_1; inline;
- begin
- getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TUART1A_U1STA.setUTXINV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART1A_U1STA.clearUTXINV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART1A_U1STA.setUTXINV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART1A_U1STA.getUTXINV : TBits_1; inline;
- begin
- getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART1A_U1STA.setUTXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TUART1A_U1STA.getUTXISEL : TBits_2; inline;
- begin
- getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TUART1A_U1STA.setADDR(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
- end;
- function TUART1A_U1STA.getADDR : TBits_8; inline;
- begin
- getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
- end;
- procedure TUART1A_U1STA.setADM_EN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- procedure TUART1A_U1STA.clearADM_EN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $01000000;
- end;
- procedure TUART1A_U1STA.setADM_EN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $01000000
- else
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- function TUART1A_U1STA.getADM_EN : TBits_1; inline;
- begin
- getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
- end;
- procedure TUART1A_U1STA.setURXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUART1A_U1STA.clearURXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUART1A_U1STA.setURXISEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUART1A_U1STA.getURXISEL0 : TBits_1; inline;
- begin
- getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUART1A_U1STA.setURXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUART1A_U1STA.clearURXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUART1A_U1STA.setURXISEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUART1A_U1STA.getURXISEL1 : TBits_1; inline;
- begin
- getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUART1A_U1STA.setUTXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TUART1A_U1STA.clearUTXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TUART1A_U1STA.setUTXISEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TUART1A_U1STA.getUTXISEL0 : TBits_1; inline;
- begin
- getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TUART1A_U1STA.setUTXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART1A_U1STA.clearUTXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART1A_U1STA.setUTXISEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART1A_U1STA.getUTXISEL1 : TBits_1; inline;
- begin
- getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART1A_U1STA.setUTXSEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TUART1A_U1STA.getUTXSEL : TBits_2; inline;
- begin
- getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TUART1A_U1STA.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TUART1A_U1STA.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUART1B_U1BMODE.setSTSEL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUART1B_U1BMODE.clearSTSEL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUART1B_U1BMODE.setSTSEL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUART1B_U1BMODE.getSTSEL : TBits_1; inline;
- begin
- getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUART1B_U1BMODE.setPDSEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
- end;
- function TUART1B_U1BMODE.getPDSEL : TBits_2; inline;
- begin
- getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
- end;
- procedure TUART1B_U1BMODE.setBRGH; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUART1B_U1BMODE.clearBRGH; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUART1B_U1BMODE.setBRGH(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUART1B_U1BMODE.getBRGH : TBits_1; inline;
- begin
- getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUART1B_U1BMODE.setRXINV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUART1B_U1BMODE.clearRXINV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUART1B_U1BMODE.setRXINV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUART1B_U1BMODE.getRXINV : TBits_1; inline;
- begin
- getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUART1B_U1BMODE.setABAUD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUART1B_U1BMODE.clearABAUD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUART1B_U1BMODE.setABAUD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUART1B_U1BMODE.getABAUD : TBits_1; inline;
- begin
- getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUART1B_U1BMODE.setLPBACK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUART1B_U1BMODE.clearLPBACK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUART1B_U1BMODE.setLPBACK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUART1B_U1BMODE.getLPBACK : TBits_1; inline;
- begin
- getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUART1B_U1BMODE.setWAKE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUART1B_U1BMODE.clearWAKE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUART1B_U1BMODE.setWAKE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUART1B_U1BMODE.getWAKE : TBits_1; inline;
- begin
- getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUART1B_U1BMODE.setIREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TUART1B_U1BMODE.clearIREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TUART1B_U1BMODE.setIREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TUART1B_U1BMODE.getIREN : TBits_1; inline;
- begin
- getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TUART1B_U1BMODE.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART1B_U1BMODE.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART1B_U1BMODE.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART1B_U1BMODE.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART1B_U1BMODE.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART1B_U1BMODE.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART1B_U1BMODE.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART1B_U1BMODE.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART1B_U1BMODE.setPDSEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUART1B_U1BMODE.clearPDSEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUART1B_U1BMODE.setPDSEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUART1B_U1BMODE.getPDSEL0 : TBits_1; inline;
- begin
- getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUART1B_U1BMODE.setPDSEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUART1B_U1BMODE.clearPDSEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUART1B_U1BMODE.setPDSEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUART1B_U1BMODE.getPDSEL1 : TBits_1; inline;
- begin
- getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUART1B_U1BMODE.setUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART1B_U1BMODE.clearUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART1B_U1BMODE.setUSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART1B_U1BMODE.getUSIDL : TBits_1; inline;
- begin
- getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART1B_U1BMODE.setUARTEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART1B_U1BMODE.clearUARTEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART1B_U1BMODE.setUARTEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART1B_U1BMODE.getUARTEN : TBits_1; inline;
- begin
- getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART1B_U1BMODE.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TUART1B_U1BMODE.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUART1B_U4MODE.setSTSEL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUART1B_U4MODE.clearSTSEL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUART1B_U4MODE.setSTSEL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUART1B_U4MODE.getSTSEL : TBits_1; inline;
- begin
- getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUART1B_U4MODE.setPDSEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
- end;
- function TUART1B_U4MODE.getPDSEL : TBits_2; inline;
- begin
- getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
- end;
- procedure TUART1B_U4MODE.setBRGH; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUART1B_U4MODE.clearBRGH; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUART1B_U4MODE.setBRGH(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUART1B_U4MODE.getBRGH : TBits_1; inline;
- begin
- getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUART1B_U4MODE.setRXINV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUART1B_U4MODE.clearRXINV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUART1B_U4MODE.setRXINV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUART1B_U4MODE.getRXINV : TBits_1; inline;
- begin
- getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUART1B_U4MODE.setABAUD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUART1B_U4MODE.clearABAUD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUART1B_U4MODE.setABAUD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUART1B_U4MODE.getABAUD : TBits_1; inline;
- begin
- getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUART1B_U4MODE.setLPBACK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUART1B_U4MODE.clearLPBACK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUART1B_U4MODE.setLPBACK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUART1B_U4MODE.getLPBACK : TBits_1; inline;
- begin
- getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUART1B_U4MODE.setWAKE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUART1B_U4MODE.clearWAKE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUART1B_U4MODE.setWAKE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUART1B_U4MODE.getWAKE : TBits_1; inline;
- begin
- getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUART1B_U4MODE.setIREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TUART1B_U4MODE.clearIREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TUART1B_U4MODE.setIREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TUART1B_U4MODE.getIREN : TBits_1; inline;
- begin
- getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TUART1B_U4MODE.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART1B_U4MODE.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART1B_U4MODE.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART1B_U4MODE.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART1B_U4MODE.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART1B_U4MODE.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART1B_U4MODE.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART1B_U4MODE.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART1B_U4MODE.setPDSEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUART1B_U4MODE.clearPDSEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUART1B_U4MODE.setPDSEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUART1B_U4MODE.getPDSEL0 : TBits_1; inline;
- begin
- getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUART1B_U4MODE.setPDSEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUART1B_U4MODE.clearPDSEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUART1B_U4MODE.setPDSEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUART1B_U4MODE.getPDSEL1 : TBits_1; inline;
- begin
- getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUART1B_U4MODE.setUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART1B_U4MODE.clearUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART1B_U4MODE.setUSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART1B_U4MODE.getUSIDL : TBits_1; inline;
- begin
- getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART1B_U4MODE.setUARTEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART1B_U4MODE.clearUARTEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART1B_U4MODE.setUARTEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART1B_U4MODE.getUARTEN : TBits_1; inline;
- begin
- getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART1B_U4MODE.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TUART1B_U4MODE.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUART1B_U1BSTA.setURXDA; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUART1B_U1BSTA.clearURXDA; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUART1B_U1BSTA.setURXDA(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUART1B_U1BSTA.getURXDA : TBits_1; inline;
- begin
- getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUART1B_U1BSTA.setOERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUART1B_U1BSTA.clearOERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUART1B_U1BSTA.setOERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUART1B_U1BSTA.getOERR : TBits_1; inline;
- begin
- getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUART1B_U1BSTA.setFERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUART1B_U1BSTA.clearFERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUART1B_U1BSTA.setFERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUART1B_U1BSTA.getFERR : TBits_1; inline;
- begin
- getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUART1B_U1BSTA.setPERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUART1B_U1BSTA.clearPERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUART1B_U1BSTA.setPERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUART1B_U1BSTA.getPERR : TBits_1; inline;
- begin
- getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUART1B_U1BSTA.setRIDLE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUART1B_U1BSTA.clearRIDLE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUART1B_U1BSTA.setRIDLE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUART1B_U1BSTA.getRIDLE : TBits_1; inline;
- begin
- getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUART1B_U1BSTA.setADDEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUART1B_U1BSTA.clearADDEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUART1B_U1BSTA.setADDEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUART1B_U1BSTA.getADDEN : TBits_1; inline;
- begin
- getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUART1B_U1BSTA.setURXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
- end;
- function TUART1B_U1BSTA.getURXISEL : TBits_2; inline;
- begin
- getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
- end;
- procedure TUART1B_U1BSTA.setTRMT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TUART1B_U1BSTA.clearTRMT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TUART1B_U1BSTA.setTRMT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TUART1B_U1BSTA.getTRMT : TBits_1; inline;
- begin
- getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TUART1B_U1BSTA.setUTXBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TUART1B_U1BSTA.clearUTXBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TUART1B_U1BSTA.setUTXBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TUART1B_U1BSTA.getUTXBF : TBits_1; inline;
- begin
- getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TUART1B_U1BSTA.setUTXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TUART1B_U1BSTA.clearUTXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TUART1B_U1BSTA.setUTXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TUART1B_U1BSTA.getUTXEN : TBits_1; inline;
- begin
- getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TUART1B_U1BSTA.setUTXBRK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TUART1B_U1BSTA.clearUTXBRK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TUART1B_U1BSTA.setUTXBRK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TUART1B_U1BSTA.getUTXBRK : TBits_1; inline;
- begin
- getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TUART1B_U1BSTA.setURXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TUART1B_U1BSTA.clearURXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TUART1B_U1BSTA.setURXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TUART1B_U1BSTA.getURXEN : TBits_1; inline;
- begin
- getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TUART1B_U1BSTA.setUTXINV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART1B_U1BSTA.clearUTXINV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART1B_U1BSTA.setUTXINV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART1B_U1BSTA.getUTXINV : TBits_1; inline;
- begin
- getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART1B_U1BSTA.setUTXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TUART1B_U1BSTA.getUTXISEL : TBits_2; inline;
- begin
- getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TUART1B_U1BSTA.setADDR(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
- end;
- function TUART1B_U1BSTA.getADDR : TBits_8; inline;
- begin
- getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
- end;
- procedure TUART1B_U1BSTA.setADM_EN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- procedure TUART1B_U1BSTA.clearADM_EN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $01000000;
- end;
- procedure TUART1B_U1BSTA.setADM_EN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $01000000
- else
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- function TUART1B_U1BSTA.getADM_EN : TBits_1; inline;
- begin
- getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
- end;
- procedure TUART1B_U1BSTA.setURXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUART1B_U1BSTA.clearURXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUART1B_U1BSTA.setURXISEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUART1B_U1BSTA.getURXISEL0 : TBits_1; inline;
- begin
- getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUART1B_U1BSTA.setURXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUART1B_U1BSTA.clearURXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUART1B_U1BSTA.setURXISEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUART1B_U1BSTA.getURXISEL1 : TBits_1; inline;
- begin
- getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUART1B_U1BSTA.setUTXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TUART1B_U1BSTA.clearUTXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TUART1B_U1BSTA.setUTXISEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TUART1B_U1BSTA.getUTXISEL0 : TBits_1; inline;
- begin
- getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TUART1B_U1BSTA.setUTXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART1B_U1BSTA.clearUTXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART1B_U1BSTA.setUTXISEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART1B_U1BSTA.getUTXISEL1 : TBits_1; inline;
- begin
- getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART1B_U1BSTA.setUTXSEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TUART1B_U1BSTA.getUTXSEL : TBits_2; inline;
- begin
- getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TUART1B_U1BSTA.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TUART1B_U1BSTA.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUART1B_U4STA.setURXDA; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUART1B_U4STA.clearURXDA; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUART1B_U4STA.setURXDA(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUART1B_U4STA.getURXDA : TBits_1; inline;
- begin
- getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUART1B_U4STA.setOERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUART1B_U4STA.clearOERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUART1B_U4STA.setOERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUART1B_U4STA.getOERR : TBits_1; inline;
- begin
- getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUART1B_U4STA.setFERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUART1B_U4STA.clearFERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUART1B_U4STA.setFERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUART1B_U4STA.getFERR : TBits_1; inline;
- begin
- getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUART1B_U4STA.setPERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUART1B_U4STA.clearPERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUART1B_U4STA.setPERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUART1B_U4STA.getPERR : TBits_1; inline;
- begin
- getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUART1B_U4STA.setRIDLE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUART1B_U4STA.clearRIDLE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUART1B_U4STA.setRIDLE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUART1B_U4STA.getRIDLE : TBits_1; inline;
- begin
- getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUART1B_U4STA.setADDEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUART1B_U4STA.clearADDEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUART1B_U4STA.setADDEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUART1B_U4STA.getADDEN : TBits_1; inline;
- begin
- getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUART1B_U4STA.setURXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
- end;
- function TUART1B_U4STA.getURXISEL : TBits_2; inline;
- begin
- getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
- end;
- procedure TUART1B_U4STA.setTRMT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TUART1B_U4STA.clearTRMT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TUART1B_U4STA.setTRMT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TUART1B_U4STA.getTRMT : TBits_1; inline;
- begin
- getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TUART1B_U4STA.setUTXBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TUART1B_U4STA.clearUTXBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TUART1B_U4STA.setUTXBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TUART1B_U4STA.getUTXBF : TBits_1; inline;
- begin
- getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TUART1B_U4STA.setUTXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TUART1B_U4STA.clearUTXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TUART1B_U4STA.setUTXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TUART1B_U4STA.getUTXEN : TBits_1; inline;
- begin
- getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TUART1B_U4STA.setUTXBRK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TUART1B_U4STA.clearUTXBRK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TUART1B_U4STA.setUTXBRK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TUART1B_U4STA.getUTXBRK : TBits_1; inline;
- begin
- getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TUART1B_U4STA.setURXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TUART1B_U4STA.clearURXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TUART1B_U4STA.setURXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TUART1B_U4STA.getURXEN : TBits_1; inline;
- begin
- getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TUART1B_U4STA.setUTXINV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART1B_U4STA.clearUTXINV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART1B_U4STA.setUTXINV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART1B_U4STA.getUTXINV : TBits_1; inline;
- begin
- getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART1B_U4STA.setUTXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TUART1B_U4STA.getUTXISEL : TBits_2; inline;
- begin
- getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TUART1B_U4STA.setADDR(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
- end;
- function TUART1B_U4STA.getADDR : TBits_8; inline;
- begin
- getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
- end;
- procedure TUART1B_U4STA.setADM_EN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- procedure TUART1B_U4STA.clearADM_EN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $01000000;
- end;
- procedure TUART1B_U4STA.setADM_EN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $01000000
- else
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- function TUART1B_U4STA.getADM_EN : TBits_1; inline;
- begin
- getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
- end;
- procedure TUART1B_U4STA.setURXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUART1B_U4STA.clearURXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUART1B_U4STA.setURXISEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUART1B_U4STA.getURXISEL0 : TBits_1; inline;
- begin
- getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUART1B_U4STA.setURXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUART1B_U4STA.clearURXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUART1B_U4STA.setURXISEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUART1B_U4STA.getURXISEL1 : TBits_1; inline;
- begin
- getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUART1B_U4STA.setUTXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TUART1B_U4STA.clearUTXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TUART1B_U4STA.setUTXISEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TUART1B_U4STA.getUTXISEL0 : TBits_1; inline;
- begin
- getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TUART1B_U4STA.setUTXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART1B_U4STA.clearUTXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART1B_U4STA.setUTXISEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART1B_U4STA.getUTXISEL1 : TBits_1; inline;
- begin
- getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART1B_U4STA.setUTXSEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TUART1B_U4STA.getUTXSEL : TBits_2; inline;
- begin
- getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TUART1B_U4STA.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TUART1B_U4STA.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUART2A_U2AMODE.setSTSEL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUART2A_U2AMODE.clearSTSEL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUART2A_U2AMODE.setSTSEL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUART2A_U2AMODE.getSTSEL : TBits_1; inline;
- begin
- getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUART2A_U2AMODE.setPDSEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
- end;
- function TUART2A_U2AMODE.getPDSEL : TBits_2; inline;
- begin
- getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
- end;
- procedure TUART2A_U2AMODE.setBRGH; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUART2A_U2AMODE.clearBRGH; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUART2A_U2AMODE.setBRGH(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUART2A_U2AMODE.getBRGH : TBits_1; inline;
- begin
- getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUART2A_U2AMODE.setRXINV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUART2A_U2AMODE.clearRXINV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUART2A_U2AMODE.setRXINV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUART2A_U2AMODE.getRXINV : TBits_1; inline;
- begin
- getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUART2A_U2AMODE.setABAUD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUART2A_U2AMODE.clearABAUD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUART2A_U2AMODE.setABAUD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUART2A_U2AMODE.getABAUD : TBits_1; inline;
- begin
- getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUART2A_U2AMODE.setLPBACK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUART2A_U2AMODE.clearLPBACK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUART2A_U2AMODE.setLPBACK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUART2A_U2AMODE.getLPBACK : TBits_1; inline;
- begin
- getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUART2A_U2AMODE.setWAKE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUART2A_U2AMODE.clearWAKE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUART2A_U2AMODE.setWAKE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUART2A_U2AMODE.getWAKE : TBits_1; inline;
- begin
- getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUART2A_U2AMODE.setUEN(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
- end;
- function TUART2A_U2AMODE.getUEN : TBits_2; inline;
- begin
- getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
- end;
- procedure TUART2A_U2AMODE.setRTSMD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TUART2A_U2AMODE.clearRTSMD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TUART2A_U2AMODE.setRTSMD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TUART2A_U2AMODE.getRTSMD : TBits_1; inline;
- begin
- getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TUART2A_U2AMODE.setIREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TUART2A_U2AMODE.clearIREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TUART2A_U2AMODE.setIREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TUART2A_U2AMODE.getIREN : TBits_1; inline;
- begin
- getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TUART2A_U2AMODE.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART2A_U2AMODE.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART2A_U2AMODE.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART2A_U2AMODE.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART2A_U2AMODE.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART2A_U2AMODE.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART2A_U2AMODE.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART2A_U2AMODE.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART2A_U2AMODE.setPDSEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUART2A_U2AMODE.clearPDSEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUART2A_U2AMODE.setPDSEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUART2A_U2AMODE.getPDSEL0 : TBits_1; inline;
- begin
- getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUART2A_U2AMODE.setPDSEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUART2A_U2AMODE.clearPDSEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUART2A_U2AMODE.setPDSEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUART2A_U2AMODE.getPDSEL1 : TBits_1; inline;
- begin
- getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUART2A_U2AMODE.setUEN0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TUART2A_U2AMODE.clearUEN0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TUART2A_U2AMODE.setUEN0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TUART2A_U2AMODE.getUEN0 : TBits_1; inline;
- begin
- getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TUART2A_U2AMODE.setUEN1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TUART2A_U2AMODE.clearUEN1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TUART2A_U2AMODE.setUEN1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TUART2A_U2AMODE.getUEN1 : TBits_1; inline;
- begin
- getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TUART2A_U2AMODE.setUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART2A_U2AMODE.clearUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART2A_U2AMODE.setUSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART2A_U2AMODE.getUSIDL : TBits_1; inline;
- begin
- getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART2A_U2AMODE.setUARTEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART2A_U2AMODE.clearUARTEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART2A_U2AMODE.setUARTEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART2A_U2AMODE.getUARTEN : TBits_1; inline;
- begin
- getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART2A_U2AMODE.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TUART2A_U2AMODE.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUART2A_U3MODE.setSTSEL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUART2A_U3MODE.clearSTSEL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUART2A_U3MODE.setSTSEL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUART2A_U3MODE.getSTSEL : TBits_1; inline;
- begin
- getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUART2A_U3MODE.setPDSEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
- end;
- function TUART2A_U3MODE.getPDSEL : TBits_2; inline;
- begin
- getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
- end;
- procedure TUART2A_U3MODE.setBRGH; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUART2A_U3MODE.clearBRGH; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUART2A_U3MODE.setBRGH(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUART2A_U3MODE.getBRGH : TBits_1; inline;
- begin
- getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUART2A_U3MODE.setRXINV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUART2A_U3MODE.clearRXINV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUART2A_U3MODE.setRXINV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUART2A_U3MODE.getRXINV : TBits_1; inline;
- begin
- getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUART2A_U3MODE.setABAUD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUART2A_U3MODE.clearABAUD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUART2A_U3MODE.setABAUD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUART2A_U3MODE.getABAUD : TBits_1; inline;
- begin
- getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUART2A_U3MODE.setLPBACK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUART2A_U3MODE.clearLPBACK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUART2A_U3MODE.setLPBACK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUART2A_U3MODE.getLPBACK : TBits_1; inline;
- begin
- getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUART2A_U3MODE.setWAKE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUART2A_U3MODE.clearWAKE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUART2A_U3MODE.setWAKE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUART2A_U3MODE.getWAKE : TBits_1; inline;
- begin
- getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUART2A_U3MODE.setUEN(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
- end;
- function TUART2A_U3MODE.getUEN : TBits_2; inline;
- begin
- getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
- end;
- procedure TUART2A_U3MODE.setRTSMD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TUART2A_U3MODE.clearRTSMD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TUART2A_U3MODE.setRTSMD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TUART2A_U3MODE.getRTSMD : TBits_1; inline;
- begin
- getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TUART2A_U3MODE.setIREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TUART2A_U3MODE.clearIREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TUART2A_U3MODE.setIREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TUART2A_U3MODE.getIREN : TBits_1; inline;
- begin
- getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TUART2A_U3MODE.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART2A_U3MODE.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART2A_U3MODE.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART2A_U3MODE.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART2A_U3MODE.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART2A_U3MODE.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART2A_U3MODE.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART2A_U3MODE.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART2A_U3MODE.setPDSEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUART2A_U3MODE.clearPDSEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUART2A_U3MODE.setPDSEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUART2A_U3MODE.getPDSEL0 : TBits_1; inline;
- begin
- getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUART2A_U3MODE.setPDSEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUART2A_U3MODE.clearPDSEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUART2A_U3MODE.setPDSEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUART2A_U3MODE.getPDSEL1 : TBits_1; inline;
- begin
- getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUART2A_U3MODE.setUEN0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TUART2A_U3MODE.clearUEN0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TUART2A_U3MODE.setUEN0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TUART2A_U3MODE.getUEN0 : TBits_1; inline;
- begin
- getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TUART2A_U3MODE.setUEN1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TUART2A_U3MODE.clearUEN1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TUART2A_U3MODE.setUEN1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TUART2A_U3MODE.getUEN1 : TBits_1; inline;
- begin
- getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TUART2A_U3MODE.setUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART2A_U3MODE.clearUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART2A_U3MODE.setUSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART2A_U3MODE.getUSIDL : TBits_1; inline;
- begin
- getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART2A_U3MODE.setUARTEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART2A_U3MODE.clearUARTEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART2A_U3MODE.setUARTEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART2A_U3MODE.getUARTEN : TBits_1; inline;
- begin
- getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART2A_U3MODE.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TUART2A_U3MODE.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUART2A_U2ASTA.setURXDA; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUART2A_U2ASTA.clearURXDA; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUART2A_U2ASTA.setURXDA(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUART2A_U2ASTA.getURXDA : TBits_1; inline;
- begin
- getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUART2A_U2ASTA.setOERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUART2A_U2ASTA.clearOERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUART2A_U2ASTA.setOERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUART2A_U2ASTA.getOERR : TBits_1; inline;
- begin
- getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUART2A_U2ASTA.setFERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUART2A_U2ASTA.clearFERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUART2A_U2ASTA.setFERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUART2A_U2ASTA.getFERR : TBits_1; inline;
- begin
- getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUART2A_U2ASTA.setPERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUART2A_U2ASTA.clearPERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUART2A_U2ASTA.setPERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUART2A_U2ASTA.getPERR : TBits_1; inline;
- begin
- getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUART2A_U2ASTA.setRIDLE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUART2A_U2ASTA.clearRIDLE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUART2A_U2ASTA.setRIDLE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUART2A_U2ASTA.getRIDLE : TBits_1; inline;
- begin
- getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUART2A_U2ASTA.setADDEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUART2A_U2ASTA.clearADDEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUART2A_U2ASTA.setADDEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUART2A_U2ASTA.getADDEN : TBits_1; inline;
- begin
- getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUART2A_U2ASTA.setURXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
- end;
- function TUART2A_U2ASTA.getURXISEL : TBits_2; inline;
- begin
- getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
- end;
- procedure TUART2A_U2ASTA.setTRMT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TUART2A_U2ASTA.clearTRMT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TUART2A_U2ASTA.setTRMT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TUART2A_U2ASTA.getTRMT : TBits_1; inline;
- begin
- getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TUART2A_U2ASTA.setUTXBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TUART2A_U2ASTA.clearUTXBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TUART2A_U2ASTA.setUTXBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TUART2A_U2ASTA.getUTXBF : TBits_1; inline;
- begin
- getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TUART2A_U2ASTA.setUTXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TUART2A_U2ASTA.clearUTXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TUART2A_U2ASTA.setUTXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TUART2A_U2ASTA.getUTXEN : TBits_1; inline;
- begin
- getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TUART2A_U2ASTA.setUTXBRK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TUART2A_U2ASTA.clearUTXBRK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TUART2A_U2ASTA.setUTXBRK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TUART2A_U2ASTA.getUTXBRK : TBits_1; inline;
- begin
- getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TUART2A_U2ASTA.setURXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TUART2A_U2ASTA.clearURXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TUART2A_U2ASTA.setURXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TUART2A_U2ASTA.getURXEN : TBits_1; inline;
- begin
- getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TUART2A_U2ASTA.setUTXINV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART2A_U2ASTA.clearUTXINV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART2A_U2ASTA.setUTXINV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART2A_U2ASTA.getUTXINV : TBits_1; inline;
- begin
- getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART2A_U2ASTA.setUTXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TUART2A_U2ASTA.getUTXISEL : TBits_2; inline;
- begin
- getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TUART2A_U2ASTA.setADDR(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
- end;
- function TUART2A_U2ASTA.getADDR : TBits_8; inline;
- begin
- getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
- end;
- procedure TUART2A_U2ASTA.setADM_EN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- procedure TUART2A_U2ASTA.clearADM_EN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $01000000;
- end;
- procedure TUART2A_U2ASTA.setADM_EN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $01000000
- else
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- function TUART2A_U2ASTA.getADM_EN : TBits_1; inline;
- begin
- getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
- end;
- procedure TUART2A_U2ASTA.setURXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUART2A_U2ASTA.clearURXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUART2A_U2ASTA.setURXISEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUART2A_U2ASTA.getURXISEL0 : TBits_1; inline;
- begin
- getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUART2A_U2ASTA.setURXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUART2A_U2ASTA.clearURXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUART2A_U2ASTA.setURXISEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUART2A_U2ASTA.getURXISEL1 : TBits_1; inline;
- begin
- getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUART2A_U2ASTA.setUTXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TUART2A_U2ASTA.clearUTXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TUART2A_U2ASTA.setUTXISEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TUART2A_U2ASTA.getUTXISEL0 : TBits_1; inline;
- begin
- getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TUART2A_U2ASTA.setUTXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART2A_U2ASTA.clearUTXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART2A_U2ASTA.setUTXISEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART2A_U2ASTA.getUTXISEL1 : TBits_1; inline;
- begin
- getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART2A_U2ASTA.setUTXSEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TUART2A_U2ASTA.getUTXSEL : TBits_2; inline;
- begin
- getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TUART2A_U2ASTA.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TUART2A_U2ASTA.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUART2A_U3STA.setURXDA; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUART2A_U3STA.clearURXDA; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUART2A_U3STA.setURXDA(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUART2A_U3STA.getURXDA : TBits_1; inline;
- begin
- getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUART2A_U3STA.setOERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUART2A_U3STA.clearOERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUART2A_U3STA.setOERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUART2A_U3STA.getOERR : TBits_1; inline;
- begin
- getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUART2A_U3STA.setFERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUART2A_U3STA.clearFERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUART2A_U3STA.setFERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUART2A_U3STA.getFERR : TBits_1; inline;
- begin
- getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUART2A_U3STA.setPERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUART2A_U3STA.clearPERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUART2A_U3STA.setPERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUART2A_U3STA.getPERR : TBits_1; inline;
- begin
- getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUART2A_U3STA.setRIDLE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUART2A_U3STA.clearRIDLE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUART2A_U3STA.setRIDLE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUART2A_U3STA.getRIDLE : TBits_1; inline;
- begin
- getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUART2A_U3STA.setADDEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUART2A_U3STA.clearADDEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUART2A_U3STA.setADDEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUART2A_U3STA.getADDEN : TBits_1; inline;
- begin
- getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUART2A_U3STA.setURXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
- end;
- function TUART2A_U3STA.getURXISEL : TBits_2; inline;
- begin
- getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
- end;
- procedure TUART2A_U3STA.setTRMT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TUART2A_U3STA.clearTRMT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TUART2A_U3STA.setTRMT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TUART2A_U3STA.getTRMT : TBits_1; inline;
- begin
- getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TUART2A_U3STA.setUTXBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TUART2A_U3STA.clearUTXBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TUART2A_U3STA.setUTXBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TUART2A_U3STA.getUTXBF : TBits_1; inline;
- begin
- getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TUART2A_U3STA.setUTXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TUART2A_U3STA.clearUTXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TUART2A_U3STA.setUTXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TUART2A_U3STA.getUTXEN : TBits_1; inline;
- begin
- getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TUART2A_U3STA.setUTXBRK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TUART2A_U3STA.clearUTXBRK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TUART2A_U3STA.setUTXBRK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TUART2A_U3STA.getUTXBRK : TBits_1; inline;
- begin
- getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TUART2A_U3STA.setURXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TUART2A_U3STA.clearURXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TUART2A_U3STA.setURXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TUART2A_U3STA.getURXEN : TBits_1; inline;
- begin
- getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TUART2A_U3STA.setUTXINV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART2A_U3STA.clearUTXINV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART2A_U3STA.setUTXINV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART2A_U3STA.getUTXINV : TBits_1; inline;
- begin
- getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART2A_U3STA.setUTXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TUART2A_U3STA.getUTXISEL : TBits_2; inline;
- begin
- getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TUART2A_U3STA.setADDR(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
- end;
- function TUART2A_U3STA.getADDR : TBits_8; inline;
- begin
- getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
- end;
- procedure TUART2A_U3STA.setADM_EN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- procedure TUART2A_U3STA.clearADM_EN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $01000000;
- end;
- procedure TUART2A_U3STA.setADM_EN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $01000000
- else
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- function TUART2A_U3STA.getADM_EN : TBits_1; inline;
- begin
- getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
- end;
- procedure TUART2A_U3STA.setURXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUART2A_U3STA.clearURXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUART2A_U3STA.setURXISEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUART2A_U3STA.getURXISEL0 : TBits_1; inline;
- begin
- getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUART2A_U3STA.setURXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUART2A_U3STA.clearURXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUART2A_U3STA.setURXISEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUART2A_U3STA.getURXISEL1 : TBits_1; inline;
- begin
- getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUART2A_U3STA.setUTXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TUART2A_U3STA.clearUTXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TUART2A_U3STA.setUTXISEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TUART2A_U3STA.getUTXISEL0 : TBits_1; inline;
- begin
- getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TUART2A_U3STA.setUTXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART2A_U3STA.clearUTXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART2A_U3STA.setUTXISEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART2A_U3STA.getUTXISEL1 : TBits_1; inline;
- begin
- getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART2A_U3STA.setUTXSEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TUART2A_U3STA.getUTXSEL : TBits_2; inline;
- begin
- getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TUART2A_U3STA.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TUART2A_U3STA.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUART2B_U2BMODE.setSTSEL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUART2B_U2BMODE.clearSTSEL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUART2B_U2BMODE.setSTSEL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUART2B_U2BMODE.getSTSEL : TBits_1; inline;
- begin
- getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUART2B_U2BMODE.setPDSEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
- end;
- function TUART2B_U2BMODE.getPDSEL : TBits_2; inline;
- begin
- getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
- end;
- procedure TUART2B_U2BMODE.setBRGH; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUART2B_U2BMODE.clearBRGH; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUART2B_U2BMODE.setBRGH(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUART2B_U2BMODE.getBRGH : TBits_1; inline;
- begin
- getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUART2B_U2BMODE.setRXINV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUART2B_U2BMODE.clearRXINV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUART2B_U2BMODE.setRXINV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUART2B_U2BMODE.getRXINV : TBits_1; inline;
- begin
- getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUART2B_U2BMODE.setABAUD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUART2B_U2BMODE.clearABAUD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUART2B_U2BMODE.setABAUD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUART2B_U2BMODE.getABAUD : TBits_1; inline;
- begin
- getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUART2B_U2BMODE.setLPBACK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUART2B_U2BMODE.clearLPBACK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUART2B_U2BMODE.setLPBACK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUART2B_U2BMODE.getLPBACK : TBits_1; inline;
- begin
- getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUART2B_U2BMODE.setWAKE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUART2B_U2BMODE.clearWAKE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUART2B_U2BMODE.setWAKE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUART2B_U2BMODE.getWAKE : TBits_1; inline;
- begin
- getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUART2B_U2BMODE.setIREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TUART2B_U2BMODE.clearIREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TUART2B_U2BMODE.setIREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TUART2B_U2BMODE.getIREN : TBits_1; inline;
- begin
- getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TUART2B_U2BMODE.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART2B_U2BMODE.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART2B_U2BMODE.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART2B_U2BMODE.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART2B_U2BMODE.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART2B_U2BMODE.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART2B_U2BMODE.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART2B_U2BMODE.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART2B_U2BMODE.setPDSEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUART2B_U2BMODE.clearPDSEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUART2B_U2BMODE.setPDSEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUART2B_U2BMODE.getPDSEL0 : TBits_1; inline;
- begin
- getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUART2B_U2BMODE.setPDSEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUART2B_U2BMODE.clearPDSEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUART2B_U2BMODE.setPDSEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUART2B_U2BMODE.getPDSEL1 : TBits_1; inline;
- begin
- getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUART2B_U2BMODE.setUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART2B_U2BMODE.clearUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART2B_U2BMODE.setUSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART2B_U2BMODE.getUSIDL : TBits_1; inline;
- begin
- getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART2B_U2BMODE.setUARTEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART2B_U2BMODE.clearUARTEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART2B_U2BMODE.setUARTEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART2B_U2BMODE.getUARTEN : TBits_1; inline;
- begin
- getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART2B_U2BMODE.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TUART2B_U2BMODE.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUART2B_U6MODE.setSTSEL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUART2B_U6MODE.clearSTSEL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUART2B_U6MODE.setSTSEL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUART2B_U6MODE.getSTSEL : TBits_1; inline;
- begin
- getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUART2B_U6MODE.setPDSEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
- end;
- function TUART2B_U6MODE.getPDSEL : TBits_2; inline;
- begin
- getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
- end;
- procedure TUART2B_U6MODE.setBRGH; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUART2B_U6MODE.clearBRGH; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUART2B_U6MODE.setBRGH(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUART2B_U6MODE.getBRGH : TBits_1; inline;
- begin
- getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUART2B_U6MODE.setRXINV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUART2B_U6MODE.clearRXINV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUART2B_U6MODE.setRXINV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUART2B_U6MODE.getRXINV : TBits_1; inline;
- begin
- getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUART2B_U6MODE.setABAUD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUART2B_U6MODE.clearABAUD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUART2B_U6MODE.setABAUD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUART2B_U6MODE.getABAUD : TBits_1; inline;
- begin
- getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUART2B_U6MODE.setLPBACK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUART2B_U6MODE.clearLPBACK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUART2B_U6MODE.setLPBACK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUART2B_U6MODE.getLPBACK : TBits_1; inline;
- begin
- getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUART2B_U6MODE.setWAKE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUART2B_U6MODE.clearWAKE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUART2B_U6MODE.setWAKE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUART2B_U6MODE.getWAKE : TBits_1; inline;
- begin
- getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUART2B_U6MODE.setIREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TUART2B_U6MODE.clearIREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TUART2B_U6MODE.setIREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TUART2B_U6MODE.getIREN : TBits_1; inline;
- begin
- getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TUART2B_U6MODE.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART2B_U6MODE.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART2B_U6MODE.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART2B_U6MODE.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART2B_U6MODE.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART2B_U6MODE.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART2B_U6MODE.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART2B_U6MODE.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART2B_U6MODE.setPDSEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUART2B_U6MODE.clearPDSEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUART2B_U6MODE.setPDSEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUART2B_U6MODE.getPDSEL0 : TBits_1; inline;
- begin
- getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUART2B_U6MODE.setPDSEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUART2B_U6MODE.clearPDSEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUART2B_U6MODE.setPDSEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUART2B_U6MODE.getPDSEL1 : TBits_1; inline;
- begin
- getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUART2B_U6MODE.setUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART2B_U6MODE.clearUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART2B_U6MODE.setUSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART2B_U6MODE.getUSIDL : TBits_1; inline;
- begin
- getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART2B_U6MODE.setUARTEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART2B_U6MODE.clearUARTEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART2B_U6MODE.setUARTEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART2B_U6MODE.getUARTEN : TBits_1; inline;
- begin
- getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART2B_U6MODE.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TUART2B_U6MODE.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUART2B_U2BSTA.setURXDA; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUART2B_U2BSTA.clearURXDA; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUART2B_U2BSTA.setURXDA(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUART2B_U2BSTA.getURXDA : TBits_1; inline;
- begin
- getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUART2B_U2BSTA.setOERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUART2B_U2BSTA.clearOERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUART2B_U2BSTA.setOERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUART2B_U2BSTA.getOERR : TBits_1; inline;
- begin
- getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUART2B_U2BSTA.setFERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUART2B_U2BSTA.clearFERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUART2B_U2BSTA.setFERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUART2B_U2BSTA.getFERR : TBits_1; inline;
- begin
- getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUART2B_U2BSTA.setPERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUART2B_U2BSTA.clearPERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUART2B_U2BSTA.setPERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUART2B_U2BSTA.getPERR : TBits_1; inline;
- begin
- getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUART2B_U2BSTA.setRIDLE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUART2B_U2BSTA.clearRIDLE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUART2B_U2BSTA.setRIDLE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUART2B_U2BSTA.getRIDLE : TBits_1; inline;
- begin
- getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUART2B_U2BSTA.setADDEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUART2B_U2BSTA.clearADDEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUART2B_U2BSTA.setADDEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUART2B_U2BSTA.getADDEN : TBits_1; inline;
- begin
- getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUART2B_U2BSTA.setURXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
- end;
- function TUART2B_U2BSTA.getURXISEL : TBits_2; inline;
- begin
- getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
- end;
- procedure TUART2B_U2BSTA.setTRMT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TUART2B_U2BSTA.clearTRMT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TUART2B_U2BSTA.setTRMT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TUART2B_U2BSTA.getTRMT : TBits_1; inline;
- begin
- getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TUART2B_U2BSTA.setUTXBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TUART2B_U2BSTA.clearUTXBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TUART2B_U2BSTA.setUTXBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TUART2B_U2BSTA.getUTXBF : TBits_1; inline;
- begin
- getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TUART2B_U2BSTA.setUTXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TUART2B_U2BSTA.clearUTXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TUART2B_U2BSTA.setUTXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TUART2B_U2BSTA.getUTXEN : TBits_1; inline;
- begin
- getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TUART2B_U2BSTA.setUTXBRK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TUART2B_U2BSTA.clearUTXBRK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TUART2B_U2BSTA.setUTXBRK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TUART2B_U2BSTA.getUTXBRK : TBits_1; inline;
- begin
- getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TUART2B_U2BSTA.setURXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TUART2B_U2BSTA.clearURXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TUART2B_U2BSTA.setURXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TUART2B_U2BSTA.getURXEN : TBits_1; inline;
- begin
- getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TUART2B_U2BSTA.setUTXINV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART2B_U2BSTA.clearUTXINV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART2B_U2BSTA.setUTXINV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART2B_U2BSTA.getUTXINV : TBits_1; inline;
- begin
- getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART2B_U2BSTA.setUTXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TUART2B_U2BSTA.getUTXISEL : TBits_2; inline;
- begin
- getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TUART2B_U2BSTA.setADDR(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
- end;
- function TUART2B_U2BSTA.getADDR : TBits_8; inline;
- begin
- getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
- end;
- procedure TUART2B_U2BSTA.setADM_EN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- procedure TUART2B_U2BSTA.clearADM_EN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $01000000;
- end;
- procedure TUART2B_U2BSTA.setADM_EN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $01000000
- else
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- function TUART2B_U2BSTA.getADM_EN : TBits_1; inline;
- begin
- getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
- end;
- procedure TUART2B_U2BSTA.setURXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUART2B_U2BSTA.clearURXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUART2B_U2BSTA.setURXISEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUART2B_U2BSTA.getURXISEL0 : TBits_1; inline;
- begin
- getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUART2B_U2BSTA.setURXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUART2B_U2BSTA.clearURXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUART2B_U2BSTA.setURXISEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUART2B_U2BSTA.getURXISEL1 : TBits_1; inline;
- begin
- getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUART2B_U2BSTA.setUTXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TUART2B_U2BSTA.clearUTXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TUART2B_U2BSTA.setUTXISEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TUART2B_U2BSTA.getUTXISEL0 : TBits_1; inline;
- begin
- getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TUART2B_U2BSTA.setUTXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART2B_U2BSTA.clearUTXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART2B_U2BSTA.setUTXISEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART2B_U2BSTA.getUTXISEL1 : TBits_1; inline;
- begin
- getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART2B_U2BSTA.setUTXSEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TUART2B_U2BSTA.getUTXSEL : TBits_2; inline;
- begin
- getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TUART2B_U2BSTA.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TUART2B_U2BSTA.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUART2B_U6STA.setURXDA; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUART2B_U6STA.clearURXDA; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUART2B_U6STA.setURXDA(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUART2B_U6STA.getURXDA : TBits_1; inline;
- begin
- getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUART2B_U6STA.setOERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUART2B_U6STA.clearOERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUART2B_U6STA.setOERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUART2B_U6STA.getOERR : TBits_1; inline;
- begin
- getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUART2B_U6STA.setFERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUART2B_U6STA.clearFERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUART2B_U6STA.setFERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUART2B_U6STA.getFERR : TBits_1; inline;
- begin
- getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUART2B_U6STA.setPERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUART2B_U6STA.clearPERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUART2B_U6STA.setPERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUART2B_U6STA.getPERR : TBits_1; inline;
- begin
- getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUART2B_U6STA.setRIDLE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUART2B_U6STA.clearRIDLE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUART2B_U6STA.setRIDLE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUART2B_U6STA.getRIDLE : TBits_1; inline;
- begin
- getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUART2B_U6STA.setADDEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUART2B_U6STA.clearADDEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUART2B_U6STA.setADDEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUART2B_U6STA.getADDEN : TBits_1; inline;
- begin
- getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUART2B_U6STA.setURXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
- end;
- function TUART2B_U6STA.getURXISEL : TBits_2; inline;
- begin
- getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
- end;
- procedure TUART2B_U6STA.setTRMT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TUART2B_U6STA.clearTRMT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TUART2B_U6STA.setTRMT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TUART2B_U6STA.getTRMT : TBits_1; inline;
- begin
- getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TUART2B_U6STA.setUTXBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TUART2B_U6STA.clearUTXBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TUART2B_U6STA.setUTXBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TUART2B_U6STA.getUTXBF : TBits_1; inline;
- begin
- getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TUART2B_U6STA.setUTXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TUART2B_U6STA.clearUTXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TUART2B_U6STA.setUTXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TUART2B_U6STA.getUTXEN : TBits_1; inline;
- begin
- getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TUART2B_U6STA.setUTXBRK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TUART2B_U6STA.clearUTXBRK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TUART2B_U6STA.setUTXBRK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TUART2B_U6STA.getUTXBRK : TBits_1; inline;
- begin
- getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TUART2B_U6STA.setURXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TUART2B_U6STA.clearURXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TUART2B_U6STA.setURXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TUART2B_U6STA.getURXEN : TBits_1; inline;
- begin
- getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TUART2B_U6STA.setUTXINV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART2B_U6STA.clearUTXINV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART2B_U6STA.setUTXINV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART2B_U6STA.getUTXINV : TBits_1; inline;
- begin
- getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART2B_U6STA.setUTXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TUART2B_U6STA.getUTXISEL : TBits_2; inline;
- begin
- getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TUART2B_U6STA.setADDR(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
- end;
- function TUART2B_U6STA.getADDR : TBits_8; inline;
- begin
- getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
- end;
- procedure TUART2B_U6STA.setADM_EN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- procedure TUART2B_U6STA.clearADM_EN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $01000000;
- end;
- procedure TUART2B_U6STA.setADM_EN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $01000000
- else
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- function TUART2B_U6STA.getADM_EN : TBits_1; inline;
- begin
- getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
- end;
- procedure TUART2B_U6STA.setURXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUART2B_U6STA.clearURXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUART2B_U6STA.setURXISEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUART2B_U6STA.getURXISEL0 : TBits_1; inline;
- begin
- getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUART2B_U6STA.setURXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUART2B_U6STA.clearURXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUART2B_U6STA.setURXISEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUART2B_U6STA.getURXISEL1 : TBits_1; inline;
- begin
- getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUART2B_U6STA.setUTXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TUART2B_U6STA.clearUTXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TUART2B_U6STA.setUTXISEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TUART2B_U6STA.getUTXISEL0 : TBits_1; inline;
- begin
- getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TUART2B_U6STA.setUTXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART2B_U6STA.clearUTXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART2B_U6STA.setUTXISEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART2B_U6STA.getUTXISEL1 : TBits_1; inline;
- begin
- getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART2B_U6STA.setUTXSEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TUART2B_U6STA.getUTXSEL : TBits_2; inline;
- begin
- getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TUART2B_U6STA.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TUART2B_U6STA.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUART3A_U2MODE.setSTSEL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUART3A_U2MODE.clearSTSEL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUART3A_U2MODE.setSTSEL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUART3A_U2MODE.getSTSEL : TBits_1; inline;
- begin
- getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUART3A_U2MODE.setPDSEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
- end;
- function TUART3A_U2MODE.getPDSEL : TBits_2; inline;
- begin
- getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
- end;
- procedure TUART3A_U2MODE.setBRGH; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUART3A_U2MODE.clearBRGH; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUART3A_U2MODE.setBRGH(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUART3A_U2MODE.getBRGH : TBits_1; inline;
- begin
- getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUART3A_U2MODE.setRXINV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUART3A_U2MODE.clearRXINV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUART3A_U2MODE.setRXINV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUART3A_U2MODE.getRXINV : TBits_1; inline;
- begin
- getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUART3A_U2MODE.setABAUD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUART3A_U2MODE.clearABAUD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUART3A_U2MODE.setABAUD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUART3A_U2MODE.getABAUD : TBits_1; inline;
- begin
- getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUART3A_U2MODE.setLPBACK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUART3A_U2MODE.clearLPBACK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUART3A_U2MODE.setLPBACK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUART3A_U2MODE.getLPBACK : TBits_1; inline;
- begin
- getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUART3A_U2MODE.setWAKE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUART3A_U2MODE.clearWAKE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUART3A_U2MODE.setWAKE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUART3A_U2MODE.getWAKE : TBits_1; inline;
- begin
- getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUART3A_U2MODE.setUEN(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
- end;
- function TUART3A_U2MODE.getUEN : TBits_2; inline;
- begin
- getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
- end;
- procedure TUART3A_U2MODE.setRTSMD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TUART3A_U2MODE.clearRTSMD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TUART3A_U2MODE.setRTSMD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TUART3A_U2MODE.getRTSMD : TBits_1; inline;
- begin
- getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TUART3A_U2MODE.setIREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TUART3A_U2MODE.clearIREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TUART3A_U2MODE.setIREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TUART3A_U2MODE.getIREN : TBits_1; inline;
- begin
- getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TUART3A_U2MODE.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART3A_U2MODE.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART3A_U2MODE.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART3A_U2MODE.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART3A_U2MODE.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART3A_U2MODE.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART3A_U2MODE.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART3A_U2MODE.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART3A_U2MODE.setPDSEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUART3A_U2MODE.clearPDSEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUART3A_U2MODE.setPDSEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUART3A_U2MODE.getPDSEL0 : TBits_1; inline;
- begin
- getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUART3A_U2MODE.setPDSEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUART3A_U2MODE.clearPDSEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUART3A_U2MODE.setPDSEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUART3A_U2MODE.getPDSEL1 : TBits_1; inline;
- begin
- getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUART3A_U2MODE.setUEN0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TUART3A_U2MODE.clearUEN0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TUART3A_U2MODE.setUEN0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TUART3A_U2MODE.getUEN0 : TBits_1; inline;
- begin
- getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TUART3A_U2MODE.setUEN1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TUART3A_U2MODE.clearUEN1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TUART3A_U2MODE.setUEN1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TUART3A_U2MODE.getUEN1 : TBits_1; inline;
- begin
- getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TUART3A_U2MODE.setUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART3A_U2MODE.clearUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART3A_U2MODE.setUSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART3A_U2MODE.getUSIDL : TBits_1; inline;
- begin
- getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART3A_U2MODE.setUARTEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART3A_U2MODE.clearUARTEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART3A_U2MODE.setUARTEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART3A_U2MODE.getUARTEN : TBits_1; inline;
- begin
- getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART3A_U2MODE.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TUART3A_U2MODE.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUART3A_U3AMODE.setSTSEL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUART3A_U3AMODE.clearSTSEL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUART3A_U3AMODE.setSTSEL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUART3A_U3AMODE.getSTSEL : TBits_1; inline;
- begin
- getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUART3A_U3AMODE.setPDSEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
- end;
- function TUART3A_U3AMODE.getPDSEL : TBits_2; inline;
- begin
- getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
- end;
- procedure TUART3A_U3AMODE.setBRGH; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUART3A_U3AMODE.clearBRGH; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUART3A_U3AMODE.setBRGH(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUART3A_U3AMODE.getBRGH : TBits_1; inline;
- begin
- getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUART3A_U3AMODE.setRXINV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUART3A_U3AMODE.clearRXINV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUART3A_U3AMODE.setRXINV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUART3A_U3AMODE.getRXINV : TBits_1; inline;
- begin
- getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUART3A_U3AMODE.setABAUD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUART3A_U3AMODE.clearABAUD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUART3A_U3AMODE.setABAUD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUART3A_U3AMODE.getABAUD : TBits_1; inline;
- begin
- getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUART3A_U3AMODE.setLPBACK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUART3A_U3AMODE.clearLPBACK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUART3A_U3AMODE.setLPBACK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUART3A_U3AMODE.getLPBACK : TBits_1; inline;
- begin
- getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUART3A_U3AMODE.setWAKE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUART3A_U3AMODE.clearWAKE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUART3A_U3AMODE.setWAKE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUART3A_U3AMODE.getWAKE : TBits_1; inline;
- begin
- getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUART3A_U3AMODE.setUEN(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
- end;
- function TUART3A_U3AMODE.getUEN : TBits_2; inline;
- begin
- getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
- end;
- procedure TUART3A_U3AMODE.setRTSMD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TUART3A_U3AMODE.clearRTSMD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TUART3A_U3AMODE.setRTSMD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TUART3A_U3AMODE.getRTSMD : TBits_1; inline;
- begin
- getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TUART3A_U3AMODE.setIREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TUART3A_U3AMODE.clearIREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TUART3A_U3AMODE.setIREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TUART3A_U3AMODE.getIREN : TBits_1; inline;
- begin
- getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TUART3A_U3AMODE.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART3A_U3AMODE.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART3A_U3AMODE.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART3A_U3AMODE.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART3A_U3AMODE.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART3A_U3AMODE.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART3A_U3AMODE.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART3A_U3AMODE.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART3A_U3AMODE.setPDSEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUART3A_U3AMODE.clearPDSEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUART3A_U3AMODE.setPDSEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUART3A_U3AMODE.getPDSEL0 : TBits_1; inline;
- begin
- getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUART3A_U3AMODE.setPDSEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUART3A_U3AMODE.clearPDSEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUART3A_U3AMODE.setPDSEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUART3A_U3AMODE.getPDSEL1 : TBits_1; inline;
- begin
- getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUART3A_U3AMODE.setUEN0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TUART3A_U3AMODE.clearUEN0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TUART3A_U3AMODE.setUEN0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TUART3A_U3AMODE.getUEN0 : TBits_1; inline;
- begin
- getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TUART3A_U3AMODE.setUEN1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TUART3A_U3AMODE.clearUEN1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TUART3A_U3AMODE.setUEN1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TUART3A_U3AMODE.getUEN1 : TBits_1; inline;
- begin
- getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TUART3A_U3AMODE.setUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART3A_U3AMODE.clearUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART3A_U3AMODE.setUSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART3A_U3AMODE.getUSIDL : TBits_1; inline;
- begin
- getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART3A_U3AMODE.setUARTEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART3A_U3AMODE.clearUARTEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART3A_U3AMODE.setUARTEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART3A_U3AMODE.getUARTEN : TBits_1; inline;
- begin
- getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART3A_U3AMODE.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TUART3A_U3AMODE.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUART3A_U2STA.setURXDA; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUART3A_U2STA.clearURXDA; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUART3A_U2STA.setURXDA(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUART3A_U2STA.getURXDA : TBits_1; inline;
- begin
- getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUART3A_U2STA.setOERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUART3A_U2STA.clearOERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUART3A_U2STA.setOERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUART3A_U2STA.getOERR : TBits_1; inline;
- begin
- getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUART3A_U2STA.setFERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUART3A_U2STA.clearFERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUART3A_U2STA.setFERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUART3A_U2STA.getFERR : TBits_1; inline;
- begin
- getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUART3A_U2STA.setPERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUART3A_U2STA.clearPERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUART3A_U2STA.setPERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUART3A_U2STA.getPERR : TBits_1; inline;
- begin
- getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUART3A_U2STA.setRIDLE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUART3A_U2STA.clearRIDLE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUART3A_U2STA.setRIDLE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUART3A_U2STA.getRIDLE : TBits_1; inline;
- begin
- getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUART3A_U2STA.setADDEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUART3A_U2STA.clearADDEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUART3A_U2STA.setADDEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUART3A_U2STA.getADDEN : TBits_1; inline;
- begin
- getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUART3A_U2STA.setURXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
- end;
- function TUART3A_U2STA.getURXISEL : TBits_2; inline;
- begin
- getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
- end;
- procedure TUART3A_U2STA.setTRMT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TUART3A_U2STA.clearTRMT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TUART3A_U2STA.setTRMT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TUART3A_U2STA.getTRMT : TBits_1; inline;
- begin
- getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TUART3A_U2STA.setUTXBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TUART3A_U2STA.clearUTXBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TUART3A_U2STA.setUTXBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TUART3A_U2STA.getUTXBF : TBits_1; inline;
- begin
- getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TUART3A_U2STA.setUTXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TUART3A_U2STA.clearUTXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TUART3A_U2STA.setUTXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TUART3A_U2STA.getUTXEN : TBits_1; inline;
- begin
- getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TUART3A_U2STA.setUTXBRK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TUART3A_U2STA.clearUTXBRK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TUART3A_U2STA.setUTXBRK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TUART3A_U2STA.getUTXBRK : TBits_1; inline;
- begin
- getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TUART3A_U2STA.setURXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TUART3A_U2STA.clearURXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TUART3A_U2STA.setURXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TUART3A_U2STA.getURXEN : TBits_1; inline;
- begin
- getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TUART3A_U2STA.setUTXINV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART3A_U2STA.clearUTXINV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART3A_U2STA.setUTXINV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART3A_U2STA.getUTXINV : TBits_1; inline;
- begin
- getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART3A_U2STA.setUTXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TUART3A_U2STA.getUTXISEL : TBits_2; inline;
- begin
- getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TUART3A_U2STA.setADDR(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
- end;
- function TUART3A_U2STA.getADDR : TBits_8; inline;
- begin
- getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
- end;
- procedure TUART3A_U2STA.setADM_EN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- procedure TUART3A_U2STA.clearADM_EN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $01000000;
- end;
- procedure TUART3A_U2STA.setADM_EN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $01000000
- else
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- function TUART3A_U2STA.getADM_EN : TBits_1; inline;
- begin
- getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
- end;
- procedure TUART3A_U2STA.setURXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUART3A_U2STA.clearURXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUART3A_U2STA.setURXISEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUART3A_U2STA.getURXISEL0 : TBits_1; inline;
- begin
- getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUART3A_U2STA.setURXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUART3A_U2STA.clearURXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUART3A_U2STA.setURXISEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUART3A_U2STA.getURXISEL1 : TBits_1; inline;
- begin
- getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUART3A_U2STA.setUTXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TUART3A_U2STA.clearUTXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TUART3A_U2STA.setUTXISEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TUART3A_U2STA.getUTXISEL0 : TBits_1; inline;
- begin
- getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TUART3A_U2STA.setUTXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART3A_U2STA.clearUTXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART3A_U2STA.setUTXISEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART3A_U2STA.getUTXISEL1 : TBits_1; inline;
- begin
- getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART3A_U2STA.setUTXSEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TUART3A_U2STA.getUTXSEL : TBits_2; inline;
- begin
- getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TUART3A_U2STA.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TUART3A_U2STA.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUART3A_U3ASTA.setURXDA; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUART3A_U3ASTA.clearURXDA; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUART3A_U3ASTA.setURXDA(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUART3A_U3ASTA.getURXDA : TBits_1; inline;
- begin
- getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUART3A_U3ASTA.setOERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUART3A_U3ASTA.clearOERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUART3A_U3ASTA.setOERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUART3A_U3ASTA.getOERR : TBits_1; inline;
- begin
- getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUART3A_U3ASTA.setFERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUART3A_U3ASTA.clearFERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUART3A_U3ASTA.setFERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUART3A_U3ASTA.getFERR : TBits_1; inline;
- begin
- getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUART3A_U3ASTA.setPERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUART3A_U3ASTA.clearPERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUART3A_U3ASTA.setPERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUART3A_U3ASTA.getPERR : TBits_1; inline;
- begin
- getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUART3A_U3ASTA.setRIDLE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUART3A_U3ASTA.clearRIDLE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUART3A_U3ASTA.setRIDLE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUART3A_U3ASTA.getRIDLE : TBits_1; inline;
- begin
- getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUART3A_U3ASTA.setADDEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUART3A_U3ASTA.clearADDEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUART3A_U3ASTA.setADDEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUART3A_U3ASTA.getADDEN : TBits_1; inline;
- begin
- getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUART3A_U3ASTA.setURXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
- end;
- function TUART3A_U3ASTA.getURXISEL : TBits_2; inline;
- begin
- getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
- end;
- procedure TUART3A_U3ASTA.setTRMT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TUART3A_U3ASTA.clearTRMT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TUART3A_U3ASTA.setTRMT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TUART3A_U3ASTA.getTRMT : TBits_1; inline;
- begin
- getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TUART3A_U3ASTA.setUTXBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TUART3A_U3ASTA.clearUTXBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TUART3A_U3ASTA.setUTXBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TUART3A_U3ASTA.getUTXBF : TBits_1; inline;
- begin
- getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TUART3A_U3ASTA.setUTXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TUART3A_U3ASTA.clearUTXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TUART3A_U3ASTA.setUTXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TUART3A_U3ASTA.getUTXEN : TBits_1; inline;
- begin
- getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TUART3A_U3ASTA.setUTXBRK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TUART3A_U3ASTA.clearUTXBRK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TUART3A_U3ASTA.setUTXBRK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TUART3A_U3ASTA.getUTXBRK : TBits_1; inline;
- begin
- getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TUART3A_U3ASTA.setURXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TUART3A_U3ASTA.clearURXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TUART3A_U3ASTA.setURXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TUART3A_U3ASTA.getURXEN : TBits_1; inline;
- begin
- getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TUART3A_U3ASTA.setUTXINV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART3A_U3ASTA.clearUTXINV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART3A_U3ASTA.setUTXINV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART3A_U3ASTA.getUTXINV : TBits_1; inline;
- begin
- getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART3A_U3ASTA.setUTXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TUART3A_U3ASTA.getUTXISEL : TBits_2; inline;
- begin
- getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TUART3A_U3ASTA.setADDR(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
- end;
- function TUART3A_U3ASTA.getADDR : TBits_8; inline;
- begin
- getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
- end;
- procedure TUART3A_U3ASTA.setADM_EN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- procedure TUART3A_U3ASTA.clearADM_EN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $01000000;
- end;
- procedure TUART3A_U3ASTA.setADM_EN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $01000000
- else
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- function TUART3A_U3ASTA.getADM_EN : TBits_1; inline;
- begin
- getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
- end;
- procedure TUART3A_U3ASTA.setURXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUART3A_U3ASTA.clearURXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUART3A_U3ASTA.setURXISEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUART3A_U3ASTA.getURXISEL0 : TBits_1; inline;
- begin
- getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUART3A_U3ASTA.setURXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUART3A_U3ASTA.clearURXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUART3A_U3ASTA.setURXISEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUART3A_U3ASTA.getURXISEL1 : TBits_1; inline;
- begin
- getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUART3A_U3ASTA.setUTXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TUART3A_U3ASTA.clearUTXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TUART3A_U3ASTA.setUTXISEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TUART3A_U3ASTA.getUTXISEL0 : TBits_1; inline;
- begin
- getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TUART3A_U3ASTA.setUTXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART3A_U3ASTA.clearUTXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART3A_U3ASTA.setUTXISEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART3A_U3ASTA.getUTXISEL1 : TBits_1; inline;
- begin
- getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART3A_U3ASTA.setUTXSEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TUART3A_U3ASTA.getUTXSEL : TBits_2; inline;
- begin
- getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TUART3A_U3ASTA.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TUART3A_U3ASTA.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUART5_U3BMODE.setSTSEL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUART5_U3BMODE.clearSTSEL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUART5_U3BMODE.setSTSEL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUART5_U3BMODE.getSTSEL : TBits_1; inline;
- begin
- getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUART5_U3BMODE.setPDSEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
- end;
- function TUART5_U3BMODE.getPDSEL : TBits_2; inline;
- begin
- getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
- end;
- procedure TUART5_U3BMODE.setBRGH; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUART5_U3BMODE.clearBRGH; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUART5_U3BMODE.setBRGH(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUART5_U3BMODE.getBRGH : TBits_1; inline;
- begin
- getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUART5_U3BMODE.setRXINV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUART5_U3BMODE.clearRXINV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUART5_U3BMODE.setRXINV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUART5_U3BMODE.getRXINV : TBits_1; inline;
- begin
- getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUART5_U3BMODE.setABAUD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUART5_U3BMODE.clearABAUD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUART5_U3BMODE.setABAUD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUART5_U3BMODE.getABAUD : TBits_1; inline;
- begin
- getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUART5_U3BMODE.setLPBACK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUART5_U3BMODE.clearLPBACK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUART5_U3BMODE.setLPBACK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUART5_U3BMODE.getLPBACK : TBits_1; inline;
- begin
- getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUART5_U3BMODE.setWAKE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUART5_U3BMODE.clearWAKE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUART5_U3BMODE.setWAKE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUART5_U3BMODE.getWAKE : TBits_1; inline;
- begin
- getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUART5_U3BMODE.setIREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TUART5_U3BMODE.clearIREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TUART5_U3BMODE.setIREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TUART5_U3BMODE.getIREN : TBits_1; inline;
- begin
- getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TUART5_U3BMODE.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART5_U3BMODE.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART5_U3BMODE.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART5_U3BMODE.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART5_U3BMODE.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART5_U3BMODE.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART5_U3BMODE.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART5_U3BMODE.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART5_U3BMODE.setPDSEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUART5_U3BMODE.clearPDSEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUART5_U3BMODE.setPDSEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUART5_U3BMODE.getPDSEL0 : TBits_1; inline;
- begin
- getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUART5_U3BMODE.setPDSEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUART5_U3BMODE.clearPDSEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUART5_U3BMODE.setPDSEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUART5_U3BMODE.getPDSEL1 : TBits_1; inline;
- begin
- getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUART5_U3BMODE.setUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART5_U3BMODE.clearUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART5_U3BMODE.setUSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART5_U3BMODE.getUSIDL : TBits_1; inline;
- begin
- getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART5_U3BMODE.setUARTEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART5_U3BMODE.clearUARTEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART5_U3BMODE.setUARTEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART5_U3BMODE.getUARTEN : TBits_1; inline;
- begin
- getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART5_U3BMODE.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TUART5_U3BMODE.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUART5_U5MODE.setSTSEL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUART5_U5MODE.clearSTSEL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUART5_U5MODE.setSTSEL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUART5_U5MODE.getSTSEL : TBits_1; inline;
- begin
- getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUART5_U5MODE.setPDSEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
- end;
- function TUART5_U5MODE.getPDSEL : TBits_2; inline;
- begin
- getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
- end;
- procedure TUART5_U5MODE.setBRGH; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUART5_U5MODE.clearBRGH; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUART5_U5MODE.setBRGH(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUART5_U5MODE.getBRGH : TBits_1; inline;
- begin
- getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUART5_U5MODE.setRXINV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUART5_U5MODE.clearRXINV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUART5_U5MODE.setRXINV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUART5_U5MODE.getRXINV : TBits_1; inline;
- begin
- getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUART5_U5MODE.setABAUD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUART5_U5MODE.clearABAUD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUART5_U5MODE.setABAUD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUART5_U5MODE.getABAUD : TBits_1; inline;
- begin
- getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUART5_U5MODE.setLPBACK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUART5_U5MODE.clearLPBACK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUART5_U5MODE.setLPBACK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUART5_U5MODE.getLPBACK : TBits_1; inline;
- begin
- getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUART5_U5MODE.setWAKE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUART5_U5MODE.clearWAKE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUART5_U5MODE.setWAKE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUART5_U5MODE.getWAKE : TBits_1; inline;
- begin
- getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUART5_U5MODE.setIREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TUART5_U5MODE.clearIREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TUART5_U5MODE.setIREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TUART5_U5MODE.getIREN : TBits_1; inline;
- begin
- getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TUART5_U5MODE.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART5_U5MODE.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART5_U5MODE.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART5_U5MODE.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART5_U5MODE.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART5_U5MODE.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART5_U5MODE.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART5_U5MODE.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART5_U5MODE.setPDSEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUART5_U5MODE.clearPDSEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUART5_U5MODE.setPDSEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUART5_U5MODE.getPDSEL0 : TBits_1; inline;
- begin
- getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUART5_U5MODE.setPDSEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUART5_U5MODE.clearPDSEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUART5_U5MODE.setPDSEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUART5_U5MODE.getPDSEL1 : TBits_1; inline;
- begin
- getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUART5_U5MODE.setUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART5_U5MODE.clearUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART5_U5MODE.setUSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART5_U5MODE.getUSIDL : TBits_1; inline;
- begin
- getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART5_U5MODE.setUARTEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART5_U5MODE.clearUARTEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART5_U5MODE.setUARTEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART5_U5MODE.getUARTEN : TBits_1; inline;
- begin
- getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART5_U5MODE.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TUART5_U5MODE.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUART5_U3BSTA.setURXDA; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUART5_U3BSTA.clearURXDA; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUART5_U3BSTA.setURXDA(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUART5_U3BSTA.getURXDA : TBits_1; inline;
- begin
- getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUART5_U3BSTA.setOERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUART5_U3BSTA.clearOERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUART5_U3BSTA.setOERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUART5_U3BSTA.getOERR : TBits_1; inline;
- begin
- getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUART5_U3BSTA.setFERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUART5_U3BSTA.clearFERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUART5_U3BSTA.setFERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUART5_U3BSTA.getFERR : TBits_1; inline;
- begin
- getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUART5_U3BSTA.setPERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUART5_U3BSTA.clearPERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUART5_U3BSTA.setPERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUART5_U3BSTA.getPERR : TBits_1; inline;
- begin
- getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUART5_U3BSTA.setRIDLE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUART5_U3BSTA.clearRIDLE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUART5_U3BSTA.setRIDLE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUART5_U3BSTA.getRIDLE : TBits_1; inline;
- begin
- getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUART5_U3BSTA.setADDEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUART5_U3BSTA.clearADDEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUART5_U3BSTA.setADDEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUART5_U3BSTA.getADDEN : TBits_1; inline;
- begin
- getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUART5_U3BSTA.setURXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
- end;
- function TUART5_U3BSTA.getURXISEL : TBits_2; inline;
- begin
- getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
- end;
- procedure TUART5_U3BSTA.setTRMT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TUART5_U3BSTA.clearTRMT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TUART5_U3BSTA.setTRMT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TUART5_U3BSTA.getTRMT : TBits_1; inline;
- begin
- getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TUART5_U3BSTA.setUTXBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TUART5_U3BSTA.clearUTXBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TUART5_U3BSTA.setUTXBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TUART5_U3BSTA.getUTXBF : TBits_1; inline;
- begin
- getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TUART5_U3BSTA.setUTXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TUART5_U3BSTA.clearUTXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TUART5_U3BSTA.setUTXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TUART5_U3BSTA.getUTXEN : TBits_1; inline;
- begin
- getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TUART5_U3BSTA.setUTXBRK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TUART5_U3BSTA.clearUTXBRK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TUART5_U3BSTA.setUTXBRK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TUART5_U3BSTA.getUTXBRK : TBits_1; inline;
- begin
- getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TUART5_U3BSTA.setURXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TUART5_U3BSTA.clearURXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TUART5_U3BSTA.setURXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TUART5_U3BSTA.getURXEN : TBits_1; inline;
- begin
- getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TUART5_U3BSTA.setUTXINV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART5_U3BSTA.clearUTXINV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART5_U3BSTA.setUTXINV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART5_U3BSTA.getUTXINV : TBits_1; inline;
- begin
- getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART5_U3BSTA.setUTXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TUART5_U3BSTA.getUTXISEL : TBits_2; inline;
- begin
- getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TUART5_U3BSTA.setADDR(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
- end;
- function TUART5_U3BSTA.getADDR : TBits_8; inline;
- begin
- getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
- end;
- procedure TUART5_U3BSTA.setADM_EN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- procedure TUART5_U3BSTA.clearADM_EN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $01000000;
- end;
- procedure TUART5_U3BSTA.setADM_EN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $01000000
- else
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- function TUART5_U3BSTA.getADM_EN : TBits_1; inline;
- begin
- getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
- end;
- procedure TUART5_U3BSTA.setURXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUART5_U3BSTA.clearURXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUART5_U3BSTA.setURXISEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUART5_U3BSTA.getURXISEL0 : TBits_1; inline;
- begin
- getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUART5_U3BSTA.setURXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUART5_U3BSTA.clearURXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUART5_U3BSTA.setURXISEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUART5_U3BSTA.getURXISEL1 : TBits_1; inline;
- begin
- getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUART5_U3BSTA.setUTXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TUART5_U3BSTA.clearUTXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TUART5_U3BSTA.setUTXISEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TUART5_U3BSTA.getUTXISEL0 : TBits_1; inline;
- begin
- getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TUART5_U3BSTA.setUTXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART5_U3BSTA.clearUTXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART5_U3BSTA.setUTXISEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART5_U3BSTA.getUTXISEL1 : TBits_1; inline;
- begin
- getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART5_U3BSTA.setUTXSEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TUART5_U3BSTA.getUTXSEL : TBits_2; inline;
- begin
- getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TUART5_U3BSTA.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TUART5_U3BSTA.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUART5_U5STA.setURXDA; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUART5_U5STA.clearURXDA; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUART5_U5STA.setURXDA(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUART5_U5STA.getURXDA : TBits_1; inline;
- begin
- getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUART5_U5STA.setOERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUART5_U5STA.clearOERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUART5_U5STA.setOERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUART5_U5STA.getOERR : TBits_1; inline;
- begin
- getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUART5_U5STA.setFERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUART5_U5STA.clearFERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUART5_U5STA.setFERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUART5_U5STA.getFERR : TBits_1; inline;
- begin
- getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUART5_U5STA.setPERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUART5_U5STA.clearPERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUART5_U5STA.setPERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUART5_U5STA.getPERR : TBits_1; inline;
- begin
- getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUART5_U5STA.setRIDLE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUART5_U5STA.clearRIDLE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUART5_U5STA.setRIDLE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUART5_U5STA.getRIDLE : TBits_1; inline;
- begin
- getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUART5_U5STA.setADDEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUART5_U5STA.clearADDEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUART5_U5STA.setADDEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUART5_U5STA.getADDEN : TBits_1; inline;
- begin
- getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUART5_U5STA.setURXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
- end;
- function TUART5_U5STA.getURXISEL : TBits_2; inline;
- begin
- getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
- end;
- procedure TUART5_U5STA.setTRMT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TUART5_U5STA.clearTRMT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TUART5_U5STA.setTRMT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TUART5_U5STA.getTRMT : TBits_1; inline;
- begin
- getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TUART5_U5STA.setUTXBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TUART5_U5STA.clearUTXBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TUART5_U5STA.setUTXBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TUART5_U5STA.getUTXBF : TBits_1; inline;
- begin
- getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TUART5_U5STA.setUTXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TUART5_U5STA.clearUTXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TUART5_U5STA.setUTXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TUART5_U5STA.getUTXEN : TBits_1; inline;
- begin
- getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TUART5_U5STA.setUTXBRK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TUART5_U5STA.clearUTXBRK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TUART5_U5STA.setUTXBRK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TUART5_U5STA.getUTXBRK : TBits_1; inline;
- begin
- getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TUART5_U5STA.setURXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TUART5_U5STA.clearURXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TUART5_U5STA.setURXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TUART5_U5STA.getURXEN : TBits_1; inline;
- begin
- getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TUART5_U5STA.setUTXINV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART5_U5STA.clearUTXINV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART5_U5STA.setUTXINV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART5_U5STA.getUTXINV : TBits_1; inline;
- begin
- getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART5_U5STA.setUTXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TUART5_U5STA.getUTXISEL : TBits_2; inline;
- begin
- getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TUART5_U5STA.setADDR(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
- end;
- function TUART5_U5STA.getADDR : TBits_8; inline;
- begin
- getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
- end;
- procedure TUART5_U5STA.setADM_EN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- procedure TUART5_U5STA.clearADM_EN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $01000000;
- end;
- procedure TUART5_U5STA.setADM_EN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $01000000
- else
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- function TUART5_U5STA.getADM_EN : TBits_1; inline;
- begin
- getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
- end;
- procedure TUART5_U5STA.setURXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUART5_U5STA.clearURXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUART5_U5STA.setURXISEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUART5_U5STA.getURXISEL0 : TBits_1; inline;
- begin
- getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUART5_U5STA.setURXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUART5_U5STA.clearURXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUART5_U5STA.setURXISEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUART5_U5STA.getURXISEL1 : TBits_1; inline;
- begin
- getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUART5_U5STA.setUTXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TUART5_U5STA.clearUTXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TUART5_U5STA.setUTXISEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TUART5_U5STA.getUTXISEL0 : TBits_1; inline;
- begin
- getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TUART5_U5STA.setUTXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART5_U5STA.clearUTXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART5_U5STA.setUTXISEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART5_U5STA.getUTXISEL1 : TBits_1; inline;
- begin
- getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART5_U5STA.setUTXSEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TUART5_U5STA.getUTXSEL : TBits_2; inline;
- begin
- getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TUART5_U5STA.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TUART5_U5STA.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPMP_PMCON.setRDSP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPMP_PMCON.clearRDSP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPMP_PMCON.setRDSP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPMP_PMCON.getRDSP : TBits_1; inline;
- begin
- getRDSP := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPMP_PMCON.setWRSP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPMP_PMCON.clearWRSP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPMP_PMCON.setWRSP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPMP_PMCON.getWRSP : TBits_1; inline;
- begin
- getWRSP := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPMP_PMCON.setCS1P; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPMP_PMCON.clearCS1P; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPMP_PMCON.setCS1P(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPMP_PMCON.getCS1P : TBits_1; inline;
- begin
- getCS1P := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPMP_PMCON.setCS2P; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPMP_PMCON.clearCS2P; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPMP_PMCON.setCS2P(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPMP_PMCON.getCS2P : TBits_1; inline;
- begin
- getCS2P := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPMP_PMCON.setALP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TPMP_PMCON.clearALP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TPMP_PMCON.setALP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TPMP_PMCON.getALP : TBits_1; inline;
- begin
- getALP := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TPMP_PMCON.setCSF(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
- end;
- function TPMP_PMCON.getCSF : TBits_2; inline;
- begin
- getCSF := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
- end;
- procedure TPMP_PMCON.setPTRDEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TPMP_PMCON.clearPTRDEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TPMP_PMCON.setPTRDEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TPMP_PMCON.getPTRDEN : TBits_1; inline;
- begin
- getPTRDEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TPMP_PMCON.setPTWREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TPMP_PMCON.clearPTWREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TPMP_PMCON.setPTWREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TPMP_PMCON.getPTWREN : TBits_1; inline;
- begin
- getPTWREN := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TPMP_PMCON.setPMPTTL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TPMP_PMCON.clearPMPTTL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TPMP_PMCON.setPMPTTL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TPMP_PMCON.getPMPTTL : TBits_1; inline;
- begin
- getPMPTTL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TPMP_PMCON.setADRMUX(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE7FF or ( thebits shl 11 );
- end;
- function TPMP_PMCON.getADRMUX : TBits_2; inline;
- begin
- getADRMUX := (pTDefRegMap(@Self)^.val and $00001800) shr 11;
- end;
- procedure TPMP_PMCON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPMP_PMCON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPMP_PMCON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPMP_PMCON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPMP_PMCON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPMP_PMCON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPMP_PMCON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPMP_PMCON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPMP_PMCON.setCSF0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TPMP_PMCON.clearCSF0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TPMP_PMCON.setCSF0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TPMP_PMCON.getCSF0 : TBits_1; inline;
- begin
- getCSF0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TPMP_PMCON.setCSF1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TPMP_PMCON.clearCSF1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TPMP_PMCON.setCSF1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TPMP_PMCON.getCSF1 : TBits_1; inline;
- begin
- getCSF1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TPMP_PMCON.setADRMUX0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TPMP_PMCON.clearADRMUX0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TPMP_PMCON.setADRMUX0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TPMP_PMCON.getADRMUX0 : TBits_1; inline;
- begin
- getADRMUX0 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TPMP_PMCON.setADRMUX1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TPMP_PMCON.clearADRMUX1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TPMP_PMCON.setADRMUX1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TPMP_PMCON.getADRMUX1 : TBits_1; inline;
- begin
- getADRMUX1 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TPMP_PMCON.setPSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPMP_PMCON.clearPSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPMP_PMCON.setPSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPMP_PMCON.getPSIDL : TBits_1; inline;
- begin
- getPSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPMP_PMCON.setPMPEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPMP_PMCON.clearPMPEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPMP_PMCON.setPMPEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPMP_PMCON.getPMPEN : TBits_1; inline;
- begin
- getPMPEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPMP_PMCON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPMP_PMCON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPMP_PMMODE.setWAITE(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TPMP_PMMODE.getWAITE : TBits_2; inline;
- begin
- getWAITE := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TPMP_PMMODE.setWAITM(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC3 or ( thebits shl 2 );
- end;
- function TPMP_PMMODE.getWAITM : TBits_4; inline;
- begin
- getWAITM := (pTDefRegMap(@Self)^.val and $0000003C) shr 2;
- end;
- procedure TPMP_PMMODE.setWAITB(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
- end;
- function TPMP_PMMODE.getWAITB : TBits_2; inline;
- begin
- getWAITB := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
- end;
- procedure TPMP_PMMODE.setMODE(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
- end;
- function TPMP_PMMODE.getMODE : TBits_2; inline;
- begin
- getMODE := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
- end;
- procedure TPMP_PMMODE.setMODE16; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TPMP_PMMODE.clearMODE16; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TPMP_PMMODE.setMODE16(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TPMP_PMMODE.getMODE16 : TBits_1; inline;
- begin
- getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TPMP_PMMODE.setINCM(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE7FF or ( thebits shl 11 );
- end;
- function TPMP_PMMODE.getINCM : TBits_2; inline;
- begin
- getINCM := (pTDefRegMap(@Self)^.val and $00001800) shr 11;
- end;
- procedure TPMP_PMMODE.setIRQM(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
- end;
- function TPMP_PMMODE.getIRQM : TBits_2; inline;
- begin
- getIRQM := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
- end;
- procedure TPMP_PMMODE.setBUSY; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPMP_PMMODE.clearBUSY; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPMP_PMMODE.setBUSY(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPMP_PMMODE.getBUSY : TBits_1; inline;
- begin
- getBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPMP_PMMODE.setWAITE0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPMP_PMMODE.clearWAITE0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPMP_PMMODE.setWAITE0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPMP_PMMODE.getWAITE0 : TBits_1; inline;
- begin
- getWAITE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPMP_PMMODE.setWAITE1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPMP_PMMODE.clearWAITE1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPMP_PMMODE.setWAITE1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPMP_PMMODE.getWAITE1 : TBits_1; inline;
- begin
- getWAITE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPMP_PMMODE.setWAITM0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPMP_PMMODE.clearWAITM0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPMP_PMMODE.setWAITM0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPMP_PMMODE.getWAITM0 : TBits_1; inline;
- begin
- getWAITM0 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPMP_PMMODE.setWAITM1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPMP_PMMODE.clearWAITM1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPMP_PMMODE.setWAITM1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPMP_PMMODE.getWAITM1 : TBits_1; inline;
- begin
- getWAITM1 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPMP_PMMODE.setWAITM2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPMP_PMMODE.clearWAITM2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPMP_PMMODE.setWAITM2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPMP_PMMODE.getWAITM2 : TBits_1; inline;
- begin
- getWAITM2 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPMP_PMMODE.setWAITM3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TPMP_PMMODE.clearWAITM3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TPMP_PMMODE.setWAITM3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TPMP_PMMODE.getWAITM3 : TBits_1; inline;
- begin
- getWAITM3 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TPMP_PMMODE.setWAITB0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TPMP_PMMODE.clearWAITB0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TPMP_PMMODE.setWAITB0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TPMP_PMMODE.getWAITB0 : TBits_1; inline;
- begin
- getWAITB0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TPMP_PMMODE.setWAITB1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TPMP_PMMODE.clearWAITB1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TPMP_PMMODE.setWAITB1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TPMP_PMMODE.getWAITB1 : TBits_1; inline;
- begin
- getWAITB1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TPMP_PMMODE.setMODE0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TPMP_PMMODE.clearMODE0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TPMP_PMMODE.setMODE0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TPMP_PMMODE.getMODE0 : TBits_1; inline;
- begin
- getMODE0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TPMP_PMMODE.setMODE1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TPMP_PMMODE.clearMODE1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TPMP_PMMODE.setMODE1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TPMP_PMMODE.getMODE1 : TBits_1; inline;
- begin
- getMODE1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TPMP_PMMODE.setINCM0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TPMP_PMMODE.clearINCM0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TPMP_PMMODE.setINCM0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TPMP_PMMODE.getINCM0 : TBits_1; inline;
- begin
- getINCM0 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TPMP_PMMODE.setINCM1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TPMP_PMMODE.clearINCM1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TPMP_PMMODE.setINCM1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TPMP_PMMODE.getINCM1 : TBits_1; inline;
- begin
- getINCM1 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TPMP_PMMODE.setIRQM0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPMP_PMMODE.clearIRQM0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPMP_PMMODE.setIRQM0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPMP_PMMODE.getIRQM0 : TBits_1; inline;
- begin
- getIRQM0 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPMP_PMMODE.setIRQM1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TPMP_PMMODE.clearIRQM1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TPMP_PMMODE.setIRQM1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TPMP_PMMODE.getIRQM1 : TBits_1; inline;
- begin
- getIRQM1 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TPMP_PMMODE.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPMP_PMMODE.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPMP_PMADDR.setADDR(thebits : TBits_14); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFC000 or ( thebits shl 0 );
- end;
- function TPMP_PMADDR.getADDR : TBits_14; inline;
- begin
- getADDR := (pTDefRegMap(@Self)^.val and $00003FFF) shr 0;
- end;
- procedure TPMP_PMADDR.setCS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TPMP_PMADDR.getCS : TBits_2; inline;
- begin
- getCS := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TPMP_PMADDR.setPADDR(thebits : TBits_14); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFC000 or ( thebits shl 0 );
- end;
- function TPMP_PMADDR.getPADDR : TBits_14; inline;
- begin
- getPADDR := (pTDefRegMap(@Self)^.val and $00003FFF) shr 0;
- end;
- procedure TPMP_PMADDR.setCS1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TPMP_PMADDR.clearCS1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TPMP_PMADDR.setCS1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TPMP_PMADDR.getCS1 : TBits_1; inline;
- begin
- getCS1 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TPMP_PMADDR.setCS2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPMP_PMADDR.clearCS2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPMP_PMADDR.setCS2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPMP_PMADDR.getCS2 : TBits_1; inline;
- begin
- getCS2 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPMP_PMADDR.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPMP_PMADDR.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPMP_PMDOUT.setDATAOUT(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPMP_PMDOUT.getDATAOUT : TBits_32; inline;
- begin
- getDATAOUT := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPMP_PMDOUT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPMP_PMDOUT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPMP_PMDIN.setDATAIN(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPMP_PMDIN.getDATAIN : TBits_32; inline;
- begin
- getDATAIN := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPMP_PMDIN.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPMP_PMDIN.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPMP_PMAEN.setPTEN(thebits : TBits_16); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
- end;
- function TPMP_PMAEN.getPTEN : TBits_16; inline;
- begin
- getPTEN := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
- end;
- procedure TPMP_PMAEN.setPTEN0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPMP_PMAEN.clearPTEN0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPMP_PMAEN.setPTEN0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPMP_PMAEN.getPTEN0 : TBits_1; inline;
- begin
- getPTEN0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPMP_PMAEN.setPTEN1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPMP_PMAEN.clearPTEN1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPMP_PMAEN.setPTEN1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPMP_PMAEN.getPTEN1 : TBits_1; inline;
- begin
- getPTEN1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPMP_PMAEN.setPTEN2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPMP_PMAEN.clearPTEN2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPMP_PMAEN.setPTEN2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPMP_PMAEN.getPTEN2 : TBits_1; inline;
- begin
- getPTEN2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPMP_PMAEN.setPTEN3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPMP_PMAEN.clearPTEN3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPMP_PMAEN.setPTEN3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPMP_PMAEN.getPTEN3 : TBits_1; inline;
- begin
- getPTEN3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPMP_PMAEN.setPTEN4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPMP_PMAEN.clearPTEN4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPMP_PMAEN.setPTEN4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPMP_PMAEN.getPTEN4 : TBits_1; inline;
- begin
- getPTEN4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPMP_PMAEN.setPTEN5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TPMP_PMAEN.clearPTEN5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TPMP_PMAEN.setPTEN5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TPMP_PMAEN.getPTEN5 : TBits_1; inline;
- begin
- getPTEN5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TPMP_PMAEN.setPTEN6; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TPMP_PMAEN.clearPTEN6; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TPMP_PMAEN.setPTEN6(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TPMP_PMAEN.getPTEN6 : TBits_1; inline;
- begin
- getPTEN6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TPMP_PMAEN.setPTEN7; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TPMP_PMAEN.clearPTEN7; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TPMP_PMAEN.setPTEN7(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TPMP_PMAEN.getPTEN7 : TBits_1; inline;
- begin
- getPTEN7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TPMP_PMAEN.setPTEN8; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TPMP_PMAEN.clearPTEN8; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TPMP_PMAEN.setPTEN8(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TPMP_PMAEN.getPTEN8 : TBits_1; inline;
- begin
- getPTEN8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TPMP_PMAEN.setPTEN9; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TPMP_PMAEN.clearPTEN9; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TPMP_PMAEN.setPTEN9(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TPMP_PMAEN.getPTEN9 : TBits_1; inline;
- begin
- getPTEN9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TPMP_PMAEN.setPTEN10; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TPMP_PMAEN.clearPTEN10; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TPMP_PMAEN.setPTEN10(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TPMP_PMAEN.getPTEN10 : TBits_1; inline;
- begin
- getPTEN10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TPMP_PMAEN.setPTEN11; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TPMP_PMAEN.clearPTEN11; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TPMP_PMAEN.setPTEN11(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TPMP_PMAEN.getPTEN11 : TBits_1; inline;
- begin
- getPTEN11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TPMP_PMAEN.setPTEN12; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TPMP_PMAEN.clearPTEN12; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TPMP_PMAEN.setPTEN12(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TPMP_PMAEN.getPTEN12 : TBits_1; inline;
- begin
- getPTEN12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TPMP_PMAEN.setPTEN13; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPMP_PMAEN.clearPTEN13; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPMP_PMAEN.setPTEN13(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPMP_PMAEN.getPTEN13 : TBits_1; inline;
- begin
- getPTEN13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPMP_PMAEN.setPTEN14; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TPMP_PMAEN.clearPTEN14; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TPMP_PMAEN.setPTEN14(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TPMP_PMAEN.getPTEN14 : TBits_1; inline;
- begin
- getPTEN14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TPMP_PMAEN.setPTEN15; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPMP_PMAEN.clearPTEN15; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPMP_PMAEN.setPTEN15(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPMP_PMAEN.getPTEN15 : TBits_1; inline;
- begin
- getPTEN15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPMP_PMAEN.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPMP_PMAEN.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPMP_PMSTAT.setOB0E; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPMP_PMSTAT.clearOB0E; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPMP_PMSTAT.setOB0E(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPMP_PMSTAT.getOB0E : TBits_1; inline;
- begin
- getOB0E := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPMP_PMSTAT.setOB1E; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPMP_PMSTAT.clearOB1E; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPMP_PMSTAT.setOB1E(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPMP_PMSTAT.getOB1E : TBits_1; inline;
- begin
- getOB1E := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPMP_PMSTAT.setOB2E; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPMP_PMSTAT.clearOB2E; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPMP_PMSTAT.setOB2E(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPMP_PMSTAT.getOB2E : TBits_1; inline;
- begin
- getOB2E := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPMP_PMSTAT.setOB3E; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPMP_PMSTAT.clearOB3E; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPMP_PMSTAT.setOB3E(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPMP_PMSTAT.getOB3E : TBits_1; inline;
- begin
- getOB3E := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPMP_PMSTAT.setOBUF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TPMP_PMSTAT.clearOBUF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TPMP_PMSTAT.setOBUF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TPMP_PMSTAT.getOBUF : TBits_1; inline;
- begin
- getOBUF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TPMP_PMSTAT.setOBE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TPMP_PMSTAT.clearOBE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TPMP_PMSTAT.setOBE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TPMP_PMSTAT.getOBE : TBits_1; inline;
- begin
- getOBE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TPMP_PMSTAT.setIB0F; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TPMP_PMSTAT.clearIB0F; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TPMP_PMSTAT.setIB0F(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TPMP_PMSTAT.getIB0F : TBits_1; inline;
- begin
- getIB0F := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TPMP_PMSTAT.setIB1F; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TPMP_PMSTAT.clearIB1F; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TPMP_PMSTAT.setIB1F(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TPMP_PMSTAT.getIB1F : TBits_1; inline;
- begin
- getIB1F := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TPMP_PMSTAT.setIB2F; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TPMP_PMSTAT.clearIB2F; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TPMP_PMSTAT.setIB2F(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TPMP_PMSTAT.getIB2F : TBits_1; inline;
- begin
- getIB2F := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TPMP_PMSTAT.setIB3F; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TPMP_PMSTAT.clearIB3F; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TPMP_PMSTAT.setIB3F(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TPMP_PMSTAT.getIB3F : TBits_1; inline;
- begin
- getIB3F := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TPMP_PMSTAT.setIBOV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TPMP_PMSTAT.clearIBOV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TPMP_PMSTAT.setIBOV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TPMP_PMSTAT.getIBOV : TBits_1; inline;
- begin
- getIBOV := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TPMP_PMSTAT.setIBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPMP_PMSTAT.clearIBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPMP_PMSTAT.setIBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPMP_PMSTAT.getIBF : TBits_1; inline;
- begin
- getIBF := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPMP_PMSTAT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPMP_PMSTAT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TADC10_AD1CON1.setDONE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TADC10_AD1CON1.clearDONE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TADC10_AD1CON1.setDONE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TADC10_AD1CON1.getDONE : TBits_1; inline;
- begin
- getDONE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TADC10_AD1CON1.setSAMP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TADC10_AD1CON1.clearSAMP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TADC10_AD1CON1.setSAMP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TADC10_AD1CON1.getSAMP : TBits_1; inline;
- begin
- getSAMP := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TADC10_AD1CON1.setASAM; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TADC10_AD1CON1.clearASAM; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TADC10_AD1CON1.setASAM(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TADC10_AD1CON1.getASAM : TBits_1; inline;
- begin
- getASAM := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TADC10_AD1CON1.setCLRASAM; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TADC10_AD1CON1.clearCLRASAM; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TADC10_AD1CON1.setCLRASAM(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TADC10_AD1CON1.getCLRASAM : TBits_1; inline;
- begin
- getCLRASAM := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TADC10_AD1CON1.setSSRC(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF1F or ( thebits shl 5 );
- end;
- function TADC10_AD1CON1.getSSRC : TBits_3; inline;
- begin
- getSSRC := (pTDefRegMap(@Self)^.val and $000000E0) shr 5;
- end;
- procedure TADC10_AD1CON1.setFORM(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF8FF or ( thebits shl 8 );
- end;
- function TADC10_AD1CON1.getFORM : TBits_3; inline;
- begin
- getFORM := (pTDefRegMap(@Self)^.val and $00000700) shr 8;
- end;
- procedure TADC10_AD1CON1.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TADC10_AD1CON1.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TADC10_AD1CON1.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TADC10_AD1CON1.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TADC10_AD1CON1.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TADC10_AD1CON1.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TADC10_AD1CON1.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TADC10_AD1CON1.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TADC10_AD1CON1.setSSRC0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TADC10_AD1CON1.clearSSRC0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TADC10_AD1CON1.setSSRC0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TADC10_AD1CON1.getSSRC0 : TBits_1; inline;
- begin
- getSSRC0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TADC10_AD1CON1.setSSRC1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TADC10_AD1CON1.clearSSRC1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TADC10_AD1CON1.setSSRC1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TADC10_AD1CON1.getSSRC1 : TBits_1; inline;
- begin
- getSSRC1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TADC10_AD1CON1.setSSRC2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TADC10_AD1CON1.clearSSRC2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TADC10_AD1CON1.setSSRC2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TADC10_AD1CON1.getSSRC2 : TBits_1; inline;
- begin
- getSSRC2 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TADC10_AD1CON1.setFORM0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TADC10_AD1CON1.clearFORM0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TADC10_AD1CON1.setFORM0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TADC10_AD1CON1.getFORM0 : TBits_1; inline;
- begin
- getFORM0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TADC10_AD1CON1.setFORM1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TADC10_AD1CON1.clearFORM1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TADC10_AD1CON1.setFORM1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TADC10_AD1CON1.getFORM1 : TBits_1; inline;
- begin
- getFORM1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TADC10_AD1CON1.setFORM2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TADC10_AD1CON1.clearFORM2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TADC10_AD1CON1.setFORM2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TADC10_AD1CON1.getFORM2 : TBits_1; inline;
- begin
- getFORM2 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TADC10_AD1CON1.setADSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TADC10_AD1CON1.clearADSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TADC10_AD1CON1.setADSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TADC10_AD1CON1.getADSIDL : TBits_1; inline;
- begin
- getADSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TADC10_AD1CON1.setADON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TADC10_AD1CON1.clearADON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TADC10_AD1CON1.setADON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TADC10_AD1CON1.getADON : TBits_1; inline;
- begin
- getADON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TADC10_AD1CON1.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TADC10_AD1CON1.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TADC10_AD1CON2.setALTS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TADC10_AD1CON2.clearALTS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TADC10_AD1CON2.setALTS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TADC10_AD1CON2.getALTS : TBits_1; inline;
- begin
- getALTS := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TADC10_AD1CON2.setBUFM; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TADC10_AD1CON2.clearBUFM; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TADC10_AD1CON2.setBUFM(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TADC10_AD1CON2.getBUFM : TBits_1; inline;
- begin
- getBUFM := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TADC10_AD1CON2.setSMPI(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC3 or ( thebits shl 2 );
- end;
- function TADC10_AD1CON2.getSMPI : TBits_4; inline;
- begin
- getSMPI := (pTDefRegMap(@Self)^.val and $0000003C) shr 2;
- end;
- procedure TADC10_AD1CON2.setBUFS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TADC10_AD1CON2.clearBUFS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TADC10_AD1CON2.setBUFS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TADC10_AD1CON2.getBUFS : TBits_1; inline;
- begin
- getBUFS := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TADC10_AD1CON2.setCSCNA; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TADC10_AD1CON2.clearCSCNA; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TADC10_AD1CON2.setCSCNA(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TADC10_AD1CON2.getCSCNA : TBits_1; inline;
- begin
- getCSCNA := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TADC10_AD1CON2.setOFFCAL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TADC10_AD1CON2.clearOFFCAL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TADC10_AD1CON2.setOFFCAL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TADC10_AD1CON2.getOFFCAL : TBits_1; inline;
- begin
- getOFFCAL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TADC10_AD1CON2.setVCFG(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF1FFF or ( thebits shl 13 );
- end;
- function TADC10_AD1CON2.getVCFG : TBits_3; inline;
- begin
- getVCFG := (pTDefRegMap(@Self)^.val and $0000E000) shr 13;
- end;
- procedure TADC10_AD1CON2.setSMPI0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TADC10_AD1CON2.clearSMPI0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TADC10_AD1CON2.setSMPI0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TADC10_AD1CON2.getSMPI0 : TBits_1; inline;
- begin
- getSMPI0 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TADC10_AD1CON2.setSMPI1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TADC10_AD1CON2.clearSMPI1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TADC10_AD1CON2.setSMPI1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TADC10_AD1CON2.getSMPI1 : TBits_1; inline;
- begin
- getSMPI1 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TADC10_AD1CON2.setSMPI2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TADC10_AD1CON2.clearSMPI2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TADC10_AD1CON2.setSMPI2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TADC10_AD1CON2.getSMPI2 : TBits_1; inline;
- begin
- getSMPI2 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TADC10_AD1CON2.setSMPI3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TADC10_AD1CON2.clearSMPI3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TADC10_AD1CON2.setSMPI3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TADC10_AD1CON2.getSMPI3 : TBits_1; inline;
- begin
- getSMPI3 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TADC10_AD1CON2.setVCFG0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TADC10_AD1CON2.clearVCFG0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TADC10_AD1CON2.setVCFG0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TADC10_AD1CON2.getVCFG0 : TBits_1; inline;
- begin
- getVCFG0 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TADC10_AD1CON2.setVCFG1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TADC10_AD1CON2.clearVCFG1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TADC10_AD1CON2.setVCFG1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TADC10_AD1CON2.getVCFG1 : TBits_1; inline;
- begin
- getVCFG1 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TADC10_AD1CON2.setVCFG2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TADC10_AD1CON2.clearVCFG2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TADC10_AD1CON2.setVCFG2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TADC10_AD1CON2.getVCFG2 : TBits_1; inline;
- begin
- getVCFG2 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TADC10_AD1CON2.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TADC10_AD1CON2.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TADC10_AD1CON3.setADCS(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
- end;
- function TADC10_AD1CON3.getADCS : TBits_8; inline;
- begin
- getADCS := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
- end;
- procedure TADC10_AD1CON3.setSAMC(thebits : TBits_5); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
- end;
- function TADC10_AD1CON3.getSAMC : TBits_5; inline;
- begin
- getSAMC := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
- end;
- procedure TADC10_AD1CON3.setADRC; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TADC10_AD1CON3.clearADRC; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TADC10_AD1CON3.setADRC(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TADC10_AD1CON3.getADRC : TBits_1; inline;
- begin
- getADRC := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TADC10_AD1CON3.setADCS0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TADC10_AD1CON3.clearADCS0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TADC10_AD1CON3.setADCS0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TADC10_AD1CON3.getADCS0 : TBits_1; inline;
- begin
- getADCS0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TADC10_AD1CON3.setADCS1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TADC10_AD1CON3.clearADCS1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TADC10_AD1CON3.setADCS1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TADC10_AD1CON3.getADCS1 : TBits_1; inline;
- begin
- getADCS1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TADC10_AD1CON3.setADCS2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TADC10_AD1CON3.clearADCS2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TADC10_AD1CON3.setADCS2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TADC10_AD1CON3.getADCS2 : TBits_1; inline;
- begin
- getADCS2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TADC10_AD1CON3.setADCS3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TADC10_AD1CON3.clearADCS3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TADC10_AD1CON3.setADCS3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TADC10_AD1CON3.getADCS3 : TBits_1; inline;
- begin
- getADCS3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TADC10_AD1CON3.setADCS4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TADC10_AD1CON3.clearADCS4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TADC10_AD1CON3.setADCS4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TADC10_AD1CON3.getADCS4 : TBits_1; inline;
- begin
- getADCS4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TADC10_AD1CON3.setADCS5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TADC10_AD1CON3.clearADCS5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TADC10_AD1CON3.setADCS5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TADC10_AD1CON3.getADCS5 : TBits_1; inline;
- begin
- getADCS5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TADC10_AD1CON3.setADCS6; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TADC10_AD1CON3.clearADCS6; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TADC10_AD1CON3.setADCS6(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TADC10_AD1CON3.getADCS6 : TBits_1; inline;
- begin
- getADCS6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TADC10_AD1CON3.setADCS7; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TADC10_AD1CON3.clearADCS7; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TADC10_AD1CON3.setADCS7(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TADC10_AD1CON3.getADCS7 : TBits_1; inline;
- begin
- getADCS7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TADC10_AD1CON3.setSAMC0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TADC10_AD1CON3.clearSAMC0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TADC10_AD1CON3.setSAMC0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TADC10_AD1CON3.getSAMC0 : TBits_1; inline;
- begin
- getSAMC0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TADC10_AD1CON3.setSAMC1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TADC10_AD1CON3.clearSAMC1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TADC10_AD1CON3.setSAMC1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TADC10_AD1CON3.getSAMC1 : TBits_1; inline;
- begin
- getSAMC1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TADC10_AD1CON3.setSAMC2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TADC10_AD1CON3.clearSAMC2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TADC10_AD1CON3.setSAMC2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TADC10_AD1CON3.getSAMC2 : TBits_1; inline;
- begin
- getSAMC2 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TADC10_AD1CON3.setSAMC3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TADC10_AD1CON3.clearSAMC3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TADC10_AD1CON3.setSAMC3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TADC10_AD1CON3.getSAMC3 : TBits_1; inline;
- begin
- getSAMC3 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TADC10_AD1CON3.setSAMC4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TADC10_AD1CON3.clearSAMC4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TADC10_AD1CON3.setSAMC4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TADC10_AD1CON3.getSAMC4 : TBits_1; inline;
- begin
- getSAMC4 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TADC10_AD1CON3.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TADC10_AD1CON3.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TADC10_AD1CHS.setCH0SA(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF0FFFF or ( thebits shl 16 );
- end;
- function TADC10_AD1CHS.getCH0SA : TBits_4; inline;
- begin
- getCH0SA := (pTDefRegMap(@Self)^.val and $000F0000) shr 16;
- end;
- procedure TADC10_AD1CHS.setCH0NA; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- procedure TADC10_AD1CHS.clearCH0NA; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00800000;
- end;
- procedure TADC10_AD1CHS.setCH0NA(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00800000
- else
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- function TADC10_AD1CHS.getCH0NA : TBits_1; inline;
- begin
- getCH0NA := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
- end;
- procedure TADC10_AD1CHS.setCH0SB(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F0FFFFFF or ( thebits shl 24 );
- end;
- function TADC10_AD1CHS.getCH0SB : TBits_4; inline;
- begin
- getCH0SB := (pTDefRegMap(@Self)^.val and $0F000000) shr 24;
- end;
- procedure TADC10_AD1CHS.setCH0NB; inline;
- begin
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- procedure TADC10_AD1CHS.clearCH0NB; inline;
- begin
- pTDefRegMap(@Self)^.clr := $80000000;
- end;
- procedure TADC10_AD1CHS.setCH0NB(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $80000000
- else
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- function TADC10_AD1CHS.getCH0NB : TBits_1; inline;
- begin
- getCH0NB := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
- end;
- procedure TADC10_AD1CHS.setCH0SA0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- procedure TADC10_AD1CHS.clearCH0SA0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00010000;
- end;
- procedure TADC10_AD1CHS.setCH0SA0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00010000
- else
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- function TADC10_AD1CHS.getCH0SA0 : TBits_1; inline;
- begin
- getCH0SA0 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
- end;
- procedure TADC10_AD1CHS.setCH0SA1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- procedure TADC10_AD1CHS.clearCH0SA1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00020000;
- end;
- procedure TADC10_AD1CHS.setCH0SA1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00020000
- else
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- function TADC10_AD1CHS.getCH0SA1 : TBits_1; inline;
- begin
- getCH0SA1 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
- end;
- procedure TADC10_AD1CHS.setCH0SA2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- procedure TADC10_AD1CHS.clearCH0SA2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00040000;
- end;
- procedure TADC10_AD1CHS.setCH0SA2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00040000
- else
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- function TADC10_AD1CHS.getCH0SA2 : TBits_1; inline;
- begin
- getCH0SA2 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
- end;
- procedure TADC10_AD1CHS.setCH0SA3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- procedure TADC10_AD1CHS.clearCH0SA3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00080000;
- end;
- procedure TADC10_AD1CHS.setCH0SA3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00080000
- else
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- function TADC10_AD1CHS.getCH0SA3 : TBits_1; inline;
- begin
- getCH0SA3 := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
- end;
- procedure TADC10_AD1CHS.setCH0SB0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- procedure TADC10_AD1CHS.clearCH0SB0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $01000000;
- end;
- procedure TADC10_AD1CHS.setCH0SB0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $01000000
- else
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- function TADC10_AD1CHS.getCH0SB0 : TBits_1; inline;
- begin
- getCH0SB0 := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
- end;
- procedure TADC10_AD1CHS.setCH0SB1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $02000000;
- end;
- procedure TADC10_AD1CHS.clearCH0SB1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $02000000;
- end;
- procedure TADC10_AD1CHS.setCH0SB1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $02000000
- else
- pTDefRegMap(@Self)^.&set := $02000000;
- end;
- function TADC10_AD1CHS.getCH0SB1 : TBits_1; inline;
- begin
- getCH0SB1 := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
- end;
- procedure TADC10_AD1CHS.setCH0SB2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- procedure TADC10_AD1CHS.clearCH0SB2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $04000000;
- end;
- procedure TADC10_AD1CHS.setCH0SB2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $04000000
- else
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- function TADC10_AD1CHS.getCH0SB2 : TBits_1; inline;
- begin
- getCH0SB2 := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
- end;
- procedure TADC10_AD1CHS.setCH0SB3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- procedure TADC10_AD1CHS.clearCH0SB3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $08000000;
- end;
- procedure TADC10_AD1CHS.setCH0SB3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $08000000
- else
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- function TADC10_AD1CHS.getCH0SB3 : TBits_1; inline;
- begin
- getCH0SB3 := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
- end;
- procedure TADC10_AD1CHS.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TADC10_AD1CHS.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TADC10_AD1CSSL.setCSSL(thebits : TBits_16); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
- end;
- function TADC10_AD1CSSL.getCSSL : TBits_16; inline;
- begin
- getCSSL := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
- end;
- procedure TADC10_AD1CSSL.setCSSL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TADC10_AD1CSSL.clearCSSL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TADC10_AD1CSSL.setCSSL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TADC10_AD1CSSL.getCSSL0 : TBits_1; inline;
- begin
- getCSSL0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TADC10_AD1CSSL.setCSSL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TADC10_AD1CSSL.clearCSSL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TADC10_AD1CSSL.setCSSL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TADC10_AD1CSSL.getCSSL1 : TBits_1; inline;
- begin
- getCSSL1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TADC10_AD1CSSL.setCSSL2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TADC10_AD1CSSL.clearCSSL2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TADC10_AD1CSSL.setCSSL2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TADC10_AD1CSSL.getCSSL2 : TBits_1; inline;
- begin
- getCSSL2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TADC10_AD1CSSL.setCSSL3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TADC10_AD1CSSL.clearCSSL3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TADC10_AD1CSSL.setCSSL3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TADC10_AD1CSSL.getCSSL3 : TBits_1; inline;
- begin
- getCSSL3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TADC10_AD1CSSL.setCSSL4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TADC10_AD1CSSL.clearCSSL4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TADC10_AD1CSSL.setCSSL4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TADC10_AD1CSSL.getCSSL4 : TBits_1; inline;
- begin
- getCSSL4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TADC10_AD1CSSL.setCSSL5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TADC10_AD1CSSL.clearCSSL5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TADC10_AD1CSSL.setCSSL5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TADC10_AD1CSSL.getCSSL5 : TBits_1; inline;
- begin
- getCSSL5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TADC10_AD1CSSL.setCSSL6; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TADC10_AD1CSSL.clearCSSL6; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TADC10_AD1CSSL.setCSSL6(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TADC10_AD1CSSL.getCSSL6 : TBits_1; inline;
- begin
- getCSSL6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TADC10_AD1CSSL.setCSSL7; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TADC10_AD1CSSL.clearCSSL7; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TADC10_AD1CSSL.setCSSL7(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TADC10_AD1CSSL.getCSSL7 : TBits_1; inline;
- begin
- getCSSL7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TADC10_AD1CSSL.setCSSL8; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TADC10_AD1CSSL.clearCSSL8; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TADC10_AD1CSSL.setCSSL8(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TADC10_AD1CSSL.getCSSL8 : TBits_1; inline;
- begin
- getCSSL8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TADC10_AD1CSSL.setCSSL9; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TADC10_AD1CSSL.clearCSSL9; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TADC10_AD1CSSL.setCSSL9(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TADC10_AD1CSSL.getCSSL9 : TBits_1; inline;
- begin
- getCSSL9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TADC10_AD1CSSL.setCSSL10; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TADC10_AD1CSSL.clearCSSL10; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TADC10_AD1CSSL.setCSSL10(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TADC10_AD1CSSL.getCSSL10 : TBits_1; inline;
- begin
- getCSSL10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TADC10_AD1CSSL.setCSSL11; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TADC10_AD1CSSL.clearCSSL11; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TADC10_AD1CSSL.setCSSL11(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TADC10_AD1CSSL.getCSSL11 : TBits_1; inline;
- begin
- getCSSL11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TADC10_AD1CSSL.setCSSL12; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TADC10_AD1CSSL.clearCSSL12; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TADC10_AD1CSSL.setCSSL12(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TADC10_AD1CSSL.getCSSL12 : TBits_1; inline;
- begin
- getCSSL12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TADC10_AD1CSSL.setCSSL13; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TADC10_AD1CSSL.clearCSSL13; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TADC10_AD1CSSL.setCSSL13(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TADC10_AD1CSSL.getCSSL13 : TBits_1; inline;
- begin
- getCSSL13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TADC10_AD1CSSL.setCSSL14; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TADC10_AD1CSSL.clearCSSL14; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TADC10_AD1CSSL.setCSSL14(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TADC10_AD1CSSL.getCSSL14 : TBits_1; inline;
- begin
- getCSSL14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TADC10_AD1CSSL.setCSSL15; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TADC10_AD1CSSL.clearCSSL15; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TADC10_AD1CSSL.setCSSL15(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TADC10_AD1CSSL.getCSSL15 : TBits_1; inline;
- begin
- getCSSL15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TADC10_AD1CSSL.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TADC10_AD1CSSL.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TADC10_AD1PCFG.setPCFG(thebits : TBits_16); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
- end;
- function TADC10_AD1PCFG.getPCFG : TBits_16; inline;
- begin
- getPCFG := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
- end;
- procedure TADC10_AD1PCFG.setPCFG0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TADC10_AD1PCFG.clearPCFG0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TADC10_AD1PCFG.setPCFG0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TADC10_AD1PCFG.getPCFG0 : TBits_1; inline;
- begin
- getPCFG0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TADC10_AD1PCFG.setPCFG1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TADC10_AD1PCFG.clearPCFG1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TADC10_AD1PCFG.setPCFG1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TADC10_AD1PCFG.getPCFG1 : TBits_1; inline;
- begin
- getPCFG1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TADC10_AD1PCFG.setPCFG2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TADC10_AD1PCFG.clearPCFG2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TADC10_AD1PCFG.setPCFG2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TADC10_AD1PCFG.getPCFG2 : TBits_1; inline;
- begin
- getPCFG2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TADC10_AD1PCFG.setPCFG3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TADC10_AD1PCFG.clearPCFG3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TADC10_AD1PCFG.setPCFG3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TADC10_AD1PCFG.getPCFG3 : TBits_1; inline;
- begin
- getPCFG3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TADC10_AD1PCFG.setPCFG4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TADC10_AD1PCFG.clearPCFG4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TADC10_AD1PCFG.setPCFG4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TADC10_AD1PCFG.getPCFG4 : TBits_1; inline;
- begin
- getPCFG4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TADC10_AD1PCFG.setPCFG5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TADC10_AD1PCFG.clearPCFG5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TADC10_AD1PCFG.setPCFG5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TADC10_AD1PCFG.getPCFG5 : TBits_1; inline;
- begin
- getPCFG5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TADC10_AD1PCFG.setPCFG6; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TADC10_AD1PCFG.clearPCFG6; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TADC10_AD1PCFG.setPCFG6(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TADC10_AD1PCFG.getPCFG6 : TBits_1; inline;
- begin
- getPCFG6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TADC10_AD1PCFG.setPCFG7; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TADC10_AD1PCFG.clearPCFG7; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TADC10_AD1PCFG.setPCFG7(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TADC10_AD1PCFG.getPCFG7 : TBits_1; inline;
- begin
- getPCFG7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TADC10_AD1PCFG.setPCFG8; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TADC10_AD1PCFG.clearPCFG8; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TADC10_AD1PCFG.setPCFG8(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TADC10_AD1PCFG.getPCFG8 : TBits_1; inline;
- begin
- getPCFG8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TADC10_AD1PCFG.setPCFG9; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TADC10_AD1PCFG.clearPCFG9; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TADC10_AD1PCFG.setPCFG9(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TADC10_AD1PCFG.getPCFG9 : TBits_1; inline;
- begin
- getPCFG9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TADC10_AD1PCFG.setPCFG10; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TADC10_AD1PCFG.clearPCFG10; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TADC10_AD1PCFG.setPCFG10(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TADC10_AD1PCFG.getPCFG10 : TBits_1; inline;
- begin
- getPCFG10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TADC10_AD1PCFG.setPCFG11; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TADC10_AD1PCFG.clearPCFG11; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TADC10_AD1PCFG.setPCFG11(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TADC10_AD1PCFG.getPCFG11 : TBits_1; inline;
- begin
- getPCFG11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TADC10_AD1PCFG.setPCFG12; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TADC10_AD1PCFG.clearPCFG12; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TADC10_AD1PCFG.setPCFG12(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TADC10_AD1PCFG.getPCFG12 : TBits_1; inline;
- begin
- getPCFG12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TADC10_AD1PCFG.setPCFG13; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TADC10_AD1PCFG.clearPCFG13; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TADC10_AD1PCFG.setPCFG13(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TADC10_AD1PCFG.getPCFG13 : TBits_1; inline;
- begin
- getPCFG13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TADC10_AD1PCFG.setPCFG14; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TADC10_AD1PCFG.clearPCFG14; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TADC10_AD1PCFG.setPCFG14(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TADC10_AD1PCFG.getPCFG14 : TBits_1; inline;
- begin
- getPCFG14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TADC10_AD1PCFG.setPCFG15; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TADC10_AD1PCFG.clearPCFG15; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TADC10_AD1PCFG.setPCFG15(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TADC10_AD1PCFG.getPCFG15 : TBits_1; inline;
- begin
- getPCFG15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TADC10_AD1PCFG.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TADC10_AD1PCFG.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TCVR_CVRCON.setCVR(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
- end;
- function TCVR_CVRCON.getCVR : TBits_4; inline;
- begin
- getCVR := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
- end;
- procedure TCVR_CVRCON.setCVRSS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TCVR_CVRCON.clearCVRSS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TCVR_CVRCON.setCVRSS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TCVR_CVRCON.getCVRSS : TBits_1; inline;
- begin
- getCVRSS := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TCVR_CVRCON.setCVRR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TCVR_CVRCON.clearCVRR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TCVR_CVRCON.setCVRR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TCVR_CVRCON.getCVRR : TBits_1; inline;
- begin
- getCVRR := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TCVR_CVRCON.setCVROE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TCVR_CVRCON.clearCVROE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TCVR_CVRCON.setCVROE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TCVR_CVRCON.getCVROE : TBits_1; inline;
- begin
- getCVROE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TCVR_CVRCON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TCVR_CVRCON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TCVR_CVRCON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TCVR_CVRCON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TCVR_CVRCON.setCVR0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TCVR_CVRCON.clearCVR0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TCVR_CVRCON.setCVR0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TCVR_CVRCON.getCVR0 : TBits_1; inline;
- begin
- getCVR0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TCVR_CVRCON.setCVR1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TCVR_CVRCON.clearCVR1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TCVR_CVRCON.setCVR1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TCVR_CVRCON.getCVR1 : TBits_1; inline;
- begin
- getCVR1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TCVR_CVRCON.setCVR2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TCVR_CVRCON.clearCVR2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TCVR_CVRCON.setCVR2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TCVR_CVRCON.getCVR2 : TBits_1; inline;
- begin
- getCVR2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TCVR_CVRCON.setCVR3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TCVR_CVRCON.clearCVR3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TCVR_CVRCON.setCVR3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TCVR_CVRCON.getCVR3 : TBits_1; inline;
- begin
- getCVR3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TCVR_CVRCON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TCVR_CVRCON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TCMP_CM1CON.setCCH(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TCMP_CM1CON.getCCH : TBits_2; inline;
- begin
- getCCH := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TCMP_CM1CON.setCREF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TCMP_CM1CON.clearCREF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TCMP_CM1CON.setCREF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TCMP_CM1CON.getCREF : TBits_1; inline;
- begin
- getCREF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TCMP_CM1CON.setEVPOL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
- end;
- function TCMP_CM1CON.getEVPOL : TBits_2; inline;
- begin
- getEVPOL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
- end;
- procedure TCMP_CM1CON.setCOUT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TCMP_CM1CON.clearCOUT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TCMP_CM1CON.setCOUT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TCMP_CM1CON.getCOUT : TBits_1; inline;
- begin
- getCOUT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TCMP_CM1CON.setCPOL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TCMP_CM1CON.clearCPOL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TCMP_CM1CON.setCPOL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TCMP_CM1CON.getCPOL : TBits_1; inline;
- begin
- getCPOL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TCMP_CM1CON.setCOE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TCMP_CM1CON.clearCOE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TCMP_CM1CON.setCOE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TCMP_CM1CON.getCOE : TBits_1; inline;
- begin
- getCOE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TCMP_CM1CON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TCMP_CM1CON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TCMP_CM1CON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TCMP_CM1CON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TCMP_CM1CON.setCCH0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TCMP_CM1CON.clearCCH0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TCMP_CM1CON.setCCH0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TCMP_CM1CON.getCCH0 : TBits_1; inline;
- begin
- getCCH0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TCMP_CM1CON.setCCH1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TCMP_CM1CON.clearCCH1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TCMP_CM1CON.setCCH1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TCMP_CM1CON.getCCH1 : TBits_1; inline;
- begin
- getCCH1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TCMP_CM1CON.setEVPOL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TCMP_CM1CON.clearEVPOL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TCMP_CM1CON.setEVPOL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TCMP_CM1CON.getEVPOL0 : TBits_1; inline;
- begin
- getEVPOL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TCMP_CM1CON.setEVPOL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TCMP_CM1CON.clearEVPOL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TCMP_CM1CON.setEVPOL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TCMP_CM1CON.getEVPOL1 : TBits_1; inline;
- begin
- getEVPOL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TCMP_CM1CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TCMP_CM1CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TCMP_CM2CON.setCCH(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TCMP_CM2CON.getCCH : TBits_2; inline;
- begin
- getCCH := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TCMP_CM2CON.setCREF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TCMP_CM2CON.clearCREF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TCMP_CM2CON.setCREF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TCMP_CM2CON.getCREF : TBits_1; inline;
- begin
- getCREF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TCMP_CM2CON.setEVPOL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
- end;
- function TCMP_CM2CON.getEVPOL : TBits_2; inline;
- begin
- getEVPOL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
- end;
- procedure TCMP_CM2CON.setCOUT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TCMP_CM2CON.clearCOUT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TCMP_CM2CON.setCOUT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TCMP_CM2CON.getCOUT : TBits_1; inline;
- begin
- getCOUT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TCMP_CM2CON.setCPOL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TCMP_CM2CON.clearCPOL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TCMP_CM2CON.setCPOL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TCMP_CM2CON.getCPOL : TBits_1; inline;
- begin
- getCPOL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TCMP_CM2CON.setCOE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TCMP_CM2CON.clearCOE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TCMP_CM2CON.setCOE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TCMP_CM2CON.getCOE : TBits_1; inline;
- begin
- getCOE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TCMP_CM2CON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TCMP_CM2CON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TCMP_CM2CON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TCMP_CM2CON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TCMP_CM2CON.setCCH0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TCMP_CM2CON.clearCCH0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TCMP_CM2CON.setCCH0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TCMP_CM2CON.getCCH0 : TBits_1; inline;
- begin
- getCCH0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TCMP_CM2CON.setCCH1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TCMP_CM2CON.clearCCH1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TCMP_CM2CON.setCCH1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TCMP_CM2CON.getCCH1 : TBits_1; inline;
- begin
- getCCH1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TCMP_CM2CON.setEVPOL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TCMP_CM2CON.clearEVPOL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TCMP_CM2CON.setEVPOL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TCMP_CM2CON.getEVPOL0 : TBits_1; inline;
- begin
- getEVPOL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TCMP_CM2CON.setEVPOL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TCMP_CM2CON.clearEVPOL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TCMP_CM2CON.setEVPOL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TCMP_CM2CON.getEVPOL1 : TBits_1; inline;
- begin
- getEVPOL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TCMP_CM2CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TCMP_CM2CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TCMP_CMSTAT.setC1OUT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TCMP_CMSTAT.clearC1OUT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TCMP_CMSTAT.setC1OUT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TCMP_CMSTAT.getC1OUT : TBits_1; inline;
- begin
- getC1OUT := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TCMP_CMSTAT.setC2OUT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TCMP_CMSTAT.clearC2OUT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TCMP_CMSTAT.setC2OUT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TCMP_CMSTAT.getC2OUT : TBits_1; inline;
- begin
- getC2OUT := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TCMP_CMSTAT.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TCMP_CMSTAT.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TCMP_CMSTAT.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TCMP_CMSTAT.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TCMP_CMSTAT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TCMP_CMSTAT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TOSC_OSCCON.setOSWEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TOSC_OSCCON.clearOSWEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TOSC_OSCCON.setOSWEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TOSC_OSCCON.getOSWEN : TBits_1; inline;
- begin
- getOSWEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TOSC_OSCCON.setSOSCEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TOSC_OSCCON.clearSOSCEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TOSC_OSCCON.setSOSCEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TOSC_OSCCON.getSOSCEN : TBits_1; inline;
- begin
- getSOSCEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TOSC_OSCCON.setUFRCEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TOSC_OSCCON.clearUFRCEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TOSC_OSCCON.setUFRCEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TOSC_OSCCON.getUFRCEN : TBits_1; inline;
- begin
- getUFRCEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TOSC_OSCCON.setCF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TOSC_OSCCON.clearCF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TOSC_OSCCON.setCF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TOSC_OSCCON.getCF : TBits_1; inline;
- begin
- getCF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TOSC_OSCCON.setSLPEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TOSC_OSCCON.clearSLPEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TOSC_OSCCON.setSLPEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TOSC_OSCCON.getSLPEN : TBits_1; inline;
- begin
- getSLPEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TOSC_OSCCON.setSLOCK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TOSC_OSCCON.clearSLOCK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TOSC_OSCCON.setSLOCK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TOSC_OSCCON.getSLOCK : TBits_1; inline;
- begin
- getSLOCK := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TOSC_OSCCON.setULOCK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TOSC_OSCCON.clearULOCK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TOSC_OSCCON.setULOCK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TOSC_OSCCON.getULOCK : TBits_1; inline;
- begin
- getULOCK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TOSC_OSCCON.setCLKLOCK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TOSC_OSCCON.clearCLKLOCK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TOSC_OSCCON.setCLKLOCK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TOSC_OSCCON.getCLKLOCK : TBits_1; inline;
- begin
- getCLKLOCK := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TOSC_OSCCON.setNOSC(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF8FF or ( thebits shl 8 );
- end;
- function TOSC_OSCCON.getNOSC : TBits_3; inline;
- begin
- getNOSC := (pTDefRegMap(@Self)^.val and $00000700) shr 8;
- end;
- procedure TOSC_OSCCON.setCOSC(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF8FFF or ( thebits shl 12 );
- end;
- function TOSC_OSCCON.getCOSC : TBits_3; inline;
- begin
- getCOSC := (pTDefRegMap(@Self)^.val and $00007000) shr 12;
- end;
- procedure TOSC_OSCCON.setPLLMULT(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF8FFFF or ( thebits shl 16 );
- end;
- function TOSC_OSCCON.getPLLMULT : TBits_3; inline;
- begin
- getPLLMULT := (pTDefRegMap(@Self)^.val and $00070000) shr 16;
- end;
- procedure TOSC_OSCCON.setPBDIV(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE7FFFF or ( thebits shl 19 );
- end;
- function TOSC_OSCCON.getPBDIV : TBits_2; inline;
- begin
- getPBDIV := (pTDefRegMap(@Self)^.val and $00180000) shr 19;
- end;
- procedure TOSC_OSCCON.setSOSCRDY; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- procedure TOSC_OSCCON.clearSOSCRDY; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00400000;
- end;
- procedure TOSC_OSCCON.setSOSCRDY(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00400000
- else
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- function TOSC_OSCCON.getSOSCRDY : TBits_1; inline;
- begin
- getSOSCRDY := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
- end;
- procedure TOSC_OSCCON.setFRCDIV(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
- end;
- function TOSC_OSCCON.getFRCDIV : TBits_3; inline;
- begin
- getFRCDIV := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
- end;
- procedure TOSC_OSCCON.setPLLODIV(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $C7FFFFFF or ( thebits shl 27 );
- end;
- function TOSC_OSCCON.getPLLODIV : TBits_3; inline;
- begin
- getPLLODIV := (pTDefRegMap(@Self)^.val and $38000000) shr 27;
- end;
- procedure TOSC_OSCCON.setNOSC0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TOSC_OSCCON.clearNOSC0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TOSC_OSCCON.setNOSC0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TOSC_OSCCON.getNOSC0 : TBits_1; inline;
- begin
- getNOSC0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TOSC_OSCCON.setNOSC1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TOSC_OSCCON.clearNOSC1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TOSC_OSCCON.setNOSC1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TOSC_OSCCON.getNOSC1 : TBits_1; inline;
- begin
- getNOSC1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TOSC_OSCCON.setNOSC2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TOSC_OSCCON.clearNOSC2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TOSC_OSCCON.setNOSC2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TOSC_OSCCON.getNOSC2 : TBits_1; inline;
- begin
- getNOSC2 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TOSC_OSCCON.setCOSC0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TOSC_OSCCON.clearCOSC0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TOSC_OSCCON.setCOSC0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TOSC_OSCCON.getCOSC0 : TBits_1; inline;
- begin
- getCOSC0 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TOSC_OSCCON.setCOSC1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TOSC_OSCCON.clearCOSC1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TOSC_OSCCON.setCOSC1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TOSC_OSCCON.getCOSC1 : TBits_1; inline;
- begin
- getCOSC1 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TOSC_OSCCON.setCOSC2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TOSC_OSCCON.clearCOSC2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TOSC_OSCCON.setCOSC2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TOSC_OSCCON.getCOSC2 : TBits_1; inline;
- begin
- getCOSC2 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TOSC_OSCCON.setPLLMULT0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- procedure TOSC_OSCCON.clearPLLMULT0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00010000;
- end;
- procedure TOSC_OSCCON.setPLLMULT0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00010000
- else
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- function TOSC_OSCCON.getPLLMULT0 : TBits_1; inline;
- begin
- getPLLMULT0 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
- end;
- procedure TOSC_OSCCON.setPLLMULT1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- procedure TOSC_OSCCON.clearPLLMULT1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00020000;
- end;
- procedure TOSC_OSCCON.setPLLMULT1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00020000
- else
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- function TOSC_OSCCON.getPLLMULT1 : TBits_1; inline;
- begin
- getPLLMULT1 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
- end;
- procedure TOSC_OSCCON.setPLLMULT2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- procedure TOSC_OSCCON.clearPLLMULT2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00040000;
- end;
- procedure TOSC_OSCCON.setPLLMULT2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00040000
- else
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- function TOSC_OSCCON.getPLLMULT2 : TBits_1; inline;
- begin
- getPLLMULT2 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
- end;
- procedure TOSC_OSCCON.setPBDIV0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- procedure TOSC_OSCCON.clearPBDIV0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00080000;
- end;
- procedure TOSC_OSCCON.setPBDIV0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00080000
- else
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- function TOSC_OSCCON.getPBDIV0 : TBits_1; inline;
- begin
- getPBDIV0 := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
- end;
- procedure TOSC_OSCCON.setPBDIV1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- procedure TOSC_OSCCON.clearPBDIV1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00100000;
- end;
- procedure TOSC_OSCCON.setPBDIV1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00100000
- else
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- function TOSC_OSCCON.getPBDIV1 : TBits_1; inline;
- begin
- getPBDIV1 := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
- end;
- procedure TOSC_OSCCON.setFRCDIV0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- procedure TOSC_OSCCON.clearFRCDIV0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $01000000;
- end;
- procedure TOSC_OSCCON.setFRCDIV0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $01000000
- else
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- function TOSC_OSCCON.getFRCDIV0 : TBits_1; inline;
- begin
- getFRCDIV0 := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
- end;
- procedure TOSC_OSCCON.setFRCDIV1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $02000000;
- end;
- procedure TOSC_OSCCON.clearFRCDIV1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $02000000;
- end;
- procedure TOSC_OSCCON.setFRCDIV1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $02000000
- else
- pTDefRegMap(@Self)^.&set := $02000000;
- end;
- function TOSC_OSCCON.getFRCDIV1 : TBits_1; inline;
- begin
- getFRCDIV1 := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
- end;
- procedure TOSC_OSCCON.setFRCDIV2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- procedure TOSC_OSCCON.clearFRCDIV2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $04000000;
- end;
- procedure TOSC_OSCCON.setFRCDIV2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $04000000
- else
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- function TOSC_OSCCON.getFRCDIV2 : TBits_1; inline;
- begin
- getFRCDIV2 := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
- end;
- procedure TOSC_OSCCON.setPLLODIV0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- procedure TOSC_OSCCON.clearPLLODIV0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $08000000;
- end;
- procedure TOSC_OSCCON.setPLLODIV0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $08000000
- else
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- function TOSC_OSCCON.getPLLODIV0 : TBits_1; inline;
- begin
- getPLLODIV0 := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
- end;
- procedure TOSC_OSCCON.setPLLODIV1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- procedure TOSC_OSCCON.clearPLLODIV1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $10000000;
- end;
- procedure TOSC_OSCCON.setPLLODIV1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $10000000
- else
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- function TOSC_OSCCON.getPLLODIV1 : TBits_1; inline;
- begin
- getPLLODIV1 := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
- end;
- procedure TOSC_OSCCON.setPLLODIV2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- procedure TOSC_OSCCON.clearPLLODIV2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $20000000;
- end;
- procedure TOSC_OSCCON.setPLLODIV2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $20000000
- else
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- function TOSC_OSCCON.getPLLODIV2 : TBits_1; inline;
- begin
- getPLLODIV2 := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
- end;
- procedure TOSC_OSCCON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TOSC_OSCCON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TOSC_OSCTUN.setTUN(thebits : TBits_6); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC0 or ( thebits shl 0 );
- end;
- function TOSC_OSCTUN.getTUN : TBits_6; inline;
- begin
- getTUN := (pTDefRegMap(@Self)^.val and $0000003F) shr 0;
- end;
- procedure TOSC_OSCTUN.setTUN0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TOSC_OSCTUN.clearTUN0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TOSC_OSCTUN.setTUN0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TOSC_OSCTUN.getTUN0 : TBits_1; inline;
- begin
- getTUN0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TOSC_OSCTUN.setTUN1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TOSC_OSCTUN.clearTUN1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TOSC_OSCTUN.setTUN1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TOSC_OSCTUN.getTUN1 : TBits_1; inline;
- begin
- getTUN1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TOSC_OSCTUN.setTUN2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TOSC_OSCTUN.clearTUN2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TOSC_OSCTUN.setTUN2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TOSC_OSCTUN.getTUN2 : TBits_1; inline;
- begin
- getTUN2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TOSC_OSCTUN.setTUN3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TOSC_OSCTUN.clearTUN3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TOSC_OSCTUN.setTUN3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TOSC_OSCTUN.getTUN3 : TBits_1; inline;
- begin
- getTUN3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TOSC_OSCTUN.setTUN4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TOSC_OSCTUN.clearTUN4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TOSC_OSCTUN.setTUN4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TOSC_OSCTUN.getTUN4 : TBits_1; inline;
- begin
- getTUN4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TOSC_OSCTUN.setTUN5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TOSC_OSCTUN.clearTUN5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TOSC_OSCTUN.setTUN5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TOSC_OSCTUN.getTUN5 : TBits_1; inline;
- begin
- getTUN5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TOSC_OSCTUN.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TOSC_OSCTUN.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TNVM_NVMCON.setNVMOP(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
- end;
- function TNVM_NVMCON.getNVMOP : TBits_4; inline;
- begin
- getNVMOP := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
- end;
- procedure TNVM_NVMCON.setLVDSTAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TNVM_NVMCON.clearLVDSTAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TNVM_NVMCON.setLVDSTAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TNVM_NVMCON.getLVDSTAT : TBits_1; inline;
- begin
- getLVDSTAT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TNVM_NVMCON.setLVDERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TNVM_NVMCON.clearLVDERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TNVM_NVMCON.setLVDERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TNVM_NVMCON.getLVDERR : TBits_1; inline;
- begin
- getLVDERR := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TNVM_NVMCON.setWRERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TNVM_NVMCON.clearWRERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TNVM_NVMCON.setWRERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TNVM_NVMCON.getWRERR : TBits_1; inline;
- begin
- getWRERR := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TNVM_NVMCON.setWREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TNVM_NVMCON.clearWREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TNVM_NVMCON.setWREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TNVM_NVMCON.getWREN : TBits_1; inline;
- begin
- getWREN := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TNVM_NVMCON.setWR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TNVM_NVMCON.clearWR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TNVM_NVMCON.setWR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TNVM_NVMCON.getWR : TBits_1; inline;
- begin
- getWR := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TNVM_NVMCON.setNVMOP0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TNVM_NVMCON.clearNVMOP0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TNVM_NVMCON.setNVMOP0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TNVM_NVMCON.getNVMOP0 : TBits_1; inline;
- begin
- getNVMOP0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TNVM_NVMCON.setNVMOP1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TNVM_NVMCON.clearNVMOP1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TNVM_NVMCON.setNVMOP1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TNVM_NVMCON.getNVMOP1 : TBits_1; inline;
- begin
- getNVMOP1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TNVM_NVMCON.setNVMOP2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TNVM_NVMCON.clearNVMOP2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TNVM_NVMCON.setNVMOP2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TNVM_NVMCON.getNVMOP2 : TBits_1; inline;
- begin
- getNVMOP2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TNVM_NVMCON.setNVMOP3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TNVM_NVMCON.clearNVMOP3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TNVM_NVMCON.setNVMOP3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TNVM_NVMCON.getNVMOP3 : TBits_1; inline;
- begin
- getNVMOP3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TNVM_NVMCON.setPROGOP(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
- end;
- function TNVM_NVMCON.getPROGOP : TBits_4; inline;
- begin
- getPROGOP := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
- end;
- procedure TNVM_NVMCON.setPROGOP0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TNVM_NVMCON.clearPROGOP0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TNVM_NVMCON.setPROGOP0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TNVM_NVMCON.getPROGOP0 : TBits_1; inline;
- begin
- getPROGOP0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TNVM_NVMCON.setPROGOP1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TNVM_NVMCON.clearPROGOP1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TNVM_NVMCON.setPROGOP1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TNVM_NVMCON.getPROGOP1 : TBits_1; inline;
- begin
- getPROGOP1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TNVM_NVMCON.setPROGOP2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TNVM_NVMCON.clearPROGOP2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TNVM_NVMCON.setPROGOP2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TNVM_NVMCON.getPROGOP2 : TBits_1; inline;
- begin
- getPROGOP2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TNVM_NVMCON.setPROGOP3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TNVM_NVMCON.clearPROGOP3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TNVM_NVMCON.setPROGOP3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TNVM_NVMCON.getPROGOP3 : TBits_1; inline;
- begin
- getPROGOP3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TNVM_NVMCON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TNVM_NVMCON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TRCON_RCON.setPOR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TRCON_RCON.clearPOR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TRCON_RCON.setPOR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TRCON_RCON.getPOR : TBits_1; inline;
- begin
- getPOR := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TRCON_RCON.setBOR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TRCON_RCON.clearBOR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TRCON_RCON.setBOR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TRCON_RCON.getBOR : TBits_1; inline;
- begin
- getBOR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TRCON_RCON.setIDLE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TRCON_RCON.clearIDLE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TRCON_RCON.setIDLE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TRCON_RCON.getIDLE : TBits_1; inline;
- begin
- getIDLE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TRCON_RCON.setSLEEP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TRCON_RCON.clearSLEEP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TRCON_RCON.setSLEEP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TRCON_RCON.getSLEEP : TBits_1; inline;
- begin
- getSLEEP := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TRCON_RCON.setWDTO; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TRCON_RCON.clearWDTO; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TRCON_RCON.setWDTO(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TRCON_RCON.getWDTO : TBits_1; inline;
- begin
- getWDTO := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TRCON_RCON.setSWR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TRCON_RCON.clearSWR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TRCON_RCON.setSWR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TRCON_RCON.getSWR : TBits_1; inline;
- begin
- getSWR := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TRCON_RCON.setEXTR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TRCON_RCON.clearEXTR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TRCON_RCON.setEXTR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TRCON_RCON.getEXTR : TBits_1; inline;
- begin
- getEXTR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TRCON_RCON.setVREGS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TRCON_RCON.clearVREGS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TRCON_RCON.setVREGS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TRCON_RCON.getVREGS : TBits_1; inline;
- begin
- getVREGS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TRCON_RCON.setCMR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TRCON_RCON.clearCMR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TRCON_RCON.setCMR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TRCON_RCON.getCMR : TBits_1; inline;
- begin
- getCMR := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TRCON_RCON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TRCON_RCON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TRCON_RSWRST.setSWRST; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TRCON_RSWRST.clearSWRST; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TRCON_RSWRST.setSWRST(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TRCON_RSWRST.getSWRST : TBits_1; inline;
- begin
- getSWRST := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TRCON_RSWRST.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TRCON_RSWRST.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TINT_INTCON.setINT0EP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TINT_INTCON.clearINT0EP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TINT_INTCON.setINT0EP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TINT_INTCON.getINT0EP : TBits_1; inline;
- begin
- getINT0EP := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TINT_INTCON.setINT1EP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TINT_INTCON.clearINT1EP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TINT_INTCON.setINT1EP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TINT_INTCON.getINT1EP : TBits_1; inline;
- begin
- getINT1EP := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TINT_INTCON.setINT2EP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TINT_INTCON.clearINT2EP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TINT_INTCON.setINT2EP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TINT_INTCON.getINT2EP : TBits_1; inline;
- begin
- getINT2EP := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TINT_INTCON.setINT3EP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TINT_INTCON.clearINT3EP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TINT_INTCON.setINT3EP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TINT_INTCON.getINT3EP : TBits_1; inline;
- begin
- getINT3EP := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TINT_INTCON.setINT4EP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TINT_INTCON.clearINT4EP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TINT_INTCON.setINT4EP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TINT_INTCON.getINT4EP : TBits_1; inline;
- begin
- getINT4EP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TINT_INTCON.setTPC(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF8FF or ( thebits shl 8 );
- end;
- function TINT_INTCON.getTPC : TBits_3; inline;
- begin
- getTPC := (pTDefRegMap(@Self)^.val and $00000700) shr 8;
- end;
- procedure TINT_INTCON.setMVEC; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TINT_INTCON.clearMVEC; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TINT_INTCON.setMVEC(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TINT_INTCON.getMVEC : TBits_1; inline;
- begin
- getMVEC := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TINT_INTCON.setFRZ; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TINT_INTCON.clearFRZ; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TINT_INTCON.setFRZ(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TINT_INTCON.getFRZ : TBits_1; inline;
- begin
- getFRZ := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TINT_INTCON.setSS0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- procedure TINT_INTCON.clearSS0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00010000;
- end;
- procedure TINT_INTCON.setSS0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00010000
- else
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- function TINT_INTCON.getSS0 : TBits_1; inline;
- begin
- getSS0 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
- end;
- procedure TINT_INTCON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TINT_INTCON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TINT_IFS0.setCTIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TINT_IFS0.clearCTIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TINT_IFS0.setCTIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TINT_IFS0.getCTIF : TBits_1; inline;
- begin
- getCTIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TINT_IFS0.setCS0IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TINT_IFS0.clearCS0IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TINT_IFS0.setCS0IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TINT_IFS0.getCS0IF : TBits_1; inline;
- begin
- getCS0IF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TINT_IFS0.setCS1IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TINT_IFS0.clearCS1IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TINT_IFS0.setCS1IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TINT_IFS0.getCS1IF : TBits_1; inline;
- begin
- getCS1IF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TINT_IFS0.setINT0IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TINT_IFS0.clearINT0IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TINT_IFS0.setINT0IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TINT_IFS0.getINT0IF : TBits_1; inline;
- begin
- getINT0IF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TINT_IFS0.setT1IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TINT_IFS0.clearT1IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TINT_IFS0.setT1IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TINT_IFS0.getT1IF : TBits_1; inline;
- begin
- getT1IF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TINT_IFS0.setIC1IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TINT_IFS0.clearIC1IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TINT_IFS0.setIC1IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TINT_IFS0.getIC1IF : TBits_1; inline;
- begin
- getIC1IF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TINT_IFS0.setOC1IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TINT_IFS0.clearOC1IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TINT_IFS0.setOC1IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TINT_IFS0.getOC1IF : TBits_1; inline;
- begin
- getOC1IF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TINT_IFS0.setINT1IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TINT_IFS0.clearINT1IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TINT_IFS0.setINT1IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TINT_IFS0.getINT1IF : TBits_1; inline;
- begin
- getINT1IF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TINT_IFS0.setT2IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TINT_IFS0.clearT2IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TINT_IFS0.setT2IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TINT_IFS0.getT2IF : TBits_1; inline;
- begin
- getT2IF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TINT_IFS0.setIC2IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TINT_IFS0.clearIC2IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TINT_IFS0.setIC2IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TINT_IFS0.getIC2IF : TBits_1; inline;
- begin
- getIC2IF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TINT_IFS0.setOC2IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TINT_IFS0.clearOC2IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TINT_IFS0.setOC2IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TINT_IFS0.getOC2IF : TBits_1; inline;
- begin
- getOC2IF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TINT_IFS0.setINT2IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TINT_IFS0.clearINT2IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TINT_IFS0.setINT2IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TINT_IFS0.getINT2IF : TBits_1; inline;
- begin
- getINT2IF := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TINT_IFS0.setT3IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TINT_IFS0.clearT3IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TINT_IFS0.setT3IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TINT_IFS0.getT3IF : TBits_1; inline;
- begin
- getT3IF := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TINT_IFS0.setIC3IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TINT_IFS0.clearIC3IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TINT_IFS0.setIC3IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TINT_IFS0.getIC3IF : TBits_1; inline;
- begin
- getIC3IF := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TINT_IFS0.setOC3IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TINT_IFS0.clearOC3IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TINT_IFS0.setOC3IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TINT_IFS0.getOC3IF : TBits_1; inline;
- begin
- getOC3IF := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TINT_IFS0.setINT3IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TINT_IFS0.clearINT3IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TINT_IFS0.setINT3IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TINT_IFS0.getINT3IF : TBits_1; inline;
- begin
- getINT3IF := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TINT_IFS0.setT4IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- procedure TINT_IFS0.clearT4IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00010000;
- end;
- procedure TINT_IFS0.setT4IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00010000
- else
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- function TINT_IFS0.getT4IF : TBits_1; inline;
- begin
- getT4IF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
- end;
- procedure TINT_IFS0.setIC4IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- procedure TINT_IFS0.clearIC4IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00020000;
- end;
- procedure TINT_IFS0.setIC4IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00020000
- else
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- function TINT_IFS0.getIC4IF : TBits_1; inline;
- begin
- getIC4IF := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
- end;
- procedure TINT_IFS0.setOC4IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- procedure TINT_IFS0.clearOC4IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00040000;
- end;
- procedure TINT_IFS0.setOC4IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00040000
- else
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- function TINT_IFS0.getOC4IF : TBits_1; inline;
- begin
- getOC4IF := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
- end;
- procedure TINT_IFS0.setINT4IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- procedure TINT_IFS0.clearINT4IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00080000;
- end;
- procedure TINT_IFS0.setINT4IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00080000
- else
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- function TINT_IFS0.getINT4IF : TBits_1; inline;
- begin
- getINT4IF := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
- end;
- procedure TINT_IFS0.setT5IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- procedure TINT_IFS0.clearT5IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00100000;
- end;
- procedure TINT_IFS0.setT5IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00100000
- else
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- function TINT_IFS0.getT5IF : TBits_1; inline;
- begin
- getT5IF := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
- end;
- procedure TINT_IFS0.setIC5IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- procedure TINT_IFS0.clearIC5IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00200000;
- end;
- procedure TINT_IFS0.setIC5IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00200000
- else
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- function TINT_IFS0.getIC5IF : TBits_1; inline;
- begin
- getIC5IF := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
- end;
- procedure TINT_IFS0.setOC5IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- procedure TINT_IFS0.clearOC5IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00400000;
- end;
- procedure TINT_IFS0.setOC5IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00400000
- else
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- function TINT_IFS0.getOC5IF : TBits_1; inline;
- begin
- getOC5IF := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
- end;
- procedure TINT_IFS0.setSPI1EIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- procedure TINT_IFS0.clearSPI1EIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00800000;
- end;
- procedure TINT_IFS0.setSPI1EIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00800000
- else
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- function TINT_IFS0.getSPI1EIF : TBits_1; inline;
- begin
- getSPI1EIF := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
- end;
- procedure TINT_IFS0.setSPI1RXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- procedure TINT_IFS0.clearSPI1RXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $01000000;
- end;
- procedure TINT_IFS0.setSPI1RXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $01000000
- else
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- function TINT_IFS0.getSPI1RXIF : TBits_1; inline;
- begin
- getSPI1RXIF := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
- end;
- procedure TINT_IFS0.setSPI1TXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $02000000;
- end;
- procedure TINT_IFS0.clearSPI1TXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $02000000;
- end;
- procedure TINT_IFS0.setSPI1TXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $02000000
- else
- pTDefRegMap(@Self)^.&set := $02000000;
- end;
- function TINT_IFS0.getSPI1TXIF : TBits_1; inline;
- begin
- getSPI1TXIF := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
- end;
- procedure TINT_IFS0.setU1EIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- procedure TINT_IFS0.clearU1EIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $04000000;
- end;
- procedure TINT_IFS0.setU1EIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $04000000
- else
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- function TINT_IFS0.getU1EIF : TBits_1; inline;
- begin
- getU1EIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
- end;
- procedure TINT_IFS0.setU1RXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- procedure TINT_IFS0.clearU1RXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $08000000;
- end;
- procedure TINT_IFS0.setU1RXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $08000000
- else
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- function TINT_IFS0.getU1RXIF : TBits_1; inline;
- begin
- getU1RXIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
- end;
- procedure TINT_IFS0.setU1TXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- procedure TINT_IFS0.clearU1TXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $10000000;
- end;
- procedure TINT_IFS0.setU1TXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $10000000
- else
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- function TINT_IFS0.getU1TXIF : TBits_1; inline;
- begin
- getU1TXIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
- end;
- procedure TINT_IFS0.setI2C1BIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- procedure TINT_IFS0.clearI2C1BIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $20000000;
- end;
- procedure TINT_IFS0.setI2C1BIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $20000000
- else
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- function TINT_IFS0.getI2C1BIF : TBits_1; inline;
- begin
- getI2C1BIF := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
- end;
- procedure TINT_IFS0.setI2C1SIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- procedure TINT_IFS0.clearI2C1SIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $40000000;
- end;
- procedure TINT_IFS0.setI2C1SIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $40000000
- else
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- function TINT_IFS0.getI2C1SIF : TBits_1; inline;
- begin
- getI2C1SIF := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
- end;
- procedure TINT_IFS0.setI2C1MIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- procedure TINT_IFS0.clearI2C1MIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $80000000;
- end;
- procedure TINT_IFS0.setI2C1MIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $80000000
- else
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- function TINT_IFS0.getI2C1MIF : TBits_1; inline;
- begin
- getI2C1MIF := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
- end;
- procedure TINT_IFS0.setU1AEIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- procedure TINT_IFS0.clearU1AEIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $04000000;
- end;
- procedure TINT_IFS0.setU1AEIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $04000000
- else
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- function TINT_IFS0.getU1AEIF : TBits_1; inline;
- begin
- getU1AEIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
- end;
- procedure TINT_IFS0.setU1ARXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- procedure TINT_IFS0.clearU1ARXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $08000000;
- end;
- procedure TINT_IFS0.setU1ARXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $08000000
- else
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- function TINT_IFS0.getU1ARXIF : TBits_1; inline;
- begin
- getU1ARXIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
- end;
- procedure TINT_IFS0.setU1ATXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- procedure TINT_IFS0.clearU1ATXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $10000000;
- end;
- procedure TINT_IFS0.setU1ATXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $10000000
- else
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- function TINT_IFS0.getU1ATXIF : TBits_1; inline;
- begin
- getU1ATXIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
- end;
- procedure TINT_IFS0.setSPI3EIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- procedure TINT_IFS0.clearSPI3EIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $04000000;
- end;
- procedure TINT_IFS0.setSPI3EIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $04000000
- else
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- function TINT_IFS0.getSPI3EIF : TBits_1; inline;
- begin
- getSPI3EIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
- end;
- procedure TINT_IFS0.setSPI3RXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- procedure TINT_IFS0.clearSPI3RXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $08000000;
- end;
- procedure TINT_IFS0.setSPI3RXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $08000000
- else
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- function TINT_IFS0.getSPI3RXIF : TBits_1; inline;
- begin
- getSPI3RXIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
- end;
- procedure TINT_IFS0.setSPI3TXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- procedure TINT_IFS0.clearSPI3TXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $10000000;
- end;
- procedure TINT_IFS0.setSPI3TXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $10000000
- else
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- function TINT_IFS0.getSPI3TXIF : TBits_1; inline;
- begin
- getSPI3TXIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
- end;
- procedure TINT_IFS0.setSPI1AEIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- procedure TINT_IFS0.clearSPI1AEIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $04000000;
- end;
- procedure TINT_IFS0.setSPI1AEIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $04000000
- else
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- function TINT_IFS0.getSPI1AEIF : TBits_1; inline;
- begin
- getSPI1AEIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
- end;
- procedure TINT_IFS0.setSPI1ARXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- procedure TINT_IFS0.clearSPI1ARXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $08000000;
- end;
- procedure TINT_IFS0.setSPI1ARXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $08000000
- else
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- function TINT_IFS0.getSPI1ARXIF : TBits_1; inline;
- begin
- getSPI1ARXIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
- end;
- procedure TINT_IFS0.setSPI1ATXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- procedure TINT_IFS0.clearSPI1ATXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $10000000;
- end;
- procedure TINT_IFS0.setSPI1ATXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $10000000
- else
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- function TINT_IFS0.getSPI1ATXIF : TBits_1; inline;
- begin
- getSPI1ATXIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
- end;
- procedure TINT_IFS0.setI2C3BIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- procedure TINT_IFS0.clearI2C3BIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $04000000;
- end;
- procedure TINT_IFS0.setI2C3BIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $04000000
- else
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- function TINT_IFS0.getI2C3BIF : TBits_1; inline;
- begin
- getI2C3BIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
- end;
- procedure TINT_IFS0.setI2C3SIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- procedure TINT_IFS0.clearI2C3SIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $08000000;
- end;
- procedure TINT_IFS0.setI2C3SIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $08000000
- else
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- function TINT_IFS0.getI2C3SIF : TBits_1; inline;
- begin
- getI2C3SIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
- end;
- procedure TINT_IFS0.setI2C3MIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- procedure TINT_IFS0.clearI2C3MIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $10000000;
- end;
- procedure TINT_IFS0.setI2C3MIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $10000000
- else
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- function TINT_IFS0.getI2C3MIF : TBits_1; inline;
- begin
- getI2C3MIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
- end;
- procedure TINT_IFS0.setI2C1ABIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- procedure TINT_IFS0.clearI2C1ABIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $04000000;
- end;
- procedure TINT_IFS0.setI2C1ABIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $04000000
- else
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- function TINT_IFS0.getI2C1ABIF : TBits_1; inline;
- begin
- getI2C1ABIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
- end;
- procedure TINT_IFS0.setI2C1ASIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- procedure TINT_IFS0.clearI2C1ASIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $08000000;
- end;
- procedure TINT_IFS0.setI2C1ASIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $08000000
- else
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- function TINT_IFS0.getI2C1ASIF : TBits_1; inline;
- begin
- getI2C1ASIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
- end;
- procedure TINT_IFS0.setI2C1AMIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- procedure TINT_IFS0.clearI2C1AMIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $10000000;
- end;
- procedure TINT_IFS0.setI2C1AMIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $10000000
- else
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- function TINT_IFS0.getI2C1AMIF : TBits_1; inline;
- begin
- getI2C1AMIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
- end;
- procedure TINT_IFS0.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TINT_IFS0.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TINT_IFS1.setCNIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TINT_IFS1.clearCNIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TINT_IFS1.setCNIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TINT_IFS1.getCNIF : TBits_1; inline;
- begin
- getCNIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TINT_IFS1.setAD1IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TINT_IFS1.clearAD1IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TINT_IFS1.setAD1IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TINT_IFS1.getAD1IF : TBits_1; inline;
- begin
- getAD1IF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TINT_IFS1.setPMPIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TINT_IFS1.clearPMPIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TINT_IFS1.setPMPIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TINT_IFS1.getPMPIF : TBits_1; inline;
- begin
- getPMPIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TINT_IFS1.setCMP1IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TINT_IFS1.clearCMP1IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TINT_IFS1.setCMP1IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TINT_IFS1.getCMP1IF : TBits_1; inline;
- begin
- getCMP1IF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TINT_IFS1.setCMP2IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TINT_IFS1.clearCMP2IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TINT_IFS1.setCMP2IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TINT_IFS1.getCMP2IF : TBits_1; inline;
- begin
- getCMP2IF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TINT_IFS1.setU3EIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TINT_IFS1.clearU3EIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TINT_IFS1.setU3EIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TINT_IFS1.getU3EIF : TBits_1; inline;
- begin
- getU3EIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TINT_IFS1.setU3RXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TINT_IFS1.clearU3RXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TINT_IFS1.setU3RXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TINT_IFS1.getU3RXIF : TBits_1; inline;
- begin
- getU3RXIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TINT_IFS1.setU3TXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TINT_IFS1.clearU3TXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TINT_IFS1.setU3TXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TINT_IFS1.getU3TXIF : TBits_1; inline;
- begin
- getU3TXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TINT_IFS1.setU2EIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TINT_IFS1.clearU2EIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TINT_IFS1.setU2EIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TINT_IFS1.getU2EIF : TBits_1; inline;
- begin
- getU2EIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TINT_IFS1.setU2RXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TINT_IFS1.clearU2RXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TINT_IFS1.setU2RXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TINT_IFS1.getU2RXIF : TBits_1; inline;
- begin
- getU2RXIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TINT_IFS1.setU2TXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TINT_IFS1.clearU2TXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TINT_IFS1.setU2TXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TINT_IFS1.getU2TXIF : TBits_1; inline;
- begin
- getU2TXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TINT_IFS1.setI2C2BIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TINT_IFS1.clearI2C2BIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TINT_IFS1.setI2C2BIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TINT_IFS1.getI2C2BIF : TBits_1; inline;
- begin
- getI2C2BIF := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TINT_IFS1.setI2C2SIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TINT_IFS1.clearI2C2SIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TINT_IFS1.setI2C2SIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TINT_IFS1.getI2C2SIF : TBits_1; inline;
- begin
- getI2C2SIF := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TINT_IFS1.setI2C2MIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TINT_IFS1.clearI2C2MIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TINT_IFS1.setI2C2MIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TINT_IFS1.getI2C2MIF : TBits_1; inline;
- begin
- getI2C2MIF := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TINT_IFS1.setFSCMIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TINT_IFS1.clearFSCMIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TINT_IFS1.setFSCMIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TINT_IFS1.getFSCMIF : TBits_1; inline;
- begin
- getFSCMIF := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TINT_IFS1.setRTCCIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TINT_IFS1.clearRTCCIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TINT_IFS1.setRTCCIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TINT_IFS1.getRTCCIF : TBits_1; inline;
- begin
- getRTCCIF := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TINT_IFS1.setDMA0IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- procedure TINT_IFS1.clearDMA0IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00010000;
- end;
- procedure TINT_IFS1.setDMA0IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00010000
- else
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- function TINT_IFS1.getDMA0IF : TBits_1; inline;
- begin
- getDMA0IF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
- end;
- procedure TINT_IFS1.setDMA1IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- procedure TINT_IFS1.clearDMA1IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00020000;
- end;
- procedure TINT_IFS1.setDMA1IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00020000
- else
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- function TINT_IFS1.getDMA1IF : TBits_1; inline;
- begin
- getDMA1IF := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
- end;
- procedure TINT_IFS1.setDMA2IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- procedure TINT_IFS1.clearDMA2IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00040000;
- end;
- procedure TINT_IFS1.setDMA2IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00040000
- else
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- function TINT_IFS1.getDMA2IF : TBits_1; inline;
- begin
- getDMA2IF := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
- end;
- procedure TINT_IFS1.setDMA3IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- procedure TINT_IFS1.clearDMA3IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00080000;
- end;
- procedure TINT_IFS1.setDMA3IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00080000
- else
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- function TINT_IFS1.getDMA3IF : TBits_1; inline;
- begin
- getDMA3IF := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
- end;
- procedure TINT_IFS1.setDMA4IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- procedure TINT_IFS1.clearDMA4IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00100000;
- end;
- procedure TINT_IFS1.setDMA4IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00100000
- else
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- function TINT_IFS1.getDMA4IF : TBits_1; inline;
- begin
- getDMA4IF := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
- end;
- procedure TINT_IFS1.setDMA5IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- procedure TINT_IFS1.clearDMA5IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00200000;
- end;
- procedure TINT_IFS1.setDMA5IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00200000
- else
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- function TINT_IFS1.getDMA5IF : TBits_1; inline;
- begin
- getDMA5IF := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
- end;
- procedure TINT_IFS1.setDMA6IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- procedure TINT_IFS1.clearDMA6IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00400000;
- end;
- procedure TINT_IFS1.setDMA6IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00400000
- else
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- function TINT_IFS1.getDMA6IF : TBits_1; inline;
- begin
- getDMA6IF := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
- end;
- procedure TINT_IFS1.setDMA7IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- procedure TINT_IFS1.clearDMA7IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00800000;
- end;
- procedure TINT_IFS1.setDMA7IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00800000
- else
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- function TINT_IFS1.getDMA7IF : TBits_1; inline;
- begin
- getDMA7IF := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
- end;
- procedure TINT_IFS1.setFCEIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- procedure TINT_IFS1.clearFCEIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $01000000;
- end;
- procedure TINT_IFS1.setFCEIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $01000000
- else
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- function TINT_IFS1.getFCEIF : TBits_1; inline;
- begin
- getFCEIF := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
- end;
- procedure TINT_IFS1.setUSBIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $02000000;
- end;
- procedure TINT_IFS1.clearUSBIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $02000000;
- end;
- procedure TINT_IFS1.setUSBIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $02000000
- else
- pTDefRegMap(@Self)^.&set := $02000000;
- end;
- function TINT_IFS1.getUSBIF : TBits_1; inline;
- begin
- getUSBIF := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
- end;
- procedure TINT_IFS1.setETHIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- procedure TINT_IFS1.clearETHIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $10000000;
- end;
- procedure TINT_IFS1.setETHIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $10000000
- else
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- function TINT_IFS1.getETHIF : TBits_1; inline;
- begin
- getETHIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
- end;
- procedure TINT_IFS1.setIC1EIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- procedure TINT_IFS1.clearIC1EIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $20000000;
- end;
- procedure TINT_IFS1.setIC1EIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $20000000
- else
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- function TINT_IFS1.getIC1EIF : TBits_1; inline;
- begin
- getIC1EIF := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
- end;
- procedure TINT_IFS1.setIC2EIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- procedure TINT_IFS1.clearIC2EIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $40000000;
- end;
- procedure TINT_IFS1.setIC2EIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $40000000
- else
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- function TINT_IFS1.getIC2EIF : TBits_1; inline;
- begin
- getIC2EIF := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
- end;
- procedure TINT_IFS1.setIC3EIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- procedure TINT_IFS1.clearIC3EIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $80000000;
- end;
- procedure TINT_IFS1.setIC3EIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $80000000
- else
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- function TINT_IFS1.getIC3EIF : TBits_1; inline;
- begin
- getIC3EIF := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
- end;
- procedure TINT_IFS1.setU2AEIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TINT_IFS1.clearU2AEIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TINT_IFS1.setU2AEIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TINT_IFS1.getU2AEIF : TBits_1; inline;
- begin
- getU2AEIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TINT_IFS1.setU2ARXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TINT_IFS1.clearU2ARXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TINT_IFS1.setU2ARXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TINT_IFS1.getU2ARXIF : TBits_1; inline;
- begin
- getU2ARXIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TINT_IFS1.setU2ATXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TINT_IFS1.clearU2ATXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TINT_IFS1.setU2ATXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TINT_IFS1.getU2ATXIF : TBits_1; inline;
- begin
- getU2ATXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TINT_IFS1.setU3AEIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TINT_IFS1.clearU3AEIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TINT_IFS1.setU3AEIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TINT_IFS1.getU3AEIF : TBits_1; inline;
- begin
- getU3AEIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TINT_IFS1.setU3ARXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TINT_IFS1.clearU3ARXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TINT_IFS1.setU3ARXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TINT_IFS1.getU3ARXIF : TBits_1; inline;
- begin
- getU3ARXIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TINT_IFS1.setU3ATXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TINT_IFS1.clearU3ATXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TINT_IFS1.setU3ATXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TINT_IFS1.getU3ATXIF : TBits_1; inline;
- begin
- getU3ATXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TINT_IFS1.setSPI2EIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TINT_IFS1.clearSPI2EIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TINT_IFS1.setSPI2EIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TINT_IFS1.getSPI2EIF : TBits_1; inline;
- begin
- getSPI2EIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TINT_IFS1.setSPI2RXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TINT_IFS1.clearSPI2RXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TINT_IFS1.setSPI2RXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TINT_IFS1.getSPI2RXIF : TBits_1; inline;
- begin
- getSPI2RXIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TINT_IFS1.setSPI2TXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TINT_IFS1.clearSPI2TXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TINT_IFS1.setSPI2TXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TINT_IFS1.getSPI2TXIF : TBits_1; inline;
- begin
- getSPI2TXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TINT_IFS1.setSPI4EIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TINT_IFS1.clearSPI4EIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TINT_IFS1.setSPI4EIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TINT_IFS1.getSPI4EIF : TBits_1; inline;
- begin
- getSPI4EIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TINT_IFS1.setSPI4RXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TINT_IFS1.clearSPI4RXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TINT_IFS1.setSPI4RXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TINT_IFS1.getSPI4RXIF : TBits_1; inline;
- begin
- getSPI4RXIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TINT_IFS1.setSPI4TXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TINT_IFS1.clearSPI4TXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TINT_IFS1.setSPI4TXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TINT_IFS1.getSPI4TXIF : TBits_1; inline;
- begin
- getSPI4TXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TINT_IFS1.setSPI2AEIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TINT_IFS1.clearSPI2AEIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TINT_IFS1.setSPI2AEIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TINT_IFS1.getSPI2AEIF : TBits_1; inline;
- begin
- getSPI2AEIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TINT_IFS1.setSPI2ARXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TINT_IFS1.clearSPI2ARXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TINT_IFS1.setSPI2ARXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TINT_IFS1.getSPI2ARXIF : TBits_1; inline;
- begin
- getSPI2ARXIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TINT_IFS1.setSPI2ATXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TINT_IFS1.clearSPI2ATXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TINT_IFS1.setSPI2ATXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TINT_IFS1.getSPI2ATXIF : TBits_1; inline;
- begin
- getSPI2ATXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TINT_IFS1.setSPI3AEIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TINT_IFS1.clearSPI3AEIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TINT_IFS1.setSPI3AEIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TINT_IFS1.getSPI3AEIF : TBits_1; inline;
- begin
- getSPI3AEIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TINT_IFS1.setSPI3ARXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TINT_IFS1.clearSPI3ARXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TINT_IFS1.setSPI3ARXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TINT_IFS1.getSPI3ARXIF : TBits_1; inline;
- begin
- getSPI3ARXIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TINT_IFS1.setSPI3ATXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TINT_IFS1.clearSPI3ATXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TINT_IFS1.setSPI3ATXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TINT_IFS1.getSPI3ATXIF : TBits_1; inline;
- begin
- getSPI3ATXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TINT_IFS1.setI2C4BIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TINT_IFS1.clearI2C4BIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TINT_IFS1.setI2C4BIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TINT_IFS1.getI2C4BIF : TBits_1; inline;
- begin
- getI2C4BIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TINT_IFS1.setI2C4SIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TINT_IFS1.clearI2C4SIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TINT_IFS1.setI2C4SIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TINT_IFS1.getI2C4SIF : TBits_1; inline;
- begin
- getI2C4SIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TINT_IFS1.setI2C4MIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TINT_IFS1.clearI2C4MIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TINT_IFS1.setI2C4MIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TINT_IFS1.getI2C4MIF : TBits_1; inline;
- begin
- getI2C4MIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TINT_IFS1.setI2C5BIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TINT_IFS1.clearI2C5BIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TINT_IFS1.setI2C5BIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TINT_IFS1.getI2C5BIF : TBits_1; inline;
- begin
- getI2C5BIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TINT_IFS1.setI2C5SIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TINT_IFS1.clearI2C5SIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TINT_IFS1.setI2C5SIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TINT_IFS1.getI2C5SIF : TBits_1; inline;
- begin
- getI2C5SIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TINT_IFS1.setI2C5MIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TINT_IFS1.clearI2C5MIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TINT_IFS1.setI2C5MIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TINT_IFS1.getI2C5MIF : TBits_1; inline;
- begin
- getI2C5MIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TINT_IFS1.setI2C2ABIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TINT_IFS1.clearI2C2ABIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TINT_IFS1.setI2C2ABIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TINT_IFS1.getI2C2ABIF : TBits_1; inline;
- begin
- getI2C2ABIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TINT_IFS1.setI2C2ASIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TINT_IFS1.clearI2C2ASIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TINT_IFS1.setI2C2ASIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TINT_IFS1.getI2C2ASIF : TBits_1; inline;
- begin
- getI2C2ASIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TINT_IFS1.setI2C2AMIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TINT_IFS1.clearI2C2AMIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TINT_IFS1.setI2C2AMIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TINT_IFS1.getI2C2AMIF : TBits_1; inline;
- begin
- getI2C2AMIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TINT_IFS1.setI2C3ABIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TINT_IFS1.clearI2C3ABIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TINT_IFS1.setI2C3ABIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TINT_IFS1.getI2C3ABIF : TBits_1; inline;
- begin
- getI2C3ABIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TINT_IFS1.setI2C3ASIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TINT_IFS1.clearI2C3ASIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TINT_IFS1.setI2C3ASIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TINT_IFS1.getI2C3ASIF : TBits_1; inline;
- begin
- getI2C3ASIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TINT_IFS1.setI2C3AMIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TINT_IFS1.clearI2C3AMIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TINT_IFS1.setI2C3AMIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TINT_IFS1.getI2C3AMIF : TBits_1; inline;
- begin
- getI2C3AMIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TINT_IFS1.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TINT_IFS1.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TINT_IFS2.setIC4EIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TINT_IFS2.clearIC4EIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TINT_IFS2.setIC4EIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TINT_IFS2.getIC4EIF : TBits_1; inline;
- begin
- getIC4EIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TINT_IFS2.setIC5EIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TINT_IFS2.clearIC5EIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TINT_IFS2.setIC5EIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TINT_IFS2.getIC5EIF : TBits_1; inline;
- begin
- getIC5EIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TINT_IFS2.setPMPEIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TINT_IFS2.clearPMPEIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TINT_IFS2.setPMPEIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TINT_IFS2.getPMPEIF : TBits_1; inline;
- begin
- getPMPEIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TINT_IFS2.setU1BEIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TINT_IFS2.clearU1BEIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TINT_IFS2.setU1BEIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TINT_IFS2.getU1BEIF : TBits_1; inline;
- begin
- getU1BEIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TINT_IFS2.setU1BRXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TINT_IFS2.clearU1BRXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TINT_IFS2.setU1BRXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TINT_IFS2.getU1BRXIF : TBits_1; inline;
- begin
- getU1BRXIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TINT_IFS2.setU1BTXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TINT_IFS2.clearU1BTXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TINT_IFS2.setU1BTXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TINT_IFS2.getU1BTXIF : TBits_1; inline;
- begin
- getU1BTXIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TINT_IFS2.setU2BEIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TINT_IFS2.clearU2BEIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TINT_IFS2.setU2BEIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TINT_IFS2.getU2BEIF : TBits_1; inline;
- begin
- getU2BEIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TINT_IFS2.setU2BRXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TINT_IFS2.clearU2BRXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TINT_IFS2.setU2BRXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TINT_IFS2.getU2BRXIF : TBits_1; inline;
- begin
- getU2BRXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TINT_IFS2.setU2BTXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TINT_IFS2.clearU2BTXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TINT_IFS2.setU2BTXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TINT_IFS2.getU2BTXIF : TBits_1; inline;
- begin
- getU2BTXIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TINT_IFS2.setU3BEIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TINT_IFS2.clearU3BEIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TINT_IFS2.setU3BEIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TINT_IFS2.getU3BEIF : TBits_1; inline;
- begin
- getU3BEIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TINT_IFS2.setU3BRXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TINT_IFS2.clearU3BRXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TINT_IFS2.setU3BRXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TINT_IFS2.getU3BRXIF : TBits_1; inline;
- begin
- getU3BRXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TINT_IFS2.setU3BTXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TINT_IFS2.clearU3BTXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TINT_IFS2.setU3BTXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TINT_IFS2.getU3BTXIF : TBits_1; inline;
- begin
- getU3BTXIF := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TINT_IFS2.setU4EIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TINT_IFS2.clearU4EIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TINT_IFS2.setU4EIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TINT_IFS2.getU4EIF : TBits_1; inline;
- begin
- getU4EIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TINT_IFS2.setU4RXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TINT_IFS2.clearU4RXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TINT_IFS2.setU4RXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TINT_IFS2.getU4RXIF : TBits_1; inline;
- begin
- getU4RXIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TINT_IFS2.setU4TXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TINT_IFS2.clearU4TXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TINT_IFS2.setU4TXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TINT_IFS2.getU4TXIF : TBits_1; inline;
- begin
- getU4TXIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TINT_IFS2.setU6EIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TINT_IFS2.clearU6EIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TINT_IFS2.setU6EIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TINT_IFS2.getU6EIF : TBits_1; inline;
- begin
- getU6EIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TINT_IFS2.setU6RXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TINT_IFS2.clearU6RXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TINT_IFS2.setU6RXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TINT_IFS2.getU6RXIF : TBits_1; inline;
- begin
- getU6RXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TINT_IFS2.setU6TXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TINT_IFS2.clearU6TXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TINT_IFS2.setU6TXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TINT_IFS2.getU6TXIF : TBits_1; inline;
- begin
- getU6TXIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TINT_IFS2.setU5EIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TINT_IFS2.clearU5EIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TINT_IFS2.setU5EIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TINT_IFS2.getU5EIF : TBits_1; inline;
- begin
- getU5EIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TINT_IFS2.setU5RXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TINT_IFS2.clearU5RXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TINT_IFS2.setU5RXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TINT_IFS2.getU5RXIF : TBits_1; inline;
- begin
- getU5RXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TINT_IFS2.setU5TXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TINT_IFS2.clearU5TXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TINT_IFS2.setU5TXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TINT_IFS2.getU5TXIF : TBits_1; inline;
- begin
- getU5TXIF := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TINT_IFS2.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TINT_IFS2.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TINT_IEC0.setCTIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TINT_IEC0.clearCTIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TINT_IEC0.setCTIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TINT_IEC0.getCTIE : TBits_1; inline;
- begin
- getCTIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TINT_IEC0.setCS0IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TINT_IEC0.clearCS0IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TINT_IEC0.setCS0IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TINT_IEC0.getCS0IE : TBits_1; inline;
- begin
- getCS0IE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TINT_IEC0.setCS1IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TINT_IEC0.clearCS1IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TINT_IEC0.setCS1IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TINT_IEC0.getCS1IE : TBits_1; inline;
- begin
- getCS1IE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TINT_IEC0.setINT0IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TINT_IEC0.clearINT0IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TINT_IEC0.setINT0IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TINT_IEC0.getINT0IE : TBits_1; inline;
- begin
- getINT0IE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TINT_IEC0.setT1IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TINT_IEC0.clearT1IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TINT_IEC0.setT1IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TINT_IEC0.getT1IE : TBits_1; inline;
- begin
- getT1IE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TINT_IEC0.setIC1IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TINT_IEC0.clearIC1IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TINT_IEC0.setIC1IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TINT_IEC0.getIC1IE : TBits_1; inline;
- begin
- getIC1IE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TINT_IEC0.setOC1IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TINT_IEC0.clearOC1IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TINT_IEC0.setOC1IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TINT_IEC0.getOC1IE : TBits_1; inline;
- begin
- getOC1IE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TINT_IEC0.setINT1IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TINT_IEC0.clearINT1IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TINT_IEC0.setINT1IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TINT_IEC0.getINT1IE : TBits_1; inline;
- begin
- getINT1IE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TINT_IEC0.setT2IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TINT_IEC0.clearT2IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TINT_IEC0.setT2IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TINT_IEC0.getT2IE : TBits_1; inline;
- begin
- getT2IE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TINT_IEC0.setIC2IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TINT_IEC0.clearIC2IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TINT_IEC0.setIC2IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TINT_IEC0.getIC2IE : TBits_1; inline;
- begin
- getIC2IE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TINT_IEC0.setOC2IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TINT_IEC0.clearOC2IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TINT_IEC0.setOC2IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TINT_IEC0.getOC2IE : TBits_1; inline;
- begin
- getOC2IE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TINT_IEC0.setINT2IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TINT_IEC0.clearINT2IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TINT_IEC0.setINT2IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TINT_IEC0.getINT2IE : TBits_1; inline;
- begin
- getINT2IE := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TINT_IEC0.setT3IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TINT_IEC0.clearT3IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TINT_IEC0.setT3IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TINT_IEC0.getT3IE : TBits_1; inline;
- begin
- getT3IE := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TINT_IEC0.setIC3IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TINT_IEC0.clearIC3IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TINT_IEC0.setIC3IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TINT_IEC0.getIC3IE : TBits_1; inline;
- begin
- getIC3IE := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TINT_IEC0.setOC3IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TINT_IEC0.clearOC3IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TINT_IEC0.setOC3IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TINT_IEC0.getOC3IE : TBits_1; inline;
- begin
- getOC3IE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TINT_IEC0.setINT3IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TINT_IEC0.clearINT3IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TINT_IEC0.setINT3IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TINT_IEC0.getINT3IE : TBits_1; inline;
- begin
- getINT3IE := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TINT_IEC0.setT4IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- procedure TINT_IEC0.clearT4IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00010000;
- end;
- procedure TINT_IEC0.setT4IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00010000
- else
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- function TINT_IEC0.getT4IE : TBits_1; inline;
- begin
- getT4IE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
- end;
- procedure TINT_IEC0.setIC4IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- procedure TINT_IEC0.clearIC4IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00020000;
- end;
- procedure TINT_IEC0.setIC4IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00020000
- else
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- function TINT_IEC0.getIC4IE : TBits_1; inline;
- begin
- getIC4IE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
- end;
- procedure TINT_IEC0.setOC4IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- procedure TINT_IEC0.clearOC4IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00040000;
- end;
- procedure TINT_IEC0.setOC4IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00040000
- else
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- function TINT_IEC0.getOC4IE : TBits_1; inline;
- begin
- getOC4IE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
- end;
- procedure TINT_IEC0.setINT4IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- procedure TINT_IEC0.clearINT4IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00080000;
- end;
- procedure TINT_IEC0.setINT4IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00080000
- else
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- function TINT_IEC0.getINT4IE : TBits_1; inline;
- begin
- getINT4IE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
- end;
- procedure TINT_IEC0.setT5IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- procedure TINT_IEC0.clearT5IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00100000;
- end;
- procedure TINT_IEC0.setT5IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00100000
- else
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- function TINT_IEC0.getT5IE : TBits_1; inline;
- begin
- getT5IE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
- end;
- procedure TINT_IEC0.setIC5IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- procedure TINT_IEC0.clearIC5IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00200000;
- end;
- procedure TINT_IEC0.setIC5IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00200000
- else
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- function TINT_IEC0.getIC5IE : TBits_1; inline;
- begin
- getIC5IE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
- end;
- procedure TINT_IEC0.setOC5IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- procedure TINT_IEC0.clearOC5IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00400000;
- end;
- procedure TINT_IEC0.setOC5IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00400000
- else
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- function TINT_IEC0.getOC5IE : TBits_1; inline;
- begin
- getOC5IE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
- end;
- procedure TINT_IEC0.setSPI1EIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- procedure TINT_IEC0.clearSPI1EIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00800000;
- end;
- procedure TINT_IEC0.setSPI1EIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00800000
- else
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- function TINT_IEC0.getSPI1EIE : TBits_1; inline;
- begin
- getSPI1EIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
- end;
- procedure TINT_IEC0.setSPI1RXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- procedure TINT_IEC0.clearSPI1RXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $01000000;
- end;
- procedure TINT_IEC0.setSPI1RXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $01000000
- else
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- function TINT_IEC0.getSPI1RXIE : TBits_1; inline;
- begin
- getSPI1RXIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
- end;
- procedure TINT_IEC0.setSPI1TXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $02000000;
- end;
- procedure TINT_IEC0.clearSPI1TXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $02000000;
- end;
- procedure TINT_IEC0.setSPI1TXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $02000000
- else
- pTDefRegMap(@Self)^.&set := $02000000;
- end;
- function TINT_IEC0.getSPI1TXIE : TBits_1; inline;
- begin
- getSPI1TXIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
- end;
- procedure TINT_IEC0.setU1EIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- procedure TINT_IEC0.clearU1EIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $04000000;
- end;
- procedure TINT_IEC0.setU1EIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $04000000
- else
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- function TINT_IEC0.getU1EIE : TBits_1; inline;
- begin
- getU1EIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
- end;
- procedure TINT_IEC0.setU1RXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- procedure TINT_IEC0.clearU1RXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $08000000;
- end;
- procedure TINT_IEC0.setU1RXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $08000000
- else
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- function TINT_IEC0.getU1RXIE : TBits_1; inline;
- begin
- getU1RXIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
- end;
- procedure TINT_IEC0.setU1TXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- procedure TINT_IEC0.clearU1TXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $10000000;
- end;
- procedure TINT_IEC0.setU1TXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $10000000
- else
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- function TINT_IEC0.getU1TXIE : TBits_1; inline;
- begin
- getU1TXIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
- end;
- procedure TINT_IEC0.setI2C1BIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- procedure TINT_IEC0.clearI2C1BIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $20000000;
- end;
- procedure TINT_IEC0.setI2C1BIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $20000000
- else
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- function TINT_IEC0.getI2C1BIE : TBits_1; inline;
- begin
- getI2C1BIE := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
- end;
- procedure TINT_IEC0.setI2C1SIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- procedure TINT_IEC0.clearI2C1SIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $40000000;
- end;
- procedure TINT_IEC0.setI2C1SIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $40000000
- else
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- function TINT_IEC0.getI2C1SIE : TBits_1; inline;
- begin
- getI2C1SIE := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
- end;
- procedure TINT_IEC0.setI2C1MIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- procedure TINT_IEC0.clearI2C1MIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $80000000;
- end;
- procedure TINT_IEC0.setI2C1MIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $80000000
- else
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- function TINT_IEC0.getI2C1MIE : TBits_1; inline;
- begin
- getI2C1MIE := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
- end;
- procedure TINT_IEC0.setU1AEIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- procedure TINT_IEC0.clearU1AEIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $04000000;
- end;
- procedure TINT_IEC0.setU1AEIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $04000000
- else
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- function TINT_IEC0.getU1AEIE : TBits_1; inline;
- begin
- getU1AEIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
- end;
- procedure TINT_IEC0.setU1ARXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- procedure TINT_IEC0.clearU1ARXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $08000000;
- end;
- procedure TINT_IEC0.setU1ARXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $08000000
- else
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- function TINT_IEC0.getU1ARXIE : TBits_1; inline;
- begin
- getU1ARXIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
- end;
- procedure TINT_IEC0.setU1ATXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- procedure TINT_IEC0.clearU1ATXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $10000000;
- end;
- procedure TINT_IEC0.setU1ATXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $10000000
- else
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- function TINT_IEC0.getU1ATXIE : TBits_1; inline;
- begin
- getU1ATXIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
- end;
- procedure TINT_IEC0.setSPI3EIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- procedure TINT_IEC0.clearSPI3EIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $04000000;
- end;
- procedure TINT_IEC0.setSPI3EIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $04000000
- else
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- function TINT_IEC0.getSPI3EIE : TBits_1; inline;
- begin
- getSPI3EIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
- end;
- procedure TINT_IEC0.setSPI3RXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- procedure TINT_IEC0.clearSPI3RXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $08000000;
- end;
- procedure TINT_IEC0.setSPI3RXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $08000000
- else
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- function TINT_IEC0.getSPI3RXIE : TBits_1; inline;
- begin
- getSPI3RXIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
- end;
- procedure TINT_IEC0.setSPI3TXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- procedure TINT_IEC0.clearSPI3TXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $10000000;
- end;
- procedure TINT_IEC0.setSPI3TXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $10000000
- else
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- function TINT_IEC0.getSPI3TXIE : TBits_1; inline;
- begin
- getSPI3TXIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
- end;
- procedure TINT_IEC0.setSPI1AEIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- procedure TINT_IEC0.clearSPI1AEIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $04000000;
- end;
- procedure TINT_IEC0.setSPI1AEIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $04000000
- else
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- function TINT_IEC0.getSPI1AEIE : TBits_1; inline;
- begin
- getSPI1AEIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
- end;
- procedure TINT_IEC0.setSPI1ARXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- procedure TINT_IEC0.clearSPI1ARXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $08000000;
- end;
- procedure TINT_IEC0.setSPI1ARXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $08000000
- else
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- function TINT_IEC0.getSPI1ARXIE : TBits_1; inline;
- begin
- getSPI1ARXIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
- end;
- procedure TINT_IEC0.setSPI1ATXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- procedure TINT_IEC0.clearSPI1ATXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $10000000;
- end;
- procedure TINT_IEC0.setSPI1ATXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $10000000
- else
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- function TINT_IEC0.getSPI1ATXIE : TBits_1; inline;
- begin
- getSPI1ATXIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
- end;
- procedure TINT_IEC0.setI2C3BIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- procedure TINT_IEC0.clearI2C3BIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $04000000;
- end;
- procedure TINT_IEC0.setI2C3BIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $04000000
- else
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- function TINT_IEC0.getI2C3BIE : TBits_1; inline;
- begin
- getI2C3BIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
- end;
- procedure TINT_IEC0.setI2C3SIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- procedure TINT_IEC0.clearI2C3SIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $08000000;
- end;
- procedure TINT_IEC0.setI2C3SIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $08000000
- else
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- function TINT_IEC0.getI2C3SIE : TBits_1; inline;
- begin
- getI2C3SIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
- end;
- procedure TINT_IEC0.setI2C3MIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- procedure TINT_IEC0.clearI2C3MIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $10000000;
- end;
- procedure TINT_IEC0.setI2C3MIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $10000000
- else
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- function TINT_IEC0.getI2C3MIE : TBits_1; inline;
- begin
- getI2C3MIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
- end;
- procedure TINT_IEC0.setI2C1ABIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- procedure TINT_IEC0.clearI2C1ABIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $04000000;
- end;
- procedure TINT_IEC0.setI2C1ABIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $04000000
- else
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- function TINT_IEC0.getI2C1ABIE : TBits_1; inline;
- begin
- getI2C1ABIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
- end;
- procedure TINT_IEC0.setI2C1ASIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- procedure TINT_IEC0.clearI2C1ASIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $08000000;
- end;
- procedure TINT_IEC0.setI2C1ASIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $08000000
- else
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- function TINT_IEC0.getI2C1ASIE : TBits_1; inline;
- begin
- getI2C1ASIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
- end;
- procedure TINT_IEC0.setI2C1AMIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- procedure TINT_IEC0.clearI2C1AMIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $10000000;
- end;
- procedure TINT_IEC0.setI2C1AMIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $10000000
- else
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- function TINT_IEC0.getI2C1AMIE : TBits_1; inline;
- begin
- getI2C1AMIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
- end;
- procedure TINT_IEC0.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TINT_IEC0.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TINT_IEC1.setCNIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TINT_IEC1.clearCNIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TINT_IEC1.setCNIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TINT_IEC1.getCNIE : TBits_1; inline;
- begin
- getCNIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TINT_IEC1.setAD1IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TINT_IEC1.clearAD1IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TINT_IEC1.setAD1IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TINT_IEC1.getAD1IE : TBits_1; inline;
- begin
- getAD1IE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TINT_IEC1.setPMPIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TINT_IEC1.clearPMPIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TINT_IEC1.setPMPIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TINT_IEC1.getPMPIE : TBits_1; inline;
- begin
- getPMPIE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TINT_IEC1.setCMP1IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TINT_IEC1.clearCMP1IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TINT_IEC1.setCMP1IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TINT_IEC1.getCMP1IE : TBits_1; inline;
- begin
- getCMP1IE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TINT_IEC1.setCMP2IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TINT_IEC1.clearCMP2IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TINT_IEC1.setCMP2IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TINT_IEC1.getCMP2IE : TBits_1; inline;
- begin
- getCMP2IE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TINT_IEC1.setU3EIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TINT_IEC1.clearU3EIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TINT_IEC1.setU3EIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TINT_IEC1.getU3EIE : TBits_1; inline;
- begin
- getU3EIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TINT_IEC1.setU3RXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TINT_IEC1.clearU3RXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TINT_IEC1.setU3RXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TINT_IEC1.getU3RXIE : TBits_1; inline;
- begin
- getU3RXIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TINT_IEC1.setU3TXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TINT_IEC1.clearU3TXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TINT_IEC1.setU3TXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TINT_IEC1.getU3TXIE : TBits_1; inline;
- begin
- getU3TXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TINT_IEC1.setU2EIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TINT_IEC1.clearU2EIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TINT_IEC1.setU2EIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TINT_IEC1.getU2EIE : TBits_1; inline;
- begin
- getU2EIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TINT_IEC1.setU2RXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TINT_IEC1.clearU2RXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TINT_IEC1.setU2RXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TINT_IEC1.getU2RXIE : TBits_1; inline;
- begin
- getU2RXIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TINT_IEC1.setU2TXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TINT_IEC1.clearU2TXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TINT_IEC1.setU2TXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TINT_IEC1.getU2TXIE : TBits_1; inline;
- begin
- getU2TXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TINT_IEC1.setI2C2BIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TINT_IEC1.clearI2C2BIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TINT_IEC1.setI2C2BIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TINT_IEC1.getI2C2BIE : TBits_1; inline;
- begin
- getI2C2BIE := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TINT_IEC1.setI2C2SIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TINT_IEC1.clearI2C2SIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TINT_IEC1.setI2C2SIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TINT_IEC1.getI2C2SIE : TBits_1; inline;
- begin
- getI2C2SIE := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TINT_IEC1.setI2C2MIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TINT_IEC1.clearI2C2MIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TINT_IEC1.setI2C2MIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TINT_IEC1.getI2C2MIE : TBits_1; inline;
- begin
- getI2C2MIE := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TINT_IEC1.setFSCMIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TINT_IEC1.clearFSCMIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TINT_IEC1.setFSCMIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TINT_IEC1.getFSCMIE : TBits_1; inline;
- begin
- getFSCMIE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TINT_IEC1.setRTCCIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TINT_IEC1.clearRTCCIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TINT_IEC1.setRTCCIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TINT_IEC1.getRTCCIE : TBits_1; inline;
- begin
- getRTCCIE := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TINT_IEC1.setDMA0IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- procedure TINT_IEC1.clearDMA0IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00010000;
- end;
- procedure TINT_IEC1.setDMA0IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00010000
- else
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- function TINT_IEC1.getDMA0IE : TBits_1; inline;
- begin
- getDMA0IE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
- end;
- procedure TINT_IEC1.setDMA1IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- procedure TINT_IEC1.clearDMA1IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00020000;
- end;
- procedure TINT_IEC1.setDMA1IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00020000
- else
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- function TINT_IEC1.getDMA1IE : TBits_1; inline;
- begin
- getDMA1IE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
- end;
- procedure TINT_IEC1.setDMA2IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- procedure TINT_IEC1.clearDMA2IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00040000;
- end;
- procedure TINT_IEC1.setDMA2IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00040000
- else
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- function TINT_IEC1.getDMA2IE : TBits_1; inline;
- begin
- getDMA2IE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
- end;
- procedure TINT_IEC1.setDMA3IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- procedure TINT_IEC1.clearDMA3IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00080000;
- end;
- procedure TINT_IEC1.setDMA3IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00080000
- else
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- function TINT_IEC1.getDMA3IE : TBits_1; inline;
- begin
- getDMA3IE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
- end;
- procedure TINT_IEC1.setDMA4IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- procedure TINT_IEC1.clearDMA4IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00100000;
- end;
- procedure TINT_IEC1.setDMA4IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00100000
- else
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- function TINT_IEC1.getDMA4IE : TBits_1; inline;
- begin
- getDMA4IE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
- end;
- procedure TINT_IEC1.setDMA5IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- procedure TINT_IEC1.clearDMA5IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00200000;
- end;
- procedure TINT_IEC1.setDMA5IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00200000
- else
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- function TINT_IEC1.getDMA5IE : TBits_1; inline;
- begin
- getDMA5IE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
- end;
- procedure TINT_IEC1.setDMA6IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- procedure TINT_IEC1.clearDMA6IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00400000;
- end;
- procedure TINT_IEC1.setDMA6IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00400000
- else
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- function TINT_IEC1.getDMA6IE : TBits_1; inline;
- begin
- getDMA6IE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
- end;
- procedure TINT_IEC1.setDMA7IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- procedure TINT_IEC1.clearDMA7IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00800000;
- end;
- procedure TINT_IEC1.setDMA7IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00800000
- else
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- function TINT_IEC1.getDMA7IE : TBits_1; inline;
- begin
- getDMA7IE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
- end;
- procedure TINT_IEC1.setFCEIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- procedure TINT_IEC1.clearFCEIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $01000000;
- end;
- procedure TINT_IEC1.setFCEIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $01000000
- else
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- function TINT_IEC1.getFCEIE : TBits_1; inline;
- begin
- getFCEIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
- end;
- procedure TINT_IEC1.setUSBIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $02000000;
- end;
- procedure TINT_IEC1.clearUSBIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $02000000;
- end;
- procedure TINT_IEC1.setUSBIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $02000000
- else
- pTDefRegMap(@Self)^.&set := $02000000;
- end;
- function TINT_IEC1.getUSBIE : TBits_1; inline;
- begin
- getUSBIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
- end;
- procedure TINT_IEC1.setETHIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- procedure TINT_IEC1.clearETHIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $10000000;
- end;
- procedure TINT_IEC1.setETHIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $10000000
- else
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- function TINT_IEC1.getETHIE : TBits_1; inline;
- begin
- getETHIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
- end;
- procedure TINT_IEC1.setIC1EIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- procedure TINT_IEC1.clearIC1EIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $20000000;
- end;
- procedure TINT_IEC1.setIC1EIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $20000000
- else
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- function TINT_IEC1.getIC1EIE : TBits_1; inline;
- begin
- getIC1EIE := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
- end;
- procedure TINT_IEC1.setIC2EIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- procedure TINT_IEC1.clearIC2EIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $40000000;
- end;
- procedure TINT_IEC1.setIC2EIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $40000000
- else
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- function TINT_IEC1.getIC2EIE : TBits_1; inline;
- begin
- getIC2EIE := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
- end;
- procedure TINT_IEC1.setIC3EIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- procedure TINT_IEC1.clearIC3EIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $80000000;
- end;
- procedure TINT_IEC1.setIC3EIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $80000000
- else
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- function TINT_IEC1.getIC3EIE : TBits_1; inline;
- begin
- getIC3EIE := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
- end;
- procedure TINT_IEC1.setU2AEIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TINT_IEC1.clearU2AEIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TINT_IEC1.setU2AEIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TINT_IEC1.getU2AEIE : TBits_1; inline;
- begin
- getU2AEIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TINT_IEC1.setU2ARXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TINT_IEC1.clearU2ARXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TINT_IEC1.setU2ARXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TINT_IEC1.getU2ARXIE : TBits_1; inline;
- begin
- getU2ARXIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TINT_IEC1.setU2ATXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TINT_IEC1.clearU2ATXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TINT_IEC1.setU2ATXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TINT_IEC1.getU2ATXIE : TBits_1; inline;
- begin
- getU2ATXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TINT_IEC1.setU3AEIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TINT_IEC1.clearU3AEIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TINT_IEC1.setU3AEIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TINT_IEC1.getU3AEIE : TBits_1; inline;
- begin
- getU3AEIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TINT_IEC1.setU3ARXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TINT_IEC1.clearU3ARXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TINT_IEC1.setU3ARXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TINT_IEC1.getU3ARXIE : TBits_1; inline;
- begin
- getU3ARXIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TINT_IEC1.setU3ATXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TINT_IEC1.clearU3ATXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TINT_IEC1.setU3ATXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TINT_IEC1.getU3ATXIE : TBits_1; inline;
- begin
- getU3ATXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TINT_IEC1.setSPI2EIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TINT_IEC1.clearSPI2EIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TINT_IEC1.setSPI2EIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TINT_IEC1.getSPI2EIE : TBits_1; inline;
- begin
- getSPI2EIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TINT_IEC1.setSPI2RXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TINT_IEC1.clearSPI2RXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TINT_IEC1.setSPI2RXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TINT_IEC1.getSPI2RXIE : TBits_1; inline;
- begin
- getSPI2RXIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TINT_IEC1.setSPI2TXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TINT_IEC1.clearSPI2TXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TINT_IEC1.setSPI2TXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TINT_IEC1.getSPI2TXIE : TBits_1; inline;
- begin
- getSPI2TXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TINT_IEC1.setSPI4EIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TINT_IEC1.clearSPI4EIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TINT_IEC1.setSPI4EIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TINT_IEC1.getSPI4EIE : TBits_1; inline;
- begin
- getSPI4EIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TINT_IEC1.setSPI4RXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TINT_IEC1.clearSPI4RXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TINT_IEC1.setSPI4RXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TINT_IEC1.getSPI4RXIE : TBits_1; inline;
- begin
- getSPI4RXIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TINT_IEC1.setSPI4TXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TINT_IEC1.clearSPI4TXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TINT_IEC1.setSPI4TXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TINT_IEC1.getSPI4TXIE : TBits_1; inline;
- begin
- getSPI4TXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TINT_IEC1.setSPI2AEIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TINT_IEC1.clearSPI2AEIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TINT_IEC1.setSPI2AEIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TINT_IEC1.getSPI2AEIE : TBits_1; inline;
- begin
- getSPI2AEIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TINT_IEC1.setSPI2ARXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TINT_IEC1.clearSPI2ARXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TINT_IEC1.setSPI2ARXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TINT_IEC1.getSPI2ARXIE : TBits_1; inline;
- begin
- getSPI2ARXIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TINT_IEC1.setSPI2ATXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TINT_IEC1.clearSPI2ATXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TINT_IEC1.setSPI2ATXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TINT_IEC1.getSPI2ATXIE : TBits_1; inline;
- begin
- getSPI2ATXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TINT_IEC1.setSPI3AEIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TINT_IEC1.clearSPI3AEIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TINT_IEC1.setSPI3AEIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TINT_IEC1.getSPI3AEIE : TBits_1; inline;
- begin
- getSPI3AEIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TINT_IEC1.setSPI3ARXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TINT_IEC1.clearSPI3ARXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TINT_IEC1.setSPI3ARXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TINT_IEC1.getSPI3ARXIE : TBits_1; inline;
- begin
- getSPI3ARXIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TINT_IEC1.setSPI3ATXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TINT_IEC1.clearSPI3ATXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TINT_IEC1.setSPI3ATXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TINT_IEC1.getSPI3ATXIE : TBits_1; inline;
- begin
- getSPI3ATXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TINT_IEC1.setI2C4BIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TINT_IEC1.clearI2C4BIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TINT_IEC1.setI2C4BIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TINT_IEC1.getI2C4BIE : TBits_1; inline;
- begin
- getI2C4BIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TINT_IEC1.setI2C4SIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TINT_IEC1.clearI2C4SIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TINT_IEC1.setI2C4SIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TINT_IEC1.getI2C4SIE : TBits_1; inline;
- begin
- getI2C4SIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TINT_IEC1.setI2C4MIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TINT_IEC1.clearI2C4MIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TINT_IEC1.setI2C4MIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TINT_IEC1.getI2C4MIE : TBits_1; inline;
- begin
- getI2C4MIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TINT_IEC1.setI2C5BIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TINT_IEC1.clearI2C5BIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TINT_IEC1.setI2C5BIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TINT_IEC1.getI2C5BIE : TBits_1; inline;
- begin
- getI2C5BIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TINT_IEC1.setI2C5SIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TINT_IEC1.clearI2C5SIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TINT_IEC1.setI2C5SIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TINT_IEC1.getI2C5SIE : TBits_1; inline;
- begin
- getI2C5SIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TINT_IEC1.setI2C5MIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TINT_IEC1.clearI2C5MIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TINT_IEC1.setI2C5MIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TINT_IEC1.getI2C5MIE : TBits_1; inline;
- begin
- getI2C5MIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TINT_IEC1.setI2C2ABIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TINT_IEC1.clearI2C2ABIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TINT_IEC1.setI2C2ABIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TINT_IEC1.getI2C2ABIE : TBits_1; inline;
- begin
- getI2C2ABIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TINT_IEC1.setI2C2ASIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TINT_IEC1.clearI2C2ASIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TINT_IEC1.setI2C2ASIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TINT_IEC1.getI2C2ASIE : TBits_1; inline;
- begin
- getI2C2ASIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TINT_IEC1.setI2C2AMIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TINT_IEC1.clearI2C2AMIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TINT_IEC1.setI2C2AMIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TINT_IEC1.getI2C2AMIE : TBits_1; inline;
- begin
- getI2C2AMIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TINT_IEC1.setI2C3ABIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TINT_IEC1.clearI2C3ABIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TINT_IEC1.setI2C3ABIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TINT_IEC1.getI2C3ABIE : TBits_1; inline;
- begin
- getI2C3ABIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TINT_IEC1.setI2C3ASIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TINT_IEC1.clearI2C3ASIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TINT_IEC1.setI2C3ASIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TINT_IEC1.getI2C3ASIE : TBits_1; inline;
- begin
- getI2C3ASIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TINT_IEC1.setI2C3AMIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TINT_IEC1.clearI2C3AMIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TINT_IEC1.setI2C3AMIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TINT_IEC1.getI2C3AMIE : TBits_1; inline;
- begin
- getI2C3AMIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TINT_IEC1.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TINT_IEC1.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TINT_IEC2.setIC4EIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TINT_IEC2.clearIC4EIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TINT_IEC2.setIC4EIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TINT_IEC2.getIC4EIE : TBits_1; inline;
- begin
- getIC4EIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TINT_IEC2.setIC5EIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TINT_IEC2.clearIC5EIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TINT_IEC2.setIC5EIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TINT_IEC2.getIC5EIE : TBits_1; inline;
- begin
- getIC5EIE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TINT_IEC2.setPMPEIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TINT_IEC2.clearPMPEIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TINT_IEC2.setPMPEIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TINT_IEC2.getPMPEIE : TBits_1; inline;
- begin
- getPMPEIE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TINT_IEC2.setU1BEIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TINT_IEC2.clearU1BEIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TINT_IEC2.setU1BEIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TINT_IEC2.getU1BEIE : TBits_1; inline;
- begin
- getU1BEIE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TINT_IEC2.setU1BRXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TINT_IEC2.clearU1BRXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TINT_IEC2.setU1BRXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TINT_IEC2.getU1BRXIE : TBits_1; inline;
- begin
- getU1BRXIE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TINT_IEC2.setU1BTXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TINT_IEC2.clearU1BTXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TINT_IEC2.setU1BTXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TINT_IEC2.getU1BTXIE : TBits_1; inline;
- begin
- getU1BTXIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TINT_IEC2.setU2BEIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TINT_IEC2.clearU2BEIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TINT_IEC2.setU2BEIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TINT_IEC2.getU2BEIE : TBits_1; inline;
- begin
- getU2BEIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TINT_IEC2.setU2BRXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TINT_IEC2.clearU2BRXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TINT_IEC2.setU2BRXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TINT_IEC2.getU2BRXIE : TBits_1; inline;
- begin
- getU2BRXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TINT_IEC2.setU2BTXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TINT_IEC2.clearU2BTXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TINT_IEC2.setU2BTXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TINT_IEC2.getU2BTXIE : TBits_1; inline;
- begin
- getU2BTXIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TINT_IEC2.setU3BEIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TINT_IEC2.clearU3BEIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TINT_IEC2.setU3BEIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TINT_IEC2.getU3BEIE : TBits_1; inline;
- begin
- getU3BEIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TINT_IEC2.setU3BRXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TINT_IEC2.clearU3BRXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TINT_IEC2.setU3BRXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TINT_IEC2.getU3BRXIE : TBits_1; inline;
- begin
- getU3BRXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TINT_IEC2.setU3BTXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TINT_IEC2.clearU3BTXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TINT_IEC2.setU3BTXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TINT_IEC2.getU3BTXIE : TBits_1; inline;
- begin
- getU3BTXIE := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TINT_IEC2.setU4EIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TINT_IEC2.clearU4EIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TINT_IEC2.setU4EIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TINT_IEC2.getU4EIE : TBits_1; inline;
- begin
- getU4EIE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TINT_IEC2.setU4RXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TINT_IEC2.clearU4RXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TINT_IEC2.setU4RXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TINT_IEC2.getU4RXIE : TBits_1; inline;
- begin
- getU4RXIE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TINT_IEC2.setU4TXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TINT_IEC2.clearU4TXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TINT_IEC2.setU4TXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TINT_IEC2.getU4TXIE : TBits_1; inline;
- begin
- getU4TXIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TINT_IEC2.setU6EIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TINT_IEC2.clearU6EIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TINT_IEC2.setU6EIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TINT_IEC2.getU6EIE : TBits_1; inline;
- begin
- getU6EIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TINT_IEC2.setU6RXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TINT_IEC2.clearU6RXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TINT_IEC2.setU6RXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TINT_IEC2.getU6RXIE : TBits_1; inline;
- begin
- getU6RXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TINT_IEC2.setU6TXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TINT_IEC2.clearU6TXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TINT_IEC2.setU6TXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TINT_IEC2.getU6TXIE : TBits_1; inline;
- begin
- getU6TXIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TINT_IEC2.setU5EIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TINT_IEC2.clearU5EIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TINT_IEC2.setU5EIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TINT_IEC2.getU5EIE : TBits_1; inline;
- begin
- getU5EIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TINT_IEC2.setU5RXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TINT_IEC2.clearU5RXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TINT_IEC2.setU5RXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TINT_IEC2.getU5RXIE : TBits_1; inline;
- begin
- getU5RXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TINT_IEC2.setU5TXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TINT_IEC2.clearU5TXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TINT_IEC2.setU5TXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TINT_IEC2.getU5TXIE : TBits_1; inline;
- begin
- getU5TXIE := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TINT_IEC2.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TINT_IEC2.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TINT_IPC0.setCTIS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TINT_IPC0.getCTIS : TBits_2; inline;
- begin
- getCTIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TINT_IPC0.setCTIP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
- end;
- function TINT_IPC0.getCTIP : TBits_3; inline;
- begin
- getCTIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
- end;
- procedure TINT_IPC0.setCS0IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
- end;
- function TINT_IPC0.getCS0IS : TBits_2; inline;
- begin
- getCS0IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
- end;
- procedure TINT_IPC0.setCS0IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
- end;
- function TINT_IPC0.getCS0IP : TBits_3; inline;
- begin
- getCS0IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
- end;
- procedure TINT_IPC0.setCS1IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
- end;
- function TINT_IPC0.getCS1IS : TBits_2; inline;
- begin
- getCS1IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
- end;
- procedure TINT_IPC0.setCS1IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
- end;
- function TINT_IPC0.getCS1IP : TBits_3; inline;
- begin
- getCS1IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
- end;
- procedure TINT_IPC0.setINT0IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
- end;
- function TINT_IPC0.getINT0IS : TBits_2; inline;
- begin
- getINT0IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
- end;
- procedure TINT_IPC0.setINT0IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
- end;
- function TINT_IPC0.getINT0IP : TBits_3; inline;
- begin
- getINT0IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
- end;
- procedure TINT_IPC0.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TINT_IPC0.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TINT_IPC1.setT1IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TINT_IPC1.getT1IS : TBits_2; inline;
- begin
- getT1IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TINT_IPC1.setT1IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
- end;
- function TINT_IPC1.getT1IP : TBits_3; inline;
- begin
- getT1IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
- end;
- procedure TINT_IPC1.setIC1IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
- end;
- function TINT_IPC1.getIC1IS : TBits_2; inline;
- begin
- getIC1IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
- end;
- procedure TINT_IPC1.setIC1IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
- end;
- function TINT_IPC1.getIC1IP : TBits_3; inline;
- begin
- getIC1IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
- end;
- procedure TINT_IPC1.setOC1IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
- end;
- function TINT_IPC1.getOC1IS : TBits_2; inline;
- begin
- getOC1IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
- end;
- procedure TINT_IPC1.setOC1IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
- end;
- function TINT_IPC1.getOC1IP : TBits_3; inline;
- begin
- getOC1IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
- end;
- procedure TINT_IPC1.setINT1IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
- end;
- function TINT_IPC1.getINT1IS : TBits_2; inline;
- begin
- getINT1IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
- end;
- procedure TINT_IPC1.setINT1IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
- end;
- function TINT_IPC1.getINT1IP : TBits_3; inline;
- begin
- getINT1IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
- end;
- procedure TINT_IPC1.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TINT_IPC1.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TINT_IPC2.setT2IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TINT_IPC2.getT2IS : TBits_2; inline;
- begin
- getT2IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TINT_IPC2.setT2IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
- end;
- function TINT_IPC2.getT2IP : TBits_3; inline;
- begin
- getT2IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
- end;
- procedure TINT_IPC2.setIC2IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
- end;
- function TINT_IPC2.getIC2IS : TBits_2; inline;
- begin
- getIC2IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
- end;
- procedure TINT_IPC2.setIC2IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
- end;
- function TINT_IPC2.getIC2IP : TBits_3; inline;
- begin
- getIC2IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
- end;
- procedure TINT_IPC2.setOC2IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
- end;
- function TINT_IPC2.getOC2IS : TBits_2; inline;
- begin
- getOC2IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
- end;
- procedure TINT_IPC2.setOC2IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
- end;
- function TINT_IPC2.getOC2IP : TBits_3; inline;
- begin
- getOC2IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
- end;
- procedure TINT_IPC2.setINT2IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
- end;
- function TINT_IPC2.getINT2IS : TBits_2; inline;
- begin
- getINT2IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
- end;
- procedure TINT_IPC2.setINT2IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
- end;
- function TINT_IPC2.getINT2IP : TBits_3; inline;
- begin
- getINT2IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
- end;
- procedure TINT_IPC2.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TINT_IPC2.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TINT_IPC3.setT3IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TINT_IPC3.getT3IS : TBits_2; inline;
- begin
- getT3IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TINT_IPC3.setT3IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
- end;
- function TINT_IPC3.getT3IP : TBits_3; inline;
- begin
- getT3IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
- end;
- procedure TINT_IPC3.setIC3IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
- end;
- function TINT_IPC3.getIC3IS : TBits_2; inline;
- begin
- getIC3IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
- end;
- procedure TINT_IPC3.setIC3IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
- end;
- function TINT_IPC3.getIC3IP : TBits_3; inline;
- begin
- getIC3IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
- end;
- procedure TINT_IPC3.setOC3IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
- end;
- function TINT_IPC3.getOC3IS : TBits_2; inline;
- begin
- getOC3IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
- end;
- procedure TINT_IPC3.setOC3IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
- end;
- function TINT_IPC3.getOC3IP : TBits_3; inline;
- begin
- getOC3IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
- end;
- procedure TINT_IPC3.setINT3IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
- end;
- function TINT_IPC3.getINT3IS : TBits_2; inline;
- begin
- getINT3IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
- end;
- procedure TINT_IPC3.setINT3IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
- end;
- function TINT_IPC3.getINT3IP : TBits_3; inline;
- begin
- getINT3IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
- end;
- procedure TINT_IPC3.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TINT_IPC3.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TINT_IPC4.setT4IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TINT_IPC4.getT4IS : TBits_2; inline;
- begin
- getT4IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TINT_IPC4.setT4IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
- end;
- function TINT_IPC4.getT4IP : TBits_3; inline;
- begin
- getT4IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
- end;
- procedure TINT_IPC4.setIC4IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
- end;
- function TINT_IPC4.getIC4IS : TBits_2; inline;
- begin
- getIC4IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
- end;
- procedure TINT_IPC4.setIC4IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
- end;
- function TINT_IPC4.getIC4IP : TBits_3; inline;
- begin
- getIC4IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
- end;
- procedure TINT_IPC4.setOC4IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
- end;
- function TINT_IPC4.getOC4IS : TBits_2; inline;
- begin
- getOC4IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
- end;
- procedure TINT_IPC4.setOC4IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
- end;
- function TINT_IPC4.getOC4IP : TBits_3; inline;
- begin
- getOC4IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
- end;
- procedure TINT_IPC4.setINT4IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
- end;
- function TINT_IPC4.getINT4IS : TBits_2; inline;
- begin
- getINT4IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
- end;
- procedure TINT_IPC4.setINT4IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
- end;
- function TINT_IPC4.getINT4IP : TBits_3; inline;
- begin
- getINT4IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
- end;
- procedure TINT_IPC4.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TINT_IPC4.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TINT_IPC5.setT5IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TINT_IPC5.getT5IS : TBits_2; inline;
- begin
- getT5IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TINT_IPC5.setT5IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
- end;
- function TINT_IPC5.getT5IP : TBits_3; inline;
- begin
- getT5IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
- end;
- procedure TINT_IPC5.setIC5IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
- end;
- function TINT_IPC5.getIC5IS : TBits_2; inline;
- begin
- getIC5IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
- end;
- procedure TINT_IPC5.setIC5IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
- end;
- function TINT_IPC5.getIC5IP : TBits_3; inline;
- begin
- getIC5IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
- end;
- procedure TINT_IPC5.setOC5IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
- end;
- function TINT_IPC5.getOC5IS : TBits_2; inline;
- begin
- getOC5IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
- end;
- procedure TINT_IPC5.setOC5IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
- end;
- function TINT_IPC5.getOC5IP : TBits_3; inline;
- begin
- getOC5IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
- end;
- procedure TINT_IPC5.setSPI1IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
- end;
- function TINT_IPC5.getSPI1IS : TBits_2; inline;
- begin
- getSPI1IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
- end;
- procedure TINT_IPC5.setSPI1IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
- end;
- function TINT_IPC5.getSPI1IP : TBits_3; inline;
- begin
- getSPI1IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
- end;
- procedure TINT_IPC5.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TINT_IPC5.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TINT_IPC6.setU1IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TINT_IPC6.getU1IS : TBits_2; inline;
- begin
- getU1IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TINT_IPC6.setU1IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
- end;
- function TINT_IPC6.getU1IP : TBits_3; inline;
- begin
- getU1IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
- end;
- procedure TINT_IPC6.setI2C1IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
- end;
- function TINT_IPC6.getI2C1IS : TBits_2; inline;
- begin
- getI2C1IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
- end;
- procedure TINT_IPC6.setI2C1IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
- end;
- function TINT_IPC6.getI2C1IP : TBits_3; inline;
- begin
- getI2C1IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
- end;
- procedure TINT_IPC6.setCNIS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
- end;
- function TINT_IPC6.getCNIS : TBits_2; inline;
- begin
- getCNIS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
- end;
- procedure TINT_IPC6.setCNIP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
- end;
- function TINT_IPC6.getCNIP : TBits_3; inline;
- begin
- getCNIP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
- end;
- procedure TINT_IPC6.setAD1IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
- end;
- function TINT_IPC6.getAD1IS : TBits_2; inline;
- begin
- getAD1IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
- end;
- procedure TINT_IPC6.setAD1IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
- end;
- function TINT_IPC6.getAD1IP : TBits_3; inline;
- begin
- getAD1IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
- end;
- procedure TINT_IPC6.setU1AIS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TINT_IPC6.getU1AIS : TBits_2; inline;
- begin
- getU1AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TINT_IPC6.setU1AIP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
- end;
- function TINT_IPC6.getU1AIP : TBits_3; inline;
- begin
- getU1AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
- end;
- procedure TINT_IPC6.setSPI3IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TINT_IPC6.getSPI3IS : TBits_2; inline;
- begin
- getSPI3IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TINT_IPC6.setSPI3IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
- end;
- function TINT_IPC6.getSPI3IP : TBits_3; inline;
- begin
- getSPI3IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
- end;
- procedure TINT_IPC6.setSPI1AIS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TINT_IPC6.getSPI1AIS : TBits_2; inline;
- begin
- getSPI1AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TINT_IPC6.setSPI1AIP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
- end;
- function TINT_IPC6.getSPI1AIP : TBits_3; inline;
- begin
- getSPI1AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
- end;
- procedure TINT_IPC6.setI2C3IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TINT_IPC6.getI2C3IS : TBits_2; inline;
- begin
- getI2C3IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TINT_IPC6.setI2C3IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
- end;
- function TINT_IPC6.getI2C3IP : TBits_3; inline;
- begin
- getI2C3IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
- end;
- procedure TINT_IPC6.setI2C1AIS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TINT_IPC6.getI2C1AIS : TBits_2; inline;
- begin
- getI2C1AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TINT_IPC6.setI2C1AIP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
- end;
- function TINT_IPC6.getI2C1AIP : TBits_3; inline;
- begin
- getI2C1AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
- end;
- procedure TINT_IPC6.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TINT_IPC6.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TINT_IPC7.setPMPIS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TINT_IPC7.getPMPIS : TBits_2; inline;
- begin
- getPMPIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TINT_IPC7.setPMPIP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
- end;
- function TINT_IPC7.getPMPIP : TBits_3; inline;
- begin
- getPMPIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
- end;
- procedure TINT_IPC7.setCMP1IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
- end;
- function TINT_IPC7.getCMP1IS : TBits_2; inline;
- begin
- getCMP1IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
- end;
- procedure TINT_IPC7.setCMP1IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
- end;
- function TINT_IPC7.getCMP1IP : TBits_3; inline;
- begin
- getCMP1IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
- end;
- procedure TINT_IPC7.setCMP2IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
- end;
- function TINT_IPC7.getCMP2IS : TBits_2; inline;
- begin
- getCMP2IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
- end;
- procedure TINT_IPC7.setCMP2IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
- end;
- function TINT_IPC7.getCMP2IP : TBits_3; inline;
- begin
- getCMP2IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
- end;
- procedure TINT_IPC7.setU3IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
- end;
- function TINT_IPC7.getU3IS : TBits_2; inline;
- begin
- getU3IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
- end;
- procedure TINT_IPC7.setU3IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
- end;
- function TINT_IPC7.getU3IP : TBits_3; inline;
- begin
- getU3IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
- end;
- procedure TINT_IPC7.setU2AIS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
- end;
- function TINT_IPC7.getU2AIS : TBits_2; inline;
- begin
- getU2AIS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
- end;
- procedure TINT_IPC7.setU2AIP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
- end;
- function TINT_IPC7.getU2AIP : TBits_3; inline;
- begin
- getU2AIP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
- end;
- procedure TINT_IPC7.setSPI2IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
- end;
- function TINT_IPC7.getSPI2IS : TBits_2; inline;
- begin
- getSPI2IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
- end;
- procedure TINT_IPC7.setSPI2IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
- end;
- function TINT_IPC7.getSPI2IP : TBits_3; inline;
- begin
- getSPI2IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
- end;
- procedure TINT_IPC7.setSPI2AIS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
- end;
- function TINT_IPC7.getSPI2AIS : TBits_2; inline;
- begin
- getSPI2AIS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
- end;
- procedure TINT_IPC7.setSPI2AIP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
- end;
- function TINT_IPC7.getSPI2AIP : TBits_3; inline;
- begin
- getSPI2AIP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
- end;
- procedure TINT_IPC7.setI2C4IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
- end;
- function TINT_IPC7.getI2C4IS : TBits_2; inline;
- begin
- getI2C4IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
- end;
- procedure TINT_IPC7.setI2C4IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
- end;
- function TINT_IPC7.getI2C4IP : TBits_3; inline;
- begin
- getI2C4IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
- end;
- procedure TINT_IPC7.setI2C2AIS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
- end;
- function TINT_IPC7.getI2C2AIS : TBits_2; inline;
- begin
- getI2C2AIS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
- end;
- procedure TINT_IPC7.setI2C2AIP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
- end;
- function TINT_IPC7.getI2C2AIP : TBits_3; inline;
- begin
- getI2C2AIP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
- end;
- procedure TINT_IPC7.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TINT_IPC7.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TINT_IPC8.setU2IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TINT_IPC8.getU2IS : TBits_2; inline;
- begin
- getU2IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TINT_IPC8.setU2IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
- end;
- function TINT_IPC8.getU2IP : TBits_3; inline;
- begin
- getU2IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
- end;
- procedure TINT_IPC8.setI2C2IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
- end;
- function TINT_IPC8.getI2C2IS : TBits_2; inline;
- begin
- getI2C2IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
- end;
- procedure TINT_IPC8.setI2C2IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
- end;
- function TINT_IPC8.getI2C2IP : TBits_3; inline;
- begin
- getI2C2IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
- end;
- procedure TINT_IPC8.setFSCMIS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
- end;
- function TINT_IPC8.getFSCMIS : TBits_2; inline;
- begin
- getFSCMIS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
- end;
- procedure TINT_IPC8.setFSCMIP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
- end;
- function TINT_IPC8.getFSCMIP : TBits_3; inline;
- begin
- getFSCMIP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
- end;
- procedure TINT_IPC8.setRTCCIS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
- end;
- function TINT_IPC8.getRTCCIS : TBits_2; inline;
- begin
- getRTCCIS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
- end;
- procedure TINT_IPC8.setRTCCIP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
- end;
- function TINT_IPC8.getRTCCIP : TBits_3; inline;
- begin
- getRTCCIP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
- end;
- procedure TINT_IPC8.setU3AIS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TINT_IPC8.getU3AIS : TBits_2; inline;
- begin
- getU3AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TINT_IPC8.setU3AIP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
- end;
- function TINT_IPC8.getU3AIP : TBits_3; inline;
- begin
- getU3AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
- end;
- procedure TINT_IPC8.setSPI4IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TINT_IPC8.getSPI4IS : TBits_2; inline;
- begin
- getSPI4IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TINT_IPC8.setSPI4IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
- end;
- function TINT_IPC8.getSPI4IP : TBits_3; inline;
- begin
- getSPI4IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
- end;
- procedure TINT_IPC8.setSPI3AIS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TINT_IPC8.getSPI3AIS : TBits_2; inline;
- begin
- getSPI3AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TINT_IPC8.setSPI3AIP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
- end;
- function TINT_IPC8.getSPI3AIP : TBits_3; inline;
- begin
- getSPI3AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
- end;
- procedure TINT_IPC8.setI2C5IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TINT_IPC8.getI2C5IS : TBits_2; inline;
- begin
- getI2C5IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TINT_IPC8.setI2C5IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
- end;
- function TINT_IPC8.getI2C5IP : TBits_3; inline;
- begin
- getI2C5IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
- end;
- procedure TINT_IPC8.setI2C3AIS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TINT_IPC8.getI2C3AIS : TBits_2; inline;
- begin
- getI2C3AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TINT_IPC8.setI2C3AIP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
- end;
- function TINT_IPC8.getI2C3AIP : TBits_3; inline;
- begin
- getI2C3AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
- end;
- procedure TINT_IPC8.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TINT_IPC8.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TINT_IPC9.setDMA0IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TINT_IPC9.getDMA0IS : TBits_2; inline;
- begin
- getDMA0IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TINT_IPC9.setDMA0IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
- end;
- function TINT_IPC9.getDMA0IP : TBits_3; inline;
- begin
- getDMA0IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
- end;
- procedure TINT_IPC9.setDMA1IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
- end;
- function TINT_IPC9.getDMA1IS : TBits_2; inline;
- begin
- getDMA1IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
- end;
- procedure TINT_IPC9.setDMA1IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
- end;
- function TINT_IPC9.getDMA1IP : TBits_3; inline;
- begin
- getDMA1IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
- end;
- procedure TINT_IPC9.setDMA2IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
- end;
- function TINT_IPC9.getDMA2IS : TBits_2; inline;
- begin
- getDMA2IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
- end;
- procedure TINT_IPC9.setDMA2IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
- end;
- function TINT_IPC9.getDMA2IP : TBits_3; inline;
- begin
- getDMA2IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
- end;
- procedure TINT_IPC9.setDMA3IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
- end;
- function TINT_IPC9.getDMA3IS : TBits_2; inline;
- begin
- getDMA3IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
- end;
- procedure TINT_IPC9.setDMA3IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
- end;
- function TINT_IPC9.getDMA3IP : TBits_3; inline;
- begin
- getDMA3IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
- end;
- procedure TINT_IPC9.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TINT_IPC9.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TINT_IPC10.setDMA4IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TINT_IPC10.getDMA4IS : TBits_2; inline;
- begin
- getDMA4IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TINT_IPC10.setDMA4IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
- end;
- function TINT_IPC10.getDMA4IP : TBits_3; inline;
- begin
- getDMA4IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
- end;
- procedure TINT_IPC10.setDMA5IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
- end;
- function TINT_IPC10.getDMA5IS : TBits_2; inline;
- begin
- getDMA5IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
- end;
- procedure TINT_IPC10.setDMA5IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
- end;
- function TINT_IPC10.getDMA5IP : TBits_3; inline;
- begin
- getDMA5IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
- end;
- procedure TINT_IPC10.setDMA6IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
- end;
- function TINT_IPC10.getDMA6IS : TBits_2; inline;
- begin
- getDMA6IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
- end;
- procedure TINT_IPC10.setDMA6IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
- end;
- function TINT_IPC10.getDMA6IP : TBits_3; inline;
- begin
- getDMA6IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
- end;
- procedure TINT_IPC10.setDMA7IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
- end;
- function TINT_IPC10.getDMA7IS : TBits_2; inline;
- begin
- getDMA7IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
- end;
- procedure TINT_IPC10.setDMA7IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
- end;
- function TINT_IPC10.getDMA7IP : TBits_3; inline;
- begin
- getDMA7IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
- end;
- procedure TINT_IPC10.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TINT_IPC10.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TINT_IPC11.setFCEIS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TINT_IPC11.getFCEIS : TBits_2; inline;
- begin
- getFCEIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TINT_IPC11.setFCEIP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
- end;
- function TINT_IPC11.getFCEIP : TBits_3; inline;
- begin
- getFCEIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
- end;
- procedure TINT_IPC11.setUSBIS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
- end;
- function TINT_IPC11.getUSBIS : TBits_2; inline;
- begin
- getUSBIS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
- end;
- procedure TINT_IPC11.setUSBIP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
- end;
- function TINT_IPC11.getUSBIP : TBits_3; inline;
- begin
- getUSBIP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
- end;
- procedure TINT_IPC11.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TINT_IPC11.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TINT_IPC12.setETHIS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TINT_IPC12.getETHIS : TBits_2; inline;
- begin
- getETHIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TINT_IPC12.setETHIP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
- end;
- function TINT_IPC12.getETHIP : TBits_3; inline;
- begin
- getETHIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
- end;
- procedure TINT_IPC12.setU4IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
- end;
- function TINT_IPC12.getU4IS : TBits_2; inline;
- begin
- getU4IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
- end;
- procedure TINT_IPC12.setU4IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
- end;
- function TINT_IPC12.getU4IP : TBits_3; inline;
- begin
- getU4IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
- end;
- procedure TINT_IPC12.setU6IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
- end;
- function TINT_IPC12.getU6IS : TBits_2; inline;
- begin
- getU6IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
- end;
- procedure TINT_IPC12.setU6IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
- end;
- function TINT_IPC12.getU6IP : TBits_3; inline;
- begin
- getU6IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
- end;
- procedure TINT_IPC12.setU5IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
- end;
- function TINT_IPC12.getU5IS : TBits_2; inline;
- begin
- getU5IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
- end;
- procedure TINT_IPC12.setU5IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
- end;
- function TINT_IPC12.getU5IP : TBits_3; inline;
- begin
- getU5IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
- end;
- procedure TINT_IPC12.setU1BIS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
- end;
- function TINT_IPC12.getU1BIS : TBits_2; inline;
- begin
- getU1BIS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
- end;
- procedure TINT_IPC12.setU1BIP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
- end;
- function TINT_IPC12.getU1BIP : TBits_3; inline;
- begin
- getU1BIP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
- end;
- procedure TINT_IPC12.setU2BIS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
- end;
- function TINT_IPC12.getU2BIS : TBits_2; inline;
- begin
- getU2BIS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
- end;
- procedure TINT_IPC12.setU2BIP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
- end;
- function TINT_IPC12.getU2BIP : TBits_3; inline;
- begin
- getU2BIP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
- end;
- procedure TINT_IPC12.setU3BIS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
- end;
- function TINT_IPC12.getU3BIS : TBits_2; inline;
- begin
- getU3BIS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
- end;
- procedure TINT_IPC12.setU3BIP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
- end;
- function TINT_IPC12.getU3BIP : TBits_3; inline;
- begin
- getU3BIP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
- end;
- procedure TINT_IPC12.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TINT_IPC12.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TBMX_BMXCON.setBMXARB(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
- end;
- function TBMX_BMXCON.getBMXARB : TBits_3; inline;
- begin
- getBMXARB := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
- end;
- procedure TBMX_BMXCON.setBMXWSDRM; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TBMX_BMXCON.clearBMXWSDRM; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TBMX_BMXCON.setBMXWSDRM(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TBMX_BMXCON.getBMXWSDRM : TBits_1; inline;
- begin
- getBMXWSDRM := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TBMX_BMXCON.setBMXERRIS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- procedure TBMX_BMXCON.clearBMXERRIS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00010000;
- end;
- procedure TBMX_BMXCON.setBMXERRIS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00010000
- else
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- function TBMX_BMXCON.getBMXERRIS : TBits_1; inline;
- begin
- getBMXERRIS := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
- end;
- procedure TBMX_BMXCON.setBMXERRDS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- procedure TBMX_BMXCON.clearBMXERRDS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00020000;
- end;
- procedure TBMX_BMXCON.setBMXERRDS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00020000
- else
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- function TBMX_BMXCON.getBMXERRDS : TBits_1; inline;
- begin
- getBMXERRDS := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
- end;
- procedure TBMX_BMXCON.setBMXERRDMA; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- procedure TBMX_BMXCON.clearBMXERRDMA; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00040000;
- end;
- procedure TBMX_BMXCON.setBMXERRDMA(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00040000
- else
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- function TBMX_BMXCON.getBMXERRDMA : TBits_1; inline;
- begin
- getBMXERRDMA := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
- end;
- procedure TBMX_BMXCON.setBMXERRICD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- procedure TBMX_BMXCON.clearBMXERRICD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00080000;
- end;
- procedure TBMX_BMXCON.setBMXERRICD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00080000
- else
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- function TBMX_BMXCON.getBMXERRICD : TBits_1; inline;
- begin
- getBMXERRICD := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
- end;
- procedure TBMX_BMXCON.setBMXERRIXI; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- procedure TBMX_BMXCON.clearBMXERRIXI; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00100000;
- end;
- procedure TBMX_BMXCON.setBMXERRIXI(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00100000
- else
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- function TBMX_BMXCON.getBMXERRIXI : TBits_1; inline;
- begin
- getBMXERRIXI := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
- end;
- procedure TBMX_BMXCON.setBMXCHEDMA; inline;
- begin
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- procedure TBMX_BMXCON.clearBMXCHEDMA; inline;
- begin
- pTDefRegMap(@Self)^.clr := $04000000;
- end;
- procedure TBMX_BMXCON.setBMXCHEDMA(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $04000000
- else
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- function TBMX_BMXCON.getBMXCHEDMA : TBits_1; inline;
- begin
- getBMXCHEDMA := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
- end;
- procedure TBMX_BMXCON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TBMX_BMXCON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TDMAC_DMACON.setDMABUSY; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TDMAC_DMACON.clearDMABUSY; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TDMAC_DMACON.setDMABUSY(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TDMAC_DMACON.getDMABUSY : TBits_1; inline;
- begin
- getDMABUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TDMAC_DMACON.setSUSPEND; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TDMAC_DMACON.clearSUSPEND; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TDMAC_DMACON.setSUSPEND(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TDMAC_DMACON.getSUSPEND : TBits_1; inline;
- begin
- getSUSPEND := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TDMAC_DMACON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TDMAC_DMACON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TDMAC_DMACON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TDMAC_DMACON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TDMAC_DMACON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TDMAC_DMACON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TDMAC_DMASTAT.setDMACH(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
- end;
- function TDMAC_DMASTAT.getDMACH : TBits_3; inline;
- begin
- getDMACH := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
- end;
- procedure TDMAC_DMASTAT.setRDWR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TDMAC_DMASTAT.clearRDWR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TDMAC_DMASTAT.setRDWR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TDMAC_DMASTAT.getRDWR : TBits_1; inline;
- begin
- getRDWR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TDMAC_DMASTAT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TDMAC_DMASTAT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TDMAC_DCRCCON.setCRCCH(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
- end;
- function TDMAC_DCRCCON.getCRCCH : TBits_3; inline;
- begin
- getCRCCH := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
- end;
- procedure TDMAC_DCRCCON.setCRCTYP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TDMAC_DCRCCON.clearCRCTYP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TDMAC_DCRCCON.setCRCTYP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TDMAC_DCRCCON.getCRCTYP : TBits_1; inline;
- begin
- getCRCTYP := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TDMAC_DCRCCON.setCRCAPP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TDMAC_DCRCCON.clearCRCAPP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TDMAC_DCRCCON.setCRCAPP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TDMAC_DCRCCON.getCRCAPP : TBits_1; inline;
- begin
- getCRCAPP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TDMAC_DCRCCON.setCRCEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TDMAC_DCRCCON.clearCRCEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TDMAC_DCRCCON.setCRCEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TDMAC_DCRCCON.getCRCEN : TBits_1; inline;
- begin
- getCRCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TDMAC_DCRCCON.setPLEN(thebits : TBits_5); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
- end;
- function TDMAC_DCRCCON.getPLEN : TBits_5; inline;
- begin
- getPLEN := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
- end;
- procedure TDMAC_DCRCCON.setBITO; inline;
- begin
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- procedure TDMAC_DCRCCON.clearBITO; inline;
- begin
- pTDefRegMap(@Self)^.clr := $01000000;
- end;
- procedure TDMAC_DCRCCON.setBITO(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $01000000
- else
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- function TDMAC_DCRCCON.getBITO : TBits_1; inline;
- begin
- getBITO := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
- end;
- procedure TDMAC_DCRCCON.setWBO; inline;
- begin
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- procedure TDMAC_DCRCCON.clearWBO; inline;
- begin
- pTDefRegMap(@Self)^.clr := $08000000;
- end;
- procedure TDMAC_DCRCCON.setWBO(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $08000000
- else
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- function TDMAC_DCRCCON.getWBO : TBits_1; inline;
- begin
- getWBO := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
- end;
- procedure TDMAC_DCRCCON.setBYTO(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $CFFFFFFF or ( thebits shl 28 );
- end;
- function TDMAC_DCRCCON.getBYTO : TBits_2; inline;
- begin
- getBYTO := (pTDefRegMap(@Self)^.val and $30000000) shr 28;
- end;
- procedure TDMAC_DCRCCON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TDMAC_DCRCCON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TDMAC0_DCH0CON.setCHPRI(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TDMAC0_DCH0CON.getCHPRI : TBits_2; inline;
- begin
- getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TDMAC0_DCH0CON.setCHEDET; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TDMAC0_DCH0CON.clearCHEDET; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TDMAC0_DCH0CON.setCHEDET(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TDMAC0_DCH0CON.getCHEDET : TBits_1; inline;
- begin
- getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TDMAC0_DCH0CON.setCHAEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TDMAC0_DCH0CON.clearCHAEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TDMAC0_DCH0CON.setCHAEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TDMAC0_DCH0CON.getCHAEN : TBits_1; inline;
- begin
- getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TDMAC0_DCH0CON.setCHCHN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TDMAC0_DCH0CON.clearCHCHN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TDMAC0_DCH0CON.setCHCHN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TDMAC0_DCH0CON.getCHCHN : TBits_1; inline;
- begin
- getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TDMAC0_DCH0CON.setCHAED; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TDMAC0_DCH0CON.clearCHAED; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TDMAC0_DCH0CON.setCHAED(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TDMAC0_DCH0CON.getCHAED : TBits_1; inline;
- begin
- getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TDMAC0_DCH0CON.setCHEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TDMAC0_DCH0CON.clearCHEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TDMAC0_DCH0CON.setCHEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TDMAC0_DCH0CON.getCHEN : TBits_1; inline;
- begin
- getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TDMAC0_DCH0CON.setCHCHNS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TDMAC0_DCH0CON.clearCHCHNS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TDMAC0_DCH0CON.setCHCHNS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TDMAC0_DCH0CON.getCHCHNS : TBits_1; inline;
- begin
- getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TDMAC0_DCH0CON.setCHBUSY; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TDMAC0_DCH0CON.clearCHBUSY; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TDMAC0_DCH0CON.setCHBUSY(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TDMAC0_DCH0CON.getCHBUSY : TBits_1; inline;
- begin
- getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TDMAC0_DCH0CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TDMAC0_DCH0CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TDMAC0_DCH0ECON.setAIRQEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TDMAC0_DCH0ECON.clearAIRQEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TDMAC0_DCH0ECON.setAIRQEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TDMAC0_DCH0ECON.getAIRQEN : TBits_1; inline;
- begin
- getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TDMAC0_DCH0ECON.setSIRQEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TDMAC0_DCH0ECON.clearSIRQEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TDMAC0_DCH0ECON.setSIRQEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TDMAC0_DCH0ECON.getSIRQEN : TBits_1; inline;
- begin
- getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TDMAC0_DCH0ECON.setPATEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TDMAC0_DCH0ECON.clearPATEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TDMAC0_DCH0ECON.setPATEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TDMAC0_DCH0ECON.getPATEN : TBits_1; inline;
- begin
- getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TDMAC0_DCH0ECON.setCABORT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TDMAC0_DCH0ECON.clearCABORT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TDMAC0_DCH0ECON.setCABORT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TDMAC0_DCH0ECON.getCABORT : TBits_1; inline;
- begin
- getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TDMAC0_DCH0ECON.setCFORCE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TDMAC0_DCH0ECON.clearCFORCE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TDMAC0_DCH0ECON.setCFORCE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TDMAC0_DCH0ECON.getCFORCE : TBits_1; inline;
- begin
- getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TDMAC0_DCH0ECON.setCHSIRQ(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
- end;
- function TDMAC0_DCH0ECON.getCHSIRQ : TBits_8; inline;
- begin
- getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
- end;
- procedure TDMAC0_DCH0ECON.setCHAIRQ(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
- end;
- function TDMAC0_DCH0ECON.getCHAIRQ : TBits_8; inline;
- begin
- getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
- end;
- procedure TDMAC0_DCH0ECON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TDMAC0_DCH0ECON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TDMAC0_DCH0INT.setCHERIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TDMAC0_DCH0INT.clearCHERIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TDMAC0_DCH0INT.setCHERIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TDMAC0_DCH0INT.getCHERIF : TBits_1; inline;
- begin
- getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TDMAC0_DCH0INT.setCHTAIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TDMAC0_DCH0INT.clearCHTAIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TDMAC0_DCH0INT.setCHTAIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TDMAC0_DCH0INT.getCHTAIF : TBits_1; inline;
- begin
- getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TDMAC0_DCH0INT.setCHCCIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TDMAC0_DCH0INT.clearCHCCIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TDMAC0_DCH0INT.setCHCCIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TDMAC0_DCH0INT.getCHCCIF : TBits_1; inline;
- begin
- getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TDMAC0_DCH0INT.setCHBCIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TDMAC0_DCH0INT.clearCHBCIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TDMAC0_DCH0INT.setCHBCIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TDMAC0_DCH0INT.getCHBCIF : TBits_1; inline;
- begin
- getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TDMAC0_DCH0INT.setCHDHIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TDMAC0_DCH0INT.clearCHDHIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TDMAC0_DCH0INT.setCHDHIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TDMAC0_DCH0INT.getCHDHIF : TBits_1; inline;
- begin
- getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TDMAC0_DCH0INT.setCHDDIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TDMAC0_DCH0INT.clearCHDDIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TDMAC0_DCH0INT.setCHDDIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TDMAC0_DCH0INT.getCHDDIF : TBits_1; inline;
- begin
- getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TDMAC0_DCH0INT.setCHSHIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TDMAC0_DCH0INT.clearCHSHIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TDMAC0_DCH0INT.setCHSHIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TDMAC0_DCH0INT.getCHSHIF : TBits_1; inline;
- begin
- getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TDMAC0_DCH0INT.setCHSDIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TDMAC0_DCH0INT.clearCHSDIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TDMAC0_DCH0INT.setCHSDIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TDMAC0_DCH0INT.getCHSDIF : TBits_1; inline;
- begin
- getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TDMAC0_DCH0INT.setCHERIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- procedure TDMAC0_DCH0INT.clearCHERIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00010000;
- end;
- procedure TDMAC0_DCH0INT.setCHERIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00010000
- else
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- function TDMAC0_DCH0INT.getCHERIE : TBits_1; inline;
- begin
- getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
- end;
- procedure TDMAC0_DCH0INT.setCHTAIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- procedure TDMAC0_DCH0INT.clearCHTAIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00020000;
- end;
- procedure TDMAC0_DCH0INT.setCHTAIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00020000
- else
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- function TDMAC0_DCH0INT.getCHTAIE : TBits_1; inline;
- begin
- getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
- end;
- procedure TDMAC0_DCH0INT.setCHCCIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- procedure TDMAC0_DCH0INT.clearCHCCIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00040000;
- end;
- procedure TDMAC0_DCH0INT.setCHCCIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00040000
- else
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- function TDMAC0_DCH0INT.getCHCCIE : TBits_1; inline;
- begin
- getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
- end;
- procedure TDMAC0_DCH0INT.setCHBCIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- procedure TDMAC0_DCH0INT.clearCHBCIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00080000;
- end;
- procedure TDMAC0_DCH0INT.setCHBCIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00080000
- else
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- function TDMAC0_DCH0INT.getCHBCIE : TBits_1; inline;
- begin
- getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
- end;
- procedure TDMAC0_DCH0INT.setCHDHIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- procedure TDMAC0_DCH0INT.clearCHDHIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00100000;
- end;
- procedure TDMAC0_DCH0INT.setCHDHIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00100000
- else
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- function TDMAC0_DCH0INT.getCHDHIE : TBits_1; inline;
- begin
- getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
- end;
- procedure TDMAC0_DCH0INT.setCHDDIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- procedure TDMAC0_DCH0INT.clearCHDDIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00200000;
- end;
- procedure TDMAC0_DCH0INT.setCHDDIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00200000
- else
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- function TDMAC0_DCH0INT.getCHDDIE : TBits_1; inline;
- begin
- getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
- end;
- procedure TDMAC0_DCH0INT.setCHSHIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- procedure TDMAC0_DCH0INT.clearCHSHIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00400000;
- end;
- procedure TDMAC0_DCH0INT.setCHSHIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00400000
- else
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- function TDMAC0_DCH0INT.getCHSHIE : TBits_1; inline;
- begin
- getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
- end;
- procedure TDMAC0_DCH0INT.setCHSDIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- procedure TDMAC0_DCH0INT.clearCHSDIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00800000;
- end;
- procedure TDMAC0_DCH0INT.setCHSDIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00800000
- else
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- function TDMAC0_DCH0INT.getCHSDIE : TBits_1; inline;
- begin
- getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
- end;
- procedure TDMAC0_DCH0INT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TDMAC0_DCH0INT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TDMAC1_DCH1CON.setCHPRI(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TDMAC1_DCH1CON.getCHPRI : TBits_2; inline;
- begin
- getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TDMAC1_DCH1CON.setCHEDET; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TDMAC1_DCH1CON.clearCHEDET; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TDMAC1_DCH1CON.setCHEDET(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TDMAC1_DCH1CON.getCHEDET : TBits_1; inline;
- begin
- getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TDMAC1_DCH1CON.setCHAEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TDMAC1_DCH1CON.clearCHAEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TDMAC1_DCH1CON.setCHAEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TDMAC1_DCH1CON.getCHAEN : TBits_1; inline;
- begin
- getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TDMAC1_DCH1CON.setCHCHN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TDMAC1_DCH1CON.clearCHCHN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TDMAC1_DCH1CON.setCHCHN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TDMAC1_DCH1CON.getCHCHN : TBits_1; inline;
- begin
- getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TDMAC1_DCH1CON.setCHAED; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TDMAC1_DCH1CON.clearCHAED; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TDMAC1_DCH1CON.setCHAED(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TDMAC1_DCH1CON.getCHAED : TBits_1; inline;
- begin
- getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TDMAC1_DCH1CON.setCHEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TDMAC1_DCH1CON.clearCHEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TDMAC1_DCH1CON.setCHEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TDMAC1_DCH1CON.getCHEN : TBits_1; inline;
- begin
- getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TDMAC1_DCH1CON.setCHCHNS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TDMAC1_DCH1CON.clearCHCHNS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TDMAC1_DCH1CON.setCHCHNS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TDMAC1_DCH1CON.getCHCHNS : TBits_1; inline;
- begin
- getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TDMAC1_DCH1CON.setCHBUSY; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TDMAC1_DCH1CON.clearCHBUSY; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TDMAC1_DCH1CON.setCHBUSY(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TDMAC1_DCH1CON.getCHBUSY : TBits_1; inline;
- begin
- getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TDMAC1_DCH1CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TDMAC1_DCH1CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TDMAC1_DCH1ECON.setAIRQEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TDMAC1_DCH1ECON.clearAIRQEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TDMAC1_DCH1ECON.setAIRQEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TDMAC1_DCH1ECON.getAIRQEN : TBits_1; inline;
- begin
- getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TDMAC1_DCH1ECON.setSIRQEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TDMAC1_DCH1ECON.clearSIRQEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TDMAC1_DCH1ECON.setSIRQEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TDMAC1_DCH1ECON.getSIRQEN : TBits_1; inline;
- begin
- getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TDMAC1_DCH1ECON.setPATEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TDMAC1_DCH1ECON.clearPATEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TDMAC1_DCH1ECON.setPATEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TDMAC1_DCH1ECON.getPATEN : TBits_1; inline;
- begin
- getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TDMAC1_DCH1ECON.setCABORT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TDMAC1_DCH1ECON.clearCABORT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TDMAC1_DCH1ECON.setCABORT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TDMAC1_DCH1ECON.getCABORT : TBits_1; inline;
- begin
- getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TDMAC1_DCH1ECON.setCFORCE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TDMAC1_DCH1ECON.clearCFORCE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TDMAC1_DCH1ECON.setCFORCE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TDMAC1_DCH1ECON.getCFORCE : TBits_1; inline;
- begin
- getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TDMAC1_DCH1ECON.setCHSIRQ(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
- end;
- function TDMAC1_DCH1ECON.getCHSIRQ : TBits_8; inline;
- begin
- getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
- end;
- procedure TDMAC1_DCH1ECON.setCHAIRQ(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
- end;
- function TDMAC1_DCH1ECON.getCHAIRQ : TBits_8; inline;
- begin
- getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
- end;
- procedure TDMAC1_DCH1ECON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TDMAC1_DCH1ECON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TDMAC1_DCH1INT.setCHERIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TDMAC1_DCH1INT.clearCHERIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TDMAC1_DCH1INT.setCHERIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TDMAC1_DCH1INT.getCHERIF : TBits_1; inline;
- begin
- getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TDMAC1_DCH1INT.setCHTAIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TDMAC1_DCH1INT.clearCHTAIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TDMAC1_DCH1INT.setCHTAIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TDMAC1_DCH1INT.getCHTAIF : TBits_1; inline;
- begin
- getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TDMAC1_DCH1INT.setCHCCIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TDMAC1_DCH1INT.clearCHCCIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TDMAC1_DCH1INT.setCHCCIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TDMAC1_DCH1INT.getCHCCIF : TBits_1; inline;
- begin
- getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TDMAC1_DCH1INT.setCHBCIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TDMAC1_DCH1INT.clearCHBCIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TDMAC1_DCH1INT.setCHBCIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TDMAC1_DCH1INT.getCHBCIF : TBits_1; inline;
- begin
- getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TDMAC1_DCH1INT.setCHDHIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TDMAC1_DCH1INT.clearCHDHIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TDMAC1_DCH1INT.setCHDHIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TDMAC1_DCH1INT.getCHDHIF : TBits_1; inline;
- begin
- getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TDMAC1_DCH1INT.setCHDDIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TDMAC1_DCH1INT.clearCHDDIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TDMAC1_DCH1INT.setCHDDIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TDMAC1_DCH1INT.getCHDDIF : TBits_1; inline;
- begin
- getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TDMAC1_DCH1INT.setCHSHIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TDMAC1_DCH1INT.clearCHSHIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TDMAC1_DCH1INT.setCHSHIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TDMAC1_DCH1INT.getCHSHIF : TBits_1; inline;
- begin
- getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TDMAC1_DCH1INT.setCHSDIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TDMAC1_DCH1INT.clearCHSDIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TDMAC1_DCH1INT.setCHSDIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TDMAC1_DCH1INT.getCHSDIF : TBits_1; inline;
- begin
- getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TDMAC1_DCH1INT.setCHERIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- procedure TDMAC1_DCH1INT.clearCHERIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00010000;
- end;
- procedure TDMAC1_DCH1INT.setCHERIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00010000
- else
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- function TDMAC1_DCH1INT.getCHERIE : TBits_1; inline;
- begin
- getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
- end;
- procedure TDMAC1_DCH1INT.setCHTAIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- procedure TDMAC1_DCH1INT.clearCHTAIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00020000;
- end;
- procedure TDMAC1_DCH1INT.setCHTAIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00020000
- else
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- function TDMAC1_DCH1INT.getCHTAIE : TBits_1; inline;
- begin
- getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
- end;
- procedure TDMAC1_DCH1INT.setCHCCIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- procedure TDMAC1_DCH1INT.clearCHCCIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00040000;
- end;
- procedure TDMAC1_DCH1INT.setCHCCIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00040000
- else
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- function TDMAC1_DCH1INT.getCHCCIE : TBits_1; inline;
- begin
- getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
- end;
- procedure TDMAC1_DCH1INT.setCHBCIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- procedure TDMAC1_DCH1INT.clearCHBCIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00080000;
- end;
- procedure TDMAC1_DCH1INT.setCHBCIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00080000
- else
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- function TDMAC1_DCH1INT.getCHBCIE : TBits_1; inline;
- begin
- getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
- end;
- procedure TDMAC1_DCH1INT.setCHDHIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- procedure TDMAC1_DCH1INT.clearCHDHIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00100000;
- end;
- procedure TDMAC1_DCH1INT.setCHDHIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00100000
- else
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- function TDMAC1_DCH1INT.getCHDHIE : TBits_1; inline;
- begin
- getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
- end;
- procedure TDMAC1_DCH1INT.setCHDDIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- procedure TDMAC1_DCH1INT.clearCHDDIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00200000;
- end;
- procedure TDMAC1_DCH1INT.setCHDDIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00200000
- else
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- function TDMAC1_DCH1INT.getCHDDIE : TBits_1; inline;
- begin
- getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
- end;
- procedure TDMAC1_DCH1INT.setCHSHIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- procedure TDMAC1_DCH1INT.clearCHSHIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00400000;
- end;
- procedure TDMAC1_DCH1INT.setCHSHIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00400000
- else
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- function TDMAC1_DCH1INT.getCHSHIE : TBits_1; inline;
- begin
- getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
- end;
- procedure TDMAC1_DCH1INT.setCHSDIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- procedure TDMAC1_DCH1INT.clearCHSDIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00800000;
- end;
- procedure TDMAC1_DCH1INT.setCHSDIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00800000
- else
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- function TDMAC1_DCH1INT.getCHSDIE : TBits_1; inline;
- begin
- getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
- end;
- procedure TDMAC1_DCH1INT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TDMAC1_DCH1INT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TDMAC2_DCH2CON.setCHPRI(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TDMAC2_DCH2CON.getCHPRI : TBits_2; inline;
- begin
- getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TDMAC2_DCH2CON.setCHEDET; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TDMAC2_DCH2CON.clearCHEDET; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TDMAC2_DCH2CON.setCHEDET(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TDMAC2_DCH2CON.getCHEDET : TBits_1; inline;
- begin
- getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TDMAC2_DCH2CON.setCHAEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TDMAC2_DCH2CON.clearCHAEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TDMAC2_DCH2CON.setCHAEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TDMAC2_DCH2CON.getCHAEN : TBits_1; inline;
- begin
- getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TDMAC2_DCH2CON.setCHCHN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TDMAC2_DCH2CON.clearCHCHN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TDMAC2_DCH2CON.setCHCHN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TDMAC2_DCH2CON.getCHCHN : TBits_1; inline;
- begin
- getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TDMAC2_DCH2CON.setCHAED; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TDMAC2_DCH2CON.clearCHAED; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TDMAC2_DCH2CON.setCHAED(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TDMAC2_DCH2CON.getCHAED : TBits_1; inline;
- begin
- getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TDMAC2_DCH2CON.setCHEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TDMAC2_DCH2CON.clearCHEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TDMAC2_DCH2CON.setCHEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TDMAC2_DCH2CON.getCHEN : TBits_1; inline;
- begin
- getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TDMAC2_DCH2CON.setCHCHNS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TDMAC2_DCH2CON.clearCHCHNS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TDMAC2_DCH2CON.setCHCHNS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TDMAC2_DCH2CON.getCHCHNS : TBits_1; inline;
- begin
- getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TDMAC2_DCH2CON.setCHBUSY; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TDMAC2_DCH2CON.clearCHBUSY; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TDMAC2_DCH2CON.setCHBUSY(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TDMAC2_DCH2CON.getCHBUSY : TBits_1; inline;
- begin
- getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TDMAC2_DCH2CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TDMAC2_DCH2CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TDMAC2_DCH2ECON.setAIRQEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TDMAC2_DCH2ECON.clearAIRQEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TDMAC2_DCH2ECON.setAIRQEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TDMAC2_DCH2ECON.getAIRQEN : TBits_1; inline;
- begin
- getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TDMAC2_DCH2ECON.setSIRQEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TDMAC2_DCH2ECON.clearSIRQEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TDMAC2_DCH2ECON.setSIRQEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TDMAC2_DCH2ECON.getSIRQEN : TBits_1; inline;
- begin
- getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TDMAC2_DCH2ECON.setPATEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TDMAC2_DCH2ECON.clearPATEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TDMAC2_DCH2ECON.setPATEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TDMAC2_DCH2ECON.getPATEN : TBits_1; inline;
- begin
- getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TDMAC2_DCH2ECON.setCABORT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TDMAC2_DCH2ECON.clearCABORT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TDMAC2_DCH2ECON.setCABORT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TDMAC2_DCH2ECON.getCABORT : TBits_1; inline;
- begin
- getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TDMAC2_DCH2ECON.setCFORCE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TDMAC2_DCH2ECON.clearCFORCE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TDMAC2_DCH2ECON.setCFORCE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TDMAC2_DCH2ECON.getCFORCE : TBits_1; inline;
- begin
- getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TDMAC2_DCH2ECON.setCHSIRQ(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
- end;
- function TDMAC2_DCH2ECON.getCHSIRQ : TBits_8; inline;
- begin
- getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
- end;
- procedure TDMAC2_DCH2ECON.setCHAIRQ(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
- end;
- function TDMAC2_DCH2ECON.getCHAIRQ : TBits_8; inline;
- begin
- getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
- end;
- procedure TDMAC2_DCH2ECON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TDMAC2_DCH2ECON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TDMAC2_DCH2INT.setCHERIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TDMAC2_DCH2INT.clearCHERIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TDMAC2_DCH2INT.setCHERIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TDMAC2_DCH2INT.getCHERIF : TBits_1; inline;
- begin
- getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TDMAC2_DCH2INT.setCHTAIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TDMAC2_DCH2INT.clearCHTAIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TDMAC2_DCH2INT.setCHTAIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TDMAC2_DCH2INT.getCHTAIF : TBits_1; inline;
- begin
- getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TDMAC2_DCH2INT.setCHCCIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TDMAC2_DCH2INT.clearCHCCIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TDMAC2_DCH2INT.setCHCCIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TDMAC2_DCH2INT.getCHCCIF : TBits_1; inline;
- begin
- getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TDMAC2_DCH2INT.setCHBCIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TDMAC2_DCH2INT.clearCHBCIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TDMAC2_DCH2INT.setCHBCIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TDMAC2_DCH2INT.getCHBCIF : TBits_1; inline;
- begin
- getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TDMAC2_DCH2INT.setCHDHIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TDMAC2_DCH2INT.clearCHDHIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TDMAC2_DCH2INT.setCHDHIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TDMAC2_DCH2INT.getCHDHIF : TBits_1; inline;
- begin
- getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TDMAC2_DCH2INT.setCHDDIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TDMAC2_DCH2INT.clearCHDDIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TDMAC2_DCH2INT.setCHDDIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TDMAC2_DCH2INT.getCHDDIF : TBits_1; inline;
- begin
- getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TDMAC2_DCH2INT.setCHSHIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TDMAC2_DCH2INT.clearCHSHIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TDMAC2_DCH2INT.setCHSHIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TDMAC2_DCH2INT.getCHSHIF : TBits_1; inline;
- begin
- getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TDMAC2_DCH2INT.setCHSDIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TDMAC2_DCH2INT.clearCHSDIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TDMAC2_DCH2INT.setCHSDIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TDMAC2_DCH2INT.getCHSDIF : TBits_1; inline;
- begin
- getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TDMAC2_DCH2INT.setCHERIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- procedure TDMAC2_DCH2INT.clearCHERIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00010000;
- end;
- procedure TDMAC2_DCH2INT.setCHERIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00010000
- else
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- function TDMAC2_DCH2INT.getCHERIE : TBits_1; inline;
- begin
- getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
- end;
- procedure TDMAC2_DCH2INT.setCHTAIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- procedure TDMAC2_DCH2INT.clearCHTAIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00020000;
- end;
- procedure TDMAC2_DCH2INT.setCHTAIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00020000
- else
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- function TDMAC2_DCH2INT.getCHTAIE : TBits_1; inline;
- begin
- getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
- end;
- procedure TDMAC2_DCH2INT.setCHCCIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- procedure TDMAC2_DCH2INT.clearCHCCIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00040000;
- end;
- procedure TDMAC2_DCH2INT.setCHCCIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00040000
- else
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- function TDMAC2_DCH2INT.getCHCCIE : TBits_1; inline;
- begin
- getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
- end;
- procedure TDMAC2_DCH2INT.setCHBCIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- procedure TDMAC2_DCH2INT.clearCHBCIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00080000;
- end;
- procedure TDMAC2_DCH2INT.setCHBCIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00080000
- else
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- function TDMAC2_DCH2INT.getCHBCIE : TBits_1; inline;
- begin
- getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
- end;
- procedure TDMAC2_DCH2INT.setCHDHIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- procedure TDMAC2_DCH2INT.clearCHDHIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00100000;
- end;
- procedure TDMAC2_DCH2INT.setCHDHIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00100000
- else
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- function TDMAC2_DCH2INT.getCHDHIE : TBits_1; inline;
- begin
- getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
- end;
- procedure TDMAC2_DCH2INT.setCHDDIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- procedure TDMAC2_DCH2INT.clearCHDDIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00200000;
- end;
- procedure TDMAC2_DCH2INT.setCHDDIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00200000
- else
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- function TDMAC2_DCH2INT.getCHDDIE : TBits_1; inline;
- begin
- getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
- end;
- procedure TDMAC2_DCH2INT.setCHSHIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- procedure TDMAC2_DCH2INT.clearCHSHIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00400000;
- end;
- procedure TDMAC2_DCH2INT.setCHSHIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00400000
- else
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- function TDMAC2_DCH2INT.getCHSHIE : TBits_1; inline;
- begin
- getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
- end;
- procedure TDMAC2_DCH2INT.setCHSDIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- procedure TDMAC2_DCH2INT.clearCHSDIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00800000;
- end;
- procedure TDMAC2_DCH2INT.setCHSDIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00800000
- else
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- function TDMAC2_DCH2INT.getCHSDIE : TBits_1; inline;
- begin
- getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
- end;
- procedure TDMAC2_DCH2INT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TDMAC2_DCH2INT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TDMAC3_DCH3CON.setCHPRI(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TDMAC3_DCH3CON.getCHPRI : TBits_2; inline;
- begin
- getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TDMAC3_DCH3CON.setCHEDET; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TDMAC3_DCH3CON.clearCHEDET; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TDMAC3_DCH3CON.setCHEDET(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TDMAC3_DCH3CON.getCHEDET : TBits_1; inline;
- begin
- getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TDMAC3_DCH3CON.setCHAEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TDMAC3_DCH3CON.clearCHAEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TDMAC3_DCH3CON.setCHAEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TDMAC3_DCH3CON.getCHAEN : TBits_1; inline;
- begin
- getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TDMAC3_DCH3CON.setCHCHN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TDMAC3_DCH3CON.clearCHCHN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TDMAC3_DCH3CON.setCHCHN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TDMAC3_DCH3CON.getCHCHN : TBits_1; inline;
- begin
- getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TDMAC3_DCH3CON.setCHAED; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TDMAC3_DCH3CON.clearCHAED; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TDMAC3_DCH3CON.setCHAED(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TDMAC3_DCH3CON.getCHAED : TBits_1; inline;
- begin
- getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TDMAC3_DCH3CON.setCHEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TDMAC3_DCH3CON.clearCHEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TDMAC3_DCH3CON.setCHEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TDMAC3_DCH3CON.getCHEN : TBits_1; inline;
- begin
- getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TDMAC3_DCH3CON.setCHCHNS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TDMAC3_DCH3CON.clearCHCHNS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TDMAC3_DCH3CON.setCHCHNS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TDMAC3_DCH3CON.getCHCHNS : TBits_1; inline;
- begin
- getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TDMAC3_DCH3CON.setCHBUSY; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TDMAC3_DCH3CON.clearCHBUSY; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TDMAC3_DCH3CON.setCHBUSY(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TDMAC3_DCH3CON.getCHBUSY : TBits_1; inline;
- begin
- getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TDMAC3_DCH3CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TDMAC3_DCH3CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TDMAC3_DCH3ECON.setAIRQEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TDMAC3_DCH3ECON.clearAIRQEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TDMAC3_DCH3ECON.setAIRQEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TDMAC3_DCH3ECON.getAIRQEN : TBits_1; inline;
- begin
- getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TDMAC3_DCH3ECON.setSIRQEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TDMAC3_DCH3ECON.clearSIRQEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TDMAC3_DCH3ECON.setSIRQEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TDMAC3_DCH3ECON.getSIRQEN : TBits_1; inline;
- begin
- getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TDMAC3_DCH3ECON.setPATEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TDMAC3_DCH3ECON.clearPATEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TDMAC3_DCH3ECON.setPATEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TDMAC3_DCH3ECON.getPATEN : TBits_1; inline;
- begin
- getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TDMAC3_DCH3ECON.setCABORT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TDMAC3_DCH3ECON.clearCABORT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TDMAC3_DCH3ECON.setCABORT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TDMAC3_DCH3ECON.getCABORT : TBits_1; inline;
- begin
- getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TDMAC3_DCH3ECON.setCFORCE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TDMAC3_DCH3ECON.clearCFORCE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TDMAC3_DCH3ECON.setCFORCE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TDMAC3_DCH3ECON.getCFORCE : TBits_1; inline;
- begin
- getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TDMAC3_DCH3ECON.setCHSIRQ(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
- end;
- function TDMAC3_DCH3ECON.getCHSIRQ : TBits_8; inline;
- begin
- getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
- end;
- procedure TDMAC3_DCH3ECON.setCHAIRQ(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
- end;
- function TDMAC3_DCH3ECON.getCHAIRQ : TBits_8; inline;
- begin
- getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
- end;
- procedure TDMAC3_DCH3ECON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TDMAC3_DCH3ECON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TDMAC3_DCH3INT.setCHERIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TDMAC3_DCH3INT.clearCHERIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TDMAC3_DCH3INT.setCHERIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TDMAC3_DCH3INT.getCHERIF : TBits_1; inline;
- begin
- getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TDMAC3_DCH3INT.setCHTAIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TDMAC3_DCH3INT.clearCHTAIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TDMAC3_DCH3INT.setCHTAIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TDMAC3_DCH3INT.getCHTAIF : TBits_1; inline;
- begin
- getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TDMAC3_DCH3INT.setCHCCIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TDMAC3_DCH3INT.clearCHCCIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TDMAC3_DCH3INT.setCHCCIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TDMAC3_DCH3INT.getCHCCIF : TBits_1; inline;
- begin
- getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TDMAC3_DCH3INT.setCHBCIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TDMAC3_DCH3INT.clearCHBCIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TDMAC3_DCH3INT.setCHBCIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TDMAC3_DCH3INT.getCHBCIF : TBits_1; inline;
- begin
- getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TDMAC3_DCH3INT.setCHDHIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TDMAC3_DCH3INT.clearCHDHIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TDMAC3_DCH3INT.setCHDHIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TDMAC3_DCH3INT.getCHDHIF : TBits_1; inline;
- begin
- getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TDMAC3_DCH3INT.setCHDDIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TDMAC3_DCH3INT.clearCHDDIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TDMAC3_DCH3INT.setCHDDIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TDMAC3_DCH3INT.getCHDDIF : TBits_1; inline;
- begin
- getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TDMAC3_DCH3INT.setCHSHIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TDMAC3_DCH3INT.clearCHSHIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TDMAC3_DCH3INT.setCHSHIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TDMAC3_DCH3INT.getCHSHIF : TBits_1; inline;
- begin
- getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TDMAC3_DCH3INT.setCHSDIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TDMAC3_DCH3INT.clearCHSDIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TDMAC3_DCH3INT.setCHSDIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TDMAC3_DCH3INT.getCHSDIF : TBits_1; inline;
- begin
- getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TDMAC3_DCH3INT.setCHERIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- procedure TDMAC3_DCH3INT.clearCHERIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00010000;
- end;
- procedure TDMAC3_DCH3INT.setCHERIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00010000
- else
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- function TDMAC3_DCH3INT.getCHERIE : TBits_1; inline;
- begin
- getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
- end;
- procedure TDMAC3_DCH3INT.setCHTAIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- procedure TDMAC3_DCH3INT.clearCHTAIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00020000;
- end;
- procedure TDMAC3_DCH3INT.setCHTAIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00020000
- else
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- function TDMAC3_DCH3INT.getCHTAIE : TBits_1; inline;
- begin
- getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
- end;
- procedure TDMAC3_DCH3INT.setCHCCIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- procedure TDMAC3_DCH3INT.clearCHCCIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00040000;
- end;
- procedure TDMAC3_DCH3INT.setCHCCIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00040000
- else
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- function TDMAC3_DCH3INT.getCHCCIE : TBits_1; inline;
- begin
- getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
- end;
- procedure TDMAC3_DCH3INT.setCHBCIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- procedure TDMAC3_DCH3INT.clearCHBCIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00080000;
- end;
- procedure TDMAC3_DCH3INT.setCHBCIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00080000
- else
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- function TDMAC3_DCH3INT.getCHBCIE : TBits_1; inline;
- begin
- getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
- end;
- procedure TDMAC3_DCH3INT.setCHDHIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- procedure TDMAC3_DCH3INT.clearCHDHIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00100000;
- end;
- procedure TDMAC3_DCH3INT.setCHDHIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00100000
- else
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- function TDMAC3_DCH3INT.getCHDHIE : TBits_1; inline;
- begin
- getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
- end;
- procedure TDMAC3_DCH3INT.setCHDDIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- procedure TDMAC3_DCH3INT.clearCHDDIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00200000;
- end;
- procedure TDMAC3_DCH3INT.setCHDDIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00200000
- else
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- function TDMAC3_DCH3INT.getCHDDIE : TBits_1; inline;
- begin
- getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
- end;
- procedure TDMAC3_DCH3INT.setCHSHIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- procedure TDMAC3_DCH3INT.clearCHSHIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00400000;
- end;
- procedure TDMAC3_DCH3INT.setCHSHIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00400000
- else
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- function TDMAC3_DCH3INT.getCHSHIE : TBits_1; inline;
- begin
- getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
- end;
- procedure TDMAC3_DCH3INT.setCHSDIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- procedure TDMAC3_DCH3INT.clearCHSDIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00800000;
- end;
- procedure TDMAC3_DCH3INT.setCHSDIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00800000
- else
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- function TDMAC3_DCH3INT.getCHSDIE : TBits_1; inline;
- begin
- getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
- end;
- procedure TDMAC3_DCH3INT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TDMAC3_DCH3INT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TDMAC4_DCH4CON.setCHPRI(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TDMAC4_DCH4CON.getCHPRI : TBits_2; inline;
- begin
- getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TDMAC4_DCH4CON.setCHEDET; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TDMAC4_DCH4CON.clearCHEDET; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TDMAC4_DCH4CON.setCHEDET(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TDMAC4_DCH4CON.getCHEDET : TBits_1; inline;
- begin
- getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TDMAC4_DCH4CON.setCHAEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TDMAC4_DCH4CON.clearCHAEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TDMAC4_DCH4CON.setCHAEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TDMAC4_DCH4CON.getCHAEN : TBits_1; inline;
- begin
- getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TDMAC4_DCH4CON.setCHCHN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TDMAC4_DCH4CON.clearCHCHN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TDMAC4_DCH4CON.setCHCHN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TDMAC4_DCH4CON.getCHCHN : TBits_1; inline;
- begin
- getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TDMAC4_DCH4CON.setCHAED; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TDMAC4_DCH4CON.clearCHAED; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TDMAC4_DCH4CON.setCHAED(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TDMAC4_DCH4CON.getCHAED : TBits_1; inline;
- begin
- getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TDMAC4_DCH4CON.setCHEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TDMAC4_DCH4CON.clearCHEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TDMAC4_DCH4CON.setCHEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TDMAC4_DCH4CON.getCHEN : TBits_1; inline;
- begin
- getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TDMAC4_DCH4CON.setCHCHNS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TDMAC4_DCH4CON.clearCHCHNS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TDMAC4_DCH4CON.setCHCHNS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TDMAC4_DCH4CON.getCHCHNS : TBits_1; inline;
- begin
- getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TDMAC4_DCH4CON.setCHBUSY; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TDMAC4_DCH4CON.clearCHBUSY; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TDMAC4_DCH4CON.setCHBUSY(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TDMAC4_DCH4CON.getCHBUSY : TBits_1; inline;
- begin
- getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TDMAC4_DCH4CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TDMAC4_DCH4CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TDMAC4_DCH4ECON.setAIRQEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TDMAC4_DCH4ECON.clearAIRQEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TDMAC4_DCH4ECON.setAIRQEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TDMAC4_DCH4ECON.getAIRQEN : TBits_1; inline;
- begin
- getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TDMAC4_DCH4ECON.setSIRQEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TDMAC4_DCH4ECON.clearSIRQEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TDMAC4_DCH4ECON.setSIRQEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TDMAC4_DCH4ECON.getSIRQEN : TBits_1; inline;
- begin
- getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TDMAC4_DCH4ECON.setPATEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TDMAC4_DCH4ECON.clearPATEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TDMAC4_DCH4ECON.setPATEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TDMAC4_DCH4ECON.getPATEN : TBits_1; inline;
- begin
- getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TDMAC4_DCH4ECON.setCABORT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TDMAC4_DCH4ECON.clearCABORT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TDMAC4_DCH4ECON.setCABORT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TDMAC4_DCH4ECON.getCABORT : TBits_1; inline;
- begin
- getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TDMAC4_DCH4ECON.setCFORCE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TDMAC4_DCH4ECON.clearCFORCE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TDMAC4_DCH4ECON.setCFORCE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TDMAC4_DCH4ECON.getCFORCE : TBits_1; inline;
- begin
- getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TDMAC4_DCH4ECON.setCHSIRQ(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
- end;
- function TDMAC4_DCH4ECON.getCHSIRQ : TBits_8; inline;
- begin
- getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
- end;
- procedure TDMAC4_DCH4ECON.setCHAIRQ(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
- end;
- function TDMAC4_DCH4ECON.getCHAIRQ : TBits_8; inline;
- begin
- getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
- end;
- procedure TDMAC4_DCH4ECON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TDMAC4_DCH4ECON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TDMAC4_DCH4INT.setCHERIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TDMAC4_DCH4INT.clearCHERIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TDMAC4_DCH4INT.setCHERIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TDMAC4_DCH4INT.getCHERIF : TBits_1; inline;
- begin
- getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TDMAC4_DCH4INT.setCHTAIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TDMAC4_DCH4INT.clearCHTAIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TDMAC4_DCH4INT.setCHTAIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TDMAC4_DCH4INT.getCHTAIF : TBits_1; inline;
- begin
- getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TDMAC4_DCH4INT.setCHCCIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TDMAC4_DCH4INT.clearCHCCIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TDMAC4_DCH4INT.setCHCCIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TDMAC4_DCH4INT.getCHCCIF : TBits_1; inline;
- begin
- getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TDMAC4_DCH4INT.setCHBCIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TDMAC4_DCH4INT.clearCHBCIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TDMAC4_DCH4INT.setCHBCIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TDMAC4_DCH4INT.getCHBCIF : TBits_1; inline;
- begin
- getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TDMAC4_DCH4INT.setCHDHIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TDMAC4_DCH4INT.clearCHDHIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TDMAC4_DCH4INT.setCHDHIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TDMAC4_DCH4INT.getCHDHIF : TBits_1; inline;
- begin
- getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TDMAC4_DCH4INT.setCHDDIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TDMAC4_DCH4INT.clearCHDDIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TDMAC4_DCH4INT.setCHDDIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TDMAC4_DCH4INT.getCHDDIF : TBits_1; inline;
- begin
- getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TDMAC4_DCH4INT.setCHSHIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TDMAC4_DCH4INT.clearCHSHIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TDMAC4_DCH4INT.setCHSHIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TDMAC4_DCH4INT.getCHSHIF : TBits_1; inline;
- begin
- getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TDMAC4_DCH4INT.setCHSDIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TDMAC4_DCH4INT.clearCHSDIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TDMAC4_DCH4INT.setCHSDIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TDMAC4_DCH4INT.getCHSDIF : TBits_1; inline;
- begin
- getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TDMAC4_DCH4INT.setCHERIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- procedure TDMAC4_DCH4INT.clearCHERIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00010000;
- end;
- procedure TDMAC4_DCH4INT.setCHERIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00010000
- else
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- function TDMAC4_DCH4INT.getCHERIE : TBits_1; inline;
- begin
- getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
- end;
- procedure TDMAC4_DCH4INT.setCHTAIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- procedure TDMAC4_DCH4INT.clearCHTAIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00020000;
- end;
- procedure TDMAC4_DCH4INT.setCHTAIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00020000
- else
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- function TDMAC4_DCH4INT.getCHTAIE : TBits_1; inline;
- begin
- getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
- end;
- procedure TDMAC4_DCH4INT.setCHCCIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- procedure TDMAC4_DCH4INT.clearCHCCIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00040000;
- end;
- procedure TDMAC4_DCH4INT.setCHCCIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00040000
- else
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- function TDMAC4_DCH4INT.getCHCCIE : TBits_1; inline;
- begin
- getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
- end;
- procedure TDMAC4_DCH4INT.setCHBCIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- procedure TDMAC4_DCH4INT.clearCHBCIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00080000;
- end;
- procedure TDMAC4_DCH4INT.setCHBCIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00080000
- else
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- function TDMAC4_DCH4INT.getCHBCIE : TBits_1; inline;
- begin
- getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
- end;
- procedure TDMAC4_DCH4INT.setCHDHIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- procedure TDMAC4_DCH4INT.clearCHDHIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00100000;
- end;
- procedure TDMAC4_DCH4INT.setCHDHIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00100000
- else
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- function TDMAC4_DCH4INT.getCHDHIE : TBits_1; inline;
- begin
- getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
- end;
- procedure TDMAC4_DCH4INT.setCHDDIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- procedure TDMAC4_DCH4INT.clearCHDDIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00200000;
- end;
- procedure TDMAC4_DCH4INT.setCHDDIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00200000
- else
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- function TDMAC4_DCH4INT.getCHDDIE : TBits_1; inline;
- begin
- getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
- end;
- procedure TDMAC4_DCH4INT.setCHSHIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- procedure TDMAC4_DCH4INT.clearCHSHIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00400000;
- end;
- procedure TDMAC4_DCH4INT.setCHSHIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00400000
- else
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- function TDMAC4_DCH4INT.getCHSHIE : TBits_1; inline;
- begin
- getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
- end;
- procedure TDMAC4_DCH4INT.setCHSDIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- procedure TDMAC4_DCH4INT.clearCHSDIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00800000;
- end;
- procedure TDMAC4_DCH4INT.setCHSDIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00800000
- else
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- function TDMAC4_DCH4INT.getCHSDIE : TBits_1; inline;
- begin
- getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
- end;
- procedure TDMAC4_DCH4INT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TDMAC4_DCH4INT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TDMAC5_DCH5CON.setCHPRI(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TDMAC5_DCH5CON.getCHPRI : TBits_2; inline;
- begin
- getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TDMAC5_DCH5CON.setCHEDET; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TDMAC5_DCH5CON.clearCHEDET; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TDMAC5_DCH5CON.setCHEDET(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TDMAC5_DCH5CON.getCHEDET : TBits_1; inline;
- begin
- getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TDMAC5_DCH5CON.setCHAEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TDMAC5_DCH5CON.clearCHAEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TDMAC5_DCH5CON.setCHAEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TDMAC5_DCH5CON.getCHAEN : TBits_1; inline;
- begin
- getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TDMAC5_DCH5CON.setCHCHN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TDMAC5_DCH5CON.clearCHCHN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TDMAC5_DCH5CON.setCHCHN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TDMAC5_DCH5CON.getCHCHN : TBits_1; inline;
- begin
- getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TDMAC5_DCH5CON.setCHAED; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TDMAC5_DCH5CON.clearCHAED; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TDMAC5_DCH5CON.setCHAED(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TDMAC5_DCH5CON.getCHAED : TBits_1; inline;
- begin
- getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TDMAC5_DCH5CON.setCHEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TDMAC5_DCH5CON.clearCHEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TDMAC5_DCH5CON.setCHEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TDMAC5_DCH5CON.getCHEN : TBits_1; inline;
- begin
- getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TDMAC5_DCH5CON.setCHCHNS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TDMAC5_DCH5CON.clearCHCHNS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TDMAC5_DCH5CON.setCHCHNS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TDMAC5_DCH5CON.getCHCHNS : TBits_1; inline;
- begin
- getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TDMAC5_DCH5CON.setCHBUSY; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TDMAC5_DCH5CON.clearCHBUSY; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TDMAC5_DCH5CON.setCHBUSY(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TDMAC5_DCH5CON.getCHBUSY : TBits_1; inline;
- begin
- getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TDMAC5_DCH5CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TDMAC5_DCH5CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TDMAC5_DCH5ECON.setAIRQEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TDMAC5_DCH5ECON.clearAIRQEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TDMAC5_DCH5ECON.setAIRQEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TDMAC5_DCH5ECON.getAIRQEN : TBits_1; inline;
- begin
- getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TDMAC5_DCH5ECON.setSIRQEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TDMAC5_DCH5ECON.clearSIRQEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TDMAC5_DCH5ECON.setSIRQEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TDMAC5_DCH5ECON.getSIRQEN : TBits_1; inline;
- begin
- getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TDMAC5_DCH5ECON.setPATEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TDMAC5_DCH5ECON.clearPATEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TDMAC5_DCH5ECON.setPATEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TDMAC5_DCH5ECON.getPATEN : TBits_1; inline;
- begin
- getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TDMAC5_DCH5ECON.setCABORT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TDMAC5_DCH5ECON.clearCABORT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TDMAC5_DCH5ECON.setCABORT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TDMAC5_DCH5ECON.getCABORT : TBits_1; inline;
- begin
- getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TDMAC5_DCH5ECON.setCFORCE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TDMAC5_DCH5ECON.clearCFORCE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TDMAC5_DCH5ECON.setCFORCE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TDMAC5_DCH5ECON.getCFORCE : TBits_1; inline;
- begin
- getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TDMAC5_DCH5ECON.setCHSIRQ(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
- end;
- function TDMAC5_DCH5ECON.getCHSIRQ : TBits_8; inline;
- begin
- getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
- end;
- procedure TDMAC5_DCH5ECON.setCHAIRQ(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
- end;
- function TDMAC5_DCH5ECON.getCHAIRQ : TBits_8; inline;
- begin
- getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
- end;
- procedure TDMAC5_DCH5ECON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TDMAC5_DCH5ECON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TDMAC5_DCH5INT.setCHERIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TDMAC5_DCH5INT.clearCHERIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TDMAC5_DCH5INT.setCHERIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TDMAC5_DCH5INT.getCHERIF : TBits_1; inline;
- begin
- getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TDMAC5_DCH5INT.setCHTAIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TDMAC5_DCH5INT.clearCHTAIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TDMAC5_DCH5INT.setCHTAIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TDMAC5_DCH5INT.getCHTAIF : TBits_1; inline;
- begin
- getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TDMAC5_DCH5INT.setCHCCIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TDMAC5_DCH5INT.clearCHCCIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TDMAC5_DCH5INT.setCHCCIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TDMAC5_DCH5INT.getCHCCIF : TBits_1; inline;
- begin
- getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TDMAC5_DCH5INT.setCHBCIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TDMAC5_DCH5INT.clearCHBCIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TDMAC5_DCH5INT.setCHBCIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TDMAC5_DCH5INT.getCHBCIF : TBits_1; inline;
- begin
- getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TDMAC5_DCH5INT.setCHDHIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TDMAC5_DCH5INT.clearCHDHIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TDMAC5_DCH5INT.setCHDHIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TDMAC5_DCH5INT.getCHDHIF : TBits_1; inline;
- begin
- getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TDMAC5_DCH5INT.setCHDDIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TDMAC5_DCH5INT.clearCHDDIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TDMAC5_DCH5INT.setCHDDIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TDMAC5_DCH5INT.getCHDDIF : TBits_1; inline;
- begin
- getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TDMAC5_DCH5INT.setCHSHIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TDMAC5_DCH5INT.clearCHSHIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TDMAC5_DCH5INT.setCHSHIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TDMAC5_DCH5INT.getCHSHIF : TBits_1; inline;
- begin
- getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TDMAC5_DCH5INT.setCHSDIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TDMAC5_DCH5INT.clearCHSDIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TDMAC5_DCH5INT.setCHSDIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TDMAC5_DCH5INT.getCHSDIF : TBits_1; inline;
- begin
- getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TDMAC5_DCH5INT.setCHERIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- procedure TDMAC5_DCH5INT.clearCHERIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00010000;
- end;
- procedure TDMAC5_DCH5INT.setCHERIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00010000
- else
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- function TDMAC5_DCH5INT.getCHERIE : TBits_1; inline;
- begin
- getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
- end;
- procedure TDMAC5_DCH5INT.setCHTAIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- procedure TDMAC5_DCH5INT.clearCHTAIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00020000;
- end;
- procedure TDMAC5_DCH5INT.setCHTAIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00020000
- else
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- function TDMAC5_DCH5INT.getCHTAIE : TBits_1; inline;
- begin
- getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
- end;
- procedure TDMAC5_DCH5INT.setCHCCIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- procedure TDMAC5_DCH5INT.clearCHCCIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00040000;
- end;
- procedure TDMAC5_DCH5INT.setCHCCIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00040000
- else
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- function TDMAC5_DCH5INT.getCHCCIE : TBits_1; inline;
- begin
- getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
- end;
- procedure TDMAC5_DCH5INT.setCHBCIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- procedure TDMAC5_DCH5INT.clearCHBCIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00080000;
- end;
- procedure TDMAC5_DCH5INT.setCHBCIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00080000
- else
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- function TDMAC5_DCH5INT.getCHBCIE : TBits_1; inline;
- begin
- getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
- end;
- procedure TDMAC5_DCH5INT.setCHDHIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- procedure TDMAC5_DCH5INT.clearCHDHIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00100000;
- end;
- procedure TDMAC5_DCH5INT.setCHDHIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00100000
- else
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- function TDMAC5_DCH5INT.getCHDHIE : TBits_1; inline;
- begin
- getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
- end;
- procedure TDMAC5_DCH5INT.setCHDDIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- procedure TDMAC5_DCH5INT.clearCHDDIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00200000;
- end;
- procedure TDMAC5_DCH5INT.setCHDDIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00200000
- else
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- function TDMAC5_DCH5INT.getCHDDIE : TBits_1; inline;
- begin
- getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
- end;
- procedure TDMAC5_DCH5INT.setCHSHIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- procedure TDMAC5_DCH5INT.clearCHSHIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00400000;
- end;
- procedure TDMAC5_DCH5INT.setCHSHIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00400000
- else
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- function TDMAC5_DCH5INT.getCHSHIE : TBits_1; inline;
- begin
- getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
- end;
- procedure TDMAC5_DCH5INT.setCHSDIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- procedure TDMAC5_DCH5INT.clearCHSDIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00800000;
- end;
- procedure TDMAC5_DCH5INT.setCHSDIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00800000
- else
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- function TDMAC5_DCH5INT.getCHSDIE : TBits_1; inline;
- begin
- getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
- end;
- procedure TDMAC5_DCH5INT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TDMAC5_DCH5INT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TDMAC6_DCH6CON.setCHPRI(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TDMAC6_DCH6CON.getCHPRI : TBits_2; inline;
- begin
- getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TDMAC6_DCH6CON.setCHEDET; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TDMAC6_DCH6CON.clearCHEDET; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TDMAC6_DCH6CON.setCHEDET(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TDMAC6_DCH6CON.getCHEDET : TBits_1; inline;
- begin
- getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TDMAC6_DCH6CON.setCHAEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TDMAC6_DCH6CON.clearCHAEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TDMAC6_DCH6CON.setCHAEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TDMAC6_DCH6CON.getCHAEN : TBits_1; inline;
- begin
- getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TDMAC6_DCH6CON.setCHCHN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TDMAC6_DCH6CON.clearCHCHN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TDMAC6_DCH6CON.setCHCHN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TDMAC6_DCH6CON.getCHCHN : TBits_1; inline;
- begin
- getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TDMAC6_DCH6CON.setCHAED; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TDMAC6_DCH6CON.clearCHAED; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TDMAC6_DCH6CON.setCHAED(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TDMAC6_DCH6CON.getCHAED : TBits_1; inline;
- begin
- getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TDMAC6_DCH6CON.setCHEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TDMAC6_DCH6CON.clearCHEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TDMAC6_DCH6CON.setCHEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TDMAC6_DCH6CON.getCHEN : TBits_1; inline;
- begin
- getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TDMAC6_DCH6CON.setCHCHNS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TDMAC6_DCH6CON.clearCHCHNS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TDMAC6_DCH6CON.setCHCHNS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TDMAC6_DCH6CON.getCHCHNS : TBits_1; inline;
- begin
- getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TDMAC6_DCH6CON.setCHBUSY; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TDMAC6_DCH6CON.clearCHBUSY; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TDMAC6_DCH6CON.setCHBUSY(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TDMAC6_DCH6CON.getCHBUSY : TBits_1; inline;
- begin
- getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TDMAC6_DCH6CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TDMAC6_DCH6CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TDMAC6_DCH6ECON.setAIRQEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TDMAC6_DCH6ECON.clearAIRQEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TDMAC6_DCH6ECON.setAIRQEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TDMAC6_DCH6ECON.getAIRQEN : TBits_1; inline;
- begin
- getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TDMAC6_DCH6ECON.setSIRQEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TDMAC6_DCH6ECON.clearSIRQEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TDMAC6_DCH6ECON.setSIRQEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TDMAC6_DCH6ECON.getSIRQEN : TBits_1; inline;
- begin
- getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TDMAC6_DCH6ECON.setPATEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TDMAC6_DCH6ECON.clearPATEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TDMAC6_DCH6ECON.setPATEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TDMAC6_DCH6ECON.getPATEN : TBits_1; inline;
- begin
- getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TDMAC6_DCH6ECON.setCABORT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TDMAC6_DCH6ECON.clearCABORT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TDMAC6_DCH6ECON.setCABORT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TDMAC6_DCH6ECON.getCABORT : TBits_1; inline;
- begin
- getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TDMAC6_DCH6ECON.setCFORCE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TDMAC6_DCH6ECON.clearCFORCE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TDMAC6_DCH6ECON.setCFORCE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TDMAC6_DCH6ECON.getCFORCE : TBits_1; inline;
- begin
- getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TDMAC6_DCH6ECON.setCHSIRQ(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
- end;
- function TDMAC6_DCH6ECON.getCHSIRQ : TBits_8; inline;
- begin
- getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
- end;
- procedure TDMAC6_DCH6ECON.setCHAIRQ(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
- end;
- function TDMAC6_DCH6ECON.getCHAIRQ : TBits_8; inline;
- begin
- getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
- end;
- procedure TDMAC6_DCH6ECON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TDMAC6_DCH6ECON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TDMAC6_DCH6INT.setCHERIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TDMAC6_DCH6INT.clearCHERIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TDMAC6_DCH6INT.setCHERIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TDMAC6_DCH6INT.getCHERIF : TBits_1; inline;
- begin
- getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TDMAC6_DCH6INT.setCHTAIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TDMAC6_DCH6INT.clearCHTAIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TDMAC6_DCH6INT.setCHTAIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TDMAC6_DCH6INT.getCHTAIF : TBits_1; inline;
- begin
- getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TDMAC6_DCH6INT.setCHCCIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TDMAC6_DCH6INT.clearCHCCIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TDMAC6_DCH6INT.setCHCCIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TDMAC6_DCH6INT.getCHCCIF : TBits_1; inline;
- begin
- getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TDMAC6_DCH6INT.setCHBCIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TDMAC6_DCH6INT.clearCHBCIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TDMAC6_DCH6INT.setCHBCIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TDMAC6_DCH6INT.getCHBCIF : TBits_1; inline;
- begin
- getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TDMAC6_DCH6INT.setCHDHIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TDMAC6_DCH6INT.clearCHDHIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TDMAC6_DCH6INT.setCHDHIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TDMAC6_DCH6INT.getCHDHIF : TBits_1; inline;
- begin
- getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TDMAC6_DCH6INT.setCHDDIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TDMAC6_DCH6INT.clearCHDDIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TDMAC6_DCH6INT.setCHDDIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TDMAC6_DCH6INT.getCHDDIF : TBits_1; inline;
- begin
- getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TDMAC6_DCH6INT.setCHSHIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TDMAC6_DCH6INT.clearCHSHIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TDMAC6_DCH6INT.setCHSHIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TDMAC6_DCH6INT.getCHSHIF : TBits_1; inline;
- begin
- getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TDMAC6_DCH6INT.setCHSDIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TDMAC6_DCH6INT.clearCHSDIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TDMAC6_DCH6INT.setCHSDIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TDMAC6_DCH6INT.getCHSDIF : TBits_1; inline;
- begin
- getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TDMAC6_DCH6INT.setCHERIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- procedure TDMAC6_DCH6INT.clearCHERIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00010000;
- end;
- procedure TDMAC6_DCH6INT.setCHERIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00010000
- else
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- function TDMAC6_DCH6INT.getCHERIE : TBits_1; inline;
- begin
- getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
- end;
- procedure TDMAC6_DCH6INT.setCHTAIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- procedure TDMAC6_DCH6INT.clearCHTAIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00020000;
- end;
- procedure TDMAC6_DCH6INT.setCHTAIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00020000
- else
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- function TDMAC6_DCH6INT.getCHTAIE : TBits_1; inline;
- begin
- getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
- end;
- procedure TDMAC6_DCH6INT.setCHCCIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- procedure TDMAC6_DCH6INT.clearCHCCIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00040000;
- end;
- procedure TDMAC6_DCH6INT.setCHCCIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00040000
- else
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- function TDMAC6_DCH6INT.getCHCCIE : TBits_1; inline;
- begin
- getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
- end;
- procedure TDMAC6_DCH6INT.setCHBCIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- procedure TDMAC6_DCH6INT.clearCHBCIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00080000;
- end;
- procedure TDMAC6_DCH6INT.setCHBCIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00080000
- else
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- function TDMAC6_DCH6INT.getCHBCIE : TBits_1; inline;
- begin
- getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
- end;
- procedure TDMAC6_DCH6INT.setCHDHIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- procedure TDMAC6_DCH6INT.clearCHDHIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00100000;
- end;
- procedure TDMAC6_DCH6INT.setCHDHIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00100000
- else
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- function TDMAC6_DCH6INT.getCHDHIE : TBits_1; inline;
- begin
- getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
- end;
- procedure TDMAC6_DCH6INT.setCHDDIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- procedure TDMAC6_DCH6INT.clearCHDDIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00200000;
- end;
- procedure TDMAC6_DCH6INT.setCHDDIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00200000
- else
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- function TDMAC6_DCH6INT.getCHDDIE : TBits_1; inline;
- begin
- getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
- end;
- procedure TDMAC6_DCH6INT.setCHSHIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- procedure TDMAC6_DCH6INT.clearCHSHIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00400000;
- end;
- procedure TDMAC6_DCH6INT.setCHSHIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00400000
- else
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- function TDMAC6_DCH6INT.getCHSHIE : TBits_1; inline;
- begin
- getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
- end;
- procedure TDMAC6_DCH6INT.setCHSDIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- procedure TDMAC6_DCH6INT.clearCHSDIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00800000;
- end;
- procedure TDMAC6_DCH6INT.setCHSDIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00800000
- else
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- function TDMAC6_DCH6INT.getCHSDIE : TBits_1; inline;
- begin
- getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
- end;
- procedure TDMAC6_DCH6INT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TDMAC6_DCH6INT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TDMAC7_DCH7CON.setCHPRI(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TDMAC7_DCH7CON.getCHPRI : TBits_2; inline;
- begin
- getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TDMAC7_DCH7CON.setCHEDET; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TDMAC7_DCH7CON.clearCHEDET; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TDMAC7_DCH7CON.setCHEDET(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TDMAC7_DCH7CON.getCHEDET : TBits_1; inline;
- begin
- getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TDMAC7_DCH7CON.setCHAEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TDMAC7_DCH7CON.clearCHAEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TDMAC7_DCH7CON.setCHAEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TDMAC7_DCH7CON.getCHAEN : TBits_1; inline;
- begin
- getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TDMAC7_DCH7CON.setCHCHN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TDMAC7_DCH7CON.clearCHCHN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TDMAC7_DCH7CON.setCHCHN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TDMAC7_DCH7CON.getCHCHN : TBits_1; inline;
- begin
- getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TDMAC7_DCH7CON.setCHAED; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TDMAC7_DCH7CON.clearCHAED; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TDMAC7_DCH7CON.setCHAED(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TDMAC7_DCH7CON.getCHAED : TBits_1; inline;
- begin
- getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TDMAC7_DCH7CON.setCHEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TDMAC7_DCH7CON.clearCHEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TDMAC7_DCH7CON.setCHEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TDMAC7_DCH7CON.getCHEN : TBits_1; inline;
- begin
- getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TDMAC7_DCH7CON.setCHCHNS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TDMAC7_DCH7CON.clearCHCHNS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TDMAC7_DCH7CON.setCHCHNS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TDMAC7_DCH7CON.getCHCHNS : TBits_1; inline;
- begin
- getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TDMAC7_DCH7CON.setCHBUSY; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TDMAC7_DCH7CON.clearCHBUSY; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TDMAC7_DCH7CON.setCHBUSY(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TDMAC7_DCH7CON.getCHBUSY : TBits_1; inline;
- begin
- getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TDMAC7_DCH7CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TDMAC7_DCH7CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TDMAC7_DCH7ECON.setAIRQEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TDMAC7_DCH7ECON.clearAIRQEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TDMAC7_DCH7ECON.setAIRQEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TDMAC7_DCH7ECON.getAIRQEN : TBits_1; inline;
- begin
- getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TDMAC7_DCH7ECON.setSIRQEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TDMAC7_DCH7ECON.clearSIRQEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TDMAC7_DCH7ECON.setSIRQEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TDMAC7_DCH7ECON.getSIRQEN : TBits_1; inline;
- begin
- getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TDMAC7_DCH7ECON.setPATEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TDMAC7_DCH7ECON.clearPATEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TDMAC7_DCH7ECON.setPATEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TDMAC7_DCH7ECON.getPATEN : TBits_1; inline;
- begin
- getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TDMAC7_DCH7ECON.setCABORT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TDMAC7_DCH7ECON.clearCABORT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TDMAC7_DCH7ECON.setCABORT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TDMAC7_DCH7ECON.getCABORT : TBits_1; inline;
- begin
- getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TDMAC7_DCH7ECON.setCFORCE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TDMAC7_DCH7ECON.clearCFORCE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TDMAC7_DCH7ECON.setCFORCE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TDMAC7_DCH7ECON.getCFORCE : TBits_1; inline;
- begin
- getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TDMAC7_DCH7ECON.setCHSIRQ(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
- end;
- function TDMAC7_DCH7ECON.getCHSIRQ : TBits_8; inline;
- begin
- getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
- end;
- procedure TDMAC7_DCH7ECON.setCHAIRQ(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
- end;
- function TDMAC7_DCH7ECON.getCHAIRQ : TBits_8; inline;
- begin
- getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
- end;
- procedure TDMAC7_DCH7ECON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TDMAC7_DCH7ECON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TDMAC7_DCH7INT.setCHERIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TDMAC7_DCH7INT.clearCHERIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TDMAC7_DCH7INT.setCHERIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TDMAC7_DCH7INT.getCHERIF : TBits_1; inline;
- begin
- getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TDMAC7_DCH7INT.setCHTAIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TDMAC7_DCH7INT.clearCHTAIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TDMAC7_DCH7INT.setCHTAIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TDMAC7_DCH7INT.getCHTAIF : TBits_1; inline;
- begin
- getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TDMAC7_DCH7INT.setCHCCIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TDMAC7_DCH7INT.clearCHCCIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TDMAC7_DCH7INT.setCHCCIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TDMAC7_DCH7INT.getCHCCIF : TBits_1; inline;
- begin
- getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TDMAC7_DCH7INT.setCHBCIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TDMAC7_DCH7INT.clearCHBCIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TDMAC7_DCH7INT.setCHBCIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TDMAC7_DCH7INT.getCHBCIF : TBits_1; inline;
- begin
- getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TDMAC7_DCH7INT.setCHDHIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TDMAC7_DCH7INT.clearCHDHIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TDMAC7_DCH7INT.setCHDHIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TDMAC7_DCH7INT.getCHDHIF : TBits_1; inline;
- begin
- getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TDMAC7_DCH7INT.setCHDDIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TDMAC7_DCH7INT.clearCHDDIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TDMAC7_DCH7INT.setCHDDIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TDMAC7_DCH7INT.getCHDDIF : TBits_1; inline;
- begin
- getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TDMAC7_DCH7INT.setCHSHIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TDMAC7_DCH7INT.clearCHSHIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TDMAC7_DCH7INT.setCHSHIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TDMAC7_DCH7INT.getCHSHIF : TBits_1; inline;
- begin
- getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TDMAC7_DCH7INT.setCHSDIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TDMAC7_DCH7INT.clearCHSDIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TDMAC7_DCH7INT.setCHSDIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TDMAC7_DCH7INT.getCHSDIF : TBits_1; inline;
- begin
- getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TDMAC7_DCH7INT.setCHERIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- procedure TDMAC7_DCH7INT.clearCHERIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00010000;
- end;
- procedure TDMAC7_DCH7INT.setCHERIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00010000
- else
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- function TDMAC7_DCH7INT.getCHERIE : TBits_1; inline;
- begin
- getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
- end;
- procedure TDMAC7_DCH7INT.setCHTAIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- procedure TDMAC7_DCH7INT.clearCHTAIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00020000;
- end;
- procedure TDMAC7_DCH7INT.setCHTAIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00020000
- else
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- function TDMAC7_DCH7INT.getCHTAIE : TBits_1; inline;
- begin
- getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
- end;
- procedure TDMAC7_DCH7INT.setCHCCIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- procedure TDMAC7_DCH7INT.clearCHCCIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00040000;
- end;
- procedure TDMAC7_DCH7INT.setCHCCIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00040000
- else
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- function TDMAC7_DCH7INT.getCHCCIE : TBits_1; inline;
- begin
- getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
- end;
- procedure TDMAC7_DCH7INT.setCHBCIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- procedure TDMAC7_DCH7INT.clearCHBCIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00080000;
- end;
- procedure TDMAC7_DCH7INT.setCHBCIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00080000
- else
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- function TDMAC7_DCH7INT.getCHBCIE : TBits_1; inline;
- begin
- getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
- end;
- procedure TDMAC7_DCH7INT.setCHDHIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- procedure TDMAC7_DCH7INT.clearCHDHIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00100000;
- end;
- procedure TDMAC7_DCH7INT.setCHDHIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00100000
- else
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- function TDMAC7_DCH7INT.getCHDHIE : TBits_1; inline;
- begin
- getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
- end;
- procedure TDMAC7_DCH7INT.setCHDDIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- procedure TDMAC7_DCH7INT.clearCHDDIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00200000;
- end;
- procedure TDMAC7_DCH7INT.setCHDDIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00200000
- else
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- function TDMAC7_DCH7INT.getCHDDIE : TBits_1; inline;
- begin
- getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
- end;
- procedure TDMAC7_DCH7INT.setCHSHIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- procedure TDMAC7_DCH7INT.clearCHSHIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00400000;
- end;
- procedure TDMAC7_DCH7INT.setCHSHIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00400000
- else
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- function TDMAC7_DCH7INT.getCHSHIE : TBits_1; inline;
- begin
- getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
- end;
- procedure TDMAC7_DCH7INT.setCHSDIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- procedure TDMAC7_DCH7INT.clearCHSDIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00800000;
- end;
- procedure TDMAC7_DCH7INT.setCHSDIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00800000
- else
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- function TDMAC7_DCH7INT.getCHSDIE : TBits_1; inline;
- begin
- getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
- end;
- procedure TDMAC7_DCH7INT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TDMAC7_DCH7INT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPCACHE_CHECON.setPFMWS(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
- end;
- function TPCACHE_CHECON.getPFMWS : TBits_3; inline;
- begin
- getPFMWS := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
- end;
- procedure TPCACHE_CHECON.setPREFEN(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFCF or ( thebits shl 4 );
- end;
- function TPCACHE_CHECON.getPREFEN : TBits_2; inline;
- begin
- getPREFEN := (pTDefRegMap(@Self)^.val and $00000030) shr 4;
- end;
- procedure TPCACHE_CHECON.setDCSZ(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
- end;
- function TPCACHE_CHECON.getDCSZ : TBits_2; inline;
- begin
- getDCSZ := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
- end;
- procedure TPCACHE_CHECON.setCHECOH; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- procedure TPCACHE_CHECON.clearCHECOH; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00010000;
- end;
- procedure TPCACHE_CHECON.setCHECOH(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00010000
- else
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- function TPCACHE_CHECON.getCHECOH : TBits_1; inline;
- begin
- getCHECOH := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
- end;
- procedure TPCACHE_CHECON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPCACHE_CHECON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPCACHE_CHETAG.setLTYPE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPCACHE_CHETAG.clearLTYPE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPCACHE_CHETAG.setLTYPE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPCACHE_CHETAG.getLTYPE : TBits_1; inline;
- begin
- getLTYPE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPCACHE_CHETAG.setLLOCK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPCACHE_CHETAG.clearLLOCK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPCACHE_CHETAG.setLLOCK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPCACHE_CHETAG.getLLOCK : TBits_1; inline;
- begin
- getLLOCK := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPCACHE_CHETAG.setLVALID; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPCACHE_CHETAG.clearLVALID; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPCACHE_CHETAG.setLVALID(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPCACHE_CHETAG.getLVALID : TBits_1; inline;
- begin
- getLVALID := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPCACHE_CHETAG.setLTAG(thebits : TBits_20); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00000F or ( thebits shl 4 );
- end;
- function TPCACHE_CHETAG.getLTAG : TBits_20; inline;
- begin
- getLTAG := (pTDefRegMap(@Self)^.val and $00FFFFF0) shr 4;
- end;
- procedure TPCACHE_CHETAG.setLTAGBOOT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- procedure TPCACHE_CHETAG.clearLTAGBOOT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $80000000;
- end;
- procedure TPCACHE_CHETAG.setLTAGBOOT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $80000000
- else
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- function TPCACHE_CHETAG.getLTAGBOOT : TBits_1; inline;
- begin
- getLTAGBOOT := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
- end;
- procedure TPCACHE_CHETAG.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPCACHE_CHETAG.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUSB_U1IR.setURSTIF_DETACHIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUSB_U1IR.clearURSTIF_DETACHIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUSB_U1IR.setURSTIF_DETACHIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUSB_U1IR.getURSTIF_DETACHIF : TBits_1; inline;
- begin
- getURSTIF_DETACHIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUSB_U1IR.setUERRIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUSB_U1IR.clearUERRIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUSB_U1IR.setUERRIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUSB_U1IR.getUERRIF : TBits_1; inline;
- begin
- getUERRIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUSB_U1IR.setSOFIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUSB_U1IR.clearSOFIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUSB_U1IR.setSOFIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUSB_U1IR.getSOFIF : TBits_1; inline;
- begin
- getSOFIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUSB_U1IR.setTRNIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUSB_U1IR.clearTRNIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUSB_U1IR.setTRNIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUSB_U1IR.getTRNIF : TBits_1; inline;
- begin
- getTRNIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUSB_U1IR.setIDLEIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUSB_U1IR.clearIDLEIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUSB_U1IR.setIDLEIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUSB_U1IR.getIDLEIF : TBits_1; inline;
- begin
- getIDLEIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUSB_U1IR.setRESUMEIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUSB_U1IR.clearRESUMEIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUSB_U1IR.setRESUMEIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUSB_U1IR.getRESUMEIF : TBits_1; inline;
- begin
- getRESUMEIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUSB_U1IR.setATTACHIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUSB_U1IR.clearATTACHIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUSB_U1IR.setATTACHIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUSB_U1IR.getATTACHIF : TBits_1; inline;
- begin
- getATTACHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUSB_U1IR.setSTALLIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUSB_U1IR.clearSTALLIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUSB_U1IR.setSTALLIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUSB_U1IR.getSTALLIF : TBits_1; inline;
- begin
- getSTALLIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUSB_U1IR.setDETACHIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUSB_U1IR.clearDETACHIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUSB_U1IR.setDETACHIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUSB_U1IR.getDETACHIF : TBits_1; inline;
- begin
- getDETACHIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUSB_U1IR.setURSTIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUSB_U1IR.clearURSTIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUSB_U1IR.setURSTIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUSB_U1IR.getURSTIF : TBits_1; inline;
- begin
- getURSTIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUSB_U1IE.setURSTIE_DETACHIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUSB_U1IE.clearURSTIE_DETACHIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUSB_U1IE.setURSTIE_DETACHIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUSB_U1IE.getURSTIE_DETACHIE : TBits_1; inline;
- begin
- getURSTIE_DETACHIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUSB_U1IE.setUERRIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUSB_U1IE.clearUERRIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUSB_U1IE.setUERRIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUSB_U1IE.getUERRIE : TBits_1; inline;
- begin
- getUERRIE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUSB_U1IE.setSOFIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUSB_U1IE.clearSOFIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUSB_U1IE.setSOFIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUSB_U1IE.getSOFIE : TBits_1; inline;
- begin
- getSOFIE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUSB_U1IE.setTRNIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUSB_U1IE.clearTRNIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUSB_U1IE.setTRNIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUSB_U1IE.getTRNIE : TBits_1; inline;
- begin
- getTRNIE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUSB_U1IE.setIDLEIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUSB_U1IE.clearIDLEIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUSB_U1IE.setIDLEIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUSB_U1IE.getIDLEIE : TBits_1; inline;
- begin
- getIDLEIE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUSB_U1IE.setRESUMEIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUSB_U1IE.clearRESUMEIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUSB_U1IE.setRESUMEIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUSB_U1IE.getRESUMEIE : TBits_1; inline;
- begin
- getRESUMEIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUSB_U1IE.setATTACHIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUSB_U1IE.clearATTACHIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUSB_U1IE.setATTACHIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUSB_U1IE.getATTACHIE : TBits_1; inline;
- begin
- getATTACHIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUSB_U1IE.setSTALLIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUSB_U1IE.clearSTALLIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUSB_U1IE.setSTALLIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUSB_U1IE.getSTALLIE : TBits_1; inline;
- begin
- getSTALLIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUSB_U1IE.setDETACHIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUSB_U1IE.clearDETACHIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUSB_U1IE.setDETACHIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUSB_U1IE.getDETACHIE : TBits_1; inline;
- begin
- getDETACHIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUSB_U1IE.setURSTIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUSB_U1IE.clearURSTIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUSB_U1IE.setURSTIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUSB_U1IE.getURSTIE : TBits_1; inline;
- begin
- getURSTIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUSB_U1EIR.setPIDEF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUSB_U1EIR.clearPIDEF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUSB_U1EIR.setPIDEF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUSB_U1EIR.getPIDEF : TBits_1; inline;
- begin
- getPIDEF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUSB_U1EIR.setCRC5EF_EOFEF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUSB_U1EIR.clearCRC5EF_EOFEF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUSB_U1EIR.setCRC5EF_EOFEF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUSB_U1EIR.getCRC5EF_EOFEF : TBits_1; inline;
- begin
- getCRC5EF_EOFEF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUSB_U1EIR.setCRC16EF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUSB_U1EIR.clearCRC16EF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUSB_U1EIR.setCRC16EF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUSB_U1EIR.getCRC16EF : TBits_1; inline;
- begin
- getCRC16EF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUSB_U1EIR.setDFN8EF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUSB_U1EIR.clearDFN8EF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUSB_U1EIR.setDFN8EF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUSB_U1EIR.getDFN8EF : TBits_1; inline;
- begin
- getDFN8EF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUSB_U1EIR.setBTOEF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUSB_U1EIR.clearBTOEF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUSB_U1EIR.setBTOEF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUSB_U1EIR.getBTOEF : TBits_1; inline;
- begin
- getBTOEF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUSB_U1EIR.setDMAEF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUSB_U1EIR.clearDMAEF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUSB_U1EIR.setDMAEF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUSB_U1EIR.getDMAEF : TBits_1; inline;
- begin
- getDMAEF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUSB_U1EIR.setBMXEF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUSB_U1EIR.clearBMXEF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUSB_U1EIR.setBMXEF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUSB_U1EIR.getBMXEF : TBits_1; inline;
- begin
- getBMXEF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUSB_U1EIR.setBTSEF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUSB_U1EIR.clearBTSEF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUSB_U1EIR.setBTSEF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUSB_U1EIR.getBTSEF : TBits_1; inline;
- begin
- getBTSEF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUSB_U1EIR.setCRC5EF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUSB_U1EIR.clearCRC5EF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUSB_U1EIR.setCRC5EF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUSB_U1EIR.getCRC5EF : TBits_1; inline;
- begin
- getCRC5EF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUSB_U1EIR.setEOFEF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUSB_U1EIR.clearEOFEF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUSB_U1EIR.setEOFEF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUSB_U1EIR.getEOFEF : TBits_1; inline;
- begin
- getEOFEF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUSB_U1EIE.setPIDEE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUSB_U1EIE.clearPIDEE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUSB_U1EIE.setPIDEE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUSB_U1EIE.getPIDEE : TBits_1; inline;
- begin
- getPIDEE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUSB_U1EIE.setCRC5EE_EOFEE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUSB_U1EIE.clearCRC5EE_EOFEE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUSB_U1EIE.setCRC5EE_EOFEE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUSB_U1EIE.getCRC5EE_EOFEE : TBits_1; inline;
- begin
- getCRC5EE_EOFEE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUSB_U1EIE.setCRC16EE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUSB_U1EIE.clearCRC16EE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUSB_U1EIE.setCRC16EE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUSB_U1EIE.getCRC16EE : TBits_1; inline;
- begin
- getCRC16EE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUSB_U1EIE.setDFN8EE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUSB_U1EIE.clearDFN8EE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUSB_U1EIE.setDFN8EE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUSB_U1EIE.getDFN8EE : TBits_1; inline;
- begin
- getDFN8EE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUSB_U1EIE.setBTOEE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUSB_U1EIE.clearBTOEE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUSB_U1EIE.setBTOEE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUSB_U1EIE.getBTOEE : TBits_1; inline;
- begin
- getBTOEE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUSB_U1EIE.setDMAEE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUSB_U1EIE.clearDMAEE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUSB_U1EIE.setDMAEE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUSB_U1EIE.getDMAEE : TBits_1; inline;
- begin
- getDMAEE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUSB_U1EIE.setBMXEE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUSB_U1EIE.clearBMXEE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUSB_U1EIE.setBMXEE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUSB_U1EIE.getBMXEE : TBits_1; inline;
- begin
- getBMXEE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUSB_U1EIE.setBTSEE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUSB_U1EIE.clearBTSEE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUSB_U1EIE.setBTSEE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUSB_U1EIE.getBTSEE : TBits_1; inline;
- begin
- getBTSEE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUSB_U1EIE.setCRC5EE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUSB_U1EIE.clearCRC5EE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUSB_U1EIE.setCRC5EE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUSB_U1EIE.getCRC5EE : TBits_1; inline;
- begin
- getCRC5EE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUSB_U1EIE.setEOFEE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUSB_U1EIE.clearEOFEE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUSB_U1EIE.setEOFEE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUSB_U1EIE.getEOFEE : TBits_1; inline;
- begin
- getEOFEE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUSB_U1STAT.setPPBI; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUSB_U1STAT.clearPPBI; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUSB_U1STAT.setPPBI(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUSB_U1STAT.getPPBI : TBits_1; inline;
- begin
- getPPBI := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUSB_U1STAT.setDIR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUSB_U1STAT.clearDIR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUSB_U1STAT.setDIR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUSB_U1STAT.getDIR : TBits_1; inline;
- begin
- getDIR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUSB_U1STAT.setENDPT(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF0F or ( thebits shl 4 );
- end;
- function TUSB_U1STAT.getENDPT : TBits_4; inline;
- begin
- getENDPT := (pTDefRegMap(@Self)^.val and $000000F0) shr 4;
- end;
- procedure TUSB_U1STAT.setENDPT0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUSB_U1STAT.clearENDPT0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUSB_U1STAT.setENDPT0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUSB_U1STAT.getENDPT0 : TBits_1; inline;
- begin
- getENDPT0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUSB_U1STAT.setENDPT1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUSB_U1STAT.clearENDPT1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUSB_U1STAT.setENDPT1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUSB_U1STAT.getENDPT1 : TBits_1; inline;
- begin
- getENDPT1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUSB_U1STAT.setENDPT2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUSB_U1STAT.clearENDPT2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUSB_U1STAT.setENDPT2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUSB_U1STAT.getENDPT2 : TBits_1; inline;
- begin
- getENDPT2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUSB_U1STAT.setENDPT3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUSB_U1STAT.clearENDPT3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUSB_U1STAT.setENDPT3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUSB_U1STAT.getENDPT3 : TBits_1; inline;
- begin
- getENDPT3 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUSB_U1CON.setUSBEN_SOFEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUSB_U1CON.clearUSBEN_SOFEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUSB_U1CON.setUSBEN_SOFEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUSB_U1CON.getUSBEN_SOFEN : TBits_1; inline;
- begin
- getUSBEN_SOFEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUSB_U1CON.setPPBRST; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUSB_U1CON.clearPPBRST; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUSB_U1CON.setPPBRST(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUSB_U1CON.getPPBRST : TBits_1; inline;
- begin
- getPPBRST := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUSB_U1CON.setRESUME; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUSB_U1CON.clearRESUME; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUSB_U1CON.setRESUME(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUSB_U1CON.getRESUME : TBits_1; inline;
- begin
- getRESUME := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUSB_U1CON.setHOSTEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUSB_U1CON.clearHOSTEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUSB_U1CON.setHOSTEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUSB_U1CON.getHOSTEN : TBits_1; inline;
- begin
- getHOSTEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUSB_U1CON.setUSBRST; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUSB_U1CON.clearUSBRST; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUSB_U1CON.setUSBRST(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUSB_U1CON.getUSBRST : TBits_1; inline;
- begin
- getUSBRST := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUSB_U1CON.setPKTDIS_TOKBUSY; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUSB_U1CON.clearPKTDIS_TOKBUSY; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUSB_U1CON.setPKTDIS_TOKBUSY(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUSB_U1CON.getPKTDIS_TOKBUSY : TBits_1; inline;
- begin
- getPKTDIS_TOKBUSY := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUSB_U1CON.setSE0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUSB_U1CON.clearSE0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUSB_U1CON.setSE0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUSB_U1CON.getSE0 : TBits_1; inline;
- begin
- getSE0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUSB_U1CON.setJSTATE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUSB_U1CON.clearJSTATE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUSB_U1CON.setJSTATE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUSB_U1CON.getJSTATE : TBits_1; inline;
- begin
- getJSTATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUSB_U1CON.setUSBEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUSB_U1CON.clearUSBEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUSB_U1CON.setUSBEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUSB_U1CON.getUSBEN : TBits_1; inline;
- begin
- getUSBEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUSB_U1CON.setSOFEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUSB_U1CON.clearSOFEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUSB_U1CON.setSOFEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUSB_U1CON.getSOFEN : TBits_1; inline;
- begin
- getSOFEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUSB_U1CON.setPKTDIS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUSB_U1CON.clearPKTDIS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUSB_U1CON.setPKTDIS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUSB_U1CON.getPKTDIS : TBits_1; inline;
- begin
- getPKTDIS := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUSB_U1CON.setTOKBUSY; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUSB_U1CON.clearTOKBUSY; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUSB_U1CON.setTOKBUSY(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUSB_U1CON.getTOKBUSY : TBits_1; inline;
- begin
- getTOKBUSY := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUSB_U1ADDR.setDEVADDR(thebits : TBits_7); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF80 or ( thebits shl 0 );
- end;
- function TUSB_U1ADDR.getDEVADDR : TBits_7; inline;
- begin
- getDEVADDR := (pTDefRegMap(@Self)^.val and $0000007F) shr 0;
- end;
- procedure TUSB_U1ADDR.setLSPDEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUSB_U1ADDR.clearLSPDEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUSB_U1ADDR.setLSPDEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUSB_U1ADDR.getLSPDEN : TBits_1; inline;
- begin
- getLSPDEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUSB_U1ADDR.setDEVADDR0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUSB_U1ADDR.clearDEVADDR0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUSB_U1ADDR.setDEVADDR0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUSB_U1ADDR.getDEVADDR0 : TBits_1; inline;
- begin
- getDEVADDR0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUSB_U1ADDR.setDEVADDR1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUSB_U1ADDR.clearDEVADDR1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUSB_U1ADDR.setDEVADDR1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUSB_U1ADDR.getDEVADDR1 : TBits_1; inline;
- begin
- getDEVADDR1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUSB_U1ADDR.setDEVADDR2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUSB_U1ADDR.clearDEVADDR2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUSB_U1ADDR.setDEVADDR2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUSB_U1ADDR.getDEVADDR2 : TBits_1; inline;
- begin
- getDEVADDR2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUSB_U1ADDR.setDEVADDR3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUSB_U1ADDR.clearDEVADDR3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUSB_U1ADDR.setDEVADDR3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUSB_U1ADDR.getDEVADDR3 : TBits_1; inline;
- begin
- getDEVADDR3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUSB_U1ADDR.setDEVADDR4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUSB_U1ADDR.clearDEVADDR4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUSB_U1ADDR.setDEVADDR4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUSB_U1ADDR.getDEVADDR4 : TBits_1; inline;
- begin
- getDEVADDR4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUSB_U1ADDR.setDEVADDR5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUSB_U1ADDR.clearDEVADDR5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUSB_U1ADDR.setDEVADDR5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUSB_U1ADDR.getDEVADDR5 : TBits_1; inline;
- begin
- getDEVADDR5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUSB_U1ADDR.setDEVADDR6; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUSB_U1ADDR.clearDEVADDR6; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUSB_U1ADDR.setDEVADDR6(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUSB_U1ADDR.getDEVADDR6 : TBits_1; inline;
- begin
- getDEVADDR6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUSB_U1FRML.setFRML(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
- end;
- function TUSB_U1FRML.getFRML : TBits_8; inline;
- begin
- getFRML := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
- end;
- procedure TUSB_U1FRML.setFRM0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUSB_U1FRML.clearFRM0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUSB_U1FRML.setFRM0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUSB_U1FRML.getFRM0 : TBits_1; inline;
- begin
- getFRM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUSB_U1FRML.setFRM1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUSB_U1FRML.clearFRM1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUSB_U1FRML.setFRM1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUSB_U1FRML.getFRM1 : TBits_1; inline;
- begin
- getFRM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUSB_U1FRML.setFRM2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUSB_U1FRML.clearFRM2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUSB_U1FRML.setFRM2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUSB_U1FRML.getFRM2 : TBits_1; inline;
- begin
- getFRM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUSB_U1FRML.setFRM3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUSB_U1FRML.clearFRM3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUSB_U1FRML.setFRM3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUSB_U1FRML.getFRM3 : TBits_1; inline;
- begin
- getFRM3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUSB_U1FRML.setFRM4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUSB_U1FRML.clearFRM4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUSB_U1FRML.setFRM4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUSB_U1FRML.getFRM4 : TBits_1; inline;
- begin
- getFRM4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUSB_U1FRML.setFRM5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUSB_U1FRML.clearFRM5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUSB_U1FRML.setFRM5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUSB_U1FRML.getFRM5 : TBits_1; inline;
- begin
- getFRM5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUSB_U1FRML.setFRM6; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUSB_U1FRML.clearFRM6; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUSB_U1FRML.setFRM6(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUSB_U1FRML.getFRM6 : TBits_1; inline;
- begin
- getFRM6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUSB_U1FRML.setFRM7; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUSB_U1FRML.clearFRM7; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUSB_U1FRML.setFRM7(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUSB_U1FRML.getFRM7 : TBits_1; inline;
- begin
- getFRM7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUSB_U1FRMH.setFRMH(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
- end;
- function TUSB_U1FRMH.getFRMH : TBits_3; inline;
- begin
- getFRMH := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
- end;
- procedure TUSB_U1FRMH.setFRM8; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUSB_U1FRMH.clearFRM8; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUSB_U1FRMH.setFRM8(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUSB_U1FRMH.getFRM8 : TBits_1; inline;
- begin
- getFRM8 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUSB_U1FRMH.setFRM9; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUSB_U1FRMH.clearFRM9; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUSB_U1FRMH.setFRM9(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUSB_U1FRMH.getFRM9 : TBits_1; inline;
- begin
- getFRM9 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUSB_U1FRMH.setFRM10; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUSB_U1FRMH.clearFRM10; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUSB_U1FRMH.setFRM10(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUSB_U1FRMH.getFRM10 : TBits_1; inline;
- begin
- getFRM10 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUSB_U1TOK.setEP(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
- end;
- function TUSB_U1TOK.getEP : TBits_4; inline;
- begin
- getEP := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
- end;
- procedure TUSB_U1TOK.setPID(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF0F or ( thebits shl 4 );
- end;
- function TUSB_U1TOK.getPID : TBits_4; inline;
- begin
- getPID := (pTDefRegMap(@Self)^.val and $000000F0) shr 4;
- end;
- procedure TUSB_U1TOK.setEP0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUSB_U1TOK.clearEP0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUSB_U1TOK.setEP0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUSB_U1TOK.getEP0 : TBits_1; inline;
- begin
- getEP0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUSB_U1TOK.setEP1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUSB_U1TOK.clearEP1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUSB_U1TOK.setEP1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUSB_U1TOK.getEP1 : TBits_1; inline;
- begin
- getEP1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUSB_U1TOK.setEP2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUSB_U1TOK.clearEP2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUSB_U1TOK.setEP2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUSB_U1TOK.getEP2 : TBits_1; inline;
- begin
- getEP2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUSB_U1TOK.setEP3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUSB_U1TOK.clearEP3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUSB_U1TOK.setEP3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUSB_U1TOK.getEP3 : TBits_1; inline;
- begin
- getEP3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUSB_U1TOK.setPID0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUSB_U1TOK.clearPID0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUSB_U1TOK.setPID0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUSB_U1TOK.getPID0 : TBits_1; inline;
- begin
- getPID0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUSB_U1TOK.setPID1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUSB_U1TOK.clearPID1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUSB_U1TOK.setPID1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUSB_U1TOK.getPID1 : TBits_1; inline;
- begin
- getPID1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUSB_U1TOK.setPID2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUSB_U1TOK.clearPID2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUSB_U1TOK.setPID2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUSB_U1TOK.getPID2 : TBits_1; inline;
- begin
- getPID2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUSB_U1TOK.setPID3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUSB_U1TOK.clearPID3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUSB_U1TOK.setPID3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUSB_U1TOK.getPID3 : TBits_1; inline;
- begin
- getPID3 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TPORTA_TRISA.setTRISA0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTA_TRISA.clearTRISA0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTA_TRISA.setTRISA0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTA_TRISA.getTRISA0 : TBits_1; inline;
- begin
- getTRISA0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTA_TRISA.setTRISA1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTA_TRISA.clearTRISA1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTA_TRISA.setTRISA1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTA_TRISA.getTRISA1 : TBits_1; inline;
- begin
- getTRISA1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTA_TRISA.setTRISA2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTA_TRISA.clearTRISA2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTA_TRISA.setTRISA2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTA_TRISA.getTRISA2 : TBits_1; inline;
- begin
- getTRISA2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTA_TRISA.setTRISA3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTA_TRISA.clearTRISA3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTA_TRISA.setTRISA3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTA_TRISA.getTRISA3 : TBits_1; inline;
- begin
- getTRISA3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTA_TRISA.setTRISA4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTA_TRISA.clearTRISA4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTA_TRISA.setTRISA4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTA_TRISA.getTRISA4 : TBits_1; inline;
- begin
- getTRISA4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTA_TRISA.setTRISA5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TPORTA_TRISA.clearTRISA5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TPORTA_TRISA.setTRISA5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TPORTA_TRISA.getTRISA5 : TBits_1; inline;
- begin
- getTRISA5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TPORTA_TRISA.setTRISA6; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TPORTA_TRISA.clearTRISA6; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TPORTA_TRISA.setTRISA6(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TPORTA_TRISA.getTRISA6 : TBits_1; inline;
- begin
- getTRISA6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TPORTA_TRISA.setTRISA7; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TPORTA_TRISA.clearTRISA7; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TPORTA_TRISA.setTRISA7(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TPORTA_TRISA.getTRISA7 : TBits_1; inline;
- begin
- getTRISA7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TPORTA_TRISA.setTRISA9; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TPORTA_TRISA.clearTRISA9; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TPORTA_TRISA.setTRISA9(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TPORTA_TRISA.getTRISA9 : TBits_1; inline;
- begin
- getTRISA9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TPORTA_TRISA.setTRISA10; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TPORTA_TRISA.clearTRISA10; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TPORTA_TRISA.setTRISA10(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TPORTA_TRISA.getTRISA10 : TBits_1; inline;
- begin
- getTRISA10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TPORTA_TRISA.setTRISA14; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TPORTA_TRISA.clearTRISA14; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TPORTA_TRISA.setTRISA14(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TPORTA_TRISA.getTRISA14 : TBits_1; inline;
- begin
- getTRISA14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TPORTA_TRISA.setTRISA15; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPORTA_TRISA.clearTRISA15; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPORTA_TRISA.setTRISA15(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPORTA_TRISA.getTRISA15 : TBits_1; inline;
- begin
- getTRISA15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPORTA_TRISA.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTA_TRISA.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTA_PORTA.setRA0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTA_PORTA.clearRA0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTA_PORTA.setRA0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTA_PORTA.getRA0 : TBits_1; inline;
- begin
- getRA0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTA_PORTA.setRA1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTA_PORTA.clearRA1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTA_PORTA.setRA1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTA_PORTA.getRA1 : TBits_1; inline;
- begin
- getRA1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTA_PORTA.setRA2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTA_PORTA.clearRA2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTA_PORTA.setRA2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTA_PORTA.getRA2 : TBits_1; inline;
- begin
- getRA2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTA_PORTA.setRA3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTA_PORTA.clearRA3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTA_PORTA.setRA3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTA_PORTA.getRA3 : TBits_1; inline;
- begin
- getRA3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTA_PORTA.setRA4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTA_PORTA.clearRA4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTA_PORTA.setRA4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTA_PORTA.getRA4 : TBits_1; inline;
- begin
- getRA4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTA_PORTA.setRA5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TPORTA_PORTA.clearRA5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TPORTA_PORTA.setRA5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TPORTA_PORTA.getRA5 : TBits_1; inline;
- begin
- getRA5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TPORTA_PORTA.setRA6; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TPORTA_PORTA.clearRA6; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TPORTA_PORTA.setRA6(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TPORTA_PORTA.getRA6 : TBits_1; inline;
- begin
- getRA6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TPORTA_PORTA.setRA7; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TPORTA_PORTA.clearRA7; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TPORTA_PORTA.setRA7(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TPORTA_PORTA.getRA7 : TBits_1; inline;
- begin
- getRA7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TPORTA_PORTA.setRA9; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TPORTA_PORTA.clearRA9; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TPORTA_PORTA.setRA9(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TPORTA_PORTA.getRA9 : TBits_1; inline;
- begin
- getRA9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TPORTA_PORTA.setRA10; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TPORTA_PORTA.clearRA10; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TPORTA_PORTA.setRA10(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TPORTA_PORTA.getRA10 : TBits_1; inline;
- begin
- getRA10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TPORTA_PORTA.setRA14; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TPORTA_PORTA.clearRA14; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TPORTA_PORTA.setRA14(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TPORTA_PORTA.getRA14 : TBits_1; inline;
- begin
- getRA14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TPORTA_PORTA.setRA15; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPORTA_PORTA.clearRA15; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPORTA_PORTA.setRA15(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPORTA_PORTA.getRA15 : TBits_1; inline;
- begin
- getRA15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPORTA_PORTA.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTA_PORTA.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTA_LATA.setLATA0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTA_LATA.clearLATA0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTA_LATA.setLATA0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTA_LATA.getLATA0 : TBits_1; inline;
- begin
- getLATA0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTA_LATA.setLATA1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTA_LATA.clearLATA1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTA_LATA.setLATA1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTA_LATA.getLATA1 : TBits_1; inline;
- begin
- getLATA1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTA_LATA.setLATA2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTA_LATA.clearLATA2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTA_LATA.setLATA2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTA_LATA.getLATA2 : TBits_1; inline;
- begin
- getLATA2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTA_LATA.setLATA3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTA_LATA.clearLATA3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTA_LATA.setLATA3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTA_LATA.getLATA3 : TBits_1; inline;
- begin
- getLATA3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTA_LATA.setLATA4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTA_LATA.clearLATA4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTA_LATA.setLATA4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTA_LATA.getLATA4 : TBits_1; inline;
- begin
- getLATA4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTA_LATA.setLATA5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TPORTA_LATA.clearLATA5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TPORTA_LATA.setLATA5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TPORTA_LATA.getLATA5 : TBits_1; inline;
- begin
- getLATA5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TPORTA_LATA.setLATA6; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TPORTA_LATA.clearLATA6; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TPORTA_LATA.setLATA6(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TPORTA_LATA.getLATA6 : TBits_1; inline;
- begin
- getLATA6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TPORTA_LATA.setLATA7; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TPORTA_LATA.clearLATA7; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TPORTA_LATA.setLATA7(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TPORTA_LATA.getLATA7 : TBits_1; inline;
- begin
- getLATA7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TPORTA_LATA.setLATA9; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TPORTA_LATA.clearLATA9; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TPORTA_LATA.setLATA9(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TPORTA_LATA.getLATA9 : TBits_1; inline;
- begin
- getLATA9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TPORTA_LATA.setLATA10; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TPORTA_LATA.clearLATA10; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TPORTA_LATA.setLATA10(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TPORTA_LATA.getLATA10 : TBits_1; inline;
- begin
- getLATA10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TPORTA_LATA.setLATA14; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TPORTA_LATA.clearLATA14; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TPORTA_LATA.setLATA14(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TPORTA_LATA.getLATA14 : TBits_1; inline;
- begin
- getLATA14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TPORTA_LATA.setLATA15; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPORTA_LATA.clearLATA15; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPORTA_LATA.setLATA15(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPORTA_LATA.getLATA15 : TBits_1; inline;
- begin
- getLATA15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPORTA_LATA.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTA_LATA.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTA_ODCA.setODCA0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTA_ODCA.clearODCA0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTA_ODCA.setODCA0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTA_ODCA.getODCA0 : TBits_1; inline;
- begin
- getODCA0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTA_ODCA.setODCA1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTA_ODCA.clearODCA1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTA_ODCA.setODCA1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTA_ODCA.getODCA1 : TBits_1; inline;
- begin
- getODCA1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTA_ODCA.setODCA2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTA_ODCA.clearODCA2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTA_ODCA.setODCA2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTA_ODCA.getODCA2 : TBits_1; inline;
- begin
- getODCA2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTA_ODCA.setODCA3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTA_ODCA.clearODCA3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTA_ODCA.setODCA3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTA_ODCA.getODCA3 : TBits_1; inline;
- begin
- getODCA3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTA_ODCA.setODCA4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTA_ODCA.clearODCA4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTA_ODCA.setODCA4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTA_ODCA.getODCA4 : TBits_1; inline;
- begin
- getODCA4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTA_ODCA.setODCA5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TPORTA_ODCA.clearODCA5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TPORTA_ODCA.setODCA5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TPORTA_ODCA.getODCA5 : TBits_1; inline;
- begin
- getODCA5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TPORTA_ODCA.setODCA6; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TPORTA_ODCA.clearODCA6; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TPORTA_ODCA.setODCA6(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TPORTA_ODCA.getODCA6 : TBits_1; inline;
- begin
- getODCA6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TPORTA_ODCA.setODCA7; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TPORTA_ODCA.clearODCA7; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TPORTA_ODCA.setODCA7(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TPORTA_ODCA.getODCA7 : TBits_1; inline;
- begin
- getODCA7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TPORTA_ODCA.setODCA9; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TPORTA_ODCA.clearODCA9; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TPORTA_ODCA.setODCA9(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TPORTA_ODCA.getODCA9 : TBits_1; inline;
- begin
- getODCA9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TPORTA_ODCA.setODCA10; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TPORTA_ODCA.clearODCA10; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TPORTA_ODCA.setODCA10(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TPORTA_ODCA.getODCA10 : TBits_1; inline;
- begin
- getODCA10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TPORTA_ODCA.setODCA14; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TPORTA_ODCA.clearODCA14; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TPORTA_ODCA.setODCA14(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TPORTA_ODCA.getODCA14 : TBits_1; inline;
- begin
- getODCA14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TPORTA_ODCA.setODCA15; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPORTA_ODCA.clearODCA15; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPORTA_ODCA.setODCA15(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPORTA_ODCA.getODCA15 : TBits_1; inline;
- begin
- getODCA15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPORTA_ODCA.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTA_ODCA.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTB_TRISB.setTRISB0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTB_TRISB.clearTRISB0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTB_TRISB.setTRISB0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTB_TRISB.getTRISB0 : TBits_1; inline;
- begin
- getTRISB0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTB_TRISB.setTRISB1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTB_TRISB.clearTRISB1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTB_TRISB.setTRISB1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTB_TRISB.getTRISB1 : TBits_1; inline;
- begin
- getTRISB1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTB_TRISB.setTRISB2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTB_TRISB.clearTRISB2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTB_TRISB.setTRISB2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTB_TRISB.getTRISB2 : TBits_1; inline;
- begin
- getTRISB2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTB_TRISB.setTRISB3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTB_TRISB.clearTRISB3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTB_TRISB.setTRISB3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTB_TRISB.getTRISB3 : TBits_1; inline;
- begin
- getTRISB3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTB_TRISB.setTRISB4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTB_TRISB.clearTRISB4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTB_TRISB.setTRISB4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTB_TRISB.getTRISB4 : TBits_1; inline;
- begin
- getTRISB4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTB_TRISB.setTRISB5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TPORTB_TRISB.clearTRISB5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TPORTB_TRISB.setTRISB5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TPORTB_TRISB.getTRISB5 : TBits_1; inline;
- begin
- getTRISB5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TPORTB_TRISB.setTRISB6; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TPORTB_TRISB.clearTRISB6; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TPORTB_TRISB.setTRISB6(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TPORTB_TRISB.getTRISB6 : TBits_1; inline;
- begin
- getTRISB6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TPORTB_TRISB.setTRISB7; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TPORTB_TRISB.clearTRISB7; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TPORTB_TRISB.setTRISB7(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TPORTB_TRISB.getTRISB7 : TBits_1; inline;
- begin
- getTRISB7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TPORTB_TRISB.setTRISB8; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TPORTB_TRISB.clearTRISB8; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TPORTB_TRISB.setTRISB8(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TPORTB_TRISB.getTRISB8 : TBits_1; inline;
- begin
- getTRISB8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TPORTB_TRISB.setTRISB9; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TPORTB_TRISB.clearTRISB9; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TPORTB_TRISB.setTRISB9(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TPORTB_TRISB.getTRISB9 : TBits_1; inline;
- begin
- getTRISB9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TPORTB_TRISB.setTRISB10; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TPORTB_TRISB.clearTRISB10; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TPORTB_TRISB.setTRISB10(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TPORTB_TRISB.getTRISB10 : TBits_1; inline;
- begin
- getTRISB10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TPORTB_TRISB.setTRISB11; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TPORTB_TRISB.clearTRISB11; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TPORTB_TRISB.setTRISB11(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TPORTB_TRISB.getTRISB11 : TBits_1; inline;
- begin
- getTRISB11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TPORTB_TRISB.setTRISB12; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TPORTB_TRISB.clearTRISB12; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TPORTB_TRISB.setTRISB12(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TPORTB_TRISB.getTRISB12 : TBits_1; inline;
- begin
- getTRISB12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TPORTB_TRISB.setTRISB13; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPORTB_TRISB.clearTRISB13; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPORTB_TRISB.setTRISB13(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPORTB_TRISB.getTRISB13 : TBits_1; inline;
- begin
- getTRISB13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPORTB_TRISB.setTRISB14; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TPORTB_TRISB.clearTRISB14; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TPORTB_TRISB.setTRISB14(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TPORTB_TRISB.getTRISB14 : TBits_1; inline;
- begin
- getTRISB14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TPORTB_TRISB.setTRISB15; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPORTB_TRISB.clearTRISB15; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPORTB_TRISB.setTRISB15(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPORTB_TRISB.getTRISB15 : TBits_1; inline;
- begin
- getTRISB15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPORTB_TRISB.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTB_TRISB.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTB_PORTB.setRB0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTB_PORTB.clearRB0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTB_PORTB.setRB0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTB_PORTB.getRB0 : TBits_1; inline;
- begin
- getRB0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTB_PORTB.setRB1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTB_PORTB.clearRB1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTB_PORTB.setRB1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTB_PORTB.getRB1 : TBits_1; inline;
- begin
- getRB1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTB_PORTB.setRB2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTB_PORTB.clearRB2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTB_PORTB.setRB2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTB_PORTB.getRB2 : TBits_1; inline;
- begin
- getRB2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTB_PORTB.setRB3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTB_PORTB.clearRB3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTB_PORTB.setRB3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTB_PORTB.getRB3 : TBits_1; inline;
- begin
- getRB3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTB_PORTB.setRB4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTB_PORTB.clearRB4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTB_PORTB.setRB4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTB_PORTB.getRB4 : TBits_1; inline;
- begin
- getRB4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTB_PORTB.setRB5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TPORTB_PORTB.clearRB5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TPORTB_PORTB.setRB5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TPORTB_PORTB.getRB5 : TBits_1; inline;
- begin
- getRB5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TPORTB_PORTB.setRB6; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TPORTB_PORTB.clearRB6; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TPORTB_PORTB.setRB6(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TPORTB_PORTB.getRB6 : TBits_1; inline;
- begin
- getRB6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TPORTB_PORTB.setRB7; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TPORTB_PORTB.clearRB7; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TPORTB_PORTB.setRB7(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TPORTB_PORTB.getRB7 : TBits_1; inline;
- begin
- getRB7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TPORTB_PORTB.setRB8; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TPORTB_PORTB.clearRB8; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TPORTB_PORTB.setRB8(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TPORTB_PORTB.getRB8 : TBits_1; inline;
- begin
- getRB8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TPORTB_PORTB.setRB9; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TPORTB_PORTB.clearRB9; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TPORTB_PORTB.setRB9(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TPORTB_PORTB.getRB9 : TBits_1; inline;
- begin
- getRB9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TPORTB_PORTB.setRB10; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TPORTB_PORTB.clearRB10; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TPORTB_PORTB.setRB10(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TPORTB_PORTB.getRB10 : TBits_1; inline;
- begin
- getRB10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TPORTB_PORTB.setRB11; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TPORTB_PORTB.clearRB11; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TPORTB_PORTB.setRB11(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TPORTB_PORTB.getRB11 : TBits_1; inline;
- begin
- getRB11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TPORTB_PORTB.setRB12; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TPORTB_PORTB.clearRB12; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TPORTB_PORTB.setRB12(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TPORTB_PORTB.getRB12 : TBits_1; inline;
- begin
- getRB12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TPORTB_PORTB.setRB13; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPORTB_PORTB.clearRB13; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPORTB_PORTB.setRB13(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPORTB_PORTB.getRB13 : TBits_1; inline;
- begin
- getRB13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPORTB_PORTB.setRB14; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TPORTB_PORTB.clearRB14; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TPORTB_PORTB.setRB14(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TPORTB_PORTB.getRB14 : TBits_1; inline;
- begin
- getRB14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TPORTB_PORTB.setRB15; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPORTB_PORTB.clearRB15; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPORTB_PORTB.setRB15(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPORTB_PORTB.getRB15 : TBits_1; inline;
- begin
- getRB15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPORTB_PORTB.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTB_PORTB.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTB_LATB.setLATB0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTB_LATB.clearLATB0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTB_LATB.setLATB0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTB_LATB.getLATB0 : TBits_1; inline;
- begin
- getLATB0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTB_LATB.setLATB1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTB_LATB.clearLATB1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTB_LATB.setLATB1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTB_LATB.getLATB1 : TBits_1; inline;
- begin
- getLATB1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTB_LATB.setLATB2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTB_LATB.clearLATB2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTB_LATB.setLATB2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTB_LATB.getLATB2 : TBits_1; inline;
- begin
- getLATB2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTB_LATB.setLATB3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTB_LATB.clearLATB3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTB_LATB.setLATB3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTB_LATB.getLATB3 : TBits_1; inline;
- begin
- getLATB3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTB_LATB.setLATB4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTB_LATB.clearLATB4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTB_LATB.setLATB4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTB_LATB.getLATB4 : TBits_1; inline;
- begin
- getLATB4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTB_LATB.setLATB5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TPORTB_LATB.clearLATB5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TPORTB_LATB.setLATB5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TPORTB_LATB.getLATB5 : TBits_1; inline;
- begin
- getLATB5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TPORTB_LATB.setLATB6; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TPORTB_LATB.clearLATB6; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TPORTB_LATB.setLATB6(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TPORTB_LATB.getLATB6 : TBits_1; inline;
- begin
- getLATB6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TPORTB_LATB.setLATB7; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TPORTB_LATB.clearLATB7; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TPORTB_LATB.setLATB7(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TPORTB_LATB.getLATB7 : TBits_1; inline;
- begin
- getLATB7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TPORTB_LATB.setLATB8; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TPORTB_LATB.clearLATB8; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TPORTB_LATB.setLATB8(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TPORTB_LATB.getLATB8 : TBits_1; inline;
- begin
- getLATB8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TPORTB_LATB.setLATB9; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TPORTB_LATB.clearLATB9; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TPORTB_LATB.setLATB9(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TPORTB_LATB.getLATB9 : TBits_1; inline;
- begin
- getLATB9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TPORTB_LATB.setLATB10; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TPORTB_LATB.clearLATB10; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TPORTB_LATB.setLATB10(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TPORTB_LATB.getLATB10 : TBits_1; inline;
- begin
- getLATB10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TPORTB_LATB.setLATB11; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TPORTB_LATB.clearLATB11; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TPORTB_LATB.setLATB11(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TPORTB_LATB.getLATB11 : TBits_1; inline;
- begin
- getLATB11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TPORTB_LATB.setLATB12; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TPORTB_LATB.clearLATB12; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TPORTB_LATB.setLATB12(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TPORTB_LATB.getLATB12 : TBits_1; inline;
- begin
- getLATB12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TPORTB_LATB.setLATB13; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPORTB_LATB.clearLATB13; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPORTB_LATB.setLATB13(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPORTB_LATB.getLATB13 : TBits_1; inline;
- begin
- getLATB13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPORTB_LATB.setLATB14; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TPORTB_LATB.clearLATB14; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TPORTB_LATB.setLATB14(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TPORTB_LATB.getLATB14 : TBits_1; inline;
- begin
- getLATB14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TPORTB_LATB.setLATB15; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPORTB_LATB.clearLATB15; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPORTB_LATB.setLATB15(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPORTB_LATB.getLATB15 : TBits_1; inline;
- begin
- getLATB15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPORTB_LATB.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTB_LATB.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTB_ODCB.setODCB0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTB_ODCB.clearODCB0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTB_ODCB.setODCB0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTB_ODCB.getODCB0 : TBits_1; inline;
- begin
- getODCB0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTB_ODCB.setODCB1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTB_ODCB.clearODCB1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTB_ODCB.setODCB1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTB_ODCB.getODCB1 : TBits_1; inline;
- begin
- getODCB1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTB_ODCB.setODCB2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTB_ODCB.clearODCB2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTB_ODCB.setODCB2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTB_ODCB.getODCB2 : TBits_1; inline;
- begin
- getODCB2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTB_ODCB.setODCB3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTB_ODCB.clearODCB3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTB_ODCB.setODCB3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTB_ODCB.getODCB3 : TBits_1; inline;
- begin
- getODCB3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTB_ODCB.setODCB4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTB_ODCB.clearODCB4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTB_ODCB.setODCB4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTB_ODCB.getODCB4 : TBits_1; inline;
- begin
- getODCB4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTB_ODCB.setODCB5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TPORTB_ODCB.clearODCB5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TPORTB_ODCB.setODCB5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TPORTB_ODCB.getODCB5 : TBits_1; inline;
- begin
- getODCB5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TPORTB_ODCB.setODCB6; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TPORTB_ODCB.clearODCB6; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TPORTB_ODCB.setODCB6(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TPORTB_ODCB.getODCB6 : TBits_1; inline;
- begin
- getODCB6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TPORTB_ODCB.setODCB7; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TPORTB_ODCB.clearODCB7; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TPORTB_ODCB.setODCB7(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TPORTB_ODCB.getODCB7 : TBits_1; inline;
- begin
- getODCB7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TPORTB_ODCB.setODCB8; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TPORTB_ODCB.clearODCB8; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TPORTB_ODCB.setODCB8(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TPORTB_ODCB.getODCB8 : TBits_1; inline;
- begin
- getODCB8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TPORTB_ODCB.setODCB9; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TPORTB_ODCB.clearODCB9; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TPORTB_ODCB.setODCB9(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TPORTB_ODCB.getODCB9 : TBits_1; inline;
- begin
- getODCB9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TPORTB_ODCB.setODCB10; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TPORTB_ODCB.clearODCB10; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TPORTB_ODCB.setODCB10(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TPORTB_ODCB.getODCB10 : TBits_1; inline;
- begin
- getODCB10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TPORTB_ODCB.setODCB11; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TPORTB_ODCB.clearODCB11; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TPORTB_ODCB.setODCB11(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TPORTB_ODCB.getODCB11 : TBits_1; inline;
- begin
- getODCB11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TPORTB_ODCB.setODCB12; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TPORTB_ODCB.clearODCB12; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TPORTB_ODCB.setODCB12(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TPORTB_ODCB.getODCB12 : TBits_1; inline;
- begin
- getODCB12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TPORTB_ODCB.setODCB13; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPORTB_ODCB.clearODCB13; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPORTB_ODCB.setODCB13(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPORTB_ODCB.getODCB13 : TBits_1; inline;
- begin
- getODCB13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPORTB_ODCB.setODCB14; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TPORTB_ODCB.clearODCB14; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TPORTB_ODCB.setODCB14(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TPORTB_ODCB.getODCB14 : TBits_1; inline;
- begin
- getODCB14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TPORTB_ODCB.setODCB15; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPORTB_ODCB.clearODCB15; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPORTB_ODCB.setODCB15(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPORTB_ODCB.getODCB15 : TBits_1; inline;
- begin
- getODCB15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPORTB_ODCB.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTB_ODCB.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTC_TRISC.setTRISC1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTC_TRISC.clearTRISC1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTC_TRISC.setTRISC1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTC_TRISC.getTRISC1 : TBits_1; inline;
- begin
- getTRISC1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTC_TRISC.setTRISC2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTC_TRISC.clearTRISC2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTC_TRISC.setTRISC2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTC_TRISC.getTRISC2 : TBits_1; inline;
- begin
- getTRISC2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTC_TRISC.setTRISC3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTC_TRISC.clearTRISC3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTC_TRISC.setTRISC3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTC_TRISC.getTRISC3 : TBits_1; inline;
- begin
- getTRISC3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTC_TRISC.setTRISC4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTC_TRISC.clearTRISC4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTC_TRISC.setTRISC4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTC_TRISC.getTRISC4 : TBits_1; inline;
- begin
- getTRISC4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTC_TRISC.setTRISC12; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TPORTC_TRISC.clearTRISC12; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TPORTC_TRISC.setTRISC12(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TPORTC_TRISC.getTRISC12 : TBits_1; inline;
- begin
- getTRISC12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TPORTC_TRISC.setTRISC13; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPORTC_TRISC.clearTRISC13; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPORTC_TRISC.setTRISC13(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPORTC_TRISC.getTRISC13 : TBits_1; inline;
- begin
- getTRISC13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPORTC_TRISC.setTRISC14; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TPORTC_TRISC.clearTRISC14; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TPORTC_TRISC.setTRISC14(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TPORTC_TRISC.getTRISC14 : TBits_1; inline;
- begin
- getTRISC14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TPORTC_TRISC.setTRISC15; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPORTC_TRISC.clearTRISC15; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPORTC_TRISC.setTRISC15(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPORTC_TRISC.getTRISC15 : TBits_1; inline;
- begin
- getTRISC15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPORTC_TRISC.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTC_TRISC.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTC_PORTC.setRC1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTC_PORTC.clearRC1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTC_PORTC.setRC1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTC_PORTC.getRC1 : TBits_1; inline;
- begin
- getRC1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTC_PORTC.setRC2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTC_PORTC.clearRC2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTC_PORTC.setRC2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTC_PORTC.getRC2 : TBits_1; inline;
- begin
- getRC2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTC_PORTC.setRC3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTC_PORTC.clearRC3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTC_PORTC.setRC3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTC_PORTC.getRC3 : TBits_1; inline;
- begin
- getRC3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTC_PORTC.setRC4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTC_PORTC.clearRC4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTC_PORTC.setRC4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTC_PORTC.getRC4 : TBits_1; inline;
- begin
- getRC4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTC_PORTC.setRC12; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TPORTC_PORTC.clearRC12; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TPORTC_PORTC.setRC12(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TPORTC_PORTC.getRC12 : TBits_1; inline;
- begin
- getRC12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TPORTC_PORTC.setRC13; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPORTC_PORTC.clearRC13; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPORTC_PORTC.setRC13(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPORTC_PORTC.getRC13 : TBits_1; inline;
- begin
- getRC13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPORTC_PORTC.setRC14; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TPORTC_PORTC.clearRC14; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TPORTC_PORTC.setRC14(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TPORTC_PORTC.getRC14 : TBits_1; inline;
- begin
- getRC14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TPORTC_PORTC.setRC15; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPORTC_PORTC.clearRC15; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPORTC_PORTC.setRC15(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPORTC_PORTC.getRC15 : TBits_1; inline;
- begin
- getRC15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPORTC_PORTC.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTC_PORTC.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTC_LATC.setLATC1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTC_LATC.clearLATC1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTC_LATC.setLATC1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTC_LATC.getLATC1 : TBits_1; inline;
- begin
- getLATC1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTC_LATC.setLATC2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTC_LATC.clearLATC2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTC_LATC.setLATC2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTC_LATC.getLATC2 : TBits_1; inline;
- begin
- getLATC2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTC_LATC.setLATC3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTC_LATC.clearLATC3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTC_LATC.setLATC3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTC_LATC.getLATC3 : TBits_1; inline;
- begin
- getLATC3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTC_LATC.setLATC4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTC_LATC.clearLATC4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTC_LATC.setLATC4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTC_LATC.getLATC4 : TBits_1; inline;
- begin
- getLATC4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTC_LATC.setLATC12; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TPORTC_LATC.clearLATC12; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TPORTC_LATC.setLATC12(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TPORTC_LATC.getLATC12 : TBits_1; inline;
- begin
- getLATC12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TPORTC_LATC.setLATC13; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPORTC_LATC.clearLATC13; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPORTC_LATC.setLATC13(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPORTC_LATC.getLATC13 : TBits_1; inline;
- begin
- getLATC13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPORTC_LATC.setLATC14; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TPORTC_LATC.clearLATC14; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TPORTC_LATC.setLATC14(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TPORTC_LATC.getLATC14 : TBits_1; inline;
- begin
- getLATC14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TPORTC_LATC.setLATC15; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPORTC_LATC.clearLATC15; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPORTC_LATC.setLATC15(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPORTC_LATC.getLATC15 : TBits_1; inline;
- begin
- getLATC15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPORTC_LATC.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTC_LATC.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTC_ODCC.setODCC1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTC_ODCC.clearODCC1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTC_ODCC.setODCC1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTC_ODCC.getODCC1 : TBits_1; inline;
- begin
- getODCC1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTC_ODCC.setODCC2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTC_ODCC.clearODCC2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTC_ODCC.setODCC2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTC_ODCC.getODCC2 : TBits_1; inline;
- begin
- getODCC2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTC_ODCC.setODCC3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTC_ODCC.clearODCC3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTC_ODCC.setODCC3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTC_ODCC.getODCC3 : TBits_1; inline;
- begin
- getODCC3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTC_ODCC.setODCC4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTC_ODCC.clearODCC4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTC_ODCC.setODCC4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTC_ODCC.getODCC4 : TBits_1; inline;
- begin
- getODCC4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTC_ODCC.setODCC12; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TPORTC_ODCC.clearODCC12; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TPORTC_ODCC.setODCC12(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TPORTC_ODCC.getODCC12 : TBits_1; inline;
- begin
- getODCC12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TPORTC_ODCC.setODCC13; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPORTC_ODCC.clearODCC13; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPORTC_ODCC.setODCC13(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPORTC_ODCC.getODCC13 : TBits_1; inline;
- begin
- getODCC13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPORTC_ODCC.setODCC14; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TPORTC_ODCC.clearODCC14; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TPORTC_ODCC.setODCC14(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TPORTC_ODCC.getODCC14 : TBits_1; inline;
- begin
- getODCC14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TPORTC_ODCC.setODCC15; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPORTC_ODCC.clearODCC15; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPORTC_ODCC.setODCC15(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPORTC_ODCC.getODCC15 : TBits_1; inline;
- begin
- getODCC15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPORTC_ODCC.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTC_ODCC.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTD_TRISD.setTRISD0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTD_TRISD.clearTRISD0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTD_TRISD.setTRISD0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTD_TRISD.getTRISD0 : TBits_1; inline;
- begin
- getTRISD0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTD_TRISD.setTRISD1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTD_TRISD.clearTRISD1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTD_TRISD.setTRISD1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTD_TRISD.getTRISD1 : TBits_1; inline;
- begin
- getTRISD1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTD_TRISD.setTRISD2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTD_TRISD.clearTRISD2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTD_TRISD.setTRISD2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTD_TRISD.getTRISD2 : TBits_1; inline;
- begin
- getTRISD2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTD_TRISD.setTRISD3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTD_TRISD.clearTRISD3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTD_TRISD.setTRISD3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTD_TRISD.getTRISD3 : TBits_1; inline;
- begin
- getTRISD3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTD_TRISD.setTRISD4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTD_TRISD.clearTRISD4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTD_TRISD.setTRISD4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTD_TRISD.getTRISD4 : TBits_1; inline;
- begin
- getTRISD4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTD_TRISD.setTRISD5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TPORTD_TRISD.clearTRISD5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TPORTD_TRISD.setTRISD5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TPORTD_TRISD.getTRISD5 : TBits_1; inline;
- begin
- getTRISD5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TPORTD_TRISD.setTRISD6; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TPORTD_TRISD.clearTRISD6; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TPORTD_TRISD.setTRISD6(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TPORTD_TRISD.getTRISD6 : TBits_1; inline;
- begin
- getTRISD6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TPORTD_TRISD.setTRISD7; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TPORTD_TRISD.clearTRISD7; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TPORTD_TRISD.setTRISD7(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TPORTD_TRISD.getTRISD7 : TBits_1; inline;
- begin
- getTRISD7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TPORTD_TRISD.setTRISD8; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TPORTD_TRISD.clearTRISD8; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TPORTD_TRISD.setTRISD8(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TPORTD_TRISD.getTRISD8 : TBits_1; inline;
- begin
- getTRISD8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TPORTD_TRISD.setTRISD9; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TPORTD_TRISD.clearTRISD9; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TPORTD_TRISD.setTRISD9(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TPORTD_TRISD.getTRISD9 : TBits_1; inline;
- begin
- getTRISD9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TPORTD_TRISD.setTRISD10; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TPORTD_TRISD.clearTRISD10; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TPORTD_TRISD.setTRISD10(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TPORTD_TRISD.getTRISD10 : TBits_1; inline;
- begin
- getTRISD10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TPORTD_TRISD.setTRISD11; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TPORTD_TRISD.clearTRISD11; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TPORTD_TRISD.setTRISD11(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TPORTD_TRISD.getTRISD11 : TBits_1; inline;
- begin
- getTRISD11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TPORTD_TRISD.setTRISD12; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TPORTD_TRISD.clearTRISD12; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TPORTD_TRISD.setTRISD12(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TPORTD_TRISD.getTRISD12 : TBits_1; inline;
- begin
- getTRISD12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TPORTD_TRISD.setTRISD13; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPORTD_TRISD.clearTRISD13; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPORTD_TRISD.setTRISD13(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPORTD_TRISD.getTRISD13 : TBits_1; inline;
- begin
- getTRISD13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPORTD_TRISD.setTRISD14; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TPORTD_TRISD.clearTRISD14; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TPORTD_TRISD.setTRISD14(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TPORTD_TRISD.getTRISD14 : TBits_1; inline;
- begin
- getTRISD14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TPORTD_TRISD.setTRISD15; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPORTD_TRISD.clearTRISD15; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPORTD_TRISD.setTRISD15(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPORTD_TRISD.getTRISD15 : TBits_1; inline;
- begin
- getTRISD15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPORTD_TRISD.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTD_TRISD.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTD_PORTD.setRD0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTD_PORTD.clearRD0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTD_PORTD.setRD0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTD_PORTD.getRD0 : TBits_1; inline;
- begin
- getRD0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTD_PORTD.setRD1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTD_PORTD.clearRD1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTD_PORTD.setRD1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTD_PORTD.getRD1 : TBits_1; inline;
- begin
- getRD1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTD_PORTD.setRD2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTD_PORTD.clearRD2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTD_PORTD.setRD2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTD_PORTD.getRD2 : TBits_1; inline;
- begin
- getRD2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTD_PORTD.setRD3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTD_PORTD.clearRD3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTD_PORTD.setRD3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTD_PORTD.getRD3 : TBits_1; inline;
- begin
- getRD3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTD_PORTD.setRD4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTD_PORTD.clearRD4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTD_PORTD.setRD4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTD_PORTD.getRD4 : TBits_1; inline;
- begin
- getRD4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTD_PORTD.setRD5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TPORTD_PORTD.clearRD5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TPORTD_PORTD.setRD5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TPORTD_PORTD.getRD5 : TBits_1; inline;
- begin
- getRD5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TPORTD_PORTD.setRD6; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TPORTD_PORTD.clearRD6; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TPORTD_PORTD.setRD6(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TPORTD_PORTD.getRD6 : TBits_1; inline;
- begin
- getRD6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TPORTD_PORTD.setRD7; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TPORTD_PORTD.clearRD7; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TPORTD_PORTD.setRD7(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TPORTD_PORTD.getRD7 : TBits_1; inline;
- begin
- getRD7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TPORTD_PORTD.setRD8; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TPORTD_PORTD.clearRD8; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TPORTD_PORTD.setRD8(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TPORTD_PORTD.getRD8 : TBits_1; inline;
- begin
- getRD8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TPORTD_PORTD.setRD9; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TPORTD_PORTD.clearRD9; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TPORTD_PORTD.setRD9(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TPORTD_PORTD.getRD9 : TBits_1; inline;
- begin
- getRD9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TPORTD_PORTD.setRD10; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TPORTD_PORTD.clearRD10; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TPORTD_PORTD.setRD10(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TPORTD_PORTD.getRD10 : TBits_1; inline;
- begin
- getRD10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TPORTD_PORTD.setRD11; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TPORTD_PORTD.clearRD11; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TPORTD_PORTD.setRD11(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TPORTD_PORTD.getRD11 : TBits_1; inline;
- begin
- getRD11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TPORTD_PORTD.setRD12; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TPORTD_PORTD.clearRD12; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TPORTD_PORTD.setRD12(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TPORTD_PORTD.getRD12 : TBits_1; inline;
- begin
- getRD12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TPORTD_PORTD.setRD13; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPORTD_PORTD.clearRD13; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPORTD_PORTD.setRD13(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPORTD_PORTD.getRD13 : TBits_1; inline;
- begin
- getRD13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPORTD_PORTD.setRD14; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TPORTD_PORTD.clearRD14; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TPORTD_PORTD.setRD14(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TPORTD_PORTD.getRD14 : TBits_1; inline;
- begin
- getRD14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TPORTD_PORTD.setRD15; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPORTD_PORTD.clearRD15; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPORTD_PORTD.setRD15(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPORTD_PORTD.getRD15 : TBits_1; inline;
- begin
- getRD15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPORTD_PORTD.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTD_PORTD.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTD_LATD.setLATD0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTD_LATD.clearLATD0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTD_LATD.setLATD0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTD_LATD.getLATD0 : TBits_1; inline;
- begin
- getLATD0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTD_LATD.setLATD1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTD_LATD.clearLATD1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTD_LATD.setLATD1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTD_LATD.getLATD1 : TBits_1; inline;
- begin
- getLATD1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTD_LATD.setLATD2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTD_LATD.clearLATD2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTD_LATD.setLATD2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTD_LATD.getLATD2 : TBits_1; inline;
- begin
- getLATD2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTD_LATD.setLATD3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTD_LATD.clearLATD3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTD_LATD.setLATD3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTD_LATD.getLATD3 : TBits_1; inline;
- begin
- getLATD3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTD_LATD.setLATD4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTD_LATD.clearLATD4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTD_LATD.setLATD4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTD_LATD.getLATD4 : TBits_1; inline;
- begin
- getLATD4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTD_LATD.setLATD5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TPORTD_LATD.clearLATD5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TPORTD_LATD.setLATD5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TPORTD_LATD.getLATD5 : TBits_1; inline;
- begin
- getLATD5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TPORTD_LATD.setLATD6; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TPORTD_LATD.clearLATD6; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TPORTD_LATD.setLATD6(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TPORTD_LATD.getLATD6 : TBits_1; inline;
- begin
- getLATD6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TPORTD_LATD.setLATD7; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TPORTD_LATD.clearLATD7; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TPORTD_LATD.setLATD7(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TPORTD_LATD.getLATD7 : TBits_1; inline;
- begin
- getLATD7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TPORTD_LATD.setLATD8; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TPORTD_LATD.clearLATD8; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TPORTD_LATD.setLATD8(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TPORTD_LATD.getLATD8 : TBits_1; inline;
- begin
- getLATD8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TPORTD_LATD.setLATD9; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TPORTD_LATD.clearLATD9; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TPORTD_LATD.setLATD9(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TPORTD_LATD.getLATD9 : TBits_1; inline;
- begin
- getLATD9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TPORTD_LATD.setLATD10; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TPORTD_LATD.clearLATD10; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TPORTD_LATD.setLATD10(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TPORTD_LATD.getLATD10 : TBits_1; inline;
- begin
- getLATD10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TPORTD_LATD.setLATD11; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TPORTD_LATD.clearLATD11; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TPORTD_LATD.setLATD11(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TPORTD_LATD.getLATD11 : TBits_1; inline;
- begin
- getLATD11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TPORTD_LATD.setLATD12; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TPORTD_LATD.clearLATD12; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TPORTD_LATD.setLATD12(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TPORTD_LATD.getLATD12 : TBits_1; inline;
- begin
- getLATD12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TPORTD_LATD.setLATD13; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPORTD_LATD.clearLATD13; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPORTD_LATD.setLATD13(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPORTD_LATD.getLATD13 : TBits_1; inline;
- begin
- getLATD13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPORTD_LATD.setLATD14; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TPORTD_LATD.clearLATD14; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TPORTD_LATD.setLATD14(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TPORTD_LATD.getLATD14 : TBits_1; inline;
- begin
- getLATD14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TPORTD_LATD.setLATD15; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPORTD_LATD.clearLATD15; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPORTD_LATD.setLATD15(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPORTD_LATD.getLATD15 : TBits_1; inline;
- begin
- getLATD15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPORTD_LATD.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTD_LATD.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTD_ODCD.setODCD0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTD_ODCD.clearODCD0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTD_ODCD.setODCD0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTD_ODCD.getODCD0 : TBits_1; inline;
- begin
- getODCD0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTD_ODCD.setODCD1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTD_ODCD.clearODCD1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTD_ODCD.setODCD1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTD_ODCD.getODCD1 : TBits_1; inline;
- begin
- getODCD1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTD_ODCD.setODCD2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTD_ODCD.clearODCD2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTD_ODCD.setODCD2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTD_ODCD.getODCD2 : TBits_1; inline;
- begin
- getODCD2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTD_ODCD.setODCD3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTD_ODCD.clearODCD3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTD_ODCD.setODCD3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTD_ODCD.getODCD3 : TBits_1; inline;
- begin
- getODCD3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTD_ODCD.setODCD4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTD_ODCD.clearODCD4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTD_ODCD.setODCD4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTD_ODCD.getODCD4 : TBits_1; inline;
- begin
- getODCD4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTD_ODCD.setODCD5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TPORTD_ODCD.clearODCD5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TPORTD_ODCD.setODCD5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TPORTD_ODCD.getODCD5 : TBits_1; inline;
- begin
- getODCD5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TPORTD_ODCD.setODCD6; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TPORTD_ODCD.clearODCD6; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TPORTD_ODCD.setODCD6(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TPORTD_ODCD.getODCD6 : TBits_1; inline;
- begin
- getODCD6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TPORTD_ODCD.setODCD7; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TPORTD_ODCD.clearODCD7; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TPORTD_ODCD.setODCD7(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TPORTD_ODCD.getODCD7 : TBits_1; inline;
- begin
- getODCD7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TPORTD_ODCD.setODCD8; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TPORTD_ODCD.clearODCD8; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TPORTD_ODCD.setODCD8(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TPORTD_ODCD.getODCD8 : TBits_1; inline;
- begin
- getODCD8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TPORTD_ODCD.setODCD9; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TPORTD_ODCD.clearODCD9; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TPORTD_ODCD.setODCD9(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TPORTD_ODCD.getODCD9 : TBits_1; inline;
- begin
- getODCD9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TPORTD_ODCD.setODCD10; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TPORTD_ODCD.clearODCD10; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TPORTD_ODCD.setODCD10(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TPORTD_ODCD.getODCD10 : TBits_1; inline;
- begin
- getODCD10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TPORTD_ODCD.setODCD11; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TPORTD_ODCD.clearODCD11; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TPORTD_ODCD.setODCD11(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TPORTD_ODCD.getODCD11 : TBits_1; inline;
- begin
- getODCD11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TPORTD_ODCD.setODCD12; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TPORTD_ODCD.clearODCD12; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TPORTD_ODCD.setODCD12(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TPORTD_ODCD.getODCD12 : TBits_1; inline;
- begin
- getODCD12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TPORTD_ODCD.setODCD13; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPORTD_ODCD.clearODCD13; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPORTD_ODCD.setODCD13(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPORTD_ODCD.getODCD13 : TBits_1; inline;
- begin
- getODCD13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPORTD_ODCD.setODCD14; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TPORTD_ODCD.clearODCD14; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TPORTD_ODCD.setODCD14(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TPORTD_ODCD.getODCD14 : TBits_1; inline;
- begin
- getODCD14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TPORTD_ODCD.setODCD15; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPORTD_ODCD.clearODCD15; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPORTD_ODCD.setODCD15(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPORTD_ODCD.getODCD15 : TBits_1; inline;
- begin
- getODCD15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPORTD_ODCD.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTD_ODCD.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTE_TRISE.setTRISE0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTE_TRISE.clearTRISE0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTE_TRISE.setTRISE0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTE_TRISE.getTRISE0 : TBits_1; inline;
- begin
- getTRISE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTE_TRISE.setTRISE1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTE_TRISE.clearTRISE1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTE_TRISE.setTRISE1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTE_TRISE.getTRISE1 : TBits_1; inline;
- begin
- getTRISE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTE_TRISE.setTRISE2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTE_TRISE.clearTRISE2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTE_TRISE.setTRISE2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTE_TRISE.getTRISE2 : TBits_1; inline;
- begin
- getTRISE2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTE_TRISE.setTRISE3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTE_TRISE.clearTRISE3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTE_TRISE.setTRISE3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTE_TRISE.getTRISE3 : TBits_1; inline;
- begin
- getTRISE3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTE_TRISE.setTRISE4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTE_TRISE.clearTRISE4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTE_TRISE.setTRISE4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTE_TRISE.getTRISE4 : TBits_1; inline;
- begin
- getTRISE4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTE_TRISE.setTRISE5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TPORTE_TRISE.clearTRISE5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TPORTE_TRISE.setTRISE5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TPORTE_TRISE.getTRISE5 : TBits_1; inline;
- begin
- getTRISE5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TPORTE_TRISE.setTRISE6; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TPORTE_TRISE.clearTRISE6; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TPORTE_TRISE.setTRISE6(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TPORTE_TRISE.getTRISE6 : TBits_1; inline;
- begin
- getTRISE6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TPORTE_TRISE.setTRISE7; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TPORTE_TRISE.clearTRISE7; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TPORTE_TRISE.setTRISE7(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TPORTE_TRISE.getTRISE7 : TBits_1; inline;
- begin
- getTRISE7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TPORTE_TRISE.setTRISE8; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TPORTE_TRISE.clearTRISE8; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TPORTE_TRISE.setTRISE8(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TPORTE_TRISE.getTRISE8 : TBits_1; inline;
- begin
- getTRISE8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TPORTE_TRISE.setTRISE9; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TPORTE_TRISE.clearTRISE9; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TPORTE_TRISE.setTRISE9(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TPORTE_TRISE.getTRISE9 : TBits_1; inline;
- begin
- getTRISE9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TPORTE_TRISE.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTE_TRISE.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTE_PORTE.setRE0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTE_PORTE.clearRE0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTE_PORTE.setRE0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTE_PORTE.getRE0 : TBits_1; inline;
- begin
- getRE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTE_PORTE.setRE1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTE_PORTE.clearRE1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTE_PORTE.setRE1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTE_PORTE.getRE1 : TBits_1; inline;
- begin
- getRE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTE_PORTE.setRE2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTE_PORTE.clearRE2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTE_PORTE.setRE2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTE_PORTE.getRE2 : TBits_1; inline;
- begin
- getRE2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTE_PORTE.setRE3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTE_PORTE.clearRE3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTE_PORTE.setRE3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTE_PORTE.getRE3 : TBits_1; inline;
- begin
- getRE3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTE_PORTE.setRE4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTE_PORTE.clearRE4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTE_PORTE.setRE4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTE_PORTE.getRE4 : TBits_1; inline;
- begin
- getRE4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTE_PORTE.setRE5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TPORTE_PORTE.clearRE5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TPORTE_PORTE.setRE5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TPORTE_PORTE.getRE5 : TBits_1; inline;
- begin
- getRE5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TPORTE_PORTE.setRE6; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TPORTE_PORTE.clearRE6; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TPORTE_PORTE.setRE6(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TPORTE_PORTE.getRE6 : TBits_1; inline;
- begin
- getRE6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TPORTE_PORTE.setRE7; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TPORTE_PORTE.clearRE7; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TPORTE_PORTE.setRE7(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TPORTE_PORTE.getRE7 : TBits_1; inline;
- begin
- getRE7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TPORTE_PORTE.setRE8; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TPORTE_PORTE.clearRE8; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TPORTE_PORTE.setRE8(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TPORTE_PORTE.getRE8 : TBits_1; inline;
- begin
- getRE8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TPORTE_PORTE.setRE9; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TPORTE_PORTE.clearRE9; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TPORTE_PORTE.setRE9(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TPORTE_PORTE.getRE9 : TBits_1; inline;
- begin
- getRE9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TPORTE_PORTE.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTE_PORTE.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTE_LATE.setLATE0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTE_LATE.clearLATE0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTE_LATE.setLATE0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTE_LATE.getLATE0 : TBits_1; inline;
- begin
- getLATE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTE_LATE.setLATE1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTE_LATE.clearLATE1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTE_LATE.setLATE1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTE_LATE.getLATE1 : TBits_1; inline;
- begin
- getLATE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTE_LATE.setLATE2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTE_LATE.clearLATE2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTE_LATE.setLATE2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTE_LATE.getLATE2 : TBits_1; inline;
- begin
- getLATE2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTE_LATE.setLATE3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTE_LATE.clearLATE3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTE_LATE.setLATE3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTE_LATE.getLATE3 : TBits_1; inline;
- begin
- getLATE3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTE_LATE.setLATE4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTE_LATE.clearLATE4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTE_LATE.setLATE4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTE_LATE.getLATE4 : TBits_1; inline;
- begin
- getLATE4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTE_LATE.setLATE5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TPORTE_LATE.clearLATE5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TPORTE_LATE.setLATE5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TPORTE_LATE.getLATE5 : TBits_1; inline;
- begin
- getLATE5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TPORTE_LATE.setLATE6; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TPORTE_LATE.clearLATE6; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TPORTE_LATE.setLATE6(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TPORTE_LATE.getLATE6 : TBits_1; inline;
- begin
- getLATE6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TPORTE_LATE.setLATE7; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TPORTE_LATE.clearLATE7; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TPORTE_LATE.setLATE7(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TPORTE_LATE.getLATE7 : TBits_1; inline;
- begin
- getLATE7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TPORTE_LATE.setLATE8; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TPORTE_LATE.clearLATE8; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TPORTE_LATE.setLATE8(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TPORTE_LATE.getLATE8 : TBits_1; inline;
- begin
- getLATE8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TPORTE_LATE.setLATE9; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TPORTE_LATE.clearLATE9; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TPORTE_LATE.setLATE9(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TPORTE_LATE.getLATE9 : TBits_1; inline;
- begin
- getLATE9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TPORTE_LATE.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTE_LATE.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTE_ODCE.setODCE0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTE_ODCE.clearODCE0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTE_ODCE.setODCE0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTE_ODCE.getODCE0 : TBits_1; inline;
- begin
- getODCE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTE_ODCE.setODCE1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTE_ODCE.clearODCE1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTE_ODCE.setODCE1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTE_ODCE.getODCE1 : TBits_1; inline;
- begin
- getODCE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTE_ODCE.setODCE2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTE_ODCE.clearODCE2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTE_ODCE.setODCE2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTE_ODCE.getODCE2 : TBits_1; inline;
- begin
- getODCE2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTE_ODCE.setODCE3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTE_ODCE.clearODCE3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTE_ODCE.setODCE3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTE_ODCE.getODCE3 : TBits_1; inline;
- begin
- getODCE3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTE_ODCE.setODCE4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTE_ODCE.clearODCE4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTE_ODCE.setODCE4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTE_ODCE.getODCE4 : TBits_1; inline;
- begin
- getODCE4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTE_ODCE.setODCE5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TPORTE_ODCE.clearODCE5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TPORTE_ODCE.setODCE5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TPORTE_ODCE.getODCE5 : TBits_1; inline;
- begin
- getODCE5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TPORTE_ODCE.setODCE6; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TPORTE_ODCE.clearODCE6; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TPORTE_ODCE.setODCE6(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TPORTE_ODCE.getODCE6 : TBits_1; inline;
- begin
- getODCE6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TPORTE_ODCE.setODCE7; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TPORTE_ODCE.clearODCE7; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TPORTE_ODCE.setODCE7(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TPORTE_ODCE.getODCE7 : TBits_1; inline;
- begin
- getODCE7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TPORTE_ODCE.setODCE8; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TPORTE_ODCE.clearODCE8; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TPORTE_ODCE.setODCE8(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TPORTE_ODCE.getODCE8 : TBits_1; inline;
- begin
- getODCE8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TPORTE_ODCE.setODCE9; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TPORTE_ODCE.clearODCE9; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TPORTE_ODCE.setODCE9(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TPORTE_ODCE.getODCE9 : TBits_1; inline;
- begin
- getODCE9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TPORTE_ODCE.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTE_ODCE.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTF_TRISF.setTRISF0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTF_TRISF.clearTRISF0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTF_TRISF.setTRISF0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTF_TRISF.getTRISF0 : TBits_1; inline;
- begin
- getTRISF0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTF_TRISF.setTRISF1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTF_TRISF.clearTRISF1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTF_TRISF.setTRISF1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTF_TRISF.getTRISF1 : TBits_1; inline;
- begin
- getTRISF1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTF_TRISF.setTRISF2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTF_TRISF.clearTRISF2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTF_TRISF.setTRISF2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTF_TRISF.getTRISF2 : TBits_1; inline;
- begin
- getTRISF2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTF_TRISF.setTRISF3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTF_TRISF.clearTRISF3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTF_TRISF.setTRISF3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTF_TRISF.getTRISF3 : TBits_1; inline;
- begin
- getTRISF3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTF_TRISF.setTRISF4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTF_TRISF.clearTRISF4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTF_TRISF.setTRISF4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTF_TRISF.getTRISF4 : TBits_1; inline;
- begin
- getTRISF4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTF_TRISF.setTRISF5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TPORTF_TRISF.clearTRISF5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TPORTF_TRISF.setTRISF5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TPORTF_TRISF.getTRISF5 : TBits_1; inline;
- begin
- getTRISF5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TPORTF_TRISF.setTRISF8; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TPORTF_TRISF.clearTRISF8; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TPORTF_TRISF.setTRISF8(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TPORTF_TRISF.getTRISF8 : TBits_1; inline;
- begin
- getTRISF8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TPORTF_TRISF.setTRISF12; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TPORTF_TRISF.clearTRISF12; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TPORTF_TRISF.setTRISF12(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TPORTF_TRISF.getTRISF12 : TBits_1; inline;
- begin
- getTRISF12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TPORTF_TRISF.setTRISF13; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPORTF_TRISF.clearTRISF13; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPORTF_TRISF.setTRISF13(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPORTF_TRISF.getTRISF13 : TBits_1; inline;
- begin
- getTRISF13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPORTF_TRISF.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTF_TRISF.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTF_PORTF.setRF0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTF_PORTF.clearRF0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTF_PORTF.setRF0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTF_PORTF.getRF0 : TBits_1; inline;
- begin
- getRF0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTF_PORTF.setRF1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTF_PORTF.clearRF1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTF_PORTF.setRF1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTF_PORTF.getRF1 : TBits_1; inline;
- begin
- getRF1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTF_PORTF.setRF2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTF_PORTF.clearRF2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTF_PORTF.setRF2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTF_PORTF.getRF2 : TBits_1; inline;
- begin
- getRF2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTF_PORTF.setRF3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTF_PORTF.clearRF3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTF_PORTF.setRF3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTF_PORTF.getRF3 : TBits_1; inline;
- begin
- getRF3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTF_PORTF.setRF4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTF_PORTF.clearRF4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTF_PORTF.setRF4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTF_PORTF.getRF4 : TBits_1; inline;
- begin
- getRF4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTF_PORTF.setRF5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TPORTF_PORTF.clearRF5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TPORTF_PORTF.setRF5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TPORTF_PORTF.getRF5 : TBits_1; inline;
- begin
- getRF5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TPORTF_PORTF.setRF8; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TPORTF_PORTF.clearRF8; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TPORTF_PORTF.setRF8(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TPORTF_PORTF.getRF8 : TBits_1; inline;
- begin
- getRF8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TPORTF_PORTF.setRF12; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TPORTF_PORTF.clearRF12; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TPORTF_PORTF.setRF12(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TPORTF_PORTF.getRF12 : TBits_1; inline;
- begin
- getRF12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TPORTF_PORTF.setRF13; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPORTF_PORTF.clearRF13; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPORTF_PORTF.setRF13(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPORTF_PORTF.getRF13 : TBits_1; inline;
- begin
- getRF13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPORTF_PORTF.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTF_PORTF.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTF_LATF.setLATF0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTF_LATF.clearLATF0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTF_LATF.setLATF0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTF_LATF.getLATF0 : TBits_1; inline;
- begin
- getLATF0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTF_LATF.setLATF1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTF_LATF.clearLATF1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTF_LATF.setLATF1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTF_LATF.getLATF1 : TBits_1; inline;
- begin
- getLATF1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTF_LATF.setLATF2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTF_LATF.clearLATF2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTF_LATF.setLATF2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTF_LATF.getLATF2 : TBits_1; inline;
- begin
- getLATF2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTF_LATF.setLATF3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTF_LATF.clearLATF3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTF_LATF.setLATF3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTF_LATF.getLATF3 : TBits_1; inline;
- begin
- getLATF3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTF_LATF.setLATF4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTF_LATF.clearLATF4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTF_LATF.setLATF4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTF_LATF.getLATF4 : TBits_1; inline;
- begin
- getLATF4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTF_LATF.setLATF5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TPORTF_LATF.clearLATF5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TPORTF_LATF.setLATF5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TPORTF_LATF.getLATF5 : TBits_1; inline;
- begin
- getLATF5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TPORTF_LATF.setLATF8; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TPORTF_LATF.clearLATF8; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TPORTF_LATF.setLATF8(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TPORTF_LATF.getLATF8 : TBits_1; inline;
- begin
- getLATF8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TPORTF_LATF.setLATF12; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TPORTF_LATF.clearLATF12; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TPORTF_LATF.setLATF12(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TPORTF_LATF.getLATF12 : TBits_1; inline;
- begin
- getLATF12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TPORTF_LATF.setLATF13; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPORTF_LATF.clearLATF13; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPORTF_LATF.setLATF13(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPORTF_LATF.getLATF13 : TBits_1; inline;
- begin
- getLATF13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPORTF_LATF.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTF_LATF.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTF_ODCF.setODCF0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTF_ODCF.clearODCF0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTF_ODCF.setODCF0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTF_ODCF.getODCF0 : TBits_1; inline;
- begin
- getODCF0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTF_ODCF.setODCF1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTF_ODCF.clearODCF1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTF_ODCF.setODCF1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTF_ODCF.getODCF1 : TBits_1; inline;
- begin
- getODCF1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTF_ODCF.setODCF2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTF_ODCF.clearODCF2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTF_ODCF.setODCF2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTF_ODCF.getODCF2 : TBits_1; inline;
- begin
- getODCF2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTF_ODCF.setODCF3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTF_ODCF.clearODCF3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTF_ODCF.setODCF3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTF_ODCF.getODCF3 : TBits_1; inline;
- begin
- getODCF3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTF_ODCF.setODCF4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTF_ODCF.clearODCF4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTF_ODCF.setODCF4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTF_ODCF.getODCF4 : TBits_1; inline;
- begin
- getODCF4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTF_ODCF.setODCF5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TPORTF_ODCF.clearODCF5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TPORTF_ODCF.setODCF5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TPORTF_ODCF.getODCF5 : TBits_1; inline;
- begin
- getODCF5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TPORTF_ODCF.setODCF8; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TPORTF_ODCF.clearODCF8; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TPORTF_ODCF.setODCF8(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TPORTF_ODCF.getODCF8 : TBits_1; inline;
- begin
- getODCF8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TPORTF_ODCF.setODCF12; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TPORTF_ODCF.clearODCF12; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TPORTF_ODCF.setODCF12(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TPORTF_ODCF.getODCF12 : TBits_1; inline;
- begin
- getODCF12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TPORTF_ODCF.setODCF13; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPORTF_ODCF.clearODCF13; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPORTF_ODCF.setODCF13(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPORTF_ODCF.getODCF13 : TBits_1; inline;
- begin
- getODCF13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPORTF_ODCF.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTF_ODCF.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTG_TRISG.setTRISG0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTG_TRISG.clearTRISG0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTG_TRISG.setTRISG0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTG_TRISG.getTRISG0 : TBits_1; inline;
- begin
- getTRISG0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTG_TRISG.setTRISG1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTG_TRISG.clearTRISG1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTG_TRISG.setTRISG1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTG_TRISG.getTRISG1 : TBits_1; inline;
- begin
- getTRISG1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTG_TRISG.setTRISG2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTG_TRISG.clearTRISG2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTG_TRISG.setTRISG2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTG_TRISG.getTRISG2 : TBits_1; inline;
- begin
- getTRISG2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTG_TRISG.setTRISG3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTG_TRISG.clearTRISG3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTG_TRISG.setTRISG3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTG_TRISG.getTRISG3 : TBits_1; inline;
- begin
- getTRISG3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTG_TRISG.setTRISG6; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TPORTG_TRISG.clearTRISG6; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TPORTG_TRISG.setTRISG6(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TPORTG_TRISG.getTRISG6 : TBits_1; inline;
- begin
- getTRISG6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TPORTG_TRISG.setTRISG7; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TPORTG_TRISG.clearTRISG7; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TPORTG_TRISG.setTRISG7(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TPORTG_TRISG.getTRISG7 : TBits_1; inline;
- begin
- getTRISG7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TPORTG_TRISG.setTRISG8; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TPORTG_TRISG.clearTRISG8; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TPORTG_TRISG.setTRISG8(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TPORTG_TRISG.getTRISG8 : TBits_1; inline;
- begin
- getTRISG8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TPORTG_TRISG.setTRISG9; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TPORTG_TRISG.clearTRISG9; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TPORTG_TRISG.setTRISG9(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TPORTG_TRISG.getTRISG9 : TBits_1; inline;
- begin
- getTRISG9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TPORTG_TRISG.setTRISG12; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TPORTG_TRISG.clearTRISG12; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TPORTG_TRISG.setTRISG12(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TPORTG_TRISG.getTRISG12 : TBits_1; inline;
- begin
- getTRISG12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TPORTG_TRISG.setTRISG13; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPORTG_TRISG.clearTRISG13; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPORTG_TRISG.setTRISG13(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPORTG_TRISG.getTRISG13 : TBits_1; inline;
- begin
- getTRISG13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPORTG_TRISG.setTRISG14; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TPORTG_TRISG.clearTRISG14; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TPORTG_TRISG.setTRISG14(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TPORTG_TRISG.getTRISG14 : TBits_1; inline;
- begin
- getTRISG14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TPORTG_TRISG.setTRISG15; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPORTG_TRISG.clearTRISG15; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPORTG_TRISG.setTRISG15(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPORTG_TRISG.getTRISG15 : TBits_1; inline;
- begin
- getTRISG15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPORTG_TRISG.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTG_TRISG.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTG_PORTG.setRG0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTG_PORTG.clearRG0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTG_PORTG.setRG0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTG_PORTG.getRG0 : TBits_1; inline;
- begin
- getRG0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTG_PORTG.setRG1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTG_PORTG.clearRG1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTG_PORTG.setRG1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTG_PORTG.getRG1 : TBits_1; inline;
- begin
- getRG1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTG_PORTG.setRG2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTG_PORTG.clearRG2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTG_PORTG.setRG2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTG_PORTG.getRG2 : TBits_1; inline;
- begin
- getRG2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTG_PORTG.setRG3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTG_PORTG.clearRG3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTG_PORTG.setRG3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTG_PORTG.getRG3 : TBits_1; inline;
- begin
- getRG3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTG_PORTG.setRG6; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TPORTG_PORTG.clearRG6; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TPORTG_PORTG.setRG6(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TPORTG_PORTG.getRG6 : TBits_1; inline;
- begin
- getRG6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TPORTG_PORTG.setRG7; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TPORTG_PORTG.clearRG7; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TPORTG_PORTG.setRG7(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TPORTG_PORTG.getRG7 : TBits_1; inline;
- begin
- getRG7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TPORTG_PORTG.setRG8; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TPORTG_PORTG.clearRG8; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TPORTG_PORTG.setRG8(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TPORTG_PORTG.getRG8 : TBits_1; inline;
- begin
- getRG8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TPORTG_PORTG.setRG9; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TPORTG_PORTG.clearRG9; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TPORTG_PORTG.setRG9(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TPORTG_PORTG.getRG9 : TBits_1; inline;
- begin
- getRG9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TPORTG_PORTG.setRG12; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TPORTG_PORTG.clearRG12; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TPORTG_PORTG.setRG12(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TPORTG_PORTG.getRG12 : TBits_1; inline;
- begin
- getRG12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TPORTG_PORTG.setRG13; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPORTG_PORTG.clearRG13; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPORTG_PORTG.setRG13(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPORTG_PORTG.getRG13 : TBits_1; inline;
- begin
- getRG13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPORTG_PORTG.setRG14; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TPORTG_PORTG.clearRG14; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TPORTG_PORTG.setRG14(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TPORTG_PORTG.getRG14 : TBits_1; inline;
- begin
- getRG14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TPORTG_PORTG.setRG15; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPORTG_PORTG.clearRG15; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPORTG_PORTG.setRG15(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPORTG_PORTG.getRG15 : TBits_1; inline;
- begin
- getRG15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPORTG_PORTG.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTG_PORTG.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTG_LATG.setLATG0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTG_LATG.clearLATG0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTG_LATG.setLATG0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTG_LATG.getLATG0 : TBits_1; inline;
- begin
- getLATG0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTG_LATG.setLATG1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTG_LATG.clearLATG1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTG_LATG.setLATG1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTG_LATG.getLATG1 : TBits_1; inline;
- begin
- getLATG1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTG_LATG.setLATG2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTG_LATG.clearLATG2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTG_LATG.setLATG2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTG_LATG.getLATG2 : TBits_1; inline;
- begin
- getLATG2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTG_LATG.setLATG3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTG_LATG.clearLATG3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTG_LATG.setLATG3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTG_LATG.getLATG3 : TBits_1; inline;
- begin
- getLATG3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTG_LATG.setLATG6; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TPORTG_LATG.clearLATG6; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TPORTG_LATG.setLATG6(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TPORTG_LATG.getLATG6 : TBits_1; inline;
- begin
- getLATG6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TPORTG_LATG.setLATG7; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TPORTG_LATG.clearLATG7; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TPORTG_LATG.setLATG7(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TPORTG_LATG.getLATG7 : TBits_1; inline;
- begin
- getLATG7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TPORTG_LATG.setLATG8; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TPORTG_LATG.clearLATG8; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TPORTG_LATG.setLATG8(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TPORTG_LATG.getLATG8 : TBits_1; inline;
- begin
- getLATG8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TPORTG_LATG.setLATG9; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TPORTG_LATG.clearLATG9; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TPORTG_LATG.setLATG9(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TPORTG_LATG.getLATG9 : TBits_1; inline;
- begin
- getLATG9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TPORTG_LATG.setLATG12; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TPORTG_LATG.clearLATG12; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TPORTG_LATG.setLATG12(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TPORTG_LATG.getLATG12 : TBits_1; inline;
- begin
- getLATG12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TPORTG_LATG.setLATG13; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPORTG_LATG.clearLATG13; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPORTG_LATG.setLATG13(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPORTG_LATG.getLATG13 : TBits_1; inline;
- begin
- getLATG13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPORTG_LATG.setLATG14; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TPORTG_LATG.clearLATG14; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TPORTG_LATG.setLATG14(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TPORTG_LATG.getLATG14 : TBits_1; inline;
- begin
- getLATG14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TPORTG_LATG.setLATG15; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPORTG_LATG.clearLATG15; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPORTG_LATG.setLATG15(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPORTG_LATG.getLATG15 : TBits_1; inline;
- begin
- getLATG15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPORTG_LATG.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTG_LATG.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTG_ODCG.setODCG0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTG_ODCG.clearODCG0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTG_ODCG.setODCG0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTG_ODCG.getODCG0 : TBits_1; inline;
- begin
- getODCG0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTG_ODCG.setODCG1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTG_ODCG.clearODCG1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTG_ODCG.setODCG1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTG_ODCG.getODCG1 : TBits_1; inline;
- begin
- getODCG1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTG_ODCG.setODCG2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTG_ODCG.clearODCG2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTG_ODCG.setODCG2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTG_ODCG.getODCG2 : TBits_1; inline;
- begin
- getODCG2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTG_ODCG.setODCG3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTG_ODCG.clearODCG3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTG_ODCG.setODCG3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTG_ODCG.getODCG3 : TBits_1; inline;
- begin
- getODCG3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTG_ODCG.setODCG6; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TPORTG_ODCG.clearODCG6; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TPORTG_ODCG.setODCG6(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TPORTG_ODCG.getODCG6 : TBits_1; inline;
- begin
- getODCG6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TPORTG_ODCG.setODCG7; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TPORTG_ODCG.clearODCG7; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TPORTG_ODCG.setODCG7(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TPORTG_ODCG.getODCG7 : TBits_1; inline;
- begin
- getODCG7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TPORTG_ODCG.setODCG8; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TPORTG_ODCG.clearODCG8; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TPORTG_ODCG.setODCG8(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TPORTG_ODCG.getODCG8 : TBits_1; inline;
- begin
- getODCG8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TPORTG_ODCG.setODCG9; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TPORTG_ODCG.clearODCG9; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TPORTG_ODCG.setODCG9(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TPORTG_ODCG.getODCG9 : TBits_1; inline;
- begin
- getODCG9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TPORTG_ODCG.setODCG12; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TPORTG_ODCG.clearODCG12; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TPORTG_ODCG.setODCG12(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TPORTG_ODCG.getODCG12 : TBits_1; inline;
- begin
- getODCG12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TPORTG_ODCG.setODCG13; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPORTG_ODCG.clearODCG13; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPORTG_ODCG.setODCG13(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPORTG_ODCG.getODCG13 : TBits_1; inline;
- begin
- getODCG13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPORTG_ODCG.setODCG14; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TPORTG_ODCG.clearODCG14; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TPORTG_ODCG.setODCG14(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TPORTG_ODCG.getODCG14 : TBits_1; inline;
- begin
- getODCG14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TPORTG_ODCG.setODCG15; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPORTG_ODCG.clearODCG15; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPORTG_ODCG.setODCG15(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPORTG_ODCG.getODCG15 : TBits_1; inline;
- begin
- getODCG15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPORTG_ODCG.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTG_ODCG.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTG_CNCON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPORTG_CNCON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPORTG_CNCON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPORTG_CNCON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPORTG_CNCON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPORTG_CNCON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPORTG_CNCON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPORTG_CNCON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPORTG_CNCON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTG_CNCON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTG_CNEN.setCNEN0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTG_CNEN.clearCNEN0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTG_CNEN.setCNEN0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTG_CNEN.getCNEN0 : TBits_1; inline;
- begin
- getCNEN0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTG_CNEN.setCNEN1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTG_CNEN.clearCNEN1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTG_CNEN.setCNEN1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTG_CNEN.getCNEN1 : TBits_1; inline;
- begin
- getCNEN1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTG_CNEN.setCNEN2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTG_CNEN.clearCNEN2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTG_CNEN.setCNEN2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTG_CNEN.getCNEN2 : TBits_1; inline;
- begin
- getCNEN2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTG_CNEN.setCNEN3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTG_CNEN.clearCNEN3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTG_CNEN.setCNEN3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTG_CNEN.getCNEN3 : TBits_1; inline;
- begin
- getCNEN3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTG_CNEN.setCNEN4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTG_CNEN.clearCNEN4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTG_CNEN.setCNEN4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTG_CNEN.getCNEN4 : TBits_1; inline;
- begin
- getCNEN4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTG_CNEN.setCNEN5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TPORTG_CNEN.clearCNEN5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TPORTG_CNEN.setCNEN5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TPORTG_CNEN.getCNEN5 : TBits_1; inline;
- begin
- getCNEN5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TPORTG_CNEN.setCNEN6; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TPORTG_CNEN.clearCNEN6; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TPORTG_CNEN.setCNEN6(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TPORTG_CNEN.getCNEN6 : TBits_1; inline;
- begin
- getCNEN6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TPORTG_CNEN.setCNEN7; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TPORTG_CNEN.clearCNEN7; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TPORTG_CNEN.setCNEN7(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TPORTG_CNEN.getCNEN7 : TBits_1; inline;
- begin
- getCNEN7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TPORTG_CNEN.setCNEN8; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TPORTG_CNEN.clearCNEN8; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TPORTG_CNEN.setCNEN8(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TPORTG_CNEN.getCNEN8 : TBits_1; inline;
- begin
- getCNEN8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TPORTG_CNEN.setCNEN9; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TPORTG_CNEN.clearCNEN9; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TPORTG_CNEN.setCNEN9(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TPORTG_CNEN.getCNEN9 : TBits_1; inline;
- begin
- getCNEN9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TPORTG_CNEN.setCNEN10; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TPORTG_CNEN.clearCNEN10; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TPORTG_CNEN.setCNEN10(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TPORTG_CNEN.getCNEN10 : TBits_1; inline;
- begin
- getCNEN10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TPORTG_CNEN.setCNEN11; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TPORTG_CNEN.clearCNEN11; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TPORTG_CNEN.setCNEN11(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TPORTG_CNEN.getCNEN11 : TBits_1; inline;
- begin
- getCNEN11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TPORTG_CNEN.setCNEN12; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TPORTG_CNEN.clearCNEN12; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TPORTG_CNEN.setCNEN12(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TPORTG_CNEN.getCNEN12 : TBits_1; inline;
- begin
- getCNEN12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TPORTG_CNEN.setCNEN13; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPORTG_CNEN.clearCNEN13; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPORTG_CNEN.setCNEN13(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPORTG_CNEN.getCNEN13 : TBits_1; inline;
- begin
- getCNEN13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPORTG_CNEN.setCNEN14; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TPORTG_CNEN.clearCNEN14; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TPORTG_CNEN.setCNEN14(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TPORTG_CNEN.getCNEN14 : TBits_1; inline;
- begin
- getCNEN14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TPORTG_CNEN.setCNEN15; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPORTG_CNEN.clearCNEN15; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPORTG_CNEN.setCNEN15(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPORTG_CNEN.getCNEN15 : TBits_1; inline;
- begin
- getCNEN15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPORTG_CNEN.setCNEN16; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- procedure TPORTG_CNEN.clearCNEN16; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00010000;
- end;
- procedure TPORTG_CNEN.setCNEN16(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00010000
- else
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- function TPORTG_CNEN.getCNEN16 : TBits_1; inline;
- begin
- getCNEN16 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
- end;
- procedure TPORTG_CNEN.setCNEN17; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- procedure TPORTG_CNEN.clearCNEN17; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00020000;
- end;
- procedure TPORTG_CNEN.setCNEN17(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00020000
- else
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- function TPORTG_CNEN.getCNEN17 : TBits_1; inline;
- begin
- getCNEN17 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
- end;
- procedure TPORTG_CNEN.setCNEN18; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- procedure TPORTG_CNEN.clearCNEN18; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00040000;
- end;
- procedure TPORTG_CNEN.setCNEN18(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00040000
- else
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- function TPORTG_CNEN.getCNEN18 : TBits_1; inline;
- begin
- getCNEN18 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
- end;
- procedure TPORTG_CNEN.setCNEN19; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- procedure TPORTG_CNEN.clearCNEN19; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00080000;
- end;
- procedure TPORTG_CNEN.setCNEN19(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00080000
- else
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- function TPORTG_CNEN.getCNEN19 : TBits_1; inline;
- begin
- getCNEN19 := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
- end;
- procedure TPORTG_CNEN.setCNEN20; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- procedure TPORTG_CNEN.clearCNEN20; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00100000;
- end;
- procedure TPORTG_CNEN.setCNEN20(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00100000
- else
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- function TPORTG_CNEN.getCNEN20 : TBits_1; inline;
- begin
- getCNEN20 := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
- end;
- procedure TPORTG_CNEN.setCNEN21; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- procedure TPORTG_CNEN.clearCNEN21; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00200000;
- end;
- procedure TPORTG_CNEN.setCNEN21(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00200000
- else
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- function TPORTG_CNEN.getCNEN21 : TBits_1; inline;
- begin
- getCNEN21 := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
- end;
- procedure TPORTG_CNEN.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTG_CNEN.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTG_CNPUE.setCNPUE0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTG_CNPUE.clearCNPUE0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTG_CNPUE.setCNPUE0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTG_CNPUE.getCNPUE0 : TBits_1; inline;
- begin
- getCNPUE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTG_CNPUE.setCNPUE1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTG_CNPUE.clearCNPUE1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTG_CNPUE.setCNPUE1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTG_CNPUE.getCNPUE1 : TBits_1; inline;
- begin
- getCNPUE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTG_CNPUE.setCNPUE2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTG_CNPUE.clearCNPUE2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTG_CNPUE.setCNPUE2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTG_CNPUE.getCNPUE2 : TBits_1; inline;
- begin
- getCNPUE2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTG_CNPUE.setCNPUE3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTG_CNPUE.clearCNPUE3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTG_CNPUE.setCNPUE3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTG_CNPUE.getCNPUE3 : TBits_1; inline;
- begin
- getCNPUE3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTG_CNPUE.setCNPUE4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTG_CNPUE.clearCNPUE4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTG_CNPUE.setCNPUE4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTG_CNPUE.getCNPUE4 : TBits_1; inline;
- begin
- getCNPUE4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTG_CNPUE.setCNPUE5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TPORTG_CNPUE.clearCNPUE5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TPORTG_CNPUE.setCNPUE5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TPORTG_CNPUE.getCNPUE5 : TBits_1; inline;
- begin
- getCNPUE5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TPORTG_CNPUE.setCNPUE6; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TPORTG_CNPUE.clearCNPUE6; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TPORTG_CNPUE.setCNPUE6(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TPORTG_CNPUE.getCNPUE6 : TBits_1; inline;
- begin
- getCNPUE6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TPORTG_CNPUE.setCNPUE7; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TPORTG_CNPUE.clearCNPUE7; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TPORTG_CNPUE.setCNPUE7(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TPORTG_CNPUE.getCNPUE7 : TBits_1; inline;
- begin
- getCNPUE7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TPORTG_CNPUE.setCNPUE8; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TPORTG_CNPUE.clearCNPUE8; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TPORTG_CNPUE.setCNPUE8(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TPORTG_CNPUE.getCNPUE8 : TBits_1; inline;
- begin
- getCNPUE8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TPORTG_CNPUE.setCNPUE9; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TPORTG_CNPUE.clearCNPUE9; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TPORTG_CNPUE.setCNPUE9(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TPORTG_CNPUE.getCNPUE9 : TBits_1; inline;
- begin
- getCNPUE9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TPORTG_CNPUE.setCNPUE10; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TPORTG_CNPUE.clearCNPUE10; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TPORTG_CNPUE.setCNPUE10(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TPORTG_CNPUE.getCNPUE10 : TBits_1; inline;
- begin
- getCNPUE10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TPORTG_CNPUE.setCNPUE11; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TPORTG_CNPUE.clearCNPUE11; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TPORTG_CNPUE.setCNPUE11(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TPORTG_CNPUE.getCNPUE11 : TBits_1; inline;
- begin
- getCNPUE11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TPORTG_CNPUE.setCNPUE12; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TPORTG_CNPUE.clearCNPUE12; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TPORTG_CNPUE.setCNPUE12(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TPORTG_CNPUE.getCNPUE12 : TBits_1; inline;
- begin
- getCNPUE12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TPORTG_CNPUE.setCNPUE13; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPORTG_CNPUE.clearCNPUE13; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPORTG_CNPUE.setCNPUE13(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPORTG_CNPUE.getCNPUE13 : TBits_1; inline;
- begin
- getCNPUE13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPORTG_CNPUE.setCNPUE14; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TPORTG_CNPUE.clearCNPUE14; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TPORTG_CNPUE.setCNPUE14(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TPORTG_CNPUE.getCNPUE14 : TBits_1; inline;
- begin
- getCNPUE14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TPORTG_CNPUE.setCNPUE15; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPORTG_CNPUE.clearCNPUE15; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPORTG_CNPUE.setCNPUE15(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPORTG_CNPUE.getCNPUE15 : TBits_1; inline;
- begin
- getCNPUE15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPORTG_CNPUE.setCNPUE16; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- procedure TPORTG_CNPUE.clearCNPUE16; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00010000;
- end;
- procedure TPORTG_CNPUE.setCNPUE16(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00010000
- else
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- function TPORTG_CNPUE.getCNPUE16 : TBits_1; inline;
- begin
- getCNPUE16 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
- end;
- procedure TPORTG_CNPUE.setCNPUE17; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- procedure TPORTG_CNPUE.clearCNPUE17; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00020000;
- end;
- procedure TPORTG_CNPUE.setCNPUE17(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00020000
- else
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- function TPORTG_CNPUE.getCNPUE17 : TBits_1; inline;
- begin
- getCNPUE17 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
- end;
- procedure TPORTG_CNPUE.setCNPUE18; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- procedure TPORTG_CNPUE.clearCNPUE18; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00040000;
- end;
- procedure TPORTG_CNPUE.setCNPUE18(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00040000
- else
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- function TPORTG_CNPUE.getCNPUE18 : TBits_1; inline;
- begin
- getCNPUE18 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
- end;
- procedure TPORTG_CNPUE.setCNPUE19; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- procedure TPORTG_CNPUE.clearCNPUE19; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00080000;
- end;
- procedure TPORTG_CNPUE.setCNPUE19(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00080000
- else
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- function TPORTG_CNPUE.getCNPUE19 : TBits_1; inline;
- begin
- getCNPUE19 := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
- end;
- procedure TPORTG_CNPUE.setCNPUE20; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- procedure TPORTG_CNPUE.clearCNPUE20; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00100000;
- end;
- procedure TPORTG_CNPUE.setCNPUE20(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00100000
- else
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- function TPORTG_CNPUE.getCNPUE20 : TBits_1; inline;
- begin
- getCNPUE20 := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
- end;
- procedure TPORTG_CNPUE.setCNPUE21; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- procedure TPORTG_CNPUE.clearCNPUE21; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00200000;
- end;
- procedure TPORTG_CNPUE.setCNPUE21(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00200000
- else
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- function TPORTG_CNPUE.getCNPUE21 : TBits_1; inline;
- begin
- getCNPUE21 := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
- end;
- procedure TPORTG_CNPUE.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTG_CNPUE.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_ETHCON1.setBUFCDEC; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TETH_ETHCON1.clearBUFCDEC; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TETH_ETHCON1.setBUFCDEC(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TETH_ETHCON1.getBUFCDEC : TBits_1; inline;
- begin
- getBUFCDEC := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TETH_ETHCON1.setMANFC; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TETH_ETHCON1.clearMANFC; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TETH_ETHCON1.setMANFC(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TETH_ETHCON1.getMANFC : TBits_1; inline;
- begin
- getMANFC := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TETH_ETHCON1.setAUTOFC; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TETH_ETHCON1.clearAUTOFC; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TETH_ETHCON1.setAUTOFC(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TETH_ETHCON1.getAUTOFC : TBits_1; inline;
- begin
- getAUTOFC := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TETH_ETHCON1.setRXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TETH_ETHCON1.clearRXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TETH_ETHCON1.setRXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TETH_ETHCON1.getRXEN : TBits_1; inline;
- begin
- getRXEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TETH_ETHCON1.setTXRTS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TETH_ETHCON1.clearTXRTS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TETH_ETHCON1.setTXRTS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TETH_ETHCON1.getTXRTS : TBits_1; inline;
- begin
- getTXRTS := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TETH_ETHCON1.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TETH_ETHCON1.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TETH_ETHCON1.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TETH_ETHCON1.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TETH_ETHCON1.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TETH_ETHCON1.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TETH_ETHCON1.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TETH_ETHCON1.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TETH_ETHCON1.setPTV(thebits : TBits_16); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $0000FFFF or ( thebits shl 16 );
- end;
- function TETH_ETHCON1.getPTV : TBits_16; inline;
- begin
- getPTV := (pTDefRegMap(@Self)^.val and $FFFF0000) shr 16;
- end;
- procedure TETH_ETHCON1.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_ETHCON1.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_ETHCON2.setRXBUF_SZ(thebits : TBits_7); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF80F or ( thebits shl 4 );
- end;
- function TETH_ETHCON2.getRXBUF_SZ : TBits_7; inline;
- begin
- getRXBUF_SZ := (pTDefRegMap(@Self)^.val and $000007F0) shr 4;
- end;
- procedure TETH_ETHCON2.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_ETHCON2.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_ETHTXST.setTXSTADDR(thebits : TBits_30); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $00000003 or ( thebits shl 2 );
- end;
- function TETH_ETHTXST.getTXSTADDR : TBits_30; inline;
- begin
- getTXSTADDR := (pTDefRegMap(@Self)^.val and $FFFFFFFC) shr 2;
- end;
- procedure TETH_ETHTXST.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_ETHTXST.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_ETHRXST.setRXSTADDR(thebits : TBits_30); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $00000003 or ( thebits shl 2 );
- end;
- function TETH_ETHRXST.getRXSTADDR : TBits_30; inline;
- begin
- getRXSTADDR := (pTDefRegMap(@Self)^.val and $FFFFFFFC) shr 2;
- end;
- procedure TETH_ETHRXST.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_ETHRXST.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_ETHHT0.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_ETHHT0.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_ETHHT0.setHTLOWER(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_ETHHT0.getHTLOWER : TBits_32; inline;
- begin
- getHTLOWER := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_ETHHT1.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_ETHHT1.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_ETHHT1.setHTUPPER(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_ETHHT1.getHTUPPER : TBits_32; inline;
- begin
- getHTUPPER := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_ETHPMM0.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_ETHPMM0.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_ETHPMM0.setPMMLOWER(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_ETHPMM0.getPMMLOWER : TBits_32; inline;
- begin
- getPMMLOWER := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_ETHPMM1.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_ETHPMM1.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_ETHPMM1.setPMMUPPER(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_ETHPMM1.getPMMUPPER : TBits_32; inline;
- begin
- getPMMUPPER := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_ETHPMCS.setPMCS(thebits : TBits_16); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
- end;
- function TETH_ETHPMCS.getPMCS : TBits_16; inline;
- begin
- getPMCS := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
- end;
- procedure TETH_ETHPMCS.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_ETHPMCS.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_ETHPMO.setPMO(thebits : TBits_16); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
- end;
- function TETH_ETHPMO.getPMO : TBits_16; inline;
- begin
- getPMO := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
- end;
- procedure TETH_ETHPMO.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_ETHPMO.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_ETHRXFC.setBCEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TETH_ETHRXFC.clearBCEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TETH_ETHRXFC.setBCEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TETH_ETHRXFC.getBCEN : TBits_1; inline;
- begin
- getBCEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TETH_ETHRXFC.setMCEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TETH_ETHRXFC.clearMCEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TETH_ETHRXFC.setMCEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TETH_ETHRXFC.getMCEN : TBits_1; inline;
- begin
- getMCEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TETH_ETHRXFC.setNOTMEEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TETH_ETHRXFC.clearNOTMEEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TETH_ETHRXFC.setNOTMEEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TETH_ETHRXFC.getNOTMEEN : TBits_1; inline;
- begin
- getNOTMEEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TETH_ETHRXFC.setUCEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TETH_ETHRXFC.clearUCEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TETH_ETHRXFC.setUCEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TETH_ETHRXFC.getUCEN : TBits_1; inline;
- begin
- getUCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TETH_ETHRXFC.setRUNTEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TETH_ETHRXFC.clearRUNTEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TETH_ETHRXFC.setRUNTEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TETH_ETHRXFC.getRUNTEN : TBits_1; inline;
- begin
- getRUNTEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TETH_ETHRXFC.setRUNTERREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TETH_ETHRXFC.clearRUNTERREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TETH_ETHRXFC.setRUNTERREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TETH_ETHRXFC.getRUNTERREN : TBits_1; inline;
- begin
- getRUNTERREN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TETH_ETHRXFC.setCRCOKEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TETH_ETHRXFC.clearCRCOKEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TETH_ETHRXFC.setCRCOKEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TETH_ETHRXFC.getCRCOKEN : TBits_1; inline;
- begin
- getCRCOKEN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TETH_ETHRXFC.setCRCERREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TETH_ETHRXFC.clearCRCERREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TETH_ETHRXFC.setCRCERREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TETH_ETHRXFC.getCRCERREN : TBits_1; inline;
- begin
- getCRCERREN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TETH_ETHRXFC.setPMMODE(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
- end;
- function TETH_ETHRXFC.getPMMODE : TBits_4; inline;
- begin
- getPMMODE := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
- end;
- procedure TETH_ETHRXFC.setNOTPM; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TETH_ETHRXFC.clearNOTPM; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TETH_ETHRXFC.setNOTPM(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TETH_ETHRXFC.getNOTPM : TBits_1; inline;
- begin
- getNOTPM := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TETH_ETHRXFC.setMPEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TETH_ETHRXFC.clearMPEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TETH_ETHRXFC.setMPEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TETH_ETHRXFC.getMPEN : TBits_1; inline;
- begin
- getMPEN := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TETH_ETHRXFC.setHTEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TETH_ETHRXFC.clearHTEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TETH_ETHRXFC.setHTEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TETH_ETHRXFC.getHTEN : TBits_1; inline;
- begin
- getHTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TETH_ETHRXFC.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_ETHRXFC.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_ETHRXWM.setRXEWM(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
- end;
- function TETH_ETHRXWM.getRXEWM : TBits_8; inline;
- begin
- getRXEWM := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
- end;
- procedure TETH_ETHRXWM.setRXFWM(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
- end;
- function TETH_ETHRXWM.getRXFWM : TBits_8; inline;
- begin
- getRXFWM := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
- end;
- procedure TETH_ETHRXWM.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_ETHRXWM.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_ETHIEN.setRXOVFLWIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TETH_ETHIEN.clearRXOVFLWIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TETH_ETHIEN.setRXOVFLWIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TETH_ETHIEN.getRXOVFLWIE : TBits_1; inline;
- begin
- getRXOVFLWIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TETH_ETHIEN.setRXBUFNAIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TETH_ETHIEN.clearRXBUFNAIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TETH_ETHIEN.setRXBUFNAIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TETH_ETHIEN.getRXBUFNAIE : TBits_1; inline;
- begin
- getRXBUFNAIE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TETH_ETHIEN.setTXABORTIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TETH_ETHIEN.clearTXABORTIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TETH_ETHIEN.setTXABORTIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TETH_ETHIEN.getTXABORTIE : TBits_1; inline;
- begin
- getTXABORTIE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TETH_ETHIEN.setTXDONEIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TETH_ETHIEN.clearTXDONEIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TETH_ETHIEN.setTXDONEIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TETH_ETHIEN.getTXDONEIE : TBits_1; inline;
- begin
- getTXDONEIE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TETH_ETHIEN.setRXACTIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TETH_ETHIEN.clearRXACTIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TETH_ETHIEN.setRXACTIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TETH_ETHIEN.getRXACTIE : TBits_1; inline;
- begin
- getRXACTIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TETH_ETHIEN.setPKTPENDIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TETH_ETHIEN.clearPKTPENDIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TETH_ETHIEN.setPKTPENDIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TETH_ETHIEN.getPKTPENDIE : TBits_1; inline;
- begin
- getPKTPENDIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TETH_ETHIEN.setRXDONEIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TETH_ETHIEN.clearRXDONEIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TETH_ETHIEN.setRXDONEIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TETH_ETHIEN.getRXDONEIE : TBits_1; inline;
- begin
- getRXDONEIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TETH_ETHIEN.setFWMARKIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TETH_ETHIEN.clearFWMARKIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TETH_ETHIEN.setFWMARKIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TETH_ETHIEN.getFWMARKIE : TBits_1; inline;
- begin
- getFWMARKIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TETH_ETHIEN.setEWMARKIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TETH_ETHIEN.clearEWMARKIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TETH_ETHIEN.setEWMARKIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TETH_ETHIEN.getEWMARKIE : TBits_1; inline;
- begin
- getEWMARKIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TETH_ETHIEN.setRXBUSEIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TETH_ETHIEN.clearRXBUSEIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TETH_ETHIEN.setRXBUSEIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TETH_ETHIEN.getRXBUSEIE : TBits_1; inline;
- begin
- getRXBUSEIE := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TETH_ETHIEN.setTXBUSEIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TETH_ETHIEN.clearTXBUSEIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TETH_ETHIEN.setTXBUSEIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TETH_ETHIEN.getTXBUSEIE : TBits_1; inline;
- begin
- getTXBUSEIE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TETH_ETHIEN.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_ETHIEN.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_ETHIRQ.setRXOVFLW; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TETH_ETHIRQ.clearRXOVFLW; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TETH_ETHIRQ.setRXOVFLW(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TETH_ETHIRQ.getRXOVFLW : TBits_1; inline;
- begin
- getRXOVFLW := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TETH_ETHIRQ.setRXBUFNA; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TETH_ETHIRQ.clearRXBUFNA; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TETH_ETHIRQ.setRXBUFNA(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TETH_ETHIRQ.getRXBUFNA : TBits_1; inline;
- begin
- getRXBUFNA := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TETH_ETHIRQ.setTXABORT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TETH_ETHIRQ.clearTXABORT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TETH_ETHIRQ.setTXABORT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TETH_ETHIRQ.getTXABORT : TBits_1; inline;
- begin
- getTXABORT := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TETH_ETHIRQ.setTXDONE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TETH_ETHIRQ.clearTXDONE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TETH_ETHIRQ.setTXDONE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TETH_ETHIRQ.getTXDONE : TBits_1; inline;
- begin
- getTXDONE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TETH_ETHIRQ.setRXACT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TETH_ETHIRQ.clearRXACT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TETH_ETHIRQ.setRXACT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TETH_ETHIRQ.getRXACT : TBits_1; inline;
- begin
- getRXACT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TETH_ETHIRQ.setPKTPEND; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TETH_ETHIRQ.clearPKTPEND; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TETH_ETHIRQ.setPKTPEND(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TETH_ETHIRQ.getPKTPEND : TBits_1; inline;
- begin
- getPKTPEND := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TETH_ETHIRQ.setRXDONE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TETH_ETHIRQ.clearRXDONE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TETH_ETHIRQ.setRXDONE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TETH_ETHIRQ.getRXDONE : TBits_1; inline;
- begin
- getRXDONE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TETH_ETHIRQ.setFWMARK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TETH_ETHIRQ.clearFWMARK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TETH_ETHIRQ.setFWMARK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TETH_ETHIRQ.getFWMARK : TBits_1; inline;
- begin
- getFWMARK := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TETH_ETHIRQ.setEWMARK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TETH_ETHIRQ.clearEWMARK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TETH_ETHIRQ.setEWMARK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TETH_ETHIRQ.getEWMARK : TBits_1; inline;
- begin
- getEWMARK := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TETH_ETHIRQ.setRXBUSE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TETH_ETHIRQ.clearRXBUSE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TETH_ETHIRQ.setRXBUSE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TETH_ETHIRQ.getRXBUSE : TBits_1; inline;
- begin
- getRXBUSE := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TETH_ETHIRQ.setTXBUSE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TETH_ETHIRQ.clearTXBUSE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TETH_ETHIRQ.setTXBUSE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TETH_ETHIRQ.getTXBUSE : TBits_1; inline;
- begin
- getTXBUSE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TETH_ETHIRQ.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_ETHIRQ.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_ETHSTAT.setRXBUSY; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TETH_ETHSTAT.clearRXBUSY; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TETH_ETHSTAT.setRXBUSY(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TETH_ETHSTAT.getRXBUSY : TBits_1; inline;
- begin
- getRXBUSY := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TETH_ETHSTAT.setTXBUSY; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TETH_ETHSTAT.clearTXBUSY; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TETH_ETHSTAT.setTXBUSY(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TETH_ETHSTAT.getTXBUSY : TBits_1; inline;
- begin
- getTXBUSY := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TETH_ETHSTAT.setBUSY; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TETH_ETHSTAT.clearBUSY; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TETH_ETHSTAT.setBUSY(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TETH_ETHSTAT.getBUSY : TBits_1; inline;
- begin
- getBUSY := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TETH_ETHSTAT.setBUFCNT(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
- end;
- function TETH_ETHSTAT.getBUFCNT : TBits_8; inline;
- begin
- getBUFCNT := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
- end;
- procedure TETH_ETHSTAT.setETHBUSY; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TETH_ETHSTAT.clearETHBUSY; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TETH_ETHSTAT.setETHBUSY(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TETH_ETHSTAT.getETHBUSY : TBits_1; inline;
- begin
- getETHBUSY := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TETH_ETHSTAT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_ETHSTAT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_ETHRXOVFLOW.setRXOVFLWCNT(thebits : TBits_16); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
- end;
- function TETH_ETHRXOVFLOW.getRXOVFLWCNT : TBits_16; inline;
- begin
- getRXOVFLWCNT := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
- end;
- procedure TETH_ETHRXOVFLOW.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_ETHRXOVFLOW.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_ETHFRMTXOK.setFRMTXOKCNT(thebits : TBits_16); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
- end;
- function TETH_ETHFRMTXOK.getFRMTXOKCNT : TBits_16; inline;
- begin
- getFRMTXOKCNT := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
- end;
- procedure TETH_ETHFRMTXOK.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_ETHFRMTXOK.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_ETHSCOLFRM.setSCOLFRMCNT(thebits : TBits_16); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
- end;
- function TETH_ETHSCOLFRM.getSCOLFRMCNT : TBits_16; inline;
- begin
- getSCOLFRMCNT := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
- end;
- procedure TETH_ETHSCOLFRM.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_ETHSCOLFRM.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_ETHMCOLFRM.setMCOLFRMCNT(thebits : TBits_16); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
- end;
- function TETH_ETHMCOLFRM.getMCOLFRMCNT : TBits_16; inline;
- begin
- getMCOLFRMCNT := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
- end;
- procedure TETH_ETHMCOLFRM.setMCOLFRM_CNT(thebits : TBits_16); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
- end;
- function TETH_ETHMCOLFRM.getMCOLFRM_CNT : TBits_16; inline;
- begin
- getMCOLFRM_CNT := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
- end;
- procedure TETH_ETHMCOLFRM.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_ETHMCOLFRM.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_ETHFRMRXOK.setFRMRXOKCNT(thebits : TBits_16); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
- end;
- function TETH_ETHFRMRXOK.getFRMRXOKCNT : TBits_16; inline;
- begin
- getFRMRXOKCNT := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
- end;
- procedure TETH_ETHFRMRXOK.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_ETHFRMRXOK.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_ETHFCSERR.setFCSERRCNT(thebits : TBits_16); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
- end;
- function TETH_ETHFCSERR.getFCSERRCNT : TBits_16; inline;
- begin
- getFCSERRCNT := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
- end;
- procedure TETH_ETHFCSERR.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_ETHFCSERR.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_ETHALGNERR.setALGNERRCNT(thebits : TBits_16); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
- end;
- function TETH_ETHALGNERR.getALGNERRCNT : TBits_16; inline;
- begin
- getALGNERRCNT := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
- end;
- procedure TETH_ETHALGNERR.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_ETHALGNERR.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMAC1CFG1.setRXENABLE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TETH_EMAC1CFG1.clearRXENABLE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TETH_EMAC1CFG1.setRXENABLE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TETH_EMAC1CFG1.getRXENABLE : TBits_1; inline;
- begin
- getRXENABLE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TETH_EMAC1CFG1.setPASSALL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TETH_EMAC1CFG1.clearPASSALL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TETH_EMAC1CFG1.setPASSALL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TETH_EMAC1CFG1.getPASSALL : TBits_1; inline;
- begin
- getPASSALL := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TETH_EMAC1CFG1.setRXPAUSE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TETH_EMAC1CFG1.clearRXPAUSE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TETH_EMAC1CFG1.setRXPAUSE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TETH_EMAC1CFG1.getRXPAUSE : TBits_1; inline;
- begin
- getRXPAUSE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TETH_EMAC1CFG1.setTXPAUSE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TETH_EMAC1CFG1.clearTXPAUSE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TETH_EMAC1CFG1.setTXPAUSE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TETH_EMAC1CFG1.getTXPAUSE : TBits_1; inline;
- begin
- getTXPAUSE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TETH_EMAC1CFG1.setLOOPBACK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TETH_EMAC1CFG1.clearLOOPBACK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TETH_EMAC1CFG1.setLOOPBACK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TETH_EMAC1CFG1.getLOOPBACK : TBits_1; inline;
- begin
- getLOOPBACK := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TETH_EMAC1CFG1.setRESETTFUN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TETH_EMAC1CFG1.clearRESETTFUN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TETH_EMAC1CFG1.setRESETTFUN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TETH_EMAC1CFG1.getRESETTFUN : TBits_1; inline;
- begin
- getRESETTFUN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TETH_EMAC1CFG1.setRESETTMCS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TETH_EMAC1CFG1.clearRESETTMCS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TETH_EMAC1CFG1.setRESETTMCS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TETH_EMAC1CFG1.getRESETTMCS : TBits_1; inline;
- begin
- getRESETTMCS := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TETH_EMAC1CFG1.setRESETRFUN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TETH_EMAC1CFG1.clearRESETRFUN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TETH_EMAC1CFG1.setRESETRFUN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TETH_EMAC1CFG1.getRESETRFUN : TBits_1; inline;
- begin
- getRESETRFUN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TETH_EMAC1CFG1.setRESETRMCS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TETH_EMAC1CFG1.clearRESETRMCS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TETH_EMAC1CFG1.setRESETRMCS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TETH_EMAC1CFG1.getRESETRMCS : TBits_1; inline;
- begin
- getRESETRMCS := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TETH_EMAC1CFG1.setSIMRESET; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TETH_EMAC1CFG1.clearSIMRESET; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TETH_EMAC1CFG1.setSIMRESET(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TETH_EMAC1CFG1.getSIMRESET : TBits_1; inline;
- begin
- getSIMRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TETH_EMAC1CFG1.setSOFTRESET; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TETH_EMAC1CFG1.clearSOFTRESET; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TETH_EMAC1CFG1.setSOFTRESET(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TETH_EMAC1CFG1.getSOFTRESET : TBits_1; inline;
- begin
- getSOFTRESET := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TETH_EMAC1CFG1.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMAC1CFG1.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMACxCFG1.setRXENABLE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TETH_EMACxCFG1.clearRXENABLE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TETH_EMACxCFG1.setRXENABLE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TETH_EMACxCFG1.getRXENABLE : TBits_1; inline;
- begin
- getRXENABLE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TETH_EMACxCFG1.setPASSALL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TETH_EMACxCFG1.clearPASSALL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TETH_EMACxCFG1.setPASSALL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TETH_EMACxCFG1.getPASSALL : TBits_1; inline;
- begin
- getPASSALL := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TETH_EMACxCFG1.setRXPAUSE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TETH_EMACxCFG1.clearRXPAUSE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TETH_EMACxCFG1.setRXPAUSE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TETH_EMACxCFG1.getRXPAUSE : TBits_1; inline;
- begin
- getRXPAUSE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TETH_EMACxCFG1.setTXPAUSE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TETH_EMACxCFG1.clearTXPAUSE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TETH_EMACxCFG1.setTXPAUSE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TETH_EMACxCFG1.getTXPAUSE : TBits_1; inline;
- begin
- getTXPAUSE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TETH_EMACxCFG1.setLOOPBACK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TETH_EMACxCFG1.clearLOOPBACK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TETH_EMACxCFG1.setLOOPBACK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TETH_EMACxCFG1.getLOOPBACK : TBits_1; inline;
- begin
- getLOOPBACK := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TETH_EMACxCFG1.setRESETTFUN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TETH_EMACxCFG1.clearRESETTFUN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TETH_EMACxCFG1.setRESETTFUN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TETH_EMACxCFG1.getRESETTFUN : TBits_1; inline;
- begin
- getRESETTFUN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TETH_EMACxCFG1.setRESETTMCS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TETH_EMACxCFG1.clearRESETTMCS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TETH_EMACxCFG1.setRESETTMCS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TETH_EMACxCFG1.getRESETTMCS : TBits_1; inline;
- begin
- getRESETTMCS := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TETH_EMACxCFG1.setRESETRFUN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TETH_EMACxCFG1.clearRESETRFUN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TETH_EMACxCFG1.setRESETRFUN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TETH_EMACxCFG1.getRESETRFUN : TBits_1; inline;
- begin
- getRESETRFUN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TETH_EMACxCFG1.setRESETRMCS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TETH_EMACxCFG1.clearRESETRMCS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TETH_EMACxCFG1.setRESETRMCS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TETH_EMACxCFG1.getRESETRMCS : TBits_1; inline;
- begin
- getRESETRMCS := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TETH_EMACxCFG1.setSIMRESET; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TETH_EMACxCFG1.clearSIMRESET; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TETH_EMACxCFG1.setSIMRESET(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TETH_EMACxCFG1.getSIMRESET : TBits_1; inline;
- begin
- getSIMRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TETH_EMACxCFG1.setSOFTRESET; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TETH_EMACxCFG1.clearSOFTRESET; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TETH_EMACxCFG1.setSOFTRESET(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TETH_EMACxCFG1.getSOFTRESET : TBits_1; inline;
- begin
- getSOFTRESET := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TETH_EMACxCFG1.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMACxCFG1.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMAC1CFG2.setFULLDPLX; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TETH_EMAC1CFG2.clearFULLDPLX; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TETH_EMAC1CFG2.setFULLDPLX(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TETH_EMAC1CFG2.getFULLDPLX : TBits_1; inline;
- begin
- getFULLDPLX := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TETH_EMAC1CFG2.setLENGTHCK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TETH_EMAC1CFG2.clearLENGTHCK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TETH_EMAC1CFG2.setLENGTHCK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TETH_EMAC1CFG2.getLENGTHCK : TBits_1; inline;
- begin
- getLENGTHCK := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TETH_EMAC1CFG2.setHUGEFRM; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TETH_EMAC1CFG2.clearHUGEFRM; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TETH_EMAC1CFG2.setHUGEFRM(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TETH_EMAC1CFG2.getHUGEFRM : TBits_1; inline;
- begin
- getHUGEFRM := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TETH_EMAC1CFG2.setDELAYCRC; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TETH_EMAC1CFG2.clearDELAYCRC; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TETH_EMAC1CFG2.setDELAYCRC(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TETH_EMAC1CFG2.getDELAYCRC : TBits_1; inline;
- begin
- getDELAYCRC := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TETH_EMAC1CFG2.setCRCENABLE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TETH_EMAC1CFG2.clearCRCENABLE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TETH_EMAC1CFG2.setCRCENABLE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TETH_EMAC1CFG2.getCRCENABLE : TBits_1; inline;
- begin
- getCRCENABLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TETH_EMAC1CFG2.setPADENABLE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TETH_EMAC1CFG2.clearPADENABLE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TETH_EMAC1CFG2.setPADENABLE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TETH_EMAC1CFG2.getPADENABLE : TBits_1; inline;
- begin
- getPADENABLE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TETH_EMAC1CFG2.setVLANPAD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TETH_EMAC1CFG2.clearVLANPAD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TETH_EMAC1CFG2.setVLANPAD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TETH_EMAC1CFG2.getVLANPAD : TBits_1; inline;
- begin
- getVLANPAD := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TETH_EMAC1CFG2.setAUTOPAD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TETH_EMAC1CFG2.clearAUTOPAD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TETH_EMAC1CFG2.setAUTOPAD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TETH_EMAC1CFG2.getAUTOPAD : TBits_1; inline;
- begin
- getAUTOPAD := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TETH_EMAC1CFG2.setPUREPRE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TETH_EMAC1CFG2.clearPUREPRE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TETH_EMAC1CFG2.setPUREPRE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TETH_EMAC1CFG2.getPUREPRE : TBits_1; inline;
- begin
- getPUREPRE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TETH_EMAC1CFG2.setLONGPRE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TETH_EMAC1CFG2.clearLONGPRE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TETH_EMAC1CFG2.setLONGPRE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TETH_EMAC1CFG2.getLONGPRE : TBits_1; inline;
- begin
- getLONGPRE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TETH_EMAC1CFG2.setNOBKOFF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TETH_EMAC1CFG2.clearNOBKOFF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TETH_EMAC1CFG2.setNOBKOFF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TETH_EMAC1CFG2.getNOBKOFF : TBits_1; inline;
- begin
- getNOBKOFF := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TETH_EMAC1CFG2.setBPNOBKOFF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TETH_EMAC1CFG2.clearBPNOBKOFF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TETH_EMAC1CFG2.setBPNOBKOFF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TETH_EMAC1CFG2.getBPNOBKOFF : TBits_1; inline;
- begin
- getBPNOBKOFF := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TETH_EMAC1CFG2.setEXCESSDFR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TETH_EMAC1CFG2.clearEXCESSDFR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TETH_EMAC1CFG2.setEXCESSDFR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TETH_EMAC1CFG2.getEXCESSDFR : TBits_1; inline;
- begin
- getEXCESSDFR := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TETH_EMAC1CFG2.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMAC1CFG2.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMACxCFG2.setFULLDPLX; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TETH_EMACxCFG2.clearFULLDPLX; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TETH_EMACxCFG2.setFULLDPLX(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TETH_EMACxCFG2.getFULLDPLX : TBits_1; inline;
- begin
- getFULLDPLX := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TETH_EMACxCFG2.setLENGTHCK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TETH_EMACxCFG2.clearLENGTHCK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TETH_EMACxCFG2.setLENGTHCK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TETH_EMACxCFG2.getLENGTHCK : TBits_1; inline;
- begin
- getLENGTHCK := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TETH_EMACxCFG2.setHUGEFRM; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TETH_EMACxCFG2.clearHUGEFRM; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TETH_EMACxCFG2.setHUGEFRM(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TETH_EMACxCFG2.getHUGEFRM : TBits_1; inline;
- begin
- getHUGEFRM := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TETH_EMACxCFG2.setDELAYCRC; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TETH_EMACxCFG2.clearDELAYCRC; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TETH_EMACxCFG2.setDELAYCRC(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TETH_EMACxCFG2.getDELAYCRC : TBits_1; inline;
- begin
- getDELAYCRC := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TETH_EMACxCFG2.setCRCENABLE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TETH_EMACxCFG2.clearCRCENABLE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TETH_EMACxCFG2.setCRCENABLE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TETH_EMACxCFG2.getCRCENABLE : TBits_1; inline;
- begin
- getCRCENABLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TETH_EMACxCFG2.setPADENABLE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TETH_EMACxCFG2.clearPADENABLE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TETH_EMACxCFG2.setPADENABLE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TETH_EMACxCFG2.getPADENABLE : TBits_1; inline;
- begin
- getPADENABLE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TETH_EMACxCFG2.setVLANPAD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TETH_EMACxCFG2.clearVLANPAD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TETH_EMACxCFG2.setVLANPAD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TETH_EMACxCFG2.getVLANPAD : TBits_1; inline;
- begin
- getVLANPAD := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TETH_EMACxCFG2.setAUTOPAD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TETH_EMACxCFG2.clearAUTOPAD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TETH_EMACxCFG2.setAUTOPAD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TETH_EMACxCFG2.getAUTOPAD : TBits_1; inline;
- begin
- getAUTOPAD := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TETH_EMACxCFG2.setPUREPRE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TETH_EMACxCFG2.clearPUREPRE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TETH_EMACxCFG2.setPUREPRE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TETH_EMACxCFG2.getPUREPRE : TBits_1; inline;
- begin
- getPUREPRE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TETH_EMACxCFG2.setLONGPRE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TETH_EMACxCFG2.clearLONGPRE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TETH_EMACxCFG2.setLONGPRE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TETH_EMACxCFG2.getLONGPRE : TBits_1; inline;
- begin
- getLONGPRE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TETH_EMACxCFG2.setNOBKOFF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TETH_EMACxCFG2.clearNOBKOFF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TETH_EMACxCFG2.setNOBKOFF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TETH_EMACxCFG2.getNOBKOFF : TBits_1; inline;
- begin
- getNOBKOFF := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TETH_EMACxCFG2.setBPNOBKOFF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TETH_EMACxCFG2.clearBPNOBKOFF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TETH_EMACxCFG2.setBPNOBKOFF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TETH_EMACxCFG2.getBPNOBKOFF : TBits_1; inline;
- begin
- getBPNOBKOFF := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TETH_EMACxCFG2.setEXCESSDFR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TETH_EMACxCFG2.clearEXCESSDFR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TETH_EMACxCFG2.setEXCESSDFR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TETH_EMACxCFG2.getEXCESSDFR : TBits_1; inline;
- begin
- getEXCESSDFR := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TETH_EMACxCFG2.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMACxCFG2.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMAC1IPGT.setB2BIPKTGP(thebits : TBits_7); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF80 or ( thebits shl 0 );
- end;
- function TETH_EMAC1IPGT.getB2BIPKTGP : TBits_7; inline;
- begin
- getB2BIPKTGP := (pTDefRegMap(@Self)^.val and $0000007F) shr 0;
- end;
- procedure TETH_EMAC1IPGT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMAC1IPGT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMACxIPGT.setB2BIPKTGP(thebits : TBits_7); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF80 or ( thebits shl 0 );
- end;
- function TETH_EMACxIPGT.getB2BIPKTGP : TBits_7; inline;
- begin
- getB2BIPKTGP := (pTDefRegMap(@Self)^.val and $0000007F) shr 0;
- end;
- procedure TETH_EMACxIPGT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMACxIPGT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMAC1IPGR.setNB2BIPKTGP2(thebits : TBits_7); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF80 or ( thebits shl 0 );
- end;
- function TETH_EMAC1IPGR.getNB2BIPKTGP2 : TBits_7; inline;
- begin
- getNB2BIPKTGP2 := (pTDefRegMap(@Self)^.val and $0000007F) shr 0;
- end;
- procedure TETH_EMAC1IPGR.setNB2BIPKTGP1(thebits : TBits_7); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF80FF or ( thebits shl 8 );
- end;
- function TETH_EMAC1IPGR.getNB2BIPKTGP1 : TBits_7; inline;
- begin
- getNB2BIPKTGP1 := (pTDefRegMap(@Self)^.val and $00007F00) shr 8;
- end;
- procedure TETH_EMAC1IPGR.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMAC1IPGR.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMACxIPGR.setNB2BIPKTGP2(thebits : TBits_7); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF80 or ( thebits shl 0 );
- end;
- function TETH_EMACxIPGR.getNB2BIPKTGP2 : TBits_7; inline;
- begin
- getNB2BIPKTGP2 := (pTDefRegMap(@Self)^.val and $0000007F) shr 0;
- end;
- procedure TETH_EMACxIPGR.setNB2BIPKTGP1(thebits : TBits_7); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF80FF or ( thebits shl 8 );
- end;
- function TETH_EMACxIPGR.getNB2BIPKTGP1 : TBits_7; inline;
- begin
- getNB2BIPKTGP1 := (pTDefRegMap(@Self)^.val and $00007F00) shr 8;
- end;
- procedure TETH_EMACxIPGR.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMACxIPGR.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMAC1CLRT.setRETX(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
- end;
- function TETH_EMAC1CLRT.getRETX : TBits_4; inline;
- begin
- getRETX := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
- end;
- procedure TETH_EMAC1CLRT.setCWINDOW(thebits : TBits_6); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFC0FF or ( thebits shl 8 );
- end;
- function TETH_EMAC1CLRT.getCWINDOW : TBits_6; inline;
- begin
- getCWINDOW := (pTDefRegMap(@Self)^.val and $00003F00) shr 8;
- end;
- procedure TETH_EMAC1CLRT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMAC1CLRT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMACxCLRT.setRETX(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
- end;
- function TETH_EMACxCLRT.getRETX : TBits_4; inline;
- begin
- getRETX := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
- end;
- procedure TETH_EMACxCLRT.setCWINDOW(thebits : TBits_6); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFC0FF or ( thebits shl 8 );
- end;
- function TETH_EMACxCLRT.getCWINDOW : TBits_6; inline;
- begin
- getCWINDOW := (pTDefRegMap(@Self)^.val and $00003F00) shr 8;
- end;
- procedure TETH_EMACxCLRT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMACxCLRT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMAC1MAXF.setMACMAXF(thebits : TBits_16); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
- end;
- function TETH_EMAC1MAXF.getMACMAXF : TBits_16; inline;
- begin
- getMACMAXF := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
- end;
- procedure TETH_EMAC1MAXF.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMAC1MAXF.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMACxMAXF.setMACMAXF(thebits : TBits_16); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
- end;
- function TETH_EMACxMAXF.getMACMAXF : TBits_16; inline;
- begin
- getMACMAXF := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
- end;
- procedure TETH_EMACxMAXF.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMACxMAXF.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMAC1SUPP.setSPEEDRMII; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TETH_EMAC1SUPP.clearSPEEDRMII; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TETH_EMAC1SUPP.setSPEEDRMII(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TETH_EMAC1SUPP.getSPEEDRMII : TBits_1; inline;
- begin
- getSPEEDRMII := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TETH_EMAC1SUPP.setRESETRMII; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TETH_EMAC1SUPP.clearRESETRMII; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TETH_EMAC1SUPP.setRESETRMII(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TETH_EMAC1SUPP.getRESETRMII : TBits_1; inline;
- begin
- getRESETRMII := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TETH_EMAC1SUPP.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMAC1SUPP.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMACxSUPP.setSPEEDRMII; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TETH_EMACxSUPP.clearSPEEDRMII; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TETH_EMACxSUPP.setSPEEDRMII(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TETH_EMACxSUPP.getSPEEDRMII : TBits_1; inline;
- begin
- getSPEEDRMII := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TETH_EMACxSUPP.setRESETRMII; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TETH_EMACxSUPP.clearRESETRMII; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TETH_EMACxSUPP.setRESETRMII(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TETH_EMACxSUPP.getRESETRMII : TBits_1; inline;
- begin
- getRESETRMII := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TETH_EMACxSUPP.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMACxSUPP.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMAC1TEST.setSHRTQNTA; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TETH_EMAC1TEST.clearSHRTQNTA; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TETH_EMAC1TEST.setSHRTQNTA(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TETH_EMAC1TEST.getSHRTQNTA : TBits_1; inline;
- begin
- getSHRTQNTA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TETH_EMAC1TEST.setTESTPAUSE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TETH_EMAC1TEST.clearTESTPAUSE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TETH_EMAC1TEST.setTESTPAUSE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TETH_EMAC1TEST.getTESTPAUSE : TBits_1; inline;
- begin
- getTESTPAUSE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TETH_EMAC1TEST.setTESTBP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TETH_EMAC1TEST.clearTESTBP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TETH_EMAC1TEST.setTESTBP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TETH_EMAC1TEST.getTESTBP : TBits_1; inline;
- begin
- getTESTBP := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TETH_EMAC1TEST.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMAC1TEST.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMACxTEST.setSHRTQNTA; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TETH_EMACxTEST.clearSHRTQNTA; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TETH_EMACxTEST.setSHRTQNTA(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TETH_EMACxTEST.getSHRTQNTA : TBits_1; inline;
- begin
- getSHRTQNTA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TETH_EMACxTEST.setTESTPAUSE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TETH_EMACxTEST.clearTESTPAUSE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TETH_EMACxTEST.setTESTPAUSE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TETH_EMACxTEST.getTESTPAUSE : TBits_1; inline;
- begin
- getTESTPAUSE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TETH_EMACxTEST.setTESTBP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TETH_EMACxTEST.clearTESTBP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TETH_EMACxTEST.setTESTBP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TETH_EMACxTEST.getTESTBP : TBits_1; inline;
- begin
- getTESTBP := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TETH_EMACxTEST.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMACxTEST.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMAC1MCFG.setSCANINC; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TETH_EMAC1MCFG.clearSCANINC; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TETH_EMAC1MCFG.setSCANINC(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TETH_EMAC1MCFG.getSCANINC : TBits_1; inline;
- begin
- getSCANINC := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TETH_EMAC1MCFG.setNOPRE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TETH_EMAC1MCFG.clearNOPRE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TETH_EMAC1MCFG.setNOPRE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TETH_EMAC1MCFG.getNOPRE : TBits_1; inline;
- begin
- getNOPRE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TETH_EMAC1MCFG.setCLKSEL(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC3 or ( thebits shl 2 );
- end;
- function TETH_EMAC1MCFG.getCLKSEL : TBits_4; inline;
- begin
- getCLKSEL := (pTDefRegMap(@Self)^.val and $0000003C) shr 2;
- end;
- procedure TETH_EMAC1MCFG.setRESETMGMT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TETH_EMAC1MCFG.clearRESETMGMT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TETH_EMAC1MCFG.setRESETMGMT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TETH_EMAC1MCFG.getRESETMGMT : TBits_1; inline;
- begin
- getRESETMGMT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TETH_EMAC1MCFG.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMAC1MCFG.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMACxMCFG.setSCANINC; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TETH_EMACxMCFG.clearSCANINC; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TETH_EMACxMCFG.setSCANINC(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TETH_EMACxMCFG.getSCANINC : TBits_1; inline;
- begin
- getSCANINC := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TETH_EMACxMCFG.setNOPRE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TETH_EMACxMCFG.clearNOPRE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TETH_EMACxMCFG.setNOPRE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TETH_EMACxMCFG.getNOPRE : TBits_1; inline;
- begin
- getNOPRE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TETH_EMACxMCFG.setCLKSEL(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC3 or ( thebits shl 2 );
- end;
- function TETH_EMACxMCFG.getCLKSEL : TBits_4; inline;
- begin
- getCLKSEL := (pTDefRegMap(@Self)^.val and $0000003C) shr 2;
- end;
- procedure TETH_EMACxMCFG.setRESETMGMT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TETH_EMACxMCFG.clearRESETMGMT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TETH_EMACxMCFG.setRESETMGMT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TETH_EMACxMCFG.getRESETMGMT : TBits_1; inline;
- begin
- getRESETMGMT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TETH_EMACxMCFG.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMACxMCFG.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMAC1MCMD.setREAD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TETH_EMAC1MCMD.clearREAD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TETH_EMAC1MCMD.setREAD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TETH_EMAC1MCMD.getREAD : TBits_1; inline;
- begin
- getREAD := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TETH_EMAC1MCMD.setSCAN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TETH_EMAC1MCMD.clearSCAN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TETH_EMAC1MCMD.setSCAN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TETH_EMAC1MCMD.getSCAN : TBits_1; inline;
- begin
- getSCAN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TETH_EMAC1MCMD.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMAC1MCMD.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMACxMCMD.setREAD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TETH_EMACxMCMD.clearREAD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TETH_EMACxMCMD.setREAD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TETH_EMACxMCMD.getREAD : TBits_1; inline;
- begin
- getREAD := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TETH_EMACxMCMD.setSCAN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TETH_EMACxMCMD.clearSCAN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TETH_EMACxMCMD.setSCAN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TETH_EMACxMCMD.getSCAN : TBits_1; inline;
- begin
- getSCAN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TETH_EMACxMCMD.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMACxMCMD.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMAC1MADR.setREGADDR(thebits : TBits_5); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
- end;
- function TETH_EMAC1MADR.getREGADDR : TBits_5; inline;
- begin
- getREGADDR := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
- end;
- procedure TETH_EMAC1MADR.setPHYADDR(thebits : TBits_5); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
- end;
- function TETH_EMAC1MADR.getPHYADDR : TBits_5; inline;
- begin
- getPHYADDR := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
- end;
- procedure TETH_EMAC1MADR.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMAC1MADR.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMACxMADR.setREGADDR(thebits : TBits_5); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
- end;
- function TETH_EMACxMADR.getREGADDR : TBits_5; inline;
- begin
- getREGADDR := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
- end;
- procedure TETH_EMACxMADR.setPHYADDR(thebits : TBits_5); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
- end;
- function TETH_EMACxMADR.getPHYADDR : TBits_5; inline;
- begin
- getPHYADDR := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
- end;
- procedure TETH_EMACxMADR.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMACxMADR.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMAC1MWTD.setMWTD(thebits : TBits_16); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
- end;
- function TETH_EMAC1MWTD.getMWTD : TBits_16; inline;
- begin
- getMWTD := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
- end;
- procedure TETH_EMAC1MWTD.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMAC1MWTD.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMACxMWTD.setMWTD(thebits : TBits_16); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
- end;
- function TETH_EMACxMWTD.getMWTD : TBits_16; inline;
- begin
- getMWTD := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
- end;
- procedure TETH_EMACxMWTD.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMACxMWTD.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMAC1MRDD.setMRDD(thebits : TBits_16); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
- end;
- function TETH_EMAC1MRDD.getMRDD : TBits_16; inline;
- begin
- getMRDD := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
- end;
- procedure TETH_EMAC1MRDD.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMAC1MRDD.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMACxMRDD.setMRDD(thebits : TBits_16); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
- end;
- function TETH_EMACxMRDD.getMRDD : TBits_16; inline;
- begin
- getMRDD := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
- end;
- procedure TETH_EMACxMRDD.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMACxMRDD.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMAC1MIND.setMIIMBUSY; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TETH_EMAC1MIND.clearMIIMBUSY; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TETH_EMAC1MIND.setMIIMBUSY(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TETH_EMAC1MIND.getMIIMBUSY : TBits_1; inline;
- begin
- getMIIMBUSY := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TETH_EMAC1MIND.setSCAN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TETH_EMAC1MIND.clearSCAN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TETH_EMAC1MIND.setSCAN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TETH_EMAC1MIND.getSCAN : TBits_1; inline;
- begin
- getSCAN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TETH_EMAC1MIND.setNOTVALID; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TETH_EMAC1MIND.clearNOTVALID; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TETH_EMAC1MIND.setNOTVALID(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TETH_EMAC1MIND.getNOTVALID : TBits_1; inline;
- begin
- getNOTVALID := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TETH_EMAC1MIND.setLINKFAIL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TETH_EMAC1MIND.clearLINKFAIL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TETH_EMAC1MIND.setLINKFAIL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TETH_EMAC1MIND.getLINKFAIL : TBits_1; inline;
- begin
- getLINKFAIL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TETH_EMAC1MIND.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMAC1MIND.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMACxMIND.setMIIMBUSY; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TETH_EMACxMIND.clearMIIMBUSY; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TETH_EMACxMIND.setMIIMBUSY(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TETH_EMACxMIND.getMIIMBUSY : TBits_1; inline;
- begin
- getMIIMBUSY := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TETH_EMACxMIND.setSCAN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TETH_EMACxMIND.clearSCAN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TETH_EMACxMIND.setSCAN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TETH_EMACxMIND.getSCAN : TBits_1; inline;
- begin
- getSCAN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TETH_EMACxMIND.setNOTVALID; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TETH_EMACxMIND.clearNOTVALID; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TETH_EMACxMIND.setNOTVALID(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TETH_EMACxMIND.getNOTVALID : TBits_1; inline;
- begin
- getNOTVALID := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TETH_EMACxMIND.setLINKFAIL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TETH_EMACxMIND.clearLINKFAIL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TETH_EMACxMIND.setLINKFAIL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TETH_EMACxMIND.getLINKFAIL : TBits_1; inline;
- begin
- getLINKFAIL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TETH_EMACxMIND.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMACxMIND.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMAC1SA0.setSTNADDR5(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
- end;
- function TETH_EMAC1SA0.getSTNADDR5 : TBits_8; inline;
- begin
- getSTNADDR5 := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
- end;
- procedure TETH_EMAC1SA0.setSTNADDR6(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
- end;
- function TETH_EMAC1SA0.getSTNADDR6 : TBits_8; inline;
- begin
- getSTNADDR6 := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
- end;
- procedure TETH_EMAC1SA0.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMAC1SA0.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMACxSA0.setSTNADDR5(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
- end;
- function TETH_EMACxSA0.getSTNADDR5 : TBits_8; inline;
- begin
- getSTNADDR5 := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
- end;
- procedure TETH_EMACxSA0.setSTNADDR6(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
- end;
- function TETH_EMACxSA0.getSTNADDR6 : TBits_8; inline;
- begin
- getSTNADDR6 := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
- end;
- procedure TETH_EMACxSA0.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMACxSA0.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMAC1SA1.setSTNADDR3(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
- end;
- function TETH_EMAC1SA1.getSTNADDR3 : TBits_8; inline;
- begin
- getSTNADDR3 := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
- end;
- procedure TETH_EMAC1SA1.setSTNADDR4(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
- end;
- function TETH_EMAC1SA1.getSTNADDR4 : TBits_8; inline;
- begin
- getSTNADDR4 := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
- end;
- procedure TETH_EMAC1SA1.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMAC1SA1.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMACxSA1.setSTNADDR3(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
- end;
- function TETH_EMACxSA1.getSTNADDR3 : TBits_8; inline;
- begin
- getSTNADDR3 := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
- end;
- procedure TETH_EMACxSA1.setSTNADDR4(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
- end;
- function TETH_EMACxSA1.getSTNADDR4 : TBits_8; inline;
- begin
- getSTNADDR4 := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
- end;
- procedure TETH_EMACxSA1.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMACxSA1.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMAC1SA2.setSTNADDR1(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
- end;
- function TETH_EMAC1SA2.getSTNADDR1 : TBits_8; inline;
- begin
- getSTNADDR1 := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
- end;
- procedure TETH_EMAC1SA2.setSTNADDR2(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
- end;
- function TETH_EMAC1SA2.getSTNADDR2 : TBits_8; inline;
- begin
- getSTNADDR2 := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
- end;
- procedure TETH_EMAC1SA2.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMAC1SA2.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TETH_EMACxSA2.setSTNADDR1(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
- end;
- function TETH_EMACxSA2.getSTNADDR1 : TBits_8; inline;
- begin
- getSTNADDR1 := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
- end;
- procedure TETH_EMACxSA2.setSTNADDR2(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
- end;
- function TETH_EMACxSA2.getSTNADDR2 : TBits_8; inline;
- begin
- getSTNADDR2 := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
- end;
- procedure TETH_EMACxSA2.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TETH_EMACxSA2.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TDEVCFG_DEVCFG3.setUSERID(thebits : TBits_16); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
- end;
- function TDEVCFG_DEVCFG3.getUSERID : TBits_16; inline;
- begin
- getUSERID := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
- end;
- procedure TDEVCFG_DEVCFG3.setFSRSSEL(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF8FFFF or ( thebits shl 16 );
- end;
- function TDEVCFG_DEVCFG3.getFSRSSEL : TBits_3; inline;
- begin
- getFSRSSEL := (pTDefRegMap(@Self)^.val and $00070000) shr 16;
- end;
- procedure TDEVCFG_DEVCFG3.setFMIIEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- procedure TDEVCFG_DEVCFG3.clearFMIIEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $01000000;
- end;
- procedure TDEVCFG_DEVCFG3.setFMIIEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $01000000
- else
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- function TDEVCFG_DEVCFG3.getFMIIEN : TBits_1; inline;
- begin
- getFMIIEN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
- end;
- procedure TDEVCFG_DEVCFG3.setFETHIO; inline;
- begin
- pTDefRegMap(@Self)^.&set := $02000000;
- end;
- procedure TDEVCFG_DEVCFG3.clearFETHIO; inline;
- begin
- pTDefRegMap(@Self)^.clr := $02000000;
- end;
- procedure TDEVCFG_DEVCFG3.setFETHIO(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $02000000
- else
- pTDefRegMap(@Self)^.&set := $02000000;
- end;
- function TDEVCFG_DEVCFG3.getFETHIO : TBits_1; inline;
- begin
- getFETHIO := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
- end;
- procedure TDEVCFG_DEVCFG3.setFUSBIDIO; inline;
- begin
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- procedure TDEVCFG_DEVCFG3.clearFUSBIDIO; inline;
- begin
- pTDefRegMap(@Self)^.clr := $40000000;
- end;
- procedure TDEVCFG_DEVCFG3.setFUSBIDIO(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $40000000
- else
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- function TDEVCFG_DEVCFG3.getFUSBIDIO : TBits_1; inline;
- begin
- getFUSBIDIO := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
- end;
- procedure TDEVCFG_DEVCFG3.setFVBUSONIO; inline;
- begin
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- procedure TDEVCFG_DEVCFG3.clearFVBUSONIO; inline;
- begin
- pTDefRegMap(@Self)^.clr := $80000000;
- end;
- procedure TDEVCFG_DEVCFG3.setFVBUSONIO(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $80000000
- else
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- function TDEVCFG_DEVCFG3.getFVBUSONIO : TBits_1; inline;
- begin
- getFVBUSONIO := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
- end;
- procedure TDEVCFG_DEVCFG3.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TDEVCFG_DEVCFG3.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TDEVCFG_DEVCFG2.setFPLLIDIV(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
- end;
- function TDEVCFG_DEVCFG2.getFPLLIDIV : TBits_3; inline;
- begin
- getFPLLIDIV := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
- end;
- procedure TDEVCFG_DEVCFG2.setFPLLMUL(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF8F or ( thebits shl 4 );
- end;
- function TDEVCFG_DEVCFG2.getFPLLMUL : TBits_3; inline;
- begin
- getFPLLMUL := (pTDefRegMap(@Self)^.val and $00000070) shr 4;
- end;
- procedure TDEVCFG_DEVCFG2.setUPLLIDIV(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF8FF or ( thebits shl 8 );
- end;
- function TDEVCFG_DEVCFG2.getUPLLIDIV : TBits_3; inline;
- begin
- getUPLLIDIV := (pTDefRegMap(@Self)^.val and $00000700) shr 8;
- end;
- procedure TDEVCFG_DEVCFG2.setUPLLEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TDEVCFG_DEVCFG2.clearUPLLEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TDEVCFG_DEVCFG2.setUPLLEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TDEVCFG_DEVCFG2.getUPLLEN : TBits_1; inline;
- begin
- getUPLLEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TDEVCFG_DEVCFG2.setFPLLODIV(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF8FFFF or ( thebits shl 16 );
- end;
- function TDEVCFG_DEVCFG2.getFPLLODIV : TBits_3; inline;
- begin
- getFPLLODIV := (pTDefRegMap(@Self)^.val and $00070000) shr 16;
- end;
- procedure TDEVCFG_DEVCFG2.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TDEVCFG_DEVCFG2.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TDEVCFG_DEVCFG1.setFNOSC(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
- end;
- function TDEVCFG_DEVCFG1.getFNOSC : TBits_3; inline;
- begin
- getFNOSC := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
- end;
- procedure TDEVCFG_DEVCFG1.setFSOSCEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TDEVCFG_DEVCFG1.clearFSOSCEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TDEVCFG_DEVCFG1.setFSOSCEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TDEVCFG_DEVCFG1.getFSOSCEN : TBits_1; inline;
- begin
- getFSOSCEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TDEVCFG_DEVCFG1.setIESO; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TDEVCFG_DEVCFG1.clearIESO; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TDEVCFG_DEVCFG1.setIESO(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TDEVCFG_DEVCFG1.getIESO : TBits_1; inline;
- begin
- getIESO := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TDEVCFG_DEVCFG1.setPOSCMOD(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
- end;
- function TDEVCFG_DEVCFG1.getPOSCMOD : TBits_2; inline;
- begin
- getPOSCMOD := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
- end;
- procedure TDEVCFG_DEVCFG1.setOSCIOFNC; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TDEVCFG_DEVCFG1.clearOSCIOFNC; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TDEVCFG_DEVCFG1.setOSCIOFNC(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TDEVCFG_DEVCFG1.getOSCIOFNC : TBits_1; inline;
- begin
- getOSCIOFNC := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TDEVCFG_DEVCFG1.setFPBDIV(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFCFFF or ( thebits shl 12 );
- end;
- function TDEVCFG_DEVCFG1.getFPBDIV : TBits_2; inline;
- begin
- getFPBDIV := (pTDefRegMap(@Self)^.val and $00003000) shr 12;
- end;
- procedure TDEVCFG_DEVCFG1.setFCKSM(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TDEVCFG_DEVCFG1.getFCKSM : TBits_2; inline;
- begin
- getFCKSM := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TDEVCFG_DEVCFG1.setWDTPS(thebits : TBits_5); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
- end;
- function TDEVCFG_DEVCFG1.getWDTPS : TBits_5; inline;
- begin
- getWDTPS := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
- end;
- procedure TDEVCFG_DEVCFG1.setFWDTEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- procedure TDEVCFG_DEVCFG1.clearFWDTEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00800000;
- end;
- procedure TDEVCFG_DEVCFG1.setFWDTEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00800000
- else
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- function TDEVCFG_DEVCFG1.getFWDTEN : TBits_1; inline;
- begin
- getFWDTEN := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
- end;
- procedure TDEVCFG_DEVCFG1.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TDEVCFG_DEVCFG1.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TDEVCFG_DEVCFG0.setDEBUG(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TDEVCFG_DEVCFG0.getDEBUG : TBits_2; inline;
- begin
- getDEBUG := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TDEVCFG_DEVCFG0.setICESEL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TDEVCFG_DEVCFG0.clearICESEL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TDEVCFG_DEVCFG0.setICESEL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TDEVCFG_DEVCFG0.getICESEL : TBits_1; inline;
- begin
- getICESEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TDEVCFG_DEVCFG0.setPWP(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF00FFF or ( thebits shl 12 );
- end;
- function TDEVCFG_DEVCFG0.getPWP : TBits_8; inline;
- begin
- getPWP := (pTDefRegMap(@Self)^.val and $000FF000) shr 12;
- end;
- procedure TDEVCFG_DEVCFG0.setBWP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- procedure TDEVCFG_DEVCFG0.clearBWP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $01000000;
- end;
- procedure TDEVCFG_DEVCFG0.setBWP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $01000000
- else
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- function TDEVCFG_DEVCFG0.getBWP : TBits_1; inline;
- begin
- getBWP := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
- end;
- procedure TDEVCFG_DEVCFG0.setCP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- procedure TDEVCFG_DEVCFG0.clearCP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $10000000;
- end;
- procedure TDEVCFG_DEVCFG0.setCP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $10000000
- else
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- function TDEVCFG_DEVCFG0.getCP : TBits_1; inline;
- begin
- getCP := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
- end;
- procedure TDEVCFG_DEVCFG0.setFDEBUG(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TDEVCFG_DEVCFG0.getFDEBUG : TBits_2; inline;
- begin
- getFDEBUG := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TDEVCFG_DEVCFG0.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TDEVCFG_DEVCFG0.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure _CORE_TIMER_VECTOR_interrupt; external name '_CORE_TIMER_VECTOR_interrupt';
- procedure _CORE_SOFTWARE_0_VECTOR_interrupt; external name '_CORE_SOFTWARE_0_VECTOR_interrupt';
- procedure _CORE_SOFTWARE_1_VECTOR_interrupt; external name '_CORE_SOFTWARE_1_VECTOR_interrupt';
- procedure _EXTERNAL_0_VECTOR_interrupt; external name '_EXTERNAL_0_VECTOR_interrupt';
- procedure _TIMER_1_VECTOR_interrupt; external name '_TIMER_1_VECTOR_interrupt';
- procedure _INPUT_CAPTURE_1_VECTOR_interrupt; external name '_INPUT_CAPTURE_1_VECTOR_interrupt';
- procedure _OUTPUT_COMPARE_1_VECTOR_interrupt; external name '_OUTPUT_COMPARE_1_VECTOR_interrupt';
- procedure _EXTERNAL_1_VECTOR_interrupt; external name '_EXTERNAL_1_VECTOR_interrupt';
- procedure _TIMER_2_VECTOR_interrupt; external name '_TIMER_2_VECTOR_interrupt';
- procedure _INPUT_CAPTURE_2_VECTOR_interrupt; external name '_INPUT_CAPTURE_2_VECTOR_interrupt';
- procedure _OUTPUT_COMPARE_2_VECTOR_interrupt; external name '_OUTPUT_COMPARE_2_VECTOR_interrupt';
- procedure _EXTERNAL_2_VECTOR_interrupt; external name '_EXTERNAL_2_VECTOR_interrupt';
- procedure _TIMER_3_VECTOR_interrupt; external name '_TIMER_3_VECTOR_interrupt';
- procedure _INPUT_CAPTURE_3_VECTOR_interrupt; external name '_INPUT_CAPTURE_3_VECTOR_interrupt';
- procedure _OUTPUT_COMPARE_3_VECTOR_interrupt; external name '_OUTPUT_COMPARE_3_VECTOR_interrupt';
- procedure _EXTERNAL_3_VECTOR_interrupt; external name '_EXTERNAL_3_VECTOR_interrupt';
- procedure _TIMER_4_VECTOR_interrupt; external name '_TIMER_4_VECTOR_interrupt';
- procedure _INPUT_CAPTURE_4_VECTOR_interrupt; external name '_INPUT_CAPTURE_4_VECTOR_interrupt';
- procedure _OUTPUT_COMPARE_4_VECTOR_interrupt; external name '_OUTPUT_COMPARE_4_VECTOR_interrupt';
- procedure _EXTERNAL_4_VECTOR_interrupt; external name '_EXTERNAL_4_VECTOR_interrupt';
- procedure _TIMER_5_VECTOR_interrupt; external name '_TIMER_5_VECTOR_interrupt';
- procedure _INPUT_CAPTURE_5_VECTOR_interrupt; external name '_INPUT_CAPTURE_5_VECTOR_interrupt';
- procedure _OUTPUT_COMPARE_5_VECTOR_interrupt; external name '_OUTPUT_COMPARE_5_VECTOR_interrupt';
- procedure _SPI_1_VECTOR_interrupt; external name '_SPI_1_VECTOR_interrupt';
- procedure _SPI_1A_VECTOR_interrupt; external name '_SPI_1A_VECTOR_interrupt';
- procedure _UART_1_VECTOR_interrupt; external name '_UART_1_VECTOR_interrupt';
- procedure _UART_1A_VECTOR_interrupt; external name '_UART_1A_VECTOR_interrupt';
- procedure _I2C_3_VECTOR_interrupt; external name '_I2C_3_VECTOR_interrupt';
- procedure _I2C_1A_VECTOR_interrupt; external name '_I2C_1A_VECTOR_interrupt';
- procedure _SPI_3_VECTOR_interrupt; external name '_SPI_3_VECTOR_interrupt';
- procedure _I2C_1_VECTOR_interrupt; external name '_I2C_1_VECTOR_interrupt';
- procedure _CHANGE_NOTICE_VECTOR_interrupt; external name '_CHANGE_NOTICE_VECTOR_interrupt';
- procedure _ADC_VECTOR_interrupt; external name '_ADC_VECTOR_interrupt';
- procedure _PMP_VECTOR_interrupt; external name '_PMP_VECTOR_interrupt';
- procedure _COMPARATOR_1_VECTOR_interrupt; external name '_COMPARATOR_1_VECTOR_interrupt';
- procedure _COMPARATOR_2_VECTOR_interrupt; external name '_COMPARATOR_2_VECTOR_interrupt';
- procedure _SPI_2A_VECTOR_interrupt; external name '_SPI_2A_VECTOR_interrupt';
- procedure _UART_3_VECTOR_interrupt; external name '_UART_3_VECTOR_interrupt';
- procedure _UART_2A_VECTOR_interrupt; external name '_UART_2A_VECTOR_interrupt';
- procedure _I2C_4_VECTOR_interrupt; external name '_I2C_4_VECTOR_interrupt';
- procedure _I2C_2A_VECTOR_interrupt; external name '_I2C_2A_VECTOR_interrupt';
- procedure _SPI_2_VECTOR_interrupt; external name '_SPI_2_VECTOR_interrupt';
- procedure _SPI_3A_VECTOR_interrupt; external name '_SPI_3A_VECTOR_interrupt';
- procedure _UART_2_VECTOR_interrupt; external name '_UART_2_VECTOR_interrupt';
- procedure _UART_3A_VECTOR_interrupt; external name '_UART_3A_VECTOR_interrupt';
- procedure _I2C_5_VECTOR_interrupt; external name '_I2C_5_VECTOR_interrupt';
- procedure _I2C_3A_VECTOR_interrupt; external name '_I2C_3A_VECTOR_interrupt';
- procedure _SPI_4_VECTOR_interrupt; external name '_SPI_4_VECTOR_interrupt';
- procedure _I2C_2_VECTOR_interrupt; external name '_I2C_2_VECTOR_interrupt';
- procedure _FAIL_SAFE_MONITOR_VECTOR_interrupt; external name '_FAIL_SAFE_MONITOR_VECTOR_interrupt';
- procedure _RTCC_VECTOR_interrupt; external name '_RTCC_VECTOR_interrupt';
- procedure _DMA_0_VECTOR_interrupt; external name '_DMA_0_VECTOR_interrupt';
- procedure _DMA_1_VECTOR_interrupt; external name '_DMA_1_VECTOR_interrupt';
- procedure _DMA_2_VECTOR_interrupt; external name '_DMA_2_VECTOR_interrupt';
- procedure _DMA_3_VECTOR_interrupt; external name '_DMA_3_VECTOR_interrupt';
- procedure _DMA_4_VECTOR_interrupt; external name '_DMA_4_VECTOR_interrupt';
- procedure _DMA_5_VECTOR_interrupt; external name '_DMA_5_VECTOR_interrupt';
- procedure _DMA_6_VECTOR_interrupt; external name '_DMA_6_VECTOR_interrupt';
- procedure _DMA_7_VECTOR_interrupt; external name '_DMA_7_VECTOR_interrupt';
- procedure _FCE_VECTOR_interrupt; external name '_FCE_VECTOR_interrupt';
- procedure _USB_1_VECTOR_interrupt; external name '_USB_1_VECTOR_interrupt';
- procedure _ETH_VECTOR_interrupt; external name '_ETH_VECTOR_interrupt';
- procedure _UART_1B_VECTOR_interrupt; external name '_UART_1B_VECTOR_interrupt';
- procedure _UART_4_VECTOR_interrupt; external name '_UART_4_VECTOR_interrupt';
- procedure _UART_2B_VECTOR_interrupt; external name '_UART_2B_VECTOR_interrupt';
- procedure _UART_6_VECTOR_interrupt; external name '_UART_6_VECTOR_interrupt';
- procedure _UART_3B_VECTOR_interrupt; external name '_UART_3B_VECTOR_interrupt';
- procedure _UART_5_VECTOR_interrupt; external name '_UART_5_VECTOR_interrupt';
- procedure Vectors; assembler; nostackframe;
- label interrupt_vectors;
- asm
- .section ".init.interrupt_vectors,\"ax\",@progbits"
- interrupt_vectors:
- j _CORE_TIMER_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _CORE_SOFTWARE_0_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _CORE_SOFTWARE_1_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _EXTERNAL_0_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _TIMER_1_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _INPUT_CAPTURE_1_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _OUTPUT_COMPARE_1_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _EXTERNAL_1_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _TIMER_2_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _INPUT_CAPTURE_2_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _OUTPUT_COMPARE_2_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _EXTERNAL_2_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _TIMER_3_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _INPUT_CAPTURE_3_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _OUTPUT_COMPARE_3_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _EXTERNAL_3_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _TIMER_4_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _INPUT_CAPTURE_4_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _OUTPUT_COMPARE_4_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _EXTERNAL_4_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _TIMER_5_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _INPUT_CAPTURE_5_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _OUTPUT_COMPARE_5_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _SPI_1_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _SPI_1A_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _I2C_1_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _CHANGE_NOTICE_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _ADC_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _PMP_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _COMPARATOR_1_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _COMPARATOR_2_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _SPI_2A_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _SPI_3A_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _I2C_2_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _FAIL_SAFE_MONITOR_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _RTCC_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _DMA_0_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _DMA_1_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _DMA_2_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _DMA_3_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _DMA_4_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _DMA_5_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _DMA_6_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _DMA_7_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _FCE_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _USB_1_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _ETH_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _UART_1B_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _UART_2B_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _UART_3B_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- .weak _CORE_TIMER_VECTOR_interrupt
- .weak _CORE_SOFTWARE_0_VECTOR_interrupt
- .weak _CORE_SOFTWARE_1_VECTOR_interrupt
- .weak _EXTERNAL_0_VECTOR_interrupt
- .weak _TIMER_1_VECTOR_interrupt
- .weak _INPUT_CAPTURE_1_VECTOR_interrupt
- .weak _OUTPUT_COMPARE_1_VECTOR_interrupt
- .weak _EXTERNAL_1_VECTOR_interrupt
- .weak _TIMER_2_VECTOR_interrupt
- .weak _INPUT_CAPTURE_2_VECTOR_interrupt
- .weak _OUTPUT_COMPARE_2_VECTOR_interrupt
- .weak _EXTERNAL_2_VECTOR_interrupt
- .weak _TIMER_3_VECTOR_interrupt
- .weak _INPUT_CAPTURE_3_VECTOR_interrupt
- .weak _OUTPUT_COMPARE_3_VECTOR_interrupt
- .weak _EXTERNAL_3_VECTOR_interrupt
- .weak _TIMER_4_VECTOR_interrupt
- .weak _INPUT_CAPTURE_4_VECTOR_interrupt
- .weak _OUTPUT_COMPARE_4_VECTOR_interrupt
- .weak _EXTERNAL_4_VECTOR_interrupt
- .weak _TIMER_5_VECTOR_interrupt
- .weak _INPUT_CAPTURE_5_VECTOR_interrupt
- .weak _OUTPUT_COMPARE_5_VECTOR_interrupt
- .weak _SPI_1_VECTOR_interrupt
- .weak _SPI_1A_VECTOR_interrupt
- .weak _UART_1_VECTOR_interrupt
- .weak _UART_1A_VECTOR_interrupt
- .weak _I2C_3_VECTOR_interrupt
- .weak _I2C_1A_VECTOR_interrupt
- .weak _SPI_3_VECTOR_interrupt
- .weak _I2C_1_VECTOR_interrupt
- .weak _CHANGE_NOTICE_VECTOR_interrupt
- .weak _ADC_VECTOR_interrupt
- .weak _PMP_VECTOR_interrupt
- .weak _COMPARATOR_1_VECTOR_interrupt
- .weak _COMPARATOR_2_VECTOR_interrupt
- .weak _SPI_2A_VECTOR_interrupt
- .weak _UART_3_VECTOR_interrupt
- .weak _UART_2A_VECTOR_interrupt
- .weak _I2C_4_VECTOR_interrupt
- .weak _I2C_2A_VECTOR_interrupt
- .weak _SPI_2_VECTOR_interrupt
- .weak _SPI_3A_VECTOR_interrupt
- .weak _UART_2_VECTOR_interrupt
- .weak _UART_3A_VECTOR_interrupt
- .weak _I2C_5_VECTOR_interrupt
- .weak _I2C_3A_VECTOR_interrupt
- .weak _SPI_4_VECTOR_interrupt
- .weak _I2C_2_VECTOR_interrupt
- .weak _FAIL_SAFE_MONITOR_VECTOR_interrupt
- .weak _RTCC_VECTOR_interrupt
- .weak _DMA_0_VECTOR_interrupt
- .weak _DMA_1_VECTOR_interrupt
- .weak _DMA_2_VECTOR_interrupt
- .weak _DMA_3_VECTOR_interrupt
- .weak _DMA_4_VECTOR_interrupt
- .weak _DMA_5_VECTOR_interrupt
- .weak _DMA_6_VECTOR_interrupt
- .weak _DMA_7_VECTOR_interrupt
- .weak _FCE_VECTOR_interrupt
- .weak _USB_1_VECTOR_interrupt
- .weak _ETH_VECTOR_interrupt
- .weak _UART_1B_VECTOR_interrupt
- .weak _UART_4_VECTOR_interrupt
- .weak _UART_2B_VECTOR_interrupt
- .weak _UART_6_VECTOR_interrupt
- .weak _UART_3B_VECTOR_interrupt
- .weak _UART_5_VECTOR_interrupt
- .text
- end;
- end.
|
