| 1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675167616771678167916801681168216831684168516861687168816891690169116921693169416951696169716981699170017011702170317041705170617071708170917101711171217131714171517161717171817191720172117221723172417251726172717281729173017311732173317341735173617371738173917401741174217431744174517461747174817491750175117521753175417551756175717581759176017611762176317641765176617671768176917701771177217731774177517761777177817791780178117821783178417851786178717881789179017911792179317941795179617971798179918001801180218031804180518061807180818091810181118121813181418151816181718181819182018211822182318241825182618271828182918301831183218331834183518361837183818391840184118421843184418451846184718481849185018511852185318541855185618571858185918601861186218631864186518661867186818691870187118721873187418751876187718781879188018811882188318841885188618871888188918901891189218931894189518961897189818991900190119021903190419051906190719081909191019111912191319141915191619171918191919201921192219231924192519261927192819291930193119321933193419351936193719381939194019411942194319441945194619471948194919501951195219531954195519561957195819591960196119621963196419651966196719681969197019711972197319741975197619771978197919801981198219831984198519861987198819891990199119921993199419951996199719981999200020012002200320042005200620072008200920102011201220132014201520162017201820192020202120222023202420252026202720282029203020312032203320342035203620372038203920402041204220432044204520462047204820492050205120522053205420552056205720582059206020612062206320642065206620672068206920702071207220732074207520762077207820792080208120822083208420852086208720882089209020912092209320942095209620972098209921002101210221032104210521062107210821092110211121122113211421152116211721182119212021212122212321242125212621272128212921302131213221332134213521362137213821392140214121422143214421452146214721482149215021512152215321542155215621572158215921602161216221632164216521662167216821692170217121722173217421752176217721782179218021812182218321842185218621872188218921902191219221932194219521962197219821992200220122022203220422052206220722082209221022112212221322142215221622172218221922202221222222232224222522262227222822292230223122322233223422352236223722382239224022412242224322442245224622472248224922502251225222532254225522562257225822592260226122622263226422652266226722682269227022712272227322742275227622772278227922802281228222832284228522862287228822892290229122922293229422952296229722982299230023012302230323042305230623072308230923102311231223132314231523162317231823192320232123222323232423252326232723282329233023312332233323342335233623372338233923402341234223432344234523462347234823492350235123522353235423552356235723582359236023612362236323642365236623672368236923702371237223732374237523762377237823792380238123822383238423852386238723882389239023912392239323942395239623972398239924002401240224032404240524062407240824092410241124122413241424152416241724182419242024212422242324242425242624272428242924302431243224332434243524362437243824392440244124422443244424452446244724482449245024512452245324542455245624572458245924602461246224632464246524662467246824692470247124722473247424752476247724782479248024812482248324842485248624872488248924902491249224932494249524962497249824992500250125022503250425052506250725082509251025112512251325142515251625172518251925202521252225232524252525262527252825292530253125322533253425352536253725382539254025412542254325442545254625472548254925502551255225532554255525562557255825592560256125622563256425652566256725682569257025712572257325742575257625772578257925802581258225832584258525862587258825892590259125922593259425952596259725982599260026012602260326042605260626072608260926102611261226132614261526162617261826192620262126222623262426252626262726282629263026312632263326342635263626372638263926402641264226432644264526462647264826492650265126522653265426552656265726582659266026612662266326642665266626672668266926702671267226732674267526762677267826792680268126822683268426852686268726882689269026912692269326942695269626972698269927002701270227032704270527062707270827092710271127122713271427152716271727182719272027212722272327242725272627272728272927302731273227332734273527362737273827392740274127422743274427452746274727482749275027512752275327542755275627572758275927602761276227632764276527662767276827692770277127722773277427752776277727782779278027812782278327842785278627872788278927902791279227932794279527962797279827992800280128022803280428052806280728082809281028112812281328142815281628172818281928202821282228232824282528262827282828292830283128322833283428352836283728382839284028412842284328442845284628472848284928502851285228532854285528562857285828592860286128622863286428652866286728682869287028712872287328742875287628772878287928802881288228832884288528862887288828892890289128922893289428952896289728982899290029012902290329042905290629072908290929102911291229132914291529162917291829192920292129222923292429252926292729282929293029312932293329342935293629372938293929402941294229432944294529462947294829492950295129522953295429552956295729582959296029612962296329642965296629672968296929702971297229732974297529762977297829792980298129822983298429852986298729882989299029912992299329942995299629972998299930003001300230033004300530063007300830093010301130123013301430153016301730183019302030213022302330243025302630273028302930303031303230333034303530363037303830393040304130423043304430453046304730483049305030513052305330543055305630573058305930603061306230633064306530663067306830693070307130723073307430753076307730783079308030813082308330843085308630873088308930903091309230933094309530963097309830993100310131023103310431053106310731083109311031113112311331143115311631173118311931203121312231233124312531263127312831293130313131323133313431353136313731383139314031413142314331443145314631473148314931503151315231533154315531563157315831593160316131623163316431653166316731683169317031713172317331743175317631773178317931803181318231833184318531863187318831893190319131923193319431953196319731983199320032013202320332043205320632073208320932103211321232133214321532163217321832193220322132223223322432253226322732283229323032313232323332343235323632373238323932403241324232433244324532463247324832493250325132523253325432553256325732583259326032613262326332643265326632673268326932703271327232733274327532763277327832793280328132823283328432853286328732883289329032913292329332943295329632973298329933003301330233033304330533063307330833093310331133123313331433153316331733183319332033213322332333243325332633273328332933303331333233333334333533363337333833393340334133423343334433453346334733483349335033513352335333543355335633573358335933603361336233633364336533663367336833693370337133723373337433753376337733783379338033813382338333843385338633873388338933903391339233933394339533963397339833993400340134023403340434053406340734083409341034113412341334143415341634173418341934203421342234233424342534263427342834293430343134323433343434353436343734383439344034413442344334443445344634473448344934503451345234533454345534563457345834593460346134623463346434653466346734683469347034713472347334743475347634773478347934803481348234833484348534863487348834893490349134923493349434953496349734983499350035013502350335043505350635073508350935103511351235133514351535163517351835193520352135223523352435253526352735283529353035313532353335343535353635373538353935403541354235433544354535463547354835493550355135523553355435553556355735583559356035613562356335643565356635673568356935703571357235733574357535763577357835793580358135823583358435853586358735883589359035913592359335943595359635973598359936003601360236033604360536063607360836093610361136123613361436153616361736183619362036213622362336243625362636273628362936303631363236333634363536363637363836393640364136423643364436453646364736483649365036513652365336543655365636573658365936603661366236633664366536663667366836693670367136723673367436753676367736783679368036813682368336843685368636873688368936903691369236933694369536963697369836993700370137023703370437053706370737083709371037113712371337143715371637173718371937203721372237233724372537263727372837293730373137323733373437353736373737383739374037413742374337443745374637473748374937503751375237533754375537563757375837593760376137623763376437653766376737683769377037713772377337743775377637773778377937803781378237833784378537863787378837893790379137923793379437953796379737983799380038013802380338043805380638073808380938103811381238133814381538163817381838193820382138223823382438253826382738283829383038313832383338343835383638373838383938403841384238433844384538463847384838493850385138523853385438553856385738583859386038613862386338643865386638673868386938703871387238733874387538763877387838793880388138823883388438853886388738883889389038913892389338943895389638973898389939003901390239033904390539063907390839093910391139123913391439153916391739183919392039213922392339243925392639273928392939303931393239333934393539363937393839393940394139423943394439453946394739483949395039513952395339543955395639573958395939603961396239633964396539663967396839693970397139723973397439753976397739783979398039813982398339843985398639873988398939903991399239933994399539963997399839994000400140024003400440054006400740084009401040114012401340144015401640174018401940204021402240234024402540264027402840294030403140324033403440354036403740384039404040414042404340444045404640474048404940504051405240534054405540564057405840594060406140624063406440654066406740684069407040714072407340744075407640774078407940804081408240834084408540864087408840894090409140924093409440954096409740984099410041014102410341044105410641074108410941104111411241134114411541164117411841194120412141224123412441254126412741284129413041314132413341344135413641374138413941404141414241434144414541464147414841494150415141524153415441554156415741584159416041614162416341644165416641674168416941704171417241734174417541764177417841794180418141824183418441854186418741884189419041914192419341944195419641974198419942004201420242034204420542064207420842094210421142124213421442154216421742184219422042214222422342244225422642274228422942304231423242334234423542364237423842394240424142424243424442454246424742484249425042514252425342544255425642574258425942604261426242634264426542664267426842694270427142724273427442754276427742784279428042814282428342844285428642874288428942904291429242934294429542964297429842994300430143024303430443054306430743084309431043114312431343144315431643174318431943204321432243234324432543264327432843294330433143324333433443354336433743384339434043414342434343444345434643474348434943504351435243534354435543564357435843594360436143624363436443654366436743684369437043714372437343744375437643774378437943804381438243834384438543864387438843894390439143924393439443954396439743984399440044014402440344044405440644074408440944104411441244134414441544164417441844194420442144224423442444254426442744284429443044314432443344344435443644374438443944404441444244434444444544464447444844494450445144524453445444554456445744584459446044614462446344644465446644674468446944704471447244734474447544764477447844794480448144824483448444854486448744884489449044914492449344944495449644974498449945004501450245034504450545064507450845094510451145124513451445154516451745184519452045214522452345244525452645274528452945304531453245334534453545364537453845394540454145424543454445454546454745484549455045514552455345544555455645574558455945604561456245634564456545664567456845694570457145724573457445754576457745784579458045814582458345844585458645874588458945904591459245934594459545964597459845994600460146024603460446054606460746084609461046114612461346144615461646174618461946204621462246234624462546264627462846294630463146324633463446354636463746384639464046414642464346444645464646474648464946504651465246534654465546564657465846594660466146624663466446654666466746684669467046714672467346744675467646774678467946804681468246834684468546864687468846894690469146924693469446954696469746984699470047014702470347044705470647074708470947104711471247134714471547164717471847194720472147224723472447254726472747284729473047314732473347344735473647374738473947404741474247434744474547464747474847494750475147524753475447554756475747584759476047614762476347644765476647674768476947704771477247734774477547764777477847794780478147824783478447854786478747884789479047914792479347944795479647974798479948004801480248034804480548064807480848094810481148124813481448154816481748184819482048214822482348244825482648274828482948304831483248334834483548364837483848394840484148424843484448454846484748484849485048514852485348544855485648574858485948604861486248634864486548664867486848694870487148724873487448754876487748784879488048814882488348844885488648874888488948904891489248934894489548964897489848994900490149024903490449054906490749084909491049114912491349144915491649174918491949204921492249234924492549264927492849294930493149324933493449354936493749384939494049414942494349444945494649474948494949504951495249534954495549564957495849594960496149624963496449654966496749684969497049714972497349744975497649774978497949804981498249834984498549864987498849894990499149924993499449954996499749984999500050015002500350045005500650075008500950105011501250135014501550165017501850195020502150225023502450255026502750285029503050315032503350345035503650375038503950405041504250435044504550465047504850495050505150525053505450555056505750585059506050615062506350645065506650675068506950705071507250735074507550765077507850795080508150825083508450855086508750885089509050915092509350945095509650975098509951005101510251035104510551065107510851095110511151125113511451155116511751185119512051215122512351245125512651275128512951305131513251335134513551365137513851395140514151425143514451455146514751485149515051515152515351545155515651575158515951605161516251635164516551665167516851695170517151725173517451755176517751785179518051815182518351845185518651875188518951905191519251935194519551965197519851995200520152025203520452055206520752085209521052115212521352145215521652175218521952205221522252235224522552265227522852295230523152325233523452355236523752385239524052415242524352445245524652475248524952505251525252535254525552565257525852595260526152625263526452655266526752685269527052715272527352745275527652775278527952805281528252835284528552865287528852895290529152925293529452955296529752985299530053015302530353045305530653075308530953105311531253135314531553165317531853195320532153225323532453255326532753285329533053315332533353345335533653375338533953405341534253435344534553465347534853495350535153525353535453555356535753585359536053615362536353645365536653675368536953705371537253735374537553765377537853795380538153825383538453855386538753885389539053915392539353945395539653975398539954005401540254035404540554065407540854095410541154125413541454155416541754185419542054215422542354245425542654275428542954305431543254335434543554365437543854395440544154425443544454455446544754485449545054515452545354545455545654575458545954605461546254635464546554665467546854695470547154725473547454755476547754785479548054815482548354845485548654875488548954905491549254935494549554965497549854995500550155025503550455055506550755085509551055115512551355145515551655175518551955205521552255235524552555265527552855295530553155325533553455355536553755385539554055415542554355445545554655475548554955505551555255535554555555565557555855595560556155625563556455655566556755685569557055715572557355745575557655775578557955805581558255835584558555865587558855895590559155925593559455955596559755985599560056015602560356045605560656075608560956105611561256135614561556165617561856195620562156225623562456255626562756285629563056315632563356345635563656375638563956405641564256435644564556465647564856495650565156525653565456555656565756585659566056615662566356645665566656675668566956705671567256735674567556765677567856795680568156825683568456855686568756885689569056915692569356945695569656975698569957005701570257035704570557065707570857095710571157125713571457155716571757185719572057215722572357245725572657275728572957305731573257335734573557365737573857395740574157425743574457455746574757485749575057515752575357545755575657575758575957605761576257635764576557665767576857695770577157725773577457755776577757785779578057815782578357845785578657875788578957905791579257935794579557965797579857995800580158025803580458055806580758085809581058115812581358145815581658175818581958205821582258235824582558265827582858295830583158325833583458355836583758385839584058415842584358445845584658475848584958505851585258535854585558565857585858595860586158625863586458655866586758685869587058715872587358745875587658775878587958805881588258835884588558865887588858895890589158925893589458955896589758985899590059015902590359045905590659075908590959105911591259135914591559165917591859195920592159225923592459255926592759285929593059315932593359345935593659375938593959405941594259435944594559465947594859495950595159525953595459555956595759585959596059615962596359645965596659675968596959705971597259735974597559765977597859795980598159825983598459855986598759885989599059915992599359945995599659975998599960006001600260036004600560066007600860096010601160126013601460156016601760186019602060216022602360246025602660276028602960306031603260336034603560366037603860396040604160426043604460456046604760486049605060516052605360546055605660576058605960606061606260636064606560666067606860696070607160726073607460756076607760786079608060816082608360846085608660876088608960906091609260936094609560966097609860996100610161026103610461056106610761086109611061116112611361146115611661176118611961206121612261236124612561266127612861296130613161326133613461356136613761386139614061416142614361446145614661476148614961506151615261536154615561566157615861596160616161626163616461656166616761686169617061716172617361746175617661776178617961806181618261836184618561866187618861896190619161926193619461956196619761986199620062016202620362046205620662076208620962106211621262136214621562166217621862196220622162226223622462256226622762286229623062316232623362346235623662376238623962406241624262436244624562466247624862496250625162526253625462556256625762586259626062616262626362646265626662676268626962706271627262736274627562766277627862796280628162826283628462856286628762886289629062916292629362946295629662976298629963006301630263036304630563066307630863096310631163126313631463156316631763186319632063216322632363246325632663276328632963306331633263336334633563366337633863396340634163426343634463456346634763486349635063516352635363546355635663576358635963606361636263636364636563666367636863696370637163726373637463756376637763786379638063816382638363846385638663876388638963906391639263936394639563966397639863996400640164026403640464056406640764086409641064116412641364146415641664176418641964206421642264236424642564266427642864296430643164326433643464356436643764386439644064416442644364446445644664476448644964506451645264536454645564566457645864596460646164626463646464656466646764686469647064716472647364746475647664776478647964806481648264836484648564866487648864896490649164926493649464956496649764986499650065016502650365046505650665076508650965106511651265136514651565166517651865196520652165226523652465256526652765286529653065316532653365346535653665376538653965406541654265436544654565466547654865496550655165526553655465556556655765586559656065616562656365646565656665676568656965706571657265736574657565766577657865796580658165826583658465856586658765886589659065916592659365946595659665976598659966006601660266036604660566066607660866096610661166126613661466156616661766186619662066216622662366246625662666276628662966306631663266336634663566366637663866396640664166426643664466456646664766486649665066516652665366546655665666576658665966606661666266636664666566666667666866696670667166726673667466756676667766786679668066816682668366846685668666876688668966906691669266936694669566966697669866996700670167026703670467056706670767086709671067116712671367146715671667176718671967206721672267236724672567266727672867296730673167326733673467356736673767386739674067416742674367446745674667476748674967506751675267536754675567566757675867596760676167626763676467656766676767686769677067716772677367746775677667776778677967806781678267836784678567866787678867896790679167926793679467956796679767986799680068016802680368046805680668076808680968106811681268136814681568166817681868196820682168226823682468256826682768286829683068316832683368346835683668376838683968406841684268436844684568466847684868496850685168526853685468556856685768586859686068616862686368646865686668676868686968706871687268736874687568766877687868796880688168826883688468856886688768886889689068916892689368946895689668976898689969006901690269036904690569066907690869096910691169126913691469156916691769186919692069216922692369246925692669276928692969306931693269336934693569366937693869396940694169426943694469456946694769486949695069516952695369546955695669576958695969606961696269636964696569666967696869696970697169726973697469756976697769786979698069816982698369846985698669876988698969906991699269936994699569966997699869997000700170027003700470057006700770087009701070117012701370147015701670177018701970207021702270237024702570267027702870297030703170327033703470357036703770387039704070417042704370447045704670477048704970507051705270537054705570567057705870597060706170627063706470657066706770687069707070717072707370747075707670777078707970807081708270837084708570867087708870897090709170927093709470957096709770987099710071017102710371047105710671077108710971107111711271137114711571167117711871197120712171227123712471257126712771287129713071317132713371347135713671377138713971407141714271437144714571467147714871497150715171527153715471557156715771587159716071617162716371647165716671677168716971707171717271737174717571767177717871797180718171827183718471857186718771887189719071917192719371947195719671977198719972007201720272037204720572067207720872097210721172127213721472157216721772187219722072217222722372247225722672277228722972307231723272337234723572367237723872397240724172427243724472457246724772487249725072517252725372547255725672577258725972607261726272637264726572667267726872697270727172727273727472757276727772787279728072817282728372847285728672877288728972907291729272937294729572967297729872997300730173027303730473057306730773087309731073117312731373147315731673177318731973207321732273237324732573267327732873297330733173327333733473357336733773387339734073417342734373447345734673477348734973507351735273537354735573567357735873597360736173627363736473657366736773687369737073717372737373747375737673777378737973807381738273837384738573867387738873897390739173927393739473957396739773987399740074017402740374047405740674077408740974107411741274137414741574167417741874197420742174227423742474257426742774287429743074317432743374347435743674377438743974407441744274437444744574467447744874497450745174527453745474557456745774587459746074617462746374647465746674677468746974707471747274737474747574767477747874797480748174827483748474857486748774887489749074917492749374947495749674977498749975007501750275037504750575067507750875097510751175127513751475157516751775187519752075217522752375247525752675277528752975307531753275337534753575367537753875397540754175427543754475457546754775487549755075517552755375547555755675577558755975607561756275637564756575667567756875697570757175727573757475757576757775787579758075817582758375847585758675877588758975907591759275937594759575967597759875997600760176027603760476057606760776087609761076117612761376147615761676177618761976207621762276237624762576267627762876297630763176327633763476357636763776387639764076417642764376447645764676477648764976507651765276537654765576567657765876597660766176627663766476657666766776687669767076717672767376747675767676777678767976807681768276837684768576867687768876897690769176927693769476957696769776987699770077017702770377047705770677077708770977107711771277137714771577167717771877197720772177227723772477257726772777287729773077317732773377347735773677377738773977407741774277437744774577467747774877497750775177527753775477557756775777587759776077617762776377647765776677677768776977707771777277737774777577767777777877797780778177827783778477857786778777887789779077917792779377947795779677977798779978007801780278037804780578067807780878097810781178127813781478157816781778187819782078217822782378247825782678277828782978307831783278337834783578367837783878397840784178427843784478457846784778487849785078517852785378547855785678577858785978607861786278637864786578667867786878697870787178727873787478757876787778787879788078817882788378847885788678877888788978907891789278937894789578967897789878997900790179027903790479057906790779087909791079117912791379147915791679177918791979207921792279237924792579267927792879297930793179327933793479357936793779387939794079417942794379447945794679477948794979507951795279537954795579567957795879597960796179627963796479657966796779687969797079717972797379747975797679777978797979807981798279837984798579867987798879897990799179927993799479957996799779987999800080018002800380048005800680078008800980108011801280138014801580168017801880198020802180228023802480258026802780288029803080318032803380348035803680378038803980408041804280438044804580468047804880498050805180528053805480558056805780588059806080618062806380648065806680678068806980708071807280738074807580768077807880798080808180828083808480858086808780888089809080918092809380948095809680978098809981008101810281038104810581068107810881098110811181128113811481158116811781188119812081218122812381248125812681278128812981308131813281338134813581368137813881398140814181428143814481458146814781488149815081518152815381548155815681578158815981608161816281638164816581668167816881698170817181728173817481758176817781788179818081818182818381848185818681878188818981908191819281938194819581968197819881998200820182028203820482058206820782088209821082118212821382148215821682178218821982208221822282238224822582268227822882298230823182328233823482358236823782388239824082418242824382448245824682478248824982508251825282538254825582568257825882598260826182628263826482658266826782688269827082718272827382748275827682778278827982808281828282838284828582868287828882898290829182928293829482958296829782988299830083018302830383048305830683078308830983108311831283138314831583168317831883198320832183228323832483258326832783288329833083318332833383348335833683378338833983408341834283438344834583468347834883498350835183528353835483558356835783588359836083618362836383648365836683678368836983708371837283738374837583768377837883798380838183828383838483858386838783888389839083918392839383948395839683978398839984008401840284038404840584068407840884098410841184128413841484158416841784188419842084218422842384248425842684278428842984308431843284338434843584368437843884398440844184428443844484458446844784488449845084518452845384548455845684578458845984608461846284638464846584668467846884698470847184728473847484758476847784788479848084818482848384848485848684878488848984908491849284938494849584968497849884998500850185028503850485058506850785088509851085118512851385148515851685178518851985208521852285238524852585268527852885298530853185328533853485358536853785388539854085418542854385448545854685478548854985508551855285538554855585568557855885598560856185628563856485658566856785688569857085718572857385748575857685778578857985808581858285838584858585868587858885898590859185928593859485958596859785988599860086018602860386048605860686078608860986108611861286138614861586168617861886198620862186228623862486258626862786288629863086318632863386348635863686378638863986408641864286438644864586468647864886498650865186528653865486558656865786588659866086618662866386648665866686678668866986708671867286738674867586768677867886798680868186828683868486858686868786888689869086918692869386948695869686978698869987008701870287038704870587068707870887098710871187128713871487158716871787188719872087218722872387248725872687278728872987308731873287338734873587368737873887398740874187428743874487458746874787488749875087518752875387548755875687578758875987608761876287638764876587668767876887698770877187728773877487758776877787788779878087818782878387848785878687878788878987908791879287938794879587968797879887998800880188028803880488058806880788088809881088118812881388148815881688178818881988208821882288238824882588268827882888298830883188328833883488358836883788388839884088418842884388448845884688478848884988508851885288538854885588568857885888598860886188628863886488658866886788688869887088718872887388748875887688778878887988808881888288838884888588868887888888898890889188928893889488958896889788988899890089018902890389048905890689078908890989108911891289138914891589168917891889198920892189228923892489258926892789288929893089318932893389348935893689378938893989408941894289438944894589468947894889498950895189528953895489558956895789588959896089618962896389648965896689678968896989708971897289738974897589768977897889798980898189828983898489858986898789888989899089918992899389948995899689978998899990009001900290039004900590069007900890099010901190129013901490159016901790189019902090219022902390249025902690279028902990309031903290339034903590369037903890399040904190429043904490459046904790489049905090519052905390549055905690579058905990609061906290639064906590669067906890699070907190729073907490759076907790789079908090819082908390849085908690879088908990909091909290939094909590969097909890999100910191029103910491059106910791089109911091119112911391149115911691179118911991209121912291239124912591269127912891299130913191329133913491359136913791389139914091419142914391449145914691479148914991509151915291539154915591569157915891599160916191629163916491659166916791689169917091719172917391749175917691779178917991809181918291839184918591869187918891899190919191929193919491959196919791989199920092019202920392049205920692079208920992109211921292139214921592169217921892199220922192229223922492259226922792289229923092319232923392349235923692379238923992409241924292439244924592469247924892499250925192529253925492559256925792589259926092619262926392649265926692679268926992709271927292739274927592769277927892799280928192829283928492859286928792889289929092919292929392949295929692979298929993009301930293039304930593069307930893099310931193129313931493159316931793189319932093219322932393249325932693279328932993309331933293339334933593369337933893399340934193429343934493459346934793489349935093519352935393549355935693579358935993609361936293639364936593669367936893699370937193729373937493759376937793789379938093819382938393849385938693879388938993909391939293939394939593969397939893999400940194029403940494059406940794089409941094119412941394149415941694179418941994209421942294239424942594269427942894299430943194329433943494359436943794389439944094419442944394449445944694479448944994509451945294539454945594569457945894599460946194629463946494659466946794689469947094719472947394749475947694779478947994809481948294839484948594869487948894899490949194929493949494959496949794989499950095019502950395049505950695079508950995109511951295139514951595169517951895199520952195229523952495259526952795289529953095319532953395349535953695379538953995409541954295439544954595469547954895499550955195529553955495559556955795589559956095619562956395649565956695679568956995709571957295739574957595769577957895799580958195829583958495859586958795889589959095919592959395949595959695979598959996009601960296039604960596069607960896099610961196129613961496159616961796189619962096219622962396249625962696279628962996309631963296339634963596369637963896399640964196429643964496459646964796489649965096519652965396549655965696579658965996609661966296639664966596669667966896699670967196729673967496759676967796789679968096819682968396849685968696879688968996909691969296939694969596969697969896999700970197029703970497059706970797089709971097119712971397149715971697179718971997209721972297239724972597269727972897299730973197329733973497359736973797389739974097419742974397449745974697479748974997509751975297539754975597569757975897599760976197629763976497659766976797689769977097719772977397749775977697779778977997809781978297839784978597869787978897899790979197929793979497959796979797989799980098019802980398049805980698079808980998109811981298139814981598169817981898199820982198229823982498259826982798289829983098319832983398349835983698379838983998409841984298439844984598469847984898499850985198529853985498559856985798589859986098619862986398649865986698679868986998709871987298739874987598769877987898799880988198829883988498859886988798889889989098919892989398949895989698979898989999009901990299039904990599069907990899099910991199129913991499159916991799189919992099219922992399249925992699279928992999309931993299339934993599369937993899399940994199429943994499459946994799489949995099519952995399549955995699579958995999609961996299639964996599669967996899699970997199729973997499759976997799789979998099819982998399849985998699879988998999909991999299939994999599969997999899991000010001100021000310004100051000610007100081000910010100111001210013100141001510016100171001810019100201002110022100231002410025100261002710028100291003010031100321003310034100351003610037100381003910040100411004210043100441004510046100471004810049100501005110052100531005410055100561005710058100591006010061100621006310064100651006610067100681006910070100711007210073100741007510076100771007810079100801008110082100831008410085100861008710088100891009010091100921009310094100951009610097100981009910100101011010210103101041010510106101071010810109101101011110112101131011410115101161011710118101191012010121101221012310124101251012610127101281012910130101311013210133101341013510136101371013810139101401014110142101431014410145101461014710148101491015010151101521015310154101551015610157101581015910160101611016210163101641016510166101671016810169101701017110172101731017410175101761017710178101791018010181101821018310184101851018610187101881018910190101911019210193101941019510196101971019810199102001020110202102031020410205102061020710208102091021010211102121021310214102151021610217102181021910220102211022210223102241022510226102271022810229102301023110232102331023410235102361023710238102391024010241102421024310244102451024610247102481024910250102511025210253102541025510256102571025810259102601026110262102631026410265102661026710268102691027010271102721027310274102751027610277102781027910280102811028210283102841028510286102871028810289102901029110292102931029410295102961029710298102991030010301103021030310304103051030610307103081030910310103111031210313103141031510316103171031810319103201032110322103231032410325103261032710328103291033010331103321033310334103351033610337103381033910340103411034210343103441034510346103471034810349103501035110352103531035410355103561035710358103591036010361103621036310364103651036610367103681036910370103711037210373103741037510376103771037810379103801038110382103831038410385103861038710388103891039010391103921039310394103951039610397103981039910400104011040210403104041040510406104071040810409104101041110412104131041410415104161041710418104191042010421104221042310424104251042610427104281042910430104311043210433104341043510436104371043810439104401044110442104431044410445104461044710448104491045010451104521045310454104551045610457104581045910460104611046210463104641046510466104671046810469104701047110472104731047410475104761047710478104791048010481104821048310484104851048610487104881048910490104911049210493104941049510496104971049810499105001050110502105031050410505105061050710508105091051010511105121051310514105151051610517105181051910520105211052210523105241052510526105271052810529105301053110532105331053410535105361053710538105391054010541105421054310544105451054610547105481054910550105511055210553105541055510556105571055810559105601056110562105631056410565105661056710568105691057010571105721057310574105751057610577105781057910580105811058210583105841058510586105871058810589105901059110592105931059410595105961059710598105991060010601106021060310604106051060610607106081060910610106111061210613106141061510616106171061810619106201062110622106231062410625106261062710628106291063010631106321063310634106351063610637106381063910640106411064210643106441064510646106471064810649106501065110652106531065410655106561065710658106591066010661106621066310664106651066610667106681066910670106711067210673106741067510676106771067810679106801068110682106831068410685106861068710688106891069010691106921069310694106951069610697106981069910700107011070210703107041070510706107071070810709107101071110712107131071410715107161071710718107191072010721107221072310724107251072610727107281072910730107311073210733107341073510736107371073810739107401074110742107431074410745107461074710748107491075010751107521075310754107551075610757107581075910760107611076210763107641076510766107671076810769107701077110772107731077410775107761077710778107791078010781107821078310784107851078610787107881078910790107911079210793107941079510796107971079810799108001080110802108031080410805108061080710808108091081010811108121081310814108151081610817108181081910820108211082210823108241082510826108271082810829108301083110832108331083410835108361083710838108391084010841108421084310844108451084610847108481084910850108511085210853108541085510856108571085810859108601086110862108631086410865108661086710868108691087010871108721087310874108751087610877108781087910880108811088210883108841088510886108871088810889108901089110892108931089410895108961089710898108991090010901109021090310904109051090610907109081090910910109111091210913109141091510916109171091810919109201092110922109231092410925109261092710928109291093010931109321093310934109351093610937109381093910940109411094210943109441094510946109471094810949109501095110952109531095410955109561095710958109591096010961109621096310964109651096610967109681096910970109711097210973109741097510976109771097810979109801098110982109831098410985109861098710988109891099010991109921099310994109951099610997109981099911000110011100211003110041100511006110071100811009110101101111012110131101411015110161101711018110191102011021110221102311024110251102611027110281102911030110311103211033110341103511036110371103811039110401104111042110431104411045110461104711048110491105011051110521105311054110551105611057110581105911060110611106211063110641106511066110671106811069110701107111072110731107411075110761107711078110791108011081110821108311084110851108611087110881108911090110911109211093110941109511096110971109811099111001110111102111031110411105111061110711108111091111011111111121111311114111151111611117111181111911120111211112211123111241112511126111271112811129111301113111132111331113411135111361113711138111391114011141111421114311144111451114611147111481114911150111511115211153111541115511156111571115811159111601116111162111631116411165111661116711168111691117011171111721117311174111751117611177111781117911180111811118211183111841118511186111871118811189111901119111192111931119411195111961119711198111991120011201112021120311204112051120611207112081120911210112111121211213112141121511216112171121811219112201122111222112231122411225112261122711228112291123011231112321123311234112351123611237112381123911240112411124211243112441124511246112471124811249112501125111252112531125411255112561125711258112591126011261112621126311264112651126611267112681126911270112711127211273112741127511276112771127811279112801128111282112831128411285112861128711288112891129011291112921129311294112951129611297112981129911300113011130211303113041130511306113071130811309113101131111312113131131411315113161131711318113191132011321113221132311324113251132611327113281132911330113311133211333113341133511336113371133811339113401134111342113431134411345113461134711348113491135011351113521135311354113551135611357113581135911360113611136211363113641136511366113671136811369113701137111372113731137411375113761137711378113791138011381113821138311384113851138611387113881138911390113911139211393113941139511396113971139811399114001140111402114031140411405114061140711408114091141011411114121141311414114151141611417114181141911420114211142211423114241142511426114271142811429114301143111432114331143411435114361143711438114391144011441114421144311444114451144611447114481144911450114511145211453114541145511456114571145811459114601146111462114631146411465114661146711468114691147011471114721147311474114751147611477114781147911480114811148211483114841148511486114871148811489114901149111492114931149411495114961149711498114991150011501115021150311504115051150611507115081150911510115111151211513115141151511516115171151811519115201152111522115231152411525115261152711528115291153011531115321153311534115351153611537115381153911540115411154211543115441154511546115471154811549115501155111552115531155411555115561155711558115591156011561115621156311564115651156611567115681156911570115711157211573115741157511576115771157811579115801158111582115831158411585115861158711588115891159011591115921159311594115951159611597115981159911600116011160211603116041160511606116071160811609116101161111612116131161411615116161161711618116191162011621116221162311624116251162611627116281162911630116311163211633116341163511636116371163811639116401164111642116431164411645116461164711648116491165011651116521165311654116551165611657116581165911660116611166211663116641166511666116671166811669116701167111672116731167411675116761167711678116791168011681116821168311684116851168611687116881168911690116911169211693116941169511696116971169811699117001170111702117031170411705117061170711708117091171011711117121171311714117151171611717117181171911720117211172211723117241172511726117271172811729117301173111732117331173411735117361173711738117391174011741117421174311744117451174611747117481174911750117511175211753117541175511756117571175811759117601176111762117631176411765117661176711768117691177011771117721177311774117751177611777117781177911780117811178211783117841178511786117871178811789117901179111792117931179411795117961179711798117991180011801118021180311804118051180611807118081180911810118111181211813118141181511816118171181811819118201182111822118231182411825118261182711828118291183011831118321183311834118351183611837118381183911840118411184211843118441184511846118471184811849118501185111852118531185411855118561185711858118591186011861118621186311864118651186611867118681186911870118711187211873118741187511876118771187811879118801188111882118831188411885118861188711888118891189011891118921189311894118951189611897118981189911900119011190211903119041190511906119071190811909119101191111912119131191411915119161191711918119191192011921119221192311924119251192611927119281192911930119311193211933119341193511936119371193811939119401194111942119431194411945119461194711948119491195011951119521195311954119551195611957119581195911960119611196211963119641196511966119671196811969119701197111972119731197411975119761197711978119791198011981119821198311984119851198611987119881198911990119911199211993119941199511996119971199811999120001200112002120031200412005120061200712008120091201012011120121201312014120151201612017120181201912020120211202212023120241202512026120271202812029120301203112032120331203412035120361203712038120391204012041120421204312044120451204612047120481204912050120511205212053120541205512056120571205812059120601206112062120631206412065120661206712068120691207012071120721207312074120751207612077120781207912080120811208212083120841208512086120871208812089120901209112092120931209412095120961209712098120991210012101121021210312104121051210612107121081210912110121111211212113121141211512116121171211812119121201212112122121231212412125121261212712128121291213012131121321213312134121351213612137121381213912140121411214212143121441214512146121471214812149121501215112152121531215412155121561215712158121591216012161121621216312164121651216612167121681216912170121711217212173121741217512176121771217812179121801218112182121831218412185121861218712188121891219012191121921219312194121951219612197121981219912200122011220212203122041220512206122071220812209122101221112212122131221412215122161221712218122191222012221122221222312224122251222612227122281222912230122311223212233122341223512236122371223812239122401224112242122431224412245122461224712248122491225012251122521225312254122551225612257122581225912260122611226212263122641226512266122671226812269122701227112272122731227412275122761227712278122791228012281122821228312284122851228612287122881228912290122911229212293122941229512296122971229812299123001230112302123031230412305123061230712308123091231012311123121231312314123151231612317123181231912320123211232212323123241232512326123271232812329123301233112332123331233412335123361233712338123391234012341123421234312344123451234612347123481234912350123511235212353123541235512356123571235812359123601236112362123631236412365123661236712368123691237012371123721237312374123751237612377123781237912380123811238212383123841238512386123871238812389123901239112392123931239412395123961239712398123991240012401124021240312404124051240612407124081240912410124111241212413124141241512416124171241812419124201242112422124231242412425124261242712428124291243012431124321243312434124351243612437124381243912440124411244212443124441244512446124471244812449124501245112452124531245412455124561245712458124591246012461124621246312464124651246612467124681246912470124711247212473124741247512476124771247812479124801248112482124831248412485124861248712488124891249012491124921249312494124951249612497124981249912500125011250212503125041250512506125071250812509125101251112512125131251412515125161251712518125191252012521125221252312524125251252612527125281252912530125311253212533125341253512536125371253812539125401254112542125431254412545125461254712548125491255012551125521255312554125551255612557125581255912560125611256212563125641256512566125671256812569125701257112572125731257412575125761257712578125791258012581125821258312584125851258612587125881258912590125911259212593125941259512596125971259812599126001260112602126031260412605126061260712608126091261012611126121261312614126151261612617126181261912620126211262212623126241262512626126271262812629126301263112632126331263412635126361263712638126391264012641126421264312644126451264612647126481264912650126511265212653126541265512656126571265812659126601266112662126631266412665126661266712668126691267012671126721267312674126751267612677126781267912680126811268212683126841268512686126871268812689126901269112692126931269412695126961269712698126991270012701127021270312704127051270612707127081270912710127111271212713127141271512716127171271812719127201272112722127231272412725127261272712728127291273012731127321273312734127351273612737127381273912740127411274212743127441274512746127471274812749127501275112752127531275412755127561275712758127591276012761127621276312764127651276612767127681276912770127711277212773127741277512776127771277812779127801278112782127831278412785127861278712788127891279012791127921279312794127951279612797127981279912800128011280212803128041280512806128071280812809128101281112812128131281412815128161281712818128191282012821128221282312824128251282612827128281282912830128311283212833128341283512836128371283812839128401284112842128431284412845128461284712848128491285012851128521285312854128551285612857128581285912860128611286212863128641286512866128671286812869128701287112872128731287412875128761287712878128791288012881128821288312884128851288612887128881288912890128911289212893128941289512896128971289812899129001290112902129031290412905129061290712908129091291012911129121291312914129151291612917129181291912920129211292212923129241292512926129271292812929129301293112932129331293412935129361293712938129391294012941129421294312944129451294612947129481294912950129511295212953129541295512956129571295812959129601296112962129631296412965129661296712968129691297012971129721297312974129751297612977129781297912980129811298212983129841298512986129871298812989129901299112992129931299412995129961299712998129991300013001130021300313004130051300613007130081300913010130111301213013130141301513016130171301813019130201302113022130231302413025130261302713028130291303013031130321303313034130351303613037130381303913040130411304213043130441304513046130471304813049130501305113052130531305413055130561305713058130591306013061130621306313064130651306613067130681306913070130711307213073130741307513076130771307813079130801308113082130831308413085130861308713088130891309013091130921309313094130951309613097130981309913100131011310213103131041310513106131071310813109131101311113112131131311413115131161311713118131191312013121131221312313124131251312613127131281312913130131311313213133131341313513136131371313813139131401314113142131431314413145131461314713148131491315013151131521315313154131551315613157131581315913160131611316213163131641316513166131671316813169131701317113172131731317413175131761317713178131791318013181131821318313184131851318613187131881318913190131911319213193131941319513196131971319813199132001320113202132031320413205132061320713208132091321013211132121321313214132151321613217132181321913220132211322213223132241322513226132271322813229132301323113232132331323413235132361323713238132391324013241132421324313244132451324613247132481324913250132511325213253132541325513256132571325813259132601326113262132631326413265132661326713268132691327013271132721327313274132751327613277132781327913280132811328213283132841328513286132871328813289132901329113292132931329413295132961329713298132991330013301133021330313304133051330613307133081330913310133111331213313133141331513316133171331813319133201332113322133231332413325133261332713328133291333013331133321333313334133351333613337133381333913340133411334213343133441334513346133471334813349133501335113352133531335413355133561335713358133591336013361133621336313364133651336613367133681336913370133711337213373133741337513376133771337813379133801338113382133831338413385133861338713388133891339013391133921339313394133951339613397133981339913400134011340213403134041340513406134071340813409134101341113412134131341413415134161341713418134191342013421134221342313424134251342613427134281342913430134311343213433134341343513436134371343813439134401344113442134431344413445134461344713448134491345013451134521345313454134551345613457134581345913460134611346213463134641346513466134671346813469134701347113472134731347413475134761347713478134791348013481134821348313484134851348613487134881348913490134911349213493134941349513496134971349813499135001350113502135031350413505135061350713508135091351013511135121351313514135151351613517135181351913520135211352213523135241352513526135271352813529135301353113532135331353413535135361353713538135391354013541135421354313544135451354613547135481354913550135511355213553135541355513556135571355813559135601356113562135631356413565135661356713568135691357013571135721357313574135751357613577135781357913580135811358213583135841358513586135871358813589135901359113592135931359413595135961359713598135991360013601136021360313604136051360613607136081360913610136111361213613136141361513616136171361813619136201362113622136231362413625136261362713628136291363013631136321363313634136351363613637136381363913640136411364213643136441364513646136471364813649136501365113652136531365413655136561365713658136591366013661136621366313664136651366613667136681366913670136711367213673136741367513676136771367813679136801368113682136831368413685136861368713688136891369013691136921369313694136951369613697136981369913700137011370213703137041370513706137071370813709137101371113712137131371413715137161371713718137191372013721137221372313724137251372613727137281372913730137311373213733137341373513736137371373813739137401374113742137431374413745137461374713748137491375013751137521375313754137551375613757137581375913760137611376213763137641376513766137671376813769137701377113772137731377413775137761377713778137791378013781137821378313784137851378613787137881378913790137911379213793137941379513796137971379813799138001380113802138031380413805138061380713808138091381013811138121381313814138151381613817138181381913820138211382213823138241382513826138271382813829138301383113832138331383413835138361383713838138391384013841138421384313844138451384613847138481384913850138511385213853138541385513856138571385813859138601386113862138631386413865138661386713868138691387013871138721387313874138751387613877138781387913880138811388213883138841388513886138871388813889138901389113892138931389413895138961389713898138991390013901139021390313904139051390613907139081390913910139111391213913139141391513916139171391813919139201392113922139231392413925139261392713928139291393013931139321393313934139351393613937139381393913940139411394213943139441394513946139471394813949139501395113952139531395413955139561395713958139591396013961139621396313964139651396613967139681396913970139711397213973139741397513976139771397813979139801398113982139831398413985139861398713988139891399013991139921399313994139951399613997139981399914000140011400214003140041400514006140071400814009140101401114012140131401414015140161401714018140191402014021140221402314024140251402614027140281402914030140311403214033140341403514036140371403814039140401404114042140431404414045140461404714048140491405014051140521405314054140551405614057140581405914060140611406214063140641406514066140671406814069140701407114072140731407414075140761407714078140791408014081140821408314084140851408614087140881408914090140911409214093140941409514096140971409814099141001410114102141031410414105141061410714108141091411014111141121411314114141151411614117141181411914120141211412214123141241412514126141271412814129141301413114132141331413414135141361413714138141391414014141141421414314144141451414614147141481414914150141511415214153141541415514156141571415814159141601416114162141631416414165141661416714168141691417014171141721417314174141751417614177141781417914180141811418214183141841418514186141871418814189141901419114192141931419414195141961419714198141991420014201142021420314204142051420614207142081420914210142111421214213142141421514216142171421814219142201422114222142231422414225142261422714228142291423014231142321423314234142351423614237142381423914240142411424214243142441424514246142471424814249142501425114252142531425414255142561425714258142591426014261142621426314264142651426614267142681426914270142711427214273142741427514276142771427814279142801428114282142831428414285142861428714288142891429014291142921429314294142951429614297142981429914300143011430214303143041430514306143071430814309143101431114312143131431414315143161431714318143191432014321143221432314324143251432614327143281432914330143311433214333143341433514336143371433814339143401434114342143431434414345143461434714348143491435014351143521435314354143551435614357143581435914360143611436214363143641436514366143671436814369143701437114372143731437414375143761437714378143791438014381143821438314384143851438614387143881438914390143911439214393143941439514396143971439814399144001440114402144031440414405144061440714408144091441014411144121441314414144151441614417144181441914420144211442214423144241442514426144271442814429144301443114432144331443414435144361443714438144391444014441144421444314444144451444614447144481444914450144511445214453144541445514456144571445814459144601446114462144631446414465144661446714468144691447014471144721447314474144751447614477144781447914480144811448214483144841448514486144871448814489144901449114492144931449414495144961449714498144991450014501145021450314504145051450614507145081450914510145111451214513145141451514516145171451814519145201452114522145231452414525145261452714528145291453014531145321453314534145351453614537145381453914540145411454214543145441454514546145471454814549145501455114552145531455414555145561455714558145591456014561145621456314564145651456614567145681456914570145711457214573145741457514576145771457814579145801458114582145831458414585145861458714588145891459014591145921459314594145951459614597145981459914600146011460214603146041460514606146071460814609146101461114612146131461414615146161461714618146191462014621146221462314624146251462614627146281462914630146311463214633146341463514636146371463814639146401464114642146431464414645146461464714648146491465014651146521465314654146551465614657146581465914660146611466214663146641466514666146671466814669146701467114672146731467414675146761467714678146791468014681146821468314684146851468614687146881468914690146911469214693146941469514696146971469814699147001470114702147031470414705147061470714708147091471014711147121471314714147151471614717147181471914720147211472214723147241472514726147271472814729147301473114732147331473414735147361473714738147391474014741147421474314744147451474614747147481474914750147511475214753147541475514756147571475814759147601476114762147631476414765147661476714768147691477014771147721477314774147751477614777147781477914780147811478214783147841478514786147871478814789147901479114792147931479414795147961479714798147991480014801148021480314804148051480614807148081480914810148111481214813148141481514816148171481814819148201482114822148231482414825148261482714828148291483014831148321483314834148351483614837148381483914840148411484214843148441484514846148471484814849148501485114852148531485414855148561485714858148591486014861148621486314864148651486614867148681486914870148711487214873148741487514876148771487814879148801488114882148831488414885148861488714888148891489014891148921489314894148951489614897148981489914900149011490214903149041490514906149071490814909149101491114912149131491414915149161491714918149191492014921149221492314924149251492614927149281492914930149311493214933149341493514936149371493814939149401494114942149431494414945149461494714948149491495014951149521495314954149551495614957149581495914960149611496214963149641496514966149671496814969149701497114972149731497414975149761497714978149791498014981149821498314984149851498614987149881498914990149911499214993149941499514996149971499814999150001500115002150031500415005150061500715008150091501015011150121501315014150151501615017150181501915020150211502215023150241502515026150271502815029150301503115032150331503415035150361503715038150391504015041150421504315044150451504615047150481504915050150511505215053150541505515056150571505815059150601506115062150631506415065150661506715068150691507015071150721507315074150751507615077150781507915080150811508215083150841508515086150871508815089150901509115092150931509415095150961509715098150991510015101151021510315104151051510615107151081510915110151111511215113151141511515116151171511815119151201512115122151231512415125151261512715128151291513015131151321513315134151351513615137151381513915140151411514215143151441514515146151471514815149151501515115152151531515415155151561515715158151591516015161151621516315164151651516615167151681516915170151711517215173151741517515176151771517815179151801518115182151831518415185151861518715188151891519015191151921519315194151951519615197151981519915200152011520215203152041520515206152071520815209152101521115212152131521415215152161521715218152191522015221152221522315224152251522615227152281522915230152311523215233152341523515236152371523815239152401524115242152431524415245152461524715248152491525015251152521525315254152551525615257152581525915260152611526215263152641526515266152671526815269152701527115272152731527415275152761527715278152791528015281152821528315284152851528615287152881528915290152911529215293152941529515296152971529815299153001530115302153031530415305153061530715308153091531015311153121531315314153151531615317153181531915320153211532215323153241532515326153271532815329153301533115332153331533415335153361533715338153391534015341153421534315344153451534615347153481534915350153511535215353153541535515356153571535815359153601536115362153631536415365153661536715368153691537015371153721537315374153751537615377153781537915380153811538215383153841538515386153871538815389153901539115392153931539415395153961539715398153991540015401154021540315404154051540615407154081540915410154111541215413154141541515416154171541815419154201542115422154231542415425154261542715428154291543015431154321543315434154351543615437154381543915440154411544215443154441544515446154471544815449154501545115452154531545415455154561545715458154591546015461154621546315464154651546615467154681546915470154711547215473154741547515476154771547815479154801548115482154831548415485154861548715488154891549015491154921549315494154951549615497154981549915500155011550215503155041550515506155071550815509155101551115512155131551415515155161551715518155191552015521155221552315524155251552615527155281552915530155311553215533155341553515536155371553815539155401554115542155431554415545155461554715548155491555015551155521555315554155551555615557155581555915560155611556215563155641556515566155671556815569155701557115572155731557415575155761557715578155791558015581155821558315584155851558615587155881558915590155911559215593155941559515596155971559815599156001560115602156031560415605156061560715608156091561015611156121561315614156151561615617156181561915620156211562215623156241562515626156271562815629156301563115632156331563415635156361563715638156391564015641156421564315644156451564615647156481564915650156511565215653156541565515656156571565815659156601566115662156631566415665156661566715668156691567015671156721567315674156751567615677156781567915680156811568215683156841568515686156871568815689156901569115692156931569415695156961569715698156991570015701157021570315704157051570615707157081570915710157111571215713157141571515716157171571815719157201572115722157231572415725157261572715728157291573015731157321573315734157351573615737157381573915740157411574215743157441574515746157471574815749157501575115752157531575415755157561575715758157591576015761157621576315764157651576615767157681576915770157711577215773157741577515776157771577815779157801578115782157831578415785157861578715788157891579015791157921579315794157951579615797157981579915800158011580215803158041580515806158071580815809158101581115812158131581415815158161581715818158191582015821158221582315824158251582615827158281582915830158311583215833158341583515836158371583815839158401584115842158431584415845158461584715848158491585015851158521585315854158551585615857158581585915860158611586215863158641586515866158671586815869158701587115872158731587415875158761587715878158791588015881158821588315884158851588615887158881588915890158911589215893158941589515896158971589815899159001590115902159031590415905159061590715908159091591015911159121591315914159151591615917159181591915920159211592215923159241592515926159271592815929159301593115932159331593415935159361593715938159391594015941159421594315944159451594615947159481594915950159511595215953159541595515956159571595815959159601596115962159631596415965159661596715968159691597015971159721597315974159751597615977159781597915980159811598215983159841598515986159871598815989159901599115992159931599415995159961599715998159991600016001160021600316004160051600616007160081600916010160111601216013160141601516016160171601816019160201602116022160231602416025160261602716028160291603016031160321603316034160351603616037160381603916040160411604216043160441604516046160471604816049160501605116052160531605416055160561605716058160591606016061160621606316064160651606616067160681606916070160711607216073160741607516076160771607816079160801608116082160831608416085160861608716088160891609016091160921609316094160951609616097160981609916100161011610216103161041610516106161071610816109161101611116112161131611416115161161611716118161191612016121161221612316124161251612616127161281612916130161311613216133161341613516136161371613816139161401614116142161431614416145161461614716148161491615016151161521615316154161551615616157161581615916160161611616216163161641616516166161671616816169161701617116172161731617416175161761617716178161791618016181161821618316184161851618616187161881618916190161911619216193161941619516196161971619816199162001620116202162031620416205162061620716208162091621016211162121621316214162151621616217162181621916220162211622216223162241622516226162271622816229162301623116232162331623416235162361623716238162391624016241162421624316244162451624616247162481624916250162511625216253162541625516256162571625816259162601626116262162631626416265162661626716268162691627016271162721627316274162751627616277162781627916280162811628216283162841628516286162871628816289162901629116292162931629416295162961629716298162991630016301163021630316304163051630616307163081630916310163111631216313163141631516316163171631816319163201632116322163231632416325163261632716328163291633016331163321633316334163351633616337163381633916340163411634216343163441634516346163471634816349163501635116352163531635416355163561635716358163591636016361163621636316364163651636616367163681636916370163711637216373163741637516376163771637816379163801638116382163831638416385163861638716388163891639016391163921639316394163951639616397163981639916400164011640216403164041640516406164071640816409164101641116412164131641416415164161641716418164191642016421164221642316424164251642616427164281642916430164311643216433164341643516436164371643816439164401644116442164431644416445164461644716448164491645016451164521645316454164551645616457164581645916460164611646216463164641646516466164671646816469164701647116472164731647416475164761647716478164791648016481164821648316484164851648616487164881648916490164911649216493164941649516496164971649816499165001650116502165031650416505165061650716508165091651016511165121651316514165151651616517165181651916520165211652216523165241652516526165271652816529165301653116532165331653416535165361653716538165391654016541165421654316544165451654616547165481654916550165511655216553165541655516556165571655816559165601656116562165631656416565165661656716568165691657016571165721657316574165751657616577165781657916580165811658216583165841658516586165871658816589165901659116592165931659416595165961659716598165991660016601166021660316604166051660616607166081660916610166111661216613166141661516616166171661816619166201662116622166231662416625166261662716628166291663016631166321663316634166351663616637166381663916640166411664216643166441664516646166471664816649166501665116652166531665416655166561665716658166591666016661166621666316664166651666616667166681666916670166711667216673166741667516676166771667816679166801668116682166831668416685166861668716688166891669016691166921669316694166951669616697166981669916700167011670216703167041670516706167071670816709167101671116712167131671416715167161671716718167191672016721167221672316724167251672616727167281672916730167311673216733167341673516736167371673816739167401674116742167431674416745167461674716748167491675016751167521675316754167551675616757167581675916760167611676216763167641676516766167671676816769167701677116772167731677416775167761677716778167791678016781167821678316784167851678616787167881678916790167911679216793167941679516796167971679816799168001680116802168031680416805168061680716808168091681016811168121681316814168151681616817168181681916820168211682216823168241682516826168271682816829168301683116832168331683416835168361683716838168391684016841168421684316844168451684616847168481684916850168511685216853168541685516856168571685816859168601686116862168631686416865168661686716868168691687016871168721687316874168751687616877168781687916880168811688216883168841688516886168871688816889168901689116892168931689416895168961689716898168991690016901169021690316904169051690616907169081690916910169111691216913169141691516916169171691816919169201692116922169231692416925169261692716928169291693016931169321693316934169351693616937169381693916940169411694216943169441694516946169471694816949169501695116952169531695416955169561695716958169591696016961169621696316964169651696616967169681696916970169711697216973169741697516976169771697816979169801698116982169831698416985169861698716988169891699016991169921699316994169951699616997169981699917000170011700217003170041700517006170071700817009170101701117012170131701417015170161701717018170191702017021170221702317024170251702617027170281702917030170311703217033170341703517036170371703817039170401704117042170431704417045170461704717048170491705017051170521705317054170551705617057170581705917060170611706217063170641706517066170671706817069170701707117072170731707417075170761707717078170791708017081170821708317084170851708617087170881708917090170911709217093170941709517096170971709817099171001710117102171031710417105171061710717108171091711017111171121711317114171151711617117171181711917120171211712217123171241712517126171271712817129171301713117132171331713417135171361713717138171391714017141171421714317144171451714617147171481714917150171511715217153171541715517156171571715817159171601716117162171631716417165171661716717168171691717017171171721717317174171751717617177171781717917180171811718217183171841718517186171871718817189171901719117192171931719417195171961719717198171991720017201172021720317204172051720617207172081720917210172111721217213172141721517216172171721817219172201722117222172231722417225172261722717228172291723017231172321723317234172351723617237172381723917240172411724217243172441724517246172471724817249172501725117252172531725417255172561725717258172591726017261172621726317264172651726617267172681726917270172711727217273172741727517276172771727817279172801728117282172831728417285172861728717288172891729017291172921729317294172951729617297172981729917300173011730217303173041730517306173071730817309173101731117312173131731417315173161731717318173191732017321173221732317324173251732617327173281732917330173311733217333173341733517336173371733817339173401734117342173431734417345173461734717348173491735017351173521735317354173551735617357173581735917360173611736217363173641736517366173671736817369173701737117372173731737417375173761737717378173791738017381173821738317384173851738617387173881738917390173911739217393173941739517396173971739817399174001740117402174031740417405174061740717408174091741017411174121741317414174151741617417174181741917420174211742217423174241742517426174271742817429174301743117432174331743417435174361743717438174391744017441174421744317444174451744617447174481744917450174511745217453174541745517456174571745817459174601746117462174631746417465174661746717468174691747017471174721747317474174751747617477174781747917480174811748217483174841748517486174871748817489174901749117492174931749417495174961749717498174991750017501175021750317504175051750617507175081750917510175111751217513175141751517516175171751817519175201752117522175231752417525175261752717528175291753017531175321753317534175351753617537175381753917540175411754217543175441754517546175471754817549175501755117552175531755417555175561755717558175591756017561175621756317564175651756617567175681756917570175711757217573175741757517576175771757817579175801758117582175831758417585175861758717588175891759017591175921759317594175951759617597175981759917600176011760217603176041760517606176071760817609176101761117612176131761417615176161761717618176191762017621176221762317624176251762617627176281762917630176311763217633176341763517636176371763817639176401764117642176431764417645176461764717648176491765017651176521765317654176551765617657176581765917660176611766217663176641766517666176671766817669176701767117672176731767417675176761767717678176791768017681176821768317684176851768617687176881768917690176911769217693176941769517696176971769817699177001770117702177031770417705177061770717708177091771017711177121771317714177151771617717177181771917720177211772217723177241772517726177271772817729177301773117732177331773417735177361773717738177391774017741177421774317744177451774617747177481774917750177511775217753177541775517756177571775817759177601776117762177631776417765177661776717768177691777017771177721777317774177751777617777177781777917780177811778217783177841778517786177871778817789177901779117792177931779417795177961779717798177991780017801178021780317804178051780617807178081780917810178111781217813178141781517816178171781817819178201782117822178231782417825178261782717828178291783017831178321783317834178351783617837178381783917840178411784217843178441784517846178471784817849178501785117852178531785417855178561785717858178591786017861178621786317864178651786617867178681786917870178711787217873178741787517876178771787817879178801788117882178831788417885178861788717888178891789017891178921789317894178951789617897178981789917900179011790217903179041790517906179071790817909179101791117912179131791417915179161791717918179191792017921179221792317924179251792617927179281792917930179311793217933179341793517936179371793817939179401794117942179431794417945179461794717948179491795017951179521795317954179551795617957179581795917960179611796217963179641796517966179671796817969179701797117972179731797417975179761797717978179791798017981179821798317984179851798617987179881798917990179911799217993179941799517996179971799817999180001800118002180031800418005180061800718008180091801018011180121801318014180151801618017180181801918020180211802218023180241802518026180271802818029180301803118032180331803418035180361803718038180391804018041180421804318044180451804618047180481804918050180511805218053180541805518056180571805818059180601806118062180631806418065180661806718068180691807018071180721807318074180751807618077180781807918080180811808218083180841808518086180871808818089180901809118092180931809418095180961809718098180991810018101181021810318104181051810618107181081810918110181111811218113181141811518116181171811818119181201812118122181231812418125181261812718128181291813018131181321813318134181351813618137181381813918140181411814218143181441814518146181471814818149181501815118152181531815418155181561815718158181591816018161181621816318164181651816618167181681816918170181711817218173181741817518176181771817818179181801818118182181831818418185181861818718188181891819018191181921819318194181951819618197181981819918200182011820218203182041820518206182071820818209182101821118212182131821418215182161821718218182191822018221182221822318224182251822618227182281822918230182311823218233182341823518236182371823818239182401824118242182431824418245182461824718248182491825018251182521825318254182551825618257182581825918260182611826218263182641826518266182671826818269182701827118272182731827418275182761827718278182791828018281182821828318284182851828618287182881828918290182911829218293182941829518296182971829818299183001830118302183031830418305183061830718308183091831018311183121831318314183151831618317183181831918320183211832218323183241832518326183271832818329183301833118332183331833418335183361833718338183391834018341183421834318344183451834618347183481834918350183511835218353183541835518356183571835818359183601836118362183631836418365183661836718368183691837018371183721837318374183751837618377183781837918380183811838218383183841838518386183871838818389183901839118392183931839418395183961839718398183991840018401184021840318404184051840618407184081840918410184111841218413184141841518416184171841818419184201842118422184231842418425184261842718428184291843018431184321843318434184351843618437184381843918440184411844218443184441844518446184471844818449184501845118452184531845418455184561845718458184591846018461184621846318464184651846618467184681846918470184711847218473184741847518476184771847818479184801848118482184831848418485184861848718488184891849018491184921849318494184951849618497184981849918500185011850218503185041850518506185071850818509185101851118512185131851418515185161851718518185191852018521185221852318524185251852618527185281852918530185311853218533185341853518536185371853818539185401854118542185431854418545185461854718548185491855018551185521855318554185551855618557185581855918560185611856218563185641856518566185671856818569185701857118572185731857418575185761857718578185791858018581185821858318584185851858618587185881858918590185911859218593185941859518596185971859818599186001860118602186031860418605186061860718608186091861018611186121861318614186151861618617186181861918620186211862218623186241862518626186271862818629186301863118632186331863418635186361863718638186391864018641186421864318644186451864618647186481864918650186511865218653186541865518656186571865818659186601866118662186631866418665186661866718668186691867018671186721867318674186751867618677186781867918680186811868218683186841868518686186871868818689186901869118692186931869418695186961869718698186991870018701187021870318704187051870618707187081870918710187111871218713187141871518716187171871818719187201872118722187231872418725187261872718728187291873018731187321873318734187351873618737187381873918740187411874218743187441874518746187471874818749187501875118752187531875418755187561875718758187591876018761187621876318764187651876618767187681876918770187711877218773187741877518776187771877818779187801878118782187831878418785187861878718788187891879018791187921879318794187951879618797187981879918800188011880218803188041880518806188071880818809188101881118812188131881418815188161881718818188191882018821188221882318824188251882618827188281882918830188311883218833188341883518836188371883818839188401884118842188431884418845188461884718848188491885018851188521885318854188551885618857188581885918860188611886218863188641886518866188671886818869188701887118872188731887418875188761887718878188791888018881188821888318884188851888618887188881888918890188911889218893188941889518896188971889818899189001890118902189031890418905189061890718908189091891018911189121891318914189151891618917189181891918920189211892218923189241892518926189271892818929189301893118932189331893418935189361893718938189391894018941189421894318944189451894618947189481894918950189511895218953189541895518956189571895818959189601896118962189631896418965189661896718968189691897018971189721897318974189751897618977189781897918980189811898218983189841898518986189871898818989189901899118992189931899418995189961899718998189991900019001190021900319004190051900619007190081900919010190111901219013190141901519016190171901819019190201902119022190231902419025190261902719028190291903019031190321903319034190351903619037190381903919040190411904219043190441904519046190471904819049190501905119052190531905419055190561905719058190591906019061190621906319064190651906619067190681906919070190711907219073190741907519076190771907819079190801908119082190831908419085190861908719088190891909019091190921909319094190951909619097190981909919100191011910219103191041910519106191071910819109191101911119112191131911419115191161911719118191191912019121191221912319124191251912619127191281912919130191311913219133191341913519136191371913819139191401914119142191431914419145191461914719148191491915019151191521915319154191551915619157191581915919160191611916219163191641916519166191671916819169191701917119172191731917419175191761917719178191791918019181191821918319184191851918619187191881918919190191911919219193191941919519196191971919819199192001920119202192031920419205192061920719208192091921019211192121921319214192151921619217192181921919220192211922219223192241922519226192271922819229192301923119232192331923419235192361923719238192391924019241192421924319244192451924619247192481924919250192511925219253192541925519256192571925819259192601926119262192631926419265192661926719268192691927019271192721927319274192751927619277192781927919280192811928219283192841928519286192871928819289192901929119292192931929419295192961929719298192991930019301193021930319304193051930619307193081930919310193111931219313193141931519316193171931819319193201932119322193231932419325193261932719328193291933019331193321933319334193351933619337193381933919340193411934219343193441934519346193471934819349193501935119352193531935419355193561935719358193591936019361193621936319364193651936619367193681936919370193711937219373193741937519376193771937819379193801938119382193831938419385193861938719388193891939019391193921939319394193951939619397193981939919400194011940219403194041940519406194071940819409194101941119412194131941419415194161941719418194191942019421194221942319424194251942619427194281942919430194311943219433194341943519436194371943819439194401944119442194431944419445194461944719448194491945019451194521945319454194551945619457194581945919460194611946219463194641946519466194671946819469194701947119472194731947419475194761947719478194791948019481194821948319484194851948619487194881948919490194911949219493194941949519496194971949819499195001950119502195031950419505195061950719508195091951019511195121951319514195151951619517195181951919520195211952219523195241952519526195271952819529195301953119532195331953419535195361953719538195391954019541195421954319544195451954619547195481954919550195511955219553195541955519556195571955819559195601956119562195631956419565195661956719568195691957019571195721957319574195751957619577195781957919580195811958219583195841958519586195871958819589195901959119592195931959419595195961959719598195991960019601196021960319604196051960619607196081960919610196111961219613196141961519616196171961819619196201962119622196231962419625196261962719628196291963019631196321963319634196351963619637196381963919640196411964219643196441964519646196471964819649196501965119652196531965419655196561965719658196591966019661196621966319664196651966619667196681966919670196711967219673196741967519676196771967819679196801968119682196831968419685196861968719688196891969019691196921969319694196951969619697196981969919700197011970219703197041970519706197071970819709197101971119712197131971419715197161971719718197191972019721197221972319724197251972619727197281972919730197311973219733197341973519736197371973819739197401974119742197431974419745197461974719748197491975019751197521975319754197551975619757197581975919760197611976219763197641976519766197671976819769197701977119772197731977419775197761977719778197791978019781197821978319784197851978619787197881978919790197911979219793197941979519796197971979819799198001980119802198031980419805198061980719808198091981019811198121981319814198151981619817198181981919820198211982219823198241982519826198271982819829198301983119832198331983419835198361983719838198391984019841198421984319844198451984619847198481984919850198511985219853198541985519856198571985819859198601986119862198631986419865198661986719868198691987019871198721987319874198751987619877198781987919880198811988219883198841988519886198871988819889198901989119892198931989419895198961989719898198991990019901199021990319904199051990619907199081990919910199111991219913199141991519916199171991819919199201992119922199231992419925199261992719928199291993019931199321993319934199351993619937199381993919940199411994219943199441994519946199471994819949199501995119952199531995419955199561995719958199591996019961199621996319964199651996619967199681996919970199711997219973199741997519976199771997819979199801998119982199831998419985199861998719988199891999019991199921999319994199951999619997199981999920000200012000220003200042000520006200072000820009200102001120012200132001420015200162001720018200192002020021200222002320024200252002620027200282002920030200312003220033200342003520036200372003820039200402004120042200432004420045200462004720048200492005020051200522005320054200552005620057200582005920060200612006220063200642006520066200672006820069200702007120072200732007420075200762007720078200792008020081200822008320084200852008620087200882008920090200912009220093200942009520096200972009820099201002010120102201032010420105201062010720108201092011020111201122011320114201152011620117201182011920120201212012220123201242012520126201272012820129201302013120132201332013420135201362013720138201392014020141201422014320144201452014620147201482014920150201512015220153201542015520156201572015820159201602016120162201632016420165201662016720168201692017020171201722017320174201752017620177201782017920180201812018220183201842018520186201872018820189201902019120192201932019420195201962019720198201992020020201202022020320204202052020620207202082020920210202112021220213202142021520216202172021820219202202022120222202232022420225202262022720228202292023020231202322023320234202352023620237202382023920240202412024220243202442024520246202472024820249202502025120252202532025420255202562025720258202592026020261202622026320264202652026620267202682026920270202712027220273202742027520276202772027820279202802028120282202832028420285202862028720288202892029020291202922029320294202952029620297202982029920300203012030220303203042030520306203072030820309203102031120312203132031420315203162031720318203192032020321203222032320324203252032620327203282032920330203312033220333203342033520336203372033820339203402034120342203432034420345203462034720348203492035020351203522035320354203552035620357203582035920360203612036220363203642036520366203672036820369203702037120372203732037420375203762037720378203792038020381203822038320384203852038620387203882038920390203912039220393203942039520396203972039820399204002040120402204032040420405204062040720408204092041020411204122041320414204152041620417204182041920420204212042220423204242042520426204272042820429204302043120432204332043420435204362043720438204392044020441204422044320444204452044620447204482044920450204512045220453204542045520456204572045820459204602046120462204632046420465204662046720468204692047020471204722047320474204752047620477204782047920480204812048220483204842048520486204872048820489204902049120492204932049420495204962049720498204992050020501205022050320504205052050620507205082050920510205112051220513205142051520516205172051820519205202052120522205232052420525205262052720528205292053020531205322053320534205352053620537205382053920540205412054220543205442054520546205472054820549205502055120552205532055420555205562055720558205592056020561205622056320564205652056620567205682056920570205712057220573205742057520576205772057820579205802058120582205832058420585205862058720588205892059020591205922059320594205952059620597205982059920600206012060220603206042060520606206072060820609206102061120612206132061420615206162061720618206192062020621206222062320624206252062620627206282062920630206312063220633206342063520636206372063820639206402064120642206432064420645206462064720648206492065020651206522065320654206552065620657206582065920660206612066220663206642066520666206672066820669206702067120672206732067420675206762067720678206792068020681206822068320684206852068620687206882068920690206912069220693206942069520696206972069820699207002070120702207032070420705207062070720708207092071020711207122071320714207152071620717207182071920720207212072220723207242072520726207272072820729207302073120732207332073420735207362073720738207392074020741207422074320744207452074620747207482074920750207512075220753207542075520756207572075820759207602076120762207632076420765207662076720768207692077020771207722077320774207752077620777207782077920780207812078220783207842078520786207872078820789207902079120792207932079420795207962079720798207992080020801208022080320804208052080620807208082080920810208112081220813208142081520816208172081820819208202082120822208232082420825208262082720828208292083020831208322083320834208352083620837208382083920840208412084220843208442084520846208472084820849208502085120852208532085420855208562085720858208592086020861208622086320864208652086620867208682086920870208712087220873208742087520876208772087820879208802088120882208832088420885208862088720888208892089020891208922089320894208952089620897208982089920900209012090220903209042090520906209072090820909209102091120912209132091420915209162091720918209192092020921209222092320924209252092620927209282092920930209312093220933209342093520936209372093820939209402094120942209432094420945209462094720948209492095020951209522095320954209552095620957209582095920960209612096220963209642096520966209672096820969209702097120972209732097420975209762097720978209792098020981209822098320984209852098620987209882098920990209912099220993209942099520996209972099820999210002100121002210032100421005210062100721008210092101021011210122101321014210152101621017210182101921020210212102221023210242102521026210272102821029210302103121032210332103421035210362103721038210392104021041210422104321044210452104621047210482104921050210512105221053210542105521056210572105821059210602106121062210632106421065210662106721068210692107021071210722107321074210752107621077210782107921080210812108221083210842108521086210872108821089210902109121092210932109421095210962109721098210992110021101211022110321104211052110621107211082110921110211112111221113211142111521116211172111821119211202112121122211232112421125211262112721128211292113021131211322113321134211352113621137211382113921140211412114221143211442114521146211472114821149211502115121152211532115421155211562115721158211592116021161211622116321164211652116621167211682116921170211712117221173211742117521176211772117821179211802118121182211832118421185211862118721188211892119021191211922119321194211952119621197211982119921200212012120221203212042120521206212072120821209212102121121212212132121421215212162121721218212192122021221212222122321224212252122621227212282122921230212312123221233212342123521236212372123821239212402124121242212432124421245212462124721248212492125021251212522125321254212552125621257212582125921260212612126221263212642126521266212672126821269212702127121272212732127421275212762127721278212792128021281212822128321284212852128621287212882128921290212912129221293212942129521296212972129821299213002130121302213032130421305213062130721308213092131021311213122131321314213152131621317213182131921320213212132221323213242132521326213272132821329213302133121332213332133421335213362133721338213392134021341213422134321344213452134621347213482134921350213512135221353213542135521356213572135821359213602136121362213632136421365213662136721368213692137021371213722137321374213752137621377213782137921380213812138221383213842138521386213872138821389213902139121392213932139421395213962139721398213992140021401214022140321404214052140621407214082140921410214112141221413214142141521416214172141821419214202142121422214232142421425214262142721428214292143021431214322143321434214352143621437214382143921440214412144221443214442144521446214472144821449214502145121452214532145421455214562145721458214592146021461214622146321464214652146621467214682146921470214712147221473214742147521476214772147821479214802148121482214832148421485214862148721488214892149021491214922149321494214952149621497214982149921500215012150221503215042150521506215072150821509215102151121512215132151421515215162151721518215192152021521215222152321524215252152621527215282152921530215312153221533215342153521536215372153821539215402154121542215432154421545215462154721548215492155021551215522155321554215552155621557215582155921560215612156221563215642156521566215672156821569215702157121572215732157421575215762157721578215792158021581215822158321584215852158621587215882158921590215912159221593215942159521596215972159821599216002160121602216032160421605216062160721608216092161021611216122161321614216152161621617216182161921620216212162221623216242162521626216272162821629216302163121632216332163421635216362163721638216392164021641216422164321644216452164621647216482164921650216512165221653216542165521656216572165821659216602166121662216632166421665216662166721668216692167021671216722167321674216752167621677216782167921680216812168221683216842168521686216872168821689216902169121692216932169421695216962169721698216992170021701217022170321704217052170621707217082170921710217112171221713217142171521716217172171821719217202172121722217232172421725217262172721728217292173021731217322173321734217352173621737217382173921740217412174221743217442174521746217472174821749217502175121752217532175421755217562175721758217592176021761217622176321764217652176621767217682176921770217712177221773217742177521776217772177821779217802178121782217832178421785217862178721788217892179021791217922179321794217952179621797217982179921800218012180221803218042180521806218072180821809218102181121812218132181421815218162181721818218192182021821218222182321824218252182621827218282182921830218312183221833218342183521836218372183821839218402184121842218432184421845218462184721848218492185021851218522185321854218552185621857218582185921860218612186221863218642186521866218672186821869218702187121872218732187421875218762187721878218792188021881218822188321884218852188621887218882188921890218912189221893218942189521896218972189821899219002190121902219032190421905219062190721908219092191021911219122191321914219152191621917219182191921920219212192221923219242192521926219272192821929219302193121932219332193421935219362193721938219392194021941219422194321944219452194621947219482194921950219512195221953219542195521956219572195821959219602196121962219632196421965219662196721968219692197021971219722197321974219752197621977219782197921980219812198221983219842198521986219872198821989219902199121992219932199421995219962199721998219992200022001220022200322004220052200622007220082200922010220112201222013220142201522016220172201822019220202202122022220232202422025220262202722028220292203022031220322203322034220352203622037220382203922040220412204222043220442204522046220472204822049220502205122052220532205422055220562205722058220592206022061220622206322064220652206622067220682206922070220712207222073220742207522076220772207822079220802208122082220832208422085220862208722088220892209022091220922209322094220952209622097220982209922100221012210222103221042210522106221072210822109221102211122112221132211422115221162211722118221192212022121221222212322124221252212622127221282212922130221312213222133221342213522136221372213822139221402214122142221432214422145221462214722148221492215022151221522215322154221552215622157221582215922160221612216222163221642216522166221672216822169221702217122172221732217422175221762217722178221792218022181221822218322184221852218622187221882218922190221912219222193221942219522196221972219822199222002220122202222032220422205222062220722208222092221022211222122221322214222152221622217222182221922220222212222222223222242222522226222272222822229222302223122232222332223422235222362223722238222392224022241222422224322244222452224622247222482224922250222512225222253222542225522256222572225822259222602226122262222632226422265222662226722268222692227022271222722227322274222752227622277222782227922280222812228222283222842228522286222872228822289222902229122292222932229422295222962229722298222992230022301223022230322304223052230622307223082230922310223112231222313223142231522316223172231822319223202232122322223232232422325223262232722328223292233022331223322233322334223352233622337223382233922340223412234222343223442234522346223472234822349223502235122352223532235422355223562235722358223592236022361223622236322364223652236622367223682236922370223712237222373223742237522376223772237822379223802238122382223832238422385223862238722388223892239022391223922239322394223952239622397223982239922400224012240222403224042240522406224072240822409224102241122412224132241422415224162241722418224192242022421224222242322424224252242622427224282242922430224312243222433224342243522436224372243822439224402244122442224432244422445224462244722448224492245022451224522245322454224552245622457224582245922460224612246222463224642246522466224672246822469224702247122472224732247422475224762247722478224792248022481224822248322484224852248622487224882248922490224912249222493224942249522496224972249822499225002250122502225032250422505225062250722508225092251022511225122251322514225152251622517225182251922520225212252222523225242252522526225272252822529225302253122532225332253422535225362253722538225392254022541225422254322544225452254622547225482254922550225512255222553225542255522556225572255822559225602256122562225632256422565225662256722568225692257022571225722257322574225752257622577225782257922580225812258222583225842258522586225872258822589225902259122592225932259422595225962259722598225992260022601226022260322604226052260622607226082260922610226112261222613226142261522616226172261822619226202262122622226232262422625226262262722628226292263022631226322263322634226352263622637226382263922640226412264222643226442264522646226472264822649226502265122652226532265422655226562265722658226592266022661226622266322664226652266622667226682266922670226712267222673226742267522676226772267822679226802268122682226832268422685226862268722688226892269022691226922269322694226952269622697226982269922700227012270222703227042270522706227072270822709227102271122712227132271422715227162271722718227192272022721227222272322724227252272622727227282272922730227312273222733227342273522736227372273822739227402274122742227432274422745227462274722748227492275022751227522275322754227552275622757227582275922760227612276222763227642276522766227672276822769227702277122772227732277422775227762277722778227792278022781227822278322784227852278622787227882278922790227912279222793227942279522796227972279822799228002280122802228032280422805228062280722808228092281022811228122281322814228152281622817228182281922820228212282222823228242282522826228272282822829228302283122832228332283422835228362283722838228392284022841228422284322844228452284622847228482284922850228512285222853228542285522856228572285822859228602286122862228632286422865228662286722868228692287022871228722287322874228752287622877228782287922880228812288222883228842288522886228872288822889228902289122892228932289422895228962289722898228992290022901229022290322904229052290622907229082290922910229112291222913229142291522916229172291822919229202292122922229232292422925229262292722928229292293022931229322293322934229352293622937229382293922940229412294222943229442294522946229472294822949229502295122952229532295422955229562295722958229592296022961229622296322964229652296622967229682296922970229712297222973229742297522976229772297822979229802298122982229832298422985229862298722988229892299022991229922299322994229952299622997229982299923000230012300223003230042300523006230072300823009230102301123012230132301423015230162301723018230192302023021230222302323024230252302623027230282302923030230312303223033230342303523036230372303823039230402304123042230432304423045230462304723048230492305023051230522305323054230552305623057230582305923060230612306223063230642306523066230672306823069230702307123072230732307423075230762307723078230792308023081230822308323084230852308623087230882308923090230912309223093230942309523096230972309823099231002310123102231032310423105231062310723108231092311023111231122311323114231152311623117231182311923120231212312223123231242312523126231272312823129231302313123132231332313423135231362313723138231392314023141231422314323144231452314623147231482314923150231512315223153231542315523156231572315823159231602316123162231632316423165231662316723168231692317023171231722317323174231752317623177231782317923180231812318223183231842318523186231872318823189231902319123192231932319423195231962319723198231992320023201232022320323204232052320623207232082320923210232112321223213232142321523216232172321823219232202322123222232232322423225232262322723228232292323023231232322323323234232352323623237232382323923240232412324223243232442324523246232472324823249232502325123252232532325423255232562325723258232592326023261232622326323264232652326623267232682326923270232712327223273232742327523276232772327823279232802328123282232832328423285232862328723288232892329023291232922329323294232952329623297232982329923300233012330223303233042330523306233072330823309233102331123312233132331423315233162331723318233192332023321233222332323324233252332623327233282332923330233312333223333233342333523336233372333823339233402334123342233432334423345233462334723348233492335023351233522335323354233552335623357233582335923360233612336223363233642336523366233672336823369233702337123372233732337423375233762337723378233792338023381233822338323384233852338623387233882338923390233912339223393233942339523396233972339823399234002340123402234032340423405234062340723408234092341023411234122341323414234152341623417234182341923420234212342223423234242342523426234272342823429234302343123432234332343423435234362343723438234392344023441234422344323444234452344623447234482344923450234512345223453234542345523456234572345823459234602346123462234632346423465234662346723468234692347023471234722347323474234752347623477234782347923480234812348223483234842348523486234872348823489234902349123492234932349423495234962349723498234992350023501235022350323504235052350623507235082350923510235112351223513235142351523516235172351823519235202352123522235232352423525235262352723528235292353023531235322353323534235352353623537235382353923540235412354223543235442354523546235472354823549235502355123552235532355423555235562355723558235592356023561235622356323564235652356623567235682356923570235712357223573235742357523576235772357823579235802358123582235832358423585235862358723588235892359023591235922359323594235952359623597235982359923600236012360223603236042360523606236072360823609236102361123612236132361423615236162361723618236192362023621236222362323624236252362623627236282362923630236312363223633236342363523636236372363823639236402364123642236432364423645236462364723648236492365023651236522365323654236552365623657236582365923660236612366223663236642366523666236672366823669236702367123672236732367423675236762367723678236792368023681236822368323684236852368623687236882368923690236912369223693236942369523696236972369823699237002370123702237032370423705237062370723708237092371023711237122371323714237152371623717237182371923720237212372223723237242372523726237272372823729237302373123732237332373423735237362373723738237392374023741237422374323744237452374623747237482374923750237512375223753237542375523756237572375823759237602376123762237632376423765237662376723768237692377023771237722377323774237752377623777237782377923780237812378223783237842378523786237872378823789237902379123792237932379423795237962379723798237992380023801238022380323804238052380623807238082380923810238112381223813238142381523816238172381823819238202382123822238232382423825238262382723828238292383023831238322383323834238352383623837238382383923840238412384223843238442384523846238472384823849238502385123852238532385423855238562385723858238592386023861238622386323864238652386623867238682386923870238712387223873238742387523876238772387823879238802388123882238832388423885238862388723888238892389023891238922389323894238952389623897238982389923900239012390223903239042390523906239072390823909239102391123912239132391423915239162391723918239192392023921239222392323924239252392623927239282392923930239312393223933239342393523936239372393823939239402394123942239432394423945239462394723948239492395023951239522395323954239552395623957239582395923960239612396223963239642396523966239672396823969239702397123972239732397423975239762397723978239792398023981239822398323984239852398623987239882398923990239912399223993239942399523996239972399823999240002400124002240032400424005240062400724008240092401024011240122401324014240152401624017240182401924020240212402224023240242402524026240272402824029240302403124032240332403424035240362403724038240392404024041240422404324044240452404624047240482404924050240512405224053240542405524056240572405824059240602406124062240632406424065240662406724068240692407024071240722407324074240752407624077240782407924080240812408224083240842408524086240872408824089240902409124092240932409424095240962409724098240992410024101241022410324104241052410624107241082410924110241112411224113241142411524116241172411824119241202412124122241232412424125241262412724128241292413024131241322413324134241352413624137241382413924140241412414224143241442414524146241472414824149241502415124152241532415424155241562415724158241592416024161241622416324164241652416624167241682416924170241712417224173241742417524176241772417824179241802418124182241832418424185241862418724188241892419024191241922419324194241952419624197241982419924200242012420224203242042420524206242072420824209242102421124212242132421424215242162421724218242192422024221242222422324224242252422624227242282422924230242312423224233242342423524236242372423824239242402424124242242432424424245242462424724248242492425024251242522425324254242552425624257242582425924260242612426224263242642426524266242672426824269242702427124272242732427424275242762427724278242792428024281242822428324284242852428624287242882428924290242912429224293242942429524296242972429824299243002430124302243032430424305243062430724308243092431024311243122431324314243152431624317243182431924320243212432224323243242432524326243272432824329243302433124332243332433424335243362433724338243392434024341243422434324344243452434624347243482434924350243512435224353243542435524356243572435824359243602436124362243632436424365243662436724368243692437024371243722437324374243752437624377243782437924380243812438224383243842438524386243872438824389243902439124392243932439424395243962439724398243992440024401244022440324404244052440624407244082440924410244112441224413244142441524416244172441824419244202442124422244232442424425244262442724428244292443024431244322443324434244352443624437244382443924440244412444224443244442444524446244472444824449244502445124452244532445424455244562445724458244592446024461244622446324464244652446624467244682446924470244712447224473244742447524476244772447824479244802448124482244832448424485244862448724488244892449024491244922449324494244952449624497244982449924500245012450224503245042450524506245072450824509245102451124512245132451424515245162451724518245192452024521245222452324524245252452624527245282452924530245312453224533245342453524536245372453824539245402454124542245432454424545245462454724548245492455024551245522455324554245552455624557245582455924560245612456224563245642456524566245672456824569245702457124572245732457424575245762457724578245792458024581245822458324584245852458624587245882458924590245912459224593245942459524596245972459824599246002460124602246032460424605246062460724608246092461024611246122461324614246152461624617246182461924620246212462224623246242462524626246272462824629246302463124632246332463424635246362463724638246392464024641246422464324644246452464624647246482464924650246512465224653246542465524656246572465824659246602466124662246632466424665246662466724668246692467024671246722467324674246752467624677246782467924680246812468224683246842468524686246872468824689246902469124692246932469424695246962469724698246992470024701247022470324704247052470624707247082470924710247112471224713247142471524716247172471824719247202472124722247232472424725247262472724728247292473024731247322473324734247352473624737247382473924740247412474224743247442474524746247472474824749247502475124752247532475424755247562475724758247592476024761247622476324764247652476624767247682476924770247712477224773247742477524776247772477824779247802478124782247832478424785247862478724788247892479024791247922479324794247952479624797247982479924800248012480224803248042480524806248072480824809248102481124812248132481424815248162481724818248192482024821248222482324824248252482624827248282482924830248312483224833248342483524836248372483824839248402484124842248432484424845248462484724848248492485024851248522485324854248552485624857248582485924860248612486224863248642486524866248672486824869248702487124872248732487424875248762487724878248792488024881248822488324884248852488624887248882488924890248912489224893248942489524896248972489824899249002490124902249032490424905249062490724908249092491024911249122491324914249152491624917249182491924920249212492224923249242492524926249272492824929249302493124932249332493424935249362493724938249392494024941249422494324944249452494624947249482494924950249512495224953249542495524956249572495824959249602496124962249632496424965249662496724968249692497024971249722497324974249752497624977249782497924980249812498224983249842498524986249872498824989249902499124992249932499424995249962499724998249992500025001250022500325004250052500625007250082500925010250112501225013250142501525016250172501825019250202502125022250232502425025250262502725028250292503025031250322503325034250352503625037250382503925040250412504225043250442504525046250472504825049250502505125052250532505425055250562505725058250592506025061250622506325064250652506625067250682506925070250712507225073250742507525076250772507825079250802508125082250832508425085250862508725088250892509025091250922509325094250952509625097250982509925100251012510225103251042510525106251072510825109251102511125112251132511425115251162511725118251192512025121251222512325124251252512625127251282512925130251312513225133251342513525136251372513825139251402514125142251432514425145251462514725148251492515025151251522515325154251552515625157251582515925160251612516225163251642516525166251672516825169251702517125172251732517425175251762517725178251792518025181251822518325184251852518625187251882518925190251912519225193251942519525196251972519825199252002520125202252032520425205252062520725208252092521025211252122521325214252152521625217252182521925220252212522225223252242522525226252272522825229252302523125232252332523425235252362523725238252392524025241252422524325244252452524625247252482524925250252512525225253252542525525256252572525825259252602526125262252632526425265252662526725268252692527025271252722527325274252752527625277252782527925280252812528225283252842528525286252872528825289252902529125292252932529425295252962529725298252992530025301253022530325304253052530625307253082530925310253112531225313253142531525316253172531825319253202532125322253232532425325253262532725328253292533025331253322533325334253352533625337253382533925340253412534225343253442534525346253472534825349253502535125352253532535425355253562535725358253592536025361253622536325364253652536625367253682536925370253712537225373253742537525376253772537825379253802538125382253832538425385253862538725388253892539025391253922539325394253952539625397253982539925400254012540225403254042540525406254072540825409254102541125412254132541425415254162541725418254192542025421254222542325424254252542625427254282542925430254312543225433254342543525436254372543825439254402544125442254432544425445254462544725448254492545025451254522545325454254552545625457254582545925460254612546225463254642546525466254672546825469254702547125472254732547425475254762547725478254792548025481254822548325484254852548625487254882548925490254912549225493254942549525496254972549825499255002550125502255032550425505255062550725508255092551025511255122551325514255152551625517255182551925520255212552225523255242552525526255272552825529255302553125532255332553425535255362553725538255392554025541255422554325544255452554625547255482554925550255512555225553255542555525556255572555825559255602556125562255632556425565255662556725568255692557025571255722557325574255752557625577255782557925580255812558225583255842558525586255872558825589255902559125592255932559425595255962559725598255992560025601256022560325604256052560625607256082560925610256112561225613256142561525616256172561825619256202562125622256232562425625256262562725628256292563025631256322563325634256352563625637256382563925640256412564225643256442564525646256472564825649256502565125652256532565425655256562565725658256592566025661256622566325664256652566625667256682566925670256712567225673256742567525676256772567825679256802568125682256832568425685256862568725688256892569025691256922569325694256952569625697256982569925700257012570225703257042570525706257072570825709257102571125712257132571425715257162571725718257192572025721257222572325724257252572625727257282572925730257312573225733257342573525736257372573825739257402574125742257432574425745257462574725748257492575025751257522575325754257552575625757257582575925760257612576225763257642576525766257672576825769257702577125772257732577425775257762577725778257792578025781257822578325784257852578625787257882578925790257912579225793257942579525796257972579825799258002580125802258032580425805258062580725808258092581025811258122581325814258152581625817258182581925820258212582225823258242582525826258272582825829258302583125832258332583425835258362583725838258392584025841258422584325844258452584625847258482584925850258512585225853258542585525856258572585825859258602586125862258632586425865258662586725868258692587025871258722587325874258752587625877258782587925880258812588225883258842588525886258872588825889258902589125892258932589425895258962589725898258992590025901259022590325904259052590625907259082590925910259112591225913259142591525916259172591825919259202592125922259232592425925259262592725928259292593025931259322593325934259352593625937259382593925940259412594225943259442594525946259472594825949259502595125952259532595425955259562595725958259592596025961259622596325964259652596625967259682596925970259712597225973259742597525976259772597825979259802598125982259832598425985259862598725988259892599025991259922599325994259952599625997259982599926000260012600226003260042600526006260072600826009260102601126012260132601426015260162601726018260192602026021260222602326024260252602626027260282602926030260312603226033260342603526036260372603826039260402604126042260432604426045260462604726048260492605026051260522605326054260552605626057260582605926060260612606226063260642606526066260672606826069260702607126072260732607426075260762607726078260792608026081260822608326084260852608626087260882608926090260912609226093260942609526096260972609826099261002610126102261032610426105261062610726108261092611026111261122611326114261152611626117261182611926120261212612226123261242612526126261272612826129261302613126132261332613426135261362613726138261392614026141261422614326144261452614626147261482614926150261512615226153261542615526156261572615826159261602616126162261632616426165261662616726168261692617026171261722617326174261752617626177261782617926180261812618226183261842618526186261872618826189261902619126192261932619426195261962619726198261992620026201262022620326204262052620626207262082620926210262112621226213262142621526216262172621826219262202622126222262232622426225262262622726228262292623026231262322623326234262352623626237262382623926240262412624226243262442624526246262472624826249262502625126252262532625426255262562625726258262592626026261262622626326264262652626626267262682626926270262712627226273262742627526276262772627826279262802628126282262832628426285262862628726288262892629026291262922629326294262952629626297262982629926300263012630226303263042630526306263072630826309263102631126312263132631426315263162631726318263192632026321263222632326324263252632626327263282632926330263312633226333263342633526336263372633826339263402634126342263432634426345263462634726348263492635026351263522635326354263552635626357263582635926360263612636226363263642636526366263672636826369263702637126372263732637426375263762637726378263792638026381263822638326384263852638626387263882638926390263912639226393263942639526396263972639826399264002640126402264032640426405264062640726408264092641026411264122641326414264152641626417264182641926420264212642226423264242642526426264272642826429264302643126432264332643426435264362643726438264392644026441264422644326444264452644626447264482644926450264512645226453264542645526456264572645826459264602646126462264632646426465264662646726468264692647026471264722647326474264752647626477264782647926480264812648226483264842648526486264872648826489264902649126492264932649426495264962649726498264992650026501265022650326504265052650626507265082650926510265112651226513265142651526516265172651826519265202652126522265232652426525265262652726528265292653026531265322653326534265352653626537265382653926540265412654226543265442654526546265472654826549265502655126552265532655426555265562655726558265592656026561265622656326564265652656626567265682656926570265712657226573265742657526576265772657826579265802658126582265832658426585265862658726588265892659026591265922659326594265952659626597265982659926600266012660226603266042660526606266072660826609266102661126612266132661426615266162661726618266192662026621266222662326624266252662626627266282662926630266312663226633266342663526636266372663826639266402664126642266432664426645266462664726648266492665026651266522665326654266552665626657266582665926660266612666226663266642666526666266672666826669266702667126672266732667426675266762667726678266792668026681266822668326684266852668626687266882668926690266912669226693266942669526696266972669826699267002670126702267032670426705267062670726708267092671026711267122671326714267152671626717267182671926720267212672226723267242672526726267272672826729267302673126732267332673426735267362673726738267392674026741267422674326744267452674626747267482674926750267512675226753267542675526756267572675826759267602676126762267632676426765267662676726768267692677026771267722677326774267752677626777267782677926780267812678226783267842678526786267872678826789267902679126792267932679426795267962679726798267992680026801268022680326804268052680626807268082680926810268112681226813268142681526816268172681826819268202682126822268232682426825268262682726828268292683026831268322683326834268352683626837268382683926840268412684226843268442684526846268472684826849268502685126852268532685426855268562685726858268592686026861268622686326864268652686626867268682686926870268712687226873268742687526876268772687826879268802688126882268832688426885268862688726888268892689026891268922689326894268952689626897268982689926900269012690226903269042690526906269072690826909269102691126912269132691426915269162691726918269192692026921269222692326924269252692626927269282692926930269312693226933269342693526936269372693826939269402694126942269432694426945269462694726948269492695026951269522695326954269552695626957269582695926960269612696226963269642696526966269672696826969269702697126972269732697426975269762697726978269792698026981269822698326984269852698626987269882698926990269912699226993269942699526996269972699826999270002700127002270032700427005270062700727008270092701027011270122701327014270152701627017270182701927020270212702227023270242702527026270272702827029270302703127032270332703427035270362703727038270392704027041270422704327044270452704627047270482704927050270512705227053270542705527056270572705827059270602706127062270632706427065270662706727068270692707027071270722707327074270752707627077270782707927080270812708227083270842708527086270872708827089270902709127092270932709427095270962709727098270992710027101271022710327104271052710627107271082710927110271112711227113271142711527116271172711827119271202712127122271232712427125271262712727128271292713027131271322713327134271352713627137271382713927140271412714227143271442714527146271472714827149271502715127152271532715427155271562715727158271592716027161271622716327164271652716627167271682716927170271712717227173271742717527176271772717827179271802718127182271832718427185271862718727188271892719027191271922719327194271952719627197271982719927200272012720227203272042720527206272072720827209272102721127212272132721427215272162721727218272192722027221272222722327224272252722627227272282722927230272312723227233272342723527236272372723827239272402724127242272432724427245272462724727248272492725027251272522725327254272552725627257272582725927260272612726227263272642726527266272672726827269272702727127272272732727427275272762727727278272792728027281272822728327284272852728627287272882728927290272912729227293272942729527296272972729827299273002730127302273032730427305273062730727308273092731027311273122731327314273152731627317273182731927320273212732227323273242732527326273272732827329273302733127332273332733427335273362733727338273392734027341273422734327344273452734627347273482734927350273512735227353273542735527356273572735827359273602736127362273632736427365273662736727368273692737027371273722737327374273752737627377273782737927380273812738227383273842738527386273872738827389273902739127392273932739427395273962739727398273992740027401274022740327404274052740627407274082740927410274112741227413274142741527416274172741827419274202742127422274232742427425274262742727428274292743027431274322743327434274352743627437274382743927440274412744227443274442744527446274472744827449274502745127452274532745427455274562745727458274592746027461274622746327464274652746627467274682746927470274712747227473274742747527476274772747827479274802748127482274832748427485274862748727488274892749027491274922749327494274952749627497274982749927500275012750227503275042750527506275072750827509275102751127512275132751427515275162751727518275192752027521275222752327524275252752627527275282752927530275312753227533275342753527536275372753827539275402754127542275432754427545275462754727548275492755027551275522755327554275552755627557275582755927560275612756227563275642756527566275672756827569275702757127572275732757427575275762757727578275792758027581275822758327584275852758627587275882758927590275912759227593275942759527596275972759827599276002760127602276032760427605276062760727608276092761027611276122761327614276152761627617276182761927620276212762227623276242762527626276272762827629276302763127632276332763427635276362763727638276392764027641276422764327644276452764627647276482764927650276512765227653276542765527656276572765827659276602766127662276632766427665276662766727668276692767027671276722767327674276752767627677276782767927680276812768227683276842768527686276872768827689276902769127692276932769427695276962769727698276992770027701277022770327704277052770627707277082770927710277112771227713277142771527716277172771827719277202772127722277232772427725277262772727728277292773027731277322773327734277352773627737277382773927740277412774227743277442774527746277472774827749277502775127752277532775427755277562775727758277592776027761277622776327764277652776627767277682776927770277712777227773277742777527776277772777827779277802778127782277832778427785277862778727788277892779027791277922779327794277952779627797277982779927800278012780227803278042780527806278072780827809278102781127812278132781427815278162781727818278192782027821278222782327824278252782627827278282782927830278312783227833278342783527836278372783827839278402784127842278432784427845278462784727848278492785027851278522785327854278552785627857278582785927860278612786227863278642786527866278672786827869278702787127872278732787427875278762787727878278792788027881278822788327884278852788627887278882788927890278912789227893278942789527896278972789827899279002790127902279032790427905279062790727908279092791027911279122791327914279152791627917279182791927920279212792227923279242792527926279272792827929279302793127932279332793427935279362793727938279392794027941279422794327944279452794627947279482794927950279512795227953279542795527956279572795827959279602796127962279632796427965279662796727968279692797027971279722797327974279752797627977279782797927980279812798227983279842798527986279872798827989279902799127992279932799427995279962799727998279992800028001280022800328004280052800628007280082800928010280112801228013280142801528016280172801828019280202802128022280232802428025280262802728028280292803028031280322803328034280352803628037280382803928040280412804228043280442804528046280472804828049280502805128052280532805428055280562805728058280592806028061280622806328064280652806628067280682806928070280712807228073280742807528076280772807828079280802808128082280832808428085280862808728088280892809028091280922809328094280952809628097280982809928100281012810228103281042810528106281072810828109281102811128112281132811428115281162811728118281192812028121281222812328124281252812628127281282812928130281312813228133281342813528136281372813828139281402814128142281432814428145281462814728148281492815028151281522815328154281552815628157281582815928160281612816228163281642816528166281672816828169281702817128172281732817428175281762817728178281792818028181281822818328184281852818628187281882818928190281912819228193281942819528196281972819828199282002820128202282032820428205282062820728208282092821028211282122821328214282152821628217282182821928220282212822228223282242822528226282272822828229282302823128232282332823428235282362823728238282392824028241282422824328244282452824628247282482824928250282512825228253282542825528256282572825828259282602826128262282632826428265282662826728268282692827028271282722827328274282752827628277282782827928280282812828228283282842828528286282872828828289282902829128292282932829428295282962829728298282992830028301283022830328304283052830628307283082830928310283112831228313283142831528316283172831828319283202832128322283232832428325283262832728328283292833028331283322833328334283352833628337283382833928340283412834228343283442834528346283472834828349283502835128352283532835428355283562835728358283592836028361283622836328364283652836628367283682836928370283712837228373283742837528376283772837828379283802838128382283832838428385283862838728388283892839028391283922839328394283952839628397283982839928400284012840228403284042840528406284072840828409284102841128412284132841428415284162841728418284192842028421284222842328424284252842628427284282842928430284312843228433284342843528436284372843828439284402844128442284432844428445284462844728448284492845028451284522845328454284552845628457284582845928460284612846228463284642846528466284672846828469284702847128472284732847428475284762847728478284792848028481284822848328484284852848628487284882848928490284912849228493284942849528496284972849828499285002850128502285032850428505285062850728508285092851028511285122851328514285152851628517285182851928520285212852228523285242852528526285272852828529285302853128532285332853428535285362853728538285392854028541285422854328544285452854628547285482854928550285512855228553285542855528556285572855828559285602856128562285632856428565285662856728568285692857028571285722857328574285752857628577285782857928580285812858228583285842858528586285872858828589285902859128592285932859428595285962859728598285992860028601286022860328604286052860628607286082860928610286112861228613286142861528616286172861828619286202862128622286232862428625286262862728628286292863028631286322863328634286352863628637286382863928640286412864228643286442864528646286472864828649286502865128652286532865428655286562865728658286592866028661286622866328664286652866628667286682866928670286712867228673286742867528676286772867828679286802868128682286832868428685286862868728688286892869028691286922869328694286952869628697286982869928700287012870228703287042870528706287072870828709287102871128712287132871428715287162871728718287192872028721287222872328724287252872628727287282872928730287312873228733287342873528736287372873828739287402874128742287432874428745287462874728748287492875028751287522875328754287552875628757287582875928760287612876228763287642876528766287672876828769287702877128772287732877428775287762877728778287792878028781287822878328784287852878628787287882878928790287912879228793287942879528796287972879828799288002880128802288032880428805288062880728808288092881028811288122881328814288152881628817288182881928820288212882228823288242882528826288272882828829288302883128832288332883428835288362883728838288392884028841288422884328844288452884628847288482884928850288512885228853288542885528856288572885828859288602886128862288632886428865288662886728868288692887028871288722887328874288752887628877288782887928880288812888228883288842888528886288872888828889288902889128892288932889428895288962889728898288992890028901289022890328904289052890628907289082890928910289112891228913289142891528916289172891828919289202892128922289232892428925289262892728928289292893028931289322893328934289352893628937289382893928940289412894228943289442894528946289472894828949289502895128952289532895428955289562895728958289592896028961289622896328964289652896628967289682896928970289712897228973289742897528976289772897828979289802898128982289832898428985289862898728988289892899028991289922899328994289952899628997289982899929000290012900229003290042900529006290072900829009290102901129012290132901429015290162901729018290192902029021290222902329024290252902629027290282902929030290312903229033290342903529036290372903829039290402904129042290432904429045290462904729048290492905029051290522905329054290552905629057290582905929060290612906229063290642906529066290672906829069290702907129072290732907429075290762907729078290792908029081290822908329084290852908629087290882908929090290912909229093290942909529096290972909829099291002910129102291032910429105291062910729108291092911029111291122911329114291152911629117291182911929120291212912229123291242912529126291272912829129291302913129132291332913429135291362913729138291392914029141291422914329144291452914629147291482914929150291512915229153291542915529156291572915829159291602916129162291632916429165291662916729168291692917029171291722917329174291752917629177291782917929180291812918229183291842918529186291872918829189291902919129192291932919429195291962919729198291992920029201292022920329204292052920629207292082920929210292112921229213292142921529216292172921829219292202922129222292232922429225292262922729228292292923029231292322923329234292352923629237292382923929240292412924229243292442924529246292472924829249292502925129252292532925429255292562925729258292592926029261292622926329264292652926629267292682926929270292712927229273292742927529276292772927829279292802928129282292832928429285292862928729288292892929029291292922929329294292952929629297292982929929300293012930229303293042930529306293072930829309293102931129312293132931429315293162931729318293192932029321293222932329324293252932629327293282932929330293312933229333293342933529336293372933829339293402934129342293432934429345293462934729348293492935029351293522935329354293552935629357293582935929360293612936229363293642936529366293672936829369293702937129372293732937429375293762937729378293792938029381293822938329384293852938629387293882938929390293912939229393293942939529396293972939829399294002940129402294032940429405294062940729408294092941029411294122941329414294152941629417294182941929420294212942229423294242942529426294272942829429294302943129432294332943429435294362943729438294392944029441294422944329444294452944629447294482944929450294512945229453294542945529456294572945829459294602946129462294632946429465294662946729468294692947029471294722947329474294752947629477294782947929480294812948229483294842948529486294872948829489294902949129492294932949429495294962949729498294992950029501295022950329504295052950629507295082950929510295112951229513295142951529516295172951829519295202952129522295232952429525295262952729528295292953029531295322953329534295352953629537295382953929540295412954229543295442954529546295472954829549295502955129552295532955429555295562955729558295592956029561295622956329564295652956629567295682956929570295712957229573295742957529576295772957829579295802958129582295832958429585295862958729588295892959029591295922959329594295952959629597295982959929600296012960229603296042960529606296072960829609296102961129612296132961429615296162961729618296192962029621296222962329624296252962629627296282962929630296312963229633296342963529636296372963829639296402964129642296432964429645296462964729648296492965029651296522965329654296552965629657296582965929660296612966229663296642966529666296672966829669296702967129672296732967429675296762967729678296792968029681296822968329684296852968629687296882968929690296912969229693296942969529696296972969829699297002970129702297032970429705297062970729708297092971029711297122971329714297152971629717297182971929720297212972229723297242972529726297272972829729297302973129732297332973429735297362973729738297392974029741297422974329744297452974629747297482974929750297512975229753297542975529756297572975829759297602976129762297632976429765297662976729768297692977029771297722977329774297752977629777297782977929780297812978229783297842978529786297872978829789297902979129792297932979429795297962979729798297992980029801298022980329804298052980629807298082980929810298112981229813298142981529816298172981829819298202982129822298232982429825298262982729828298292983029831298322983329834298352983629837298382983929840298412984229843298442984529846298472984829849298502985129852298532985429855298562985729858298592986029861298622986329864298652986629867298682986929870298712987229873298742987529876298772987829879298802988129882298832988429885298862988729888298892989029891298922989329894298952989629897298982989929900299012990229903299042990529906299072990829909299102991129912299132991429915299162991729918299192992029921299222992329924299252992629927299282992929930299312993229933299342993529936299372993829939299402994129942299432994429945299462994729948299492995029951299522995329954299552995629957299582995929960299612996229963299642996529966299672996829969299702997129972299732997429975299762997729978299792998029981299822998329984299852998629987299882998929990299912999229993299942999529996299972999829999300003000130002300033000430005300063000730008300093001030011300123001330014300153001630017300183001930020300213002230023300243002530026300273002830029300303003130032300333003430035300363003730038300393004030041300423004330044300453004630047300483004930050300513005230053300543005530056300573005830059300603006130062300633006430065300663006730068300693007030071300723007330074300753007630077300783007930080300813008230083300843008530086300873008830089300903009130092300933009430095300963009730098300993010030101301023010330104301053010630107301083010930110301113011230113301143011530116301173011830119301203012130122301233012430125301263012730128301293013030131301323013330134301353013630137301383013930140301413014230143301443014530146301473014830149301503015130152301533015430155301563015730158301593016030161301623016330164301653016630167301683016930170301713017230173301743017530176301773017830179301803018130182301833018430185301863018730188301893019030191301923019330194301953019630197301983019930200302013020230203302043020530206302073020830209302103021130212302133021430215302163021730218302193022030221302223022330224302253022630227302283022930230302313023230233302343023530236302373023830239302403024130242302433024430245302463024730248302493025030251302523025330254302553025630257302583025930260302613026230263302643026530266302673026830269302703027130272302733027430275302763027730278302793028030281302823028330284302853028630287302883028930290302913029230293302943029530296302973029830299303003030130302303033030430305303063030730308303093031030311303123031330314303153031630317303183031930320303213032230323303243032530326303273032830329303303033130332303333033430335303363033730338303393034030341303423034330344303453034630347303483034930350303513035230353303543035530356303573035830359303603036130362303633036430365303663036730368303693037030371303723037330374303753037630377303783037930380303813038230383303843038530386303873038830389303903039130392303933039430395303963039730398303993040030401304023040330404304053040630407304083040930410304113041230413304143041530416304173041830419304203042130422304233042430425304263042730428304293043030431304323043330434304353043630437304383043930440304413044230443304443044530446304473044830449304503045130452304533045430455304563045730458304593046030461304623046330464304653046630467304683046930470304713047230473304743047530476304773047830479304803048130482304833048430485304863048730488304893049030491304923049330494304953049630497304983049930500305013050230503305043050530506305073050830509305103051130512305133051430515305163051730518305193052030521305223052330524305253052630527305283052930530305313053230533305343053530536305373053830539305403054130542305433054430545305463054730548305493055030551305523055330554305553055630557305583055930560305613056230563305643056530566305673056830569305703057130572305733057430575305763057730578305793058030581305823058330584305853058630587305883058930590305913059230593305943059530596305973059830599306003060130602306033060430605306063060730608306093061030611306123061330614306153061630617306183061930620306213062230623306243062530626306273062830629306303063130632306333063430635306363063730638306393064030641306423064330644306453064630647306483064930650306513065230653306543065530656306573065830659306603066130662306633066430665306663066730668306693067030671306723067330674306753067630677306783067930680306813068230683306843068530686306873068830689306903069130692306933069430695306963069730698306993070030701307023070330704307053070630707307083070930710307113071230713307143071530716307173071830719307203072130722307233072430725307263072730728307293073030731307323073330734307353073630737307383073930740307413074230743307443074530746307473074830749307503075130752307533075430755307563075730758307593076030761307623076330764307653076630767307683076930770307713077230773307743077530776307773077830779307803078130782307833078430785307863078730788307893079030791307923079330794307953079630797307983079930800308013080230803308043080530806308073080830809308103081130812308133081430815308163081730818308193082030821308223082330824308253082630827308283082930830308313083230833308343083530836308373083830839308403084130842308433084430845308463084730848308493085030851308523085330854308553085630857308583085930860308613086230863308643086530866308673086830869308703087130872308733087430875308763087730878308793088030881308823088330884308853088630887308883088930890308913089230893308943089530896308973089830899309003090130902309033090430905309063090730908309093091030911309123091330914309153091630917309183091930920309213092230923309243092530926309273092830929309303093130932309333093430935309363093730938309393094030941309423094330944309453094630947309483094930950309513095230953309543095530956309573095830959309603096130962309633096430965309663096730968309693097030971309723097330974309753097630977309783097930980309813098230983309843098530986309873098830989309903099130992309933099430995309963099730998309993100031001310023100331004310053100631007310083100931010310113101231013310143101531016310173101831019310203102131022310233102431025310263102731028310293103031031310323103331034310353103631037310383103931040310413104231043310443104531046310473104831049310503105131052310533105431055310563105731058310593106031061310623106331064310653106631067310683106931070310713107231073310743107531076310773107831079310803108131082310833108431085310863108731088310893109031091310923109331094310953109631097310983109931100311013110231103311043110531106311073110831109311103111131112311133111431115311163111731118311193112031121311223112331124311253112631127311283112931130311313113231133311343113531136311373113831139311403114131142311433114431145311463114731148311493115031151311523115331154311553115631157311583115931160311613116231163311643116531166311673116831169311703117131172311733117431175311763117731178311793118031181311823118331184311853118631187311883118931190311913119231193311943119531196311973119831199312003120131202312033120431205312063120731208312093121031211312123121331214312153121631217312183121931220312213122231223312243122531226312273122831229312303123131232312333123431235312363123731238312393124031241312423124331244312453124631247312483124931250312513125231253312543125531256312573125831259312603126131262312633126431265312663126731268312693127031271312723127331274312753127631277312783127931280312813128231283312843128531286312873128831289312903129131292312933129431295312963129731298312993130031301313023130331304313053130631307313083130931310313113131231313313143131531316313173131831319313203132131322313233132431325313263132731328313293133031331313323133331334313353133631337313383133931340313413134231343313443134531346313473134831349313503135131352313533135431355313563135731358313593136031361313623136331364313653136631367313683136931370313713137231373313743137531376313773137831379313803138131382313833138431385313863138731388313893139031391313923139331394313953139631397313983139931400314013140231403314043140531406314073140831409314103141131412314133141431415314163141731418314193142031421314223142331424314253142631427314283142931430314313143231433314343143531436314373143831439314403144131442314433144431445314463144731448314493145031451314523145331454314553145631457314583145931460314613146231463314643146531466314673146831469314703147131472314733147431475314763147731478314793148031481314823148331484314853148631487314883148931490314913149231493314943149531496314973149831499315003150131502315033150431505315063150731508315093151031511315123151331514315153151631517315183151931520315213152231523315243152531526315273152831529315303153131532315333153431535315363153731538315393154031541315423154331544315453154631547315483154931550315513155231553315543155531556315573155831559315603156131562315633156431565315663156731568315693157031571315723157331574315753157631577315783157931580315813158231583315843158531586315873158831589315903159131592315933159431595315963159731598315993160031601316023160331604316053160631607316083160931610316113161231613316143161531616316173161831619316203162131622316233162431625316263162731628316293163031631316323163331634316353163631637316383163931640316413164231643316443164531646316473164831649316503165131652316533165431655316563165731658316593166031661316623166331664316653166631667316683166931670316713167231673316743167531676316773167831679316803168131682316833168431685316863168731688316893169031691316923169331694316953169631697316983169931700317013170231703317043170531706317073170831709317103171131712317133171431715317163171731718317193172031721317223172331724317253172631727317283172931730317313173231733317343173531736317373173831739317403174131742317433174431745317463174731748317493175031751317523175331754317553175631757317583175931760317613176231763317643176531766317673176831769317703177131772317733177431775317763177731778317793178031781317823178331784317853178631787317883178931790317913179231793317943179531796317973179831799318003180131802318033180431805318063180731808318093181031811318123181331814318153181631817318183181931820318213182231823318243182531826318273182831829318303183131832318333183431835318363183731838318393184031841318423184331844318453184631847318483184931850318513185231853318543185531856318573185831859318603186131862318633186431865318663186731868318693187031871318723187331874318753187631877318783187931880318813188231883318843188531886318873188831889318903189131892318933189431895318963189731898318993190031901319023190331904319053190631907319083190931910319113191231913319143191531916319173191831919319203192131922319233192431925319263192731928319293193031931319323193331934319353193631937319383193931940319413194231943319443194531946319473194831949319503195131952319533195431955319563195731958319593196031961319623196331964319653196631967319683196931970319713197231973319743197531976319773197831979319803198131982319833198431985319863198731988319893199031991319923199331994319953199631997319983199932000320013200232003320043200532006320073200832009320103201132012320133201432015320163201732018320193202032021320223202332024320253202632027320283202932030320313203232033320343203532036320373203832039320403204132042320433204432045320463204732048320493205032051320523205332054320553205632057320583205932060320613206232063320643206532066320673206832069320703207132072320733207432075320763207732078320793208032081320823208332084320853208632087320883208932090320913209232093320943209532096320973209832099321003210132102321033210432105321063210732108321093211032111321123211332114321153211632117321183211932120321213212232123321243212532126321273212832129321303213132132321333213432135321363213732138321393214032141321423214332144321453214632147321483214932150321513215232153321543215532156321573215832159321603216132162321633216432165321663216732168321693217032171321723217332174321753217632177321783217932180321813218232183321843218532186321873218832189321903219132192321933219432195321963219732198321993220032201322023220332204322053220632207322083220932210322113221232213322143221532216322173221832219322203222132222322233222432225322263222732228322293223032231322323223332234322353223632237322383223932240322413224232243322443224532246322473224832249322503225132252322533225432255322563225732258322593226032261322623226332264322653226632267322683226932270322713227232273322743227532276322773227832279322803228132282322833228432285322863228732288322893229032291322923229332294322953229632297322983229932300323013230232303323043230532306323073230832309323103231132312323133231432315323163231732318323193232032321323223232332324323253232632327323283232932330323313233232333323343233532336323373233832339323403234132342323433234432345323463234732348323493235032351323523235332354323553235632357323583235932360323613236232363323643236532366323673236832369323703237132372323733237432375323763237732378323793238032381323823238332384323853238632387323883238932390323913239232393323943239532396323973239832399324003240132402324033240432405324063240732408324093241032411324123241332414324153241632417324183241932420324213242232423324243242532426324273242832429324303243132432324333243432435324363243732438324393244032441324423244332444324453244632447324483244932450324513245232453324543245532456324573245832459324603246132462324633246432465324663246732468324693247032471324723247332474324753247632477324783247932480324813248232483324843248532486324873248832489324903249132492324933249432495324963249732498324993250032501325023250332504325053250632507325083250932510325113251232513325143251532516325173251832519325203252132522325233252432525325263252732528325293253032531325323253332534325353253632537325383253932540325413254232543325443254532546325473254832549325503255132552325533255432555325563255732558325593256032561325623256332564325653256632567325683256932570325713257232573325743257532576325773257832579325803258132582325833258432585325863258732588325893259032591325923259332594325953259632597325983259932600326013260232603326043260532606326073260832609326103261132612326133261432615326163261732618326193262032621326223262332624326253262632627326283262932630326313263232633326343263532636326373263832639326403264132642326433264432645326463264732648326493265032651326523265332654326553265632657326583265932660326613266232663326643266532666326673266832669326703267132672326733267432675326763267732678326793268032681326823268332684326853268632687326883268932690326913269232693326943269532696326973269832699327003270132702327033270432705327063270732708327093271032711327123271332714327153271632717327183271932720327213272232723327243272532726327273272832729327303273132732327333273432735327363273732738327393274032741327423274332744327453274632747327483274932750327513275232753327543275532756327573275832759327603276132762327633276432765327663276732768327693277032771327723277332774327753277632777327783277932780327813278232783327843278532786327873278832789327903279132792327933279432795327963279732798327993280032801328023280332804328053280632807328083280932810328113281232813328143281532816328173281832819328203282132822328233282432825328263282732828328293283032831328323283332834328353283632837328383283932840328413284232843328443284532846328473284832849328503285132852328533285432855328563285732858328593286032861328623286332864328653286632867328683286932870328713287232873328743287532876328773287832879328803288132882328833288432885328863288732888328893289032891328923289332894328953289632897328983289932900329013290232903329043290532906329073290832909329103291132912329133291432915329163291732918329193292032921329223292332924329253292632927329283292932930329313293232933329343293532936329373293832939329403294132942329433294432945329463294732948329493295032951329523295332954329553295632957329583295932960329613296232963329643296532966329673296832969329703297132972329733297432975329763297732978329793298032981329823298332984329853298632987329883298932990329913299232993329943299532996329973299832999330003300133002330033300433005330063300733008330093301033011330123301333014330153301633017330183301933020330213302233023330243302533026330273302833029330303303133032330333303433035330363303733038330393304033041330423304333044330453304633047330483304933050330513305233053330543305533056330573305833059330603306133062330633306433065330663306733068330693307033071330723307333074330753307633077330783307933080330813308233083330843308533086330873308833089330903309133092330933309433095330963309733098330993310033101331023310333104331053310633107331083310933110331113311233113331143311533116331173311833119331203312133122331233312433125331263312733128331293313033131331323313333134331353313633137331383313933140331413314233143331443314533146331473314833149331503315133152331533315433155331563315733158331593316033161331623316333164331653316633167331683316933170331713317233173331743317533176331773317833179331803318133182331833318433185331863318733188331893319033191331923319333194331953319633197331983319933200332013320233203332043320533206332073320833209332103321133212332133321433215332163321733218332193322033221332223322333224332253322633227332283322933230332313323233233332343323533236332373323833239332403324133242332433324433245332463324733248332493325033251332523325333254332553325633257332583325933260332613326233263332643326533266332673326833269332703327133272332733327433275332763327733278332793328033281332823328333284332853328633287332883328933290332913329233293332943329533296332973329833299333003330133302333033330433305333063330733308333093331033311333123331333314333153331633317333183331933320333213332233323333243332533326333273332833329333303333133332333333333433335333363333733338333393334033341333423334333344333453334633347333483334933350333513335233353333543335533356333573335833359333603336133362333633336433365333663336733368333693337033371333723337333374333753337633377333783337933380333813338233383333843338533386333873338833389333903339133392333933339433395333963339733398333993340033401334023340333404334053340633407334083340933410334113341233413334143341533416334173341833419334203342133422334233342433425334263342733428334293343033431334323343333434334353343633437334383343933440334413344233443334443344533446334473344833449334503345133452334533345433455334563345733458334593346033461334623346333464334653346633467334683346933470334713347233473334743347533476334773347833479334803348133482334833348433485334863348733488334893349033491334923349333494334953349633497334983349933500335013350233503335043350533506335073350833509335103351133512335133351433515335163351733518335193352033521335223352333524335253352633527335283352933530335313353233533335343353533536335373353833539335403354133542335433354433545335463354733548335493355033551335523355333554335553355633557335583355933560335613356233563335643356533566335673356833569335703357133572335733357433575335763357733578335793358033581335823358333584335853358633587335883358933590335913359233593335943359533596335973359833599336003360133602336033360433605336063360733608336093361033611336123361333614336153361633617336183361933620336213362233623336243362533626336273362833629336303363133632336333363433635336363363733638336393364033641336423364333644336453364633647336483364933650336513365233653336543365533656336573365833659336603366133662336633366433665336663366733668336693367033671336723367333674336753367633677336783367933680336813368233683336843368533686336873368833689336903369133692336933369433695336963369733698336993370033701337023370333704337053370633707337083370933710337113371233713337143371533716337173371833719337203372133722337233372433725337263372733728337293373033731337323373333734337353373633737337383373933740337413374233743337443374533746337473374833749337503375133752337533375433755337563375733758337593376033761337623376333764337653376633767337683376933770337713377233773337743377533776337773377833779337803378133782337833378433785337863378733788337893379033791337923379333794337953379633797337983379933800338013380233803338043380533806338073380833809338103381133812338133381433815338163381733818338193382033821338223382333824338253382633827338283382933830338313383233833338343383533836338373383833839338403384133842338433384433845338463384733848338493385033851338523385333854338553385633857338583385933860338613386233863338643386533866338673386833869338703387133872338733387433875338763387733878338793388033881338823388333884338853388633887338883388933890338913389233893338943389533896338973389833899339003390133902339033390433905339063390733908339093391033911339123391333914339153391633917339183391933920339213392233923339243392533926339273392833929339303393133932339333393433935339363393733938339393394033941339423394333944339453394633947339483394933950339513395233953339543395533956339573395833959339603396133962339633396433965339663396733968339693397033971339723397333974339753397633977339783397933980339813398233983339843398533986339873398833989339903399133992339933399433995339963399733998339993400034001340023400334004340053400634007340083400934010340113401234013340143401534016340173401834019340203402134022340233402434025340263402734028340293403034031340323403334034340353403634037340383403934040340413404234043340443404534046340473404834049340503405134052340533405434055340563405734058340593406034061340623406334064340653406634067340683406934070340713407234073340743407534076340773407834079340803408134082340833408434085340863408734088340893409034091340923409334094340953409634097340983409934100341013410234103341043410534106341073410834109341103411134112341133411434115341163411734118341193412034121341223412334124341253412634127341283412934130341313413234133341343413534136341373413834139341403414134142341433414434145341463414734148341493415034151341523415334154341553415634157341583415934160341613416234163341643416534166341673416834169341703417134172341733417434175341763417734178341793418034181341823418334184341853418634187341883418934190341913419234193341943419534196341973419834199342003420134202342033420434205342063420734208342093421034211342123421334214342153421634217342183421934220342213422234223342243422534226342273422834229342303423134232342333423434235342363423734238342393424034241342423424334244342453424634247342483424934250342513425234253342543425534256342573425834259342603426134262342633426434265342663426734268342693427034271342723427334274342753427634277342783427934280342813428234283342843428534286342873428834289342903429134292342933429434295342963429734298342993430034301343023430334304343053430634307343083430934310343113431234313343143431534316343173431834319343203432134322343233432434325343263432734328343293433034331343323433334334343353433634337343383433934340343413434234343343443434534346343473434834349343503435134352343533435434355343563435734358343593436034361343623436334364343653436634367343683436934370343713437234373343743437534376343773437834379343803438134382343833438434385343863438734388343893439034391343923439334394343953439634397343983439934400344013440234403344043440534406344073440834409344103441134412344133441434415344163441734418344193442034421344223442334424344253442634427344283442934430344313443234433344343443534436344373443834439344403444134442344433444434445344463444734448344493445034451344523445334454344553445634457344583445934460344613446234463344643446534466344673446834469344703447134472344733447434475344763447734478344793448034481344823448334484344853448634487344883448934490344913449234493344943449534496344973449834499345003450134502345033450434505345063450734508345093451034511345123451334514345153451634517345183451934520345213452234523345243452534526345273452834529345303453134532345333453434535345363453734538345393454034541345423454334544345453454634547345483454934550345513455234553345543455534556345573455834559345603456134562345633456434565345663456734568345693457034571345723457334574345753457634577345783457934580345813458234583345843458534586345873458834589345903459134592345933459434595345963459734598345993460034601346023460334604346053460634607346083460934610346113461234613346143461534616346173461834619346203462134622346233462434625346263462734628346293463034631346323463334634346353463634637346383463934640346413464234643346443464534646346473464834649346503465134652346533465434655346563465734658346593466034661346623466334664346653466634667346683466934670346713467234673346743467534676346773467834679346803468134682346833468434685346863468734688346893469034691346923469334694346953469634697346983469934700347013470234703347043470534706347073470834709347103471134712347133471434715347163471734718347193472034721347223472334724347253472634727347283472934730347313473234733347343473534736347373473834739347403474134742347433474434745347463474734748347493475034751347523475334754347553475634757347583475934760347613476234763347643476534766347673476834769347703477134772347733477434775347763477734778347793478034781347823478334784347853478634787347883478934790347913479234793347943479534796347973479834799348003480134802348033480434805348063480734808348093481034811348123481334814348153481634817348183481934820348213482234823348243482534826348273482834829348303483134832348333483434835348363483734838348393484034841348423484334844348453484634847348483484934850348513485234853348543485534856348573485834859348603486134862348633486434865348663486734868348693487034871348723487334874348753487634877348783487934880348813488234883348843488534886348873488834889348903489134892348933489434895348963489734898348993490034901349023490334904349053490634907349083490934910349113491234913349143491534916349173491834919349203492134922349233492434925349263492734928349293493034931349323493334934349353493634937349383493934940349413494234943349443494534946349473494834949349503495134952349533495434955349563495734958349593496034961349623496334964349653496634967349683496934970349713497234973349743497534976349773497834979349803498134982349833498434985349863498734988349893499034991349923499334994349953499634997349983499935000350013500235003350043500535006350073500835009350103501135012350133501435015350163501735018350193502035021350223502335024350253502635027350283502935030350313503235033350343503535036350373503835039350403504135042350433504435045350463504735048350493505035051350523505335054350553505635057350583505935060350613506235063350643506535066350673506835069350703507135072350733507435075350763507735078350793508035081350823508335084350853508635087350883508935090350913509235093350943509535096350973509835099351003510135102351033510435105351063510735108351093511035111351123511335114351153511635117351183511935120351213512235123351243512535126351273512835129351303513135132351333513435135351363513735138351393514035141351423514335144351453514635147351483514935150351513515235153351543515535156351573515835159351603516135162351633516435165351663516735168351693517035171351723517335174351753517635177351783517935180351813518235183351843518535186351873518835189351903519135192351933519435195351963519735198351993520035201352023520335204352053520635207352083520935210352113521235213352143521535216352173521835219352203522135222352233522435225352263522735228352293523035231352323523335234352353523635237352383523935240352413524235243352443524535246352473524835249352503525135252352533525435255352563525735258352593526035261352623526335264352653526635267352683526935270352713527235273352743527535276352773527835279352803528135282352833528435285352863528735288352893529035291352923529335294352953529635297352983529935300353013530235303353043530535306353073530835309353103531135312353133531435315353163531735318353193532035321353223532335324353253532635327353283532935330353313533235333353343533535336353373533835339353403534135342353433534435345353463534735348353493535035351353523535335354353553535635357353583535935360353613536235363353643536535366353673536835369353703537135372353733537435375353763537735378353793538035381353823538335384353853538635387353883538935390353913539235393353943539535396353973539835399354003540135402354033540435405354063540735408354093541035411354123541335414354153541635417354183541935420354213542235423354243542535426354273542835429354303543135432354333543435435354363543735438354393544035441354423544335444354453544635447354483544935450354513545235453354543545535456354573545835459354603546135462354633546435465354663546735468354693547035471354723547335474354753547635477354783547935480354813548235483354843548535486354873548835489354903549135492354933549435495354963549735498354993550035501355023550335504355053550635507355083550935510355113551235513355143551535516355173551835519355203552135522355233552435525355263552735528355293553035531355323553335534355353553635537355383553935540355413554235543355443554535546355473554835549355503555135552355533555435555355563555735558355593556035561355623556335564355653556635567355683556935570355713557235573355743557535576355773557835579355803558135582355833558435585355863558735588355893559035591355923559335594355953559635597355983559935600356013560235603356043560535606356073560835609356103561135612356133561435615356163561735618356193562035621356223562335624356253562635627356283562935630356313563235633356343563535636356373563835639356403564135642356433564435645356463564735648356493565035651356523565335654356553565635657356583565935660356613566235663356643566535666356673566835669356703567135672356733567435675356763567735678356793568035681356823568335684356853568635687356883568935690356913569235693356943569535696356973569835699357003570135702357033570435705357063570735708357093571035711357123571335714357153571635717357183571935720357213572235723357243572535726357273572835729357303573135732357333573435735357363573735738357393574035741357423574335744357453574635747357483574935750357513575235753357543575535756357573575835759357603576135762357633576435765357663576735768357693577035771357723577335774357753577635777357783577935780357813578235783357843578535786357873578835789357903579135792357933579435795357963579735798357993580035801358023580335804358053580635807358083580935810358113581235813358143581535816358173581835819358203582135822358233582435825358263582735828358293583035831358323583335834358353583635837358383583935840358413584235843358443584535846358473584835849358503585135852358533585435855358563585735858358593586035861358623586335864358653586635867358683586935870358713587235873358743587535876358773587835879358803588135882358833588435885358863588735888358893589035891358923589335894358953589635897358983589935900359013590235903359043590535906359073590835909359103591135912359133591435915359163591735918359193592035921359223592335924359253592635927359283592935930359313593235933359343593535936359373593835939359403594135942359433594435945359463594735948359493595035951359523595335954359553595635957359583595935960359613596235963359643596535966359673596835969359703597135972359733597435975359763597735978359793598035981359823598335984359853598635987359883598935990359913599235993359943599535996359973599835999360003600136002360033600436005360063600736008360093601036011360123601336014360153601636017360183601936020360213602236023360243602536026360273602836029360303603136032360333603436035360363603736038360393604036041360423604336044360453604636047360483604936050360513605236053360543605536056360573605836059360603606136062360633606436065360663606736068360693607036071360723607336074360753607636077360783607936080360813608236083360843608536086360873608836089360903609136092360933609436095360963609736098360993610036101361023610336104361053610636107361083610936110361113611236113361143611536116361173611836119361203612136122361233612436125361263612736128361293613036131361323613336134361353613636137361383613936140361413614236143361443614536146361473614836149361503615136152361533615436155361563615736158361593616036161361623616336164361653616636167361683616936170361713617236173361743617536176361773617836179361803618136182361833618436185361863618736188361893619036191361923619336194361953619636197361983619936200362013620236203362043620536206362073620836209362103621136212362133621436215362163621736218362193622036221362223622336224362253622636227362283622936230362313623236233362343623536236362373623836239362403624136242362433624436245362463624736248362493625036251362523625336254362553625636257362583625936260362613626236263362643626536266362673626836269362703627136272362733627436275362763627736278362793628036281362823628336284362853628636287362883628936290362913629236293362943629536296362973629836299363003630136302363033630436305363063630736308363093631036311363123631336314363153631636317363183631936320363213632236323363243632536326363273632836329363303633136332363333633436335363363633736338363393634036341363423634336344363453634636347363483634936350363513635236353363543635536356363573635836359363603636136362363633636436365363663636736368363693637036371363723637336374363753637636377363783637936380363813638236383363843638536386363873638836389363903639136392363933639436395363963639736398363993640036401364023640336404364053640636407364083640936410364113641236413364143641536416364173641836419364203642136422364233642436425364263642736428364293643036431364323643336434364353643636437364383643936440364413644236443364443644536446364473644836449364503645136452364533645436455364563645736458364593646036461364623646336464364653646636467364683646936470364713647236473364743647536476364773647836479364803648136482364833648436485364863648736488364893649036491364923649336494364953649636497364983649936500365013650236503365043650536506365073650836509365103651136512365133651436515365163651736518365193652036521365223652336524365253652636527365283652936530365313653236533365343653536536365373653836539365403654136542365433654436545365463654736548365493655036551365523655336554365553655636557365583655936560365613656236563365643656536566365673656836569365703657136572365733657436575365763657736578365793658036581365823658336584365853658636587365883658936590365913659236593365943659536596365973659836599366003660136602366033660436605366063660736608366093661036611366123661336614366153661636617366183661936620366213662236623366243662536626366273662836629366303663136632366333663436635366363663736638366393664036641366423664336644366453664636647366483664936650366513665236653366543665536656366573665836659366603666136662366633666436665366663666736668366693667036671366723667336674366753667636677366783667936680366813668236683366843668536686366873668836689366903669136692366933669436695366963669736698366993670036701367023670336704367053670636707367083670936710367113671236713367143671536716367173671836719367203672136722367233672436725367263672736728367293673036731367323673336734367353673636737367383673936740367413674236743367443674536746367473674836749367503675136752367533675436755367563675736758367593676036761367623676336764367653676636767367683676936770367713677236773367743677536776367773677836779367803678136782367833678436785367863678736788367893679036791367923679336794367953679636797367983679936800368013680236803368043680536806368073680836809368103681136812368133681436815368163681736818368193682036821368223682336824368253682636827368283682936830368313683236833368343683536836368373683836839368403684136842368433684436845368463684736848368493685036851368523685336854368553685636857368583685936860368613686236863368643686536866368673686836869368703687136872368733687436875368763687736878368793688036881368823688336884368853688636887368883688936890368913689236893368943689536896368973689836899369003690136902369033690436905369063690736908369093691036911369123691336914369153691636917369183691936920369213692236923369243692536926369273692836929369303693136932369333693436935369363693736938369393694036941369423694336944369453694636947369483694936950369513695236953369543695536956369573695836959369603696136962369633696436965369663696736968369693697036971369723697336974369753697636977369783697936980369813698236983369843698536986369873698836989369903699136992369933699436995369963699736998369993700037001370023700337004370053700637007370083700937010370113701237013370143701537016370173701837019370203702137022370233702437025370263702737028370293703037031370323703337034370353703637037370383703937040370413704237043370443704537046370473704837049370503705137052370533705437055370563705737058370593706037061370623706337064370653706637067370683706937070370713707237073370743707537076370773707837079370803708137082370833708437085370863708737088370893709037091370923709337094370953709637097370983709937100371013710237103371043710537106371073710837109371103711137112371133711437115371163711737118371193712037121371223712337124371253712637127371283712937130371313713237133371343713537136371373713837139371403714137142371433714437145371463714737148371493715037151371523715337154371553715637157371583715937160371613716237163371643716537166371673716837169371703717137172371733717437175371763717737178371793718037181371823718337184371853718637187371883718937190371913719237193371943719537196371973719837199372003720137202372033720437205372063720737208372093721037211372123721337214372153721637217372183721937220372213722237223372243722537226372273722837229372303723137232372333723437235372363723737238372393724037241372423724337244372453724637247372483724937250372513725237253372543725537256372573725837259372603726137262372633726437265372663726737268372693727037271372723727337274372753727637277372783727937280372813728237283372843728537286372873728837289372903729137292372933729437295372963729737298372993730037301373023730337304373053730637307373083730937310373113731237313373143731537316373173731837319373203732137322373233732437325373263732737328373293733037331373323733337334373353733637337373383733937340373413734237343373443734537346373473734837349373503735137352373533735437355373563735737358373593736037361373623736337364373653736637367373683736937370373713737237373373743737537376373773737837379373803738137382373833738437385373863738737388373893739037391373923739337394373953739637397373983739937400374013740237403374043740537406374073740837409374103741137412374133741437415374163741737418374193742037421374223742337424374253742637427374283742937430374313743237433374343743537436374373743837439374403744137442374433744437445374463744737448374493745037451374523745337454374553745637457374583745937460374613746237463374643746537466374673746837469374703747137472374733747437475374763747737478374793748037481374823748337484374853748637487374883748937490374913749237493374943749537496374973749837499375003750137502375033750437505375063750737508375093751037511375123751337514375153751637517375183751937520375213752237523375243752537526375273752837529375303753137532375333753437535375363753737538375393754037541375423754337544375453754637547375483754937550375513755237553375543755537556375573755837559375603756137562375633756437565375663756737568375693757037571375723757337574375753757637577375783757937580375813758237583375843758537586375873758837589375903759137592375933759437595375963759737598375993760037601376023760337604376053760637607376083760937610376113761237613376143761537616376173761837619376203762137622376233762437625376263762737628376293763037631376323763337634376353763637637376383763937640376413764237643376443764537646376473764837649376503765137652376533765437655376563765737658376593766037661376623766337664376653766637667376683766937670376713767237673376743767537676376773767837679376803768137682376833768437685376863768737688376893769037691376923769337694376953769637697376983769937700377013770237703377043770537706377073770837709377103771137712377133771437715377163771737718377193772037721377223772337724377253772637727377283772937730377313773237733377343773537736377373773837739377403774137742377433774437745377463774737748377493775037751377523775337754377553775637757 |
- unit pic32mx270f256b;
- 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 getWDTWINEN : TBits_1; 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 setWDTWINEN(thebits : TBits_1); 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 clearWDTWINEN; inline;
- procedure setON; inline;
- procedure setSWDTPS0; inline;
- procedure setSWDTPS1; inline;
- procedure setSWDTPS2; inline;
- procedure setSWDTPS3; inline;
- procedure setSWDTPS4; inline;
- procedure setWDTCLR; inline;
- procedure setWDTWINEN; 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 WDTWINEN : TBits_1 read getWDTWINEN write setWDTWINEN;
- 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;
- TI2C1_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;
- 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_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;
- 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
- I2C1ACONbits : TI2C1_I2C1ACON;
- I2C1ACON : longWord;
- I2C1CONbits : TI2C1_I2C1CON;
- I2C1CON : longWord;
- I2C1ACONCLR : longWord;
- I2C1CONCLR : longWord;
- I2C1ACONSET : longWord;
- I2C1CONSET : longWord;
- I2C1ACONINV : longWord;
- I2C1CONINV : longWord;
- I2C1ASTATbits : TI2C1_I2C1ASTAT;
- I2C1ASTAT : longWord;
- I2C1STATbits : TI2C1_I2C1STAT;
- I2C1STAT : longWord;
- I2C1ASTATCLR : longWord;
- I2C1STATCLR : longWord;
- I2C1ASTATSET : longWord;
- I2C1STATSET : longWord;
- I2C1ASTATINV : longWord;
- I2C1STATINV : longWord;
- I2C1AADD : longWord;
- I2C1ADD : longWord;
- I2C1AADDCLR : longWord;
- I2C1ADDCLR : longWord;
- I2C1AADDSET : longWord;
- I2C1ADDSET : longWord;
- I2C1AADDINV : longWord;
- I2C1ADDINV : longWord;
- I2C1AMSK : longWord;
- I2C1MSK : longWord;
- I2C1AMSKCLR : longWord;
- I2C1MSKCLR : longWord;
- I2C1AMSKSET : longWord;
- I2C1MSKSET : longWord;
- I2C1AMSKINV : longWord;
- I2C1MSKINV : longWord;
- I2C1ABRG : longWord;
- I2C1BRG : longWord;
- I2C1ABRGCLR : longWord;
- I2C1BRGCLR : longWord;
- I2C1ABRGSET : longWord;
- I2C1BRGSET : longWord;
- I2C1ABRGINV : longWord;
- I2C1BRGINV : longWord;
- I2C1ATRN : longWord;
- I2C1TRN : longWord;
- I2C1ATRNCLR : longWord;
- I2C1TRNCLR : longWord;
- I2C1ATRNSET : longWord;
- I2C1TRNSET : longWord;
- I2C1ATRNINV : longWord;
- I2C1TRNINV : longWord;
- I2C1ARCV : longWord;
- I2C1RCV : longWord;
- end;
- TI2C2_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;
- 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_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;
- 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
- I2C2ACONbits : TI2C2_I2C2ACON;
- I2C2ACON : longWord;
- I2C2CONbits : TI2C2_I2C2CON;
- I2C2CON : longWord;
- I2C2ACONCLR : longWord;
- I2C2CONCLR : longWord;
- I2C2ACONSET : longWord;
- I2C2CONSET : longWord;
- I2C2ACONINV : longWord;
- I2C2CONINV : longWord;
- I2C2ASTATbits : TI2C2_I2C2ASTAT;
- I2C2ASTAT : longWord;
- I2C2STATbits : TI2C2_I2C2STAT;
- I2C2STAT : longWord;
- I2C2ASTATCLR : longWord;
- I2C2STATCLR : longWord;
- I2C2ASTATSET : longWord;
- I2C2STATSET : longWord;
- I2C2ASTATINV : longWord;
- I2C2STATINV : longWord;
- I2C2AADD : longWord;
- I2C2ADD : longWord;
- I2C2AADDCLR : longWord;
- I2C2ADDCLR : longWord;
- I2C2AADDSET : longWord;
- I2C2ADDSET : longWord;
- I2C2AADDINV : longWord;
- I2C2ADDINV : longWord;
- I2C2AMSK : longWord;
- I2C2MSK : longWord;
- I2C2AMSKCLR : longWord;
- I2C2MSKCLR : longWord;
- I2C2AMSKSET : longWord;
- I2C2MSKSET : longWord;
- I2C2AMSKINV : longWord;
- I2C2MSKINV : longWord;
- I2C2ABRG : longWord;
- I2C2BRG : longWord;
- I2C2ABRGCLR : longWord;
- I2C2BRGCLR : longWord;
- I2C2ABRGSET : longWord;
- I2C2BRGSET : longWord;
- I2C2ABRGINV : longWord;
- I2C2BRGINV : longWord;
- I2C2ATRN : longWord;
- I2C2TRN : longWord;
- I2C2ATRNCLR : longWord;
- I2C2TRNCLR : longWord;
- I2C2ATRNSET : longWord;
- I2C2TRNSET : longWord;
- I2C2ATRNINV : longWord;
- I2C2TRNINV : longWord;
- I2C2ARCV : longWord;
- I2C2RCV : longWord;
- end;
- TSPI1_SPI1CON = record
- private
- function getCKE : TBits_1; inline;
- function getCKP : TBits_1; inline;
- function getDISSDI : 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 getMCLKSEL : 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 setDISSDI(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 setMCLKSEL(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 clearDISSDI; inline;
- procedure clearDISSDO; inline;
- procedure clearENHBUF; inline;
- procedure clearFRMEN; inline;
- procedure clearFRMPOL; inline;
- procedure clearFRMSYNC; inline;
- procedure clearFRMSYPW; inline;
- procedure clearMCLKSEL; 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 setDISSDI; inline;
- procedure setDISSDO; inline;
- procedure setENHBUF; inline;
- procedure setFRMEN; inline;
- procedure setFRMPOL; inline;
- procedure setFRMSYNC; inline;
- procedure setFRMSYPW; inline;
- procedure setMCLKSEL; 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 DISSDI : TBits_1 read getDISSDI write setDISSDI;
- 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 MCLKSEL : TBits_1 read getMCLKSEL write setMCLKSEL;
- 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 getFRMERR : TBits_1; inline;
- 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 setFRMERR(thebits : TBits_1); 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 clearFRMERR; inline;
- 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 setFRMERR; 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 FRMERR : TBits_1 read getFRMERR write setFRMERR;
- 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;
- TSPI1_SPI1CON2 = record
- private
- function getAUDEN : TBits_1; inline;
- function getAUDMOD : TBits_2; inline;
- function getAUDMOD0 : TBits_1; inline;
- function getAUDMOD1 : TBits_1; inline;
- function getAUDMONO : TBits_1; inline;
- function getFRMERREN : TBits_1; inline;
- function getIGNROV : TBits_1; inline;
- function getIGNTUR : TBits_1; inline;
- function getSPIROVEN : TBits_1; inline;
- function getSPISGNEXT : TBits_1; inline;
- function getSPITUREN : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setAUDEN(thebits : TBits_1); inline;
- procedure setAUDMOD(thebits : TBits_2); inline;
- procedure setAUDMOD0(thebits : TBits_1); inline;
- procedure setAUDMOD1(thebits : TBits_1); inline;
- procedure setAUDMONO(thebits : TBits_1); inline;
- procedure setFRMERREN(thebits : TBits_1); inline;
- procedure setIGNROV(thebits : TBits_1); inline;
- procedure setIGNTUR(thebits : TBits_1); inline;
- procedure setSPIROVEN(thebits : TBits_1); inline;
- procedure setSPISGNEXT(thebits : TBits_1); inline;
- procedure setSPITUREN(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearAUDEN; inline;
- procedure clearAUDMOD0; inline;
- procedure clearAUDMOD1; inline;
- procedure clearAUDMONO; inline;
- procedure clearFRMERREN; inline;
- procedure clearIGNROV; inline;
- procedure clearIGNTUR; inline;
- procedure clearSPIROVEN; inline;
- procedure clearSPISGNEXT; inline;
- procedure clearSPITUREN; inline;
- procedure setAUDEN; inline;
- procedure setAUDMOD0; inline;
- procedure setAUDMOD1; inline;
- procedure setAUDMONO; inline;
- procedure setFRMERREN; inline;
- procedure setIGNROV; inline;
- procedure setIGNTUR; inline;
- procedure setSPIROVEN; inline;
- procedure setSPISGNEXT; inline;
- procedure setSPITUREN; inline;
- property AUDEN : TBits_1 read getAUDEN write setAUDEN;
- property AUDMOD : TBits_2 read getAUDMOD write setAUDMOD;
- property AUDMOD0 : TBits_1 read getAUDMOD0 write setAUDMOD0;
- property AUDMOD1 : TBits_1 read getAUDMOD1 write setAUDMOD1;
- property AUDMONO : TBits_1 read getAUDMONO write setAUDMONO;
- property FRMERREN : TBits_1 read getFRMERREN write setFRMERREN;
- property IGNROV : TBits_1 read getIGNROV write setIGNROV;
- property IGNTUR : TBits_1 read getIGNTUR write setIGNTUR;
- property SPIROVEN : TBits_1 read getSPIROVEN write setSPIROVEN;
- property SPISGNEXT : TBits_1 read getSPISGNEXT write setSPISGNEXT;
- property SPITUREN : TBits_1 read getSPITUREN write setSPITUREN;
- 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;
- SPI1CON2bits : TSPI1_SPI1CON2;
- SPI1CON2 : longWord;
- SPI1CON2CLR : longWord;
- SPI1CON2SET : longWord;
- SPI1CON2INV : longWord;
- end;
- TSPI2_SPI2CON = record
- private
- function getCKE : TBits_1; inline;
- function getCKP : TBits_1; inline;
- function getDISSDI : 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 getMCLKSEL : 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 setDISSDI(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 setMCLKSEL(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 clearDISSDI; inline;
- procedure clearDISSDO; inline;
- procedure clearENHBUF; inline;
- procedure clearFRMEN; inline;
- procedure clearFRMPOL; inline;
- procedure clearFRMSYNC; inline;
- procedure clearFRMSYPW; inline;
- procedure clearMCLKSEL; 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 setDISSDI; inline;
- procedure setDISSDO; inline;
- procedure setENHBUF; inline;
- procedure setFRMEN; inline;
- procedure setFRMPOL; inline;
- procedure setFRMSYNC; inline;
- procedure setFRMSYPW; inline;
- procedure setMCLKSEL; 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 DISSDI : TBits_1 read getDISSDI write setDISSDI;
- 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 MCLKSEL : TBits_1 read getMCLKSEL write setMCLKSEL;
- 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;
- TSPI2_SPI2STAT = record
- private
- function getFRMERR : TBits_1; inline;
- 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 setFRMERR(thebits : TBits_1); 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 clearFRMERR; inline;
- 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 setFRMERR; 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 FRMERR : TBits_1 read getFRMERR write setFRMERR;
- 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;
- TSPI2_SPI2CON2 = record
- private
- function getAUDEN : TBits_1; inline;
- function getAUDMOD : TBits_2; inline;
- function getAUDMOD0 : TBits_1; inline;
- function getAUDMOD1 : TBits_1; inline;
- function getAUDMONO : TBits_1; inline;
- function getFRMERREN : TBits_1; inline;
- function getIGNROV : TBits_1; inline;
- function getIGNTUR : TBits_1; inline;
- function getSPIROVEN : TBits_1; inline;
- function getSPISGNEXT : TBits_1; inline;
- function getSPITUREN : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setAUDEN(thebits : TBits_1); inline;
- procedure setAUDMOD(thebits : TBits_2); inline;
- procedure setAUDMOD0(thebits : TBits_1); inline;
- procedure setAUDMOD1(thebits : TBits_1); inline;
- procedure setAUDMONO(thebits : TBits_1); inline;
- procedure setFRMERREN(thebits : TBits_1); inline;
- procedure setIGNROV(thebits : TBits_1); inline;
- procedure setIGNTUR(thebits : TBits_1); inline;
- procedure setSPIROVEN(thebits : TBits_1); inline;
- procedure setSPISGNEXT(thebits : TBits_1); inline;
- procedure setSPITUREN(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearAUDEN; inline;
- procedure clearAUDMOD0; inline;
- procedure clearAUDMOD1; inline;
- procedure clearAUDMONO; inline;
- procedure clearFRMERREN; inline;
- procedure clearIGNROV; inline;
- procedure clearIGNTUR; inline;
- procedure clearSPIROVEN; inline;
- procedure clearSPISGNEXT; inline;
- procedure clearSPITUREN; inline;
- procedure setAUDEN; inline;
- procedure setAUDMOD0; inline;
- procedure setAUDMOD1; inline;
- procedure setAUDMONO; inline;
- procedure setFRMERREN; inline;
- procedure setIGNROV; inline;
- procedure setIGNTUR; inline;
- procedure setSPIROVEN; inline;
- procedure setSPISGNEXT; inline;
- procedure setSPITUREN; inline;
- property AUDEN : TBits_1 read getAUDEN write setAUDEN;
- property AUDMOD : TBits_2 read getAUDMOD write setAUDMOD;
- property AUDMOD0 : TBits_1 read getAUDMOD0 write setAUDMOD0;
- property AUDMOD1 : TBits_1 read getAUDMOD1 write setAUDMOD1;
- property AUDMONO : TBits_1 read getAUDMONO write setAUDMONO;
- property FRMERREN : TBits_1 read getFRMERREN write setFRMERREN;
- property IGNROV : TBits_1 read getIGNROV write setIGNROV;
- property IGNTUR : TBits_1 read getIGNTUR write setIGNTUR;
- property SPIROVEN : TBits_1 read getSPIROVEN write setSPIROVEN;
- property SPISGNEXT : TBits_1 read getSPISGNEXT write setSPISGNEXT;
- property SPITUREN : TBits_1 read getSPITUREN write setSPITUREN;
- property w : TBits_32 read getw write setw;
- end;
- type
- TSPI2Registers = record
- SPI2CONbits : TSPI2_SPI2CON;
- SPI2CON : longWord;
- SPI2CONCLR : longWord;
- SPI2CONSET : longWord;
- SPI2CONINV : longWord;
- SPI2STATbits : TSPI2_SPI2STAT;
- SPI2STAT : longWord;
- SPI2STATCLR : longWord;
- SPI2STATSET : longWord;
- SPI2STATINV : longWord;
- SPI2BUF : longWord;
- SPI2BRG : longWord;
- SPI2BRGCLR : longWord;
- SPI2BRGSET : longWord;
- SPI2BRGINV : longWord;
- SPI2CON2bits : TSPI2_SPI2CON2;
- SPI2CON2 : longWord;
- SPI2CON2CLR : longWord;
- SPI2CON2SET : longWord;
- SPI2CON2INV : longWord;
- end;
- TUART1_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;
- TUART1_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;
- TUART1_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;
- TUART1_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
- TUART1Registers = record
- U1AMODEbits : TUART1_U1AMODE;
- U1AMODE : longWord;
- U1MODEbits : TUART1_U1MODE;
- U1MODE : longWord;
- U1AMODECLR : longWord;
- U1MODECLR : longWord;
- U1AMODESET : longWord;
- U1MODESET : longWord;
- U1AMODEINV : longWord;
- U1MODEINV : longWord;
- U1ASTAbits : TUART1_U1ASTA;
- U1ASTA : longWord;
- U1STAbits : TUART1_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;
- TUART2_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;
- TUART2_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;
- TUART2_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;
- TUART2_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
- TUART2Registers = record
- U2MODEbits : TUART2_U2MODE;
- U2MODE : longWord;
- U3AMODEbits : TUART2_U3AMODE;
- U3AMODE : longWord;
- U2MODECLR : longWord;
- U3AMODECLR : longWord;
- U2MODESET : longWord;
- U3AMODESET : longWord;
- U2MODEINV : longWord;
- U3AMODEINV : longWord;
- U2STAbits : TUART2_U2STA;
- U2STA : longWord;
- U3ASTAbits : TUART2_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;
- 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 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 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 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 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 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 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 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 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 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 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 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 setPADDR(thebits : TBits_14); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCS1; inline;
- procedure setCS1; 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 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;
- 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;
- 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_CM3CON = 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 getC3OUT : 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 setC3OUT(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearC1OUT; inline;
- procedure clearC2OUT; inline;
- procedure clearC3OUT; inline;
- procedure clearSIDL; inline;
- procedure setC1OUT; inline;
- procedure setC2OUT; inline;
- procedure setC3OUT; inline;
- procedure setSIDL; inline;
- property C1OUT : TBits_1 read getC1OUT write setC1OUT;
- property C2OUT : TBits_1 read getC2OUT write setC2OUT;
- property C3OUT : TBits_1 read getC3OUT write setC3OUT;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property w : TBits_32 read getw write setw;
- end;
- TCMP_CTMUCON = record
- private
- function getCTMUSIDL : TBits_1; inline;
- function getCTTRIG : TBits_1; inline;
- function getEDG1MOD : TBits_1; inline;
- function getEDG1POL : TBits_1; inline;
- function getEDG1SEL : TBits_4; inline;
- function getEDG1STAT : TBits_1; inline;
- function getEDG2MOD : TBits_1; inline;
- function getEDG2POL : TBits_1; inline;
- function getEDG2SEL : TBits_4; inline;
- function getEDG2STAT : TBits_1; inline;
- function getEDGEN : TBits_1; inline;
- function getEDGSEQEN : TBits_1; inline;
- function getIDISSEN : TBits_1; inline;
- function getIRNG : TBits_2; inline;
- function getITRIM : TBits_6; inline;
- function getON : TBits_1; inline;
- function getTGEN : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setCTMUSIDL(thebits : TBits_1); inline;
- procedure setCTTRIG(thebits : TBits_1); inline;
- procedure setEDG1MOD(thebits : TBits_1); inline;
- procedure setEDG1POL(thebits : TBits_1); inline;
- procedure setEDG1SEL(thebits : TBits_4); inline;
- procedure setEDG1STAT(thebits : TBits_1); inline;
- procedure setEDG2MOD(thebits : TBits_1); inline;
- procedure setEDG2POL(thebits : TBits_1); inline;
- procedure setEDG2SEL(thebits : TBits_4); inline;
- procedure setEDG2STAT(thebits : TBits_1); inline;
- procedure setEDGEN(thebits : TBits_1); inline;
- procedure setEDGSEQEN(thebits : TBits_1); inline;
- procedure setIDISSEN(thebits : TBits_1); inline;
- procedure setIRNG(thebits : TBits_2); inline;
- procedure setITRIM(thebits : TBits_6); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setTGEN(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCTMUSIDL; inline;
- procedure clearCTTRIG; inline;
- procedure clearEDG1MOD; inline;
- procedure clearEDG1POL; inline;
- procedure clearEDG1STAT; inline;
- procedure clearEDG2MOD; inline;
- procedure clearEDG2POL; inline;
- procedure clearEDG2STAT; inline;
- procedure clearEDGEN; inline;
- procedure clearEDGSEQEN; inline;
- procedure clearIDISSEN; inline;
- procedure clearON; inline;
- procedure clearTGEN; inline;
- procedure setCTMUSIDL; inline;
- procedure setCTTRIG; inline;
- procedure setEDG1MOD; inline;
- procedure setEDG1POL; inline;
- procedure setEDG1STAT; inline;
- procedure setEDG2MOD; inline;
- procedure setEDG2POL; inline;
- procedure setEDG2STAT; inline;
- procedure setEDGEN; inline;
- procedure setEDGSEQEN; inline;
- procedure setIDISSEN; inline;
- procedure setON; inline;
- procedure setTGEN; inline;
- property CTMUSIDL : TBits_1 read getCTMUSIDL write setCTMUSIDL;
- property CTTRIG : TBits_1 read getCTTRIG write setCTTRIG;
- property EDG1MOD : TBits_1 read getEDG1MOD write setEDG1MOD;
- property EDG1POL : TBits_1 read getEDG1POL write setEDG1POL;
- property EDG1SEL : TBits_4 read getEDG1SEL write setEDG1SEL;
- property EDG1STAT : TBits_1 read getEDG1STAT write setEDG1STAT;
- property EDG2MOD : TBits_1 read getEDG2MOD write setEDG2MOD;
- property EDG2POL : TBits_1 read getEDG2POL write setEDG2POL;
- property EDG2SEL : TBits_4 read getEDG2SEL write setEDG2SEL;
- property EDG2STAT : TBits_1 read getEDG2STAT write setEDG2STAT;
- property EDGEN : TBits_1 read getEDGEN write setEDGEN;
- property EDGSEQEN : TBits_1 read getEDGSEQEN write setEDGSEQEN;
- property IDISSEN : TBits_1 read getIDISSEN write setIDISSEN;
- property IRNG : TBits_2 read getIRNG write setIRNG;
- property ITRIM : TBits_6 read getITRIM write setITRIM;
- property ON : TBits_1 read getON write setON;
- property TGEN : TBits_1 read getTGEN write setTGEN;
- 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;
- CM3CONbits : TCMP_CM3CON;
- CM3CON : longWord;
- CM3CONCLR : longWord;
- CM3CONSET : longWord;
- CM3CONINV : longWord;
- CMSTATbits : TCMP_CMSTAT;
- CMSTAT : longWord;
- CMSTATCLR : longWord;
- CMSTATSET : longWord;
- CMSTATINV : longWord;
- CTMUCONbits : TCMP_CTMUCON;
- CTMUCON : longWord;
- CTMUCONCLR : longWord;
- CTMUCONSET : longWord;
- CTMUCONINV : 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 getPBDIVRDY : 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 setPBDIVRDY(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 clearPBDIVRDY; 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 setPBDIVRDY; 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 PBDIVRDY : TBits_1 read getPBDIVRDY write setPBDIVRDY;
- 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;
- TOSC_REFOCON = record
- private
- function getACTIVE : TBits_1; inline;
- function getDIVSWEN : TBits_1; inline;
- function getOE : TBits_1; inline;
- function getON : TBits_1; inline;
- function getRODIV : TBits_15; inline;
- function getROSEL : TBits_4; inline;
- function getRSLP : TBits_1; inline;
- function getSIDL : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setACTIVE(thebits : TBits_1); inline;
- procedure setDIVSWEN(thebits : TBits_1); inline;
- procedure setOE(thebits : TBits_1); inline;
- procedure setON(thebits : TBits_1); inline;
- procedure setRODIV(thebits : TBits_15); inline;
- procedure setROSEL(thebits : TBits_4); inline;
- procedure setRSLP(thebits : TBits_1); inline;
- procedure setSIDL(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearACTIVE; inline;
- procedure clearDIVSWEN; inline;
- procedure clearOE; inline;
- procedure clearON; inline;
- procedure clearRSLP; inline;
- procedure clearSIDL; inline;
- procedure setACTIVE; inline;
- procedure setDIVSWEN; inline;
- procedure setOE; inline;
- procedure setON; inline;
- procedure setRSLP; inline;
- procedure setSIDL; inline;
- property ACTIVE : TBits_1 read getACTIVE write setACTIVE;
- property DIVSWEN : TBits_1 read getDIVSWEN write setDIVSWEN;
- property OE : TBits_1 read getOE write setOE;
- property ON : TBits_1 read getON write setON;
- property RODIV : TBits_15 read getRODIV write setRODIV;
- property ROSEL : TBits_4 read getROSEL write setROSEL;
- property RSLP : TBits_1 read getRSLP write setRSLP;
- property SIDL : TBits_1 read getSIDL write setSIDL;
- property w : TBits_32 read getw write setw;
- end;
- TOSC_REFOTRIM = record
- private
- function getROTRIM : TBits_9; inline;
- function getw : TBits_32; inline;
- procedure setROTRIM(thebits : TBits_9); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property ROTRIM : TBits_9 read getROTRIM write setROTRIM;
- 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;
- REFOCONbits : TOSC_REFOCON;
- REFOCON : longWord;
- REFOCONCLR : longWord;
- REFOCONSET : longWord;
- REFOCONINV : longWord;
- REFOTRIMbits : TOSC_REFOTRIM;
- REFOTRIM : longWord;
- REFOTRIMCLR : longWord;
- REFOTRIMSET : longWord;
- REFOTRIMINV : longWord;
- end;
- TCFG_PMD5 = record
- private
- function getI2C1MD : TBits_1; inline;
- function getI2C2MD : TBits_1; inline;
- function getSPI1MD : TBits_1; inline;
- function getSPI2MD : TBits_1; inline;
- function getU1MD : TBits_1; inline;
- function getU2MD : TBits_1; inline;
- function getUSB1MD : TBits_1; inline;
- function getUSBMD : TBits_1; inline;
- procedure setI2C1MD(thebits : TBits_1); inline;
- procedure setI2C2MD(thebits : TBits_1); inline;
- procedure setSPI1MD(thebits : TBits_1); inline;
- procedure setSPI2MD(thebits : TBits_1); inline;
- procedure setU1MD(thebits : TBits_1); inline;
- procedure setU2MD(thebits : TBits_1); inline;
- procedure setUSB1MD(thebits : TBits_1); inline;
- procedure setUSBMD(thebits : TBits_1); inline;
- public
- procedure clearI2C1MD; inline;
- procedure clearI2C2MD; inline;
- procedure clearSPI1MD; inline;
- procedure clearSPI2MD; inline;
- procedure clearU1MD; inline;
- procedure clearU2MD; inline;
- procedure clearUSB1MD; inline;
- procedure clearUSBMD; inline;
- procedure setI2C1MD; inline;
- procedure setI2C2MD; inline;
- procedure setSPI1MD; inline;
- procedure setSPI2MD; inline;
- procedure setU1MD; inline;
- procedure setU2MD; inline;
- procedure setUSB1MD; inline;
- procedure setUSBMD; inline;
- property I2C1MD : TBits_1 read getI2C1MD write setI2C1MD;
- property I2C2MD : TBits_1 read getI2C2MD write setI2C2MD;
- property SPI1MD : TBits_1 read getSPI1MD write setSPI1MD;
- property SPI2MD : TBits_1 read getSPI2MD write setSPI2MD;
- property U1MD : TBits_1 read getU1MD write setU1MD;
- property U2MD : TBits_1 read getU2MD write setU2MD;
- property USB1MD : TBits_1 read getUSB1MD write setUSB1MD;
- property USBMD : TBits_1 read getUSBMD write setUSBMD;
- end;
- type
- TCFGRegisters = record
- CFGCON : longWord;
- DDPCON : longWord;
- DEVID : longWord;
- SYSKEY : longWord;
- SYSKEYCLR : longWord;
- SYSKEYSET : longWord;
- SYSKEYINV : longWord;
- PMD1 : longWord;
- PMD1CLR : longWord;
- PMD1SET : longWord;
- PMD1INV : longWord;
- PMD2 : longWord;
- PMD2CLR : longWord;
- PMD2SET : longWord;
- PMD2INV : longWord;
- PMD3 : longWord;
- PMD3CLR : longWord;
- PMD3SET : longWord;
- PMD3INV : longWord;
- PMD4 : longWord;
- PMD4CLR : longWord;
- PMD4SET : longWord;
- PMD4INV : longWord;
- PMD5bits : TCFG_PMD5;
- PMD5 : longWord;
- PMD5CLR : longWord;
- PMD5SET : longWord;
- PMD5INV : longWord;
- PMD6 : longWord;
- PMD6CLR : longWord;
- PMD6SET : longWord;
- PMD6INV : 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;
- INT1R : longWord;
- INT2R : longWord;
- INT3R : longWord;
- INT4R : longWord;
- T2CKR : longWord;
- T3CKR : longWord;
- T4CKR : longWord;
- T5CKR : longWord;
- IC1R : longWord;
- IC2R : longWord;
- IC3R : longWord;
- IC4R : longWord;
- IC5R : longWord;
- OCFAR : longWord;
- OCFBR : longWord;
- U1RXR : longWord;
- U1CTSR : longWord;
- U2RXR : longWord;
- U2CTSR : longWord;
- SDI1R : longWord;
- SS1R : longWord;
- SDI2R : longWord;
- SS2R : longWord;
- REFCLKIR : longWord;
- RPA0R : longWord;
- RPA1R : longWord;
- RPA2R : longWord;
- RPA3R : longWord;
- RPA4R : longWord;
- RPA8R : longWord;
- RPA9R : longWord;
- RPB0R : longWord;
- RPB1R : longWord;
- RPB2R : longWord;
- RPB3R : longWord;
- RPB4R : longWord;
- RPB5R : longWord;
- RPB7R : longWord;
- RPB8R : longWord;
- RPB9R : longWord;
- RPB10R : longWord;
- RPB11R : longWord;
- RPB13R : longWord;
- RPB14R : longWord;
- RPB15R : longWord;
- RPC0R : longWord;
- RPC1R : longWord;
- RPC2R : longWord;
- RPC3R : longWord;
- RPC4R : longWord;
- RPC5R : longWord;
- RPC6R : longWord;
- RPC7R : longWord;
- RPC8R : longWord;
- RPC9R : longWord;
- end;
- TINT_INTCON = record
- private
- 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 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 clearINT0EP; inline;
- procedure clearINT1EP; inline;
- procedure clearINT2EP; inline;
- procedure clearINT3EP; inline;
- procedure clearINT4EP; inline;
- procedure clearMVEC; inline;
- procedure clearSS0; inline;
- procedure setINT0EP; inline;
- procedure setINT1EP; inline;
- procedure setINT2EP; inline;
- procedure setINT3EP; inline;
- procedure setINT4EP; inline;
- procedure setMVEC; inline;
- procedure setSS0; inline;
- 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 getAD1IF : TBits_1; inline;
- function getCS0IF : TBits_1; inline;
- function getCS1IF : TBits_1; inline;
- function getCTIF : TBits_1; inline;
- function getFCEIF : TBits_1; inline;
- function getFSCMIF : TBits_1; inline;
- function getIC1EIF : TBits_1; inline;
- function getIC1IF : TBits_1; inline;
- function getIC2EIF : TBits_1; inline;
- function getIC2IF : TBits_1; inline;
- function getIC3EIF : TBits_1; inline;
- function getIC3IF : TBits_1; inline;
- function getIC4EIF : TBits_1; inline;
- function getIC4IF : TBits_1; inline;
- function getIC5EIF : 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 getRTCCIF : 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 getw : TBits_32; inline;
- procedure setAD1IF(thebits : TBits_1); inline;
- procedure setCS0IF(thebits : TBits_1); inline;
- procedure setCS1IF(thebits : TBits_1); inline;
- procedure setCTIF(thebits : TBits_1); inline;
- procedure setFCEIF(thebits : TBits_1); inline;
- procedure setFSCMIF(thebits : TBits_1); inline;
- procedure setIC1EIF(thebits : TBits_1); inline;
- procedure setIC1IF(thebits : TBits_1); inline;
- procedure setIC2EIF(thebits : TBits_1); inline;
- procedure setIC2IF(thebits : TBits_1); inline;
- procedure setIC3EIF(thebits : TBits_1); inline;
- procedure setIC3IF(thebits : TBits_1); inline;
- procedure setIC4EIF(thebits : TBits_1); inline;
- procedure setIC4IF(thebits : TBits_1); inline;
- procedure setIC5EIF(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 setRTCCIF(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 setw(thebits : TBits_32); inline;
- public
- procedure clearAD1IF; inline;
- procedure clearCS0IF; inline;
- procedure clearCS1IF; inline;
- procedure clearCTIF; inline;
- procedure clearFCEIF; inline;
- procedure clearFSCMIF; inline;
- procedure clearIC1EIF; inline;
- procedure clearIC1IF; inline;
- procedure clearIC2EIF; inline;
- procedure clearIC2IF; inline;
- procedure clearIC3EIF; inline;
- procedure clearIC3IF; inline;
- procedure clearIC4EIF; inline;
- procedure clearIC4IF; inline;
- procedure clearIC5EIF; 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 clearRTCCIF; inline;
- procedure clearT1IF; inline;
- procedure clearT2IF; inline;
- procedure clearT3IF; inline;
- procedure clearT4IF; inline;
- procedure clearT5IF; inline;
- procedure setAD1IF; inline;
- procedure setCS0IF; inline;
- procedure setCS1IF; inline;
- procedure setCTIF; inline;
- procedure setFCEIF; inline;
- procedure setFSCMIF; inline;
- procedure setIC1EIF; inline;
- procedure setIC1IF; inline;
- procedure setIC2EIF; inline;
- procedure setIC2IF; inline;
- procedure setIC3EIF; inline;
- procedure setIC3IF; inline;
- procedure setIC4EIF; inline;
- procedure setIC4IF; inline;
- procedure setIC5EIF; 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 setRTCCIF; inline;
- procedure setT1IF; inline;
- procedure setT2IF; inline;
- procedure setT3IF; inline;
- procedure setT4IF; inline;
- procedure setT5IF; inline;
- property AD1IF : TBits_1 read getAD1IF write setAD1IF;
- 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 FCEIF : TBits_1 read getFCEIF write setFCEIF;
- property FSCMIF : TBits_1 read getFSCMIF write setFSCMIF;
- property IC1EIF : TBits_1 read getIC1EIF write setIC1EIF;
- property IC1IF : TBits_1 read getIC1IF write setIC1IF;
- property IC2EIF : TBits_1 read getIC2EIF write setIC2EIF;
- property IC2IF : TBits_1 read getIC2IF write setIC2IF;
- property IC3EIF : TBits_1 read getIC3EIF write setIC3EIF;
- property IC3IF : TBits_1 read getIC3IF write setIC3IF;
- property IC4EIF : TBits_1 read getIC4EIF write setIC4EIF;
- property IC4IF : TBits_1 read getIC4IF write setIC4IF;
- property IC5EIF : TBits_1 read getIC5EIF write setIC5EIF;
- 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 RTCCIF : TBits_1 read getRTCCIF write setRTCCIF;
- 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 w : TBits_32 read getw write setw;
- end;
- TINT_IFS1 = record
- private
- function getCMP1IF : TBits_1; inline;
- function getCMP2IF : TBits_1; inline;
- function getCMP3IF : TBits_1; inline;
- function getCNAIF : TBits_1; inline;
- function getCNBIF : TBits_1; inline;
- function getCNCIF : TBits_1; inline;
- function getCTMUIF : TBits_1; inline;
- function getDMA0IF : TBits_1; inline;
- function getDMA1IF : TBits_1; inline;
- function getDMA2IF : TBits_1; inline;
- function getDMA3IF : TBits_1; inline;
- function getI2C1BIF : TBits_1; inline;
- function getI2C1MIF : TBits_1; inline;
- function getI2C1SIF : TBits_1; inline;
- function getI2C2BIF : TBits_1; inline;
- function getI2C2MIF : TBits_1; inline;
- function getI2C2SIF : TBits_1; inline;
- function getPMPEIF : TBits_1; inline;
- function getPMPIF : TBits_1; inline;
- function getSPI1EIF : TBits_1; inline;
- function getSPI1RXIF : TBits_1; inline;
- function getSPI1TXIF : TBits_1; inline;
- function getSPI2EIF : TBits_1; inline;
- function getSPI2RXIF : TBits_1; inline;
- function getSPI2TXIF : TBits_1; inline;
- function getU1EIF : TBits_1; inline;
- function getU1RXIF : TBits_1; inline;
- function getU1TXIF : TBits_1; inline;
- function getU2EIF : TBits_1; inline;
- function getU2RXIF : TBits_1; inline;
- function getU2TXIF : TBits_1; inline;
- function getUSBIF : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setCMP1IF(thebits : TBits_1); inline;
- procedure setCMP2IF(thebits : TBits_1); inline;
- procedure setCMP3IF(thebits : TBits_1); inline;
- procedure setCNAIF(thebits : TBits_1); inline;
- procedure setCNBIF(thebits : TBits_1); inline;
- procedure setCNCIF(thebits : TBits_1); inline;
- procedure setCTMUIF(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 setI2C1BIF(thebits : TBits_1); inline;
- procedure setI2C1MIF(thebits : TBits_1); inline;
- procedure setI2C1SIF(thebits : TBits_1); inline;
- procedure setI2C2BIF(thebits : TBits_1); inline;
- procedure setI2C2MIF(thebits : TBits_1); inline;
- procedure setI2C2SIF(thebits : TBits_1); inline;
- procedure setPMPEIF(thebits : TBits_1); inline;
- procedure setPMPIF(thebits : TBits_1); inline;
- procedure setSPI1EIF(thebits : TBits_1); inline;
- procedure setSPI1RXIF(thebits : TBits_1); inline;
- procedure setSPI1TXIF(thebits : TBits_1); inline;
- procedure setSPI2EIF(thebits : TBits_1); inline;
- procedure setSPI2RXIF(thebits : TBits_1); inline;
- procedure setSPI2TXIF(thebits : TBits_1); inline;
- procedure setU1EIF(thebits : TBits_1); inline;
- procedure setU1RXIF(thebits : TBits_1); inline;
- procedure setU1TXIF(thebits : TBits_1); inline;
- procedure setU2EIF(thebits : TBits_1); inline;
- procedure setU2RXIF(thebits : TBits_1); inline;
- procedure setU2TXIF(thebits : TBits_1); inline;
- procedure setUSBIF(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCMP1IF; inline;
- procedure clearCMP2IF; inline;
- procedure clearCMP3IF; inline;
- procedure clearCNAIF; inline;
- procedure clearCNBIF; inline;
- procedure clearCNCIF; inline;
- procedure clearCTMUIF; inline;
- procedure clearDMA0IF; inline;
- procedure clearDMA1IF; inline;
- procedure clearDMA2IF; inline;
- procedure clearDMA3IF; inline;
- procedure clearI2C1BIF; inline;
- procedure clearI2C1MIF; inline;
- procedure clearI2C1SIF; inline;
- procedure clearI2C2BIF; inline;
- procedure clearI2C2MIF; inline;
- procedure clearI2C2SIF; inline;
- procedure clearPMPEIF; inline;
- procedure clearPMPIF; inline;
- procedure clearSPI1EIF; inline;
- procedure clearSPI1RXIF; inline;
- procedure clearSPI1TXIF; inline;
- procedure clearSPI2EIF; inline;
- procedure clearSPI2RXIF; inline;
- procedure clearSPI2TXIF; inline;
- procedure clearU1EIF; inline;
- procedure clearU1RXIF; inline;
- procedure clearU1TXIF; inline;
- procedure clearU2EIF; inline;
- procedure clearU2RXIF; inline;
- procedure clearU2TXIF; inline;
- procedure clearUSBIF; inline;
- procedure setCMP1IF; inline;
- procedure setCMP2IF; inline;
- procedure setCMP3IF; inline;
- procedure setCNAIF; inline;
- procedure setCNBIF; inline;
- procedure setCNCIF; inline;
- procedure setCTMUIF; inline;
- procedure setDMA0IF; inline;
- procedure setDMA1IF; inline;
- procedure setDMA2IF; inline;
- procedure setDMA3IF; inline;
- procedure setI2C1BIF; inline;
- procedure setI2C1MIF; inline;
- procedure setI2C1SIF; inline;
- procedure setI2C2BIF; inline;
- procedure setI2C2MIF; inline;
- procedure setI2C2SIF; inline;
- procedure setPMPEIF; inline;
- procedure setPMPIF; inline;
- procedure setSPI1EIF; inline;
- procedure setSPI1RXIF; inline;
- procedure setSPI1TXIF; inline;
- procedure setSPI2EIF; inline;
- procedure setSPI2RXIF; inline;
- procedure setSPI2TXIF; inline;
- procedure setU1EIF; inline;
- procedure setU1RXIF; inline;
- procedure setU1TXIF; inline;
- procedure setU2EIF; inline;
- procedure setU2RXIF; inline;
- procedure setU2TXIF; inline;
- procedure setUSBIF; inline;
- property CMP1IF : TBits_1 read getCMP1IF write setCMP1IF;
- property CMP2IF : TBits_1 read getCMP2IF write setCMP2IF;
- property CMP3IF : TBits_1 read getCMP3IF write setCMP3IF;
- property CNAIF : TBits_1 read getCNAIF write setCNAIF;
- property CNBIF : TBits_1 read getCNBIF write setCNBIF;
- property CNCIF : TBits_1 read getCNCIF write setCNCIF;
- property CTMUIF : TBits_1 read getCTMUIF write setCTMUIF;
- 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 I2C1BIF : TBits_1 read getI2C1BIF write setI2C1BIF;
- property I2C1MIF : TBits_1 read getI2C1MIF write setI2C1MIF;
- property I2C1SIF : TBits_1 read getI2C1SIF write setI2C1SIF;
- 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 PMPEIF : TBits_1 read getPMPEIF write setPMPEIF;
- property PMPIF : TBits_1 read getPMPIF write setPMPIF;
- 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 SPI2EIF : TBits_1 read getSPI2EIF write setSPI2EIF;
- property SPI2RXIF : TBits_1 read getSPI2RXIF write setSPI2RXIF;
- property SPI2TXIF : TBits_1 read getSPI2TXIF write setSPI2TXIF;
- 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 U2EIF : TBits_1 read getU2EIF write setU2EIF;
- property U2RXIF : TBits_1 read getU2RXIF write setU2RXIF;
- property U2TXIF : TBits_1 read getU2TXIF write setU2TXIF;
- property USBIF : TBits_1 read getUSBIF write setUSBIF;
- property w : TBits_32 read getw write setw;
- end;
- TINT_IEC0 = record
- private
- function getAD1IE : TBits_1; inline;
- function getCS0IE : TBits_1; inline;
- function getCS1IE : TBits_1; inline;
- function getCTIE : TBits_1; inline;
- function getFCEIE : TBits_1; inline;
- function getFSCMIE : TBits_1; inline;
- function getIC1EIE : TBits_1; inline;
- function getIC1IE : TBits_1; inline;
- function getIC2EIE : TBits_1; inline;
- function getIC2IE : TBits_1; inline;
- function getIC3EIE : TBits_1; inline;
- function getIC3IE : TBits_1; inline;
- function getIC4EIE : TBits_1; inline;
- function getIC4IE : TBits_1; inline;
- function getIC5EIE : 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 getRTCCIE : 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 getw : TBits_32; inline;
- procedure setAD1IE(thebits : TBits_1); inline;
- procedure setCS0IE(thebits : TBits_1); inline;
- procedure setCS1IE(thebits : TBits_1); inline;
- procedure setCTIE(thebits : TBits_1); inline;
- procedure setFCEIE(thebits : TBits_1); inline;
- procedure setFSCMIE(thebits : TBits_1); inline;
- procedure setIC1EIE(thebits : TBits_1); inline;
- procedure setIC1IE(thebits : TBits_1); inline;
- procedure setIC2EIE(thebits : TBits_1); inline;
- procedure setIC2IE(thebits : TBits_1); inline;
- procedure setIC3EIE(thebits : TBits_1); inline;
- procedure setIC3IE(thebits : TBits_1); inline;
- procedure setIC4EIE(thebits : TBits_1); inline;
- procedure setIC4IE(thebits : TBits_1); inline;
- procedure setIC5EIE(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 setRTCCIE(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 setw(thebits : TBits_32); inline;
- public
- procedure clearAD1IE; inline;
- procedure clearCS0IE; inline;
- procedure clearCS1IE; inline;
- procedure clearCTIE; inline;
- procedure clearFCEIE; inline;
- procedure clearFSCMIE; inline;
- procedure clearIC1EIE; inline;
- procedure clearIC1IE; inline;
- procedure clearIC2EIE; inline;
- procedure clearIC2IE; inline;
- procedure clearIC3EIE; inline;
- procedure clearIC3IE; inline;
- procedure clearIC4EIE; inline;
- procedure clearIC4IE; inline;
- procedure clearIC5EIE; 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 clearRTCCIE; inline;
- procedure clearT1IE; inline;
- procedure clearT2IE; inline;
- procedure clearT3IE; inline;
- procedure clearT4IE; inline;
- procedure clearT5IE; inline;
- procedure setAD1IE; inline;
- procedure setCS0IE; inline;
- procedure setCS1IE; inline;
- procedure setCTIE; inline;
- procedure setFCEIE; inline;
- procedure setFSCMIE; inline;
- procedure setIC1EIE; inline;
- procedure setIC1IE; inline;
- procedure setIC2EIE; inline;
- procedure setIC2IE; inline;
- procedure setIC3EIE; inline;
- procedure setIC3IE; inline;
- procedure setIC4EIE; inline;
- procedure setIC4IE; inline;
- procedure setIC5EIE; 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 setRTCCIE; inline;
- procedure setT1IE; inline;
- procedure setT2IE; inline;
- procedure setT3IE; inline;
- procedure setT4IE; inline;
- procedure setT5IE; inline;
- property AD1IE : TBits_1 read getAD1IE write setAD1IE;
- 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 FCEIE : TBits_1 read getFCEIE write setFCEIE;
- property FSCMIE : TBits_1 read getFSCMIE write setFSCMIE;
- property IC1EIE : TBits_1 read getIC1EIE write setIC1EIE;
- property IC1IE : TBits_1 read getIC1IE write setIC1IE;
- property IC2EIE : TBits_1 read getIC2EIE write setIC2EIE;
- property IC2IE : TBits_1 read getIC2IE write setIC2IE;
- property IC3EIE : TBits_1 read getIC3EIE write setIC3EIE;
- property IC3IE : TBits_1 read getIC3IE write setIC3IE;
- property IC4EIE : TBits_1 read getIC4EIE write setIC4EIE;
- property IC4IE : TBits_1 read getIC4IE write setIC4IE;
- property IC5EIE : TBits_1 read getIC5EIE write setIC5EIE;
- 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 RTCCIE : TBits_1 read getRTCCIE write setRTCCIE;
- 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 w : TBits_32 read getw write setw;
- end;
- TINT_IEC1 = record
- private
- function getCMP1IE : TBits_1; inline;
- function getCMP2IE : TBits_1; inline;
- function getCMP3IE : TBits_1; inline;
- function getCNAIE : TBits_1; inline;
- function getCNBIE : TBits_1; inline;
- function getCNCIE : TBits_1; inline;
- function getCTMUIE : TBits_1; inline;
- function getDMA0IE : TBits_1; inline;
- function getDMA1IE : TBits_1; inline;
- function getDMA2IE : TBits_1; inline;
- function getDMA3IE : TBits_1; inline;
- function getI2C1BIE : TBits_1; inline;
- function getI2C1MIE : TBits_1; inline;
- function getI2C1SIE : TBits_1; inline;
- function getI2C2BIE : TBits_1; inline;
- function getI2C2MIE : TBits_1; inline;
- function getI2C2SIE : TBits_1; inline;
- function getPMPEIE : TBits_1; inline;
- function getPMPIE : TBits_1; inline;
- function getSPI1EIE : TBits_1; inline;
- function getSPI1RXIE : TBits_1; inline;
- function getSPI1TXIE : TBits_1; inline;
- function getSPI2EIE : TBits_1; inline;
- function getSPI2RXIE : TBits_1; inline;
- function getSPI2TXIE : TBits_1; inline;
- function getU1EIE : TBits_1; inline;
- function getU1RXIE : TBits_1; inline;
- function getU1TXIE : TBits_1; inline;
- function getU2EIE : TBits_1; inline;
- function getU2RXIE : TBits_1; inline;
- function getU2TXIE : TBits_1; inline;
- function getUSBIE : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setCMP1IE(thebits : TBits_1); inline;
- procedure setCMP2IE(thebits : TBits_1); inline;
- procedure setCMP3IE(thebits : TBits_1); inline;
- procedure setCNAIE(thebits : TBits_1); inline;
- procedure setCNBIE(thebits : TBits_1); inline;
- procedure setCNCIE(thebits : TBits_1); inline;
- procedure setCTMUIE(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 setI2C1BIE(thebits : TBits_1); inline;
- procedure setI2C1MIE(thebits : TBits_1); inline;
- procedure setI2C1SIE(thebits : TBits_1); inline;
- procedure setI2C2BIE(thebits : TBits_1); inline;
- procedure setI2C2MIE(thebits : TBits_1); inline;
- procedure setI2C2SIE(thebits : TBits_1); inline;
- procedure setPMPEIE(thebits : TBits_1); inline;
- procedure setPMPIE(thebits : TBits_1); inline;
- procedure setSPI1EIE(thebits : TBits_1); inline;
- procedure setSPI1RXIE(thebits : TBits_1); inline;
- procedure setSPI1TXIE(thebits : TBits_1); inline;
- procedure setSPI2EIE(thebits : TBits_1); inline;
- procedure setSPI2RXIE(thebits : TBits_1); inline;
- procedure setSPI2TXIE(thebits : TBits_1); inline;
- procedure setU1EIE(thebits : TBits_1); inline;
- procedure setU1RXIE(thebits : TBits_1); inline;
- procedure setU1TXIE(thebits : TBits_1); inline;
- procedure setU2EIE(thebits : TBits_1); inline;
- procedure setU2RXIE(thebits : TBits_1); inline;
- procedure setU2TXIE(thebits : TBits_1); inline;
- procedure setUSBIE(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCMP1IE; inline;
- procedure clearCMP2IE; inline;
- procedure clearCMP3IE; inline;
- procedure clearCNAIE; inline;
- procedure clearCNBIE; inline;
- procedure clearCNCIE; inline;
- procedure clearCTMUIE; inline;
- procedure clearDMA0IE; inline;
- procedure clearDMA1IE; inline;
- procedure clearDMA2IE; inline;
- procedure clearDMA3IE; inline;
- procedure clearI2C1BIE; inline;
- procedure clearI2C1MIE; inline;
- procedure clearI2C1SIE; inline;
- procedure clearI2C2BIE; inline;
- procedure clearI2C2MIE; inline;
- procedure clearI2C2SIE; inline;
- procedure clearPMPEIE; inline;
- procedure clearPMPIE; inline;
- procedure clearSPI1EIE; inline;
- procedure clearSPI1RXIE; inline;
- procedure clearSPI1TXIE; inline;
- procedure clearSPI2EIE; inline;
- procedure clearSPI2RXIE; inline;
- procedure clearSPI2TXIE; inline;
- procedure clearU1EIE; inline;
- procedure clearU1RXIE; inline;
- procedure clearU1TXIE; inline;
- procedure clearU2EIE; inline;
- procedure clearU2RXIE; inline;
- procedure clearU2TXIE; inline;
- procedure clearUSBIE; inline;
- procedure setCMP1IE; inline;
- procedure setCMP2IE; inline;
- procedure setCMP3IE; inline;
- procedure setCNAIE; inline;
- procedure setCNBIE; inline;
- procedure setCNCIE; inline;
- procedure setCTMUIE; inline;
- procedure setDMA0IE; inline;
- procedure setDMA1IE; inline;
- procedure setDMA2IE; inline;
- procedure setDMA3IE; inline;
- procedure setI2C1BIE; inline;
- procedure setI2C1MIE; inline;
- procedure setI2C1SIE; inline;
- procedure setI2C2BIE; inline;
- procedure setI2C2MIE; inline;
- procedure setI2C2SIE; inline;
- procedure setPMPEIE; inline;
- procedure setPMPIE; inline;
- procedure setSPI1EIE; inline;
- procedure setSPI1RXIE; inline;
- procedure setSPI1TXIE; inline;
- procedure setSPI2EIE; inline;
- procedure setSPI2RXIE; inline;
- procedure setSPI2TXIE; inline;
- procedure setU1EIE; inline;
- procedure setU1RXIE; inline;
- procedure setU1TXIE; inline;
- procedure setU2EIE; inline;
- procedure setU2RXIE; inline;
- procedure setU2TXIE; inline;
- procedure setUSBIE; inline;
- property CMP1IE : TBits_1 read getCMP1IE write setCMP1IE;
- property CMP2IE : TBits_1 read getCMP2IE write setCMP2IE;
- property CMP3IE : TBits_1 read getCMP3IE write setCMP3IE;
- property CNAIE : TBits_1 read getCNAIE write setCNAIE;
- property CNBIE : TBits_1 read getCNBIE write setCNBIE;
- property CNCIE : TBits_1 read getCNCIE write setCNCIE;
- property CTMUIE : TBits_1 read getCTMUIE write setCTMUIE;
- 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 I2C1BIE : TBits_1 read getI2C1BIE write setI2C1BIE;
- property I2C1MIE : TBits_1 read getI2C1MIE write setI2C1MIE;
- property I2C1SIE : TBits_1 read getI2C1SIE write setI2C1SIE;
- 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 PMPEIE : TBits_1 read getPMPEIE write setPMPEIE;
- property PMPIE : TBits_1 read getPMPIE write setPMPIE;
- 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 SPI2EIE : TBits_1 read getSPI2EIE write setSPI2EIE;
- property SPI2RXIE : TBits_1 read getSPI2RXIE write setSPI2RXIE;
- property SPI2TXIE : TBits_1 read getSPI2TXIE write setSPI2TXIE;
- 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 U2EIE : TBits_1 read getU2EIE write setU2EIE;
- property U2RXIE : TBits_1 read getU2RXIE write setU2RXIE;
- property U2TXIE : TBits_1 read getU2TXIE write setU2TXIE;
- property USBIE : TBits_1 read getUSBIE write setUSBIE;
- 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 getAD1IP : TBits_3; inline;
- function getAD1IS : TBits_2; inline;
- function getIC5IP : TBits_3; inline;
- function getIC5IS : TBits_2; inline;
- function getOC5IP : TBits_3; inline;
- function getOC5IS : TBits_2; inline;
- function getT5IP : TBits_3; inline;
- function getT5IS : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setAD1IP(thebits : TBits_3); inline;
- procedure setAD1IS(thebits : TBits_2); 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 setT5IP(thebits : TBits_3); inline;
- procedure setT5IS(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 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 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 getCMP1IP : TBits_3; inline;
- function getCMP1IS : TBits_2; inline;
- function getFCEIP : TBits_3; inline;
- function getFCEIS : TBits_2; inline;
- function getFSCMIP : TBits_3; inline;
- function getFSCMIS : TBits_2; inline;
- function getRTCCIP : TBits_3; inline;
- function getRTCCIS : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setCMP1IP(thebits : TBits_3); inline;
- procedure setCMP1IS(thebits : TBits_2); inline;
- procedure setFCEIP(thebits : TBits_3); inline;
- procedure setFCEIS(thebits : TBits_2); inline;
- procedure setFSCMIP(thebits : TBits_3); inline;
- procedure setFSCMIS(thebits : TBits_2); inline;
- procedure setRTCCIP(thebits : TBits_3); inline;
- procedure setRTCCIS(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 FCEIP : TBits_3 read getFCEIP write setFCEIP;
- property FCEIS : TBits_2 read getFCEIS write setFCEIS;
- property FSCMIP : TBits_3 read getFSCMIP write setFSCMIP;
- property FSCMIS : TBits_2 read getFSCMIS write setFSCMIS;
- property RTCCIP : TBits_3 read getRTCCIP write setRTCCIP;
- property RTCCIS : TBits_2 read getRTCCIS write setRTCCIS;
- property w : TBits_32 read getw write setw;
- end;
- TINT_IPC7 = record
- private
- function getCMP2IP : TBits_3; inline;
- function getCMP2IS : TBits_2; inline;
- function getCMP3IP : TBits_3; inline;
- function getCMP3IS : TBits_2; inline;
- function getSPI1IP : TBits_3; inline;
- function getSPI1IS : TBits_2; inline;
- function getUSBIP : TBits_3; inline;
- function getUSBIS : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setCMP2IP(thebits : TBits_3); inline;
- procedure setCMP2IS(thebits : TBits_2); inline;
- procedure setCMP3IP(thebits : TBits_3); inline;
- procedure setCMP3IS(thebits : TBits_2); inline;
- procedure setSPI1IP(thebits : TBits_3); inline;
- procedure setSPI1IS(thebits : TBits_2); inline;
- procedure setUSBIP(thebits : TBits_3); inline;
- procedure setUSBIS(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property CMP2IP : TBits_3 read getCMP2IP write setCMP2IP;
- property CMP2IS : TBits_2 read getCMP2IS write setCMP2IS;
- property CMP3IP : TBits_3 read getCMP3IP write setCMP3IP;
- property CMP3IS : TBits_2 read getCMP3IS write setCMP3IS;
- property SPI1IP : TBits_3 read getSPI1IP write setSPI1IP;
- property SPI1IS : TBits_2 read getSPI1IS write setSPI1IS;
- 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_IPC8 = record
- private
- function getCNIP : TBits_3; inline;
- function getCNIS : TBits_2; inline;
- function getI2C1IP : TBits_3; inline;
- function getI2C1IS : TBits_2; inline;
- function getPMPIP : TBits_3; inline;
- function getPMPIS : TBits_2; inline;
- function getU1IP : TBits_3; inline;
- function getU1IS : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setCNIP(thebits : TBits_3); inline;
- procedure setCNIS(thebits : TBits_2); inline;
- procedure setI2C1IP(thebits : TBits_3); inline;
- procedure setI2C1IS(thebits : TBits_2); inline;
- procedure setPMPIP(thebits : TBits_3); inline;
- procedure setPMPIS(thebits : TBits_2); inline;
- procedure setU1IP(thebits : TBits_3); inline;
- procedure setU1IS(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property CNIP : TBits_3 read getCNIP write setCNIP;
- property CNIS : TBits_2 read getCNIS write setCNIS;
- property I2C1IP : TBits_3 read getI2C1IP write setI2C1IP;
- property I2C1IS : TBits_2 read getI2C1IS write setI2C1IS;
- property PMPIP : TBits_3 read getPMPIP write setPMPIP;
- property PMPIS : TBits_2 read getPMPIS write setPMPIS;
- 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_IPC9 = record
- private
- function getCTMUIP : TBits_3; inline;
- function getCTMUIS : TBits_2; inline;
- function getI2C2IP : TBits_3; inline;
- function getI2C2IS : TBits_2; inline;
- function getSPI2IP : TBits_3; inline;
- function getSPI2IS : TBits_2; inline;
- function getU2IP : TBits_3; inline;
- function getU2IS : TBits_2; inline;
- function getw : TBits_32; inline;
- procedure setCTMUIP(thebits : TBits_3); inline;
- procedure setCTMUIS(thebits : TBits_2); inline;
- procedure setI2C2IP(thebits : TBits_3); inline;
- procedure setI2C2IS(thebits : TBits_2); inline;
- procedure setSPI2IP(thebits : TBits_3); inline;
- procedure setSPI2IS(thebits : TBits_2); inline;
- procedure setU2IP(thebits : TBits_3); inline;
- procedure setU2IS(thebits : TBits_2); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- property CTMUIP : TBits_3 read getCTMUIP write setCTMUIP;
- property CTMUIS : TBits_2 read getCTMUIS write setCTMUIS;
- property I2C2IP : TBits_3 read getI2C2IP write setI2C2IP;
- property I2C2IS : TBits_2 read getI2C2IS write setI2C2IS;
- property SPI2IP : TBits_3 read getSPI2IP write setSPI2IP;
- property SPI2IS : TBits_2 read getSPI2IS write setSPI2IS;
- property U2IP : TBits_3 read getU2IP write setU2IP;
- property U2IS : TBits_2 read getU2IS write setU2IS;
- property w : TBits_32 read getw write setw;
- end;
- TINT_IPC10 = 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;
- 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;
- IEC0bits : TINT_IEC0;
- IEC0 : longWord;
- IEC0CLR : longWord;
- IEC0SET : longWord;
- IEC0INV : longWord;
- IEC1bits : TINT_IEC1;
- IEC1 : longWord;
- IEC1CLR : longWord;
- IEC1SET : longWord;
- IEC1INV : 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;
- 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;
- 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_ANSELA = record
- private
- function getANSA0 : TBits_1; inline;
- function getANSA1 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setANSA0(thebits : TBits_1); inline;
- procedure setANSA1(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearANSA0; inline;
- procedure clearANSA1; inline;
- procedure setANSA0; inline;
- procedure setANSA1; inline;
- property ANSA0 : TBits_1 read getANSA0 write setANSA0;
- property ANSA1 : TBits_1 read getANSA1 write setANSA1;
- property w : TBits_32 read getw write setw;
- end;
- TPORTA_TRISA = record
- private
- function getTRISA0 : TBits_1; inline;
- function getTRISA1 : TBits_1; inline;
- function getTRISA2 : TBits_1; inline;
- function getTRISA3 : TBits_1; inline;
- function getTRISA4 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setTRISA0(thebits : TBits_1); inline;
- procedure setTRISA1(thebits : TBits_1); inline;
- procedure setTRISA2(thebits : TBits_1); inline;
- procedure setTRISA3(thebits : TBits_1); inline;
- procedure setTRISA4(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearTRISA0; inline;
- procedure clearTRISA1; inline;
- procedure clearTRISA2; inline;
- procedure clearTRISA3; inline;
- procedure clearTRISA4; inline;
- procedure setTRISA0; inline;
- procedure setTRISA1; inline;
- procedure setTRISA2; inline;
- procedure setTRISA3; inline;
- procedure setTRISA4; inline;
- property TRISA0 : TBits_1 read getTRISA0 write setTRISA0;
- property TRISA1 : TBits_1 read getTRISA1 write setTRISA1;
- 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 w : TBits_32 read getw write setw;
- end;
- TPORTA_PORTA = record
- private
- function getRA0 : TBits_1; inline;
- function getRA1 : TBits_1; inline;
- function getRA2 : TBits_1; inline;
- function getRA3 : TBits_1; inline;
- function getRA4 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setRA0(thebits : TBits_1); inline;
- procedure setRA1(thebits : TBits_1); inline;
- procedure setRA2(thebits : TBits_1); inline;
- procedure setRA3(thebits : TBits_1); inline;
- procedure setRA4(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearRA0; inline;
- procedure clearRA1; inline;
- procedure clearRA2; inline;
- procedure clearRA3; inline;
- procedure clearRA4; inline;
- procedure setRA0; inline;
- procedure setRA1; inline;
- procedure setRA2; inline;
- procedure setRA3; inline;
- procedure setRA4; inline;
- property RA0 : TBits_1 read getRA0 write setRA0;
- property RA1 : TBits_1 read getRA1 write setRA1;
- 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 w : TBits_32 read getw write setw;
- end;
- TPortA_bits=(RA0=0,RA1=1,RA2=2,RA3=3,RA4=4);
- TPortA_bitset = set of TPortA_bits;
- TPORTA_LATA = record
- private
- function getLATA0 : TBits_1; inline;
- function getLATA1 : TBits_1; inline;
- function getLATA2 : TBits_1; inline;
- function getLATA3 : TBits_1; inline;
- function getLATA4 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setLATA0(thebits : TBits_1); inline;
- procedure setLATA1(thebits : TBits_1); inline;
- procedure setLATA2(thebits : TBits_1); inline;
- procedure setLATA3(thebits : TBits_1); inline;
- procedure setLATA4(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearLATA0; inline;
- procedure clearLATA1; inline;
- procedure clearLATA2; inline;
- procedure clearLATA3; inline;
- procedure clearLATA4; inline;
- procedure setLATA0; inline;
- procedure setLATA1; inline;
- procedure setLATA2; inline;
- procedure setLATA3; inline;
- procedure setLATA4; inline;
- property LATA0 : TBits_1 read getLATA0 write setLATA0;
- property LATA1 : TBits_1 read getLATA1 write setLATA1;
- 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 w : TBits_32 read getw write setw;
- end;
- TPORTA_ODCA = record
- private
- function getODCA0 : TBits_1; inline;
- function getODCA1 : TBits_1; inline;
- function getODCA2 : TBits_1; inline;
- function getODCA3 : TBits_1; inline;
- function getODCA4 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setODCA0(thebits : TBits_1); inline;
- procedure setODCA1(thebits : TBits_1); inline;
- procedure setODCA2(thebits : TBits_1); inline;
- procedure setODCA3(thebits : TBits_1); inline;
- procedure setODCA4(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearODCA0; inline;
- procedure clearODCA1; inline;
- procedure clearODCA2; inline;
- procedure clearODCA3; inline;
- procedure clearODCA4; inline;
- procedure setODCA0; inline;
- procedure setODCA1; inline;
- procedure setODCA2; inline;
- procedure setODCA3; inline;
- procedure setODCA4; inline;
- property ODCA0 : TBits_1 read getODCA0 write setODCA0;
- property ODCA1 : TBits_1 read getODCA1 write setODCA1;
- 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 w : TBits_32 read getw write setw;
- end;
- TPORTA_CNPUA = record
- private
- function getCNPUA0 : TBits_1; inline;
- function getCNPUA1 : TBits_1; inline;
- function getCNPUA2 : TBits_1; inline;
- function getCNPUA3 : TBits_1; inline;
- function getCNPUA4 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setCNPUA0(thebits : TBits_1); inline;
- procedure setCNPUA1(thebits : TBits_1); inline;
- procedure setCNPUA2(thebits : TBits_1); inline;
- procedure setCNPUA3(thebits : TBits_1); inline;
- procedure setCNPUA4(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCNPUA0; inline;
- procedure clearCNPUA1; inline;
- procedure clearCNPUA2; inline;
- procedure clearCNPUA3; inline;
- procedure clearCNPUA4; inline;
- procedure setCNPUA0; inline;
- procedure setCNPUA1; inline;
- procedure setCNPUA2; inline;
- procedure setCNPUA3; inline;
- procedure setCNPUA4; inline;
- property CNPUA0 : TBits_1 read getCNPUA0 write setCNPUA0;
- property CNPUA1 : TBits_1 read getCNPUA1 write setCNPUA1;
- property CNPUA2 : TBits_1 read getCNPUA2 write setCNPUA2;
- property CNPUA3 : TBits_1 read getCNPUA3 write setCNPUA3;
- property CNPUA4 : TBits_1 read getCNPUA4 write setCNPUA4;
- property w : TBits_32 read getw write setw;
- end;
- TPORTA_CNPDA = record
- private
- function getCNPDA0 : TBits_1; inline;
- function getCNPDA1 : TBits_1; inline;
- function getCNPDA2 : TBits_1; inline;
- function getCNPDA3 : TBits_1; inline;
- function getCNPDA4 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setCNPDA0(thebits : TBits_1); inline;
- procedure setCNPDA1(thebits : TBits_1); inline;
- procedure setCNPDA2(thebits : TBits_1); inline;
- procedure setCNPDA3(thebits : TBits_1); inline;
- procedure setCNPDA4(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCNPDA0; inline;
- procedure clearCNPDA1; inline;
- procedure clearCNPDA2; inline;
- procedure clearCNPDA3; inline;
- procedure clearCNPDA4; inline;
- procedure setCNPDA0; inline;
- procedure setCNPDA1; inline;
- procedure setCNPDA2; inline;
- procedure setCNPDA3; inline;
- procedure setCNPDA4; inline;
- property CNPDA0 : TBits_1 read getCNPDA0 write setCNPDA0;
- property CNPDA1 : TBits_1 read getCNPDA1 write setCNPDA1;
- property CNPDA2 : TBits_1 read getCNPDA2 write setCNPDA2;
- property CNPDA3 : TBits_1 read getCNPDA3 write setCNPDA3;
- property CNPDA4 : TBits_1 read getCNPDA4 write setCNPDA4;
- property w : TBits_32 read getw write setw;
- end;
- TPORTA_CNCONA = 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;
- TPORTA_CNENA = record
- private
- function getCNIEA0 : TBits_1; inline;
- function getCNIEA1 : TBits_1; inline;
- function getCNIEA2 : TBits_1; inline;
- function getCNIEA3 : TBits_1; inline;
- function getCNIEA4 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setCNIEA0(thebits : TBits_1); inline;
- procedure setCNIEA1(thebits : TBits_1); inline;
- procedure setCNIEA2(thebits : TBits_1); inline;
- procedure setCNIEA3(thebits : TBits_1); inline;
- procedure setCNIEA4(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCNIEA0; inline;
- procedure clearCNIEA1; inline;
- procedure clearCNIEA2; inline;
- procedure clearCNIEA3; inline;
- procedure clearCNIEA4; inline;
- procedure setCNIEA0; inline;
- procedure setCNIEA1; inline;
- procedure setCNIEA2; inline;
- procedure setCNIEA3; inline;
- procedure setCNIEA4; inline;
- property CNIEA0 : TBits_1 read getCNIEA0 write setCNIEA0;
- property CNIEA1 : TBits_1 read getCNIEA1 write setCNIEA1;
- property CNIEA2 : TBits_1 read getCNIEA2 write setCNIEA2;
- property CNIEA3 : TBits_1 read getCNIEA3 write setCNIEA3;
- property CNIEA4 : TBits_1 read getCNIEA4 write setCNIEA4;
- property w : TBits_32 read getw write setw;
- end;
- TPORTA_CNSTATA = record
- private
- function getCNSTATA0 : TBits_1; inline;
- function getCNSTATA1 : TBits_1; inline;
- function getCNSTATA2 : TBits_1; inline;
- function getCNSTATA3 : TBits_1; inline;
- function getCNSTATA4 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setCNSTATA0(thebits : TBits_1); inline;
- procedure setCNSTATA1(thebits : TBits_1); inline;
- procedure setCNSTATA2(thebits : TBits_1); inline;
- procedure setCNSTATA3(thebits : TBits_1); inline;
- procedure setCNSTATA4(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCNSTATA0; inline;
- procedure clearCNSTATA1; inline;
- procedure clearCNSTATA2; inline;
- procedure clearCNSTATA3; inline;
- procedure clearCNSTATA4; inline;
- procedure setCNSTATA0; inline;
- procedure setCNSTATA1; inline;
- procedure setCNSTATA2; inline;
- procedure setCNSTATA3; inline;
- procedure setCNSTATA4; inline;
- property CNSTATA0 : TBits_1 read getCNSTATA0 write setCNSTATA0;
- property CNSTATA1 : TBits_1 read getCNSTATA1 write setCNSTATA1;
- property CNSTATA2 : TBits_1 read getCNSTATA2 write setCNSTATA2;
- property CNSTATA3 : TBits_1 read getCNSTATA3 write setCNSTATA3;
- property CNSTATA4 : TBits_1 read getCNSTATA4 write setCNSTATA4;
- property w : TBits_32 read getw write setw;
- end;
- type
- TPORTARegisters = record
- ANSELAbits : TPORTA_ANSELA;
- ANSELA : longWord;
- ANSELACLR : longWord;
- ANSELASET : longWord;
- ANSELAINV : longWord;
- 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;
- CNPUAbits : TPORTA_CNPUA;
- CNPUA : longWord;
- CNPUACLR : longWord;
- CNPUASET : longWord;
- CNPUAINV : longWord;
- CNPDAbits : TPORTA_CNPDA;
- CNPDA : longWord;
- CNPDACLR : longWord;
- CNPDASET : longWord;
- CNPDAINV : longWord;
- CNCONAbits : TPORTA_CNCONA;
- CNCONA : longWord;
- CNCONACLR : longWord;
- CNCONASET : longWord;
- CNCONAINV : longWord;
- CNENAbits : TPORTA_CNENA;
- CNENA : longWord;
- CNENACLR : longWord;
- CNENASET : longWord;
- CNENAINV : longWord;
- CNSTATAbits : TPORTA_CNSTATA;
- CNSTATA : longWord;
- CNSTATACLR : longWord;
- CNSTATASET : longWord;
- CNSTATAINV : longWord;
- end;
- TPORTB_ANSELB = record
- private
- function getANSB0 : TBits_1; inline;
- function getANSB1 : TBits_1; inline;
- function getANSB13 : TBits_1; inline;
- function getANSB14 : TBits_1; inline;
- function getANSB15 : TBits_1; inline;
- function getANSB2 : TBits_1; inline;
- function getANSB3 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setANSB0(thebits : TBits_1); inline;
- procedure setANSB1(thebits : TBits_1); inline;
- procedure setANSB13(thebits : TBits_1); inline;
- procedure setANSB14(thebits : TBits_1); inline;
- procedure setANSB15(thebits : TBits_1); inline;
- procedure setANSB2(thebits : TBits_1); inline;
- procedure setANSB3(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearANSB0; inline;
- procedure clearANSB13; inline;
- procedure clearANSB14; inline;
- procedure clearANSB15; inline;
- procedure clearANSB1; inline;
- procedure clearANSB2; inline;
- procedure clearANSB3; inline;
- procedure setANSB0; inline;
- procedure setANSB13; inline;
- procedure setANSB14; inline;
- procedure setANSB15; inline;
- procedure setANSB1; inline;
- procedure setANSB2; inline;
- procedure setANSB3; inline;
- property ANSB0 : TBits_1 read getANSB0 write setANSB0;
- property ANSB1 : TBits_1 read getANSB1 write setANSB1;
- property ANSB13 : TBits_1 read getANSB13 write setANSB13;
- property ANSB14 : TBits_1 read getANSB14 write setANSB14;
- property ANSB15 : TBits_1 read getANSB15 write setANSB15;
- property ANSB2 : TBits_1 read getANSB2 write setANSB2;
- property ANSB3 : TBits_1 read getANSB3 write setANSB3;
- property w : TBits_32 read getw write setw;
- 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 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 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 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 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 clearTRISB13; inline;
- procedure clearTRISB14; inline;
- procedure clearTRISB15; inline;
- procedure clearTRISB1; inline;
- procedure clearTRISB2; inline;
- procedure clearTRISB3; inline;
- procedure clearTRISB4; inline;
- procedure clearTRISB5; inline;
- procedure clearTRISB7; inline;
- procedure clearTRISB8; inline;
- procedure clearTRISB9; inline;
- procedure setTRISB0; inline;
- procedure setTRISB10; inline;
- procedure setTRISB11; 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 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 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 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 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 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 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 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 clearRB13; inline;
- procedure clearRB14; inline;
- procedure clearRB15; inline;
- procedure clearRB1; inline;
- procedure clearRB2; inline;
- procedure clearRB3; inline;
- procedure clearRB4; inline;
- procedure clearRB5; inline;
- procedure clearRB7; inline;
- procedure clearRB8; inline;
- procedure clearRB9; inline;
- procedure setRB0; inline;
- procedure setRB10; inline;
- procedure setRB11; 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 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 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 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,RB7=7,RB8=8,RB9=9,RB10=10,RB11=11,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 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 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 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 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 clearLATB13; inline;
- procedure clearLATB14; inline;
- procedure clearLATB15; inline;
- procedure clearLATB1; inline;
- procedure clearLATB2; inline;
- procedure clearLATB3; inline;
- procedure clearLATB4; inline;
- procedure clearLATB5; inline;
- procedure clearLATB7; inline;
- procedure clearLATB8; inline;
- procedure clearLATB9; inline;
- procedure setLATB0; inline;
- procedure setLATB10; inline;
- procedure setLATB11; 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 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 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 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 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 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 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 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 clearODCB13; inline;
- procedure clearODCB14; inline;
- procedure clearODCB15; inline;
- procedure clearODCB1; inline;
- procedure clearODCB2; inline;
- procedure clearODCB3; inline;
- procedure clearODCB4; inline;
- procedure clearODCB5; inline;
- procedure clearODCB7; inline;
- procedure clearODCB8; inline;
- procedure clearODCB9; inline;
- procedure setODCB0; inline;
- procedure setODCB10; inline;
- procedure setODCB11; 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 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 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 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;
- TPORTB_CNPUB = record
- private
- function getCNPUB0 : TBits_1; inline;
- function getCNPUB1 : TBits_1; inline;
- function getCNPUB10 : TBits_1; inline;
- function getCNPUB11 : TBits_1; inline;
- function getCNPUB13 : TBits_1; inline;
- function getCNPUB14 : TBits_1; inline;
- function getCNPUB15 : TBits_1; inline;
- function getCNPUB2 : TBits_1; inline;
- function getCNPUB3 : TBits_1; inline;
- function getCNPUB4 : TBits_1; inline;
- function getCNPUB5 : TBits_1; inline;
- function getCNPUB7 : TBits_1; inline;
- function getCNPUB8 : TBits_1; inline;
- function getCNPUB9 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setCNPUB0(thebits : TBits_1); inline;
- procedure setCNPUB1(thebits : TBits_1); inline;
- procedure setCNPUB10(thebits : TBits_1); inline;
- procedure setCNPUB11(thebits : TBits_1); inline;
- procedure setCNPUB13(thebits : TBits_1); inline;
- procedure setCNPUB14(thebits : TBits_1); inline;
- procedure setCNPUB15(thebits : TBits_1); inline;
- procedure setCNPUB2(thebits : TBits_1); inline;
- procedure setCNPUB3(thebits : TBits_1); inline;
- procedure setCNPUB4(thebits : TBits_1); inline;
- procedure setCNPUB5(thebits : TBits_1); inline;
- procedure setCNPUB7(thebits : TBits_1); inline;
- procedure setCNPUB8(thebits : TBits_1); inline;
- procedure setCNPUB9(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCNPUB0; inline;
- procedure clearCNPUB10; inline;
- procedure clearCNPUB11; inline;
- procedure clearCNPUB13; inline;
- procedure clearCNPUB14; inline;
- procedure clearCNPUB15; inline;
- procedure clearCNPUB1; inline;
- procedure clearCNPUB2; inline;
- procedure clearCNPUB3; inline;
- procedure clearCNPUB4; inline;
- procedure clearCNPUB5; inline;
- procedure clearCNPUB7; inline;
- procedure clearCNPUB8; inline;
- procedure clearCNPUB9; inline;
- procedure setCNPUB0; inline;
- procedure setCNPUB10; inline;
- procedure setCNPUB11; inline;
- procedure setCNPUB13; inline;
- procedure setCNPUB14; inline;
- procedure setCNPUB15; inline;
- procedure setCNPUB1; inline;
- procedure setCNPUB2; inline;
- procedure setCNPUB3; inline;
- procedure setCNPUB4; inline;
- procedure setCNPUB5; inline;
- procedure setCNPUB7; inline;
- procedure setCNPUB8; inline;
- procedure setCNPUB9; inline;
- property CNPUB0 : TBits_1 read getCNPUB0 write setCNPUB0;
- property CNPUB1 : TBits_1 read getCNPUB1 write setCNPUB1;
- property CNPUB10 : TBits_1 read getCNPUB10 write setCNPUB10;
- property CNPUB11 : TBits_1 read getCNPUB11 write setCNPUB11;
- property CNPUB13 : TBits_1 read getCNPUB13 write setCNPUB13;
- property CNPUB14 : TBits_1 read getCNPUB14 write setCNPUB14;
- property CNPUB15 : TBits_1 read getCNPUB15 write setCNPUB15;
- property CNPUB2 : TBits_1 read getCNPUB2 write setCNPUB2;
- property CNPUB3 : TBits_1 read getCNPUB3 write setCNPUB3;
- property CNPUB4 : TBits_1 read getCNPUB4 write setCNPUB4;
- property CNPUB5 : TBits_1 read getCNPUB5 write setCNPUB5;
- property CNPUB7 : TBits_1 read getCNPUB7 write setCNPUB7;
- property CNPUB8 : TBits_1 read getCNPUB8 write setCNPUB8;
- property CNPUB9 : TBits_1 read getCNPUB9 write setCNPUB9;
- property w : TBits_32 read getw write setw;
- end;
- TPORTB_CNPDB = record
- private
- function getCNPDB0 : TBits_1; inline;
- function getCNPDB1 : TBits_1; inline;
- function getCNPDB10 : TBits_1; inline;
- function getCNPDB11 : TBits_1; inline;
- function getCNPDB13 : TBits_1; inline;
- function getCNPDB14 : TBits_1; inline;
- function getCNPDB15 : TBits_1; inline;
- function getCNPDB2 : TBits_1; inline;
- function getCNPDB3 : TBits_1; inline;
- function getCNPDB4 : TBits_1; inline;
- function getCNPDB5 : TBits_1; inline;
- function getCNPDB7 : TBits_1; inline;
- function getCNPDB8 : TBits_1; inline;
- function getCNPDB9 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setCNPDB0(thebits : TBits_1); inline;
- procedure setCNPDB1(thebits : TBits_1); inline;
- procedure setCNPDB10(thebits : TBits_1); inline;
- procedure setCNPDB11(thebits : TBits_1); inline;
- procedure setCNPDB13(thebits : TBits_1); inline;
- procedure setCNPDB14(thebits : TBits_1); inline;
- procedure setCNPDB15(thebits : TBits_1); inline;
- procedure setCNPDB2(thebits : TBits_1); inline;
- procedure setCNPDB3(thebits : TBits_1); inline;
- procedure setCNPDB4(thebits : TBits_1); inline;
- procedure setCNPDB5(thebits : TBits_1); inline;
- procedure setCNPDB7(thebits : TBits_1); inline;
- procedure setCNPDB8(thebits : TBits_1); inline;
- procedure setCNPDB9(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCNPDB0; inline;
- procedure clearCNPDB10; inline;
- procedure clearCNPDB11; inline;
- procedure clearCNPDB13; inline;
- procedure clearCNPDB14; inline;
- procedure clearCNPDB15; inline;
- procedure clearCNPDB1; inline;
- procedure clearCNPDB2; inline;
- procedure clearCNPDB3; inline;
- procedure clearCNPDB4; inline;
- procedure clearCNPDB5; inline;
- procedure clearCNPDB7; inline;
- procedure clearCNPDB8; inline;
- procedure clearCNPDB9; inline;
- procedure setCNPDB0; inline;
- procedure setCNPDB10; inline;
- procedure setCNPDB11; inline;
- procedure setCNPDB13; inline;
- procedure setCNPDB14; inline;
- procedure setCNPDB15; inline;
- procedure setCNPDB1; inline;
- procedure setCNPDB2; inline;
- procedure setCNPDB3; inline;
- procedure setCNPDB4; inline;
- procedure setCNPDB5; inline;
- procedure setCNPDB7; inline;
- procedure setCNPDB8; inline;
- procedure setCNPDB9; inline;
- property CNPDB0 : TBits_1 read getCNPDB0 write setCNPDB0;
- property CNPDB1 : TBits_1 read getCNPDB1 write setCNPDB1;
- property CNPDB10 : TBits_1 read getCNPDB10 write setCNPDB10;
- property CNPDB11 : TBits_1 read getCNPDB11 write setCNPDB11;
- property CNPDB13 : TBits_1 read getCNPDB13 write setCNPDB13;
- property CNPDB14 : TBits_1 read getCNPDB14 write setCNPDB14;
- property CNPDB15 : TBits_1 read getCNPDB15 write setCNPDB15;
- property CNPDB2 : TBits_1 read getCNPDB2 write setCNPDB2;
- property CNPDB3 : TBits_1 read getCNPDB3 write setCNPDB3;
- property CNPDB4 : TBits_1 read getCNPDB4 write setCNPDB4;
- property CNPDB5 : TBits_1 read getCNPDB5 write setCNPDB5;
- property CNPDB7 : TBits_1 read getCNPDB7 write setCNPDB7;
- property CNPDB8 : TBits_1 read getCNPDB8 write setCNPDB8;
- property CNPDB9 : TBits_1 read getCNPDB9 write setCNPDB9;
- property w : TBits_32 read getw write setw;
- end;
- TPORTB_CNCONB = 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;
- TPORTB_CNENB = record
- private
- function getCNIEB0 : TBits_1; inline;
- function getCNIEB1 : TBits_1; inline;
- function getCNIEB10 : TBits_1; inline;
- function getCNIEB11 : TBits_1; inline;
- function getCNIEB13 : TBits_1; inline;
- function getCNIEB14 : TBits_1; inline;
- function getCNIEB15 : TBits_1; inline;
- function getCNIEB2 : TBits_1; inline;
- function getCNIEB3 : TBits_1; inline;
- function getCNIEB4 : TBits_1; inline;
- function getCNIEB5 : TBits_1; inline;
- function getCNIEB7 : TBits_1; inline;
- function getCNIEB8 : TBits_1; inline;
- function getCNIEB9 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setCNIEB0(thebits : TBits_1); inline;
- procedure setCNIEB1(thebits : TBits_1); inline;
- procedure setCNIEB10(thebits : TBits_1); inline;
- procedure setCNIEB11(thebits : TBits_1); inline;
- procedure setCNIEB13(thebits : TBits_1); inline;
- procedure setCNIEB14(thebits : TBits_1); inline;
- procedure setCNIEB15(thebits : TBits_1); inline;
- procedure setCNIEB2(thebits : TBits_1); inline;
- procedure setCNIEB3(thebits : TBits_1); inline;
- procedure setCNIEB4(thebits : TBits_1); inline;
- procedure setCNIEB5(thebits : TBits_1); inline;
- procedure setCNIEB7(thebits : TBits_1); inline;
- procedure setCNIEB8(thebits : TBits_1); inline;
- procedure setCNIEB9(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCNIEB0; inline;
- procedure clearCNIEB10; inline;
- procedure clearCNIEB11; inline;
- procedure clearCNIEB13; inline;
- procedure clearCNIEB14; inline;
- procedure clearCNIEB15; inline;
- procedure clearCNIEB1; inline;
- procedure clearCNIEB2; inline;
- procedure clearCNIEB3; inline;
- procedure clearCNIEB4; inline;
- procedure clearCNIEB5; inline;
- procedure clearCNIEB7; inline;
- procedure clearCNIEB8; inline;
- procedure clearCNIEB9; inline;
- procedure setCNIEB0; inline;
- procedure setCNIEB10; inline;
- procedure setCNIEB11; inline;
- procedure setCNIEB13; inline;
- procedure setCNIEB14; inline;
- procedure setCNIEB15; inline;
- procedure setCNIEB1; inline;
- procedure setCNIEB2; inline;
- procedure setCNIEB3; inline;
- procedure setCNIEB4; inline;
- procedure setCNIEB5; inline;
- procedure setCNIEB7; inline;
- procedure setCNIEB8; inline;
- procedure setCNIEB9; inline;
- property CNIEB0 : TBits_1 read getCNIEB0 write setCNIEB0;
- property CNIEB1 : TBits_1 read getCNIEB1 write setCNIEB1;
- property CNIEB10 : TBits_1 read getCNIEB10 write setCNIEB10;
- property CNIEB11 : TBits_1 read getCNIEB11 write setCNIEB11;
- property CNIEB13 : TBits_1 read getCNIEB13 write setCNIEB13;
- property CNIEB14 : TBits_1 read getCNIEB14 write setCNIEB14;
- property CNIEB15 : TBits_1 read getCNIEB15 write setCNIEB15;
- property CNIEB2 : TBits_1 read getCNIEB2 write setCNIEB2;
- property CNIEB3 : TBits_1 read getCNIEB3 write setCNIEB3;
- property CNIEB4 : TBits_1 read getCNIEB4 write setCNIEB4;
- property CNIEB5 : TBits_1 read getCNIEB5 write setCNIEB5;
- property CNIEB7 : TBits_1 read getCNIEB7 write setCNIEB7;
- property CNIEB8 : TBits_1 read getCNIEB8 write setCNIEB8;
- property CNIEB9 : TBits_1 read getCNIEB9 write setCNIEB9;
- property w : TBits_32 read getw write setw;
- end;
- TPORTB_CNSTATB = record
- private
- function getCNSTATB0 : TBits_1; inline;
- function getCNSTATB1 : TBits_1; inline;
- function getCNSTATB10 : TBits_1; inline;
- function getCNSTATB11 : TBits_1; inline;
- function getCNSTATB13 : TBits_1; inline;
- function getCNSTATB14 : TBits_1; inline;
- function getCNSTATB15 : TBits_1; inline;
- function getCNSTATB2 : TBits_1; inline;
- function getCNSTATB3 : TBits_1; inline;
- function getCNSTATB4 : TBits_1; inline;
- function getCNSTATB5 : TBits_1; inline;
- function getCNSTATB7 : TBits_1; inline;
- function getCNSTATB8 : TBits_1; inline;
- function getCNSTATB9 : TBits_1; inline;
- function getw : TBits_32; inline;
- procedure setCNSTATB0(thebits : TBits_1); inline;
- procedure setCNSTATB1(thebits : TBits_1); inline;
- procedure setCNSTATB10(thebits : TBits_1); inline;
- procedure setCNSTATB11(thebits : TBits_1); inline;
- procedure setCNSTATB13(thebits : TBits_1); inline;
- procedure setCNSTATB14(thebits : TBits_1); inline;
- procedure setCNSTATB15(thebits : TBits_1); inline;
- procedure setCNSTATB2(thebits : TBits_1); inline;
- procedure setCNSTATB3(thebits : TBits_1); inline;
- procedure setCNSTATB4(thebits : TBits_1); inline;
- procedure setCNSTATB5(thebits : TBits_1); inline;
- procedure setCNSTATB7(thebits : TBits_1); inline;
- procedure setCNSTATB8(thebits : TBits_1); inline;
- procedure setCNSTATB9(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearCNSTATB0; inline;
- procedure clearCNSTATB10; inline;
- procedure clearCNSTATB11; inline;
- procedure clearCNSTATB13; inline;
- procedure clearCNSTATB14; inline;
- procedure clearCNSTATB15; inline;
- procedure clearCNSTATB1; inline;
- procedure clearCNSTATB2; inline;
- procedure clearCNSTATB3; inline;
- procedure clearCNSTATB4; inline;
- procedure clearCNSTATB5; inline;
- procedure clearCNSTATB7; inline;
- procedure clearCNSTATB8; inline;
- procedure clearCNSTATB9; inline;
- procedure setCNSTATB0; inline;
- procedure setCNSTATB10; inline;
- procedure setCNSTATB11; inline;
- procedure setCNSTATB13; inline;
- procedure setCNSTATB14; inline;
- procedure setCNSTATB15; inline;
- procedure setCNSTATB1; inline;
- procedure setCNSTATB2; inline;
- procedure setCNSTATB3; inline;
- procedure setCNSTATB4; inline;
- procedure setCNSTATB5; inline;
- procedure setCNSTATB7; inline;
- procedure setCNSTATB8; inline;
- procedure setCNSTATB9; inline;
- property CNSTATB0 : TBits_1 read getCNSTATB0 write setCNSTATB0;
- property CNSTATB1 : TBits_1 read getCNSTATB1 write setCNSTATB1;
- property CNSTATB10 : TBits_1 read getCNSTATB10 write setCNSTATB10;
- property CNSTATB11 : TBits_1 read getCNSTATB11 write setCNSTATB11;
- property CNSTATB13 : TBits_1 read getCNSTATB13 write setCNSTATB13;
- property CNSTATB14 : TBits_1 read getCNSTATB14 write setCNSTATB14;
- property CNSTATB15 : TBits_1 read getCNSTATB15 write setCNSTATB15;
- property CNSTATB2 : TBits_1 read getCNSTATB2 write setCNSTATB2;
- property CNSTATB3 : TBits_1 read getCNSTATB3 write setCNSTATB3;
- property CNSTATB4 : TBits_1 read getCNSTATB4 write setCNSTATB4;
- property CNSTATB5 : TBits_1 read getCNSTATB5 write setCNSTATB5;
- property CNSTATB7 : TBits_1 read getCNSTATB7 write setCNSTATB7;
- property CNSTATB8 : TBits_1 read getCNSTATB8 write setCNSTATB8;
- property CNSTATB9 : TBits_1 read getCNSTATB9 write setCNSTATB9;
- property w : TBits_32 read getw write setw;
- end;
- type
- TPORTBRegisters = record
- ANSELBbits : TPORTB_ANSELB;
- ANSELB : longWord;
- ANSELBCLR : longWord;
- ANSELBSET : longWord;
- ANSELBINV : longWord;
- 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;
- CNPUBbits : TPORTB_CNPUB;
- CNPUB : longWord;
- CNPUBCLR : longWord;
- CNPUBSET : longWord;
- CNPUBINV : longWord;
- CNPDBbits : TPORTB_CNPDB;
- CNPDB : longWord;
- CNPDBCLR : longWord;
- CNPDBSET : longWord;
- CNPDBINV : longWord;
- CNCONBbits : TPORTB_CNCONB;
- CNCONB : longWord;
- CNCONBCLR : longWord;
- CNCONBSET : longWord;
- CNCONBINV : longWord;
- CNENBbits : TPORTB_CNENB;
- CNENB : longWord;
- CNENBCLR : longWord;
- CNENBSET : longWord;
- CNENBINV : longWord;
- CNSTATBbits : TPORTB_CNSTATB;
- CNSTATB : longWord;
- CNSTATBCLR : longWord;
- CNSTATBSET : longWord;
- CNSTATBINV : longWord;
- end;
- TDEVCFG_DEVCFG3 = record
- private
- function getFUSBIDIO : TBits_1; inline;
- function getFVBUSONIO : TBits_1; inline;
- function getIOL1WAY : TBits_1; inline;
- function getPMDL1WAY : TBits_1; inline;
- function getUSERID : TBits_16; inline;
- function getw : TBits_32; inline;
- procedure setFUSBIDIO(thebits : TBits_1); inline;
- procedure setFVBUSONIO(thebits : TBits_1); inline;
- procedure setIOL1WAY(thebits : TBits_1); inline;
- procedure setPMDL1WAY(thebits : TBits_1); inline;
- procedure setUSERID(thebits : TBits_16); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearFUSBIDIO; inline;
- procedure clearFVBUSONIO; inline;
- procedure clearIOL1WAY; inline;
- procedure clearPMDL1WAY; inline;
- procedure setFUSBIDIO; inline;
- procedure setFVBUSONIO; inline;
- procedure setIOL1WAY; inline;
- procedure setPMDL1WAY; inline;
- property FUSBIDIO : TBits_1 read getFUSBIDIO write setFUSBIDIO;
- property FVBUSONIO : TBits_1 read getFVBUSONIO write setFVBUSONIO;
- property IOL1WAY : TBits_1 read getIOL1WAY write setIOL1WAY;
- property PMDL1WAY : TBits_1 read getPMDL1WAY write setPMDL1WAY;
- 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 getFWDTWINSZ : TBits_2; inline;
- function getIESO : TBits_1; inline;
- function getOSCIOFNC : TBits_1; inline;
- function getPOSCMOD : TBits_2; inline;
- function getWDTPS : TBits_5; inline;
- function getWINDIS : TBits_1; 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 setFWDTWINSZ(thebits : TBits_2); 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 setWINDIS(thebits : TBits_1); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearFSOSCEN; inline;
- procedure clearFWDTEN; inline;
- procedure clearIESO; inline;
- procedure clearOSCIOFNC; inline;
- procedure clearWINDIS; inline;
- procedure setFSOSCEN; inline;
- procedure setFWDTEN; inline;
- procedure setIESO; inline;
- procedure setOSCIOFNC; inline;
- procedure setWINDIS; 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 FWDTWINSZ : TBits_2 read getFWDTWINSZ write setFWDTWINSZ;
- 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 WINDIS : TBits_1 read getWINDIS write setWINDIS;
- 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_2; inline;
- function getJTAGEN : TBits_1; inline;
- function getPWP : TBits_9; 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_2); inline;
- procedure setJTAGEN(thebits : TBits_1); inline;
- procedure setPWP(thebits : TBits_9); inline;
- procedure setw(thebits : TBits_32); inline;
- public
- procedure clearBWP; inline;
- procedure clearCP; inline;
- procedure clearJTAGEN; inline;
- procedure setBWP; inline;
- procedure setCP; inline;
- procedure setJTAGEN; 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_2 read getICESEL write setICESEL;
- property JTAGEN : TBits_1 read getJTAGEN write setJTAGEN;
- property PWP : TBits_9 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_ERROR_1_IRQ = 5;
- _INPUT_CAPTURE_1_IRQ = 6;
- _OUTPUT_COMPARE_1_IRQ = 7;
- _EXTERNAL_1_IRQ = 8;
- _TIMER_2_IRQ = 9;
- _INPUT_CAPTURE_ERROR_2_IRQ = 10;
- _INPUT_CAPTURE_2_IRQ = 11;
- _OUTPUT_COMPARE_2_IRQ = 12;
- _EXTERNAL_2_IRQ = 13;
- _TIMER_3_IRQ = 14;
- _INPUT_CAPTURE_ERROR_3_IRQ = 15;
- _INPUT_CAPTURE_3_IRQ = 16;
- _OUTPUT_COMPARE_3_IRQ = 17;
- _EXTERNAL_3_IRQ = 18;
- _TIMER_4_IRQ = 19;
- _INPUT_CAPTURE_ERROR_4_IRQ = 20;
- _INPUT_CAPTURE_4_IRQ = 21;
- _OUTPUT_COMPARE_4_IRQ = 22;
- _EXTERNAL_4_IRQ = 23;
- _TIMER_5_IRQ = 24;
- _INPUT_CAPTURE_ERROR_5_IRQ = 25;
- _INPUT_CAPTURE_5_IRQ = 26;
- _OUTPUT_COMPARE_5_IRQ = 27;
- _ADC_IRQ = 28;
- _FAIL_SAFE_MONITOR_IRQ = 29;
- _RTCC_IRQ = 30;
- _FLASH_CONTROL_IRQ = 31;
- _COMPARATOR_1_IRQ = 32;
- _COMPARATOR_2_IRQ = 33;
- _COMPARATOR_3_IRQ = 34;
- _USB_IRQ = 35;
- _SPI1_ERR_IRQ = 36;
- _SPI1_RX_IRQ = 37;
- _SPI1_TX_IRQ = 38;
- _UART1_ERR_IRQ = 39;
- _UART1_RX_IRQ = 40;
- _UART1_TX_IRQ = 41;
- _I2C1_BUS_IRQ = 42;
- _I2C1_SLAVE_IRQ = 43;
- _I2C1_MASTER_IRQ = 44;
- _CHANGE_NOTICE_A_IRQ = 45;
- _CHANGE_NOTICE_B_IRQ = 46;
- _CHANGE_NOTICE_C_IRQ = 47;
- _PMP_IRQ = 48;
- _PMP_ERROR_IRQ = 49;
- _SPI2_ERR_IRQ = 50;
- _SPI2_RX_IRQ = 51;
- _SPI2_TX_IRQ = 52;
- _UART2_ERR_IRQ = 53;
- _UART2_RX_IRQ = 54;
- _UART2_TX_IRQ = 55;
- _I2C2_BUS_IRQ = 56;
- _I2C2_SLAVE_IRQ = 57;
- _I2C2_MASTER_IRQ = 58;
- _CTMU_IRQ = 59;
- _DMA0_IRQ = 60;
- _DMA1_IRQ = 61;
- _DMA2_IRQ = 62;
- _DMA3_IRQ = 63;
- 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
- I2C1_BASE_ADDRESS = $BF805000;
- var
- I2C1 : TI2C1Registers absolute I2C1_BASE_ADDRESS;
- const
- I2C2_BASE_ADDRESS = $BF805100;
- var
- I2C2 : TI2C2Registers absolute I2C2_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
- 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 = $BF886100;
- var
- PORTB : TPORTBRegisters absolute PORTB_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 = $BF805800;
- var
- SPI1 : TSPI1Registers absolute SPI1_BASE_ADDRESS;
- const
- SPI2_BASE_ADDRESS = $BF805A00;
- var
- SPI2 : TSPI2Registers absolute SPI2_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
- UART1_BASE_ADDRESS = $BF806000;
- var
- UART1 : TUART1Registers absolute UART1_BASE_ADDRESS;
- const
- UART2_BASE_ADDRESS = $BF806200;
- var
- UART2 : TUART2Registers absolute UART2_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;
- 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.setWDTWINEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TWDT_WDTCON.clearWDTWINEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TWDT_WDTCON.setWDTWINEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TWDT_WDTCON.getWDTWINEN : TBits_1; inline;
- begin
- getWDTWINEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- 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 TI2C1_I2C1ACON.setSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TI2C1_I2C1ACON.clearSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TI2C1_I2C1ACON.setSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TI2C1_I2C1ACON.getSEN : TBits_1; inline;
- begin
- getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TI2C1_I2C1ACON.setRSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TI2C1_I2C1ACON.clearRSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TI2C1_I2C1ACON.setRSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TI2C1_I2C1ACON.getRSEN : TBits_1; inline;
- begin
- getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TI2C1_I2C1ACON.setPEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TI2C1_I2C1ACON.clearPEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TI2C1_I2C1ACON.setPEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TI2C1_I2C1ACON.getPEN : TBits_1; inline;
- begin
- getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TI2C1_I2C1ACON.setRCEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TI2C1_I2C1ACON.clearRCEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TI2C1_I2C1ACON.setRCEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TI2C1_I2C1ACON.getRCEN : TBits_1; inline;
- begin
- getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TI2C1_I2C1ACON.setACKEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TI2C1_I2C1ACON.clearACKEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TI2C1_I2C1ACON.setACKEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TI2C1_I2C1ACON.getACKEN : TBits_1; inline;
- begin
- getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TI2C1_I2C1ACON.setACKDT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TI2C1_I2C1ACON.clearACKDT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TI2C1_I2C1ACON.setACKDT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TI2C1_I2C1ACON.getACKDT : TBits_1; inline;
- begin
- getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TI2C1_I2C1ACON.setSTREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TI2C1_I2C1ACON.clearSTREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TI2C1_I2C1ACON.setSTREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TI2C1_I2C1ACON.getSTREN : TBits_1; inline;
- begin
- getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TI2C1_I2C1ACON.setGCEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TI2C1_I2C1ACON.clearGCEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TI2C1_I2C1ACON.setGCEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TI2C1_I2C1ACON.getGCEN : TBits_1; inline;
- begin
- getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TI2C1_I2C1ACON.setSMEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TI2C1_I2C1ACON.clearSMEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TI2C1_I2C1ACON.setSMEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TI2C1_I2C1ACON.getSMEN : TBits_1; inline;
- begin
- getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TI2C1_I2C1ACON.setDISSLW; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TI2C1_I2C1ACON.clearDISSLW; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TI2C1_I2C1ACON.setDISSLW(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TI2C1_I2C1ACON.getDISSLW : TBits_1; inline;
- begin
- getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TI2C1_I2C1ACON.setA10M; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TI2C1_I2C1ACON.clearA10M; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TI2C1_I2C1ACON.setA10M(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TI2C1_I2C1ACON.getA10M : TBits_1; inline;
- begin
- getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TI2C1_I2C1ACON.setSTRICT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TI2C1_I2C1ACON.clearSTRICT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TI2C1_I2C1ACON.setSTRICT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TI2C1_I2C1ACON.getSTRICT : TBits_1; inline;
- begin
- getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TI2C1_I2C1ACON.setSCLREL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TI2C1_I2C1ACON.clearSCLREL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TI2C1_I2C1ACON.setSCLREL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TI2C1_I2C1ACON.getSCLREL : TBits_1; inline;
- begin
- getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TI2C1_I2C1ACON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TI2C1_I2C1ACON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TI2C1_I2C1ACON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TI2C1_I2C1ACON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TI2C1_I2C1ACON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TI2C1_I2C1ACON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TI2C1_I2C1ACON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TI2C1_I2C1ACON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TI2C1_I2C1ACON.setIPMIEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TI2C1_I2C1ACON.clearIPMIEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TI2C1_I2C1ACON.setIPMIEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TI2C1_I2C1ACON.getIPMIEN : TBits_1; inline;
- begin
- getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TI2C1_I2C1ACON.setI2CSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TI2C1_I2C1ACON.clearI2CSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TI2C1_I2C1ACON.setI2CSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TI2C1_I2C1ACON.getI2CSIDL : TBits_1; inline;
- begin
- getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TI2C1_I2C1ACON.setI2CEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TI2C1_I2C1ACON.clearI2CEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TI2C1_I2C1ACON.setI2CEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TI2C1_I2C1ACON.getI2CEN : TBits_1; inline;
- begin
- getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TI2C1_I2C1ACON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TI2C1_I2C1ACON.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_I2C1ASTAT.setTBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TI2C1_I2C1ASTAT.clearTBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TI2C1_I2C1ASTAT.setTBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TI2C1_I2C1ASTAT.getTBF : TBits_1; inline;
- begin
- getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TI2C1_I2C1ASTAT.setRBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TI2C1_I2C1ASTAT.clearRBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TI2C1_I2C1ASTAT.setRBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TI2C1_I2C1ASTAT.getRBF : TBits_1; inline;
- begin
- getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TI2C1_I2C1ASTAT.setR_W; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TI2C1_I2C1ASTAT.clearR_W; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TI2C1_I2C1ASTAT.setR_W(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TI2C1_I2C1ASTAT.getR_W : TBits_1; inline;
- begin
- getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TI2C1_I2C1ASTAT.setS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TI2C1_I2C1ASTAT.clearS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TI2C1_I2C1ASTAT.setS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TI2C1_I2C1ASTAT.getS : TBits_1; inline;
- begin
- getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TI2C1_I2C1ASTAT.setP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TI2C1_I2C1ASTAT.clearP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TI2C1_I2C1ASTAT.setP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TI2C1_I2C1ASTAT.getP : TBits_1; inline;
- begin
- getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TI2C1_I2C1ASTAT.setD_A; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TI2C1_I2C1ASTAT.clearD_A; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TI2C1_I2C1ASTAT.setD_A(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TI2C1_I2C1ASTAT.getD_A : TBits_1; inline;
- begin
- getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TI2C1_I2C1ASTAT.setI2COV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TI2C1_I2C1ASTAT.clearI2COV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TI2C1_I2C1ASTAT.setI2COV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TI2C1_I2C1ASTAT.getI2COV : TBits_1; inline;
- begin
- getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TI2C1_I2C1ASTAT.setIWCOL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TI2C1_I2C1ASTAT.clearIWCOL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TI2C1_I2C1ASTAT.setIWCOL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TI2C1_I2C1ASTAT.getIWCOL : TBits_1; inline;
- begin
- getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TI2C1_I2C1ASTAT.setADD10; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TI2C1_I2C1ASTAT.clearADD10; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TI2C1_I2C1ASTAT.setADD10(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TI2C1_I2C1ASTAT.getADD10 : TBits_1; inline;
- begin
- getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TI2C1_I2C1ASTAT.setGCSTAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TI2C1_I2C1ASTAT.clearGCSTAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TI2C1_I2C1ASTAT.setGCSTAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TI2C1_I2C1ASTAT.getGCSTAT : TBits_1; inline;
- begin
- getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TI2C1_I2C1ASTAT.setBCL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TI2C1_I2C1ASTAT.clearBCL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TI2C1_I2C1ASTAT.setBCL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TI2C1_I2C1ASTAT.getBCL : TBits_1; inline;
- begin
- getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TI2C1_I2C1ASTAT.setTRSTAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TI2C1_I2C1ASTAT.clearTRSTAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TI2C1_I2C1ASTAT.setTRSTAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TI2C1_I2C1ASTAT.getTRSTAT : TBits_1; inline;
- begin
- getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TI2C1_I2C1ASTAT.setACKSTAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TI2C1_I2C1ASTAT.clearACKSTAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TI2C1_I2C1ASTAT.setACKSTAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TI2C1_I2C1ASTAT.getACKSTAT : TBits_1; inline;
- begin
- getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TI2C1_I2C1ASTAT.setI2CPOV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TI2C1_I2C1ASTAT.clearI2CPOV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TI2C1_I2C1ASTAT.setI2CPOV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TI2C1_I2C1ASTAT.getI2CPOV : TBits_1; inline;
- begin
- getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TI2C1_I2C1ASTAT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TI2C1_I2C1ASTAT.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_I2C2ACON.setSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TI2C2_I2C2ACON.clearSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TI2C2_I2C2ACON.setSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TI2C2_I2C2ACON.getSEN : TBits_1; inline;
- begin
- getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TI2C2_I2C2ACON.setRSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TI2C2_I2C2ACON.clearRSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TI2C2_I2C2ACON.setRSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TI2C2_I2C2ACON.getRSEN : TBits_1; inline;
- begin
- getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TI2C2_I2C2ACON.setPEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TI2C2_I2C2ACON.clearPEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TI2C2_I2C2ACON.setPEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TI2C2_I2C2ACON.getPEN : TBits_1; inline;
- begin
- getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TI2C2_I2C2ACON.setRCEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TI2C2_I2C2ACON.clearRCEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TI2C2_I2C2ACON.setRCEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TI2C2_I2C2ACON.getRCEN : TBits_1; inline;
- begin
- getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TI2C2_I2C2ACON.setACKEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TI2C2_I2C2ACON.clearACKEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TI2C2_I2C2ACON.setACKEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TI2C2_I2C2ACON.getACKEN : TBits_1; inline;
- begin
- getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TI2C2_I2C2ACON.setACKDT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TI2C2_I2C2ACON.clearACKDT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TI2C2_I2C2ACON.setACKDT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TI2C2_I2C2ACON.getACKDT : TBits_1; inline;
- begin
- getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TI2C2_I2C2ACON.setSTREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TI2C2_I2C2ACON.clearSTREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TI2C2_I2C2ACON.setSTREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TI2C2_I2C2ACON.getSTREN : TBits_1; inline;
- begin
- getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TI2C2_I2C2ACON.setGCEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TI2C2_I2C2ACON.clearGCEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TI2C2_I2C2ACON.setGCEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TI2C2_I2C2ACON.getGCEN : TBits_1; inline;
- begin
- getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TI2C2_I2C2ACON.setSMEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TI2C2_I2C2ACON.clearSMEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TI2C2_I2C2ACON.setSMEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TI2C2_I2C2ACON.getSMEN : TBits_1; inline;
- begin
- getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TI2C2_I2C2ACON.setDISSLW; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TI2C2_I2C2ACON.clearDISSLW; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TI2C2_I2C2ACON.setDISSLW(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TI2C2_I2C2ACON.getDISSLW : TBits_1; inline;
- begin
- getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TI2C2_I2C2ACON.setA10M; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TI2C2_I2C2ACON.clearA10M; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TI2C2_I2C2ACON.setA10M(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TI2C2_I2C2ACON.getA10M : TBits_1; inline;
- begin
- getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TI2C2_I2C2ACON.setSTRICT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TI2C2_I2C2ACON.clearSTRICT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TI2C2_I2C2ACON.setSTRICT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TI2C2_I2C2ACON.getSTRICT : TBits_1; inline;
- begin
- getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TI2C2_I2C2ACON.setSCLREL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TI2C2_I2C2ACON.clearSCLREL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TI2C2_I2C2ACON.setSCLREL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TI2C2_I2C2ACON.getSCLREL : TBits_1; inline;
- begin
- getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TI2C2_I2C2ACON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TI2C2_I2C2ACON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TI2C2_I2C2ACON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TI2C2_I2C2ACON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TI2C2_I2C2ACON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TI2C2_I2C2ACON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TI2C2_I2C2ACON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TI2C2_I2C2ACON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TI2C2_I2C2ACON.setIPMIEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TI2C2_I2C2ACON.clearIPMIEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TI2C2_I2C2ACON.setIPMIEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TI2C2_I2C2ACON.getIPMIEN : TBits_1; inline;
- begin
- getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TI2C2_I2C2ACON.setI2CSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TI2C2_I2C2ACON.clearI2CSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TI2C2_I2C2ACON.setI2CSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TI2C2_I2C2ACON.getI2CSIDL : TBits_1; inline;
- begin
- getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TI2C2_I2C2ACON.setI2CEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TI2C2_I2C2ACON.clearI2CEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TI2C2_I2C2ACON.setI2CEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TI2C2_I2C2ACON.getI2CEN : TBits_1; inline;
- begin
- getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TI2C2_I2C2ACON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TI2C2_I2C2ACON.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_I2C2ASTAT.setTBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TI2C2_I2C2ASTAT.clearTBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TI2C2_I2C2ASTAT.setTBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TI2C2_I2C2ASTAT.getTBF : TBits_1; inline;
- begin
- getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TI2C2_I2C2ASTAT.setRBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TI2C2_I2C2ASTAT.clearRBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TI2C2_I2C2ASTAT.setRBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TI2C2_I2C2ASTAT.getRBF : TBits_1; inline;
- begin
- getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TI2C2_I2C2ASTAT.setR_W; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TI2C2_I2C2ASTAT.clearR_W; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TI2C2_I2C2ASTAT.setR_W(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TI2C2_I2C2ASTAT.getR_W : TBits_1; inline;
- begin
- getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TI2C2_I2C2ASTAT.setS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TI2C2_I2C2ASTAT.clearS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TI2C2_I2C2ASTAT.setS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TI2C2_I2C2ASTAT.getS : TBits_1; inline;
- begin
- getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TI2C2_I2C2ASTAT.setP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TI2C2_I2C2ASTAT.clearP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TI2C2_I2C2ASTAT.setP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TI2C2_I2C2ASTAT.getP : TBits_1; inline;
- begin
- getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TI2C2_I2C2ASTAT.setD_A; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TI2C2_I2C2ASTAT.clearD_A; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TI2C2_I2C2ASTAT.setD_A(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TI2C2_I2C2ASTAT.getD_A : TBits_1; inline;
- begin
- getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TI2C2_I2C2ASTAT.setI2COV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TI2C2_I2C2ASTAT.clearI2COV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TI2C2_I2C2ASTAT.setI2COV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TI2C2_I2C2ASTAT.getI2COV : TBits_1; inline;
- begin
- getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TI2C2_I2C2ASTAT.setIWCOL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TI2C2_I2C2ASTAT.clearIWCOL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TI2C2_I2C2ASTAT.setIWCOL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TI2C2_I2C2ASTAT.getIWCOL : TBits_1; inline;
- begin
- getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TI2C2_I2C2ASTAT.setADD10; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TI2C2_I2C2ASTAT.clearADD10; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TI2C2_I2C2ASTAT.setADD10(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TI2C2_I2C2ASTAT.getADD10 : TBits_1; inline;
- begin
- getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TI2C2_I2C2ASTAT.setGCSTAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TI2C2_I2C2ASTAT.clearGCSTAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TI2C2_I2C2ASTAT.setGCSTAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TI2C2_I2C2ASTAT.getGCSTAT : TBits_1; inline;
- begin
- getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TI2C2_I2C2ASTAT.setBCL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TI2C2_I2C2ASTAT.clearBCL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TI2C2_I2C2ASTAT.setBCL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TI2C2_I2C2ASTAT.getBCL : TBits_1; inline;
- begin
- getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TI2C2_I2C2ASTAT.setTRSTAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TI2C2_I2C2ASTAT.clearTRSTAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TI2C2_I2C2ASTAT.setTRSTAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TI2C2_I2C2ASTAT.getTRSTAT : TBits_1; inline;
- begin
- getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TI2C2_I2C2ASTAT.setACKSTAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TI2C2_I2C2ASTAT.clearACKSTAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TI2C2_I2C2ASTAT.setACKSTAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TI2C2_I2C2ASTAT.getACKSTAT : TBits_1; inline;
- begin
- getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TI2C2_I2C2ASTAT.setI2CPOV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TI2C2_I2C2ASTAT.clearI2CPOV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TI2C2_I2C2ASTAT.setI2CPOV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TI2C2_I2C2ASTAT.getI2CPOV : TBits_1; inline;
- begin
- getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TI2C2_I2C2ASTAT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TI2C2_I2C2ASTAT.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 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.setDISSDI; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TSPI1_SPI1CON.clearDISSDI; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TSPI1_SPI1CON.setDISSDI(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TSPI1_SPI1CON.getDISSDI : TBits_1; inline;
- begin
- getDISSDI := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- 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.setMCLKSEL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- procedure TSPI1_SPI1CON.clearMCLKSEL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00800000;
- end;
- procedure TSPI1_SPI1CON.setMCLKSEL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00800000
- else
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- function TSPI1_SPI1CON.getMCLKSEL : TBits_1; inline;
- begin
- getMCLKSEL := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
- 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.setFRMERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TSPI1_SPI1STAT.clearFRMERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TSPI1_SPI1STAT.setFRMERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TSPI1_SPI1STAT.getFRMERR : TBits_1; inline;
- begin
- getFRMERR := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- 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 TSPI1_SPI1CON2.setAUDMOD(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TSPI1_SPI1CON2.getAUDMOD : TBits_2; inline;
- begin
- getAUDMOD := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TSPI1_SPI1CON2.setAUDMONO; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TSPI1_SPI1CON2.clearAUDMONO; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TSPI1_SPI1CON2.setAUDMONO(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TSPI1_SPI1CON2.getAUDMONO : TBits_1; inline;
- begin
- getAUDMONO := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TSPI1_SPI1CON2.setAUDEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TSPI1_SPI1CON2.clearAUDEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TSPI1_SPI1CON2.setAUDEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TSPI1_SPI1CON2.getAUDEN : TBits_1; inline;
- begin
- getAUDEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TSPI1_SPI1CON2.setIGNTUR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TSPI1_SPI1CON2.clearIGNTUR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TSPI1_SPI1CON2.setIGNTUR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TSPI1_SPI1CON2.getIGNTUR : TBits_1; inline;
- begin
- getIGNTUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TSPI1_SPI1CON2.setIGNROV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TSPI1_SPI1CON2.clearIGNROV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TSPI1_SPI1CON2.setIGNROV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TSPI1_SPI1CON2.getIGNROV : TBits_1; inline;
- begin
- getIGNROV := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TSPI1_SPI1CON2.setSPITUREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TSPI1_SPI1CON2.clearSPITUREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TSPI1_SPI1CON2.setSPITUREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TSPI1_SPI1CON2.getSPITUREN : TBits_1; inline;
- begin
- getSPITUREN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TSPI1_SPI1CON2.setSPIROVEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TSPI1_SPI1CON2.clearSPIROVEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TSPI1_SPI1CON2.setSPIROVEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TSPI1_SPI1CON2.getSPIROVEN : TBits_1; inline;
- begin
- getSPIROVEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TSPI1_SPI1CON2.setFRMERREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TSPI1_SPI1CON2.clearFRMERREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TSPI1_SPI1CON2.setFRMERREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TSPI1_SPI1CON2.getFRMERREN : TBits_1; inline;
- begin
- getFRMERREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TSPI1_SPI1CON2.setSPISGNEXT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TSPI1_SPI1CON2.clearSPISGNEXT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TSPI1_SPI1CON2.setSPISGNEXT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TSPI1_SPI1CON2.getSPISGNEXT : TBits_1; inline;
- begin
- getSPISGNEXT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TSPI1_SPI1CON2.setAUDMOD0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TSPI1_SPI1CON2.clearAUDMOD0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TSPI1_SPI1CON2.setAUDMOD0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TSPI1_SPI1CON2.getAUDMOD0 : TBits_1; inline;
- begin
- getAUDMOD0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TSPI1_SPI1CON2.setAUDMOD1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TSPI1_SPI1CON2.clearAUDMOD1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TSPI1_SPI1CON2.setAUDMOD1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TSPI1_SPI1CON2.getAUDMOD1 : TBits_1; inline;
- begin
- getAUDMOD1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TSPI1_SPI1CON2.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TSPI1_SPI1CON2.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TSPI2_SPI2CON.setSRXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TSPI2_SPI2CON.getSRXISEL : TBits_2; inline;
- begin
- getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TSPI2_SPI2CON.setSTXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
- end;
- function TSPI2_SPI2CON.getSTXISEL : TBits_2; inline;
- begin
- getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
- end;
- procedure TSPI2_SPI2CON.setDISSDI; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TSPI2_SPI2CON.clearDISSDI; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TSPI2_SPI2CON.setDISSDI(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TSPI2_SPI2CON.getDISSDI : TBits_1; inline;
- begin
- getDISSDI := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TSPI2_SPI2CON.setMSTEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TSPI2_SPI2CON.clearMSTEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TSPI2_SPI2CON.setMSTEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TSPI2_SPI2CON.getMSTEN : TBits_1; inline;
- begin
- getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TSPI2_SPI2CON.setCKP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TSPI2_SPI2CON.clearCKP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TSPI2_SPI2CON.setCKP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TSPI2_SPI2CON.getCKP : TBits_1; inline;
- begin
- getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TSPI2_SPI2CON.setSSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TSPI2_SPI2CON.clearSSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TSPI2_SPI2CON.setSSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TSPI2_SPI2CON.getSSEN : TBits_1; inline;
- begin
- getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TSPI2_SPI2CON.setCKE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TSPI2_SPI2CON.clearCKE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TSPI2_SPI2CON.setCKE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TSPI2_SPI2CON.getCKE : TBits_1; inline;
- begin
- getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TSPI2_SPI2CON.setSMP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TSPI2_SPI2CON.clearSMP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TSPI2_SPI2CON.setSMP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TSPI2_SPI2CON.getSMP : TBits_1; inline;
- begin
- getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TSPI2_SPI2CON.setMODE16; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TSPI2_SPI2CON.clearMODE16; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TSPI2_SPI2CON.setMODE16(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TSPI2_SPI2CON.getMODE16 : TBits_1; inline;
- begin
- getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TSPI2_SPI2CON.setMODE32; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TSPI2_SPI2CON.clearMODE32; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TSPI2_SPI2CON.setMODE32(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TSPI2_SPI2CON.getMODE32 : TBits_1; inline;
- begin
- getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TSPI2_SPI2CON.setDISSDO; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TSPI2_SPI2CON.clearDISSDO; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TSPI2_SPI2CON.setDISSDO(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TSPI2_SPI2CON.getDISSDO : TBits_1; inline;
- begin
- getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TSPI2_SPI2CON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TSPI2_SPI2CON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TSPI2_SPI2CON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TSPI2_SPI2CON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TSPI2_SPI2CON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TSPI2_SPI2CON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TSPI2_SPI2CON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TSPI2_SPI2CON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TSPI2_SPI2CON.setENHBUF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- procedure TSPI2_SPI2CON.clearENHBUF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00010000;
- end;
- procedure TSPI2_SPI2CON.setENHBUF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00010000
- else
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- function TSPI2_SPI2CON.getENHBUF : TBits_1; inline;
- begin
- getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
- end;
- procedure TSPI2_SPI2CON.setSPIFE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- procedure TSPI2_SPI2CON.clearSPIFE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00020000;
- end;
- procedure TSPI2_SPI2CON.setSPIFE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00020000
- else
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- function TSPI2_SPI2CON.getSPIFE : TBits_1; inline;
- begin
- getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
- end;
- procedure TSPI2_SPI2CON.setMCLKSEL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- procedure TSPI2_SPI2CON.clearMCLKSEL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00800000;
- end;
- procedure TSPI2_SPI2CON.setMCLKSEL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00800000
- else
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- function TSPI2_SPI2CON.getMCLKSEL : TBits_1; inline;
- begin
- getMCLKSEL := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
- end;
- procedure TSPI2_SPI2CON.setFRMCNT(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
- end;
- function TSPI2_SPI2CON.getFRMCNT : TBits_3; inline;
- begin
- getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
- end;
- procedure TSPI2_SPI2CON.setFRMSYPW; inline;
- begin
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- procedure TSPI2_SPI2CON.clearFRMSYPW; inline;
- begin
- pTDefRegMap(@Self)^.clr := $08000000;
- end;
- procedure TSPI2_SPI2CON.setFRMSYPW(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $08000000
- else
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- function TSPI2_SPI2CON.getFRMSYPW : TBits_1; inline;
- begin
- getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
- end;
- procedure TSPI2_SPI2CON.setMSSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- procedure TSPI2_SPI2CON.clearMSSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $10000000;
- end;
- procedure TSPI2_SPI2CON.setMSSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $10000000
- else
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- function TSPI2_SPI2CON.getMSSEN : TBits_1; inline;
- begin
- getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
- end;
- procedure TSPI2_SPI2CON.setFRMPOL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- procedure TSPI2_SPI2CON.clearFRMPOL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $20000000;
- end;
- procedure TSPI2_SPI2CON.setFRMPOL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $20000000
- else
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- function TSPI2_SPI2CON.getFRMPOL : TBits_1; inline;
- begin
- getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
- end;
- procedure TSPI2_SPI2CON.setFRMSYNC; inline;
- begin
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- procedure TSPI2_SPI2CON.clearFRMSYNC; inline;
- begin
- pTDefRegMap(@Self)^.clr := $40000000;
- end;
- procedure TSPI2_SPI2CON.setFRMSYNC(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $40000000
- else
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- function TSPI2_SPI2CON.getFRMSYNC : TBits_1; inline;
- begin
- getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
- end;
- procedure TSPI2_SPI2CON.setFRMEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- procedure TSPI2_SPI2CON.clearFRMEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $80000000;
- end;
- procedure TSPI2_SPI2CON.setFRMEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $80000000
- else
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- function TSPI2_SPI2CON.getFRMEN : TBits_1; inline;
- begin
- getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
- end;
- procedure TSPI2_SPI2CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TSPI2_SPI2CON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TSPI2_SPI2STAT.setSPIRBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TSPI2_SPI2STAT.clearSPIRBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TSPI2_SPI2STAT.setSPIRBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TSPI2_SPI2STAT.getSPIRBF : TBits_1; inline;
- begin
- getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TSPI2_SPI2STAT.setSPITBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TSPI2_SPI2STAT.clearSPITBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TSPI2_SPI2STAT.setSPITBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TSPI2_SPI2STAT.getSPITBF : TBits_1; inline;
- begin
- getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TSPI2_SPI2STAT.setSPITBE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TSPI2_SPI2STAT.clearSPITBE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TSPI2_SPI2STAT.setSPITBE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TSPI2_SPI2STAT.getSPITBE : TBits_1; inline;
- begin
- getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TSPI2_SPI2STAT.setSPIRBE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TSPI2_SPI2STAT.clearSPIRBE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TSPI2_SPI2STAT.setSPIRBE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TSPI2_SPI2STAT.getSPIRBE : TBits_1; inline;
- begin
- getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TSPI2_SPI2STAT.setSPIROV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TSPI2_SPI2STAT.clearSPIROV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TSPI2_SPI2STAT.setSPIROV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TSPI2_SPI2STAT.getSPIROV : TBits_1; inline;
- begin
- getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TSPI2_SPI2STAT.setSRMT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TSPI2_SPI2STAT.clearSRMT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TSPI2_SPI2STAT.setSRMT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TSPI2_SPI2STAT.getSRMT : TBits_1; inline;
- begin
- getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TSPI2_SPI2STAT.setSPITUR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TSPI2_SPI2STAT.clearSPITUR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TSPI2_SPI2STAT.setSPITUR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TSPI2_SPI2STAT.getSPITUR : TBits_1; inline;
- begin
- getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TSPI2_SPI2STAT.setSPIBUSY; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TSPI2_SPI2STAT.clearSPIBUSY; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TSPI2_SPI2STAT.setSPIBUSY(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TSPI2_SPI2STAT.getSPIBUSY : TBits_1; inline;
- begin
- getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TSPI2_SPI2STAT.setFRMERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TSPI2_SPI2STAT.clearFRMERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TSPI2_SPI2STAT.setFRMERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TSPI2_SPI2STAT.getFRMERR : TBits_1; inline;
- begin
- getFRMERR := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TSPI2_SPI2STAT.setTXBUFELM(thebits : TBits_5); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
- end;
- function TSPI2_SPI2STAT.getTXBUFELM : TBits_5; inline;
- begin
- getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
- end;
- procedure TSPI2_SPI2STAT.setRXBUFELM(thebits : TBits_5); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
- end;
- function TSPI2_SPI2STAT.getRXBUFELM : TBits_5; inline;
- begin
- getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
- end;
- procedure TSPI2_SPI2STAT.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TSPI2_SPI2STAT.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TSPI2_SPI2CON2.setAUDMOD(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TSPI2_SPI2CON2.getAUDMOD : TBits_2; inline;
- begin
- getAUDMOD := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TSPI2_SPI2CON2.setAUDMONO; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TSPI2_SPI2CON2.clearAUDMONO; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TSPI2_SPI2CON2.setAUDMONO(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TSPI2_SPI2CON2.getAUDMONO : TBits_1; inline;
- begin
- getAUDMONO := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TSPI2_SPI2CON2.setAUDEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TSPI2_SPI2CON2.clearAUDEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TSPI2_SPI2CON2.setAUDEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TSPI2_SPI2CON2.getAUDEN : TBits_1; inline;
- begin
- getAUDEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TSPI2_SPI2CON2.setIGNTUR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TSPI2_SPI2CON2.clearIGNTUR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TSPI2_SPI2CON2.setIGNTUR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TSPI2_SPI2CON2.getIGNTUR : TBits_1; inline;
- begin
- getIGNTUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TSPI2_SPI2CON2.setIGNROV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TSPI2_SPI2CON2.clearIGNROV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TSPI2_SPI2CON2.setIGNROV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TSPI2_SPI2CON2.getIGNROV : TBits_1; inline;
- begin
- getIGNROV := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TSPI2_SPI2CON2.setSPITUREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TSPI2_SPI2CON2.clearSPITUREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TSPI2_SPI2CON2.setSPITUREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TSPI2_SPI2CON2.getSPITUREN : TBits_1; inline;
- begin
- getSPITUREN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TSPI2_SPI2CON2.setSPIROVEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TSPI2_SPI2CON2.clearSPIROVEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TSPI2_SPI2CON2.setSPIROVEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TSPI2_SPI2CON2.getSPIROVEN : TBits_1; inline;
- begin
- getSPIROVEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TSPI2_SPI2CON2.setFRMERREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TSPI2_SPI2CON2.clearFRMERREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TSPI2_SPI2CON2.setFRMERREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TSPI2_SPI2CON2.getFRMERREN : TBits_1; inline;
- begin
- getFRMERREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TSPI2_SPI2CON2.setSPISGNEXT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TSPI2_SPI2CON2.clearSPISGNEXT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TSPI2_SPI2CON2.setSPISGNEXT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TSPI2_SPI2CON2.getSPISGNEXT : TBits_1; inline;
- begin
- getSPISGNEXT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TSPI2_SPI2CON2.setAUDMOD0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TSPI2_SPI2CON2.clearAUDMOD0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TSPI2_SPI2CON2.setAUDMOD0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TSPI2_SPI2CON2.getAUDMOD0 : TBits_1; inline;
- begin
- getAUDMOD0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TSPI2_SPI2CON2.setAUDMOD1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TSPI2_SPI2CON2.clearAUDMOD1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TSPI2_SPI2CON2.setAUDMOD1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TSPI2_SPI2CON2.getAUDMOD1 : TBits_1; inline;
- begin
- getAUDMOD1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TSPI2_SPI2CON2.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TSPI2_SPI2CON2.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUART1_U1AMODE.setSTSEL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUART1_U1AMODE.clearSTSEL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUART1_U1AMODE.setSTSEL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUART1_U1AMODE.getSTSEL : TBits_1; inline;
- begin
- getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUART1_U1AMODE.setPDSEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
- end;
- function TUART1_U1AMODE.getPDSEL : TBits_2; inline;
- begin
- getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
- end;
- procedure TUART1_U1AMODE.setBRGH; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUART1_U1AMODE.clearBRGH; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUART1_U1AMODE.setBRGH(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUART1_U1AMODE.getBRGH : TBits_1; inline;
- begin
- getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUART1_U1AMODE.setRXINV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUART1_U1AMODE.clearRXINV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUART1_U1AMODE.setRXINV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUART1_U1AMODE.getRXINV : TBits_1; inline;
- begin
- getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUART1_U1AMODE.setABAUD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUART1_U1AMODE.clearABAUD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUART1_U1AMODE.setABAUD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUART1_U1AMODE.getABAUD : TBits_1; inline;
- begin
- getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUART1_U1AMODE.setLPBACK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUART1_U1AMODE.clearLPBACK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUART1_U1AMODE.setLPBACK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUART1_U1AMODE.getLPBACK : TBits_1; inline;
- begin
- getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUART1_U1AMODE.setWAKE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUART1_U1AMODE.clearWAKE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUART1_U1AMODE.setWAKE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUART1_U1AMODE.getWAKE : TBits_1; inline;
- begin
- getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUART1_U1AMODE.setUEN(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
- end;
- function TUART1_U1AMODE.getUEN : TBits_2; inline;
- begin
- getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
- end;
- procedure TUART1_U1AMODE.setRTSMD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TUART1_U1AMODE.clearRTSMD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TUART1_U1AMODE.setRTSMD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TUART1_U1AMODE.getRTSMD : TBits_1; inline;
- begin
- getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TUART1_U1AMODE.setIREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TUART1_U1AMODE.clearIREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TUART1_U1AMODE.setIREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TUART1_U1AMODE.getIREN : TBits_1; inline;
- begin
- getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TUART1_U1AMODE.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART1_U1AMODE.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART1_U1AMODE.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART1_U1AMODE.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART1_U1AMODE.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART1_U1AMODE.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART1_U1AMODE.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART1_U1AMODE.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART1_U1AMODE.setPDSEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUART1_U1AMODE.clearPDSEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUART1_U1AMODE.setPDSEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUART1_U1AMODE.getPDSEL0 : TBits_1; inline;
- begin
- getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUART1_U1AMODE.setPDSEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUART1_U1AMODE.clearPDSEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUART1_U1AMODE.setPDSEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUART1_U1AMODE.getPDSEL1 : TBits_1; inline;
- begin
- getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUART1_U1AMODE.setUEN0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TUART1_U1AMODE.clearUEN0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TUART1_U1AMODE.setUEN0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TUART1_U1AMODE.getUEN0 : TBits_1; inline;
- begin
- getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TUART1_U1AMODE.setUEN1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TUART1_U1AMODE.clearUEN1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TUART1_U1AMODE.setUEN1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TUART1_U1AMODE.getUEN1 : TBits_1; inline;
- begin
- getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TUART1_U1AMODE.setUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART1_U1AMODE.clearUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART1_U1AMODE.setUSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART1_U1AMODE.getUSIDL : TBits_1; inline;
- begin
- getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART1_U1AMODE.setUARTEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART1_U1AMODE.clearUARTEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART1_U1AMODE.setUARTEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART1_U1AMODE.getUARTEN : TBits_1; inline;
- begin
- getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART1_U1AMODE.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TUART1_U1AMODE.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUART1_U1MODE.setSTSEL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUART1_U1MODE.clearSTSEL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUART1_U1MODE.setSTSEL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUART1_U1MODE.getSTSEL : TBits_1; inline;
- begin
- getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUART1_U1MODE.setPDSEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
- end;
- function TUART1_U1MODE.getPDSEL : TBits_2; inline;
- begin
- getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
- end;
- procedure TUART1_U1MODE.setBRGH; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUART1_U1MODE.clearBRGH; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUART1_U1MODE.setBRGH(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUART1_U1MODE.getBRGH : TBits_1; inline;
- begin
- getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUART1_U1MODE.setRXINV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUART1_U1MODE.clearRXINV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUART1_U1MODE.setRXINV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUART1_U1MODE.getRXINV : TBits_1; inline;
- begin
- getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUART1_U1MODE.setABAUD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUART1_U1MODE.clearABAUD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUART1_U1MODE.setABAUD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUART1_U1MODE.getABAUD : TBits_1; inline;
- begin
- getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUART1_U1MODE.setLPBACK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUART1_U1MODE.clearLPBACK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUART1_U1MODE.setLPBACK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUART1_U1MODE.getLPBACK : TBits_1; inline;
- begin
- getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUART1_U1MODE.setWAKE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUART1_U1MODE.clearWAKE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUART1_U1MODE.setWAKE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUART1_U1MODE.getWAKE : TBits_1; inline;
- begin
- getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUART1_U1MODE.setUEN(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
- end;
- function TUART1_U1MODE.getUEN : TBits_2; inline;
- begin
- getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
- end;
- procedure TUART1_U1MODE.setRTSMD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TUART1_U1MODE.clearRTSMD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TUART1_U1MODE.setRTSMD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TUART1_U1MODE.getRTSMD : TBits_1; inline;
- begin
- getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TUART1_U1MODE.setIREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TUART1_U1MODE.clearIREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TUART1_U1MODE.setIREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TUART1_U1MODE.getIREN : TBits_1; inline;
- begin
- getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TUART1_U1MODE.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART1_U1MODE.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART1_U1MODE.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART1_U1MODE.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART1_U1MODE.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART1_U1MODE.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART1_U1MODE.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART1_U1MODE.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART1_U1MODE.setPDSEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUART1_U1MODE.clearPDSEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUART1_U1MODE.setPDSEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUART1_U1MODE.getPDSEL0 : TBits_1; inline;
- begin
- getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUART1_U1MODE.setPDSEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUART1_U1MODE.clearPDSEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUART1_U1MODE.setPDSEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUART1_U1MODE.getPDSEL1 : TBits_1; inline;
- begin
- getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUART1_U1MODE.setUEN0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TUART1_U1MODE.clearUEN0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TUART1_U1MODE.setUEN0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TUART1_U1MODE.getUEN0 : TBits_1; inline;
- begin
- getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TUART1_U1MODE.setUEN1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TUART1_U1MODE.clearUEN1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TUART1_U1MODE.setUEN1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TUART1_U1MODE.getUEN1 : TBits_1; inline;
- begin
- getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TUART1_U1MODE.setUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART1_U1MODE.clearUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART1_U1MODE.setUSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART1_U1MODE.getUSIDL : TBits_1; inline;
- begin
- getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART1_U1MODE.setUARTEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART1_U1MODE.clearUARTEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART1_U1MODE.setUARTEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART1_U1MODE.getUARTEN : TBits_1; inline;
- begin
- getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART1_U1MODE.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TUART1_U1MODE.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUART1_U1ASTA.setURXDA; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUART1_U1ASTA.clearURXDA; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUART1_U1ASTA.setURXDA(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUART1_U1ASTA.getURXDA : TBits_1; inline;
- begin
- getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUART1_U1ASTA.setOERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUART1_U1ASTA.clearOERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUART1_U1ASTA.setOERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUART1_U1ASTA.getOERR : TBits_1; inline;
- begin
- getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUART1_U1ASTA.setFERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUART1_U1ASTA.clearFERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUART1_U1ASTA.setFERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUART1_U1ASTA.getFERR : TBits_1; inline;
- begin
- getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUART1_U1ASTA.setPERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUART1_U1ASTA.clearPERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUART1_U1ASTA.setPERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUART1_U1ASTA.getPERR : TBits_1; inline;
- begin
- getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUART1_U1ASTA.setRIDLE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUART1_U1ASTA.clearRIDLE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUART1_U1ASTA.setRIDLE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUART1_U1ASTA.getRIDLE : TBits_1; inline;
- begin
- getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUART1_U1ASTA.setADDEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUART1_U1ASTA.clearADDEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUART1_U1ASTA.setADDEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUART1_U1ASTA.getADDEN : TBits_1; inline;
- begin
- getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUART1_U1ASTA.setURXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
- end;
- function TUART1_U1ASTA.getURXISEL : TBits_2; inline;
- begin
- getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
- end;
- procedure TUART1_U1ASTA.setTRMT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TUART1_U1ASTA.clearTRMT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TUART1_U1ASTA.setTRMT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TUART1_U1ASTA.getTRMT : TBits_1; inline;
- begin
- getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TUART1_U1ASTA.setUTXBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TUART1_U1ASTA.clearUTXBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TUART1_U1ASTA.setUTXBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TUART1_U1ASTA.getUTXBF : TBits_1; inline;
- begin
- getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TUART1_U1ASTA.setUTXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TUART1_U1ASTA.clearUTXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TUART1_U1ASTA.setUTXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TUART1_U1ASTA.getUTXEN : TBits_1; inline;
- begin
- getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TUART1_U1ASTA.setUTXBRK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TUART1_U1ASTA.clearUTXBRK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TUART1_U1ASTA.setUTXBRK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TUART1_U1ASTA.getUTXBRK : TBits_1; inline;
- begin
- getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TUART1_U1ASTA.setURXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TUART1_U1ASTA.clearURXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TUART1_U1ASTA.setURXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TUART1_U1ASTA.getURXEN : TBits_1; inline;
- begin
- getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TUART1_U1ASTA.setUTXINV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART1_U1ASTA.clearUTXINV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART1_U1ASTA.setUTXINV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART1_U1ASTA.getUTXINV : TBits_1; inline;
- begin
- getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART1_U1ASTA.setUTXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TUART1_U1ASTA.getUTXISEL : TBits_2; inline;
- begin
- getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TUART1_U1ASTA.setADDR(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
- end;
- function TUART1_U1ASTA.getADDR : TBits_8; inline;
- begin
- getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
- end;
- procedure TUART1_U1ASTA.setADM_EN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- procedure TUART1_U1ASTA.clearADM_EN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $01000000;
- end;
- procedure TUART1_U1ASTA.setADM_EN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $01000000
- else
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- function TUART1_U1ASTA.getADM_EN : TBits_1; inline;
- begin
- getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
- end;
- procedure TUART1_U1ASTA.setURXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUART1_U1ASTA.clearURXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUART1_U1ASTA.setURXISEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUART1_U1ASTA.getURXISEL0 : TBits_1; inline;
- begin
- getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUART1_U1ASTA.setURXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUART1_U1ASTA.clearURXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUART1_U1ASTA.setURXISEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUART1_U1ASTA.getURXISEL1 : TBits_1; inline;
- begin
- getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUART1_U1ASTA.setUTXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TUART1_U1ASTA.clearUTXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TUART1_U1ASTA.setUTXISEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TUART1_U1ASTA.getUTXISEL0 : TBits_1; inline;
- begin
- getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TUART1_U1ASTA.setUTXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART1_U1ASTA.clearUTXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART1_U1ASTA.setUTXISEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART1_U1ASTA.getUTXISEL1 : TBits_1; inline;
- begin
- getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART1_U1ASTA.setUTXSEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TUART1_U1ASTA.getUTXSEL : TBits_2; inline;
- begin
- getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TUART1_U1ASTA.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TUART1_U1ASTA.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUART1_U1STA.setURXDA; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUART1_U1STA.clearURXDA; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUART1_U1STA.setURXDA(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUART1_U1STA.getURXDA : TBits_1; inline;
- begin
- getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUART1_U1STA.setOERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUART1_U1STA.clearOERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUART1_U1STA.setOERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUART1_U1STA.getOERR : TBits_1; inline;
- begin
- getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUART1_U1STA.setFERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUART1_U1STA.clearFERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUART1_U1STA.setFERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUART1_U1STA.getFERR : TBits_1; inline;
- begin
- getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUART1_U1STA.setPERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUART1_U1STA.clearPERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUART1_U1STA.setPERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUART1_U1STA.getPERR : TBits_1; inline;
- begin
- getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUART1_U1STA.setRIDLE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUART1_U1STA.clearRIDLE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUART1_U1STA.setRIDLE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUART1_U1STA.getRIDLE : TBits_1; inline;
- begin
- getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUART1_U1STA.setADDEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUART1_U1STA.clearADDEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUART1_U1STA.setADDEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUART1_U1STA.getADDEN : TBits_1; inline;
- begin
- getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUART1_U1STA.setURXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
- end;
- function TUART1_U1STA.getURXISEL : TBits_2; inline;
- begin
- getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
- end;
- procedure TUART1_U1STA.setTRMT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TUART1_U1STA.clearTRMT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TUART1_U1STA.setTRMT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TUART1_U1STA.getTRMT : TBits_1; inline;
- begin
- getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TUART1_U1STA.setUTXBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TUART1_U1STA.clearUTXBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TUART1_U1STA.setUTXBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TUART1_U1STA.getUTXBF : TBits_1; inline;
- begin
- getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TUART1_U1STA.setUTXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TUART1_U1STA.clearUTXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TUART1_U1STA.setUTXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TUART1_U1STA.getUTXEN : TBits_1; inline;
- begin
- getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TUART1_U1STA.setUTXBRK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TUART1_U1STA.clearUTXBRK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TUART1_U1STA.setUTXBRK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TUART1_U1STA.getUTXBRK : TBits_1; inline;
- begin
- getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TUART1_U1STA.setURXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TUART1_U1STA.clearURXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TUART1_U1STA.setURXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TUART1_U1STA.getURXEN : TBits_1; inline;
- begin
- getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TUART1_U1STA.setUTXINV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART1_U1STA.clearUTXINV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART1_U1STA.setUTXINV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART1_U1STA.getUTXINV : TBits_1; inline;
- begin
- getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART1_U1STA.setUTXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TUART1_U1STA.getUTXISEL : TBits_2; inline;
- begin
- getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TUART1_U1STA.setADDR(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
- end;
- function TUART1_U1STA.getADDR : TBits_8; inline;
- begin
- getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
- end;
- procedure TUART1_U1STA.setADM_EN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- procedure TUART1_U1STA.clearADM_EN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $01000000;
- end;
- procedure TUART1_U1STA.setADM_EN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $01000000
- else
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- function TUART1_U1STA.getADM_EN : TBits_1; inline;
- begin
- getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
- end;
- procedure TUART1_U1STA.setURXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUART1_U1STA.clearURXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUART1_U1STA.setURXISEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUART1_U1STA.getURXISEL0 : TBits_1; inline;
- begin
- getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUART1_U1STA.setURXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUART1_U1STA.clearURXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUART1_U1STA.setURXISEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUART1_U1STA.getURXISEL1 : TBits_1; inline;
- begin
- getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUART1_U1STA.setUTXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TUART1_U1STA.clearUTXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TUART1_U1STA.setUTXISEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TUART1_U1STA.getUTXISEL0 : TBits_1; inline;
- begin
- getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TUART1_U1STA.setUTXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART1_U1STA.clearUTXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART1_U1STA.setUTXISEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART1_U1STA.getUTXISEL1 : TBits_1; inline;
- begin
- getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART1_U1STA.setUTXSEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TUART1_U1STA.getUTXSEL : TBits_2; inline;
- begin
- getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TUART1_U1STA.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TUART1_U1STA.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUART2_U2MODE.setSTSEL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUART2_U2MODE.clearSTSEL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUART2_U2MODE.setSTSEL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUART2_U2MODE.getSTSEL : TBits_1; inline;
- begin
- getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUART2_U2MODE.setPDSEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
- end;
- function TUART2_U2MODE.getPDSEL : TBits_2; inline;
- begin
- getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
- end;
- procedure TUART2_U2MODE.setBRGH; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUART2_U2MODE.clearBRGH; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUART2_U2MODE.setBRGH(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUART2_U2MODE.getBRGH : TBits_1; inline;
- begin
- getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUART2_U2MODE.setRXINV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUART2_U2MODE.clearRXINV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUART2_U2MODE.setRXINV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUART2_U2MODE.getRXINV : TBits_1; inline;
- begin
- getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUART2_U2MODE.setABAUD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUART2_U2MODE.clearABAUD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUART2_U2MODE.setABAUD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUART2_U2MODE.getABAUD : TBits_1; inline;
- begin
- getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUART2_U2MODE.setLPBACK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUART2_U2MODE.clearLPBACK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUART2_U2MODE.setLPBACK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUART2_U2MODE.getLPBACK : TBits_1; inline;
- begin
- getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUART2_U2MODE.setWAKE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUART2_U2MODE.clearWAKE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUART2_U2MODE.setWAKE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUART2_U2MODE.getWAKE : TBits_1; inline;
- begin
- getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUART2_U2MODE.setUEN(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
- end;
- function TUART2_U2MODE.getUEN : TBits_2; inline;
- begin
- getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
- end;
- procedure TUART2_U2MODE.setRTSMD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TUART2_U2MODE.clearRTSMD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TUART2_U2MODE.setRTSMD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TUART2_U2MODE.getRTSMD : TBits_1; inline;
- begin
- getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TUART2_U2MODE.setIREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TUART2_U2MODE.clearIREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TUART2_U2MODE.setIREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TUART2_U2MODE.getIREN : TBits_1; inline;
- begin
- getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TUART2_U2MODE.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART2_U2MODE.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART2_U2MODE.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART2_U2MODE.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART2_U2MODE.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART2_U2MODE.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART2_U2MODE.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART2_U2MODE.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART2_U2MODE.setPDSEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUART2_U2MODE.clearPDSEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUART2_U2MODE.setPDSEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUART2_U2MODE.getPDSEL0 : TBits_1; inline;
- begin
- getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUART2_U2MODE.setPDSEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUART2_U2MODE.clearPDSEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUART2_U2MODE.setPDSEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUART2_U2MODE.getPDSEL1 : TBits_1; inline;
- begin
- getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUART2_U2MODE.setUEN0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TUART2_U2MODE.clearUEN0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TUART2_U2MODE.setUEN0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TUART2_U2MODE.getUEN0 : TBits_1; inline;
- begin
- getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TUART2_U2MODE.setUEN1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TUART2_U2MODE.clearUEN1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TUART2_U2MODE.setUEN1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TUART2_U2MODE.getUEN1 : TBits_1; inline;
- begin
- getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TUART2_U2MODE.setUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART2_U2MODE.clearUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART2_U2MODE.setUSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART2_U2MODE.getUSIDL : TBits_1; inline;
- begin
- getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART2_U2MODE.setUARTEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART2_U2MODE.clearUARTEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART2_U2MODE.setUARTEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART2_U2MODE.getUARTEN : TBits_1; inline;
- begin
- getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART2_U2MODE.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TUART2_U2MODE.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUART2_U3AMODE.setSTSEL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUART2_U3AMODE.clearSTSEL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUART2_U3AMODE.setSTSEL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUART2_U3AMODE.getSTSEL : TBits_1; inline;
- begin
- getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUART2_U3AMODE.setPDSEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
- end;
- function TUART2_U3AMODE.getPDSEL : TBits_2; inline;
- begin
- getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
- end;
- procedure TUART2_U3AMODE.setBRGH; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUART2_U3AMODE.clearBRGH; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUART2_U3AMODE.setBRGH(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUART2_U3AMODE.getBRGH : TBits_1; inline;
- begin
- getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUART2_U3AMODE.setRXINV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUART2_U3AMODE.clearRXINV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUART2_U3AMODE.setRXINV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUART2_U3AMODE.getRXINV : TBits_1; inline;
- begin
- getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUART2_U3AMODE.setABAUD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUART2_U3AMODE.clearABAUD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUART2_U3AMODE.setABAUD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUART2_U3AMODE.getABAUD : TBits_1; inline;
- begin
- getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUART2_U3AMODE.setLPBACK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUART2_U3AMODE.clearLPBACK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUART2_U3AMODE.setLPBACK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUART2_U3AMODE.getLPBACK : TBits_1; inline;
- begin
- getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUART2_U3AMODE.setWAKE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUART2_U3AMODE.clearWAKE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUART2_U3AMODE.setWAKE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUART2_U3AMODE.getWAKE : TBits_1; inline;
- begin
- getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUART2_U3AMODE.setUEN(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
- end;
- function TUART2_U3AMODE.getUEN : TBits_2; inline;
- begin
- getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
- end;
- procedure TUART2_U3AMODE.setRTSMD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TUART2_U3AMODE.clearRTSMD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TUART2_U3AMODE.setRTSMD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TUART2_U3AMODE.getRTSMD : TBits_1; inline;
- begin
- getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TUART2_U3AMODE.setIREN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TUART2_U3AMODE.clearIREN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TUART2_U3AMODE.setIREN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TUART2_U3AMODE.getIREN : TBits_1; inline;
- begin
- getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TUART2_U3AMODE.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART2_U3AMODE.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART2_U3AMODE.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART2_U3AMODE.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART2_U3AMODE.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART2_U3AMODE.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART2_U3AMODE.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART2_U3AMODE.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART2_U3AMODE.setPDSEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUART2_U3AMODE.clearPDSEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUART2_U3AMODE.setPDSEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUART2_U3AMODE.getPDSEL0 : TBits_1; inline;
- begin
- getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUART2_U3AMODE.setPDSEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUART2_U3AMODE.clearPDSEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUART2_U3AMODE.setPDSEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUART2_U3AMODE.getPDSEL1 : TBits_1; inline;
- begin
- getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUART2_U3AMODE.setUEN0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TUART2_U3AMODE.clearUEN0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TUART2_U3AMODE.setUEN0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TUART2_U3AMODE.getUEN0 : TBits_1; inline;
- begin
- getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TUART2_U3AMODE.setUEN1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TUART2_U3AMODE.clearUEN1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TUART2_U3AMODE.setUEN1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TUART2_U3AMODE.getUEN1 : TBits_1; inline;
- begin
- getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TUART2_U3AMODE.setUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART2_U3AMODE.clearUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART2_U3AMODE.setUSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART2_U3AMODE.getUSIDL : TBits_1; inline;
- begin
- getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART2_U3AMODE.setUARTEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART2_U3AMODE.clearUARTEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART2_U3AMODE.setUARTEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART2_U3AMODE.getUARTEN : TBits_1; inline;
- begin
- getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART2_U3AMODE.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TUART2_U3AMODE.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUART2_U2STA.setURXDA; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUART2_U2STA.clearURXDA; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUART2_U2STA.setURXDA(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUART2_U2STA.getURXDA : TBits_1; inline;
- begin
- getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUART2_U2STA.setOERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUART2_U2STA.clearOERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUART2_U2STA.setOERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUART2_U2STA.getOERR : TBits_1; inline;
- begin
- getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUART2_U2STA.setFERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUART2_U2STA.clearFERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUART2_U2STA.setFERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUART2_U2STA.getFERR : TBits_1; inline;
- begin
- getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUART2_U2STA.setPERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUART2_U2STA.clearPERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUART2_U2STA.setPERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUART2_U2STA.getPERR : TBits_1; inline;
- begin
- getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUART2_U2STA.setRIDLE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUART2_U2STA.clearRIDLE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUART2_U2STA.setRIDLE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUART2_U2STA.getRIDLE : TBits_1; inline;
- begin
- getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUART2_U2STA.setADDEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUART2_U2STA.clearADDEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUART2_U2STA.setADDEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUART2_U2STA.getADDEN : TBits_1; inline;
- begin
- getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUART2_U2STA.setURXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
- end;
- function TUART2_U2STA.getURXISEL : TBits_2; inline;
- begin
- getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
- end;
- procedure TUART2_U2STA.setTRMT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TUART2_U2STA.clearTRMT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TUART2_U2STA.setTRMT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TUART2_U2STA.getTRMT : TBits_1; inline;
- begin
- getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TUART2_U2STA.setUTXBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TUART2_U2STA.clearUTXBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TUART2_U2STA.setUTXBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TUART2_U2STA.getUTXBF : TBits_1; inline;
- begin
- getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TUART2_U2STA.setUTXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TUART2_U2STA.clearUTXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TUART2_U2STA.setUTXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TUART2_U2STA.getUTXEN : TBits_1; inline;
- begin
- getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TUART2_U2STA.setUTXBRK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TUART2_U2STA.clearUTXBRK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TUART2_U2STA.setUTXBRK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TUART2_U2STA.getUTXBRK : TBits_1; inline;
- begin
- getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TUART2_U2STA.setURXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TUART2_U2STA.clearURXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TUART2_U2STA.setURXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TUART2_U2STA.getURXEN : TBits_1; inline;
- begin
- getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TUART2_U2STA.setUTXINV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART2_U2STA.clearUTXINV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART2_U2STA.setUTXINV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART2_U2STA.getUTXINV : TBits_1; inline;
- begin
- getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART2_U2STA.setUTXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TUART2_U2STA.getUTXISEL : TBits_2; inline;
- begin
- getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TUART2_U2STA.setADDR(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
- end;
- function TUART2_U2STA.getADDR : TBits_8; inline;
- begin
- getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
- end;
- procedure TUART2_U2STA.setADM_EN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- procedure TUART2_U2STA.clearADM_EN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $01000000;
- end;
- procedure TUART2_U2STA.setADM_EN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $01000000
- else
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- function TUART2_U2STA.getADM_EN : TBits_1; inline;
- begin
- getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
- end;
- procedure TUART2_U2STA.setURXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUART2_U2STA.clearURXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUART2_U2STA.setURXISEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUART2_U2STA.getURXISEL0 : TBits_1; inline;
- begin
- getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUART2_U2STA.setURXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUART2_U2STA.clearURXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUART2_U2STA.setURXISEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUART2_U2STA.getURXISEL1 : TBits_1; inline;
- begin
- getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUART2_U2STA.setUTXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TUART2_U2STA.clearUTXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TUART2_U2STA.setUTXISEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TUART2_U2STA.getUTXISEL0 : TBits_1; inline;
- begin
- getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TUART2_U2STA.setUTXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART2_U2STA.clearUTXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART2_U2STA.setUTXISEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART2_U2STA.getUTXISEL1 : TBits_1; inline;
- begin
- getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART2_U2STA.setUTXSEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TUART2_U2STA.getUTXSEL : TBits_2; inline;
- begin
- getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TUART2_U2STA.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TUART2_U2STA.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TUART2_U3ASTA.setURXDA; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TUART2_U3ASTA.clearURXDA; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TUART2_U3ASTA.setURXDA(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TUART2_U3ASTA.getURXDA : TBits_1; inline;
- begin
- getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TUART2_U3ASTA.setOERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TUART2_U3ASTA.clearOERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TUART2_U3ASTA.setOERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TUART2_U3ASTA.getOERR : TBits_1; inline;
- begin
- getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TUART2_U3ASTA.setFERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TUART2_U3ASTA.clearFERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TUART2_U3ASTA.setFERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TUART2_U3ASTA.getFERR : TBits_1; inline;
- begin
- getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TUART2_U3ASTA.setPERR; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TUART2_U3ASTA.clearPERR; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TUART2_U3ASTA.setPERR(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TUART2_U3ASTA.getPERR : TBits_1; inline;
- begin
- getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TUART2_U3ASTA.setRIDLE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TUART2_U3ASTA.clearRIDLE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TUART2_U3ASTA.setRIDLE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TUART2_U3ASTA.getRIDLE : TBits_1; inline;
- begin
- getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TUART2_U3ASTA.setADDEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TUART2_U3ASTA.clearADDEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TUART2_U3ASTA.setADDEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TUART2_U3ASTA.getADDEN : TBits_1; inline;
- begin
- getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TUART2_U3ASTA.setURXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
- end;
- function TUART2_U3ASTA.getURXISEL : TBits_2; inline;
- begin
- getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
- end;
- procedure TUART2_U3ASTA.setTRMT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TUART2_U3ASTA.clearTRMT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TUART2_U3ASTA.setTRMT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TUART2_U3ASTA.getTRMT : TBits_1; inline;
- begin
- getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TUART2_U3ASTA.setUTXBF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TUART2_U3ASTA.clearUTXBF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TUART2_U3ASTA.setUTXBF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TUART2_U3ASTA.getUTXBF : TBits_1; inline;
- begin
- getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TUART2_U3ASTA.setUTXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TUART2_U3ASTA.clearUTXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TUART2_U3ASTA.setUTXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TUART2_U3ASTA.getUTXEN : TBits_1; inline;
- begin
- getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TUART2_U3ASTA.setUTXBRK; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TUART2_U3ASTA.clearUTXBRK; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TUART2_U3ASTA.setUTXBRK(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TUART2_U3ASTA.getUTXBRK : TBits_1; inline;
- begin
- getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TUART2_U3ASTA.setURXEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TUART2_U3ASTA.clearURXEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TUART2_U3ASTA.setURXEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TUART2_U3ASTA.getURXEN : TBits_1; inline;
- begin
- getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TUART2_U3ASTA.setUTXINV; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TUART2_U3ASTA.clearUTXINV; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TUART2_U3ASTA.setUTXINV(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TUART2_U3ASTA.getUTXINV : TBits_1; inline;
- begin
- getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TUART2_U3ASTA.setUTXISEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TUART2_U3ASTA.getUTXISEL : TBits_2; inline;
- begin
- getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TUART2_U3ASTA.setADDR(thebits : TBits_8); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
- end;
- function TUART2_U3ASTA.getADDR : TBits_8; inline;
- begin
- getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
- end;
- procedure TUART2_U3ASTA.setADM_EN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- procedure TUART2_U3ASTA.clearADM_EN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $01000000;
- end;
- procedure TUART2_U3ASTA.setADM_EN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $01000000
- else
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- function TUART2_U3ASTA.getADM_EN : TBits_1; inline;
- begin
- getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
- end;
- procedure TUART2_U3ASTA.setURXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TUART2_U3ASTA.clearURXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TUART2_U3ASTA.setURXISEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TUART2_U3ASTA.getURXISEL0 : TBits_1; inline;
- begin
- getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TUART2_U3ASTA.setURXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TUART2_U3ASTA.clearURXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TUART2_U3ASTA.setURXISEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TUART2_U3ASTA.getURXISEL1 : TBits_1; inline;
- begin
- getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TUART2_U3ASTA.setUTXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TUART2_U3ASTA.clearUTXISEL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TUART2_U3ASTA.setUTXISEL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TUART2_U3ASTA.getUTXISEL0 : TBits_1; inline;
- begin
- getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TUART2_U3ASTA.setUTXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TUART2_U3ASTA.clearUTXISEL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TUART2_U3ASTA.setUTXISEL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TUART2_U3ASTA.getUTXISEL1 : TBits_1; inline;
- begin
- getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TUART2_U3ASTA.setUTXSEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
- end;
- function TUART2_U3ASTA.getUTXSEL : TBits_2; inline;
- begin
- getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
- end;
- procedure TUART2_U3ASTA.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TUART2_U3ASTA.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.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.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.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 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_CM3CON.setCCH(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TCMP_CM3CON.getCCH : TBits_2; inline;
- begin
- getCCH := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TCMP_CM3CON.setCREF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TCMP_CM3CON.clearCREF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TCMP_CM3CON.setCREF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TCMP_CM3CON.getCREF : TBits_1; inline;
- begin
- getCREF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TCMP_CM3CON.setEVPOL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
- end;
- function TCMP_CM3CON.getEVPOL : TBits_2; inline;
- begin
- getEVPOL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
- end;
- procedure TCMP_CM3CON.setCOUT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TCMP_CM3CON.clearCOUT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TCMP_CM3CON.setCOUT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TCMP_CM3CON.getCOUT : TBits_1; inline;
- begin
- getCOUT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TCMP_CM3CON.setCPOL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TCMP_CM3CON.clearCPOL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TCMP_CM3CON.setCPOL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TCMP_CM3CON.getCPOL : TBits_1; inline;
- begin
- getCPOL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TCMP_CM3CON.setCOE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TCMP_CM3CON.clearCOE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TCMP_CM3CON.setCOE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TCMP_CM3CON.getCOE : TBits_1; inline;
- begin
- getCOE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TCMP_CM3CON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TCMP_CM3CON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TCMP_CM3CON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TCMP_CM3CON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TCMP_CM3CON.setCCH0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TCMP_CM3CON.clearCCH0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TCMP_CM3CON.setCCH0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TCMP_CM3CON.getCCH0 : TBits_1; inline;
- begin
- getCCH0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TCMP_CM3CON.setCCH1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TCMP_CM3CON.clearCCH1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TCMP_CM3CON.setCCH1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TCMP_CM3CON.getCCH1 : TBits_1; inline;
- begin
- getCCH1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TCMP_CM3CON.setEVPOL0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TCMP_CM3CON.clearEVPOL0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TCMP_CM3CON.setEVPOL0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TCMP_CM3CON.getEVPOL0 : TBits_1; inline;
- begin
- getEVPOL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TCMP_CM3CON.setEVPOL1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TCMP_CM3CON.clearEVPOL1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TCMP_CM3CON.setEVPOL1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TCMP_CM3CON.getEVPOL1 : TBits_1; inline;
- begin
- getEVPOL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TCMP_CM3CON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TCMP_CM3CON.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.setC3OUT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TCMP_CMSTAT.clearC3OUT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TCMP_CMSTAT.setC3OUT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TCMP_CMSTAT.getC3OUT : TBits_1; inline;
- begin
- getC3OUT := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- 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 TCMP_CTMUCON.setIRNG(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TCMP_CTMUCON.getIRNG : TBits_2; inline;
- begin
- getIRNG := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TCMP_CTMUCON.setITRIM(thebits : TBits_6); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF03 or ( thebits shl 2 );
- end;
- function TCMP_CTMUCON.getITRIM : TBits_6; inline;
- begin
- getITRIM := (pTDefRegMap(@Self)^.val and $000000FC) shr 2;
- end;
- procedure TCMP_CTMUCON.setCTTRIG; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TCMP_CTMUCON.clearCTTRIG; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TCMP_CTMUCON.setCTTRIG(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TCMP_CTMUCON.getCTTRIG : TBits_1; inline;
- begin
- getCTTRIG := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TCMP_CTMUCON.setIDISSEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TCMP_CTMUCON.clearIDISSEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TCMP_CTMUCON.setIDISSEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TCMP_CTMUCON.getIDISSEN : TBits_1; inline;
- begin
- getIDISSEN := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TCMP_CTMUCON.setEDGSEQEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TCMP_CTMUCON.clearEDGSEQEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TCMP_CTMUCON.setEDGSEQEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TCMP_CTMUCON.getEDGSEQEN : TBits_1; inline;
- begin
- getEDGSEQEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TCMP_CTMUCON.setEDGEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TCMP_CTMUCON.clearEDGEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TCMP_CTMUCON.setEDGEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TCMP_CTMUCON.getEDGEN : TBits_1; inline;
- begin
- getEDGEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TCMP_CTMUCON.setTGEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TCMP_CTMUCON.clearTGEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TCMP_CTMUCON.setTGEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TCMP_CTMUCON.getTGEN : TBits_1; inline;
- begin
- getTGEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TCMP_CTMUCON.setCTMUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TCMP_CTMUCON.clearCTMUSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TCMP_CTMUCON.setCTMUSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TCMP_CTMUCON.getCTMUSIDL : TBits_1; inline;
- begin
- getCTMUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TCMP_CTMUCON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TCMP_CTMUCON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TCMP_CTMUCON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TCMP_CTMUCON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TCMP_CTMUCON.setEDG2SEL(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFC3FFFF or ( thebits shl 18 );
- end;
- function TCMP_CTMUCON.getEDG2SEL : TBits_4; inline;
- begin
- getEDG2SEL := (pTDefRegMap(@Self)^.val and $003C0000) shr 18;
- end;
- procedure TCMP_CTMUCON.setEDG2POL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- procedure TCMP_CTMUCON.clearEDG2POL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00400000;
- end;
- procedure TCMP_CTMUCON.setEDG2POL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00400000
- else
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- function TCMP_CTMUCON.getEDG2POL : TBits_1; inline;
- begin
- getEDG2POL := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
- end;
- procedure TCMP_CTMUCON.setEDG2MOD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- procedure TCMP_CTMUCON.clearEDG2MOD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00800000;
- end;
- procedure TCMP_CTMUCON.setEDG2MOD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00800000
- else
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- function TCMP_CTMUCON.getEDG2MOD : TBits_1; inline;
- begin
- getEDG2MOD := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
- end;
- procedure TCMP_CTMUCON.setEDG1STAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- procedure TCMP_CTMUCON.clearEDG1STAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $01000000;
- end;
- procedure TCMP_CTMUCON.setEDG1STAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $01000000
- else
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- function TCMP_CTMUCON.getEDG1STAT : TBits_1; inline;
- begin
- getEDG1STAT := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
- end;
- procedure TCMP_CTMUCON.setEDG2STAT; inline;
- begin
- pTDefRegMap(@Self)^.&set := $02000000;
- end;
- procedure TCMP_CTMUCON.clearEDG2STAT; inline;
- begin
- pTDefRegMap(@Self)^.clr := $02000000;
- end;
- procedure TCMP_CTMUCON.setEDG2STAT(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $02000000
- else
- pTDefRegMap(@Self)^.&set := $02000000;
- end;
- function TCMP_CTMUCON.getEDG2STAT : TBits_1; inline;
- begin
- getEDG2STAT := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
- end;
- procedure TCMP_CTMUCON.setEDG1SEL(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $C3FFFFFF or ( thebits shl 26 );
- end;
- function TCMP_CTMUCON.getEDG1SEL : TBits_4; inline;
- begin
- getEDG1SEL := (pTDefRegMap(@Self)^.val and $3C000000) shr 26;
- end;
- procedure TCMP_CTMUCON.setEDG1POL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- procedure TCMP_CTMUCON.clearEDG1POL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $40000000;
- end;
- procedure TCMP_CTMUCON.setEDG1POL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $40000000
- else
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- function TCMP_CTMUCON.getEDG1POL : TBits_1; inline;
- begin
- getEDG1POL := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
- end;
- procedure TCMP_CTMUCON.setEDG1MOD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- procedure TCMP_CTMUCON.clearEDG1MOD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $80000000;
- end;
- procedure TCMP_CTMUCON.setEDG1MOD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $80000000
- else
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- function TCMP_CTMUCON.getEDG1MOD : TBits_1; inline;
- begin
- getEDG1MOD := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
- end;
- procedure TCMP_CTMUCON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TCMP_CTMUCON.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.setPBDIVRDY; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- procedure TOSC_OSCCON.clearPBDIVRDY; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00200000;
- end;
- procedure TOSC_OSCCON.setPBDIVRDY(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00200000
- else
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- function TOSC_OSCCON.getPBDIVRDY : TBits_1; inline;
- begin
- getPBDIVRDY := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
- 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 TOSC_REFOCON.setROSEL(thebits : TBits_4); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
- end;
- function TOSC_REFOCON.getROSEL : TBits_4; inline;
- begin
- getROSEL := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
- end;
- procedure TOSC_REFOCON.setACTIVE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TOSC_REFOCON.clearACTIVE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TOSC_REFOCON.setACTIVE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TOSC_REFOCON.getACTIVE : TBits_1; inline;
- begin
- getACTIVE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TOSC_REFOCON.setDIVSWEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TOSC_REFOCON.clearDIVSWEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TOSC_REFOCON.setDIVSWEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TOSC_REFOCON.getDIVSWEN : TBits_1; inline;
- begin
- getDIVSWEN := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TOSC_REFOCON.setRSLP; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TOSC_REFOCON.clearRSLP; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TOSC_REFOCON.setRSLP(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TOSC_REFOCON.getRSLP : TBits_1; inline;
- begin
- getRSLP := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TOSC_REFOCON.setOE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TOSC_REFOCON.clearOE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TOSC_REFOCON.setOE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TOSC_REFOCON.getOE : TBits_1; inline;
- begin
- getOE := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TOSC_REFOCON.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TOSC_REFOCON.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TOSC_REFOCON.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TOSC_REFOCON.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TOSC_REFOCON.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TOSC_REFOCON.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TOSC_REFOCON.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TOSC_REFOCON.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TOSC_REFOCON.setRODIV(thebits : TBits_15); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $8000FFFF or ( thebits shl 16 );
- end;
- function TOSC_REFOCON.getRODIV : TBits_15; inline;
- begin
- getRODIV := (pTDefRegMap(@Self)^.val and $7FFF0000) shr 16;
- end;
- procedure TOSC_REFOCON.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TOSC_REFOCON.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TOSC_REFOTRIM.setROTRIM(thebits : TBits_9); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $007FFFFF or ( thebits shl 23 );
- end;
- function TOSC_REFOTRIM.getROTRIM : TBits_9; inline;
- begin
- getROTRIM := (pTDefRegMap(@Self)^.val and $FF800000) shr 23;
- end;
- procedure TOSC_REFOTRIM.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TOSC_REFOTRIM.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TCFG_PMD5.setU1MD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TCFG_PMD5.clearU1MD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TCFG_PMD5.setU1MD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TCFG_PMD5.getU1MD : TBits_1; inline;
- begin
- getU1MD := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TCFG_PMD5.setU2MD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TCFG_PMD5.clearU2MD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TCFG_PMD5.setU2MD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TCFG_PMD5.getU2MD : TBits_1; inline;
- begin
- getU2MD := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TCFG_PMD5.setSPI1MD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TCFG_PMD5.clearSPI1MD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TCFG_PMD5.setSPI1MD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TCFG_PMD5.getSPI1MD : TBits_1; inline;
- begin
- getSPI1MD := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TCFG_PMD5.setSPI2MD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TCFG_PMD5.clearSPI2MD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TCFG_PMD5.setSPI2MD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TCFG_PMD5.getSPI2MD : TBits_1; inline;
- begin
- getSPI2MD := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TCFG_PMD5.setI2C1MD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- procedure TCFG_PMD5.clearI2C1MD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00010000;
- end;
- procedure TCFG_PMD5.setI2C1MD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00010000
- else
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- function TCFG_PMD5.getI2C1MD : TBits_1; inline;
- begin
- getI2C1MD := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
- end;
- procedure TCFG_PMD5.setI2C2MD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- procedure TCFG_PMD5.clearI2C2MD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00020000;
- end;
- procedure TCFG_PMD5.setI2C2MD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00020000
- else
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- function TCFG_PMD5.getI2C2MD : TBits_1; inline;
- begin
- getI2C2MD := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
- end;
- procedure TCFG_PMD5.setUSB1MD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- procedure TCFG_PMD5.clearUSB1MD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $01000000;
- end;
- procedure TCFG_PMD5.setUSB1MD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $01000000
- else
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- function TCFG_PMD5.getUSB1MD : TBits_1; inline;
- begin
- getUSB1MD := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
- end;
- procedure TCFG_PMD5.setUSBMD; inline;
- begin
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- procedure TCFG_PMD5.clearUSBMD; inline;
- begin
- pTDefRegMap(@Self)^.clr := $01000000;
- end;
- procedure TCFG_PMD5.setUSBMD(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $01000000
- else
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- function TCFG_PMD5.getUSBMD : TBits_1; inline;
- begin
- getUSBMD := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
- 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.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.setIC1EIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TINT_IFS0.clearIC1EIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TINT_IFS0.setIC1EIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TINT_IFS0.getIC1EIF : TBits_1; inline;
- begin
- getIC1EIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TINT_IFS0.setIC1IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TINT_IFS0.clearIC1IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TINT_IFS0.setIC1IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TINT_IFS0.getIC1IF : TBits_1; inline;
- begin
- getIC1IF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TINT_IFS0.setOC1IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TINT_IFS0.clearOC1IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TINT_IFS0.setOC1IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TINT_IFS0.getOC1IF : TBits_1; inline;
- begin
- getOC1IF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TINT_IFS0.setINT1IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TINT_IFS0.clearINT1IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TINT_IFS0.setINT1IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TINT_IFS0.getINT1IF : TBits_1; inline;
- begin
- getINT1IF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TINT_IFS0.setT2IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TINT_IFS0.clearT2IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TINT_IFS0.setT2IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TINT_IFS0.getT2IF : TBits_1; inline;
- begin
- getT2IF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TINT_IFS0.setIC2EIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TINT_IFS0.clearIC2EIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TINT_IFS0.setIC2EIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TINT_IFS0.getIC2EIF : TBits_1; inline;
- begin
- getIC2EIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TINT_IFS0.setIC2IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TINT_IFS0.clearIC2IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TINT_IFS0.setIC2IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TINT_IFS0.getIC2IF : TBits_1; inline;
- begin
- getIC2IF := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TINT_IFS0.setOC2IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TINT_IFS0.clearOC2IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TINT_IFS0.setOC2IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TINT_IFS0.getOC2IF : TBits_1; inline;
- begin
- getOC2IF := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TINT_IFS0.setINT2IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TINT_IFS0.clearINT2IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TINT_IFS0.setINT2IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TINT_IFS0.getINT2IF : TBits_1; inline;
- begin
- getINT2IF := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TINT_IFS0.setT3IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TINT_IFS0.clearT3IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TINT_IFS0.setT3IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TINT_IFS0.getT3IF : TBits_1; inline;
- begin
- getT3IF := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TINT_IFS0.setIC3EIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TINT_IFS0.clearIC3EIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TINT_IFS0.setIC3EIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TINT_IFS0.getIC3EIF : TBits_1; inline;
- begin
- getIC3EIF := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TINT_IFS0.setIC3IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- procedure TINT_IFS0.clearIC3IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00010000;
- end;
- procedure TINT_IFS0.setIC3IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00010000
- else
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- function TINT_IFS0.getIC3IF : TBits_1; inline;
- begin
- getIC3IF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
- end;
- procedure TINT_IFS0.setOC3IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- procedure TINT_IFS0.clearOC3IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00020000;
- end;
- procedure TINT_IFS0.setOC3IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00020000
- else
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- function TINT_IFS0.getOC3IF : TBits_1; inline;
- begin
- getOC3IF := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
- end;
- procedure TINT_IFS0.setINT3IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- procedure TINT_IFS0.clearINT3IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00040000;
- end;
- procedure TINT_IFS0.setINT3IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00040000
- else
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- function TINT_IFS0.getINT3IF : TBits_1; inline;
- begin
- getINT3IF := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
- end;
- procedure TINT_IFS0.setT4IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- procedure TINT_IFS0.clearT4IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00080000;
- end;
- procedure TINT_IFS0.setT4IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00080000
- else
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- function TINT_IFS0.getT4IF : TBits_1; inline;
- begin
- getT4IF := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
- end;
- procedure TINT_IFS0.setIC4EIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- procedure TINT_IFS0.clearIC4EIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00100000;
- end;
- procedure TINT_IFS0.setIC4EIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00100000
- else
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- function TINT_IFS0.getIC4EIF : TBits_1; inline;
- begin
- getIC4EIF := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
- end;
- procedure TINT_IFS0.setIC4IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- procedure TINT_IFS0.clearIC4IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00200000;
- end;
- procedure TINT_IFS0.setIC4IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00200000
- else
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- function TINT_IFS0.getIC4IF : TBits_1; inline;
- begin
- getIC4IF := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
- end;
- procedure TINT_IFS0.setOC4IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- procedure TINT_IFS0.clearOC4IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00400000;
- end;
- procedure TINT_IFS0.setOC4IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00400000
- else
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- function TINT_IFS0.getOC4IF : TBits_1; inline;
- begin
- getOC4IF := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
- end;
- procedure TINT_IFS0.setINT4IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- procedure TINT_IFS0.clearINT4IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00800000;
- end;
- procedure TINT_IFS0.setINT4IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00800000
- else
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- function TINT_IFS0.getINT4IF : TBits_1; inline;
- begin
- getINT4IF := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
- end;
- procedure TINT_IFS0.setT5IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- procedure TINT_IFS0.clearT5IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $01000000;
- end;
- procedure TINT_IFS0.setT5IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $01000000
- else
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- function TINT_IFS0.getT5IF : TBits_1; inline;
- begin
- getT5IF := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
- end;
- procedure TINT_IFS0.setIC5EIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $02000000;
- end;
- procedure TINT_IFS0.clearIC5EIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $02000000;
- end;
- procedure TINT_IFS0.setIC5EIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $02000000
- else
- pTDefRegMap(@Self)^.&set := $02000000;
- end;
- function TINT_IFS0.getIC5EIF : TBits_1; inline;
- begin
- getIC5EIF := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
- end;
- procedure TINT_IFS0.setIC5IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- procedure TINT_IFS0.clearIC5IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $04000000;
- end;
- procedure TINT_IFS0.setIC5IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $04000000
- else
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- function TINT_IFS0.getIC5IF : TBits_1; inline;
- begin
- getIC5IF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
- end;
- procedure TINT_IFS0.setOC5IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- procedure TINT_IFS0.clearOC5IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $08000000;
- end;
- procedure TINT_IFS0.setOC5IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $08000000
- else
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- function TINT_IFS0.getOC5IF : TBits_1; inline;
- begin
- getOC5IF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
- end;
- procedure TINT_IFS0.setAD1IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- procedure TINT_IFS0.clearAD1IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $10000000;
- end;
- procedure TINT_IFS0.setAD1IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $10000000
- else
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- function TINT_IFS0.getAD1IF : TBits_1; inline;
- begin
- getAD1IF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
- end;
- procedure TINT_IFS0.setFSCMIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- procedure TINT_IFS0.clearFSCMIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $20000000;
- end;
- procedure TINT_IFS0.setFSCMIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $20000000
- else
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- function TINT_IFS0.getFSCMIF : TBits_1; inline;
- begin
- getFSCMIF := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
- end;
- procedure TINT_IFS0.setRTCCIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- procedure TINT_IFS0.clearRTCCIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $40000000;
- end;
- procedure TINT_IFS0.setRTCCIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $40000000
- else
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- function TINT_IFS0.getRTCCIF : TBits_1; inline;
- begin
- getRTCCIF := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
- end;
- procedure TINT_IFS0.setFCEIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- procedure TINT_IFS0.clearFCEIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $80000000;
- end;
- procedure TINT_IFS0.setFCEIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $80000000
- else
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- function TINT_IFS0.getFCEIF : TBits_1; inline;
- begin
- getFCEIF := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
- 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.setCMP1IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TINT_IFS1.clearCMP1IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TINT_IFS1.setCMP1IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TINT_IFS1.getCMP1IF : TBits_1; inline;
- begin
- getCMP1IF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TINT_IFS1.setCMP2IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TINT_IFS1.clearCMP2IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TINT_IFS1.setCMP2IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TINT_IFS1.getCMP2IF : TBits_1; inline;
- begin
- getCMP2IF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TINT_IFS1.setCMP3IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TINT_IFS1.clearCMP3IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TINT_IFS1.setCMP3IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TINT_IFS1.getCMP3IF : TBits_1; inline;
- begin
- getCMP3IF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TINT_IFS1.setUSBIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TINT_IFS1.clearUSBIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TINT_IFS1.setUSBIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TINT_IFS1.getUSBIF : TBits_1; inline;
- begin
- getUSBIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TINT_IFS1.setSPI1EIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TINT_IFS1.clearSPI1EIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TINT_IFS1.setSPI1EIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TINT_IFS1.getSPI1EIF : TBits_1; inline;
- begin
- getSPI1EIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TINT_IFS1.setSPI1RXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TINT_IFS1.clearSPI1RXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TINT_IFS1.setSPI1RXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TINT_IFS1.getSPI1RXIF : TBits_1; inline;
- begin
- getSPI1RXIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TINT_IFS1.setSPI1TXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TINT_IFS1.clearSPI1TXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TINT_IFS1.setSPI1TXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TINT_IFS1.getSPI1TXIF : TBits_1; inline;
- begin
- getSPI1TXIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TINT_IFS1.setU1EIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TINT_IFS1.clearU1EIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TINT_IFS1.setU1EIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TINT_IFS1.getU1EIF : TBits_1; inline;
- begin
- getU1EIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TINT_IFS1.setU1RXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TINT_IFS1.clearU1RXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TINT_IFS1.setU1RXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TINT_IFS1.getU1RXIF : TBits_1; inline;
- begin
- getU1RXIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TINT_IFS1.setU1TXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TINT_IFS1.clearU1TXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TINT_IFS1.setU1TXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TINT_IFS1.getU1TXIF : TBits_1; inline;
- begin
- getU1TXIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TINT_IFS1.setI2C1BIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TINT_IFS1.clearI2C1BIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TINT_IFS1.setI2C1BIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TINT_IFS1.getI2C1BIF : TBits_1; inline;
- begin
- getI2C1BIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TINT_IFS1.setI2C1SIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TINT_IFS1.clearI2C1SIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TINT_IFS1.setI2C1SIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TINT_IFS1.getI2C1SIF : TBits_1; inline;
- begin
- getI2C1SIF := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TINT_IFS1.setI2C1MIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TINT_IFS1.clearI2C1MIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TINT_IFS1.setI2C1MIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TINT_IFS1.getI2C1MIF : TBits_1; inline;
- begin
- getI2C1MIF := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TINT_IFS1.setCNAIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TINT_IFS1.clearCNAIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TINT_IFS1.setCNAIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TINT_IFS1.getCNAIF : TBits_1; inline;
- begin
- getCNAIF := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TINT_IFS1.setCNBIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TINT_IFS1.clearCNBIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TINT_IFS1.setCNBIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TINT_IFS1.getCNBIF : TBits_1; inline;
- begin
- getCNBIF := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TINT_IFS1.setCNCIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TINT_IFS1.clearCNCIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TINT_IFS1.setCNCIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TINT_IFS1.getCNCIF : TBits_1; inline;
- begin
- getCNCIF := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TINT_IFS1.setPMPIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- procedure TINT_IFS1.clearPMPIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00010000;
- end;
- procedure TINT_IFS1.setPMPIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00010000
- else
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- function TINT_IFS1.getPMPIF : TBits_1; inline;
- begin
- getPMPIF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
- end;
- procedure TINT_IFS1.setPMPEIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- procedure TINT_IFS1.clearPMPEIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00020000;
- end;
- procedure TINT_IFS1.setPMPEIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00020000
- else
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- function TINT_IFS1.getPMPEIF : TBits_1; inline;
- begin
- getPMPEIF := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
- end;
- procedure TINT_IFS1.setSPI2EIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- procedure TINT_IFS1.clearSPI2EIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00040000;
- end;
- procedure TINT_IFS1.setSPI2EIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00040000
- else
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- function TINT_IFS1.getSPI2EIF : TBits_1; inline;
- begin
- getSPI2EIF := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
- end;
- procedure TINT_IFS1.setSPI2RXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- procedure TINT_IFS1.clearSPI2RXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00080000;
- end;
- procedure TINT_IFS1.setSPI2RXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00080000
- else
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- function TINT_IFS1.getSPI2RXIF : TBits_1; inline;
- begin
- getSPI2RXIF := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
- end;
- procedure TINT_IFS1.setSPI2TXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- procedure TINT_IFS1.clearSPI2TXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00100000;
- end;
- procedure TINT_IFS1.setSPI2TXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00100000
- else
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- function TINT_IFS1.getSPI2TXIF : TBits_1; inline;
- begin
- getSPI2TXIF := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
- end;
- procedure TINT_IFS1.setU2EIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- procedure TINT_IFS1.clearU2EIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00200000;
- end;
- procedure TINT_IFS1.setU2EIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00200000
- else
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- function TINT_IFS1.getU2EIF : TBits_1; inline;
- begin
- getU2EIF := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
- end;
- procedure TINT_IFS1.setU2RXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- procedure TINT_IFS1.clearU2RXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00400000;
- end;
- procedure TINT_IFS1.setU2RXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00400000
- else
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- function TINT_IFS1.getU2RXIF : TBits_1; inline;
- begin
- getU2RXIF := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
- end;
- procedure TINT_IFS1.setU2TXIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- procedure TINT_IFS1.clearU2TXIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00800000;
- end;
- procedure TINT_IFS1.setU2TXIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00800000
- else
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- function TINT_IFS1.getU2TXIF : TBits_1; inline;
- begin
- getU2TXIF := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
- end;
- procedure TINT_IFS1.setI2C2BIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- procedure TINT_IFS1.clearI2C2BIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $01000000;
- end;
- procedure TINT_IFS1.setI2C2BIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $01000000
- else
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- function TINT_IFS1.getI2C2BIF : TBits_1; inline;
- begin
- getI2C2BIF := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
- end;
- procedure TINT_IFS1.setI2C2SIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $02000000;
- end;
- procedure TINT_IFS1.clearI2C2SIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $02000000;
- end;
- procedure TINT_IFS1.setI2C2SIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $02000000
- else
- pTDefRegMap(@Self)^.&set := $02000000;
- end;
- function TINT_IFS1.getI2C2SIF : TBits_1; inline;
- begin
- getI2C2SIF := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
- end;
- procedure TINT_IFS1.setI2C2MIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- procedure TINT_IFS1.clearI2C2MIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $04000000;
- end;
- procedure TINT_IFS1.setI2C2MIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $04000000
- else
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- function TINT_IFS1.getI2C2MIF : TBits_1; inline;
- begin
- getI2C2MIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
- end;
- procedure TINT_IFS1.setCTMUIF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- procedure TINT_IFS1.clearCTMUIF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $08000000;
- end;
- procedure TINT_IFS1.setCTMUIF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $08000000
- else
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- function TINT_IFS1.getCTMUIF : TBits_1; inline;
- begin
- getCTMUIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
- end;
- procedure TINT_IFS1.setDMA0IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- procedure TINT_IFS1.clearDMA0IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $10000000;
- end;
- procedure TINT_IFS1.setDMA0IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $10000000
- else
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- function TINT_IFS1.getDMA0IF : TBits_1; inline;
- begin
- getDMA0IF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
- end;
- procedure TINT_IFS1.setDMA1IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- procedure TINT_IFS1.clearDMA1IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $20000000;
- end;
- procedure TINT_IFS1.setDMA1IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $20000000
- else
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- function TINT_IFS1.getDMA1IF : TBits_1; inline;
- begin
- getDMA1IF := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
- end;
- procedure TINT_IFS1.setDMA2IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- procedure TINT_IFS1.clearDMA2IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $40000000;
- end;
- procedure TINT_IFS1.setDMA2IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $40000000
- else
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- function TINT_IFS1.getDMA2IF : TBits_1; inline;
- begin
- getDMA2IF := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
- end;
- procedure TINT_IFS1.setDMA3IF; inline;
- begin
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- procedure TINT_IFS1.clearDMA3IF; inline;
- begin
- pTDefRegMap(@Self)^.clr := $80000000;
- end;
- procedure TINT_IFS1.setDMA3IF(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $80000000
- else
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- function TINT_IFS1.getDMA3IF : TBits_1; inline;
- begin
- getDMA3IF := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
- 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_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.setIC1EIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TINT_IEC0.clearIC1EIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TINT_IEC0.setIC1EIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TINT_IEC0.getIC1EIE : TBits_1; inline;
- begin
- getIC1EIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TINT_IEC0.setIC1IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TINT_IEC0.clearIC1IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TINT_IEC0.setIC1IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TINT_IEC0.getIC1IE : TBits_1; inline;
- begin
- getIC1IE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TINT_IEC0.setOC1IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TINT_IEC0.clearOC1IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TINT_IEC0.setOC1IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TINT_IEC0.getOC1IE : TBits_1; inline;
- begin
- getOC1IE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TINT_IEC0.setINT1IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TINT_IEC0.clearINT1IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TINT_IEC0.setINT1IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TINT_IEC0.getINT1IE : TBits_1; inline;
- begin
- getINT1IE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TINT_IEC0.setT2IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TINT_IEC0.clearT2IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TINT_IEC0.setT2IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TINT_IEC0.getT2IE : TBits_1; inline;
- begin
- getT2IE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TINT_IEC0.setIC2EIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TINT_IEC0.clearIC2EIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TINT_IEC0.setIC2EIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TINT_IEC0.getIC2EIE : TBits_1; inline;
- begin
- getIC2EIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TINT_IEC0.setIC2IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TINT_IEC0.clearIC2IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TINT_IEC0.setIC2IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TINT_IEC0.getIC2IE : TBits_1; inline;
- begin
- getIC2IE := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TINT_IEC0.setOC2IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TINT_IEC0.clearOC2IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TINT_IEC0.setOC2IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TINT_IEC0.getOC2IE : TBits_1; inline;
- begin
- getOC2IE := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TINT_IEC0.setINT2IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TINT_IEC0.clearINT2IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TINT_IEC0.setINT2IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TINT_IEC0.getINT2IE : TBits_1; inline;
- begin
- getINT2IE := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TINT_IEC0.setT3IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TINT_IEC0.clearT3IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TINT_IEC0.setT3IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TINT_IEC0.getT3IE : TBits_1; inline;
- begin
- getT3IE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TINT_IEC0.setIC3EIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TINT_IEC0.clearIC3EIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TINT_IEC0.setIC3EIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TINT_IEC0.getIC3EIE : TBits_1; inline;
- begin
- getIC3EIE := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TINT_IEC0.setIC3IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- procedure TINT_IEC0.clearIC3IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00010000;
- end;
- procedure TINT_IEC0.setIC3IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00010000
- else
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- function TINT_IEC0.getIC3IE : TBits_1; inline;
- begin
- getIC3IE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
- end;
- procedure TINT_IEC0.setOC3IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- procedure TINT_IEC0.clearOC3IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00020000;
- end;
- procedure TINT_IEC0.setOC3IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00020000
- else
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- function TINT_IEC0.getOC3IE : TBits_1; inline;
- begin
- getOC3IE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
- end;
- procedure TINT_IEC0.setINT3IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- procedure TINT_IEC0.clearINT3IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00040000;
- end;
- procedure TINT_IEC0.setINT3IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00040000
- else
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- function TINT_IEC0.getINT3IE : TBits_1; inline;
- begin
- getINT3IE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
- end;
- procedure TINT_IEC0.setT4IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- procedure TINT_IEC0.clearT4IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00080000;
- end;
- procedure TINT_IEC0.setT4IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00080000
- else
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- function TINT_IEC0.getT4IE : TBits_1; inline;
- begin
- getT4IE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
- end;
- procedure TINT_IEC0.setIC4EIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- procedure TINT_IEC0.clearIC4EIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00100000;
- end;
- procedure TINT_IEC0.setIC4EIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00100000
- else
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- function TINT_IEC0.getIC4EIE : TBits_1; inline;
- begin
- getIC4EIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
- end;
- procedure TINT_IEC0.setIC4IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- procedure TINT_IEC0.clearIC4IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00200000;
- end;
- procedure TINT_IEC0.setIC4IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00200000
- else
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- function TINT_IEC0.getIC4IE : TBits_1; inline;
- begin
- getIC4IE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
- end;
- procedure TINT_IEC0.setOC4IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- procedure TINT_IEC0.clearOC4IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00400000;
- end;
- procedure TINT_IEC0.setOC4IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00400000
- else
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- function TINT_IEC0.getOC4IE : TBits_1; inline;
- begin
- getOC4IE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
- end;
- procedure TINT_IEC0.setINT4IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- procedure TINT_IEC0.clearINT4IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00800000;
- end;
- procedure TINT_IEC0.setINT4IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00800000
- else
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- function TINT_IEC0.getINT4IE : TBits_1; inline;
- begin
- getINT4IE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
- end;
- procedure TINT_IEC0.setT5IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- procedure TINT_IEC0.clearT5IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $01000000;
- end;
- procedure TINT_IEC0.setT5IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $01000000
- else
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- function TINT_IEC0.getT5IE : TBits_1; inline;
- begin
- getT5IE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
- end;
- procedure TINT_IEC0.setIC5EIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $02000000;
- end;
- procedure TINT_IEC0.clearIC5EIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $02000000;
- end;
- procedure TINT_IEC0.setIC5EIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $02000000
- else
- pTDefRegMap(@Self)^.&set := $02000000;
- end;
- function TINT_IEC0.getIC5EIE : TBits_1; inline;
- begin
- getIC5EIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
- end;
- procedure TINT_IEC0.setIC5IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- procedure TINT_IEC0.clearIC5IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $04000000;
- end;
- procedure TINT_IEC0.setIC5IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $04000000
- else
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- function TINT_IEC0.getIC5IE : TBits_1; inline;
- begin
- getIC5IE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
- end;
- procedure TINT_IEC0.setOC5IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- procedure TINT_IEC0.clearOC5IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $08000000;
- end;
- procedure TINT_IEC0.setOC5IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $08000000
- else
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- function TINT_IEC0.getOC5IE : TBits_1; inline;
- begin
- getOC5IE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
- end;
- procedure TINT_IEC0.setAD1IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- procedure TINT_IEC0.clearAD1IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $10000000;
- end;
- procedure TINT_IEC0.setAD1IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $10000000
- else
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- function TINT_IEC0.getAD1IE : TBits_1; inline;
- begin
- getAD1IE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
- end;
- procedure TINT_IEC0.setFSCMIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- procedure TINT_IEC0.clearFSCMIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $20000000;
- end;
- procedure TINT_IEC0.setFSCMIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $20000000
- else
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- function TINT_IEC0.getFSCMIE : TBits_1; inline;
- begin
- getFSCMIE := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
- end;
- procedure TINT_IEC0.setRTCCIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- procedure TINT_IEC0.clearRTCCIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $40000000;
- end;
- procedure TINT_IEC0.setRTCCIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $40000000
- else
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- function TINT_IEC0.getRTCCIE : TBits_1; inline;
- begin
- getRTCCIE := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
- end;
- procedure TINT_IEC0.setFCEIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- procedure TINT_IEC0.clearFCEIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $80000000;
- end;
- procedure TINT_IEC0.setFCEIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $80000000
- else
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- function TINT_IEC0.getFCEIE : TBits_1; inline;
- begin
- getFCEIE := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
- 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.setCMP1IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TINT_IEC1.clearCMP1IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TINT_IEC1.setCMP1IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TINT_IEC1.getCMP1IE : TBits_1; inline;
- begin
- getCMP1IE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TINT_IEC1.setCMP2IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TINT_IEC1.clearCMP2IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TINT_IEC1.setCMP2IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TINT_IEC1.getCMP2IE : TBits_1; inline;
- begin
- getCMP2IE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TINT_IEC1.setCMP3IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TINT_IEC1.clearCMP3IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TINT_IEC1.setCMP3IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TINT_IEC1.getCMP3IE : TBits_1; inline;
- begin
- getCMP3IE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TINT_IEC1.setUSBIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TINT_IEC1.clearUSBIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TINT_IEC1.setUSBIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TINT_IEC1.getUSBIE : TBits_1; inline;
- begin
- getUSBIE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TINT_IEC1.setSPI1EIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TINT_IEC1.clearSPI1EIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TINT_IEC1.setSPI1EIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TINT_IEC1.getSPI1EIE : TBits_1; inline;
- begin
- getSPI1EIE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TINT_IEC1.setSPI1RXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TINT_IEC1.clearSPI1RXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TINT_IEC1.setSPI1RXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TINT_IEC1.getSPI1RXIE : TBits_1; inline;
- begin
- getSPI1RXIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TINT_IEC1.setSPI1TXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- procedure TINT_IEC1.clearSPI1TXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000040;
- end;
- procedure TINT_IEC1.setSPI1TXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000040
- else
- pTDefRegMap(@Self)^.&set := $00000040;
- end;
- function TINT_IEC1.getSPI1TXIE : TBits_1; inline;
- begin
- getSPI1TXIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
- end;
- procedure TINT_IEC1.setU1EIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TINT_IEC1.clearU1EIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TINT_IEC1.setU1EIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TINT_IEC1.getU1EIE : TBits_1; inline;
- begin
- getU1EIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TINT_IEC1.setU1RXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TINT_IEC1.clearU1RXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TINT_IEC1.setU1RXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TINT_IEC1.getU1RXIE : TBits_1; inline;
- begin
- getU1RXIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TINT_IEC1.setU1TXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TINT_IEC1.clearU1TXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TINT_IEC1.setU1TXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TINT_IEC1.getU1TXIE : TBits_1; inline;
- begin
- getU1TXIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TINT_IEC1.setI2C1BIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TINT_IEC1.clearI2C1BIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TINT_IEC1.setI2C1BIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TINT_IEC1.getI2C1BIE : TBits_1; inline;
- begin
- getI2C1BIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TINT_IEC1.setI2C1SIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TINT_IEC1.clearI2C1SIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TINT_IEC1.setI2C1SIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TINT_IEC1.getI2C1SIE : TBits_1; inline;
- begin
- getI2C1SIE := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TINT_IEC1.setI2C1MIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- procedure TINT_IEC1.clearI2C1MIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00001000;
- end;
- procedure TINT_IEC1.setI2C1MIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00001000
- else
- pTDefRegMap(@Self)^.&set := $00001000;
- end;
- function TINT_IEC1.getI2C1MIE : TBits_1; inline;
- begin
- getI2C1MIE := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
- end;
- procedure TINT_IEC1.setCNAIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TINT_IEC1.clearCNAIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TINT_IEC1.setCNAIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TINT_IEC1.getCNAIE : TBits_1; inline;
- begin
- getCNAIE := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TINT_IEC1.setCNBIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TINT_IEC1.clearCNBIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TINT_IEC1.setCNBIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TINT_IEC1.getCNBIE : TBits_1; inline;
- begin
- getCNBIE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TINT_IEC1.setCNCIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TINT_IEC1.clearCNCIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TINT_IEC1.setCNCIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TINT_IEC1.getCNCIE : TBits_1; inline;
- begin
- getCNCIE := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TINT_IEC1.setPMPIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- procedure TINT_IEC1.clearPMPIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00010000;
- end;
- procedure TINT_IEC1.setPMPIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00010000
- else
- pTDefRegMap(@Self)^.&set := $00010000;
- end;
- function TINT_IEC1.getPMPIE : TBits_1; inline;
- begin
- getPMPIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
- end;
- procedure TINT_IEC1.setPMPEIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- procedure TINT_IEC1.clearPMPEIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00020000;
- end;
- procedure TINT_IEC1.setPMPEIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00020000
- else
- pTDefRegMap(@Self)^.&set := $00020000;
- end;
- function TINT_IEC1.getPMPEIE : TBits_1; inline;
- begin
- getPMPEIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
- end;
- procedure TINT_IEC1.setSPI2EIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- procedure TINT_IEC1.clearSPI2EIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00040000;
- end;
- procedure TINT_IEC1.setSPI2EIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00040000
- else
- pTDefRegMap(@Self)^.&set := $00040000;
- end;
- function TINT_IEC1.getSPI2EIE : TBits_1; inline;
- begin
- getSPI2EIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
- end;
- procedure TINT_IEC1.setSPI2RXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- procedure TINT_IEC1.clearSPI2RXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00080000;
- end;
- procedure TINT_IEC1.setSPI2RXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00080000
- else
- pTDefRegMap(@Self)^.&set := $00080000;
- end;
- function TINT_IEC1.getSPI2RXIE : TBits_1; inline;
- begin
- getSPI2RXIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
- end;
- procedure TINT_IEC1.setSPI2TXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- procedure TINT_IEC1.clearSPI2TXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00100000;
- end;
- procedure TINT_IEC1.setSPI2TXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00100000
- else
- pTDefRegMap(@Self)^.&set := $00100000;
- end;
- function TINT_IEC1.getSPI2TXIE : TBits_1; inline;
- begin
- getSPI2TXIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
- end;
- procedure TINT_IEC1.setU2EIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- procedure TINT_IEC1.clearU2EIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00200000;
- end;
- procedure TINT_IEC1.setU2EIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00200000
- else
- pTDefRegMap(@Self)^.&set := $00200000;
- end;
- function TINT_IEC1.getU2EIE : TBits_1; inline;
- begin
- getU2EIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
- end;
- procedure TINT_IEC1.setU2RXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- procedure TINT_IEC1.clearU2RXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00400000;
- end;
- procedure TINT_IEC1.setU2RXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00400000
- else
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- function TINT_IEC1.getU2RXIE : TBits_1; inline;
- begin
- getU2RXIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
- end;
- procedure TINT_IEC1.setU2TXIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- procedure TINT_IEC1.clearU2TXIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00800000;
- end;
- procedure TINT_IEC1.setU2TXIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00800000
- else
- pTDefRegMap(@Self)^.&set := $00800000;
- end;
- function TINT_IEC1.getU2TXIE : TBits_1; inline;
- begin
- getU2TXIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
- end;
- procedure TINT_IEC1.setI2C2BIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- procedure TINT_IEC1.clearI2C2BIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $01000000;
- end;
- procedure TINT_IEC1.setI2C2BIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $01000000
- else
- pTDefRegMap(@Self)^.&set := $01000000;
- end;
- function TINT_IEC1.getI2C2BIE : TBits_1; inline;
- begin
- getI2C2BIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
- end;
- procedure TINT_IEC1.setI2C2SIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $02000000;
- end;
- procedure TINT_IEC1.clearI2C2SIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $02000000;
- end;
- procedure TINT_IEC1.setI2C2SIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $02000000
- else
- pTDefRegMap(@Self)^.&set := $02000000;
- end;
- function TINT_IEC1.getI2C2SIE : TBits_1; inline;
- begin
- getI2C2SIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
- end;
- procedure TINT_IEC1.setI2C2MIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- procedure TINT_IEC1.clearI2C2MIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $04000000;
- end;
- procedure TINT_IEC1.setI2C2MIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $04000000
- else
- pTDefRegMap(@Self)^.&set := $04000000;
- end;
- function TINT_IEC1.getI2C2MIE : TBits_1; inline;
- begin
- getI2C2MIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
- end;
- procedure TINT_IEC1.setCTMUIE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- procedure TINT_IEC1.clearCTMUIE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $08000000;
- end;
- procedure TINT_IEC1.setCTMUIE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $08000000
- else
- pTDefRegMap(@Self)^.&set := $08000000;
- end;
- function TINT_IEC1.getCTMUIE : TBits_1; inline;
- begin
- getCTMUIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
- end;
- procedure TINT_IEC1.setDMA0IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- procedure TINT_IEC1.clearDMA0IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $10000000;
- end;
- procedure TINT_IEC1.setDMA0IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $10000000
- else
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- function TINT_IEC1.getDMA0IE : TBits_1; inline;
- begin
- getDMA0IE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
- end;
- procedure TINT_IEC1.setDMA1IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- procedure TINT_IEC1.clearDMA1IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $20000000;
- end;
- procedure TINT_IEC1.setDMA1IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $20000000
- else
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- function TINT_IEC1.getDMA1IE : TBits_1; inline;
- begin
- getDMA1IE := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
- end;
- procedure TINT_IEC1.setDMA2IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- procedure TINT_IEC1.clearDMA2IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $40000000;
- end;
- procedure TINT_IEC1.setDMA2IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $40000000
- else
- pTDefRegMap(@Self)^.&set := $40000000;
- end;
- function TINT_IEC1.getDMA2IE : TBits_1; inline;
- begin
- getDMA2IE := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
- end;
- procedure TINT_IEC1.setDMA3IE; inline;
- begin
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- procedure TINT_IEC1.clearDMA3IE; inline;
- begin
- pTDefRegMap(@Self)^.clr := $80000000;
- end;
- procedure TINT_IEC1.setDMA3IE(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $80000000
- else
- pTDefRegMap(@Self)^.&set := $80000000;
- end;
- function TINT_IEC1.getDMA3IE : TBits_1; inline;
- begin
- getDMA3IE := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
- 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_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.setAD1IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
- end;
- function TINT_IPC5.getAD1IS : TBits_2; inline;
- begin
- getAD1IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
- end;
- procedure TINT_IPC5.setAD1IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
- end;
- function TINT_IPC5.getAD1IP : TBits_3; inline;
- begin
- getAD1IP := (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.setFSCMIS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TINT_IPC6.getFSCMIS : TBits_2; inline;
- begin
- getFSCMIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TINT_IPC6.setFSCMIP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
- end;
- function TINT_IPC6.getFSCMIP : TBits_3; inline;
- begin
- getFSCMIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
- end;
- procedure TINT_IPC6.setRTCCIS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
- end;
- function TINT_IPC6.getRTCCIS : TBits_2; inline;
- begin
- getRTCCIS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
- end;
- procedure TINT_IPC6.setRTCCIP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
- end;
- function TINT_IPC6.getRTCCIP : TBits_3; inline;
- begin
- getRTCCIP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
- end;
- procedure TINT_IPC6.setFCEIS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
- end;
- function TINT_IPC6.getFCEIS : TBits_2; inline;
- begin
- getFCEIS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
- end;
- procedure TINT_IPC6.setFCEIP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
- end;
- function TINT_IPC6.getFCEIP : TBits_3; inline;
- begin
- getFCEIP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
- end;
- procedure TINT_IPC6.setCMP1IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
- end;
- function TINT_IPC6.getCMP1IS : TBits_2; inline;
- begin
- getCMP1IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
- end;
- procedure TINT_IPC6.setCMP1IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
- end;
- function TINT_IPC6.getCMP1IP : TBits_3; inline;
- begin
- getCMP1IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
- 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.setCMP2IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TINT_IPC7.getCMP2IS : TBits_2; inline;
- begin
- getCMP2IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TINT_IPC7.setCMP2IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
- end;
- function TINT_IPC7.getCMP2IP : TBits_3; inline;
- begin
- getCMP2IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
- end;
- procedure TINT_IPC7.setCMP3IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
- end;
- function TINT_IPC7.getCMP3IS : TBits_2; inline;
- begin
- getCMP3IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
- end;
- procedure TINT_IPC7.setCMP3IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
- end;
- function TINT_IPC7.getCMP3IP : TBits_3; inline;
- begin
- getCMP3IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
- end;
- procedure TINT_IPC7.setUSBIS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
- end;
- function TINT_IPC7.getUSBIS : TBits_2; inline;
- begin
- getUSBIS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
- end;
- procedure TINT_IPC7.setUSBIP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
- end;
- function TINT_IPC7.getUSBIP : TBits_3; inline;
- begin
- getUSBIP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
- end;
- procedure TINT_IPC7.setSPI1IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
- end;
- function TINT_IPC7.getSPI1IS : TBits_2; inline;
- begin
- getSPI1IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
- end;
- procedure TINT_IPC7.setSPI1IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
- end;
- function TINT_IPC7.getSPI1IP : TBits_3; inline;
- begin
- getSPI1IP := (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.setU1IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TINT_IPC8.getU1IS : TBits_2; inline;
- begin
- getU1IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TINT_IPC8.setU1IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
- end;
- function TINT_IPC8.getU1IP : TBits_3; inline;
- begin
- getU1IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
- end;
- procedure TINT_IPC8.setI2C1IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
- end;
- function TINT_IPC8.getI2C1IS : TBits_2; inline;
- begin
- getI2C1IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
- end;
- procedure TINT_IPC8.setI2C1IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
- end;
- function TINT_IPC8.getI2C1IP : TBits_3; inline;
- begin
- getI2C1IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
- end;
- procedure TINT_IPC8.setCNIS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
- end;
- function TINT_IPC8.getCNIS : TBits_2; inline;
- begin
- getCNIS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
- end;
- procedure TINT_IPC8.setCNIP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
- end;
- function TINT_IPC8.getCNIP : TBits_3; inline;
- begin
- getCNIP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
- end;
- procedure TINT_IPC8.setPMPIS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
- end;
- function TINT_IPC8.getPMPIS : TBits_2; inline;
- begin
- getPMPIS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
- end;
- procedure TINT_IPC8.setPMPIP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
- end;
- function TINT_IPC8.getPMPIP : TBits_3; inline;
- begin
- getPMPIP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
- 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.setSPI2IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TINT_IPC9.getSPI2IS : TBits_2; inline;
- begin
- getSPI2IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TINT_IPC9.setSPI2IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
- end;
- function TINT_IPC9.getSPI2IP : TBits_3; inline;
- begin
- getSPI2IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
- end;
- procedure TINT_IPC9.setU2IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
- end;
- function TINT_IPC9.getU2IS : TBits_2; inline;
- begin
- getU2IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
- end;
- procedure TINT_IPC9.setU2IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
- end;
- function TINT_IPC9.getU2IP : TBits_3; inline;
- begin
- getU2IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
- end;
- procedure TINT_IPC9.setI2C2IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
- end;
- function TINT_IPC9.getI2C2IS : TBits_2; inline;
- begin
- getI2C2IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
- end;
- procedure TINT_IPC9.setI2C2IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
- end;
- function TINT_IPC9.getI2C2IP : TBits_3; inline;
- begin
- getI2C2IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
- end;
- procedure TINT_IPC9.setCTMUIS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
- end;
- function TINT_IPC9.getCTMUIS : TBits_2; inline;
- begin
- getCTMUIS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
- end;
- procedure TINT_IPC9.setCTMUIP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
- end;
- function TINT_IPC9.getCTMUIP : TBits_3; inline;
- begin
- getCTMUIP := (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.setDMA0IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
- end;
- function TINT_IPC10.getDMA0IS : TBits_2; inline;
- begin
- getDMA0IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
- end;
- procedure TINT_IPC10.setDMA0IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
- end;
- function TINT_IPC10.getDMA0IP : TBits_3; inline;
- begin
- getDMA0IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
- end;
- procedure TINT_IPC10.setDMA1IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
- end;
- function TINT_IPC10.getDMA1IS : TBits_2; inline;
- begin
- getDMA1IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
- end;
- procedure TINT_IPC10.setDMA1IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
- end;
- function TINT_IPC10.getDMA1IP : TBits_3; inline;
- begin
- getDMA1IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
- end;
- procedure TINT_IPC10.setDMA2IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
- end;
- function TINT_IPC10.getDMA2IS : TBits_2; inline;
- begin
- getDMA2IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
- end;
- procedure TINT_IPC10.setDMA2IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
- end;
- function TINT_IPC10.getDMA2IP : TBits_3; inline;
- begin
- getDMA2IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
- end;
- procedure TINT_IPC10.setDMA3IS(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
- end;
- function TINT_IPC10.getDMA3IS : TBits_2; inline;
- begin
- getDMA3IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
- end;
- procedure TINT_IPC10.setDMA3IP(thebits : TBits_3); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
- end;
- function TINT_IPC10.getDMA3IP : TBits_3; inline;
- begin
- getDMA3IP := (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 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 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_ANSELA.setANSA0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTA_ANSELA.clearANSA0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTA_ANSELA.setANSA0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTA_ANSELA.getANSA0 : TBits_1; inline;
- begin
- getANSA0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTA_ANSELA.setANSA1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTA_ANSELA.clearANSA1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTA_ANSELA.setANSA1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTA_ANSELA.getANSA1 : TBits_1; inline;
- begin
- getANSA1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTA_ANSELA.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTA_ANSELA.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- 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.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.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.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.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 TPORTA_CNPUA.setCNPUA0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTA_CNPUA.clearCNPUA0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTA_CNPUA.setCNPUA0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTA_CNPUA.getCNPUA0 : TBits_1; inline;
- begin
- getCNPUA0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTA_CNPUA.setCNPUA1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTA_CNPUA.clearCNPUA1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTA_CNPUA.setCNPUA1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTA_CNPUA.getCNPUA1 : TBits_1; inline;
- begin
- getCNPUA1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTA_CNPUA.setCNPUA2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTA_CNPUA.clearCNPUA2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTA_CNPUA.setCNPUA2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTA_CNPUA.getCNPUA2 : TBits_1; inline;
- begin
- getCNPUA2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTA_CNPUA.setCNPUA3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTA_CNPUA.clearCNPUA3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTA_CNPUA.setCNPUA3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTA_CNPUA.getCNPUA3 : TBits_1; inline;
- begin
- getCNPUA3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTA_CNPUA.setCNPUA4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTA_CNPUA.clearCNPUA4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTA_CNPUA.setCNPUA4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTA_CNPUA.getCNPUA4 : TBits_1; inline;
- begin
- getCNPUA4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTA_CNPUA.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTA_CNPUA.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTA_CNPDA.setCNPDA0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTA_CNPDA.clearCNPDA0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTA_CNPDA.setCNPDA0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTA_CNPDA.getCNPDA0 : TBits_1; inline;
- begin
- getCNPDA0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTA_CNPDA.setCNPDA1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTA_CNPDA.clearCNPDA1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTA_CNPDA.setCNPDA1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTA_CNPDA.getCNPDA1 : TBits_1; inline;
- begin
- getCNPDA1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTA_CNPDA.setCNPDA2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTA_CNPDA.clearCNPDA2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTA_CNPDA.setCNPDA2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTA_CNPDA.getCNPDA2 : TBits_1; inline;
- begin
- getCNPDA2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTA_CNPDA.setCNPDA3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTA_CNPDA.clearCNPDA3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTA_CNPDA.setCNPDA3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTA_CNPDA.getCNPDA3 : TBits_1; inline;
- begin
- getCNPDA3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTA_CNPDA.setCNPDA4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTA_CNPDA.clearCNPDA4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTA_CNPDA.setCNPDA4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTA_CNPDA.getCNPDA4 : TBits_1; inline;
- begin
- getCNPDA4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTA_CNPDA.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTA_CNPDA.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTA_CNCONA.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPORTA_CNCONA.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPORTA_CNCONA.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPORTA_CNCONA.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPORTA_CNCONA.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPORTA_CNCONA.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPORTA_CNCONA.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPORTA_CNCONA.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPORTA_CNCONA.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTA_CNCONA.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTA_CNENA.setCNIEA0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTA_CNENA.clearCNIEA0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTA_CNENA.setCNIEA0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTA_CNENA.getCNIEA0 : TBits_1; inline;
- begin
- getCNIEA0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTA_CNENA.setCNIEA1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTA_CNENA.clearCNIEA1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTA_CNENA.setCNIEA1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTA_CNENA.getCNIEA1 : TBits_1; inline;
- begin
- getCNIEA1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTA_CNENA.setCNIEA2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTA_CNENA.clearCNIEA2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTA_CNENA.setCNIEA2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTA_CNENA.getCNIEA2 : TBits_1; inline;
- begin
- getCNIEA2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTA_CNENA.setCNIEA3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTA_CNENA.clearCNIEA3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTA_CNENA.setCNIEA3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTA_CNENA.getCNIEA3 : TBits_1; inline;
- begin
- getCNIEA3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTA_CNENA.setCNIEA4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTA_CNENA.clearCNIEA4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTA_CNENA.setCNIEA4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTA_CNENA.getCNIEA4 : TBits_1; inline;
- begin
- getCNIEA4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTA_CNENA.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTA_CNENA.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTA_CNSTATA.setCNSTATA0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTA_CNSTATA.clearCNSTATA0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTA_CNSTATA.setCNSTATA0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTA_CNSTATA.getCNSTATA0 : TBits_1; inline;
- begin
- getCNSTATA0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTA_CNSTATA.setCNSTATA1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTA_CNSTATA.clearCNSTATA1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTA_CNSTATA.setCNSTATA1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTA_CNSTATA.getCNSTATA1 : TBits_1; inline;
- begin
- getCNSTATA1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTA_CNSTATA.setCNSTATA2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTA_CNSTATA.clearCNSTATA2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTA_CNSTATA.setCNSTATA2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTA_CNSTATA.getCNSTATA2 : TBits_1; inline;
- begin
- getCNSTATA2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTA_CNSTATA.setCNSTATA3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTA_CNSTATA.clearCNSTATA3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTA_CNSTATA.setCNSTATA3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTA_CNSTATA.getCNSTATA3 : TBits_1; inline;
- begin
- getCNSTATA3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTA_CNSTATA.setCNSTATA4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTA_CNSTATA.clearCNSTATA4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTA_CNSTATA.setCNSTATA4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTA_CNSTATA.getCNSTATA4 : TBits_1; inline;
- begin
- getCNSTATA4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTA_CNSTATA.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTA_CNSTATA.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTB_ANSELB.setANSB0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTB_ANSELB.clearANSB0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTB_ANSELB.setANSB0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTB_ANSELB.getANSB0 : TBits_1; inline;
- begin
- getANSB0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTB_ANSELB.setANSB1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTB_ANSELB.clearANSB1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTB_ANSELB.setANSB1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTB_ANSELB.getANSB1 : TBits_1; inline;
- begin
- getANSB1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTB_ANSELB.setANSB2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTB_ANSELB.clearANSB2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTB_ANSELB.setANSB2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTB_ANSELB.getANSB2 : TBits_1; inline;
- begin
- getANSB2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTB_ANSELB.setANSB3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTB_ANSELB.clearANSB3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTB_ANSELB.setANSB3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTB_ANSELB.getANSB3 : TBits_1; inline;
- begin
- getANSB3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTB_ANSELB.setANSB13; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPORTB_ANSELB.clearANSB13; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPORTB_ANSELB.setANSB13(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPORTB_ANSELB.getANSB13 : TBits_1; inline;
- begin
- getANSB13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPORTB_ANSELB.setANSB14; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TPORTB_ANSELB.clearANSB14; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TPORTB_ANSELB.setANSB14(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TPORTB_ANSELB.getANSB14 : TBits_1; inline;
- begin
- getANSB14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TPORTB_ANSELB.setANSB15; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPORTB_ANSELB.clearANSB15; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPORTB_ANSELB.setANSB15(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPORTB_ANSELB.getANSB15 : TBits_1; inline;
- begin
- getANSB15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPORTB_ANSELB.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTB_ANSELB.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.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.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.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.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.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.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.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.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 TPORTB_CNPUB.setCNPUB0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTB_CNPUB.clearCNPUB0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTB_CNPUB.setCNPUB0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTB_CNPUB.getCNPUB0 : TBits_1; inline;
- begin
- getCNPUB0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTB_CNPUB.setCNPUB1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTB_CNPUB.clearCNPUB1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTB_CNPUB.setCNPUB1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTB_CNPUB.getCNPUB1 : TBits_1; inline;
- begin
- getCNPUB1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTB_CNPUB.setCNPUB2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTB_CNPUB.clearCNPUB2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTB_CNPUB.setCNPUB2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTB_CNPUB.getCNPUB2 : TBits_1; inline;
- begin
- getCNPUB2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTB_CNPUB.setCNPUB3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTB_CNPUB.clearCNPUB3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTB_CNPUB.setCNPUB3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTB_CNPUB.getCNPUB3 : TBits_1; inline;
- begin
- getCNPUB3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTB_CNPUB.setCNPUB4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTB_CNPUB.clearCNPUB4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTB_CNPUB.setCNPUB4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTB_CNPUB.getCNPUB4 : TBits_1; inline;
- begin
- getCNPUB4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTB_CNPUB.setCNPUB5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TPORTB_CNPUB.clearCNPUB5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TPORTB_CNPUB.setCNPUB5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TPORTB_CNPUB.getCNPUB5 : TBits_1; inline;
- begin
- getCNPUB5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TPORTB_CNPUB.setCNPUB7; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TPORTB_CNPUB.clearCNPUB7; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TPORTB_CNPUB.setCNPUB7(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TPORTB_CNPUB.getCNPUB7 : TBits_1; inline;
- begin
- getCNPUB7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TPORTB_CNPUB.setCNPUB8; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TPORTB_CNPUB.clearCNPUB8; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TPORTB_CNPUB.setCNPUB8(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TPORTB_CNPUB.getCNPUB8 : TBits_1; inline;
- begin
- getCNPUB8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TPORTB_CNPUB.setCNPUB9; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TPORTB_CNPUB.clearCNPUB9; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TPORTB_CNPUB.setCNPUB9(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TPORTB_CNPUB.getCNPUB9 : TBits_1; inline;
- begin
- getCNPUB9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TPORTB_CNPUB.setCNPUB10; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TPORTB_CNPUB.clearCNPUB10; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TPORTB_CNPUB.setCNPUB10(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TPORTB_CNPUB.getCNPUB10 : TBits_1; inline;
- begin
- getCNPUB10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TPORTB_CNPUB.setCNPUB11; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TPORTB_CNPUB.clearCNPUB11; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TPORTB_CNPUB.setCNPUB11(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TPORTB_CNPUB.getCNPUB11 : TBits_1; inline;
- begin
- getCNPUB11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TPORTB_CNPUB.setCNPUB13; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPORTB_CNPUB.clearCNPUB13; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPORTB_CNPUB.setCNPUB13(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPORTB_CNPUB.getCNPUB13 : TBits_1; inline;
- begin
- getCNPUB13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPORTB_CNPUB.setCNPUB14; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TPORTB_CNPUB.clearCNPUB14; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TPORTB_CNPUB.setCNPUB14(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TPORTB_CNPUB.getCNPUB14 : TBits_1; inline;
- begin
- getCNPUB14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TPORTB_CNPUB.setCNPUB15; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPORTB_CNPUB.clearCNPUB15; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPORTB_CNPUB.setCNPUB15(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPORTB_CNPUB.getCNPUB15 : TBits_1; inline;
- begin
- getCNPUB15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPORTB_CNPUB.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTB_CNPUB.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTB_CNPDB.setCNPDB0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTB_CNPDB.clearCNPDB0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTB_CNPDB.setCNPDB0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTB_CNPDB.getCNPDB0 : TBits_1; inline;
- begin
- getCNPDB0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTB_CNPDB.setCNPDB1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTB_CNPDB.clearCNPDB1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTB_CNPDB.setCNPDB1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTB_CNPDB.getCNPDB1 : TBits_1; inline;
- begin
- getCNPDB1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTB_CNPDB.setCNPDB2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTB_CNPDB.clearCNPDB2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTB_CNPDB.setCNPDB2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTB_CNPDB.getCNPDB2 : TBits_1; inline;
- begin
- getCNPDB2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTB_CNPDB.setCNPDB3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTB_CNPDB.clearCNPDB3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTB_CNPDB.setCNPDB3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTB_CNPDB.getCNPDB3 : TBits_1; inline;
- begin
- getCNPDB3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTB_CNPDB.setCNPDB4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTB_CNPDB.clearCNPDB4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTB_CNPDB.setCNPDB4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTB_CNPDB.getCNPDB4 : TBits_1; inline;
- begin
- getCNPDB4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTB_CNPDB.setCNPDB5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TPORTB_CNPDB.clearCNPDB5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TPORTB_CNPDB.setCNPDB5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TPORTB_CNPDB.getCNPDB5 : TBits_1; inline;
- begin
- getCNPDB5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TPORTB_CNPDB.setCNPDB7; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TPORTB_CNPDB.clearCNPDB7; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TPORTB_CNPDB.setCNPDB7(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TPORTB_CNPDB.getCNPDB7 : TBits_1; inline;
- begin
- getCNPDB7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TPORTB_CNPDB.setCNPDB8; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TPORTB_CNPDB.clearCNPDB8; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TPORTB_CNPDB.setCNPDB8(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TPORTB_CNPDB.getCNPDB8 : TBits_1; inline;
- begin
- getCNPDB8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TPORTB_CNPDB.setCNPDB9; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TPORTB_CNPDB.clearCNPDB9; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TPORTB_CNPDB.setCNPDB9(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TPORTB_CNPDB.getCNPDB9 : TBits_1; inline;
- begin
- getCNPDB9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TPORTB_CNPDB.setCNPDB10; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TPORTB_CNPDB.clearCNPDB10; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TPORTB_CNPDB.setCNPDB10(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TPORTB_CNPDB.getCNPDB10 : TBits_1; inline;
- begin
- getCNPDB10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TPORTB_CNPDB.setCNPDB11; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TPORTB_CNPDB.clearCNPDB11; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TPORTB_CNPDB.setCNPDB11(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TPORTB_CNPDB.getCNPDB11 : TBits_1; inline;
- begin
- getCNPDB11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TPORTB_CNPDB.setCNPDB13; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPORTB_CNPDB.clearCNPDB13; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPORTB_CNPDB.setCNPDB13(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPORTB_CNPDB.getCNPDB13 : TBits_1; inline;
- begin
- getCNPDB13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPORTB_CNPDB.setCNPDB14; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TPORTB_CNPDB.clearCNPDB14; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TPORTB_CNPDB.setCNPDB14(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TPORTB_CNPDB.getCNPDB14 : TBits_1; inline;
- begin
- getCNPDB14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TPORTB_CNPDB.setCNPDB15; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPORTB_CNPDB.clearCNPDB15; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPORTB_CNPDB.setCNPDB15(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPORTB_CNPDB.getCNPDB15 : TBits_1; inline;
- begin
- getCNPDB15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPORTB_CNPDB.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTB_CNPDB.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTB_CNCONB.setSIDL; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPORTB_CNCONB.clearSIDL; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPORTB_CNCONB.setSIDL(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPORTB_CNCONB.getSIDL : TBits_1; inline;
- begin
- getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPORTB_CNCONB.setON; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPORTB_CNCONB.clearON; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPORTB_CNCONB.setON(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPORTB_CNCONB.getON : TBits_1; inline;
- begin
- getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPORTB_CNCONB.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTB_CNCONB.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTB_CNENB.setCNIEB0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTB_CNENB.clearCNIEB0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTB_CNENB.setCNIEB0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTB_CNENB.getCNIEB0 : TBits_1; inline;
- begin
- getCNIEB0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTB_CNENB.setCNIEB1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTB_CNENB.clearCNIEB1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTB_CNENB.setCNIEB1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTB_CNENB.getCNIEB1 : TBits_1; inline;
- begin
- getCNIEB1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTB_CNENB.setCNIEB2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTB_CNENB.clearCNIEB2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTB_CNENB.setCNIEB2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTB_CNENB.getCNIEB2 : TBits_1; inline;
- begin
- getCNIEB2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTB_CNENB.setCNIEB3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTB_CNENB.clearCNIEB3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTB_CNENB.setCNIEB3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTB_CNENB.getCNIEB3 : TBits_1; inline;
- begin
- getCNIEB3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTB_CNENB.setCNIEB4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTB_CNENB.clearCNIEB4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTB_CNENB.setCNIEB4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTB_CNENB.getCNIEB4 : TBits_1; inline;
- begin
- getCNIEB4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTB_CNENB.setCNIEB5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TPORTB_CNENB.clearCNIEB5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TPORTB_CNENB.setCNIEB5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TPORTB_CNENB.getCNIEB5 : TBits_1; inline;
- begin
- getCNIEB5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TPORTB_CNENB.setCNIEB7; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TPORTB_CNENB.clearCNIEB7; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TPORTB_CNENB.setCNIEB7(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TPORTB_CNENB.getCNIEB7 : TBits_1; inline;
- begin
- getCNIEB7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TPORTB_CNENB.setCNIEB8; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TPORTB_CNENB.clearCNIEB8; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TPORTB_CNENB.setCNIEB8(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TPORTB_CNENB.getCNIEB8 : TBits_1; inline;
- begin
- getCNIEB8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TPORTB_CNENB.setCNIEB9; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TPORTB_CNENB.clearCNIEB9; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TPORTB_CNENB.setCNIEB9(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TPORTB_CNENB.getCNIEB9 : TBits_1; inline;
- begin
- getCNIEB9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TPORTB_CNENB.setCNIEB10; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TPORTB_CNENB.clearCNIEB10; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TPORTB_CNENB.setCNIEB10(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TPORTB_CNENB.getCNIEB10 : TBits_1; inline;
- begin
- getCNIEB10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TPORTB_CNENB.setCNIEB11; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TPORTB_CNENB.clearCNIEB11; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TPORTB_CNENB.setCNIEB11(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TPORTB_CNENB.getCNIEB11 : TBits_1; inline;
- begin
- getCNIEB11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TPORTB_CNENB.setCNIEB13; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPORTB_CNENB.clearCNIEB13; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPORTB_CNENB.setCNIEB13(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPORTB_CNENB.getCNIEB13 : TBits_1; inline;
- begin
- getCNIEB13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPORTB_CNENB.setCNIEB14; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TPORTB_CNENB.clearCNIEB14; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TPORTB_CNENB.setCNIEB14(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TPORTB_CNENB.getCNIEB14 : TBits_1; inline;
- begin
- getCNIEB14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TPORTB_CNENB.setCNIEB15; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPORTB_CNENB.clearCNIEB15; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPORTB_CNENB.setCNIEB15(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPORTB_CNENB.getCNIEB15 : TBits_1; inline;
- begin
- getCNIEB15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPORTB_CNENB.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTB_CNENB.getw : TBits_32; inline;
- begin
- getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
- end;
- procedure TPORTB_CNSTATB.setCNSTATB0; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- procedure TPORTB_CNSTATB.clearCNSTATB0; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000001;
- end;
- procedure TPORTB_CNSTATB.setCNSTATB0(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000001
- else
- pTDefRegMap(@Self)^.&set := $00000001;
- end;
- function TPORTB_CNSTATB.getCNSTATB0 : TBits_1; inline;
- begin
- getCNSTATB0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
- end;
- procedure TPORTB_CNSTATB.setCNSTATB1; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- procedure TPORTB_CNSTATB.clearCNSTATB1; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000002;
- end;
- procedure TPORTB_CNSTATB.setCNSTATB1(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000002
- else
- pTDefRegMap(@Self)^.&set := $00000002;
- end;
- function TPORTB_CNSTATB.getCNSTATB1 : TBits_1; inline;
- begin
- getCNSTATB1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
- end;
- procedure TPORTB_CNSTATB.setCNSTATB2; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TPORTB_CNSTATB.clearCNSTATB2; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TPORTB_CNSTATB.setCNSTATB2(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TPORTB_CNSTATB.getCNSTATB2 : TBits_1; inline;
- begin
- getCNSTATB2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TPORTB_CNSTATB.setCNSTATB3; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- procedure TPORTB_CNSTATB.clearCNSTATB3; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000008;
- end;
- procedure TPORTB_CNSTATB.setCNSTATB3(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000008
- else
- pTDefRegMap(@Self)^.&set := $00000008;
- end;
- function TPORTB_CNSTATB.getCNSTATB3 : TBits_1; inline;
- begin
- getCNSTATB3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
- end;
- procedure TPORTB_CNSTATB.setCNSTATB4; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- procedure TPORTB_CNSTATB.clearCNSTATB4; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000010;
- end;
- procedure TPORTB_CNSTATB.setCNSTATB4(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000010
- else
- pTDefRegMap(@Self)^.&set := $00000010;
- end;
- function TPORTB_CNSTATB.getCNSTATB4 : TBits_1; inline;
- begin
- getCNSTATB4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
- end;
- procedure TPORTB_CNSTATB.setCNSTATB5; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- procedure TPORTB_CNSTATB.clearCNSTATB5; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000020;
- end;
- procedure TPORTB_CNSTATB.setCNSTATB5(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000020
- else
- pTDefRegMap(@Self)^.&set := $00000020;
- end;
- function TPORTB_CNSTATB.getCNSTATB5 : TBits_1; inline;
- begin
- getCNSTATB5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
- end;
- procedure TPORTB_CNSTATB.setCNSTATB7; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- procedure TPORTB_CNSTATB.clearCNSTATB7; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000080;
- end;
- procedure TPORTB_CNSTATB.setCNSTATB7(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000080
- else
- pTDefRegMap(@Self)^.&set := $00000080;
- end;
- function TPORTB_CNSTATB.getCNSTATB7 : TBits_1; inline;
- begin
- getCNSTATB7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
- end;
- procedure TPORTB_CNSTATB.setCNSTATB8; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- procedure TPORTB_CNSTATB.clearCNSTATB8; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000100;
- end;
- procedure TPORTB_CNSTATB.setCNSTATB8(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000100
- else
- pTDefRegMap(@Self)^.&set := $00000100;
- end;
- function TPORTB_CNSTATB.getCNSTATB8 : TBits_1; inline;
- begin
- getCNSTATB8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
- end;
- procedure TPORTB_CNSTATB.setCNSTATB9; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- procedure TPORTB_CNSTATB.clearCNSTATB9; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000200;
- end;
- procedure TPORTB_CNSTATB.setCNSTATB9(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000200
- else
- pTDefRegMap(@Self)^.&set := $00000200;
- end;
- function TPORTB_CNSTATB.getCNSTATB9 : TBits_1; inline;
- begin
- getCNSTATB9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
- end;
- procedure TPORTB_CNSTATB.setCNSTATB10; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- procedure TPORTB_CNSTATB.clearCNSTATB10; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000400;
- end;
- procedure TPORTB_CNSTATB.setCNSTATB10(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000400
- else
- pTDefRegMap(@Self)^.&set := $00000400;
- end;
- function TPORTB_CNSTATB.getCNSTATB10 : TBits_1; inline;
- begin
- getCNSTATB10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
- end;
- procedure TPORTB_CNSTATB.setCNSTATB11; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- procedure TPORTB_CNSTATB.clearCNSTATB11; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000800;
- end;
- procedure TPORTB_CNSTATB.setCNSTATB11(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000800
- else
- pTDefRegMap(@Self)^.&set := $00000800;
- end;
- function TPORTB_CNSTATB.getCNSTATB11 : TBits_1; inline;
- begin
- getCNSTATB11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
- end;
- procedure TPORTB_CNSTATB.setCNSTATB13; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- procedure TPORTB_CNSTATB.clearCNSTATB13; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00002000;
- end;
- procedure TPORTB_CNSTATB.setCNSTATB13(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00002000
- else
- pTDefRegMap(@Self)^.&set := $00002000;
- end;
- function TPORTB_CNSTATB.getCNSTATB13 : TBits_1; inline;
- begin
- getCNSTATB13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
- end;
- procedure TPORTB_CNSTATB.setCNSTATB14; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- procedure TPORTB_CNSTATB.clearCNSTATB14; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00004000;
- end;
- procedure TPORTB_CNSTATB.setCNSTATB14(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00004000
- else
- pTDefRegMap(@Self)^.&set := $00004000;
- end;
- function TPORTB_CNSTATB.getCNSTATB14 : TBits_1; inline;
- begin
- getCNSTATB14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
- end;
- procedure TPORTB_CNSTATB.setCNSTATB15; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- procedure TPORTB_CNSTATB.clearCNSTATB15; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00008000;
- end;
- procedure TPORTB_CNSTATB.setCNSTATB15(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00008000
- else
- pTDefRegMap(@Self)^.&set := $00008000;
- end;
- function TPORTB_CNSTATB.getCNSTATB15 : TBits_1; inline;
- begin
- getCNSTATB15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
- end;
- procedure TPORTB_CNSTATB.setw(thebits : TBits_32); inline;
- begin
- pTDefRegMap(@Self)^.val := thebits;
- end;
- function TPORTB_CNSTATB.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.setPMDL1WAY; inline;
- begin
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- procedure TDEVCFG_DEVCFG3.clearPMDL1WAY; inline;
- begin
- pTDefRegMap(@Self)^.clr := $10000000;
- end;
- procedure TDEVCFG_DEVCFG3.setPMDL1WAY(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $10000000
- else
- pTDefRegMap(@Self)^.&set := $10000000;
- end;
- function TDEVCFG_DEVCFG3.getPMDL1WAY : TBits_1; inline;
- begin
- getPMDL1WAY := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
- end;
- procedure TDEVCFG_DEVCFG3.setIOL1WAY; inline;
- begin
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- procedure TDEVCFG_DEVCFG3.clearIOL1WAY; inline;
- begin
- pTDefRegMap(@Self)^.clr := $20000000;
- end;
- procedure TDEVCFG_DEVCFG3.setIOL1WAY(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $20000000
- else
- pTDefRegMap(@Self)^.&set := $20000000;
- end;
- function TDEVCFG_DEVCFG3.getIOL1WAY : TBits_1; inline;
- begin
- getIOL1WAY := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
- 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.setWINDIS; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- procedure TDEVCFG_DEVCFG1.clearWINDIS; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00400000;
- end;
- procedure TDEVCFG_DEVCFG1.setWINDIS(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00400000
- else
- pTDefRegMap(@Self)^.&set := $00400000;
- end;
- function TDEVCFG_DEVCFG1.getWINDIS : TBits_1; inline;
- begin
- getWINDIS := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
- 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.setFWDTWINSZ(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
- end;
- function TDEVCFG_DEVCFG1.getFWDTWINSZ : TBits_2; inline;
- begin
- getFWDTWINSZ := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
- 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.setJTAGEN; inline;
- begin
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- procedure TDEVCFG_DEVCFG0.clearJTAGEN; inline;
- begin
- pTDefRegMap(@Self)^.clr := $00000004;
- end;
- procedure TDEVCFG_DEVCFG0.setJTAGEN(thebits : TBits_1); inline;
- begin
- if thebits = 0 then
- pTDefRegMap(@Self)^.clr := $00000004
- else
- pTDefRegMap(@Self)^.&set := $00000004;
- end;
- function TDEVCFG_DEVCFG0.getJTAGEN : TBits_1; inline;
- begin
- getJTAGEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
- end;
- procedure TDEVCFG_DEVCFG0.setICESEL(thebits : TBits_2); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE7 or ( thebits shl 3 );
- end;
- function TDEVCFG_DEVCFG0.getICESEL : TBits_2; inline;
- begin
- getICESEL := (pTDefRegMap(@Self)^.val and $00000018) shr 3;
- end;
- procedure TDEVCFG_DEVCFG0.setPWP(thebits : TBits_9); inline;
- begin
- pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF803FF or ( thebits shl 10 );
- end;
- function TDEVCFG_DEVCFG0.getPWP : TBits_9; inline;
- begin
- getPWP := (pTDefRegMap(@Self)^.val and $0007FC00) shr 10;
- 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 _ADC_VECTOR_interrupt; external name '_ADC_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 _FCE_VECTOR_interrupt; external name '_FCE_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 _COMPARATOR_3_VECTOR_interrupt; external name '_COMPARATOR_3_VECTOR_interrupt';
- procedure _USB_1_VECTOR_interrupt; external name '_USB_1_VECTOR_interrupt';
- procedure _SPI_1_VECTOR_interrupt; external name '_SPI_1_VECTOR_interrupt';
- procedure _UART_1_VECTOR_interrupt; external name '_UART_1_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 _PMP_VECTOR_interrupt; external name '_PMP_VECTOR_interrupt';
- procedure _SPI_2_VECTOR_interrupt; external name '_SPI_2_VECTOR_interrupt';
- procedure _UART_2_VECTOR_interrupt; external name '_UART_2_VECTOR_interrupt';
- procedure _I2C_2_VECTOR_interrupt; external name '_I2C_2_VECTOR_interrupt';
- procedure _CTMU_VECTOR_interrupt; external name '_CTMU_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 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 _ADC_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 _FCE_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 _COMPARATOR_3_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _USB_1_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _SPI_1_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _UART_1_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 _PMP_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _SPI_2_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _UART_2_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _I2C_2_VECTOR_interrupt
- nop
- nop
- nop
- nop
- nop
- nop
- nop
- j _CTMU_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
- .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 _ADC_VECTOR_interrupt
- .weak _FAIL_SAFE_MONITOR_VECTOR_interrupt
- .weak _RTCC_VECTOR_interrupt
- .weak _FCE_VECTOR_interrupt
- .weak _COMPARATOR_1_VECTOR_interrupt
- .weak _COMPARATOR_2_VECTOR_interrupt
- .weak _COMPARATOR_3_VECTOR_interrupt
- .weak _USB_1_VECTOR_interrupt
- .weak _SPI_1_VECTOR_interrupt
- .weak _UART_1_VECTOR_interrupt
- .weak _I2C_1_VECTOR_interrupt
- .weak _CHANGE_NOTICE_VECTOR_interrupt
- .weak _PMP_VECTOR_interrupt
- .weak _SPI_2_VECTOR_interrupt
- .weak _UART_2_VECTOR_interrupt
- .weak _I2C_2_VECTOR_interrupt
- .weak _CTMU_VECTOR_interrupt
- .weak _DMA_0_VECTOR_interrupt
- .weak _DMA_1_VECTOR_interrupt
- .weak _DMA_2_VECTOR_interrupt
- .weak _DMA_3_VECTOR_interrupt
- .text
- end;
- end.
|
