pic32mx534f064h.pp 2.4 MB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715171617171718171917201721172217231724172517261727172817291730173117321733173417351736173717381739174017411742174317441745174617471748174917501751175217531754175517561757175817591760176117621763176417651766176717681769177017711772177317741775177617771778177917801781178217831784178517861787178817891790179117921793179417951796179717981799180018011802180318041805180618071808180918101811181218131814181518161817181818191820182118221823182418251826182718281829183018311832183318341835183618371838183918401841184218431844184518461847184818491850185118521853185418551856185718581859186018611862186318641865186618671868186918701871187218731874187518761877187818791880188118821883188418851886188718881889189018911892189318941895189618971898189919001901190219031904190519061907190819091910191119121913191419151916191719181919192019211922192319241925192619271928192919301931193219331934193519361937193819391940194119421943194419451946194719481949195019511952195319541955195619571958195919601961196219631964196519661967196819691970197119721973197419751976197719781979198019811982198319841985198619871988198919901991199219931994199519961997199819992000200120022003200420052006200720082009201020112012201320142015201620172018201920202021202220232024202520262027202820292030203120322033203420352036203720382039204020412042204320442045204620472048204920502051205220532054205520562057205820592060206120622063206420652066206720682069207020712072207320742075207620772078207920802081208220832084208520862087208820892090209120922093209420952096209720982099210021012102210321042105210621072108210921102111211221132114211521162117211821192120212121222123212421252126212721282129213021312132213321342135213621372138213921402141214221432144214521462147214821492150215121522153215421552156215721582159216021612162216321642165216621672168216921702171217221732174217521762177217821792180218121822183218421852186218721882189219021912192219321942195219621972198219922002201220222032204220522062207220822092210221122122213221422152216221722182219222022212222222322242225222622272228222922302231223222332234223522362237223822392240224122422243224422452246224722482249225022512252225322542255225622572258225922602261226222632264226522662267226822692270227122722273227422752276227722782279228022812282228322842285228622872288228922902291229222932294229522962297229822992300230123022303230423052306230723082309231023112312231323142315231623172318231923202321232223232324232523262327232823292330233123322333233423352336233723382339234023412342234323442345234623472348234923502351235223532354235523562357235823592360236123622363236423652366236723682369237023712372237323742375237623772378237923802381238223832384238523862387238823892390239123922393239423952396239723982399240024012402240324042405240624072408240924102411241224132414241524162417241824192420242124222423242424252426242724282429243024312432243324342435243624372438243924402441244224432444244524462447244824492450245124522453245424552456245724582459246024612462246324642465246624672468246924702471247224732474247524762477247824792480248124822483248424852486248724882489249024912492249324942495249624972498249925002501250225032504250525062507250825092510251125122513251425152516251725182519252025212522252325242525252625272528252925302531253225332534253525362537253825392540254125422543254425452546254725482549255025512552255325542555255625572558255925602561256225632564256525662567256825692570257125722573257425752576257725782579258025812582258325842585258625872588258925902591259225932594259525962597259825992600260126022603260426052606260726082609261026112612261326142615261626172618261926202621262226232624262526262627262826292630263126322633263426352636263726382639264026412642264326442645264626472648264926502651265226532654265526562657265826592660266126622663266426652666266726682669267026712672267326742675267626772678267926802681268226832684268526862687268826892690269126922693269426952696269726982699270027012702270327042705270627072708270927102711271227132714271527162717271827192720272127222723272427252726272727282729273027312732273327342735273627372738273927402741274227432744274527462747274827492750275127522753275427552756275727582759276027612762276327642765276627672768276927702771277227732774277527762777277827792780278127822783278427852786278727882789279027912792279327942795279627972798279928002801280228032804280528062807280828092810281128122813281428152816281728182819282028212822282328242825282628272828282928302831283228332834283528362837283828392840284128422843284428452846284728482849285028512852285328542855285628572858285928602861286228632864286528662867286828692870287128722873287428752876287728782879288028812882288328842885288628872888288928902891289228932894289528962897289828992900290129022903290429052906290729082909291029112912291329142915291629172918291929202921292229232924292529262927292829292930293129322933293429352936293729382939294029412942294329442945294629472948294929502951295229532954295529562957295829592960296129622963296429652966296729682969297029712972297329742975297629772978297929802981298229832984298529862987298829892990299129922993299429952996299729982999300030013002300330043005300630073008300930103011301230133014301530163017301830193020302130223023302430253026302730283029303030313032303330343035303630373038303930403041304230433044304530463047304830493050305130523053305430553056305730583059306030613062306330643065306630673068306930703071307230733074307530763077307830793080308130823083308430853086308730883089309030913092309330943095309630973098309931003101310231033104310531063107310831093110311131123113311431153116311731183119312031213122312331243125312631273128312931303131313231333134313531363137313831393140314131423143314431453146314731483149315031513152315331543155315631573158315931603161316231633164316531663167316831693170317131723173317431753176317731783179318031813182318331843185318631873188318931903191319231933194319531963197319831993200320132023203320432053206320732083209321032113212321332143215321632173218321932203221322232233224322532263227322832293230323132323233323432353236323732383239324032413242324332443245324632473248324932503251325232533254325532563257325832593260326132623263326432653266326732683269327032713272327332743275327632773278327932803281328232833284328532863287328832893290329132923293329432953296329732983299330033013302330333043305330633073308330933103311331233133314331533163317331833193320332133223323332433253326332733283329333033313332333333343335333633373338333933403341334233433344334533463347334833493350335133523353335433553356335733583359336033613362336333643365336633673368336933703371337233733374337533763377337833793380338133823383338433853386338733883389339033913392339333943395339633973398339934003401340234033404340534063407340834093410341134123413341434153416341734183419342034213422342334243425342634273428342934303431343234333434343534363437343834393440344134423443344434453446344734483449345034513452345334543455345634573458345934603461346234633464346534663467346834693470347134723473347434753476347734783479348034813482348334843485348634873488348934903491349234933494349534963497349834993500350135023503350435053506350735083509351035113512351335143515351635173518351935203521352235233524352535263527352835293530353135323533353435353536353735383539354035413542354335443545354635473548354935503551355235533554355535563557355835593560356135623563356435653566356735683569357035713572357335743575357635773578357935803581358235833584358535863587358835893590359135923593359435953596359735983599360036013602360336043605360636073608360936103611361236133614361536163617361836193620362136223623362436253626362736283629363036313632363336343635363636373638363936403641364236433644364536463647364836493650365136523653365436553656365736583659366036613662366336643665366636673668366936703671367236733674367536763677367836793680368136823683368436853686368736883689369036913692369336943695369636973698369937003701370237033704370537063707370837093710371137123713371437153716371737183719372037213722372337243725372637273728372937303731373237333734373537363737373837393740374137423743374437453746374737483749375037513752375337543755375637573758375937603761376237633764376537663767376837693770377137723773377437753776377737783779378037813782378337843785378637873788378937903791379237933794379537963797379837993800380138023803380438053806380738083809381038113812381338143815381638173818381938203821382238233824382538263827382838293830383138323833383438353836383738383839384038413842384338443845384638473848384938503851385238533854385538563857385838593860386138623863386438653866386738683869387038713872387338743875387638773878387938803881388238833884388538863887388838893890389138923893389438953896389738983899390039013902390339043905390639073908390939103911391239133914391539163917391839193920392139223923392439253926392739283929393039313932393339343935393639373938393939403941394239433944394539463947394839493950395139523953395439553956395739583959396039613962396339643965396639673968396939703971397239733974397539763977397839793980398139823983398439853986398739883989399039913992399339943995399639973998399940004001400240034004400540064007400840094010401140124013401440154016401740184019402040214022402340244025402640274028402940304031403240334034403540364037403840394040404140424043404440454046404740484049405040514052405340544055405640574058405940604061406240634064406540664067406840694070407140724073407440754076407740784079408040814082408340844085408640874088408940904091409240934094409540964097409840994100410141024103410441054106410741084109411041114112411341144115411641174118411941204121412241234124412541264127412841294130413141324133413441354136413741384139414041414142414341444145414641474148414941504151415241534154415541564157415841594160416141624163416441654166416741684169417041714172417341744175417641774178417941804181418241834184418541864187418841894190419141924193419441954196419741984199420042014202420342044205420642074208420942104211421242134214421542164217421842194220422142224223422442254226422742284229423042314232423342344235423642374238423942404241424242434244424542464247424842494250425142524253425442554256425742584259426042614262426342644265426642674268426942704271427242734274427542764277427842794280428142824283428442854286428742884289429042914292429342944295429642974298429943004301430243034304430543064307430843094310431143124313431443154316431743184319432043214322432343244325432643274328432943304331433243334334433543364337433843394340434143424343434443454346434743484349435043514352435343544355435643574358435943604361436243634364436543664367436843694370437143724373437443754376437743784379438043814382438343844385438643874388438943904391439243934394439543964397439843994400440144024403440444054406440744084409441044114412441344144415441644174418441944204421442244234424442544264427442844294430443144324433443444354436443744384439444044414442444344444445444644474448444944504451445244534454445544564457445844594460446144624463446444654466446744684469447044714472447344744475447644774478447944804481448244834484448544864487448844894490449144924493449444954496449744984499450045014502450345044505450645074508450945104511451245134514451545164517451845194520452145224523452445254526452745284529453045314532453345344535453645374538453945404541454245434544454545464547454845494550455145524553455445554556455745584559456045614562456345644565456645674568456945704571457245734574457545764577457845794580458145824583458445854586458745884589459045914592459345944595459645974598459946004601460246034604460546064607460846094610461146124613461446154616461746184619462046214622462346244625462646274628462946304631463246334634463546364637463846394640464146424643464446454646464746484649465046514652465346544655465646574658465946604661466246634664466546664667466846694670467146724673467446754676467746784679468046814682468346844685468646874688468946904691469246934694469546964697469846994700470147024703470447054706470747084709471047114712471347144715471647174718471947204721472247234724472547264727472847294730473147324733473447354736473747384739474047414742474347444745474647474748474947504751475247534754475547564757475847594760476147624763476447654766476747684769477047714772477347744775477647774778477947804781478247834784478547864787478847894790479147924793479447954796479747984799480048014802480348044805480648074808480948104811481248134814481548164817481848194820482148224823482448254826482748284829483048314832483348344835483648374838483948404841484248434844484548464847484848494850485148524853485448554856485748584859486048614862486348644865486648674868486948704871487248734874487548764877487848794880488148824883488448854886488748884889489048914892489348944895489648974898489949004901490249034904490549064907490849094910491149124913491449154916491749184919492049214922492349244925492649274928492949304931493249334934493549364937493849394940494149424943494449454946494749484949495049514952495349544955495649574958495949604961496249634964496549664967496849694970497149724973497449754976497749784979498049814982498349844985498649874988498949904991499249934994499549964997499849995000500150025003500450055006500750085009501050115012501350145015501650175018501950205021502250235024502550265027502850295030503150325033503450355036503750385039504050415042504350445045504650475048504950505051505250535054505550565057505850595060506150625063506450655066506750685069507050715072507350745075507650775078507950805081508250835084508550865087508850895090509150925093509450955096509750985099510051015102510351045105510651075108510951105111511251135114511551165117511851195120512151225123512451255126512751285129513051315132513351345135513651375138513951405141514251435144514551465147514851495150515151525153515451555156515751585159516051615162516351645165516651675168516951705171517251735174517551765177517851795180518151825183518451855186518751885189519051915192519351945195519651975198519952005201520252035204520552065207520852095210521152125213521452155216521752185219522052215222522352245225522652275228522952305231523252335234523552365237523852395240524152425243524452455246524752485249525052515252525352545255525652575258525952605261526252635264526552665267526852695270527152725273527452755276527752785279528052815282528352845285528652875288528952905291529252935294529552965297529852995300530153025303530453055306530753085309531053115312531353145315531653175318531953205321532253235324532553265327532853295330533153325333533453355336533753385339534053415342534353445345534653475348534953505351535253535354535553565357535853595360536153625363536453655366536753685369537053715372537353745375537653775378537953805381538253835384538553865387538853895390539153925393539453955396539753985399540054015402540354045405540654075408540954105411541254135414541554165417541854195420542154225423542454255426542754285429543054315432543354345435543654375438543954405441544254435444544554465447544854495450545154525453545454555456545754585459546054615462546354645465546654675468546954705471547254735474547554765477547854795480548154825483548454855486548754885489549054915492549354945495549654975498549955005501550255035504550555065507550855095510551155125513551455155516551755185519552055215522552355245525552655275528552955305531553255335534553555365537553855395540554155425543554455455546554755485549555055515552555355545555555655575558555955605561556255635564556555665567556855695570557155725573557455755576557755785579558055815582558355845585558655875588558955905591559255935594559555965597559855995600560156025603560456055606560756085609561056115612561356145615561656175618561956205621562256235624562556265627562856295630563156325633563456355636563756385639564056415642564356445645564656475648564956505651565256535654565556565657565856595660566156625663566456655666566756685669567056715672567356745675567656775678567956805681568256835684568556865687568856895690569156925693569456955696569756985699570057015702570357045705570657075708570957105711571257135714571557165717571857195720572157225723572457255726572757285729573057315732573357345735573657375738573957405741574257435744574557465747574857495750575157525753575457555756575757585759576057615762576357645765576657675768576957705771577257735774577557765777577857795780578157825783578457855786578757885789579057915792579357945795579657975798579958005801580258035804580558065807580858095810581158125813581458155816581758185819582058215822582358245825582658275828582958305831583258335834583558365837583858395840584158425843584458455846584758485849585058515852585358545855585658575858585958605861586258635864586558665867586858695870587158725873587458755876587758785879588058815882588358845885588658875888588958905891589258935894589558965897589858995900590159025903590459055906590759085909591059115912591359145915591659175918591959205921592259235924592559265927592859295930593159325933593459355936593759385939594059415942594359445945594659475948594959505951595259535954595559565957595859595960596159625963596459655966596759685969597059715972597359745975597659775978597959805981598259835984598559865987598859895990599159925993599459955996599759985999600060016002600360046005600660076008600960106011601260136014601560166017601860196020602160226023602460256026602760286029603060316032603360346035603660376038603960406041604260436044604560466047604860496050605160526053605460556056605760586059606060616062606360646065606660676068606960706071607260736074607560766077607860796080608160826083608460856086608760886089609060916092609360946095609660976098609961006101610261036104610561066107610861096110611161126113611461156116611761186119612061216122612361246125612661276128612961306131613261336134613561366137613861396140614161426143614461456146614761486149615061516152615361546155615661576158615961606161616261636164616561666167616861696170617161726173617461756176617761786179618061816182618361846185618661876188618961906191619261936194619561966197619861996200620162026203620462056206620762086209621062116212621362146215621662176218621962206221622262236224622562266227622862296230623162326233623462356236623762386239624062416242624362446245624662476248624962506251625262536254625562566257625862596260626162626263626462656266626762686269627062716272627362746275627662776278627962806281628262836284628562866287628862896290629162926293629462956296629762986299630063016302630363046305630663076308630963106311631263136314631563166317631863196320632163226323632463256326632763286329633063316332633363346335633663376338633963406341634263436344634563466347634863496350635163526353635463556356635763586359636063616362636363646365636663676368636963706371637263736374637563766377637863796380638163826383638463856386638763886389639063916392639363946395639663976398639964006401640264036404640564066407640864096410641164126413641464156416641764186419642064216422642364246425642664276428642964306431643264336434643564366437643864396440644164426443644464456446644764486449645064516452645364546455645664576458645964606461646264636464646564666467646864696470647164726473647464756476647764786479648064816482648364846485648664876488648964906491649264936494649564966497649864996500650165026503650465056506650765086509651065116512651365146515651665176518651965206521652265236524652565266527652865296530653165326533653465356536653765386539654065416542654365446545654665476548654965506551655265536554655565566557655865596560656165626563656465656566656765686569657065716572657365746575657665776578657965806581658265836584658565866587658865896590659165926593659465956596659765986599660066016602660366046605660666076608660966106611661266136614661566166617661866196620662166226623662466256626662766286629663066316632663366346635663666376638663966406641664266436644664566466647664866496650665166526653665466556656665766586659666066616662666366646665666666676668666966706671667266736674667566766677667866796680668166826683668466856686668766886689669066916692669366946695669666976698669967006701670267036704670567066707670867096710671167126713671467156716671767186719672067216722672367246725672667276728672967306731673267336734673567366737673867396740674167426743674467456746674767486749675067516752675367546755675667576758675967606761676267636764676567666767676867696770677167726773677467756776677767786779678067816782678367846785678667876788678967906791679267936794679567966797679867996800680168026803680468056806680768086809681068116812681368146815681668176818681968206821682268236824682568266827682868296830683168326833683468356836683768386839684068416842684368446845684668476848684968506851685268536854685568566857685868596860686168626863686468656866686768686869687068716872687368746875687668776878687968806881688268836884688568866887688868896890689168926893689468956896689768986899690069016902690369046905690669076908690969106911691269136914691569166917691869196920692169226923692469256926692769286929693069316932693369346935693669376938693969406941694269436944694569466947694869496950695169526953695469556956695769586959696069616962696369646965696669676968696969706971697269736974697569766977697869796980698169826983698469856986698769886989699069916992699369946995699669976998699970007001700270037004700570067007700870097010701170127013701470157016701770187019702070217022702370247025702670277028702970307031703270337034703570367037703870397040704170427043704470457046704770487049705070517052705370547055705670577058705970607061706270637064706570667067706870697070707170727073707470757076707770787079708070817082708370847085708670877088708970907091709270937094709570967097709870997100710171027103710471057106710771087109711071117112711371147115711671177118711971207121712271237124712571267127712871297130713171327133713471357136713771387139714071417142714371447145714671477148714971507151715271537154715571567157715871597160716171627163716471657166716771687169717071717172717371747175717671777178717971807181718271837184718571867187718871897190719171927193719471957196719771987199720072017202720372047205720672077208720972107211721272137214721572167217721872197220722172227223722472257226722772287229723072317232723372347235723672377238723972407241724272437244724572467247724872497250725172527253725472557256725772587259726072617262726372647265726672677268726972707271727272737274727572767277727872797280728172827283728472857286728772887289729072917292729372947295729672977298729973007301730273037304730573067307730873097310731173127313731473157316731773187319732073217322732373247325732673277328732973307331733273337334733573367337733873397340734173427343734473457346734773487349735073517352735373547355735673577358735973607361736273637364736573667367736873697370737173727373737473757376737773787379738073817382738373847385738673877388738973907391739273937394739573967397739873997400740174027403740474057406740774087409741074117412741374147415741674177418741974207421742274237424742574267427742874297430743174327433743474357436743774387439744074417442744374447445744674477448744974507451745274537454745574567457745874597460746174627463746474657466746774687469747074717472747374747475747674777478747974807481748274837484748574867487748874897490749174927493749474957496749774987499750075017502750375047505750675077508750975107511751275137514751575167517751875197520752175227523752475257526752775287529753075317532753375347535753675377538753975407541754275437544754575467547754875497550755175527553755475557556755775587559756075617562756375647565756675677568756975707571757275737574757575767577757875797580758175827583758475857586758775887589759075917592759375947595759675977598759976007601760276037604760576067607760876097610761176127613761476157616761776187619762076217622762376247625762676277628762976307631763276337634763576367637763876397640764176427643764476457646764776487649765076517652765376547655765676577658765976607661766276637664766576667667766876697670767176727673767476757676767776787679768076817682768376847685768676877688768976907691769276937694769576967697769876997700770177027703770477057706770777087709771077117712771377147715771677177718771977207721772277237724772577267727772877297730773177327733773477357736773777387739774077417742774377447745774677477748774977507751775277537754775577567757775877597760776177627763776477657766776777687769777077717772777377747775777677777778777977807781778277837784778577867787778877897790779177927793779477957796779777987799780078017802780378047805780678077808780978107811781278137814781578167817781878197820782178227823782478257826782778287829783078317832783378347835783678377838783978407841784278437844784578467847784878497850785178527853785478557856785778587859786078617862786378647865786678677868786978707871787278737874787578767877787878797880788178827883788478857886788778887889789078917892789378947895789678977898789979007901790279037904790579067907790879097910791179127913791479157916791779187919792079217922792379247925792679277928792979307931793279337934793579367937793879397940794179427943794479457946794779487949795079517952795379547955795679577958795979607961796279637964796579667967796879697970797179727973797479757976797779787979798079817982798379847985798679877988798979907991799279937994799579967997799879998000800180028003800480058006800780088009801080118012801380148015801680178018801980208021802280238024802580268027802880298030803180328033803480358036803780388039804080418042804380448045804680478048804980508051805280538054805580568057805880598060806180628063806480658066806780688069807080718072807380748075807680778078807980808081808280838084808580868087808880898090809180928093809480958096809780988099810081018102810381048105810681078108810981108111811281138114811581168117811881198120812181228123812481258126812781288129813081318132813381348135813681378138813981408141814281438144814581468147814881498150815181528153815481558156815781588159816081618162816381648165816681678168816981708171817281738174817581768177817881798180818181828183818481858186818781888189819081918192819381948195819681978198819982008201820282038204820582068207820882098210821182128213821482158216821782188219822082218222822382248225822682278228822982308231823282338234823582368237823882398240824182428243824482458246824782488249825082518252825382548255825682578258825982608261826282638264826582668267826882698270827182728273827482758276827782788279828082818282828382848285828682878288828982908291829282938294829582968297829882998300830183028303830483058306830783088309831083118312831383148315831683178318831983208321832283238324832583268327832883298330833183328333833483358336833783388339834083418342834383448345834683478348834983508351835283538354835583568357835883598360836183628363836483658366836783688369837083718372837383748375837683778378837983808381838283838384838583868387838883898390839183928393839483958396839783988399840084018402840384048405840684078408840984108411841284138414841584168417841884198420842184228423842484258426842784288429843084318432843384348435843684378438843984408441844284438444844584468447844884498450845184528453845484558456845784588459846084618462846384648465846684678468846984708471847284738474847584768477847884798480848184828483848484858486848784888489849084918492849384948495849684978498849985008501850285038504850585068507850885098510851185128513851485158516851785188519852085218522852385248525852685278528852985308531853285338534853585368537853885398540854185428543854485458546854785488549855085518552855385548555855685578558855985608561856285638564856585668567856885698570857185728573857485758576857785788579858085818582858385848585858685878588858985908591859285938594859585968597859885998600860186028603860486058606860786088609861086118612861386148615861686178618861986208621862286238624862586268627862886298630863186328633863486358636863786388639864086418642864386448645864686478648864986508651865286538654865586568657865886598660866186628663866486658666866786688669867086718672867386748675867686778678867986808681868286838684868586868687868886898690869186928693869486958696869786988699870087018702870387048705870687078708870987108711871287138714871587168717871887198720872187228723872487258726872787288729873087318732873387348735873687378738873987408741874287438744874587468747874887498750875187528753875487558756875787588759876087618762876387648765876687678768876987708771877287738774877587768777877887798780878187828783878487858786878787888789879087918792879387948795879687978798879988008801880288038804880588068807880888098810881188128813881488158816881788188819882088218822882388248825882688278828882988308831883288338834883588368837883888398840884188428843884488458846884788488849885088518852885388548855885688578858885988608861886288638864886588668867886888698870887188728873887488758876887788788879888088818882888388848885888688878888888988908891889288938894889588968897889888998900890189028903890489058906890789088909891089118912891389148915891689178918891989208921892289238924892589268927892889298930893189328933893489358936893789388939894089418942894389448945894689478948894989508951895289538954895589568957895889598960896189628963896489658966896789688969897089718972897389748975897689778978897989808981898289838984898589868987898889898990899189928993899489958996899789988999900090019002900390049005900690079008900990109011901290139014901590169017901890199020902190229023902490259026902790289029903090319032903390349035903690379038903990409041904290439044904590469047904890499050905190529053905490559056905790589059906090619062906390649065906690679068906990709071907290739074907590769077907890799080908190829083908490859086908790889089909090919092909390949095909690979098909991009101910291039104910591069107910891099110911191129113911491159116911791189119912091219122912391249125912691279128912991309131913291339134913591369137913891399140914191429143914491459146914791489149915091519152915391549155915691579158915991609161916291639164916591669167916891699170917191729173917491759176917791789179918091819182918391849185918691879188918991909191919291939194919591969197919891999200920192029203920492059206920792089209921092119212921392149215921692179218921992209221922292239224922592269227922892299230923192329233923492359236923792389239924092419242924392449245924692479248924992509251925292539254925592569257925892599260926192629263926492659266926792689269927092719272927392749275927692779278927992809281928292839284928592869287928892899290929192929293929492959296929792989299930093019302930393049305930693079308930993109311931293139314931593169317931893199320932193229323932493259326932793289329933093319332933393349335933693379338933993409341934293439344934593469347934893499350935193529353935493559356935793589359936093619362936393649365936693679368936993709371937293739374937593769377937893799380938193829383938493859386938793889389939093919392939393949395939693979398939994009401940294039404940594069407940894099410941194129413941494159416941794189419942094219422942394249425942694279428942994309431943294339434943594369437943894399440944194429443944494459446944794489449945094519452945394549455945694579458945994609461946294639464946594669467946894699470947194729473947494759476947794789479948094819482948394849485948694879488948994909491949294939494949594969497949894999500950195029503950495059506950795089509951095119512951395149515951695179518951995209521952295239524952595269527952895299530953195329533953495359536953795389539954095419542954395449545954695479548954995509551955295539554955595569557955895599560956195629563956495659566956795689569957095719572957395749575957695779578957995809581958295839584958595869587958895899590959195929593959495959596959795989599960096019602960396049605960696079608960996109611961296139614961596169617961896199620962196229623962496259626962796289629963096319632963396349635963696379638963996409641964296439644964596469647964896499650965196529653965496559656965796589659966096619662966396649665966696679668966996709671967296739674967596769677967896799680968196829683968496859686968796889689969096919692969396949695969696979698969997009701970297039704970597069707970897099710971197129713971497159716971797189719972097219722972397249725972697279728972997309731973297339734973597369737973897399740974197429743974497459746974797489749975097519752975397549755975697579758975997609761976297639764976597669767976897699770977197729773977497759776977797789779978097819782978397849785978697879788978997909791979297939794979597969797979897999800980198029803980498059806980798089809981098119812981398149815981698179818981998209821982298239824982598269827982898299830983198329833983498359836983798389839984098419842984398449845984698479848984998509851985298539854985598569857985898599860986198629863986498659866986798689869987098719872987398749875987698779878987998809881988298839884988598869887988898899890989198929893989498959896989798989899990099019902990399049905990699079908990999109911991299139914991599169917991899199920992199229923992499259926992799289929993099319932993399349935993699379938993999409941994299439944994599469947994899499950995199529953995499559956995799589959996099619962996399649965996699679968996999709971997299739974997599769977997899799980998199829983998499859986998799889989999099919992999399949995999699979998999910000100011000210003100041000510006100071000810009100101001110012100131001410015100161001710018100191002010021100221002310024100251002610027100281002910030100311003210033100341003510036100371003810039100401004110042100431004410045100461004710048100491005010051100521005310054100551005610057100581005910060100611006210063100641006510066100671006810069100701007110072100731007410075100761007710078100791008010081100821008310084100851008610087100881008910090100911009210093100941009510096100971009810099101001010110102101031010410105101061010710108101091011010111101121011310114101151011610117101181011910120101211012210123101241012510126101271012810129101301013110132101331013410135101361013710138101391014010141101421014310144101451014610147101481014910150101511015210153101541015510156101571015810159101601016110162101631016410165101661016710168101691017010171101721017310174101751017610177101781017910180101811018210183101841018510186101871018810189101901019110192101931019410195101961019710198101991020010201102021020310204102051020610207102081020910210102111021210213102141021510216102171021810219102201022110222102231022410225102261022710228102291023010231102321023310234102351023610237102381023910240102411024210243102441024510246102471024810249102501025110252102531025410255102561025710258102591026010261102621026310264102651026610267102681026910270102711027210273102741027510276102771027810279102801028110282102831028410285102861028710288102891029010291102921029310294102951029610297102981029910300103011030210303103041030510306103071030810309103101031110312103131031410315103161031710318103191032010321103221032310324103251032610327103281032910330103311033210333103341033510336103371033810339103401034110342103431034410345103461034710348103491035010351103521035310354103551035610357103581035910360103611036210363103641036510366103671036810369103701037110372103731037410375103761037710378103791038010381103821038310384103851038610387103881038910390103911039210393103941039510396103971039810399104001040110402104031040410405104061040710408104091041010411104121041310414104151041610417104181041910420104211042210423104241042510426104271042810429104301043110432104331043410435104361043710438104391044010441104421044310444104451044610447104481044910450104511045210453104541045510456104571045810459104601046110462104631046410465104661046710468104691047010471104721047310474104751047610477104781047910480104811048210483104841048510486104871048810489104901049110492104931049410495104961049710498104991050010501105021050310504105051050610507105081050910510105111051210513105141051510516105171051810519105201052110522105231052410525105261052710528105291053010531105321053310534105351053610537105381053910540105411054210543105441054510546105471054810549105501055110552105531055410555105561055710558105591056010561105621056310564105651056610567105681056910570105711057210573105741057510576105771057810579105801058110582105831058410585105861058710588105891059010591105921059310594105951059610597105981059910600106011060210603106041060510606106071060810609106101061110612106131061410615106161061710618106191062010621106221062310624106251062610627106281062910630106311063210633106341063510636106371063810639106401064110642106431064410645106461064710648106491065010651106521065310654106551065610657106581065910660106611066210663106641066510666106671066810669106701067110672106731067410675106761067710678106791068010681106821068310684106851068610687106881068910690106911069210693106941069510696106971069810699107001070110702107031070410705107061070710708107091071010711107121071310714107151071610717107181071910720107211072210723107241072510726107271072810729107301073110732107331073410735107361073710738107391074010741107421074310744107451074610747107481074910750107511075210753107541075510756107571075810759107601076110762107631076410765107661076710768107691077010771107721077310774107751077610777107781077910780107811078210783107841078510786107871078810789107901079110792107931079410795107961079710798107991080010801108021080310804108051080610807108081080910810108111081210813108141081510816108171081810819108201082110822108231082410825108261082710828108291083010831108321083310834108351083610837108381083910840108411084210843108441084510846108471084810849108501085110852108531085410855108561085710858108591086010861108621086310864108651086610867108681086910870108711087210873108741087510876108771087810879108801088110882108831088410885108861088710888108891089010891108921089310894108951089610897108981089910900109011090210903109041090510906109071090810909109101091110912109131091410915109161091710918109191092010921109221092310924109251092610927109281092910930109311093210933109341093510936109371093810939109401094110942109431094410945109461094710948109491095010951109521095310954109551095610957109581095910960109611096210963109641096510966109671096810969109701097110972109731097410975109761097710978109791098010981109821098310984109851098610987109881098910990109911099210993109941099510996109971099810999110001100111002110031100411005110061100711008110091101011011110121101311014110151101611017110181101911020110211102211023110241102511026110271102811029110301103111032110331103411035110361103711038110391104011041110421104311044110451104611047110481104911050110511105211053110541105511056110571105811059110601106111062110631106411065110661106711068110691107011071110721107311074110751107611077110781107911080110811108211083110841108511086110871108811089110901109111092110931109411095110961109711098110991110011101111021110311104111051110611107111081110911110111111111211113111141111511116111171111811119111201112111122111231112411125111261112711128111291113011131111321113311134111351113611137111381113911140111411114211143111441114511146111471114811149111501115111152111531115411155111561115711158111591116011161111621116311164111651116611167111681116911170111711117211173111741117511176111771117811179111801118111182111831118411185111861118711188111891119011191111921119311194111951119611197111981119911200112011120211203112041120511206112071120811209112101121111212112131121411215112161121711218112191122011221112221122311224112251122611227112281122911230112311123211233112341123511236112371123811239112401124111242112431124411245112461124711248112491125011251112521125311254112551125611257112581125911260112611126211263112641126511266112671126811269112701127111272112731127411275112761127711278112791128011281112821128311284112851128611287112881128911290112911129211293112941129511296112971129811299113001130111302113031130411305113061130711308113091131011311113121131311314113151131611317113181131911320113211132211323113241132511326113271132811329113301133111332113331133411335113361133711338113391134011341113421134311344113451134611347113481134911350113511135211353113541135511356113571135811359113601136111362113631136411365113661136711368113691137011371113721137311374113751137611377113781137911380113811138211383113841138511386113871138811389113901139111392113931139411395113961139711398113991140011401114021140311404114051140611407114081140911410114111141211413114141141511416114171141811419114201142111422114231142411425114261142711428114291143011431114321143311434114351143611437114381143911440114411144211443114441144511446114471144811449114501145111452114531145411455114561145711458114591146011461114621146311464114651146611467114681146911470114711147211473114741147511476114771147811479114801148111482114831148411485114861148711488114891149011491114921149311494114951149611497114981149911500115011150211503115041150511506115071150811509115101151111512115131151411515115161151711518115191152011521115221152311524115251152611527115281152911530115311153211533115341153511536115371153811539115401154111542115431154411545115461154711548115491155011551115521155311554115551155611557115581155911560115611156211563115641156511566115671156811569115701157111572115731157411575115761157711578115791158011581115821158311584115851158611587115881158911590115911159211593115941159511596115971159811599116001160111602116031160411605116061160711608116091161011611116121161311614116151161611617116181161911620116211162211623116241162511626116271162811629116301163111632116331163411635116361163711638116391164011641116421164311644116451164611647116481164911650116511165211653116541165511656116571165811659116601166111662116631166411665116661166711668116691167011671116721167311674116751167611677116781167911680116811168211683116841168511686116871168811689116901169111692116931169411695116961169711698116991170011701117021170311704117051170611707117081170911710117111171211713117141171511716117171171811719117201172111722117231172411725117261172711728117291173011731117321173311734117351173611737117381173911740117411174211743117441174511746117471174811749117501175111752117531175411755117561175711758117591176011761117621176311764117651176611767117681176911770117711177211773117741177511776117771177811779117801178111782117831178411785117861178711788117891179011791117921179311794117951179611797117981179911800118011180211803118041180511806118071180811809118101181111812118131181411815118161181711818118191182011821118221182311824118251182611827118281182911830118311183211833118341183511836118371183811839118401184111842118431184411845118461184711848118491185011851118521185311854118551185611857118581185911860118611186211863118641186511866118671186811869118701187111872118731187411875118761187711878118791188011881118821188311884118851188611887118881188911890118911189211893118941189511896118971189811899119001190111902119031190411905119061190711908119091191011911119121191311914119151191611917119181191911920119211192211923119241192511926119271192811929119301193111932119331193411935119361193711938119391194011941119421194311944119451194611947119481194911950119511195211953119541195511956119571195811959119601196111962119631196411965119661196711968119691197011971119721197311974119751197611977119781197911980119811198211983119841198511986119871198811989119901199111992119931199411995119961199711998119991200012001120021200312004120051200612007120081200912010120111201212013120141201512016120171201812019120201202112022120231202412025120261202712028120291203012031120321203312034120351203612037120381203912040120411204212043120441204512046120471204812049120501205112052120531205412055120561205712058120591206012061120621206312064120651206612067120681206912070120711207212073120741207512076120771207812079120801208112082120831208412085120861208712088120891209012091120921209312094120951209612097120981209912100121011210212103121041210512106121071210812109121101211112112121131211412115121161211712118121191212012121121221212312124121251212612127121281212912130121311213212133121341213512136121371213812139121401214112142121431214412145121461214712148121491215012151121521215312154121551215612157121581215912160121611216212163121641216512166121671216812169121701217112172121731217412175121761217712178121791218012181121821218312184121851218612187121881218912190121911219212193121941219512196121971219812199122001220112202122031220412205122061220712208122091221012211122121221312214122151221612217122181221912220122211222212223122241222512226122271222812229122301223112232122331223412235122361223712238122391224012241122421224312244122451224612247122481224912250122511225212253122541225512256122571225812259122601226112262122631226412265122661226712268122691227012271122721227312274122751227612277122781227912280122811228212283122841228512286122871228812289122901229112292122931229412295122961229712298122991230012301123021230312304123051230612307123081230912310123111231212313123141231512316123171231812319123201232112322123231232412325123261232712328123291233012331123321233312334123351233612337123381233912340123411234212343123441234512346123471234812349123501235112352123531235412355123561235712358123591236012361123621236312364123651236612367123681236912370123711237212373123741237512376123771237812379123801238112382123831238412385123861238712388123891239012391123921239312394123951239612397123981239912400124011240212403124041240512406124071240812409124101241112412124131241412415124161241712418124191242012421124221242312424124251242612427124281242912430124311243212433124341243512436124371243812439124401244112442124431244412445124461244712448124491245012451124521245312454124551245612457124581245912460124611246212463124641246512466124671246812469124701247112472124731247412475124761247712478124791248012481124821248312484124851248612487124881248912490124911249212493124941249512496124971249812499125001250112502125031250412505125061250712508125091251012511125121251312514125151251612517125181251912520125211252212523125241252512526125271252812529125301253112532125331253412535125361253712538125391254012541125421254312544125451254612547125481254912550125511255212553125541255512556125571255812559125601256112562125631256412565125661256712568125691257012571125721257312574125751257612577125781257912580125811258212583125841258512586125871258812589125901259112592125931259412595125961259712598125991260012601126021260312604126051260612607126081260912610126111261212613126141261512616126171261812619126201262112622126231262412625126261262712628126291263012631126321263312634126351263612637126381263912640126411264212643126441264512646126471264812649126501265112652126531265412655126561265712658126591266012661126621266312664126651266612667126681266912670126711267212673126741267512676126771267812679126801268112682126831268412685126861268712688126891269012691126921269312694126951269612697126981269912700127011270212703127041270512706127071270812709127101271112712127131271412715127161271712718127191272012721127221272312724127251272612727127281272912730127311273212733127341273512736127371273812739127401274112742127431274412745127461274712748127491275012751127521275312754127551275612757127581275912760127611276212763127641276512766127671276812769127701277112772127731277412775127761277712778127791278012781127821278312784127851278612787127881278912790127911279212793127941279512796127971279812799128001280112802128031280412805128061280712808128091281012811128121281312814128151281612817128181281912820128211282212823128241282512826128271282812829128301283112832128331283412835128361283712838128391284012841128421284312844128451284612847128481284912850128511285212853128541285512856128571285812859128601286112862128631286412865128661286712868128691287012871128721287312874128751287612877128781287912880128811288212883128841288512886128871288812889128901289112892128931289412895128961289712898128991290012901129021290312904129051290612907129081290912910129111291212913129141291512916129171291812919129201292112922129231292412925129261292712928129291293012931129321293312934129351293612937129381293912940129411294212943129441294512946129471294812949129501295112952129531295412955129561295712958129591296012961129621296312964129651296612967129681296912970129711297212973129741297512976129771297812979129801298112982129831298412985129861298712988129891299012991129921299312994129951299612997129981299913000130011300213003130041300513006130071300813009130101301113012130131301413015130161301713018130191302013021130221302313024130251302613027130281302913030130311303213033130341303513036130371303813039130401304113042130431304413045130461304713048130491305013051130521305313054130551305613057130581305913060130611306213063130641306513066130671306813069130701307113072130731307413075130761307713078130791308013081130821308313084130851308613087130881308913090130911309213093130941309513096130971309813099131001310113102131031310413105131061310713108131091311013111131121311313114131151311613117131181311913120131211312213123131241312513126131271312813129131301313113132131331313413135131361313713138131391314013141131421314313144131451314613147131481314913150131511315213153131541315513156131571315813159131601316113162131631316413165131661316713168131691317013171131721317313174131751317613177131781317913180131811318213183131841318513186131871318813189131901319113192131931319413195131961319713198131991320013201132021320313204132051320613207132081320913210132111321213213132141321513216132171321813219132201322113222132231322413225132261322713228132291323013231132321323313234132351323613237132381323913240132411324213243132441324513246132471324813249132501325113252132531325413255132561325713258132591326013261132621326313264132651326613267132681326913270132711327213273132741327513276132771327813279132801328113282132831328413285132861328713288132891329013291132921329313294132951329613297132981329913300133011330213303133041330513306133071330813309133101331113312133131331413315133161331713318133191332013321133221332313324133251332613327133281332913330133311333213333133341333513336133371333813339133401334113342133431334413345133461334713348133491335013351133521335313354133551335613357133581335913360133611336213363133641336513366133671336813369133701337113372133731337413375133761337713378133791338013381133821338313384133851338613387133881338913390133911339213393133941339513396133971339813399134001340113402134031340413405134061340713408134091341013411134121341313414134151341613417134181341913420134211342213423134241342513426134271342813429134301343113432134331343413435134361343713438134391344013441134421344313444134451344613447134481344913450134511345213453134541345513456134571345813459134601346113462134631346413465134661346713468134691347013471134721347313474134751347613477134781347913480134811348213483134841348513486134871348813489134901349113492134931349413495134961349713498134991350013501135021350313504135051350613507135081350913510135111351213513135141351513516135171351813519135201352113522135231352413525135261352713528135291353013531135321353313534135351353613537135381353913540135411354213543135441354513546135471354813549135501355113552135531355413555135561355713558135591356013561135621356313564135651356613567135681356913570135711357213573135741357513576135771357813579135801358113582135831358413585135861358713588135891359013591135921359313594135951359613597135981359913600136011360213603136041360513606136071360813609136101361113612136131361413615136161361713618136191362013621136221362313624136251362613627136281362913630136311363213633136341363513636136371363813639136401364113642136431364413645136461364713648136491365013651136521365313654136551365613657136581365913660136611366213663136641366513666136671366813669136701367113672136731367413675136761367713678136791368013681136821368313684136851368613687136881368913690136911369213693136941369513696136971369813699137001370113702137031370413705137061370713708137091371013711137121371313714137151371613717137181371913720137211372213723137241372513726137271372813729137301373113732137331373413735137361373713738137391374013741137421374313744137451374613747137481374913750137511375213753137541375513756137571375813759137601376113762137631376413765137661376713768137691377013771137721377313774137751377613777137781377913780137811378213783137841378513786137871378813789137901379113792137931379413795137961379713798137991380013801138021380313804138051380613807138081380913810138111381213813138141381513816138171381813819138201382113822138231382413825138261382713828138291383013831138321383313834138351383613837138381383913840138411384213843138441384513846138471384813849138501385113852138531385413855138561385713858138591386013861138621386313864138651386613867138681386913870138711387213873138741387513876138771387813879138801388113882138831388413885138861388713888138891389013891138921389313894138951389613897138981389913900139011390213903139041390513906139071390813909139101391113912139131391413915139161391713918139191392013921139221392313924139251392613927139281392913930139311393213933139341393513936139371393813939139401394113942139431394413945139461394713948139491395013951139521395313954139551395613957139581395913960139611396213963139641396513966139671396813969139701397113972139731397413975139761397713978139791398013981139821398313984139851398613987139881398913990139911399213993139941399513996139971399813999140001400114002140031400414005140061400714008140091401014011140121401314014140151401614017140181401914020140211402214023140241402514026140271402814029140301403114032140331403414035140361403714038140391404014041140421404314044140451404614047140481404914050140511405214053140541405514056140571405814059140601406114062140631406414065140661406714068140691407014071140721407314074140751407614077140781407914080140811408214083140841408514086140871408814089140901409114092140931409414095140961409714098140991410014101141021410314104141051410614107141081410914110141111411214113141141411514116141171411814119141201412114122141231412414125141261412714128141291413014131141321413314134141351413614137141381413914140141411414214143141441414514146141471414814149141501415114152141531415414155141561415714158141591416014161141621416314164141651416614167141681416914170141711417214173141741417514176141771417814179141801418114182141831418414185141861418714188141891419014191141921419314194141951419614197141981419914200142011420214203142041420514206142071420814209142101421114212142131421414215142161421714218142191422014221142221422314224142251422614227142281422914230142311423214233142341423514236142371423814239142401424114242142431424414245142461424714248142491425014251142521425314254142551425614257142581425914260142611426214263142641426514266142671426814269142701427114272142731427414275142761427714278142791428014281142821428314284142851428614287142881428914290142911429214293142941429514296142971429814299143001430114302143031430414305143061430714308143091431014311143121431314314143151431614317143181431914320143211432214323143241432514326143271432814329143301433114332143331433414335143361433714338143391434014341143421434314344143451434614347143481434914350143511435214353143541435514356143571435814359143601436114362143631436414365143661436714368143691437014371143721437314374143751437614377143781437914380143811438214383143841438514386143871438814389143901439114392143931439414395143961439714398143991440014401144021440314404144051440614407144081440914410144111441214413144141441514416144171441814419144201442114422144231442414425144261442714428144291443014431144321443314434144351443614437144381443914440144411444214443144441444514446144471444814449144501445114452144531445414455144561445714458144591446014461144621446314464144651446614467144681446914470144711447214473144741447514476144771447814479144801448114482144831448414485144861448714488144891449014491144921449314494144951449614497144981449914500145011450214503145041450514506145071450814509145101451114512145131451414515145161451714518145191452014521145221452314524145251452614527145281452914530145311453214533145341453514536145371453814539145401454114542145431454414545145461454714548145491455014551145521455314554145551455614557145581455914560145611456214563145641456514566145671456814569145701457114572145731457414575145761457714578145791458014581145821458314584145851458614587145881458914590145911459214593145941459514596145971459814599146001460114602146031460414605146061460714608146091461014611146121461314614146151461614617146181461914620146211462214623146241462514626146271462814629146301463114632146331463414635146361463714638146391464014641146421464314644146451464614647146481464914650146511465214653146541465514656146571465814659146601466114662146631466414665146661466714668146691467014671146721467314674146751467614677146781467914680146811468214683146841468514686146871468814689146901469114692146931469414695146961469714698146991470014701147021470314704147051470614707147081470914710147111471214713147141471514716147171471814719147201472114722147231472414725147261472714728147291473014731147321473314734147351473614737147381473914740147411474214743147441474514746147471474814749147501475114752147531475414755147561475714758147591476014761147621476314764147651476614767147681476914770147711477214773147741477514776147771477814779147801478114782147831478414785147861478714788147891479014791147921479314794147951479614797147981479914800148011480214803148041480514806148071480814809148101481114812148131481414815148161481714818148191482014821148221482314824148251482614827148281482914830148311483214833148341483514836148371483814839148401484114842148431484414845148461484714848148491485014851148521485314854148551485614857148581485914860148611486214863148641486514866148671486814869148701487114872148731487414875148761487714878148791488014881148821488314884148851488614887148881488914890148911489214893148941489514896148971489814899149001490114902149031490414905149061490714908149091491014911149121491314914149151491614917149181491914920149211492214923149241492514926149271492814929149301493114932149331493414935149361493714938149391494014941149421494314944149451494614947149481494914950149511495214953149541495514956149571495814959149601496114962149631496414965149661496714968149691497014971149721497314974149751497614977149781497914980149811498214983149841498514986149871498814989149901499114992149931499414995149961499714998149991500015001150021500315004150051500615007150081500915010150111501215013150141501515016150171501815019150201502115022150231502415025150261502715028150291503015031150321503315034150351503615037150381503915040150411504215043150441504515046150471504815049150501505115052150531505415055150561505715058150591506015061150621506315064150651506615067150681506915070150711507215073150741507515076150771507815079150801508115082150831508415085150861508715088150891509015091150921509315094150951509615097150981509915100151011510215103151041510515106151071510815109151101511115112151131511415115151161511715118151191512015121151221512315124151251512615127151281512915130151311513215133151341513515136151371513815139151401514115142151431514415145151461514715148151491515015151151521515315154151551515615157151581515915160151611516215163151641516515166151671516815169151701517115172151731517415175151761517715178151791518015181151821518315184151851518615187151881518915190151911519215193151941519515196151971519815199152001520115202152031520415205152061520715208152091521015211152121521315214152151521615217152181521915220152211522215223152241522515226152271522815229152301523115232152331523415235152361523715238152391524015241152421524315244152451524615247152481524915250152511525215253152541525515256152571525815259152601526115262152631526415265152661526715268152691527015271152721527315274152751527615277152781527915280152811528215283152841528515286152871528815289152901529115292152931529415295152961529715298152991530015301153021530315304153051530615307153081530915310153111531215313153141531515316153171531815319153201532115322153231532415325153261532715328153291533015331153321533315334153351533615337153381533915340153411534215343153441534515346153471534815349153501535115352153531535415355153561535715358153591536015361153621536315364153651536615367153681536915370153711537215373153741537515376153771537815379153801538115382153831538415385153861538715388153891539015391153921539315394153951539615397153981539915400154011540215403154041540515406154071540815409154101541115412154131541415415154161541715418154191542015421154221542315424154251542615427154281542915430154311543215433154341543515436154371543815439154401544115442154431544415445154461544715448154491545015451154521545315454154551545615457154581545915460154611546215463154641546515466154671546815469154701547115472154731547415475154761547715478154791548015481154821548315484154851548615487154881548915490154911549215493154941549515496154971549815499155001550115502155031550415505155061550715508155091551015511155121551315514155151551615517155181551915520155211552215523155241552515526155271552815529155301553115532155331553415535155361553715538155391554015541155421554315544155451554615547155481554915550155511555215553155541555515556155571555815559155601556115562155631556415565155661556715568155691557015571155721557315574155751557615577155781557915580155811558215583155841558515586155871558815589155901559115592155931559415595155961559715598155991560015601156021560315604156051560615607156081560915610156111561215613156141561515616156171561815619156201562115622156231562415625156261562715628156291563015631156321563315634156351563615637156381563915640156411564215643156441564515646156471564815649156501565115652156531565415655156561565715658156591566015661156621566315664156651566615667156681566915670156711567215673156741567515676156771567815679156801568115682156831568415685156861568715688156891569015691156921569315694156951569615697156981569915700157011570215703157041570515706157071570815709157101571115712157131571415715157161571715718157191572015721157221572315724157251572615727157281572915730157311573215733157341573515736157371573815739157401574115742157431574415745157461574715748157491575015751157521575315754157551575615757157581575915760157611576215763157641576515766157671576815769157701577115772157731577415775157761577715778157791578015781157821578315784157851578615787157881578915790157911579215793157941579515796157971579815799158001580115802158031580415805158061580715808158091581015811158121581315814158151581615817158181581915820158211582215823158241582515826158271582815829158301583115832158331583415835158361583715838158391584015841158421584315844158451584615847158481584915850158511585215853158541585515856158571585815859158601586115862158631586415865158661586715868158691587015871158721587315874158751587615877158781587915880158811588215883158841588515886158871588815889158901589115892158931589415895158961589715898158991590015901159021590315904159051590615907159081590915910159111591215913159141591515916159171591815919159201592115922159231592415925159261592715928159291593015931159321593315934159351593615937159381593915940159411594215943159441594515946159471594815949159501595115952159531595415955159561595715958159591596015961159621596315964159651596615967159681596915970159711597215973159741597515976159771597815979159801598115982159831598415985159861598715988159891599015991159921599315994159951599615997159981599916000160011600216003160041600516006160071600816009160101601116012160131601416015160161601716018160191602016021160221602316024160251602616027160281602916030160311603216033160341603516036160371603816039160401604116042160431604416045160461604716048160491605016051160521605316054160551605616057160581605916060160611606216063160641606516066160671606816069160701607116072160731607416075160761607716078160791608016081160821608316084160851608616087160881608916090160911609216093160941609516096160971609816099161001610116102161031610416105161061610716108161091611016111161121611316114161151611616117161181611916120161211612216123161241612516126161271612816129161301613116132161331613416135161361613716138161391614016141161421614316144161451614616147161481614916150161511615216153161541615516156161571615816159161601616116162161631616416165161661616716168161691617016171161721617316174161751617616177161781617916180161811618216183161841618516186161871618816189161901619116192161931619416195161961619716198161991620016201162021620316204162051620616207162081620916210162111621216213162141621516216162171621816219162201622116222162231622416225162261622716228162291623016231162321623316234162351623616237162381623916240162411624216243162441624516246162471624816249162501625116252162531625416255162561625716258162591626016261162621626316264162651626616267162681626916270162711627216273162741627516276162771627816279162801628116282162831628416285162861628716288162891629016291162921629316294162951629616297162981629916300163011630216303163041630516306163071630816309163101631116312163131631416315163161631716318163191632016321163221632316324163251632616327163281632916330163311633216333163341633516336163371633816339163401634116342163431634416345163461634716348163491635016351163521635316354163551635616357163581635916360163611636216363163641636516366163671636816369163701637116372163731637416375163761637716378163791638016381163821638316384163851638616387163881638916390163911639216393163941639516396163971639816399164001640116402164031640416405164061640716408164091641016411164121641316414164151641616417164181641916420164211642216423164241642516426164271642816429164301643116432164331643416435164361643716438164391644016441164421644316444164451644616447164481644916450164511645216453164541645516456164571645816459164601646116462164631646416465164661646716468164691647016471164721647316474164751647616477164781647916480164811648216483164841648516486164871648816489164901649116492164931649416495164961649716498164991650016501165021650316504165051650616507165081650916510165111651216513165141651516516165171651816519165201652116522165231652416525165261652716528165291653016531165321653316534165351653616537165381653916540165411654216543165441654516546165471654816549165501655116552165531655416555165561655716558165591656016561165621656316564165651656616567165681656916570165711657216573165741657516576165771657816579165801658116582165831658416585165861658716588165891659016591165921659316594165951659616597165981659916600166011660216603166041660516606166071660816609166101661116612166131661416615166161661716618166191662016621166221662316624166251662616627166281662916630166311663216633166341663516636166371663816639166401664116642166431664416645166461664716648166491665016651166521665316654166551665616657166581665916660166611666216663166641666516666166671666816669166701667116672166731667416675166761667716678166791668016681166821668316684166851668616687166881668916690166911669216693166941669516696166971669816699167001670116702167031670416705167061670716708167091671016711167121671316714167151671616717167181671916720167211672216723167241672516726167271672816729167301673116732167331673416735167361673716738167391674016741167421674316744167451674616747167481674916750167511675216753167541675516756167571675816759167601676116762167631676416765167661676716768167691677016771167721677316774167751677616777167781677916780167811678216783167841678516786167871678816789167901679116792167931679416795167961679716798167991680016801168021680316804168051680616807168081680916810168111681216813168141681516816168171681816819168201682116822168231682416825168261682716828168291683016831168321683316834168351683616837168381683916840168411684216843168441684516846168471684816849168501685116852168531685416855168561685716858168591686016861168621686316864168651686616867168681686916870168711687216873168741687516876168771687816879168801688116882168831688416885168861688716888168891689016891168921689316894168951689616897168981689916900169011690216903169041690516906169071690816909169101691116912169131691416915169161691716918169191692016921169221692316924169251692616927169281692916930169311693216933169341693516936169371693816939169401694116942169431694416945169461694716948169491695016951169521695316954169551695616957169581695916960169611696216963169641696516966169671696816969169701697116972169731697416975169761697716978169791698016981169821698316984169851698616987169881698916990169911699216993169941699516996169971699816999170001700117002170031700417005170061700717008170091701017011170121701317014170151701617017170181701917020170211702217023170241702517026170271702817029170301703117032170331703417035170361703717038170391704017041170421704317044170451704617047170481704917050170511705217053170541705517056170571705817059170601706117062170631706417065170661706717068170691707017071170721707317074170751707617077170781707917080170811708217083170841708517086170871708817089170901709117092170931709417095170961709717098170991710017101171021710317104171051710617107171081710917110171111711217113171141711517116171171711817119171201712117122171231712417125171261712717128171291713017131171321713317134171351713617137171381713917140171411714217143171441714517146171471714817149171501715117152171531715417155171561715717158171591716017161171621716317164171651716617167171681716917170171711717217173171741717517176171771717817179171801718117182171831718417185171861718717188171891719017191171921719317194171951719617197171981719917200172011720217203172041720517206172071720817209172101721117212172131721417215172161721717218172191722017221172221722317224172251722617227172281722917230172311723217233172341723517236172371723817239172401724117242172431724417245172461724717248172491725017251172521725317254172551725617257172581725917260172611726217263172641726517266172671726817269172701727117272172731727417275172761727717278172791728017281172821728317284172851728617287172881728917290172911729217293172941729517296172971729817299173001730117302173031730417305173061730717308173091731017311173121731317314173151731617317173181731917320173211732217323173241732517326173271732817329173301733117332173331733417335173361733717338173391734017341173421734317344173451734617347173481734917350173511735217353173541735517356173571735817359173601736117362173631736417365173661736717368173691737017371173721737317374173751737617377173781737917380173811738217383173841738517386173871738817389173901739117392173931739417395173961739717398173991740017401174021740317404174051740617407174081740917410174111741217413174141741517416174171741817419174201742117422174231742417425174261742717428174291743017431174321743317434174351743617437174381743917440174411744217443174441744517446174471744817449174501745117452174531745417455174561745717458174591746017461174621746317464174651746617467174681746917470174711747217473174741747517476174771747817479174801748117482174831748417485174861748717488174891749017491174921749317494174951749617497174981749917500175011750217503175041750517506175071750817509175101751117512175131751417515175161751717518175191752017521175221752317524175251752617527175281752917530175311753217533175341753517536175371753817539175401754117542175431754417545175461754717548175491755017551175521755317554175551755617557175581755917560175611756217563175641756517566175671756817569175701757117572175731757417575175761757717578175791758017581175821758317584175851758617587175881758917590175911759217593175941759517596175971759817599176001760117602176031760417605176061760717608176091761017611176121761317614176151761617617176181761917620176211762217623176241762517626176271762817629176301763117632176331763417635176361763717638176391764017641176421764317644176451764617647176481764917650176511765217653176541765517656176571765817659176601766117662176631766417665176661766717668176691767017671176721767317674176751767617677176781767917680176811768217683176841768517686176871768817689176901769117692176931769417695176961769717698176991770017701177021770317704177051770617707177081770917710177111771217713177141771517716177171771817719177201772117722177231772417725177261772717728177291773017731177321773317734177351773617737177381773917740177411774217743177441774517746177471774817749177501775117752177531775417755177561775717758177591776017761177621776317764177651776617767177681776917770177711777217773177741777517776177771777817779177801778117782177831778417785177861778717788177891779017791177921779317794177951779617797177981779917800178011780217803178041780517806178071780817809178101781117812178131781417815178161781717818178191782017821178221782317824178251782617827178281782917830178311783217833178341783517836178371783817839178401784117842178431784417845178461784717848178491785017851178521785317854178551785617857178581785917860178611786217863178641786517866178671786817869178701787117872178731787417875178761787717878178791788017881178821788317884178851788617887178881788917890178911789217893178941789517896178971789817899179001790117902179031790417905179061790717908179091791017911179121791317914179151791617917179181791917920179211792217923179241792517926179271792817929179301793117932179331793417935179361793717938179391794017941179421794317944179451794617947179481794917950179511795217953179541795517956179571795817959179601796117962179631796417965179661796717968179691797017971179721797317974179751797617977179781797917980179811798217983179841798517986179871798817989179901799117992179931799417995179961799717998179991800018001180021800318004180051800618007180081800918010180111801218013180141801518016180171801818019180201802118022180231802418025180261802718028180291803018031180321803318034180351803618037180381803918040180411804218043180441804518046180471804818049180501805118052180531805418055180561805718058180591806018061180621806318064180651806618067180681806918070180711807218073180741807518076180771807818079180801808118082180831808418085180861808718088180891809018091180921809318094180951809618097180981809918100181011810218103181041810518106181071810818109181101811118112181131811418115181161811718118181191812018121181221812318124181251812618127181281812918130181311813218133181341813518136181371813818139181401814118142181431814418145181461814718148181491815018151181521815318154181551815618157181581815918160181611816218163181641816518166181671816818169181701817118172181731817418175181761817718178181791818018181181821818318184181851818618187181881818918190181911819218193181941819518196181971819818199182001820118202182031820418205182061820718208182091821018211182121821318214182151821618217182181821918220182211822218223182241822518226182271822818229182301823118232182331823418235182361823718238182391824018241182421824318244182451824618247182481824918250182511825218253182541825518256182571825818259182601826118262182631826418265182661826718268182691827018271182721827318274182751827618277182781827918280182811828218283182841828518286182871828818289182901829118292182931829418295182961829718298182991830018301183021830318304183051830618307183081830918310183111831218313183141831518316183171831818319183201832118322183231832418325183261832718328183291833018331183321833318334183351833618337183381833918340183411834218343183441834518346183471834818349183501835118352183531835418355183561835718358183591836018361183621836318364183651836618367183681836918370183711837218373183741837518376183771837818379183801838118382183831838418385183861838718388183891839018391183921839318394183951839618397183981839918400184011840218403184041840518406184071840818409184101841118412184131841418415184161841718418184191842018421184221842318424184251842618427184281842918430184311843218433184341843518436184371843818439184401844118442184431844418445184461844718448184491845018451184521845318454184551845618457184581845918460184611846218463184641846518466184671846818469184701847118472184731847418475184761847718478184791848018481184821848318484184851848618487184881848918490184911849218493184941849518496184971849818499185001850118502185031850418505185061850718508185091851018511185121851318514185151851618517185181851918520185211852218523185241852518526185271852818529185301853118532185331853418535185361853718538185391854018541185421854318544185451854618547185481854918550185511855218553185541855518556185571855818559185601856118562185631856418565185661856718568185691857018571185721857318574185751857618577185781857918580185811858218583185841858518586185871858818589185901859118592185931859418595185961859718598185991860018601186021860318604186051860618607186081860918610186111861218613186141861518616186171861818619186201862118622186231862418625186261862718628186291863018631186321863318634186351863618637186381863918640186411864218643186441864518646186471864818649186501865118652186531865418655186561865718658186591866018661186621866318664186651866618667186681866918670186711867218673186741867518676186771867818679186801868118682186831868418685186861868718688186891869018691186921869318694186951869618697186981869918700187011870218703187041870518706187071870818709187101871118712187131871418715187161871718718187191872018721187221872318724187251872618727187281872918730187311873218733187341873518736187371873818739187401874118742187431874418745187461874718748187491875018751187521875318754187551875618757187581875918760187611876218763187641876518766187671876818769187701877118772187731877418775187761877718778187791878018781187821878318784187851878618787187881878918790187911879218793187941879518796187971879818799188001880118802188031880418805188061880718808188091881018811188121881318814188151881618817188181881918820188211882218823188241882518826188271882818829188301883118832188331883418835188361883718838188391884018841188421884318844188451884618847188481884918850188511885218853188541885518856188571885818859188601886118862188631886418865188661886718868188691887018871188721887318874188751887618877188781887918880188811888218883188841888518886188871888818889188901889118892188931889418895188961889718898188991890018901189021890318904189051890618907189081890918910189111891218913189141891518916189171891818919189201892118922189231892418925189261892718928189291893018931189321893318934189351893618937189381893918940189411894218943189441894518946189471894818949189501895118952189531895418955189561895718958189591896018961189621896318964189651896618967189681896918970189711897218973189741897518976189771897818979189801898118982189831898418985189861898718988189891899018991189921899318994189951899618997189981899919000190011900219003190041900519006190071900819009190101901119012190131901419015190161901719018190191902019021190221902319024190251902619027190281902919030190311903219033190341903519036190371903819039190401904119042190431904419045190461904719048190491905019051190521905319054190551905619057190581905919060190611906219063190641906519066190671906819069190701907119072190731907419075190761907719078190791908019081190821908319084190851908619087190881908919090190911909219093190941909519096190971909819099191001910119102191031910419105191061910719108191091911019111191121911319114191151911619117191181911919120191211912219123191241912519126191271912819129191301913119132191331913419135191361913719138191391914019141191421914319144191451914619147191481914919150191511915219153191541915519156191571915819159191601916119162191631916419165191661916719168191691917019171191721917319174191751917619177191781917919180191811918219183191841918519186191871918819189191901919119192191931919419195191961919719198191991920019201192021920319204192051920619207192081920919210192111921219213192141921519216192171921819219192201922119222192231922419225192261922719228192291923019231192321923319234192351923619237192381923919240192411924219243192441924519246192471924819249192501925119252192531925419255192561925719258192591926019261192621926319264192651926619267192681926919270192711927219273192741927519276192771927819279192801928119282192831928419285192861928719288192891929019291192921929319294192951929619297192981929919300193011930219303193041930519306193071930819309193101931119312193131931419315193161931719318193191932019321193221932319324193251932619327193281932919330193311933219333193341933519336193371933819339193401934119342193431934419345193461934719348193491935019351193521935319354193551935619357193581935919360193611936219363193641936519366193671936819369193701937119372193731937419375193761937719378193791938019381193821938319384193851938619387193881938919390193911939219393193941939519396193971939819399194001940119402194031940419405194061940719408194091941019411194121941319414194151941619417194181941919420194211942219423194241942519426194271942819429194301943119432194331943419435194361943719438194391944019441194421944319444194451944619447194481944919450194511945219453194541945519456194571945819459194601946119462194631946419465194661946719468194691947019471194721947319474194751947619477194781947919480194811948219483194841948519486194871948819489194901949119492194931949419495194961949719498194991950019501195021950319504195051950619507195081950919510195111951219513195141951519516195171951819519195201952119522195231952419525195261952719528195291953019531195321953319534195351953619537195381953919540195411954219543195441954519546195471954819549195501955119552195531955419555195561955719558195591956019561195621956319564195651956619567195681956919570195711957219573195741957519576195771957819579195801958119582195831958419585195861958719588195891959019591195921959319594195951959619597195981959919600196011960219603196041960519606196071960819609196101961119612196131961419615196161961719618196191962019621196221962319624196251962619627196281962919630196311963219633196341963519636196371963819639196401964119642196431964419645196461964719648196491965019651196521965319654196551965619657196581965919660196611966219663196641966519666196671966819669196701967119672196731967419675196761967719678196791968019681196821968319684196851968619687196881968919690196911969219693196941969519696196971969819699197001970119702197031970419705197061970719708197091971019711197121971319714197151971619717197181971919720197211972219723197241972519726197271972819729197301973119732197331973419735197361973719738197391974019741197421974319744197451974619747197481974919750197511975219753197541975519756197571975819759197601976119762197631976419765197661976719768197691977019771197721977319774197751977619777197781977919780197811978219783197841978519786197871978819789197901979119792197931979419795197961979719798197991980019801198021980319804198051980619807198081980919810198111981219813198141981519816198171981819819198201982119822198231982419825198261982719828198291983019831198321983319834198351983619837198381983919840198411984219843198441984519846198471984819849198501985119852198531985419855198561985719858198591986019861198621986319864198651986619867198681986919870198711987219873198741987519876198771987819879198801988119882198831988419885198861988719888198891989019891198921989319894198951989619897198981989919900199011990219903199041990519906199071990819909199101991119912199131991419915199161991719918199191992019921199221992319924199251992619927199281992919930199311993219933199341993519936199371993819939199401994119942199431994419945199461994719948199491995019951199521995319954199551995619957199581995919960199611996219963199641996519966199671996819969199701997119972199731997419975199761997719978199791998019981199821998319984199851998619987199881998919990199911999219993199941999519996199971999819999200002000120002200032000420005200062000720008200092001020011200122001320014200152001620017200182001920020200212002220023200242002520026200272002820029200302003120032200332003420035200362003720038200392004020041200422004320044200452004620047200482004920050200512005220053200542005520056200572005820059200602006120062200632006420065200662006720068200692007020071200722007320074200752007620077200782007920080200812008220083200842008520086200872008820089200902009120092200932009420095200962009720098200992010020101201022010320104201052010620107201082010920110201112011220113201142011520116201172011820119201202012120122201232012420125201262012720128201292013020131201322013320134201352013620137201382013920140201412014220143201442014520146201472014820149201502015120152201532015420155201562015720158201592016020161201622016320164201652016620167201682016920170201712017220173201742017520176201772017820179201802018120182201832018420185201862018720188201892019020191201922019320194201952019620197201982019920200202012020220203202042020520206202072020820209202102021120212202132021420215202162021720218202192022020221202222022320224202252022620227202282022920230202312023220233202342023520236202372023820239202402024120242202432024420245202462024720248202492025020251202522025320254202552025620257202582025920260202612026220263202642026520266202672026820269202702027120272202732027420275202762027720278202792028020281202822028320284202852028620287202882028920290202912029220293202942029520296202972029820299203002030120302203032030420305203062030720308203092031020311203122031320314203152031620317203182031920320203212032220323203242032520326203272032820329203302033120332203332033420335203362033720338203392034020341203422034320344203452034620347203482034920350203512035220353203542035520356203572035820359203602036120362203632036420365203662036720368203692037020371203722037320374203752037620377203782037920380203812038220383203842038520386203872038820389203902039120392203932039420395203962039720398203992040020401204022040320404204052040620407204082040920410204112041220413204142041520416204172041820419204202042120422204232042420425204262042720428204292043020431204322043320434204352043620437204382043920440204412044220443204442044520446204472044820449204502045120452204532045420455204562045720458204592046020461204622046320464204652046620467204682046920470204712047220473204742047520476204772047820479204802048120482204832048420485204862048720488204892049020491204922049320494204952049620497204982049920500205012050220503205042050520506205072050820509205102051120512205132051420515205162051720518205192052020521205222052320524205252052620527205282052920530205312053220533205342053520536205372053820539205402054120542205432054420545205462054720548205492055020551205522055320554205552055620557205582055920560205612056220563205642056520566205672056820569205702057120572205732057420575205762057720578205792058020581205822058320584205852058620587205882058920590205912059220593205942059520596205972059820599206002060120602206032060420605206062060720608206092061020611206122061320614206152061620617206182061920620206212062220623206242062520626206272062820629206302063120632206332063420635206362063720638206392064020641206422064320644206452064620647206482064920650206512065220653206542065520656206572065820659206602066120662206632066420665206662066720668206692067020671206722067320674206752067620677206782067920680206812068220683206842068520686206872068820689206902069120692206932069420695206962069720698206992070020701207022070320704207052070620707207082070920710207112071220713207142071520716207172071820719207202072120722207232072420725207262072720728207292073020731207322073320734207352073620737207382073920740207412074220743207442074520746207472074820749207502075120752207532075420755207562075720758207592076020761207622076320764207652076620767207682076920770207712077220773207742077520776207772077820779207802078120782207832078420785207862078720788207892079020791207922079320794207952079620797207982079920800208012080220803208042080520806208072080820809208102081120812208132081420815208162081720818208192082020821208222082320824208252082620827208282082920830208312083220833208342083520836208372083820839208402084120842208432084420845208462084720848208492085020851208522085320854208552085620857208582085920860208612086220863208642086520866208672086820869208702087120872208732087420875208762087720878208792088020881208822088320884208852088620887208882088920890208912089220893208942089520896208972089820899209002090120902209032090420905209062090720908209092091020911209122091320914209152091620917209182091920920209212092220923209242092520926209272092820929209302093120932209332093420935209362093720938209392094020941209422094320944209452094620947209482094920950209512095220953209542095520956209572095820959209602096120962209632096420965209662096720968209692097020971209722097320974209752097620977209782097920980209812098220983209842098520986209872098820989209902099120992209932099420995209962099720998209992100021001210022100321004210052100621007210082100921010210112101221013210142101521016210172101821019210202102121022210232102421025210262102721028210292103021031210322103321034210352103621037210382103921040210412104221043210442104521046210472104821049210502105121052210532105421055210562105721058210592106021061210622106321064210652106621067210682106921070210712107221073210742107521076210772107821079210802108121082210832108421085210862108721088210892109021091210922109321094210952109621097210982109921100211012110221103211042110521106211072110821109211102111121112211132111421115211162111721118211192112021121211222112321124211252112621127211282112921130211312113221133211342113521136211372113821139211402114121142211432114421145211462114721148211492115021151211522115321154211552115621157211582115921160211612116221163211642116521166211672116821169211702117121172211732117421175211762117721178211792118021181211822118321184211852118621187211882118921190211912119221193211942119521196211972119821199212002120121202212032120421205212062120721208212092121021211212122121321214212152121621217212182121921220212212122221223212242122521226212272122821229212302123121232212332123421235212362123721238212392124021241212422124321244212452124621247212482124921250212512125221253212542125521256212572125821259212602126121262212632126421265212662126721268212692127021271212722127321274212752127621277212782127921280212812128221283212842128521286212872128821289212902129121292212932129421295212962129721298212992130021301213022130321304213052130621307213082130921310213112131221313213142131521316213172131821319213202132121322213232132421325213262132721328213292133021331213322133321334213352133621337213382133921340213412134221343213442134521346213472134821349213502135121352213532135421355213562135721358213592136021361213622136321364213652136621367213682136921370213712137221373213742137521376213772137821379213802138121382213832138421385213862138721388213892139021391213922139321394213952139621397213982139921400214012140221403214042140521406214072140821409214102141121412214132141421415214162141721418214192142021421214222142321424214252142621427214282142921430214312143221433214342143521436214372143821439214402144121442214432144421445214462144721448214492145021451214522145321454214552145621457214582145921460214612146221463214642146521466214672146821469214702147121472214732147421475214762147721478214792148021481214822148321484214852148621487214882148921490214912149221493214942149521496214972149821499215002150121502215032150421505215062150721508215092151021511215122151321514215152151621517215182151921520215212152221523215242152521526215272152821529215302153121532215332153421535215362153721538215392154021541215422154321544215452154621547215482154921550215512155221553215542155521556215572155821559215602156121562215632156421565215662156721568215692157021571215722157321574215752157621577215782157921580215812158221583215842158521586215872158821589215902159121592215932159421595215962159721598215992160021601216022160321604216052160621607216082160921610216112161221613216142161521616216172161821619216202162121622216232162421625216262162721628216292163021631216322163321634216352163621637216382163921640216412164221643216442164521646216472164821649216502165121652216532165421655216562165721658216592166021661216622166321664216652166621667216682166921670216712167221673216742167521676216772167821679216802168121682216832168421685216862168721688216892169021691216922169321694216952169621697216982169921700217012170221703217042170521706217072170821709217102171121712217132171421715217162171721718217192172021721217222172321724217252172621727217282172921730217312173221733217342173521736217372173821739217402174121742217432174421745217462174721748217492175021751217522175321754217552175621757217582175921760217612176221763217642176521766217672176821769217702177121772217732177421775217762177721778217792178021781217822178321784217852178621787217882178921790217912179221793217942179521796217972179821799218002180121802218032180421805218062180721808218092181021811218122181321814218152181621817218182181921820218212182221823218242182521826218272182821829218302183121832218332183421835218362183721838218392184021841218422184321844218452184621847218482184921850218512185221853218542185521856218572185821859218602186121862218632186421865218662186721868218692187021871218722187321874218752187621877218782187921880218812188221883218842188521886218872188821889218902189121892218932189421895218962189721898218992190021901219022190321904219052190621907219082190921910219112191221913219142191521916219172191821919219202192121922219232192421925219262192721928219292193021931219322193321934219352193621937219382193921940219412194221943219442194521946219472194821949219502195121952219532195421955219562195721958219592196021961219622196321964219652196621967219682196921970219712197221973219742197521976219772197821979219802198121982219832198421985219862198721988219892199021991219922199321994219952199621997219982199922000220012200222003220042200522006220072200822009220102201122012220132201422015220162201722018220192202022021220222202322024220252202622027220282202922030220312203222033220342203522036220372203822039220402204122042220432204422045220462204722048220492205022051220522205322054220552205622057220582205922060220612206222063220642206522066220672206822069220702207122072220732207422075220762207722078220792208022081220822208322084220852208622087220882208922090220912209222093220942209522096220972209822099221002210122102221032210422105221062210722108221092211022111221122211322114221152211622117221182211922120221212212222123221242212522126221272212822129221302213122132221332213422135221362213722138221392214022141221422214322144221452214622147221482214922150221512215222153221542215522156221572215822159221602216122162221632216422165221662216722168221692217022171221722217322174221752217622177221782217922180221812218222183221842218522186221872218822189221902219122192221932219422195221962219722198221992220022201222022220322204222052220622207222082220922210222112221222213222142221522216222172221822219222202222122222222232222422225222262222722228222292223022231222322223322234222352223622237222382223922240222412224222243222442224522246222472224822249222502225122252222532225422255222562225722258222592226022261222622226322264222652226622267222682226922270222712227222273222742227522276222772227822279222802228122282222832228422285222862228722288222892229022291222922229322294222952229622297222982229922300223012230222303223042230522306223072230822309223102231122312223132231422315223162231722318223192232022321223222232322324223252232622327223282232922330223312233222333223342233522336223372233822339223402234122342223432234422345223462234722348223492235022351223522235322354223552235622357223582235922360223612236222363223642236522366223672236822369223702237122372223732237422375223762237722378223792238022381223822238322384223852238622387223882238922390223912239222393223942239522396223972239822399224002240122402224032240422405224062240722408224092241022411224122241322414224152241622417224182241922420224212242222423224242242522426224272242822429224302243122432224332243422435224362243722438224392244022441224422244322444224452244622447224482244922450224512245222453224542245522456224572245822459224602246122462224632246422465224662246722468224692247022471224722247322474224752247622477224782247922480224812248222483224842248522486224872248822489224902249122492224932249422495224962249722498224992250022501225022250322504225052250622507225082250922510225112251222513225142251522516225172251822519225202252122522225232252422525225262252722528225292253022531225322253322534225352253622537225382253922540225412254222543225442254522546225472254822549225502255122552225532255422555225562255722558225592256022561225622256322564225652256622567225682256922570225712257222573225742257522576225772257822579225802258122582225832258422585225862258722588225892259022591225922259322594225952259622597225982259922600226012260222603226042260522606226072260822609226102261122612226132261422615226162261722618226192262022621226222262322624226252262622627226282262922630226312263222633226342263522636226372263822639226402264122642226432264422645226462264722648226492265022651226522265322654226552265622657226582265922660226612266222663226642266522666226672266822669226702267122672226732267422675226762267722678226792268022681226822268322684226852268622687226882268922690226912269222693226942269522696226972269822699227002270122702227032270422705227062270722708227092271022711227122271322714227152271622717227182271922720227212272222723227242272522726227272272822729227302273122732227332273422735227362273722738227392274022741227422274322744227452274622747227482274922750227512275222753227542275522756227572275822759227602276122762227632276422765227662276722768227692277022771227722277322774227752277622777227782277922780227812278222783227842278522786227872278822789227902279122792227932279422795227962279722798227992280022801228022280322804228052280622807228082280922810228112281222813228142281522816228172281822819228202282122822228232282422825228262282722828228292283022831228322283322834228352283622837228382283922840228412284222843228442284522846228472284822849228502285122852228532285422855228562285722858228592286022861228622286322864228652286622867228682286922870228712287222873228742287522876228772287822879228802288122882228832288422885228862288722888228892289022891228922289322894228952289622897228982289922900229012290222903229042290522906229072290822909229102291122912229132291422915229162291722918229192292022921229222292322924229252292622927229282292922930229312293222933229342293522936229372293822939229402294122942229432294422945229462294722948229492295022951229522295322954229552295622957229582295922960229612296222963229642296522966229672296822969229702297122972229732297422975229762297722978229792298022981229822298322984229852298622987229882298922990229912299222993229942299522996229972299822999230002300123002230032300423005230062300723008230092301023011230122301323014230152301623017230182301923020230212302223023230242302523026230272302823029230302303123032230332303423035230362303723038230392304023041230422304323044230452304623047230482304923050230512305223053230542305523056230572305823059230602306123062230632306423065230662306723068230692307023071230722307323074230752307623077230782307923080230812308223083230842308523086230872308823089230902309123092230932309423095230962309723098230992310023101231022310323104231052310623107231082310923110231112311223113231142311523116231172311823119231202312123122231232312423125231262312723128231292313023131231322313323134231352313623137231382313923140231412314223143231442314523146231472314823149231502315123152231532315423155231562315723158231592316023161231622316323164231652316623167231682316923170231712317223173231742317523176231772317823179231802318123182231832318423185231862318723188231892319023191231922319323194231952319623197231982319923200232012320223203232042320523206232072320823209232102321123212232132321423215232162321723218232192322023221232222322323224232252322623227232282322923230232312323223233232342323523236232372323823239232402324123242232432324423245232462324723248232492325023251232522325323254232552325623257232582325923260232612326223263232642326523266232672326823269232702327123272232732327423275232762327723278232792328023281232822328323284232852328623287232882328923290232912329223293232942329523296232972329823299233002330123302233032330423305233062330723308233092331023311233122331323314233152331623317233182331923320233212332223323233242332523326233272332823329233302333123332233332333423335233362333723338233392334023341233422334323344233452334623347233482334923350233512335223353233542335523356233572335823359233602336123362233632336423365233662336723368233692337023371233722337323374233752337623377233782337923380233812338223383233842338523386233872338823389233902339123392233932339423395233962339723398233992340023401234022340323404234052340623407234082340923410234112341223413234142341523416234172341823419234202342123422234232342423425234262342723428234292343023431234322343323434234352343623437234382343923440234412344223443234442344523446234472344823449234502345123452234532345423455234562345723458234592346023461234622346323464234652346623467234682346923470234712347223473234742347523476234772347823479234802348123482234832348423485234862348723488234892349023491234922349323494234952349623497234982349923500235012350223503235042350523506235072350823509235102351123512235132351423515235162351723518235192352023521235222352323524235252352623527235282352923530235312353223533235342353523536235372353823539235402354123542235432354423545235462354723548235492355023551235522355323554235552355623557235582355923560235612356223563235642356523566235672356823569235702357123572235732357423575235762357723578235792358023581235822358323584235852358623587235882358923590235912359223593235942359523596235972359823599236002360123602236032360423605236062360723608236092361023611236122361323614236152361623617236182361923620236212362223623236242362523626236272362823629236302363123632236332363423635236362363723638236392364023641236422364323644236452364623647236482364923650236512365223653236542365523656236572365823659236602366123662236632366423665236662366723668236692367023671236722367323674236752367623677236782367923680236812368223683236842368523686236872368823689236902369123692236932369423695236962369723698236992370023701237022370323704237052370623707237082370923710237112371223713237142371523716237172371823719237202372123722237232372423725237262372723728237292373023731237322373323734237352373623737237382373923740237412374223743237442374523746237472374823749237502375123752237532375423755237562375723758237592376023761237622376323764237652376623767237682376923770237712377223773237742377523776237772377823779237802378123782237832378423785237862378723788237892379023791237922379323794237952379623797237982379923800238012380223803238042380523806238072380823809238102381123812238132381423815238162381723818238192382023821238222382323824238252382623827238282382923830238312383223833238342383523836238372383823839238402384123842238432384423845238462384723848238492385023851238522385323854238552385623857238582385923860238612386223863238642386523866238672386823869238702387123872238732387423875238762387723878238792388023881238822388323884238852388623887238882388923890238912389223893238942389523896238972389823899239002390123902239032390423905239062390723908239092391023911239122391323914239152391623917239182391923920239212392223923239242392523926239272392823929239302393123932239332393423935239362393723938239392394023941239422394323944239452394623947239482394923950239512395223953239542395523956239572395823959239602396123962239632396423965239662396723968239692397023971239722397323974239752397623977239782397923980239812398223983239842398523986239872398823989239902399123992239932399423995239962399723998239992400024001240022400324004240052400624007240082400924010240112401224013240142401524016240172401824019240202402124022240232402424025240262402724028240292403024031240322403324034240352403624037240382403924040240412404224043240442404524046240472404824049240502405124052240532405424055240562405724058240592406024061240622406324064240652406624067240682406924070240712407224073240742407524076240772407824079240802408124082240832408424085240862408724088240892409024091240922409324094240952409624097240982409924100241012410224103241042410524106241072410824109241102411124112241132411424115241162411724118241192412024121241222412324124241252412624127241282412924130241312413224133241342413524136241372413824139241402414124142241432414424145241462414724148241492415024151241522415324154241552415624157241582415924160241612416224163241642416524166241672416824169241702417124172241732417424175241762417724178241792418024181241822418324184241852418624187241882418924190241912419224193241942419524196241972419824199242002420124202242032420424205242062420724208242092421024211242122421324214242152421624217242182421924220242212422224223242242422524226242272422824229242302423124232242332423424235242362423724238242392424024241242422424324244242452424624247242482424924250242512425224253242542425524256242572425824259242602426124262242632426424265242662426724268242692427024271242722427324274242752427624277242782427924280242812428224283242842428524286242872428824289242902429124292242932429424295242962429724298242992430024301243022430324304243052430624307243082430924310243112431224313243142431524316243172431824319243202432124322243232432424325243262432724328243292433024331243322433324334243352433624337243382433924340243412434224343243442434524346243472434824349243502435124352243532435424355243562435724358243592436024361243622436324364243652436624367243682436924370243712437224373243742437524376243772437824379243802438124382243832438424385243862438724388243892439024391243922439324394243952439624397243982439924400244012440224403244042440524406244072440824409244102441124412244132441424415244162441724418244192442024421244222442324424244252442624427244282442924430244312443224433244342443524436244372443824439244402444124442244432444424445244462444724448244492445024451244522445324454244552445624457244582445924460244612446224463244642446524466244672446824469244702447124472244732447424475244762447724478244792448024481244822448324484244852448624487244882448924490244912449224493244942449524496244972449824499245002450124502245032450424505245062450724508245092451024511245122451324514245152451624517245182451924520245212452224523245242452524526245272452824529245302453124532245332453424535245362453724538245392454024541245422454324544245452454624547245482454924550245512455224553245542455524556245572455824559245602456124562245632456424565245662456724568245692457024571245722457324574245752457624577245782457924580245812458224583245842458524586245872458824589245902459124592245932459424595245962459724598245992460024601246022460324604246052460624607246082460924610246112461224613246142461524616246172461824619246202462124622246232462424625246262462724628246292463024631246322463324634246352463624637246382463924640246412464224643246442464524646246472464824649246502465124652246532465424655246562465724658246592466024661246622466324664246652466624667246682466924670246712467224673246742467524676246772467824679246802468124682246832468424685246862468724688246892469024691246922469324694246952469624697246982469924700247012470224703247042470524706247072470824709247102471124712247132471424715247162471724718247192472024721247222472324724247252472624727247282472924730247312473224733247342473524736247372473824739247402474124742247432474424745247462474724748247492475024751247522475324754247552475624757247582475924760247612476224763247642476524766247672476824769247702477124772247732477424775247762477724778247792478024781247822478324784247852478624787247882478924790247912479224793247942479524796247972479824799248002480124802248032480424805248062480724808248092481024811248122481324814248152481624817248182481924820248212482224823248242482524826248272482824829248302483124832248332483424835248362483724838248392484024841248422484324844248452484624847248482484924850248512485224853248542485524856248572485824859248602486124862248632486424865248662486724868248692487024871248722487324874248752487624877248782487924880248812488224883248842488524886248872488824889248902489124892248932489424895248962489724898248992490024901249022490324904249052490624907249082490924910249112491224913249142491524916249172491824919249202492124922249232492424925249262492724928249292493024931249322493324934249352493624937249382493924940249412494224943249442494524946249472494824949249502495124952249532495424955249562495724958249592496024961249622496324964249652496624967249682496924970249712497224973249742497524976249772497824979249802498124982249832498424985249862498724988249892499024991249922499324994249952499624997249982499925000250012500225003250042500525006250072500825009250102501125012250132501425015250162501725018250192502025021250222502325024250252502625027250282502925030250312503225033250342503525036250372503825039250402504125042250432504425045250462504725048250492505025051250522505325054250552505625057250582505925060250612506225063250642506525066250672506825069250702507125072250732507425075250762507725078250792508025081250822508325084250852508625087250882508925090250912509225093250942509525096250972509825099251002510125102251032510425105251062510725108251092511025111251122511325114251152511625117251182511925120251212512225123251242512525126251272512825129251302513125132251332513425135251362513725138251392514025141251422514325144251452514625147251482514925150251512515225153251542515525156251572515825159251602516125162251632516425165251662516725168251692517025171251722517325174251752517625177251782517925180251812518225183251842518525186251872518825189251902519125192251932519425195251962519725198251992520025201252022520325204252052520625207252082520925210252112521225213252142521525216252172521825219252202522125222252232522425225252262522725228252292523025231252322523325234252352523625237252382523925240252412524225243252442524525246252472524825249252502525125252252532525425255252562525725258252592526025261252622526325264252652526625267252682526925270252712527225273252742527525276252772527825279252802528125282252832528425285252862528725288252892529025291252922529325294252952529625297252982529925300253012530225303253042530525306253072530825309253102531125312253132531425315253162531725318253192532025321253222532325324253252532625327253282532925330253312533225333253342533525336253372533825339253402534125342253432534425345253462534725348253492535025351253522535325354253552535625357253582535925360253612536225363253642536525366253672536825369253702537125372253732537425375253762537725378253792538025381253822538325384253852538625387253882538925390253912539225393253942539525396253972539825399254002540125402254032540425405254062540725408254092541025411254122541325414254152541625417254182541925420254212542225423254242542525426254272542825429254302543125432254332543425435254362543725438254392544025441254422544325444254452544625447254482544925450254512545225453254542545525456254572545825459254602546125462254632546425465254662546725468254692547025471254722547325474254752547625477254782547925480254812548225483254842548525486254872548825489254902549125492254932549425495254962549725498254992550025501255022550325504255052550625507255082550925510255112551225513255142551525516255172551825519255202552125522255232552425525255262552725528255292553025531255322553325534255352553625537255382553925540255412554225543255442554525546255472554825549255502555125552255532555425555255562555725558255592556025561255622556325564255652556625567255682556925570255712557225573255742557525576255772557825579255802558125582255832558425585255862558725588255892559025591255922559325594255952559625597255982559925600256012560225603256042560525606256072560825609256102561125612256132561425615256162561725618256192562025621256222562325624256252562625627256282562925630256312563225633256342563525636256372563825639256402564125642256432564425645256462564725648256492565025651256522565325654256552565625657256582565925660256612566225663256642566525666256672566825669256702567125672256732567425675256762567725678256792568025681256822568325684256852568625687256882568925690256912569225693256942569525696256972569825699257002570125702257032570425705257062570725708257092571025711257122571325714257152571625717257182571925720257212572225723257242572525726257272572825729257302573125732257332573425735257362573725738257392574025741257422574325744257452574625747257482574925750257512575225753257542575525756257572575825759257602576125762257632576425765257662576725768257692577025771257722577325774257752577625777257782577925780257812578225783257842578525786257872578825789257902579125792257932579425795257962579725798257992580025801258022580325804258052580625807258082580925810258112581225813258142581525816258172581825819258202582125822258232582425825258262582725828258292583025831258322583325834258352583625837258382583925840258412584225843258442584525846258472584825849258502585125852258532585425855258562585725858258592586025861258622586325864258652586625867258682586925870258712587225873258742587525876258772587825879258802588125882258832588425885258862588725888258892589025891258922589325894258952589625897258982589925900259012590225903259042590525906259072590825909259102591125912259132591425915259162591725918259192592025921259222592325924259252592625927259282592925930259312593225933259342593525936259372593825939259402594125942259432594425945259462594725948259492595025951259522595325954259552595625957259582595925960259612596225963259642596525966259672596825969259702597125972259732597425975259762597725978259792598025981259822598325984259852598625987259882598925990259912599225993259942599525996259972599825999260002600126002260032600426005260062600726008260092601026011260122601326014260152601626017260182601926020260212602226023260242602526026260272602826029260302603126032260332603426035260362603726038260392604026041260422604326044260452604626047260482604926050260512605226053260542605526056260572605826059260602606126062260632606426065260662606726068260692607026071260722607326074260752607626077260782607926080260812608226083260842608526086260872608826089260902609126092260932609426095260962609726098260992610026101261022610326104261052610626107261082610926110261112611226113261142611526116261172611826119261202612126122261232612426125261262612726128261292613026131261322613326134261352613626137261382613926140261412614226143261442614526146261472614826149261502615126152261532615426155261562615726158261592616026161261622616326164261652616626167261682616926170261712617226173261742617526176261772617826179261802618126182261832618426185261862618726188261892619026191261922619326194261952619626197261982619926200262012620226203262042620526206262072620826209262102621126212262132621426215262162621726218262192622026221262222622326224262252622626227262282622926230262312623226233262342623526236262372623826239262402624126242262432624426245262462624726248262492625026251262522625326254262552625626257262582625926260262612626226263262642626526266262672626826269262702627126272262732627426275262762627726278262792628026281262822628326284262852628626287262882628926290262912629226293262942629526296262972629826299263002630126302263032630426305263062630726308263092631026311263122631326314263152631626317263182631926320263212632226323263242632526326263272632826329263302633126332263332633426335263362633726338263392634026341263422634326344263452634626347263482634926350263512635226353263542635526356263572635826359263602636126362263632636426365263662636726368263692637026371263722637326374263752637626377263782637926380263812638226383263842638526386263872638826389263902639126392263932639426395263962639726398263992640026401264022640326404264052640626407264082640926410264112641226413264142641526416264172641826419264202642126422264232642426425264262642726428264292643026431264322643326434264352643626437264382643926440264412644226443264442644526446264472644826449264502645126452264532645426455264562645726458264592646026461264622646326464264652646626467264682646926470264712647226473264742647526476264772647826479264802648126482264832648426485264862648726488264892649026491264922649326494264952649626497264982649926500265012650226503265042650526506265072650826509265102651126512265132651426515265162651726518265192652026521265222652326524265252652626527265282652926530265312653226533265342653526536265372653826539265402654126542265432654426545265462654726548265492655026551265522655326554265552655626557265582655926560265612656226563265642656526566265672656826569265702657126572265732657426575265762657726578265792658026581265822658326584265852658626587265882658926590265912659226593265942659526596265972659826599266002660126602266032660426605266062660726608266092661026611266122661326614266152661626617266182661926620266212662226623266242662526626266272662826629266302663126632266332663426635266362663726638266392664026641266422664326644266452664626647266482664926650266512665226653266542665526656266572665826659266602666126662266632666426665266662666726668266692667026671266722667326674266752667626677266782667926680266812668226683266842668526686266872668826689266902669126692266932669426695266962669726698266992670026701267022670326704267052670626707267082670926710267112671226713267142671526716267172671826719267202672126722267232672426725267262672726728267292673026731267322673326734267352673626737267382673926740267412674226743267442674526746267472674826749267502675126752267532675426755267562675726758267592676026761267622676326764267652676626767267682676926770267712677226773267742677526776267772677826779267802678126782267832678426785267862678726788267892679026791267922679326794267952679626797267982679926800268012680226803268042680526806268072680826809268102681126812268132681426815268162681726818268192682026821268222682326824268252682626827268282682926830268312683226833268342683526836268372683826839268402684126842268432684426845268462684726848268492685026851268522685326854268552685626857268582685926860268612686226863268642686526866268672686826869268702687126872268732687426875268762687726878268792688026881268822688326884268852688626887268882688926890268912689226893268942689526896268972689826899269002690126902269032690426905269062690726908269092691026911269122691326914269152691626917269182691926920269212692226923269242692526926269272692826929269302693126932269332693426935269362693726938269392694026941269422694326944269452694626947269482694926950269512695226953269542695526956269572695826959269602696126962269632696426965269662696726968269692697026971269722697326974269752697626977269782697926980269812698226983269842698526986269872698826989269902699126992269932699426995269962699726998269992700027001270022700327004270052700627007270082700927010270112701227013270142701527016270172701827019270202702127022270232702427025270262702727028270292703027031270322703327034270352703627037270382703927040270412704227043270442704527046270472704827049270502705127052270532705427055270562705727058270592706027061270622706327064270652706627067270682706927070270712707227073270742707527076270772707827079270802708127082270832708427085270862708727088270892709027091270922709327094270952709627097270982709927100271012710227103271042710527106271072710827109271102711127112271132711427115271162711727118271192712027121271222712327124271252712627127271282712927130271312713227133271342713527136271372713827139271402714127142271432714427145271462714727148271492715027151271522715327154271552715627157271582715927160271612716227163271642716527166271672716827169271702717127172271732717427175271762717727178271792718027181271822718327184271852718627187271882718927190271912719227193271942719527196271972719827199272002720127202272032720427205272062720727208272092721027211272122721327214272152721627217272182721927220272212722227223272242722527226272272722827229272302723127232272332723427235272362723727238272392724027241272422724327244272452724627247272482724927250272512725227253272542725527256272572725827259272602726127262272632726427265272662726727268272692727027271272722727327274272752727627277272782727927280272812728227283272842728527286272872728827289272902729127292272932729427295272962729727298272992730027301273022730327304273052730627307273082730927310273112731227313273142731527316273172731827319273202732127322273232732427325273262732727328273292733027331273322733327334273352733627337273382733927340273412734227343273442734527346273472734827349273502735127352273532735427355273562735727358273592736027361273622736327364273652736627367273682736927370273712737227373273742737527376273772737827379273802738127382273832738427385273862738727388273892739027391273922739327394273952739627397273982739927400274012740227403274042740527406274072740827409274102741127412274132741427415274162741727418274192742027421274222742327424274252742627427274282742927430274312743227433274342743527436274372743827439274402744127442274432744427445274462744727448274492745027451274522745327454274552745627457274582745927460274612746227463274642746527466274672746827469274702747127472274732747427475274762747727478274792748027481274822748327484274852748627487274882748927490274912749227493274942749527496274972749827499275002750127502275032750427505275062750727508275092751027511275122751327514275152751627517275182751927520275212752227523275242752527526275272752827529275302753127532275332753427535275362753727538275392754027541275422754327544275452754627547275482754927550275512755227553275542755527556275572755827559275602756127562275632756427565275662756727568275692757027571275722757327574275752757627577275782757927580275812758227583275842758527586275872758827589275902759127592275932759427595275962759727598275992760027601276022760327604276052760627607276082760927610276112761227613276142761527616276172761827619276202762127622276232762427625276262762727628276292763027631276322763327634276352763627637276382763927640276412764227643276442764527646276472764827649276502765127652276532765427655276562765727658276592766027661276622766327664276652766627667276682766927670276712767227673276742767527676276772767827679276802768127682276832768427685276862768727688276892769027691276922769327694276952769627697276982769927700277012770227703277042770527706277072770827709277102771127712277132771427715277162771727718277192772027721277222772327724277252772627727277282772927730277312773227733277342773527736277372773827739277402774127742277432774427745277462774727748277492775027751277522775327754277552775627757277582775927760277612776227763277642776527766277672776827769277702777127772277732777427775277762777727778277792778027781277822778327784277852778627787277882778927790277912779227793277942779527796277972779827799278002780127802278032780427805278062780727808278092781027811278122781327814278152781627817278182781927820278212782227823278242782527826278272782827829278302783127832278332783427835278362783727838278392784027841278422784327844278452784627847278482784927850278512785227853278542785527856278572785827859278602786127862278632786427865278662786727868278692787027871278722787327874278752787627877278782787927880278812788227883278842788527886278872788827889278902789127892278932789427895278962789727898278992790027901279022790327904279052790627907279082790927910279112791227913279142791527916279172791827919279202792127922279232792427925279262792727928279292793027931279322793327934279352793627937279382793927940279412794227943279442794527946279472794827949279502795127952279532795427955279562795727958279592796027961279622796327964279652796627967279682796927970279712797227973279742797527976279772797827979279802798127982279832798427985279862798727988279892799027991279922799327994279952799627997279982799928000280012800228003280042800528006280072800828009280102801128012280132801428015280162801728018280192802028021280222802328024280252802628027280282802928030280312803228033280342803528036280372803828039280402804128042280432804428045280462804728048280492805028051280522805328054280552805628057280582805928060280612806228063280642806528066280672806828069280702807128072280732807428075280762807728078280792808028081280822808328084280852808628087280882808928090280912809228093280942809528096280972809828099281002810128102281032810428105281062810728108281092811028111281122811328114281152811628117281182811928120281212812228123281242812528126281272812828129281302813128132281332813428135281362813728138281392814028141281422814328144281452814628147281482814928150281512815228153281542815528156281572815828159281602816128162281632816428165281662816728168281692817028171281722817328174281752817628177281782817928180281812818228183281842818528186281872818828189281902819128192281932819428195281962819728198281992820028201282022820328204282052820628207282082820928210282112821228213282142821528216282172821828219282202822128222282232822428225282262822728228282292823028231282322823328234282352823628237282382823928240282412824228243282442824528246282472824828249282502825128252282532825428255282562825728258282592826028261282622826328264282652826628267282682826928270282712827228273282742827528276282772827828279282802828128282282832828428285282862828728288282892829028291282922829328294282952829628297282982829928300283012830228303283042830528306283072830828309283102831128312283132831428315283162831728318283192832028321283222832328324283252832628327283282832928330283312833228333283342833528336283372833828339283402834128342283432834428345283462834728348283492835028351283522835328354283552835628357283582835928360283612836228363283642836528366283672836828369283702837128372283732837428375283762837728378283792838028381283822838328384283852838628387283882838928390283912839228393283942839528396283972839828399284002840128402284032840428405284062840728408284092841028411284122841328414284152841628417284182841928420284212842228423284242842528426284272842828429284302843128432284332843428435284362843728438284392844028441284422844328444284452844628447284482844928450284512845228453284542845528456284572845828459284602846128462284632846428465284662846728468284692847028471284722847328474284752847628477284782847928480284812848228483284842848528486284872848828489284902849128492284932849428495284962849728498284992850028501285022850328504285052850628507285082850928510285112851228513285142851528516285172851828519285202852128522285232852428525285262852728528285292853028531285322853328534285352853628537285382853928540285412854228543285442854528546285472854828549285502855128552285532855428555285562855728558285592856028561285622856328564285652856628567285682856928570285712857228573285742857528576285772857828579285802858128582285832858428585285862858728588285892859028591285922859328594285952859628597285982859928600286012860228603286042860528606286072860828609286102861128612286132861428615286162861728618286192862028621286222862328624286252862628627286282862928630286312863228633286342863528636286372863828639286402864128642286432864428645286462864728648286492865028651286522865328654286552865628657286582865928660286612866228663286642866528666286672866828669286702867128672286732867428675286762867728678286792868028681286822868328684286852868628687286882868928690286912869228693286942869528696286972869828699287002870128702287032870428705287062870728708287092871028711287122871328714287152871628717287182871928720287212872228723287242872528726287272872828729287302873128732287332873428735287362873728738287392874028741287422874328744287452874628747287482874928750287512875228753287542875528756287572875828759287602876128762287632876428765287662876728768287692877028771287722877328774287752877628777287782877928780287812878228783287842878528786287872878828789287902879128792287932879428795287962879728798287992880028801288022880328804288052880628807288082880928810288112881228813288142881528816288172881828819288202882128822288232882428825288262882728828288292883028831288322883328834288352883628837288382883928840288412884228843288442884528846288472884828849288502885128852288532885428855288562885728858288592886028861288622886328864288652886628867288682886928870288712887228873288742887528876288772887828879288802888128882288832888428885288862888728888288892889028891288922889328894288952889628897288982889928900289012890228903289042890528906289072890828909289102891128912289132891428915289162891728918289192892028921289222892328924289252892628927289282892928930289312893228933289342893528936289372893828939289402894128942289432894428945289462894728948289492895028951289522895328954289552895628957289582895928960289612896228963289642896528966289672896828969289702897128972289732897428975289762897728978289792898028981289822898328984289852898628987289882898928990289912899228993289942899528996289972899828999290002900129002290032900429005290062900729008290092901029011290122901329014290152901629017290182901929020290212902229023290242902529026290272902829029290302903129032290332903429035290362903729038290392904029041290422904329044290452904629047290482904929050290512905229053290542905529056290572905829059290602906129062290632906429065290662906729068290692907029071290722907329074290752907629077290782907929080290812908229083290842908529086290872908829089290902909129092290932909429095290962909729098290992910029101291022910329104291052910629107291082910929110291112911229113291142911529116291172911829119291202912129122291232912429125291262912729128291292913029131291322913329134291352913629137291382913929140291412914229143291442914529146291472914829149291502915129152291532915429155291562915729158291592916029161291622916329164291652916629167291682916929170291712917229173291742917529176291772917829179291802918129182291832918429185291862918729188291892919029191291922919329194291952919629197291982919929200292012920229203292042920529206292072920829209292102921129212292132921429215292162921729218292192922029221292222922329224292252922629227292282922929230292312923229233292342923529236292372923829239292402924129242292432924429245292462924729248292492925029251292522925329254292552925629257292582925929260292612926229263292642926529266292672926829269292702927129272292732927429275292762927729278292792928029281292822928329284292852928629287292882928929290292912929229293292942929529296292972929829299293002930129302293032930429305293062930729308293092931029311293122931329314293152931629317293182931929320293212932229323293242932529326293272932829329293302933129332293332933429335293362933729338293392934029341293422934329344293452934629347293482934929350293512935229353293542935529356293572935829359293602936129362293632936429365293662936729368293692937029371293722937329374293752937629377293782937929380293812938229383293842938529386293872938829389293902939129392293932939429395293962939729398293992940029401294022940329404294052940629407294082940929410294112941229413294142941529416294172941829419294202942129422294232942429425294262942729428294292943029431294322943329434294352943629437294382943929440294412944229443294442944529446294472944829449294502945129452294532945429455294562945729458294592946029461294622946329464294652946629467294682946929470294712947229473294742947529476294772947829479294802948129482294832948429485294862948729488294892949029491294922949329494294952949629497294982949929500295012950229503295042950529506295072950829509295102951129512295132951429515295162951729518295192952029521295222952329524295252952629527295282952929530295312953229533295342953529536295372953829539295402954129542295432954429545295462954729548295492955029551295522955329554295552955629557295582955929560295612956229563295642956529566295672956829569295702957129572295732957429575295762957729578295792958029581295822958329584295852958629587295882958929590295912959229593295942959529596295972959829599296002960129602296032960429605296062960729608296092961029611296122961329614296152961629617296182961929620296212962229623296242962529626296272962829629296302963129632296332963429635296362963729638296392964029641296422964329644296452964629647296482964929650296512965229653296542965529656296572965829659296602966129662296632966429665296662966729668296692967029671296722967329674296752967629677296782967929680296812968229683296842968529686296872968829689296902969129692296932969429695296962969729698296992970029701297022970329704297052970629707297082970929710297112971229713297142971529716297172971829719297202972129722297232972429725297262972729728297292973029731297322973329734297352973629737297382973929740297412974229743297442974529746297472974829749297502975129752297532975429755297562975729758297592976029761297622976329764297652976629767297682976929770297712977229773297742977529776297772977829779297802978129782297832978429785297862978729788297892979029791297922979329794297952979629797297982979929800298012980229803298042980529806298072980829809298102981129812298132981429815298162981729818298192982029821298222982329824298252982629827298282982929830298312983229833298342983529836298372983829839298402984129842298432984429845298462984729848298492985029851298522985329854298552985629857298582985929860298612986229863298642986529866298672986829869298702987129872298732987429875298762987729878298792988029881298822988329884298852988629887298882988929890298912989229893298942989529896298972989829899299002990129902299032990429905299062990729908299092991029911299122991329914299152991629917299182991929920299212992229923299242992529926299272992829929299302993129932299332993429935299362993729938299392994029941299422994329944299452994629947299482994929950299512995229953299542995529956299572995829959299602996129962299632996429965299662996729968299692997029971299722997329974299752997629977299782997929980299812998229983299842998529986299872998829989299902999129992299932999429995299962999729998299993000030001300023000330004300053000630007300083000930010300113001230013300143001530016300173001830019300203002130022300233002430025300263002730028300293003030031300323003330034300353003630037300383003930040300413004230043300443004530046300473004830049300503005130052300533005430055300563005730058300593006030061300623006330064300653006630067300683006930070300713007230073300743007530076300773007830079300803008130082300833008430085300863008730088300893009030091300923009330094300953009630097300983009930100301013010230103301043010530106301073010830109301103011130112301133011430115301163011730118301193012030121301223012330124301253012630127301283012930130301313013230133301343013530136301373013830139301403014130142301433014430145301463014730148301493015030151301523015330154301553015630157301583015930160301613016230163301643016530166301673016830169301703017130172301733017430175301763017730178301793018030181301823018330184301853018630187301883018930190301913019230193301943019530196301973019830199302003020130202302033020430205302063020730208302093021030211302123021330214302153021630217302183021930220302213022230223302243022530226302273022830229302303023130232302333023430235302363023730238302393024030241302423024330244302453024630247302483024930250302513025230253302543025530256302573025830259302603026130262302633026430265302663026730268302693027030271302723027330274302753027630277302783027930280302813028230283302843028530286302873028830289302903029130292302933029430295302963029730298302993030030301303023030330304303053030630307303083030930310303113031230313303143031530316303173031830319303203032130322303233032430325303263032730328303293033030331303323033330334303353033630337303383033930340303413034230343303443034530346303473034830349303503035130352303533035430355303563035730358303593036030361303623036330364303653036630367303683036930370303713037230373303743037530376303773037830379303803038130382303833038430385303863038730388303893039030391303923039330394303953039630397303983039930400304013040230403304043040530406304073040830409304103041130412304133041430415304163041730418304193042030421304223042330424304253042630427304283042930430304313043230433304343043530436304373043830439304403044130442304433044430445304463044730448304493045030451304523045330454304553045630457304583045930460304613046230463304643046530466304673046830469304703047130472304733047430475304763047730478304793048030481304823048330484304853048630487304883048930490304913049230493304943049530496304973049830499305003050130502305033050430505305063050730508305093051030511305123051330514305153051630517305183051930520305213052230523305243052530526305273052830529305303053130532305333053430535305363053730538305393054030541305423054330544305453054630547305483054930550305513055230553305543055530556305573055830559305603056130562305633056430565305663056730568305693057030571305723057330574305753057630577305783057930580305813058230583305843058530586305873058830589305903059130592305933059430595305963059730598305993060030601306023060330604306053060630607306083060930610306113061230613306143061530616306173061830619306203062130622306233062430625306263062730628306293063030631306323063330634306353063630637306383063930640306413064230643306443064530646306473064830649306503065130652306533065430655306563065730658306593066030661306623066330664306653066630667306683066930670306713067230673306743067530676306773067830679306803068130682306833068430685306863068730688306893069030691306923069330694306953069630697306983069930700307013070230703307043070530706307073070830709307103071130712307133071430715307163071730718307193072030721307223072330724307253072630727307283072930730307313073230733307343073530736307373073830739307403074130742307433074430745307463074730748307493075030751307523075330754307553075630757307583075930760307613076230763307643076530766307673076830769307703077130772307733077430775307763077730778307793078030781307823078330784307853078630787307883078930790307913079230793307943079530796307973079830799308003080130802308033080430805308063080730808308093081030811308123081330814308153081630817308183081930820308213082230823308243082530826308273082830829308303083130832308333083430835308363083730838308393084030841308423084330844308453084630847308483084930850308513085230853308543085530856308573085830859308603086130862308633086430865308663086730868308693087030871308723087330874308753087630877308783087930880308813088230883308843088530886308873088830889308903089130892308933089430895308963089730898308993090030901309023090330904309053090630907309083090930910309113091230913309143091530916309173091830919309203092130922309233092430925309263092730928309293093030931309323093330934309353093630937309383093930940309413094230943309443094530946309473094830949309503095130952309533095430955309563095730958309593096030961309623096330964309653096630967309683096930970309713097230973309743097530976309773097830979309803098130982309833098430985309863098730988309893099030991309923099330994309953099630997309983099931000310013100231003310043100531006310073100831009310103101131012310133101431015310163101731018310193102031021310223102331024310253102631027310283102931030310313103231033310343103531036310373103831039310403104131042310433104431045310463104731048310493105031051310523105331054310553105631057310583105931060310613106231063310643106531066310673106831069310703107131072310733107431075310763107731078310793108031081310823108331084310853108631087310883108931090310913109231093310943109531096310973109831099311003110131102311033110431105311063110731108311093111031111311123111331114311153111631117311183111931120311213112231123311243112531126311273112831129311303113131132311333113431135311363113731138311393114031141311423114331144311453114631147311483114931150311513115231153311543115531156311573115831159311603116131162311633116431165311663116731168311693117031171311723117331174311753117631177311783117931180311813118231183311843118531186311873118831189311903119131192311933119431195311963119731198311993120031201312023120331204312053120631207312083120931210312113121231213312143121531216312173121831219312203122131222312233122431225312263122731228312293123031231312323123331234312353123631237312383123931240312413124231243312443124531246312473124831249312503125131252312533125431255312563125731258312593126031261312623126331264312653126631267312683126931270312713127231273312743127531276312773127831279312803128131282312833128431285312863128731288312893129031291312923129331294312953129631297312983129931300313013130231303313043130531306313073130831309313103131131312313133131431315313163131731318313193132031321313223132331324313253132631327313283132931330313313133231333313343133531336313373133831339313403134131342313433134431345313463134731348313493135031351313523135331354313553135631357313583135931360313613136231363313643136531366313673136831369313703137131372313733137431375313763137731378313793138031381313823138331384313853138631387313883138931390313913139231393313943139531396313973139831399314003140131402314033140431405314063140731408314093141031411314123141331414314153141631417314183141931420314213142231423314243142531426314273142831429314303143131432314333143431435314363143731438314393144031441314423144331444314453144631447314483144931450314513145231453314543145531456314573145831459314603146131462314633146431465314663146731468314693147031471314723147331474314753147631477314783147931480314813148231483314843148531486314873148831489314903149131492314933149431495314963149731498314993150031501315023150331504315053150631507315083150931510315113151231513315143151531516315173151831519315203152131522315233152431525315263152731528315293153031531315323153331534315353153631537315383153931540315413154231543315443154531546315473154831549315503155131552315533155431555315563155731558315593156031561315623156331564315653156631567315683156931570315713157231573315743157531576315773157831579315803158131582315833158431585315863158731588315893159031591315923159331594315953159631597315983159931600316013160231603316043160531606316073160831609316103161131612316133161431615316163161731618316193162031621316223162331624316253162631627316283162931630316313163231633316343163531636316373163831639316403164131642316433164431645316463164731648316493165031651316523165331654316553165631657316583165931660316613166231663316643166531666316673166831669316703167131672316733167431675316763167731678316793168031681316823168331684316853168631687316883168931690316913169231693316943169531696316973169831699317003170131702317033170431705317063170731708317093171031711317123171331714317153171631717317183171931720317213172231723317243172531726317273172831729317303173131732317333173431735317363173731738317393174031741317423174331744317453174631747317483174931750317513175231753317543175531756317573175831759317603176131762317633176431765317663176731768317693177031771317723177331774317753177631777317783177931780317813178231783317843178531786317873178831789317903179131792317933179431795317963179731798317993180031801318023180331804318053180631807318083180931810318113181231813318143181531816318173181831819318203182131822318233182431825318263182731828318293183031831318323183331834318353183631837318383183931840318413184231843318443184531846318473184831849318503185131852318533185431855318563185731858318593186031861318623186331864318653186631867318683186931870318713187231873318743187531876318773187831879318803188131882318833188431885318863188731888318893189031891318923189331894318953189631897318983189931900319013190231903319043190531906319073190831909319103191131912319133191431915319163191731918319193192031921319223192331924319253192631927319283192931930319313193231933319343193531936319373193831939319403194131942319433194431945319463194731948319493195031951319523195331954319553195631957319583195931960319613196231963319643196531966319673196831969319703197131972319733197431975319763197731978319793198031981319823198331984319853198631987319883198931990319913199231993319943199531996319973199831999320003200132002320033200432005320063200732008320093201032011320123201332014320153201632017320183201932020320213202232023320243202532026320273202832029320303203132032320333203432035320363203732038320393204032041320423204332044320453204632047320483204932050320513205232053320543205532056320573205832059320603206132062320633206432065320663206732068320693207032071320723207332074320753207632077320783207932080320813208232083320843208532086320873208832089320903209132092320933209432095320963209732098320993210032101321023210332104321053210632107321083210932110321113211232113321143211532116321173211832119321203212132122321233212432125321263212732128321293213032131321323213332134321353213632137321383213932140321413214232143321443214532146321473214832149321503215132152321533215432155321563215732158321593216032161321623216332164321653216632167321683216932170321713217232173321743217532176321773217832179321803218132182321833218432185321863218732188321893219032191321923219332194321953219632197321983219932200322013220232203322043220532206322073220832209322103221132212322133221432215322163221732218322193222032221322223222332224322253222632227322283222932230322313223232233322343223532236322373223832239322403224132242322433224432245322463224732248322493225032251322523225332254322553225632257322583225932260322613226232263322643226532266322673226832269322703227132272322733227432275322763227732278322793228032281322823228332284322853228632287322883228932290322913229232293322943229532296322973229832299323003230132302323033230432305323063230732308323093231032311323123231332314323153231632317323183231932320323213232232323323243232532326323273232832329323303233132332323333233432335323363233732338323393234032341323423234332344323453234632347323483234932350323513235232353323543235532356323573235832359323603236132362323633236432365323663236732368323693237032371323723237332374323753237632377323783237932380323813238232383323843238532386323873238832389323903239132392323933239432395323963239732398323993240032401324023240332404324053240632407324083240932410324113241232413324143241532416324173241832419324203242132422324233242432425324263242732428324293243032431324323243332434324353243632437324383243932440324413244232443324443244532446324473244832449324503245132452324533245432455324563245732458324593246032461324623246332464324653246632467324683246932470324713247232473324743247532476324773247832479324803248132482324833248432485324863248732488324893249032491324923249332494324953249632497324983249932500325013250232503325043250532506325073250832509325103251132512325133251432515325163251732518325193252032521325223252332524325253252632527325283252932530325313253232533325343253532536325373253832539325403254132542325433254432545325463254732548325493255032551325523255332554325553255632557325583255932560325613256232563325643256532566325673256832569325703257132572325733257432575325763257732578325793258032581325823258332584325853258632587325883258932590325913259232593325943259532596325973259832599326003260132602326033260432605326063260732608326093261032611326123261332614326153261632617326183261932620326213262232623326243262532626326273262832629326303263132632326333263432635326363263732638326393264032641326423264332644326453264632647326483264932650326513265232653326543265532656326573265832659326603266132662326633266432665326663266732668326693267032671326723267332674326753267632677326783267932680326813268232683326843268532686326873268832689326903269132692326933269432695326963269732698326993270032701327023270332704327053270632707327083270932710327113271232713327143271532716327173271832719327203272132722327233272432725327263272732728327293273032731327323273332734327353273632737327383273932740327413274232743327443274532746327473274832749327503275132752327533275432755327563275732758327593276032761327623276332764327653276632767327683276932770327713277232773327743277532776327773277832779327803278132782327833278432785327863278732788327893279032791327923279332794327953279632797327983279932800328013280232803328043280532806328073280832809328103281132812328133281432815328163281732818328193282032821328223282332824328253282632827328283282932830328313283232833328343283532836328373283832839328403284132842328433284432845328463284732848328493285032851328523285332854328553285632857328583285932860328613286232863328643286532866328673286832869328703287132872328733287432875328763287732878328793288032881328823288332884328853288632887328883288932890328913289232893328943289532896328973289832899329003290132902329033290432905329063290732908329093291032911329123291332914329153291632917329183291932920329213292232923329243292532926329273292832929329303293132932329333293432935329363293732938329393294032941329423294332944329453294632947329483294932950329513295232953329543295532956329573295832959329603296132962329633296432965329663296732968329693297032971329723297332974329753297632977329783297932980329813298232983329843298532986329873298832989329903299132992329933299432995329963299732998329993300033001330023300333004330053300633007330083300933010330113301233013330143301533016330173301833019330203302133022330233302433025330263302733028330293303033031330323303333034330353303633037330383303933040330413304233043330443304533046330473304833049330503305133052330533305433055330563305733058330593306033061330623306333064330653306633067330683306933070330713307233073330743307533076330773307833079330803308133082330833308433085330863308733088330893309033091330923309333094330953309633097330983309933100331013310233103331043310533106331073310833109331103311133112331133311433115331163311733118331193312033121331223312333124331253312633127331283312933130331313313233133331343313533136331373313833139331403314133142331433314433145331463314733148331493315033151331523315333154331553315633157331583315933160331613316233163331643316533166331673316833169331703317133172331733317433175331763317733178331793318033181331823318333184331853318633187331883318933190331913319233193331943319533196331973319833199332003320133202332033320433205332063320733208332093321033211332123321333214332153321633217332183321933220332213322233223332243322533226332273322833229332303323133232332333323433235332363323733238332393324033241332423324333244332453324633247332483324933250332513325233253332543325533256332573325833259332603326133262332633326433265332663326733268332693327033271332723327333274332753327633277332783327933280332813328233283332843328533286332873328833289332903329133292332933329433295332963329733298332993330033301333023330333304333053330633307333083330933310333113331233313333143331533316333173331833319333203332133322333233332433325333263332733328333293333033331333323333333334333353333633337333383333933340333413334233343333443334533346333473334833349333503335133352333533335433355333563335733358333593336033361333623336333364333653336633367333683336933370333713337233373333743337533376333773337833379333803338133382333833338433385333863338733388333893339033391333923339333394333953339633397333983339933400334013340233403334043340533406334073340833409334103341133412334133341433415334163341733418334193342033421334223342333424334253342633427334283342933430334313343233433334343343533436334373343833439334403344133442334433344433445334463344733448334493345033451334523345333454334553345633457334583345933460334613346233463334643346533466334673346833469334703347133472334733347433475334763347733478334793348033481334823348333484334853348633487334883348933490334913349233493334943349533496334973349833499335003350133502335033350433505335063350733508335093351033511335123351333514335153351633517335183351933520335213352233523335243352533526335273352833529335303353133532335333353433535335363353733538335393354033541335423354333544335453354633547335483354933550335513355233553335543355533556335573355833559335603356133562335633356433565335663356733568335693357033571335723357333574335753357633577335783357933580335813358233583335843358533586335873358833589335903359133592335933359433595335963359733598335993360033601336023360333604336053360633607336083360933610336113361233613336143361533616336173361833619336203362133622336233362433625336263362733628336293363033631336323363333634336353363633637336383363933640336413364233643336443364533646336473364833649336503365133652336533365433655336563365733658336593366033661336623366333664336653366633667336683366933670336713367233673336743367533676336773367833679336803368133682336833368433685336863368733688336893369033691336923369333694336953369633697336983369933700337013370233703337043370533706337073370833709337103371133712337133371433715337163371733718337193372033721337223372333724337253372633727337283372933730337313373233733337343373533736337373373833739337403374133742337433374433745337463374733748337493375033751337523375333754337553375633757337583375933760337613376233763337643376533766337673376833769337703377133772337733377433775337763377733778337793378033781337823378333784337853378633787337883378933790337913379233793337943379533796337973379833799338003380133802338033380433805338063380733808338093381033811338123381333814338153381633817338183381933820338213382233823338243382533826338273382833829338303383133832338333383433835338363383733838338393384033841338423384333844338453384633847338483384933850338513385233853338543385533856338573385833859338603386133862338633386433865338663386733868338693387033871338723387333874338753387633877338783387933880338813388233883338843388533886338873388833889338903389133892338933389433895338963389733898338993390033901339023390333904339053390633907339083390933910339113391233913339143391533916339173391833919339203392133922339233392433925339263392733928339293393033931339323393333934339353393633937339383393933940339413394233943339443394533946339473394833949339503395133952339533395433955339563395733958339593396033961339623396333964339653396633967339683396933970339713397233973339743397533976339773397833979339803398133982339833398433985339863398733988339893399033991339923399333994339953399633997339983399934000340013400234003340043400534006340073400834009340103401134012340133401434015340163401734018340193402034021340223402334024340253402634027340283402934030340313403234033340343403534036340373403834039340403404134042340433404434045340463404734048340493405034051340523405334054340553405634057340583405934060340613406234063340643406534066340673406834069340703407134072340733407434075340763407734078340793408034081340823408334084340853408634087340883408934090340913409234093340943409534096340973409834099341003410134102341033410434105341063410734108341093411034111341123411334114341153411634117341183411934120341213412234123341243412534126341273412834129341303413134132341333413434135341363413734138341393414034141341423414334144341453414634147341483414934150341513415234153341543415534156341573415834159341603416134162341633416434165341663416734168341693417034171341723417334174341753417634177341783417934180341813418234183341843418534186341873418834189341903419134192341933419434195341963419734198341993420034201342023420334204342053420634207342083420934210342113421234213342143421534216342173421834219342203422134222342233422434225342263422734228342293423034231342323423334234342353423634237342383423934240342413424234243342443424534246342473424834249342503425134252342533425434255342563425734258342593426034261342623426334264342653426634267342683426934270342713427234273342743427534276342773427834279342803428134282342833428434285342863428734288342893429034291342923429334294342953429634297342983429934300343013430234303343043430534306343073430834309343103431134312343133431434315343163431734318343193432034321343223432334324343253432634327343283432934330343313433234333343343433534336343373433834339343403434134342343433434434345343463434734348343493435034351343523435334354343553435634357343583435934360343613436234363343643436534366343673436834369343703437134372343733437434375343763437734378343793438034381343823438334384343853438634387343883438934390343913439234393343943439534396343973439834399344003440134402344033440434405344063440734408344093441034411344123441334414344153441634417344183441934420344213442234423344243442534426344273442834429344303443134432344333443434435344363443734438344393444034441344423444334444344453444634447344483444934450344513445234453344543445534456344573445834459344603446134462344633446434465344663446734468344693447034471344723447334474344753447634477344783447934480344813448234483344843448534486344873448834489344903449134492344933449434495344963449734498344993450034501345023450334504345053450634507345083450934510345113451234513345143451534516345173451834519345203452134522345233452434525345263452734528345293453034531345323453334534345353453634537345383453934540345413454234543345443454534546345473454834549345503455134552345533455434555345563455734558345593456034561345623456334564345653456634567345683456934570345713457234573345743457534576345773457834579345803458134582345833458434585345863458734588345893459034591345923459334594345953459634597345983459934600346013460234603346043460534606346073460834609346103461134612346133461434615346163461734618346193462034621346223462334624346253462634627346283462934630346313463234633346343463534636346373463834639346403464134642346433464434645346463464734648346493465034651346523465334654346553465634657346583465934660346613466234663346643466534666346673466834669346703467134672346733467434675346763467734678346793468034681346823468334684346853468634687346883468934690346913469234693346943469534696346973469834699347003470134702347033470434705347063470734708347093471034711347123471334714347153471634717347183471934720347213472234723347243472534726347273472834729347303473134732347333473434735347363473734738347393474034741347423474334744347453474634747347483474934750347513475234753347543475534756347573475834759347603476134762347633476434765347663476734768347693477034771347723477334774347753477634777347783477934780347813478234783347843478534786347873478834789347903479134792347933479434795347963479734798347993480034801348023480334804348053480634807348083480934810348113481234813348143481534816348173481834819348203482134822348233482434825348263482734828348293483034831348323483334834348353483634837348383483934840348413484234843348443484534846348473484834849348503485134852348533485434855348563485734858348593486034861348623486334864348653486634867348683486934870348713487234873348743487534876348773487834879348803488134882348833488434885348863488734888348893489034891348923489334894348953489634897348983489934900349013490234903349043490534906349073490834909349103491134912349133491434915349163491734918349193492034921349223492334924349253492634927349283492934930349313493234933349343493534936349373493834939349403494134942349433494434945349463494734948349493495034951349523495334954349553495634957349583495934960349613496234963349643496534966349673496834969349703497134972349733497434975349763497734978349793498034981349823498334984349853498634987349883498934990349913499234993349943499534996349973499834999350003500135002350033500435005350063500735008350093501035011350123501335014350153501635017350183501935020350213502235023350243502535026350273502835029350303503135032350333503435035350363503735038350393504035041350423504335044350453504635047350483504935050350513505235053350543505535056350573505835059350603506135062350633506435065350663506735068350693507035071350723507335074350753507635077350783507935080350813508235083350843508535086350873508835089350903509135092350933509435095350963509735098350993510035101351023510335104351053510635107351083510935110351113511235113351143511535116351173511835119351203512135122351233512435125351263512735128351293513035131351323513335134351353513635137351383513935140351413514235143351443514535146351473514835149351503515135152351533515435155351563515735158351593516035161351623516335164351653516635167351683516935170351713517235173351743517535176351773517835179351803518135182351833518435185351863518735188351893519035191351923519335194351953519635197351983519935200352013520235203352043520535206352073520835209352103521135212352133521435215352163521735218352193522035221352223522335224352253522635227352283522935230352313523235233352343523535236352373523835239352403524135242352433524435245352463524735248352493525035251352523525335254352553525635257352583525935260352613526235263352643526535266352673526835269352703527135272352733527435275352763527735278352793528035281352823528335284352853528635287352883528935290352913529235293352943529535296352973529835299353003530135302353033530435305353063530735308353093531035311353123531335314353153531635317353183531935320353213532235323353243532535326353273532835329353303533135332353333533435335353363533735338353393534035341353423534335344353453534635347353483534935350353513535235353353543535535356353573535835359353603536135362353633536435365353663536735368353693537035371353723537335374353753537635377353783537935380353813538235383353843538535386353873538835389353903539135392353933539435395353963539735398353993540035401354023540335404354053540635407354083540935410354113541235413354143541535416354173541835419354203542135422354233542435425354263542735428354293543035431354323543335434354353543635437354383543935440354413544235443354443544535446354473544835449354503545135452354533545435455354563545735458354593546035461354623546335464354653546635467354683546935470354713547235473354743547535476354773547835479354803548135482354833548435485354863548735488354893549035491354923549335494354953549635497354983549935500355013550235503355043550535506355073550835509355103551135512355133551435515355163551735518355193552035521355223552335524355253552635527355283552935530355313553235533355343553535536355373553835539355403554135542355433554435545355463554735548355493555035551355523555335554355553555635557355583555935560355613556235563355643556535566355673556835569355703557135572355733557435575355763557735578355793558035581355823558335584355853558635587355883558935590355913559235593355943559535596355973559835599356003560135602356033560435605356063560735608356093561035611356123561335614356153561635617356183561935620356213562235623356243562535626356273562835629356303563135632356333563435635356363563735638356393564035641356423564335644356453564635647356483564935650356513565235653356543565535656356573565835659356603566135662356633566435665356663566735668356693567035671356723567335674356753567635677356783567935680356813568235683356843568535686356873568835689356903569135692356933569435695356963569735698356993570035701357023570335704357053570635707357083570935710357113571235713357143571535716357173571835719357203572135722357233572435725357263572735728357293573035731357323573335734357353573635737357383573935740357413574235743357443574535746357473574835749357503575135752357533575435755357563575735758357593576035761357623576335764357653576635767357683576935770357713577235773357743577535776357773577835779357803578135782357833578435785357863578735788357893579035791357923579335794357953579635797357983579935800358013580235803358043580535806358073580835809358103581135812358133581435815358163581735818358193582035821358223582335824358253582635827358283582935830358313583235833358343583535836358373583835839358403584135842358433584435845358463584735848358493585035851358523585335854358553585635857358583585935860358613586235863358643586535866358673586835869358703587135872358733587435875358763587735878358793588035881358823588335884358853588635887358883588935890358913589235893358943589535896358973589835899359003590135902359033590435905359063590735908359093591035911359123591335914359153591635917359183591935920359213592235923359243592535926359273592835929359303593135932359333593435935359363593735938359393594035941359423594335944359453594635947359483594935950359513595235953359543595535956359573595835959359603596135962359633596435965359663596735968359693597035971359723597335974359753597635977359783597935980359813598235983359843598535986359873598835989359903599135992359933599435995359963599735998359993600036001360023600336004360053600636007360083600936010360113601236013360143601536016360173601836019360203602136022360233602436025360263602736028360293603036031360323603336034360353603636037360383603936040360413604236043360443604536046360473604836049360503605136052360533605436055360563605736058360593606036061360623606336064360653606636067360683606936070360713607236073360743607536076360773607836079360803608136082360833608436085360863608736088360893609036091360923609336094360953609636097360983609936100361013610236103361043610536106361073610836109361103611136112361133611436115361163611736118361193612036121361223612336124361253612636127361283612936130361313613236133361343613536136361373613836139361403614136142361433614436145361463614736148361493615036151361523615336154361553615636157361583615936160361613616236163361643616536166361673616836169361703617136172361733617436175361763617736178361793618036181361823618336184361853618636187361883618936190361913619236193361943619536196361973619836199362003620136202362033620436205362063620736208362093621036211362123621336214362153621636217362183621936220362213622236223362243622536226362273622836229362303623136232362333623436235362363623736238362393624036241362423624336244362453624636247362483624936250362513625236253362543625536256362573625836259362603626136262362633626436265362663626736268362693627036271362723627336274362753627636277362783627936280362813628236283362843628536286362873628836289362903629136292362933629436295362963629736298362993630036301363023630336304363053630636307363083630936310363113631236313363143631536316363173631836319363203632136322363233632436325363263632736328363293633036331363323633336334363353633636337363383633936340363413634236343363443634536346363473634836349363503635136352363533635436355363563635736358363593636036361363623636336364363653636636367363683636936370363713637236373363743637536376363773637836379363803638136382363833638436385363863638736388363893639036391363923639336394363953639636397363983639936400364013640236403364043640536406364073640836409364103641136412364133641436415364163641736418364193642036421364223642336424364253642636427364283642936430364313643236433364343643536436364373643836439364403644136442364433644436445364463644736448364493645036451364523645336454364553645636457364583645936460364613646236463364643646536466364673646836469364703647136472364733647436475364763647736478364793648036481364823648336484364853648636487364883648936490364913649236493364943649536496364973649836499365003650136502365033650436505365063650736508365093651036511365123651336514365153651636517365183651936520365213652236523365243652536526365273652836529365303653136532365333653436535365363653736538365393654036541365423654336544365453654636547365483654936550365513655236553365543655536556365573655836559365603656136562365633656436565365663656736568365693657036571365723657336574365753657636577365783657936580365813658236583365843658536586365873658836589365903659136592365933659436595365963659736598365993660036601366023660336604366053660636607366083660936610366113661236613366143661536616366173661836619366203662136622366233662436625366263662736628366293663036631366323663336634366353663636637366383663936640366413664236643366443664536646366473664836649366503665136652366533665436655366563665736658366593666036661366623666336664366653666636667366683666936670366713667236673366743667536676366773667836679366803668136682366833668436685366863668736688366893669036691366923669336694366953669636697366983669936700367013670236703367043670536706367073670836709367103671136712367133671436715367163671736718367193672036721367223672336724367253672636727367283672936730367313673236733367343673536736367373673836739367403674136742367433674436745367463674736748367493675036751367523675336754367553675636757367583675936760367613676236763367643676536766367673676836769367703677136772367733677436775367763677736778367793678036781367823678336784367853678636787367883678936790367913679236793367943679536796367973679836799368003680136802368033680436805368063680736808368093681036811368123681336814368153681636817368183681936820368213682236823368243682536826368273682836829368303683136832368333683436835368363683736838368393684036841368423684336844368453684636847368483684936850368513685236853368543685536856368573685836859368603686136862368633686436865368663686736868368693687036871368723687336874368753687636877368783687936880368813688236883368843688536886368873688836889368903689136892368933689436895368963689736898368993690036901369023690336904369053690636907369083690936910369113691236913369143691536916369173691836919369203692136922369233692436925369263692736928369293693036931369323693336934369353693636937369383693936940369413694236943369443694536946369473694836949369503695136952369533695436955369563695736958369593696036961369623696336964369653696636967369683696936970369713697236973369743697536976369773697836979369803698136982369833698436985369863698736988369893699036991369923699336994369953699636997369983699937000370013700237003370043700537006370073700837009370103701137012370133701437015370163701737018370193702037021370223702337024370253702637027370283702937030370313703237033370343703537036370373703837039370403704137042370433704437045370463704737048370493705037051370523705337054370553705637057370583705937060370613706237063370643706537066370673706837069370703707137072370733707437075370763707737078370793708037081370823708337084370853708637087370883708937090370913709237093370943709537096370973709837099371003710137102371033710437105371063710737108371093711037111371123711337114371153711637117371183711937120371213712237123371243712537126371273712837129371303713137132371333713437135371363713737138371393714037141371423714337144371453714637147371483714937150371513715237153371543715537156371573715837159371603716137162371633716437165371663716737168371693717037171371723717337174371753717637177371783717937180371813718237183371843718537186371873718837189371903719137192371933719437195371963719737198371993720037201372023720337204372053720637207372083720937210372113721237213372143721537216372173721837219372203722137222372233722437225372263722737228372293723037231372323723337234372353723637237372383723937240372413724237243372443724537246372473724837249372503725137252372533725437255372563725737258372593726037261372623726337264372653726637267372683726937270372713727237273372743727537276372773727837279372803728137282372833728437285372863728737288372893729037291372923729337294372953729637297372983729937300373013730237303373043730537306373073730837309373103731137312373133731437315373163731737318373193732037321373223732337324373253732637327373283732937330373313733237333373343733537336373373733837339373403734137342373433734437345373463734737348373493735037351373523735337354373553735637357373583735937360373613736237363373643736537366373673736837369373703737137372373733737437375373763737737378373793738037381373823738337384373853738637387373883738937390373913739237393373943739537396373973739837399374003740137402374033740437405374063740737408374093741037411374123741337414374153741637417374183741937420374213742237423374243742537426374273742837429374303743137432374333743437435374363743737438374393744037441374423744337444374453744637447374483744937450374513745237453374543745537456374573745837459374603746137462374633746437465374663746737468374693747037471374723747337474374753747637477374783747937480374813748237483374843748537486374873748837489374903749137492374933749437495374963749737498374993750037501375023750337504375053750637507375083750937510375113751237513375143751537516375173751837519375203752137522375233752437525375263752737528375293753037531375323753337534375353753637537375383753937540375413754237543375443754537546375473754837549375503755137552375533755437555375563755737558375593756037561375623756337564375653756637567375683756937570375713757237573375743757537576375773757837579375803758137582375833758437585375863758737588375893759037591375923759337594375953759637597375983759937600376013760237603376043760537606376073760837609376103761137612376133761437615376163761737618376193762037621376223762337624376253762637627376283762937630376313763237633376343763537636376373763837639376403764137642376433764437645376463764737648376493765037651376523765337654376553765637657376583765937660376613766237663376643766537666376673766837669376703767137672376733767437675376763767737678376793768037681376823768337684376853768637687376883768937690376913769237693376943769537696376973769837699377003770137702377033770437705377063770737708377093771037711377123771337714377153771637717377183771937720377213772237723377243772537726377273772837729377303773137732377333773437735377363773737738377393774037741377423774337744377453774637747377483774937750377513775237753377543775537756377573775837759377603776137762377633776437765377663776737768377693777037771377723777337774377753777637777377783777937780377813778237783377843778537786377873778837789377903779137792377933779437795377963779737798377993780037801378023780337804378053780637807378083780937810378113781237813378143781537816378173781837819378203782137822378233782437825378263782737828378293783037831378323783337834378353783637837378383783937840378413784237843378443784537846378473784837849378503785137852378533785437855378563785737858378593786037861378623786337864378653786637867378683786937870378713787237873378743787537876378773787837879378803788137882378833788437885378863788737888378893789037891378923789337894378953789637897378983789937900379013790237903379043790537906379073790837909379103791137912379133791437915379163791737918379193792037921379223792337924379253792637927379283792937930379313793237933379343793537936379373793837939379403794137942379433794437945379463794737948379493795037951379523795337954379553795637957379583795937960379613796237963379643796537966379673796837969379703797137972379733797437975379763797737978379793798037981379823798337984379853798637987379883798937990379913799237993379943799537996379973799837999380003800138002380033800438005380063800738008380093801038011380123801338014380153801638017380183801938020380213802238023380243802538026380273802838029380303803138032380333803438035380363803738038380393804038041380423804338044380453804638047380483804938050380513805238053380543805538056380573805838059380603806138062380633806438065380663806738068380693807038071380723807338074380753807638077380783807938080380813808238083380843808538086380873808838089380903809138092380933809438095380963809738098380993810038101381023810338104381053810638107381083810938110381113811238113381143811538116381173811838119381203812138122381233812438125381263812738128381293813038131381323813338134381353813638137381383813938140381413814238143381443814538146381473814838149381503815138152381533815438155381563815738158381593816038161381623816338164381653816638167381683816938170381713817238173381743817538176381773817838179381803818138182381833818438185381863818738188381893819038191381923819338194381953819638197381983819938200382013820238203382043820538206382073820838209382103821138212382133821438215382163821738218382193822038221382223822338224382253822638227382283822938230382313823238233382343823538236382373823838239382403824138242382433824438245382463824738248382493825038251382523825338254382553825638257382583825938260382613826238263382643826538266382673826838269382703827138272382733827438275382763827738278382793828038281382823828338284382853828638287382883828938290382913829238293382943829538296382973829838299383003830138302383033830438305383063830738308383093831038311383123831338314383153831638317383183831938320383213832238323383243832538326383273832838329383303833138332383333833438335383363833738338383393834038341383423834338344383453834638347383483834938350383513835238353383543835538356383573835838359383603836138362383633836438365383663836738368383693837038371383723837338374383753837638377383783837938380383813838238383383843838538386383873838838389383903839138392383933839438395383963839738398383993840038401384023840338404384053840638407384083840938410384113841238413384143841538416384173841838419384203842138422384233842438425384263842738428384293843038431384323843338434384353843638437384383843938440384413844238443384443844538446384473844838449384503845138452384533845438455384563845738458384593846038461384623846338464384653846638467384683846938470384713847238473384743847538476384773847838479384803848138482384833848438485384863848738488384893849038491384923849338494384953849638497384983849938500385013850238503385043850538506385073850838509385103851138512385133851438515385163851738518385193852038521385223852338524385253852638527385283852938530385313853238533385343853538536385373853838539385403854138542385433854438545385463854738548385493855038551385523855338554385553855638557385583855938560385613856238563385643856538566385673856838569385703857138572385733857438575385763857738578385793858038581385823858338584385853858638587385883858938590385913859238593385943859538596385973859838599386003860138602386033860438605386063860738608386093861038611386123861338614386153861638617386183861938620386213862238623386243862538626386273862838629386303863138632386333863438635386363863738638386393864038641386423864338644386453864638647386483864938650386513865238653386543865538656386573865838659386603866138662386633866438665386663866738668386693867038671386723867338674386753867638677386783867938680386813868238683386843868538686386873868838689386903869138692386933869438695386963869738698386993870038701387023870338704387053870638707387083870938710387113871238713387143871538716387173871838719387203872138722387233872438725387263872738728387293873038731387323873338734387353873638737387383873938740387413874238743387443874538746387473874838749387503875138752387533875438755387563875738758387593876038761387623876338764387653876638767387683876938770387713877238773387743877538776387773877838779387803878138782387833878438785387863878738788387893879038791387923879338794387953879638797387983879938800388013880238803388043880538806388073880838809388103881138812388133881438815388163881738818388193882038821388223882338824388253882638827388283882938830388313883238833388343883538836388373883838839388403884138842388433884438845388463884738848388493885038851388523885338854388553885638857388583885938860388613886238863388643886538866388673886838869388703887138872388733887438875388763887738878388793888038881388823888338884388853888638887388883888938890388913889238893388943889538896388973889838899389003890138902389033890438905389063890738908389093891038911389123891338914389153891638917389183891938920389213892238923389243892538926389273892838929389303893138932389333893438935389363893738938389393894038941389423894338944389453894638947389483894938950389513895238953389543895538956389573895838959389603896138962389633896438965389663896738968389693897038971389723897338974389753897638977389783897938980389813898238983389843898538986389873898838989389903899138992389933899438995389963899738998389993900039001390023900339004390053900639007390083900939010390113901239013390143901539016390173901839019390203902139022390233902439025390263902739028390293903039031390323903339034390353903639037390383903939040390413904239043390443904539046390473904839049390503905139052390533905439055390563905739058390593906039061390623906339064390653906639067390683906939070390713907239073390743907539076390773907839079390803908139082390833908439085390863908739088390893909039091390923909339094390953909639097390983909939100391013910239103391043910539106391073910839109391103911139112391133911439115391163911739118391193912039121391223912339124391253912639127391283912939130391313913239133391343913539136391373913839139391403914139142391433914439145391463914739148391493915039151391523915339154391553915639157391583915939160391613916239163391643916539166391673916839169391703917139172391733917439175391763917739178391793918039181391823918339184391853918639187391883918939190391913919239193391943919539196391973919839199392003920139202392033920439205392063920739208392093921039211392123921339214392153921639217392183921939220392213922239223392243922539226392273922839229392303923139232392333923439235392363923739238392393924039241392423924339244392453924639247392483924939250392513925239253392543925539256392573925839259392603926139262392633926439265392663926739268392693927039271392723927339274392753927639277392783927939280392813928239283392843928539286392873928839289392903929139292392933929439295392963929739298392993930039301393023930339304393053930639307393083930939310393113931239313393143931539316393173931839319393203932139322393233932439325393263932739328393293933039331393323933339334393353933639337393383933939340393413934239343393443934539346393473934839349393503935139352393533935439355393563935739358393593936039361393623936339364393653936639367393683936939370393713937239373393743937539376393773937839379393803938139382393833938439385393863938739388393893939039391393923939339394393953939639397393983939939400394013940239403394043940539406394073940839409394103941139412394133941439415394163941739418394193942039421394223942339424394253942639427394283942939430394313943239433394343943539436394373943839439394403944139442394433944439445394463944739448394493945039451394523945339454394553945639457394583945939460394613946239463394643946539466394673946839469394703947139472394733947439475394763947739478394793948039481394823948339484394853948639487394883948939490394913949239493394943949539496394973949839499395003950139502395033950439505395063950739508395093951039511395123951339514395153951639517395183951939520395213952239523395243952539526395273952839529395303953139532395333953439535395363953739538395393954039541395423954339544395453954639547395483954939550395513955239553395543955539556395573955839559395603956139562395633956439565395663956739568395693957039571395723957339574395753957639577395783957939580395813958239583395843958539586395873958839589395903959139592395933959439595395963959739598395993960039601396023960339604396053960639607396083960939610396113961239613396143961539616396173961839619396203962139622396233962439625396263962739628396293963039631396323963339634396353963639637396383963939640396413964239643396443964539646396473964839649396503965139652396533965439655396563965739658396593966039661396623966339664396653966639667396683966939670396713967239673396743967539676396773967839679396803968139682396833968439685396863968739688396893969039691396923969339694396953969639697396983969939700397013970239703397043970539706397073970839709397103971139712397133971439715397163971739718397193972039721397223972339724397253972639727397283972939730397313973239733397343973539736397373973839739397403974139742397433974439745397463974739748397493975039751397523975339754397553975639757397583975939760397613976239763397643976539766397673976839769397703977139772397733977439775397763977739778397793978039781397823978339784397853978639787397883978939790397913979239793397943979539796397973979839799398003980139802398033980439805398063980739808398093981039811398123981339814398153981639817398183981939820398213982239823398243982539826398273982839829398303983139832398333983439835398363983739838398393984039841398423984339844398453984639847398483984939850398513985239853398543985539856398573985839859398603986139862398633986439865398663986739868398693987039871398723987339874398753987639877398783987939880398813988239883398843988539886398873988839889398903989139892398933989439895398963989739898398993990039901399023990339904399053990639907399083990939910399113991239913399143991539916399173991839919399203992139922399233992439925399263992739928399293993039931399323993339934399353993639937399383993939940399413994239943399443994539946399473994839949399503995139952399533995439955399563995739958399593996039961399623996339964399653996639967399683996939970399713997239973399743997539976399773997839979399803998139982399833998439985399863998739988399893999039991399923999339994399953999639997399983999940000400014000240003400044000540006400074000840009400104001140012400134001440015400164001740018400194002040021400224002340024400254002640027400284002940030400314003240033400344003540036400374003840039400404004140042400434004440045400464004740048400494005040051400524005340054400554005640057400584005940060400614006240063400644006540066400674006840069400704007140072400734007440075400764007740078400794008040081400824008340084400854008640087400884008940090400914009240093400944009540096400974009840099401004010140102401034010440105401064010740108401094011040111401124011340114401154011640117401184011940120401214012240123401244012540126401274012840129401304013140132401334013440135401364013740138401394014040141401424014340144401454014640147401484014940150401514015240153401544015540156401574015840159401604016140162401634016440165401664016740168401694017040171401724017340174401754017640177401784017940180401814018240183401844018540186401874018840189401904019140192401934019440195401964019740198401994020040201402024020340204402054020640207402084020940210402114021240213402144021540216402174021840219402204022140222402234022440225402264022740228402294023040231402324023340234402354023640237402384023940240402414024240243402444024540246402474024840249402504025140252402534025440255402564025740258402594026040261402624026340264402654026640267402684026940270402714027240273402744027540276402774027840279402804028140282402834028440285402864028740288402894029040291402924029340294402954029640297402984029940300403014030240303403044030540306403074030840309403104031140312403134031440315403164031740318403194032040321403224032340324403254032640327403284032940330403314033240333403344033540336403374033840339403404034140342403434034440345403464034740348403494035040351403524035340354403554035640357403584035940360403614036240363403644036540366403674036840369403704037140372403734037440375403764037740378403794038040381403824038340384403854038640387403884038940390403914039240393403944039540396403974039840399404004040140402404034040440405404064040740408404094041040411404124041340414404154041640417404184041940420404214042240423404244042540426404274042840429404304043140432404334043440435404364043740438404394044040441404424044340444404454044640447404484044940450404514045240453404544045540456404574045840459404604046140462404634046440465404664046740468404694047040471404724047340474404754047640477404784047940480404814048240483404844048540486404874048840489404904049140492404934049440495404964049740498404994050040501405024050340504405054050640507405084050940510405114051240513405144051540516405174051840519405204052140522405234052440525405264052740528405294053040531405324053340534405354053640537405384053940540405414054240543405444054540546405474054840549405504055140552405534055440555405564055740558405594056040561405624056340564405654056640567405684056940570405714057240573405744057540576405774057840579405804058140582405834058440585405864058740588405894059040591405924059340594405954059640597405984059940600406014060240603406044060540606406074060840609406104061140612406134061440615406164061740618406194062040621406224062340624406254062640627406284062940630406314063240633406344063540636406374063840639406404064140642406434064440645406464064740648406494065040651406524065340654406554065640657406584065940660406614066240663406644066540666406674066840669406704067140672406734067440675406764067740678406794068040681406824068340684406854068640687406884068940690406914069240693406944069540696406974069840699407004070140702407034070440705407064070740708407094071040711407124071340714407154071640717407184071940720407214072240723407244072540726407274072840729407304073140732407334073440735407364073740738407394074040741407424074340744407454074640747407484074940750407514075240753407544075540756407574075840759407604076140762407634076440765407664076740768407694077040771407724077340774407754077640777407784077940780407814078240783407844078540786407874078840789407904079140792407934079440795407964079740798407994080040801408024080340804408054080640807408084080940810408114081240813408144081540816408174081840819408204082140822408234082440825408264082740828408294083040831408324083340834408354083640837408384083940840408414084240843408444084540846408474084840849408504085140852408534085440855408564085740858408594086040861408624086340864408654086640867408684086940870408714087240873408744087540876408774087840879408804088140882408834088440885408864088740888408894089040891408924089340894408954089640897408984089940900409014090240903409044090540906409074090840909409104091140912409134091440915409164091740918409194092040921409224092340924409254092640927409284092940930409314093240933409344093540936409374093840939409404094140942409434094440945409464094740948409494095040951409524095340954409554095640957409584095940960409614096240963409644096540966409674096840969409704097140972409734097440975409764097740978409794098040981409824098340984409854098640987409884098940990409914099240993409944099540996409974099840999410004100141002410034100441005410064100741008410094101041011410124101341014410154101641017410184101941020410214102241023410244102541026410274102841029410304103141032410334103441035410364103741038410394104041041410424104341044410454104641047410484104941050410514105241053410544105541056410574105841059410604106141062410634106441065410664106741068410694107041071410724107341074410754107641077410784107941080410814108241083410844108541086410874108841089410904109141092410934109441095410964109741098410994110041101411024110341104411054110641107411084110941110411114111241113411144111541116411174111841119411204112141122411234112441125411264112741128411294113041131411324113341134411354113641137411384113941140411414114241143411444114541146411474114841149411504115141152411534115441155411564115741158411594116041161411624116341164411654116641167411684116941170411714117241173411744117541176411774117841179411804118141182411834118441185411864118741188411894119041191411924119341194411954119641197411984119941200412014120241203412044120541206412074120841209412104121141212412134121441215412164121741218412194122041221412224122341224412254122641227412284122941230412314123241233412344123541236412374123841239412404124141242412434124441245412464124741248412494125041251412524125341254412554125641257412584125941260412614126241263412644126541266412674126841269412704127141272412734127441275412764127741278412794128041281412824128341284412854128641287412884128941290412914129241293412944129541296412974129841299413004130141302413034130441305413064130741308413094131041311413124131341314413154131641317413184131941320413214132241323413244132541326413274132841329413304133141332413334133441335413364133741338413394134041341413424134341344413454134641347413484134941350413514135241353413544135541356413574135841359413604136141362413634136441365413664136741368413694137041371413724137341374413754137641377413784137941380413814138241383413844138541386413874138841389413904139141392413934139441395413964139741398413994140041401414024140341404414054140641407414084140941410414114141241413414144141541416414174141841419414204142141422414234142441425414264142741428414294143041431414324143341434414354143641437414384143941440414414144241443414444144541446414474144841449414504145141452414534145441455414564145741458414594146041461414624146341464414654146641467414684146941470414714147241473414744147541476414774147841479414804148141482414834148441485414864148741488414894149041491414924149341494414954149641497414984149941500415014150241503415044150541506415074150841509415104151141512415134151441515415164151741518415194152041521415224152341524415254152641527415284152941530415314153241533415344153541536415374153841539415404154141542415434154441545415464154741548415494155041551415524155341554415554155641557415584155941560415614156241563415644156541566415674156841569415704157141572415734157441575415764157741578415794158041581415824158341584415854158641587415884158941590415914159241593415944159541596415974159841599416004160141602416034160441605416064160741608416094161041611416124161341614416154161641617416184161941620416214162241623416244162541626416274162841629416304163141632416334163441635416364163741638416394164041641416424164341644416454164641647416484164941650416514165241653416544165541656416574165841659416604166141662416634166441665416664166741668416694167041671416724167341674416754167641677416784167941680416814168241683416844168541686416874168841689416904169141692416934169441695416964169741698416994170041701417024170341704417054170641707417084170941710417114171241713417144171541716417174171841719417204172141722417234172441725417264172741728417294173041731417324173341734417354173641737417384173941740417414174241743417444174541746417474174841749417504175141752417534175441755417564175741758417594176041761417624176341764417654176641767417684176941770417714177241773417744177541776417774177841779417804178141782417834178441785417864178741788417894179041791417924179341794417954179641797417984179941800418014180241803418044180541806418074180841809418104181141812418134181441815418164181741818418194182041821418224182341824418254182641827418284182941830418314183241833418344183541836418374183841839418404184141842418434184441845418464184741848418494185041851418524185341854418554185641857418584185941860418614186241863418644186541866418674186841869418704187141872418734187441875418764187741878418794188041881418824188341884418854188641887418884188941890418914189241893418944189541896418974189841899419004190141902419034190441905419064190741908419094191041911419124191341914419154191641917419184191941920419214192241923419244192541926419274192841929419304193141932419334193441935419364193741938419394194041941419424194341944419454194641947419484194941950419514195241953419544195541956419574195841959419604196141962419634196441965419664196741968419694197041971419724197341974419754197641977419784197941980419814198241983419844198541986419874198841989419904199141992419934199441995419964199741998419994200042001420024200342004420054200642007420084200942010420114201242013420144201542016420174201842019420204202142022420234202442025420264202742028420294203042031420324203342034420354203642037420384203942040420414204242043420444204542046420474204842049420504205142052420534205442055420564205742058420594206042061420624206342064420654206642067420684206942070420714207242073420744207542076420774207842079420804208142082420834208442085420864208742088420894209042091420924209342094420954209642097420984209942100421014210242103421044210542106421074210842109421104211142112421134211442115421164211742118421194212042121421224212342124421254212642127421284212942130421314213242133421344213542136421374213842139421404214142142421434214442145421464214742148421494215042151421524215342154421554215642157421584215942160421614216242163421644216542166421674216842169421704217142172421734217442175421764217742178421794218042181421824218342184421854218642187421884218942190421914219242193421944219542196421974219842199422004220142202422034220442205422064220742208422094221042211422124221342214422154221642217422184221942220422214222242223422244222542226422274222842229422304223142232422334223442235422364223742238422394224042241422424224342244422454224642247422484224942250422514225242253422544225542256422574225842259422604226142262422634226442265422664226742268422694227042271422724227342274422754227642277422784227942280422814228242283422844228542286422874228842289422904229142292422934229442295422964229742298422994230042301423024230342304423054230642307423084230942310423114231242313423144231542316423174231842319423204232142322423234232442325423264232742328423294233042331423324233342334423354233642337423384233942340423414234242343423444234542346423474234842349423504235142352423534235442355423564235742358423594236042361423624236342364423654236642367423684236942370423714237242373423744237542376423774237842379423804238142382423834238442385423864238742388423894239042391423924239342394423954239642397423984239942400424014240242403424044240542406424074240842409424104241142412424134241442415424164241742418424194242042421424224242342424424254242642427424284242942430424314243242433424344243542436424374243842439424404244142442424434244442445424464244742448424494245042451424524245342454424554245642457424584245942460424614246242463424644246542466424674246842469424704247142472424734247442475424764247742478424794248042481424824248342484424854248642487424884248942490424914249242493424944249542496424974249842499425004250142502425034250442505425064250742508425094251042511425124251342514425154251642517425184251942520425214252242523425244252542526425274252842529425304253142532425334253442535425364253742538425394254042541425424254342544425454254642547425484254942550425514255242553425544255542556425574255842559425604256142562425634256442565425664256742568425694257042571425724257342574425754257642577425784257942580425814258242583425844258542586425874258842589425904259142592425934259442595425964259742598425994260042601426024260342604426054260642607426084260942610426114261242613426144261542616426174261842619426204262142622426234262442625426264262742628426294263042631426324263342634426354263642637426384263942640426414264242643426444264542646426474264842649426504265142652426534265442655426564265742658426594266042661426624266342664426654266642667426684266942670426714267242673426744267542676426774267842679426804268142682426834268442685426864268742688426894269042691426924269342694426954269642697426984269942700427014270242703427044270542706427074270842709427104271142712427134271442715427164271742718427194272042721427224272342724427254272642727427284272942730427314273242733427344273542736427374273842739427404274142742427434274442745427464274742748427494275042751427524275342754427554275642757427584275942760427614276242763427644276542766427674276842769427704277142772427734277442775427764277742778427794278042781427824278342784427854278642787427884278942790427914279242793427944279542796427974279842799428004280142802428034280442805428064280742808428094281042811428124281342814428154281642817428184281942820428214282242823428244282542826428274282842829428304283142832428334283442835428364283742838428394284042841428424284342844428454284642847428484284942850428514285242853428544285542856428574285842859428604286142862428634286442865428664286742868428694287042871428724287342874428754287642877428784287942880428814288242883428844288542886428874288842889428904289142892428934289442895428964289742898428994290042901429024290342904429054290642907429084290942910429114291242913429144291542916429174291842919429204292142922429234292442925429264292742928429294293042931429324293342934429354293642937429384293942940429414294242943429444294542946429474294842949429504295142952429534295442955429564295742958429594296042961429624296342964429654296642967429684296942970429714297242973429744297542976429774297842979429804298142982429834298442985429864298742988429894299042991429924299342994429954299642997429984299943000430014300243003430044300543006430074300843009430104301143012430134301443015430164301743018430194302043021430224302343024430254302643027430284302943030430314303243033430344303543036430374303843039430404304143042430434304443045430464304743048430494305043051430524305343054430554305643057430584305943060430614306243063430644306543066430674306843069430704307143072430734307443075430764307743078430794308043081430824308343084430854308643087430884308943090430914309243093430944309543096430974309843099431004310143102431034310443105431064310743108431094311043111431124311343114431154311643117431184311943120431214312243123431244312543126431274312843129431304313143132431334313443135431364313743138431394314043141431424314343144431454314643147431484314943150431514315243153431544315543156431574315843159431604316143162431634316443165431664316743168431694317043171431724317343174431754317643177431784317943180431814318243183431844318543186431874318843189431904319143192431934319443195431964319743198431994320043201432024320343204432054320643207432084320943210432114321243213432144321543216432174321843219432204322143222432234322443225432264322743228432294323043231432324323343234432354323643237432384323943240432414324243243432444324543246432474324843249432504325143252432534325443255432564325743258432594326043261432624326343264432654326643267432684326943270432714327243273432744327543276432774327843279432804328143282432834328443285432864328743288432894329043291432924329343294432954329643297432984329943300433014330243303433044330543306433074330843309433104331143312433134331443315433164331743318433194332043321433224332343324433254332643327433284332943330433314333243333433344333543336433374333843339433404334143342433434334443345433464334743348433494335043351433524335343354433554335643357433584335943360433614336243363433644336543366433674336843369433704337143372433734337443375433764337743378433794338043381433824338343384433854338643387433884338943390433914339243393433944339543396433974339843399434004340143402434034340443405434064340743408434094341043411434124341343414434154341643417434184341943420434214342243423434244342543426434274342843429434304343143432434334343443435434364343743438434394344043441434424344343444434454344643447434484344943450434514345243453434544345543456434574345843459434604346143462434634346443465434664346743468434694347043471434724347343474434754347643477434784347943480434814348243483434844348543486434874348843489434904349143492434934349443495434964349743498434994350043501435024350343504435054350643507435084350943510435114351243513435144351543516435174351843519435204352143522435234352443525435264352743528435294353043531435324353343534435354353643537435384353943540435414354243543435444354543546435474354843549435504355143552435534355443555435564355743558435594356043561435624356343564435654356643567435684356943570435714357243573435744357543576435774357843579435804358143582435834358443585435864358743588435894359043591435924359343594435954359643597435984359943600436014360243603436044360543606436074360843609436104361143612436134361443615436164361743618436194362043621436224362343624436254362643627436284362943630436314363243633436344363543636436374363843639436404364143642436434364443645436464364743648436494365043651436524365343654436554365643657436584365943660436614366243663436644366543666436674366843669436704367143672436734367443675436764367743678436794368043681436824368343684436854368643687436884368943690436914369243693436944369543696436974369843699437004370143702437034370443705437064370743708437094371043711437124371343714437154371643717437184371943720437214372243723437244372543726437274372843729437304373143732437334373443735437364373743738437394374043741437424374343744437454374643747437484374943750437514375243753437544375543756437574375843759437604376143762437634376443765437664376743768437694377043771437724377343774437754377643777437784377943780437814378243783437844378543786437874378843789437904379143792437934379443795437964379743798437994380043801438024380343804438054380643807438084380943810438114381243813438144381543816438174381843819438204382143822438234382443825438264382743828438294383043831438324383343834438354383643837438384383943840438414384243843438444384543846438474384843849438504385143852438534385443855438564385743858438594386043861438624386343864438654386643867438684386943870438714387243873438744387543876438774387843879438804388143882438834388443885438864388743888438894389043891438924389343894438954389643897438984389943900439014390243903439044390543906439074390843909439104391143912439134391443915439164391743918439194392043921439224392343924439254392643927439284392943930439314393243933439344393543936439374393843939439404394143942439434394443945439464394743948439494395043951439524395343954439554395643957439584395943960439614396243963439644396543966439674396843969439704397143972439734397443975439764397743978439794398043981439824398343984439854398643987439884398943990439914399243993439944399543996439974399843999440004400144002440034400444005440064400744008440094401044011440124401344014440154401644017440184401944020440214402244023440244402544026440274402844029440304403144032440334403444035440364403744038440394404044041440424404344044440454404644047440484404944050440514405244053440544405544056440574405844059440604406144062440634406444065440664406744068440694407044071440724407344074440754407644077440784407944080440814408244083440844408544086440874408844089440904409144092440934409444095440964409744098440994410044101441024410344104441054410644107441084410944110441114411244113441144411544116441174411844119441204412144122441234412444125441264412744128441294413044131441324413344134441354413644137441384413944140441414414244143441444414544146441474414844149441504415144152441534415444155441564415744158441594416044161441624416344164441654416644167441684416944170441714417244173441744417544176441774417844179441804418144182441834418444185441864418744188441894419044191441924419344194441954419644197441984419944200442014420244203442044420544206442074420844209442104421144212442134421444215442164421744218442194422044221442224422344224442254422644227442284422944230442314423244233442344423544236442374423844239442404424144242442434424444245442464424744248442494425044251442524425344254442554425644257442584425944260442614426244263442644426544266442674426844269442704427144272442734427444275442764427744278442794428044281442824428344284442854428644287442884428944290442914429244293442944429544296442974429844299443004430144302443034430444305443064430744308443094431044311443124431344314443154431644317443184431944320443214432244323443244432544326443274432844329443304433144332443334433444335443364433744338443394434044341443424434344344443454434644347443484434944350443514435244353443544435544356443574435844359443604436144362443634436444365443664436744368443694437044371443724437344374443754437644377443784437944380443814438244383443844438544386443874438844389443904439144392443934439444395443964439744398443994440044401444024440344404444054440644407444084440944410444114441244413444144441544416444174441844419444204442144422444234442444425444264442744428444294443044431444324443344434444354443644437444384443944440444414444244443444444444544446444474444844449444504445144452444534445444455444564445744458444594446044461444624446344464444654446644467444684446944470444714447244473444744447544476444774447844479444804448144482444834448444485444864448744488444894449044491444924449344494444954449644497444984449944500445014450244503445044450544506445074450844509445104451144512445134451444515445164451744518445194452044521445224452344524445254452644527445284452944530445314453244533445344453544536445374453844539445404454144542445434454444545445464454744548445494455044551445524455344554445554455644557445584455944560445614456244563445644456544566445674456844569445704457144572445734457444575445764457744578445794458044581445824458344584445854458644587445884458944590445914459244593445944459544596445974459844599446004460144602446034460444605446064460744608446094461044611446124461344614446154461644617446184461944620446214462244623446244462544626446274462844629446304463144632446334463444635446364463744638446394464044641446424464344644446454464644647446484464944650446514465244653446544465544656446574465844659446604466144662446634466444665446664466744668446694467044671446724467344674446754467644677446784467944680446814468244683446844468544686446874468844689446904469144692446934469444695446964469744698446994470044701447024470344704447054470644707447084470944710447114471244713447144471544716447174471844719447204472144722447234472444725447264472744728447294473044731447324473344734447354473644737447384473944740447414474244743447444474544746447474474844749447504475144752447534475444755447564475744758447594476044761447624476344764447654476644767447684476944770447714477244773447744477544776447774477844779447804478144782447834478444785447864478744788447894479044791447924479344794447954479644797447984479944800448014480244803448044480544806448074480844809448104481144812448134481444815448164481744818448194482044821448224482344824448254482644827448284482944830448314483244833448344483544836448374483844839448404484144842448434484444845448464484744848448494485044851448524485344854448554485644857448584485944860448614486244863448644486544866448674486844869448704487144872448734487444875448764487744878448794488044881448824488344884448854488644887448884488944890448914489244893448944489544896448974489844899449004490144902449034490444905449064490744908449094491044911449124491344914449154491644917449184491944920449214492244923449244492544926449274492844929449304493144932449334493444935449364493744938449394494044941449424494344944449454494644947449484494944950449514495244953449544495544956449574495844959449604496144962449634496444965449664496744968449694497044971449724497344974449754497644977449784497944980449814498244983449844498544986449874498844989449904499144992449934499444995449964499744998449994500045001450024500345004450054500645007450084500945010450114501245013450144501545016450174501845019450204502145022450234502445025450264502745028450294503045031450324503345034450354503645037450384503945040450414504245043450444504545046450474504845049450504505145052450534505445055450564505745058450594506045061450624506345064450654506645067450684506945070450714507245073450744507545076450774507845079450804508145082450834508445085450864508745088450894509045091450924509345094450954509645097450984509945100451014510245103451044510545106451074510845109451104511145112451134511445115451164511745118451194512045121451224512345124451254512645127451284512945130451314513245133451344513545136451374513845139451404514145142451434514445145451464514745148451494515045151451524515345154451554515645157451584515945160451614516245163451644516545166451674516845169451704517145172451734517445175451764517745178451794518045181451824518345184451854518645187451884518945190451914519245193451944519545196451974519845199452004520145202452034520445205452064520745208452094521045211452124521345214452154521645217452184521945220452214522245223452244522545226452274522845229452304523145232452334523445235452364523745238452394524045241452424524345244452454524645247452484524945250452514525245253452544525545256452574525845259452604526145262452634526445265452664526745268452694527045271452724527345274452754527645277452784527945280452814528245283452844528545286452874528845289452904529145292452934529445295452964529745298452994530045301453024530345304453054530645307453084530945310453114531245313453144531545316453174531845319453204532145322453234532445325453264532745328453294533045331453324533345334453354533645337453384533945340453414534245343453444534545346453474534845349453504535145352453534535445355453564535745358453594536045361453624536345364453654536645367453684536945370453714537245373453744537545376453774537845379453804538145382453834538445385453864538745388453894539045391453924539345394453954539645397453984539945400454014540245403454044540545406454074540845409454104541145412454134541445415454164541745418454194542045421454224542345424454254542645427454284542945430454314543245433454344543545436454374543845439454404544145442454434544445445454464544745448454494545045451454524545345454454554545645457454584545945460454614546245463454644546545466454674546845469454704547145472454734547445475454764547745478454794548045481454824548345484454854548645487454884548945490454914549245493454944549545496454974549845499455004550145502455034550445505455064550745508455094551045511455124551345514455154551645517455184551945520455214552245523455244552545526455274552845529455304553145532455334553445535455364553745538455394554045541455424554345544455454554645547455484554945550455514555245553455544555545556455574555845559455604556145562455634556445565455664556745568455694557045571455724557345574455754557645577455784557945580455814558245583455844558545586455874558845589455904559145592455934559445595455964559745598455994560045601456024560345604456054560645607456084560945610456114561245613456144561545616456174561845619456204562145622456234562445625456264562745628456294563045631456324563345634456354563645637456384563945640456414564245643456444564545646456474564845649456504565145652456534565445655456564565745658456594566045661456624566345664456654566645667456684566945670456714567245673456744567545676456774567845679456804568145682456834568445685456864568745688456894569045691456924569345694456954569645697456984569945700457014570245703457044570545706457074570845709457104571145712457134571445715457164571745718457194572045721457224572345724457254572645727457284572945730457314573245733457344573545736457374573845739457404574145742457434574445745457464574745748457494575045751457524575345754457554575645757457584575945760457614576245763457644576545766457674576845769457704577145772457734577445775457764577745778457794578045781457824578345784457854578645787457884578945790457914579245793457944579545796457974579845799458004580145802458034580445805458064580745808458094581045811458124581345814458154581645817458184581945820458214582245823458244582545826458274582845829458304583145832458334583445835458364583745838458394584045841458424584345844458454584645847458484584945850458514585245853458544585545856458574585845859458604586145862458634586445865458664586745868458694587045871458724587345874458754587645877458784587945880458814588245883458844588545886458874588845889458904589145892458934589445895458964589745898458994590045901459024590345904459054590645907459084590945910459114591245913459144591545916459174591845919459204592145922459234592445925459264592745928459294593045931459324593345934459354593645937459384593945940459414594245943459444594545946459474594845949459504595145952459534595445955459564595745958459594596045961459624596345964459654596645967459684596945970459714597245973459744597545976459774597845979459804598145982459834598445985459864598745988459894599045991459924599345994459954599645997459984599946000460014600246003460044600546006460074600846009460104601146012460134601446015460164601746018460194602046021460224602346024460254602646027460284602946030460314603246033460344603546036460374603846039460404604146042460434604446045460464604746048460494605046051460524605346054460554605646057460584605946060460614606246063460644606546066460674606846069460704607146072460734607446075460764607746078460794608046081460824608346084460854608646087460884608946090460914609246093460944609546096460974609846099461004610146102461034610446105461064610746108461094611046111461124611346114461154611646117461184611946120461214612246123461244612546126461274612846129461304613146132461334613446135461364613746138461394614046141461424614346144461454614646147461484614946150461514615246153461544615546156461574615846159461604616146162461634616446165461664616746168461694617046171461724617346174461754617646177461784617946180461814618246183461844618546186461874618846189461904619146192461934619446195461964619746198461994620046201462024620346204462054620646207462084620946210462114621246213462144621546216462174621846219462204622146222462234622446225462264622746228462294623046231462324623346234462354623646237462384623946240462414624246243462444624546246462474624846249462504625146252462534625446255462564625746258462594626046261462624626346264462654626646267462684626946270462714627246273462744627546276462774627846279462804628146282462834628446285462864628746288462894629046291462924629346294462954629646297462984629946300463014630246303463044630546306463074630846309463104631146312463134631446315463164631746318463194632046321463224632346324463254632646327463284632946330463314633246333463344633546336463374633846339463404634146342463434634446345463464634746348463494635046351463524635346354463554635646357463584635946360463614636246363463644636546366463674636846369463704637146372463734637446375463764637746378463794638046381463824638346384463854638646387463884638946390463914639246393463944639546396463974639846399464004640146402464034640446405464064640746408464094641046411464124641346414464154641646417464184641946420464214642246423464244642546426464274642846429464304643146432464334643446435464364643746438464394644046441464424644346444464454644646447464484644946450464514645246453464544645546456464574645846459464604646146462464634646446465464664646746468464694647046471464724647346474464754647646477464784647946480464814648246483464844648546486464874648846489464904649146492464934649446495464964649746498464994650046501465024650346504465054650646507465084650946510465114651246513465144651546516465174651846519465204652146522465234652446525465264652746528465294653046531465324653346534465354653646537465384653946540465414654246543465444654546546465474654846549465504655146552465534655446555465564655746558465594656046561465624656346564465654656646567465684656946570465714657246573465744657546576465774657846579465804658146582465834658446585465864658746588465894659046591465924659346594465954659646597465984659946600466014660246603466044660546606466074660846609466104661146612466134661446615466164661746618466194662046621466224662346624466254662646627466284662946630466314663246633466344663546636466374663846639466404664146642466434664446645466464664746648466494665046651466524665346654466554665646657466584665946660466614666246663466644666546666466674666846669466704667146672466734667446675466764667746678466794668046681466824668346684466854668646687466884668946690466914669246693466944669546696466974669846699467004670146702467034670446705467064670746708467094671046711467124671346714467154671646717467184671946720467214672246723467244672546726467274672846729467304673146732467334673446735467364673746738467394674046741467424674346744467454674646747467484674946750467514675246753467544675546756467574675846759467604676146762467634676446765467664676746768467694677046771467724677346774467754677646777467784677946780467814678246783467844678546786467874678846789467904679146792467934679446795467964679746798467994680046801468024680346804468054680646807468084680946810468114681246813468144681546816468174681846819468204682146822468234682446825468264682746828468294683046831468324683346834468354683646837468384683946840468414684246843468444684546846468474684846849468504685146852468534685446855468564685746858468594686046861468624686346864468654686646867468684686946870468714687246873468744687546876468774687846879468804688146882468834688446885468864688746888468894689046891468924689346894468954689646897468984689946900469014690246903469044690546906469074690846909469104691146912469134691446915469164691746918469194692046921469224692346924469254692646927469284692946930469314693246933469344693546936469374693846939469404694146942469434694446945469464694746948469494695046951469524695346954469554695646957469584695946960469614696246963469644696546966469674696846969469704697146972469734697446975469764697746978469794698046981469824698346984469854698646987469884698946990469914699246993469944699546996469974699846999470004700147002470034700447005470064700747008470094701047011470124701347014470154701647017470184701947020470214702247023470244702547026470274702847029470304703147032470334703447035470364703747038470394704047041470424704347044470454704647047470484704947050470514705247053470544705547056470574705847059470604706147062470634706447065470664706747068470694707047071470724707347074470754707647077470784707947080470814708247083470844708547086470874708847089470904709147092470934709447095470964709747098470994710047101471024710347104471054710647107471084710947110471114711247113471144711547116471174711847119471204712147122471234712447125471264712747128471294713047131471324713347134471354713647137471384713947140471414714247143471444714547146471474714847149471504715147152471534715447155471564715747158471594716047161471624716347164471654716647167471684716947170471714717247173471744717547176471774717847179471804718147182471834718447185471864718747188471894719047191471924719347194471954719647197471984719947200472014720247203472044720547206472074720847209472104721147212472134721447215472164721747218472194722047221472224722347224472254722647227472284722947230472314723247233472344723547236472374723847239472404724147242472434724447245472464724747248472494725047251472524725347254472554725647257472584725947260472614726247263472644726547266472674726847269472704727147272472734727447275472764727747278472794728047281472824728347284472854728647287472884728947290472914729247293472944729547296472974729847299473004730147302473034730447305473064730747308473094731047311473124731347314473154731647317473184731947320473214732247323473244732547326473274732847329473304733147332473334733447335473364733747338473394734047341473424734347344473454734647347473484734947350473514735247353473544735547356473574735847359473604736147362473634736447365473664736747368473694737047371473724737347374473754737647377473784737947380473814738247383473844738547386473874738847389473904739147392473934739447395473964739747398473994740047401474024740347404474054740647407474084740947410474114741247413474144741547416474174741847419474204742147422474234742447425474264742747428474294743047431474324743347434474354743647437474384743947440474414744247443474444744547446474474744847449474504745147452474534745447455474564745747458474594746047461474624746347464474654746647467474684746947470474714747247473474744747547476474774747847479474804748147482474834748447485474864748747488474894749047491474924749347494474954749647497474984749947500475014750247503475044750547506475074750847509475104751147512475134751447515475164751747518475194752047521475224752347524475254752647527475284752947530475314753247533475344753547536475374753847539475404754147542475434754447545475464754747548475494755047551475524755347554475554755647557475584755947560475614756247563475644756547566475674756847569475704757147572475734757447575475764757747578475794758047581475824758347584475854758647587475884758947590475914759247593475944759547596475974759847599476004760147602476034760447605476064760747608476094761047611476124761347614476154761647617476184761947620476214762247623476244762547626476274762847629476304763147632476334763447635476364763747638476394764047641476424764347644476454764647647476484764947650476514765247653476544765547656476574765847659476604766147662476634766447665476664766747668476694767047671476724767347674476754767647677476784767947680476814768247683476844768547686476874768847689476904769147692476934769447695476964769747698476994770047701477024770347704477054770647707477084770947710477114771247713477144771547716477174771847719477204772147722477234772447725477264772747728477294773047731477324773347734477354773647737477384773947740477414774247743477444774547746477474774847749477504775147752477534775447755477564775747758477594776047761477624776347764477654776647767477684776947770477714777247773477744777547776477774777847779477804778147782477834778447785477864778747788477894779047791477924779347794477954779647797477984779947800478014780247803478044780547806478074780847809478104781147812478134781447815478164781747818478194782047821478224782347824478254782647827478284782947830478314783247833478344783547836478374783847839478404784147842478434784447845478464784747848478494785047851478524785347854478554785647857478584785947860478614786247863478644786547866478674786847869478704787147872478734787447875478764787747878478794788047881478824788347884478854788647887478884788947890478914789247893478944789547896478974789847899479004790147902479034790447905479064790747908479094791047911479124791347914479154791647917479184791947920479214792247923479244792547926479274792847929479304793147932479334793447935479364793747938479394794047941479424794347944479454794647947479484794947950479514795247953479544795547956479574795847959479604796147962479634796447965479664796747968479694797047971479724797347974479754797647977479784797947980479814798247983479844798547986479874798847989479904799147992479934799447995479964799747998479994800048001480024800348004480054800648007480084800948010480114801248013480144801548016480174801848019480204802148022480234802448025480264802748028480294803048031480324803348034480354803648037480384803948040480414804248043480444804548046480474804848049480504805148052480534805448055480564805748058480594806048061480624806348064480654806648067480684806948070480714807248073480744807548076480774807848079480804808148082480834808448085480864808748088480894809048091480924809348094480954809648097480984809948100481014810248103481044810548106481074810848109481104811148112481134811448115481164811748118481194812048121481224812348124481254812648127481284812948130481314813248133481344813548136481374813848139481404814148142481434814448145481464814748148481494815048151481524815348154481554815648157481584815948160481614816248163481644816548166481674816848169481704817148172481734817448175481764817748178481794818048181481824818348184481854818648187481884818948190481914819248193481944819548196481974819848199482004820148202482034820448205482064820748208482094821048211482124821348214482154821648217482184821948220482214822248223482244822548226482274822848229482304823148232482334823448235482364823748238482394824048241482424824348244482454824648247482484824948250482514825248253482544825548256482574825848259482604826148262482634826448265482664826748268482694827048271482724827348274482754827648277482784827948280482814828248283482844828548286482874828848289482904829148292482934829448295482964829748298482994830048301483024830348304483054830648307483084830948310483114831248313483144831548316483174831848319483204832148322483234832448325483264832748328483294833048331483324833348334483354833648337483384833948340483414834248343483444834548346483474834848349483504835148352483534835448355483564835748358483594836048361483624836348364483654836648367483684836948370483714837248373483744837548376483774837848379483804838148382483834838448385483864838748388483894839048391483924839348394483954839648397483984839948400484014840248403484044840548406484074840848409484104841148412484134841448415484164841748418484194842048421484224842348424484254842648427484284842948430484314843248433484344843548436484374843848439484404844148442484434844448445484464844748448484494845048451484524845348454484554845648457484584845948460484614846248463484644846548466484674846848469484704847148472484734847448475484764847748478484794848048481484824848348484484854848648487484884848948490484914849248493484944849548496484974849848499485004850148502485034850448505485064850748508485094851048511485124851348514485154851648517485184851948520485214852248523485244852548526485274852848529485304853148532485334853448535485364853748538485394854048541485424854348544485454854648547485484854948550485514855248553485544855548556485574855848559485604856148562485634856448565485664856748568485694857048571485724857348574485754857648577485784857948580485814858248583485844858548586485874858848589485904859148592485934859448595485964859748598485994860048601486024860348604486054860648607486084860948610486114861248613486144861548616486174861848619486204862148622486234862448625486264862748628486294863048631486324863348634486354863648637486384863948640486414864248643486444864548646486474864848649486504865148652486534865448655486564865748658486594866048661486624866348664486654866648667486684866948670486714867248673486744867548676486774867848679486804868148682486834868448685486864868748688486894869048691486924869348694486954869648697486984869948700487014870248703487044870548706487074870848709487104871148712487134871448715487164871748718487194872048721487224872348724487254872648727487284872948730487314873248733487344873548736487374873848739487404874148742487434874448745487464874748748487494875048751487524875348754487554875648757487584875948760487614876248763487644876548766487674876848769487704877148772487734877448775487764877748778487794878048781487824878348784487854878648787487884878948790487914879248793487944879548796487974879848799488004880148802488034880448805488064880748808488094881048811488124881348814488154881648817488184881948820488214882248823488244882548826488274882848829488304883148832488334883448835488364883748838488394884048841488424884348844488454884648847488484884948850488514885248853488544885548856488574885848859488604886148862488634886448865488664886748868488694887048871488724887348874488754887648877488784887948880488814888248883488844888548886488874888848889488904889148892488934889448895488964889748898488994890048901489024890348904489054890648907489084890948910489114891248913489144891548916489174891848919489204892148922489234892448925489264892748928489294893048931489324893348934489354893648937489384893948940489414894248943489444894548946489474894848949489504895148952489534895448955489564895748958489594896048961489624896348964489654896648967489684896948970489714897248973489744897548976489774897848979489804898148982489834898448985489864898748988489894899048991489924899348994489954899648997489984899949000490014900249003490044900549006490074900849009490104901149012490134901449015490164901749018490194902049021490224902349024490254902649027490284902949030490314903249033490344903549036490374903849039490404904149042490434904449045490464904749048490494905049051490524905349054490554905649057490584905949060490614906249063490644906549066490674906849069490704907149072490734907449075490764907749078490794908049081490824908349084490854908649087490884908949090490914909249093490944909549096490974909849099491004910149102491034910449105491064910749108491094911049111491124911349114491154911649117491184911949120491214912249123491244912549126491274912849129491304913149132491334913449135491364913749138491394914049141491424914349144491454914649147491484914949150491514915249153491544915549156491574915849159491604916149162491634916449165491664916749168491694917049171491724917349174491754917649177491784917949180491814918249183491844918549186491874918849189491904919149192491934919449195491964919749198491994920049201492024920349204492054920649207492084920949210492114921249213492144921549216492174921849219492204922149222492234922449225492264922749228492294923049231492324923349234492354923649237492384923949240492414924249243492444924549246492474924849249492504925149252492534925449255492564925749258492594926049261492624926349264492654926649267492684926949270492714927249273492744927549276492774927849279492804928149282492834928449285492864928749288492894929049291492924929349294492954929649297492984929949300493014930249303493044930549306493074930849309493104931149312493134931449315493164931749318493194932049321493224932349324493254932649327493284932949330493314933249333493344933549336493374933849339493404934149342493434934449345493464934749348493494935049351493524935349354493554935649357493584935949360493614936249363493644936549366493674936849369493704937149372493734937449375493764937749378493794938049381493824938349384493854938649387493884938949390493914939249393493944939549396493974939849399494004940149402494034940449405494064940749408494094941049411494124941349414494154941649417494184941949420494214942249423494244942549426494274942849429494304943149432494334943449435494364943749438494394944049441494424944349444494454944649447494484944949450494514945249453494544945549456494574945849459494604946149462494634946449465494664946749468494694947049471494724947349474494754947649477494784947949480494814948249483494844948549486494874948849489494904949149492494934949449495494964949749498494994950049501495024950349504495054950649507495084950949510495114951249513495144951549516495174951849519495204952149522495234952449525495264952749528495294953049531495324953349534495354953649537495384953949540495414954249543495444954549546495474954849549495504955149552495534955449555495564955749558495594956049561495624956349564495654956649567495684956949570495714957249573495744957549576495774957849579495804958149582495834958449585495864958749588495894959049591495924959349594495954959649597495984959949600496014960249603496044960549606496074960849609496104961149612496134961449615496164961749618496194962049621496224962349624496254962649627496284962949630496314963249633496344963549636496374963849639496404964149642496434964449645496464964749648496494965049651496524965349654496554965649657496584965949660496614966249663496644966549666496674966849669496704967149672496734967449675496764967749678496794968049681496824968349684496854968649687496884968949690496914969249693496944969549696496974969849699497004970149702497034970449705497064970749708497094971049711497124971349714497154971649717497184971949720497214972249723497244972549726497274972849729497304973149732497334973449735497364973749738497394974049741497424974349744497454974649747497484974949750497514975249753497544975549756497574975849759497604976149762497634976449765497664976749768497694977049771497724977349774497754977649777497784977949780497814978249783497844978549786497874978849789497904979149792497934979449795497964979749798497994980049801498024980349804498054980649807498084980949810498114981249813498144981549816498174981849819498204982149822498234982449825498264982749828498294983049831498324983349834498354983649837498384983949840498414984249843498444984549846498474984849849498504985149852498534985449855498564985749858498594986049861498624986349864498654986649867498684986949870498714987249873498744987549876498774987849879498804988149882498834988449885498864988749888498894989049891498924989349894498954989649897498984989949900499014990249903499044990549906499074990849909499104991149912499134991449915499164991749918499194992049921499224992349924499254992649927499284992949930499314993249933499344993549936499374993849939499404994149942499434994449945499464994749948499494995049951499524995349954499554995649957499584995949960499614996249963499644996549966499674996849969499704997149972499734997449975499764997749978499794998049981499824998349984499854998649987499884998949990499914999249993499944999549996499974999849999500005000150002500035000450005500065000750008500095001050011500125001350014500155001650017500185001950020500215002250023500245002550026500275002850029500305003150032500335003450035500365003750038500395004050041500425004350044500455004650047500485004950050500515005250053500545005550056500575005850059500605006150062500635006450065500665006750068500695007050071500725007350074500755007650077500785007950080500815008250083500845008550086500875008850089500905009150092500935009450095500965009750098500995010050101501025010350104501055010650107501085010950110501115011250113501145011550116501175011850119501205012150122501235012450125501265012750128501295013050131501325013350134501355013650137501385013950140501415014250143501445014550146501475014850149501505015150152501535015450155501565015750158501595016050161501625016350164501655016650167501685016950170501715017250173501745017550176501775017850179501805018150182501835018450185501865018750188501895019050191501925019350194501955019650197501985019950200502015020250203502045020550206502075020850209502105021150212502135021450215502165021750218502195022050221502225022350224502255022650227502285022950230502315023250233502345023550236502375023850239502405024150242502435024450245502465024750248502495025050251502525025350254502555025650257502585025950260502615026250263502645026550266502675026850269502705027150272502735027450275502765027750278502795028050281502825028350284502855028650287502885028950290502915029250293502945029550296502975029850299503005030150302503035030450305503065030750308503095031050311503125031350314503155031650317503185031950320503215032250323503245032550326503275032850329503305033150332503335033450335503365033750338503395034050341503425034350344503455034650347503485034950350503515035250353503545035550356503575035850359503605036150362503635036450365503665036750368503695037050371503725037350374503755037650377503785037950380503815038250383503845038550386503875038850389503905039150392503935039450395503965039750398503995040050401504025040350404504055040650407504085040950410504115041250413504145041550416504175041850419504205042150422504235042450425504265042750428504295043050431504325043350434504355043650437504385043950440504415044250443504445044550446504475044850449504505045150452504535045450455504565045750458504595046050461504625046350464504655046650467504685046950470504715047250473504745047550476504775047850479504805048150482504835048450485504865048750488504895049050491504925049350494504955049650497504985049950500505015050250503505045050550506505075050850509505105051150512505135051450515505165051750518505195052050521505225052350524505255052650527505285052950530505315053250533505345053550536505375053850539505405054150542505435054450545505465054750548505495055050551505525055350554505555055650557505585055950560505615056250563505645056550566505675056850569505705057150572505735057450575505765057750578505795058050581505825058350584505855058650587505885058950590505915059250593505945059550596505975059850599506005060150602506035060450605506065060750608506095061050611506125061350614506155061650617506185061950620506215062250623506245062550626506275062850629506305063150632506335063450635506365063750638506395064050641506425064350644506455064650647506485064950650506515065250653506545065550656506575065850659506605066150662506635066450665506665066750668506695067050671506725067350674506755067650677506785067950680506815068250683506845068550686506875068850689506905069150692506935069450695506965069750698506995070050701507025070350704507055070650707507085070950710507115071250713507145071550716507175071850719507205072150722507235072450725507265072750728507295073050731507325073350734507355073650737507385073950740507415074250743507445074550746507475074850749507505075150752507535075450755507565075750758507595076050761507625076350764507655076650767507685076950770507715077250773507745077550776507775077850779507805078150782507835078450785507865078750788507895079050791507925079350794507955079650797507985079950800508015080250803508045080550806508075080850809508105081150812508135081450815508165081750818508195082050821508225082350824508255082650827508285082950830508315083250833508345083550836508375083850839508405084150842508435084450845508465084750848508495085050851508525085350854508555085650857508585085950860508615086250863508645086550866508675086850869508705087150872508735087450875508765087750878508795088050881508825088350884508855088650887508885088950890508915089250893508945089550896508975089850899509005090150902509035090450905509065090750908509095091050911509125091350914509155091650917509185091950920509215092250923509245092550926509275092850929509305093150932509335093450935509365093750938509395094050941509425094350944509455094650947509485094950950509515095250953509545095550956509575095850959509605096150962509635096450965509665096750968509695097050971509725097350974509755097650977509785097950980509815098250983509845098550986509875098850989509905099150992509935099450995509965099750998509995100051001510025100351004510055100651007510085100951010510115101251013510145101551016510175101851019510205102151022510235102451025510265102751028510295103051031510325103351034510355103651037510385103951040510415104251043510445104551046510475104851049510505105151052510535105451055510565105751058510595106051061510625106351064510655106651067510685106951070510715107251073510745107551076510775107851079510805108151082510835108451085510865108751088510895109051091510925109351094510955109651097510985109951100511015110251103511045110551106511075110851109511105111151112511135111451115511165111751118511195112051121511225112351124511255112651127511285112951130511315113251133511345113551136511375113851139511405114151142511435114451145511465114751148511495115051151511525115351154511555115651157511585115951160511615116251163511645116551166511675116851169511705117151172511735117451175511765117751178511795118051181511825118351184511855118651187511885118951190511915119251193511945119551196511975119851199512005120151202512035120451205512065120751208512095121051211512125121351214512155121651217512185121951220512215122251223512245122551226512275122851229512305123151232512335123451235512365123751238512395124051241512425124351244512455124651247512485124951250512515125251253512545125551256512575125851259512605126151262512635126451265512665126751268512695127051271512725127351274512755127651277512785127951280512815128251283512845128551286512875128851289512905129151292512935129451295512965129751298512995130051301513025130351304513055130651307513085130951310513115131251313513145131551316513175131851319513205132151322513235132451325513265132751328513295133051331513325133351334513355133651337513385133951340513415134251343513445134551346513475134851349513505135151352513535135451355513565135751358513595136051361513625136351364513655136651367513685136951370513715137251373513745137551376513775137851379513805138151382513835138451385513865138751388513895139051391513925139351394513955139651397513985139951400514015140251403514045140551406514075140851409514105141151412514135141451415514165141751418514195142051421514225142351424514255142651427514285142951430514315143251433514345143551436514375143851439514405144151442514435144451445514465144751448514495145051451514525145351454514555145651457514585145951460514615146251463514645146551466514675146851469514705147151472514735147451475514765147751478514795148051481514825148351484514855148651487514885148951490514915149251493514945149551496514975149851499515005150151502515035150451505515065150751508515095151051511515125151351514515155151651517515185151951520515215152251523515245152551526515275152851529515305153151532515335153451535515365153751538515395154051541515425154351544515455154651547515485154951550515515155251553515545155551556515575155851559515605156151562515635156451565515665156751568515695157051571515725157351574515755157651577515785157951580515815158251583515845158551586515875158851589515905159151592515935159451595515965159751598515995160051601516025160351604516055160651607516085160951610516115161251613516145161551616516175161851619516205162151622516235162451625516265162751628516295163051631516325163351634516355163651637516385163951640516415164251643516445164551646516475164851649516505165151652516535165451655516565165751658516595166051661516625166351664516655166651667516685166951670516715167251673516745167551676516775167851679516805168151682516835168451685516865168751688516895169051691516925169351694516955169651697516985169951700517015170251703517045170551706517075170851709517105171151712517135171451715517165171751718517195172051721517225172351724517255172651727517285172951730517315173251733517345173551736517375173851739517405174151742517435174451745517465174751748517495175051751517525175351754517555175651757517585175951760517615176251763517645176551766517675176851769517705177151772517735177451775517765177751778517795178051781517825178351784517855178651787517885178951790517915179251793517945179551796517975179851799518005180151802518035180451805518065180751808518095181051811518125181351814518155181651817518185181951820518215182251823518245182551826518275182851829518305183151832518335183451835518365183751838518395184051841518425184351844518455184651847518485184951850518515185251853518545185551856518575185851859518605186151862518635186451865518665186751868518695187051871518725187351874518755187651877518785187951880518815188251883518845188551886518875188851889518905189151892518935189451895518965189751898518995190051901519025190351904519055190651907519085190951910519115191251913519145191551916519175191851919519205192151922519235192451925519265192751928519295193051931519325193351934519355193651937519385193951940519415194251943519445194551946519475194851949519505195151952519535195451955519565195751958519595196051961519625196351964519655196651967519685196951970519715197251973519745197551976519775197851979519805198151982519835198451985519865198751988519895199051991519925199351994519955199651997519985199952000520015200252003520045200552006520075200852009520105201152012520135201452015520165201752018520195202052021520225202352024520255202652027520285202952030520315203252033520345203552036520375203852039520405204152042520435204452045520465204752048520495205052051520525205352054520555205652057520585205952060520615206252063520645206552066520675206852069520705207152072520735207452075520765207752078520795208052081520825208352084520855208652087520885208952090520915209252093520945209552096520975209852099521005210152102521035210452105521065210752108521095211052111521125211352114521155211652117521185211952120521215212252123521245212552126521275212852129521305213152132521335213452135521365213752138521395214052141521425214352144521455214652147521485214952150521515215252153521545215552156521575215852159521605216152162521635216452165521665216752168521695217052171521725217352174521755217652177521785217952180521815218252183521845218552186521875218852189521905219152192521935219452195521965219752198521995220052201522025220352204522055220652207522085220952210522115221252213522145221552216522175221852219522205222152222522235222452225522265222752228522295223052231522325223352234522355223652237522385223952240522415224252243522445224552246522475224852249522505225152252522535225452255522565225752258522595226052261522625226352264522655226652267522685226952270522715227252273522745227552276522775227852279522805228152282522835228452285522865228752288522895229052291522925229352294522955229652297522985229952300523015230252303523045230552306523075230852309523105231152312523135231452315523165231752318523195232052321523225232352324523255232652327523285232952330523315233252333523345233552336523375233852339523405234152342523435234452345523465234752348523495235052351523525235352354523555235652357523585235952360523615236252363523645236552366523675236852369523705237152372523735237452375523765237752378523795238052381523825238352384523855238652387523885238952390523915239252393523945239552396523975239852399524005240152402524035240452405524065240752408524095241052411524125241352414524155241652417524185241952420524215242252423524245242552426524275242852429524305243152432524335243452435524365243752438524395244052441524425244352444524455244652447524485244952450524515245252453524545245552456524575245852459524605246152462524635246452465524665246752468524695247052471524725247352474524755247652477524785247952480524815248252483524845248552486524875248852489524905249152492524935249452495524965249752498524995250052501525025250352504525055250652507525085250952510525115251252513525145251552516525175251852519525205252152522525235252452525525265252752528525295253052531525325253352534525355253652537525385253952540525415254252543525445254552546525475254852549525505255152552525535255452555525565255752558525595256052561525625256352564525655256652567525685256952570525715257252573525745257552576525775257852579525805258152582525835258452585525865258752588525895259052591525925259352594525955259652597525985259952600526015260252603526045260552606526075260852609526105261152612526135261452615526165261752618526195262052621526225262352624526255262652627526285262952630526315263252633526345263552636526375263852639526405264152642526435264452645526465264752648526495265052651526525265352654526555265652657526585265952660526615266252663526645266552666526675266852669526705267152672526735267452675526765267752678526795268052681526825268352684526855268652687526885268952690526915269252693526945269552696526975269852699527005270152702527035270452705527065270752708527095271052711527125271352714527155271652717527185271952720527215272252723527245272552726527275272852729527305273152732527335273452735527365273752738527395274052741527425274352744527455274652747527485274952750527515275252753527545275552756527575275852759527605276152762527635276452765527665276752768527695277052771527725277352774527755277652777527785277952780527815278252783527845278552786527875278852789527905279152792527935279452795527965279752798527995280052801528025280352804528055280652807528085280952810528115281252813528145281552816528175281852819528205282152822528235282452825528265282752828528295283052831528325283352834528355283652837528385283952840528415284252843528445284552846528475284852849528505285152852528535285452855528565285752858528595286052861528625286352864528655286652867528685286952870528715287252873528745287552876528775287852879528805288152882528835288452885528865288752888528895289052891528925289352894528955289652897528985289952900529015290252903529045290552906529075290852909529105291152912529135291452915529165291752918529195292052921529225292352924529255292652927529285292952930529315293252933529345293552936529375293852939529405294152942529435294452945529465294752948529495295052951529525295352954529555295652957529585295952960529615296252963529645296552966529675296852969529705297152972529735297452975529765297752978529795298052981529825298352984529855298652987529885298952990529915299252993529945299552996529975299852999530005300153002530035300453005530065300753008530095301053011530125301353014530155301653017530185301953020530215302253023530245302553026530275302853029530305303153032530335303453035530365303753038530395304053041530425304353044530455304653047530485304953050530515305253053530545305553056530575305853059530605306153062530635306453065530665306753068530695307053071530725307353074530755307653077530785307953080530815308253083530845308553086530875308853089530905309153092530935309453095530965309753098530995310053101531025310353104531055310653107531085310953110531115311253113531145311553116531175311853119531205312153122531235312453125531265312753128531295313053131531325313353134531355313653137531385313953140531415314253143531445314553146531475314853149531505315153152531535315453155531565315753158531595316053161531625316353164531655316653167531685316953170531715317253173531745317553176531775317853179531805318153182531835318453185531865318753188531895319053191531925319353194531955319653197531985319953200532015320253203532045320553206532075320853209532105321153212532135321453215532165321753218532195322053221532225322353224532255322653227532285322953230532315323253233532345323553236532375323853239532405324153242532435324453245532465324753248532495325053251532525325353254532555325653257532585325953260532615326253263532645326553266532675326853269532705327153272532735327453275532765327753278532795328053281532825328353284532855328653287532885328953290532915329253293532945329553296532975329853299533005330153302533035330453305533065330753308533095331053311533125331353314533155331653317533185331953320533215332253323533245332553326533275332853329533305333153332533335333453335533365333753338533395334053341533425334353344533455334653347533485334953350533515335253353533545335553356533575335853359533605336153362533635336453365533665336753368533695337053371533725337353374533755337653377533785337953380533815338253383533845338553386533875338853389533905339153392533935339453395533965339753398533995340053401534025340353404534055340653407534085340953410534115341253413534145341553416534175341853419534205342153422534235342453425534265342753428534295343053431534325343353434534355343653437534385343953440534415344253443534445344553446534475344853449534505345153452534535345453455534565345753458534595346053461534625346353464534655346653467534685346953470534715347253473534745347553476534775347853479534805348153482534835348453485534865348753488534895349053491534925349353494534955349653497534985349953500535015350253503535045350553506535075350853509535105351153512535135351453515535165351753518535195352053521535225352353524535255352653527535285352953530535315353253533535345353553536535375353853539535405354153542535435354453545535465354753548535495355053551535525355353554535555355653557535585355953560535615356253563535645356553566535675356853569535705357153572535735357453575535765357753578535795358053581535825358353584535855358653587535885358953590535915359253593535945359553596535975359853599536005360153602536035360453605536065360753608536095361053611536125361353614536155361653617536185361953620536215362253623536245362553626536275362853629536305363153632536335363453635536365363753638536395364053641536425364353644536455364653647536485364953650536515365253653536545365553656536575365853659536605366153662536635366453665536665366753668536695367053671536725367353674536755367653677536785367953680536815368253683536845368553686536875368853689536905369153692536935369453695536965369753698536995370053701537025370353704537055370653707537085370953710537115371253713537145371553716537175371853719537205372153722537235372453725537265372753728537295373053731537325373353734537355373653737537385373953740537415374253743537445374553746537475374853749537505375153752537535375453755537565375753758537595376053761537625376353764537655376653767537685376953770537715377253773537745377553776537775377853779537805378153782537835378453785537865378753788537895379053791537925379353794537955379653797537985379953800538015380253803538045380553806538075380853809538105381153812538135381453815538165381753818538195382053821538225382353824538255382653827538285382953830538315383253833538345383553836538375383853839538405384153842538435384453845538465384753848538495385053851538525385353854538555385653857538585385953860538615386253863538645386553866538675386853869538705387153872538735387453875538765387753878538795388053881538825388353884538855388653887538885388953890538915389253893538945389553896538975389853899539005390153902539035390453905539065390753908539095391053911539125391353914539155391653917539185391953920539215392253923539245392553926539275392853929539305393153932539335393453935539365393753938539395394053941539425394353944539455394653947539485394953950539515395253953539545395553956539575395853959539605396153962539635396453965539665396753968539695397053971539725397353974539755397653977539785397953980539815398253983539845398553986539875398853989539905399153992539935399453995539965399753998539995400054001540025400354004540055400654007540085400954010540115401254013540145401554016540175401854019540205402154022540235402454025540265402754028540295403054031540325403354034540355403654037540385403954040540415404254043540445404554046540475404854049540505405154052540535405454055540565405754058540595406054061540625406354064540655406654067540685406954070540715407254073540745407554076540775407854079540805408154082540835408454085540865408754088540895409054091540925409354094540955409654097540985409954100541015410254103541045410554106541075410854109541105411154112541135411454115541165411754118541195412054121541225412354124541255412654127541285412954130541315413254133541345413554136541375413854139541405414154142541435414454145541465414754148541495415054151541525415354154541555415654157541585415954160541615416254163541645416554166541675416854169541705417154172541735417454175541765417754178541795418054181541825418354184541855418654187541885418954190541915419254193541945419554196541975419854199542005420154202542035420454205542065420754208542095421054211542125421354214542155421654217542185421954220542215422254223542245422554226542275422854229542305423154232542335423454235542365423754238542395424054241542425424354244542455424654247542485424954250542515425254253542545425554256542575425854259542605426154262542635426454265542665426754268542695427054271542725427354274542755427654277542785427954280542815428254283542845428554286542875428854289542905429154292542935429454295542965429754298542995430054301543025430354304543055430654307543085430954310543115431254313543145431554316543175431854319543205432154322543235432454325543265432754328543295433054331543325433354334543355433654337543385433954340543415434254343543445434554346543475434854349543505435154352543535435454355543565435754358543595436054361543625436354364543655436654367543685436954370543715437254373543745437554376543775437854379543805438154382543835438454385543865438754388543895439054391543925439354394543955439654397543985439954400544015440254403544045440554406544075440854409544105441154412544135441454415544165441754418544195442054421544225442354424544255442654427544285442954430544315443254433544345443554436544375443854439544405444154442544435444454445544465444754448544495445054451544525445354454544555445654457544585445954460544615446254463544645446554466544675446854469544705447154472544735447454475544765447754478544795448054481544825448354484544855448654487544885448954490544915449254493544945449554496544975449854499545005450154502545035450454505545065450754508545095451054511545125451354514545155451654517545185451954520545215452254523545245452554526545275452854529545305453154532545335453454535545365453754538545395454054541545425454354544545455454654547545485454954550545515455254553545545455554556545575455854559545605456154562545635456454565545665456754568545695457054571545725457354574545755457654577545785457954580545815458254583545845458554586545875458854589545905459154592545935459454595545965459754598545995460054601546025460354604546055460654607546085460954610546115461254613546145461554616546175461854619546205462154622546235462454625546265462754628546295463054631546325463354634546355463654637546385463954640546415464254643546445464554646546475464854649546505465154652546535465454655546565465754658546595466054661546625466354664546655466654667546685466954670546715467254673546745467554676546775467854679546805468154682546835468454685546865468754688546895469054691546925469354694546955469654697546985469954700547015470254703547045470554706547075470854709547105471154712547135471454715547165471754718547195472054721547225472354724547255472654727547285472954730547315473254733547345473554736547375473854739547405474154742547435474454745547465474754748547495475054751547525475354754547555475654757547585475954760547615476254763547645476554766547675476854769547705477154772547735477454775547765477754778547795478054781547825478354784547855478654787547885478954790547915479254793547945479554796547975479854799548005480154802548035480454805548065480754808548095481054811548125481354814548155481654817548185481954820548215482254823548245482554826548275482854829548305483154832548335483454835548365483754838548395484054841548425484354844548455484654847548485484954850548515485254853548545485554856548575485854859548605486154862548635486454865548665486754868548695487054871548725487354874548755487654877548785487954880548815488254883548845488554886548875488854889548905489154892548935489454895548965489754898548995490054901549025490354904549055490654907549085490954910549115491254913549145491554916549175491854919549205492154922549235492454925549265492754928549295493054931549325493354934549355493654937549385493954940549415494254943549445494554946549475494854949549505495154952549535495454955549565495754958549595496054961549625496354964549655496654967549685496954970549715497254973549745497554976549775497854979549805498154982549835498454985549865498754988549895499054991549925499354994549955499654997549985499955000550015500255003550045500555006550075500855009550105501155012550135501455015550165501755018550195502055021550225502355024550255502655027550285502955030550315503255033550345503555036550375503855039550405504155042550435504455045550465504755048550495505055051550525505355054550555505655057550585505955060550615506255063550645506555066550675506855069550705507155072550735507455075550765507755078550795508055081550825508355084550855508655087550885508955090550915509255093550945509555096550975509855099551005510155102551035510455105551065510755108551095511055111551125511355114551155511655117551185511955120551215512255123551245512555126551275512855129551305513155132551335513455135551365513755138551395514055141551425514355144551455514655147551485514955150551515515255153551545515555156551575515855159551605516155162551635516455165551665516755168551695517055171551725517355174551755517655177551785517955180551815518255183551845518555186551875518855189551905519155192551935519455195551965519755198551995520055201552025520355204552055520655207552085520955210552115521255213552145521555216552175521855219552205522155222552235522455225552265522755228552295523055231552325523355234552355523655237552385523955240552415524255243552445524555246552475524855249552505525155252552535525455255552565525755258552595526055261552625526355264552655526655267552685526955270552715527255273552745527555276552775527855279552805528155282552835528455285552865528755288552895529055291552925529355294552955529655297552985529955300553015530255303553045530555306553075530855309553105531155312553135531455315553165531755318553195532055321553225532355324553255532655327553285532955330553315533255333553345533555336553375533855339553405534155342553435534455345553465534755348553495535055351553525535355354553555535655357553585535955360553615536255363553645536555366553675536855369553705537155372553735537455375553765537755378553795538055381553825538355384553855538655387553885538955390553915539255393553945539555396553975539855399554005540155402554035540455405554065540755408554095541055411554125541355414554155541655417554185541955420554215542255423554245542555426554275542855429554305543155432554335543455435554365543755438554395544055441554425544355444554455544655447554485544955450554515545255453554545545555456554575545855459554605546155462554635546455465554665546755468554695547055471554725547355474554755547655477554785547955480554815548255483554845548555486554875548855489554905549155492554935549455495554965549755498554995550055501555025550355504555055550655507555085550955510555115551255513555145551555516555175551855519555205552155522555235552455525555265552755528555295553055531555325553355534555355553655537555385553955540555415554255543555445554555546555475554855549555505555155552555535555455555555565555755558555595556055561555625556355564555655556655567555685556955570555715557255573555745557555576555775557855579555805558155582555835558455585555865558755588555895559055591555925559355594555955559655597555985559955600556015560255603556045560555606556075560855609556105561155612556135561455615556165561755618556195562055621556225562355624556255562655627556285562955630556315563255633556345563555636556375563855639556405564155642556435564455645556465564755648556495565055651556525565355654556555565655657556585565955660556615566255663556645566555666556675566855669556705567155672556735567455675556765567755678556795568055681556825568355684556855568655687556885568955690556915569255693556945569555696556975569855699557005570155702557035570455705557065570755708557095571055711557125571355714557155571655717557185571955720557215572255723557245572555726557275572855729557305573155732557335573455735557365573755738557395574055741557425574355744557455574655747557485574955750557515575255753557545575555756557575575855759557605576155762557635576455765557665576755768557695577055771557725577355774557755577655777557785577955780557815578255783557845578555786557875578855789557905579155792557935579455795557965579755798557995580055801558025580355804558055580655807558085580955810558115581255813558145581555816558175581855819558205582155822558235582455825558265582755828558295583055831558325583355834558355583655837558385583955840558415584255843558445584555846558475584855849558505585155852558535585455855558565585755858558595586055861558625586355864558655586655867558685586955870558715587255873558745587555876558775587855879558805588155882558835588455885558865588755888558895589055891558925589355894558955589655897558985589955900559015590255903559045590555906559075590855909559105591155912559135591455915559165591755918559195592055921559225592355924559255592655927559285592955930559315593255933559345593555936559375593855939559405594155942559435594455945559465594755948559495595055951559525595355954559555595655957559585595955960559615596255963559645596555966559675596855969559705597155972559735597455975559765597755978559795598055981559825598355984559855598655987559885598955990559915599255993559945599555996559975599855999560005600156002560035600456005560065600756008560095601056011560125601356014560155601656017560185601956020560215602256023560245602556026560275602856029560305603156032560335603456035560365603756038560395604056041560425604356044560455604656047560485604956050560515605256053560545605556056560575605856059560605606156062560635606456065560665606756068560695607056071560725607356074560755607656077560785607956080560815608256083560845608556086560875608856089560905609156092560935609456095560965609756098560995610056101561025610356104561055610656107561085610956110561115611256113561145611556116561175611856119561205612156122561235612456125561265612756128561295613056131561325613356134561355613656137561385613956140561415614256143561445614556146561475614856149561505615156152561535615456155561565615756158561595616056161561625616356164561655616656167561685616956170561715617256173561745617556176561775617856179561805618156182561835618456185561865618756188561895619056191561925619356194561955619656197561985619956200562015620256203562045620556206562075620856209562105621156212562135621456215562165621756218562195622056221562225622356224562255622656227562285622956230562315623256233562345623556236562375623856239562405624156242562435624456245562465624756248562495625056251562525625356254562555625656257562585625956260562615626256263562645626556266562675626856269562705627156272562735627456275562765627756278562795628056281562825628356284562855628656287562885628956290562915629256293562945629556296562975629856299563005630156302563035630456305563065630756308563095631056311563125631356314563155631656317563185631956320563215632256323563245632556326563275632856329563305633156332563335633456335563365633756338563395634056341563425634356344563455634656347563485634956350563515635256353563545635556356563575635856359563605636156362563635636456365563665636756368563695637056371563725637356374563755637656377563785637956380563815638256383563845638556386563875638856389563905639156392563935639456395563965639756398563995640056401564025640356404564055640656407564085640956410564115641256413564145641556416564175641856419564205642156422564235642456425564265642756428564295643056431564325643356434564355643656437564385643956440564415644256443564445644556446564475644856449564505645156452564535645456455564565645756458564595646056461564625646356464564655646656467564685646956470564715647256473564745647556476564775647856479564805648156482564835648456485564865648756488564895649056491564925649356494564955649656497564985649956500565015650256503565045650556506565075650856509565105651156512565135651456515565165651756518565195652056521565225652356524565255652656527565285652956530565315653256533565345653556536565375653856539565405654156542565435654456545565465654756548565495655056551565525655356554565555655656557565585655956560565615656256563565645656556566565675656856569565705657156572565735657456575565765657756578565795658056581565825658356584565855658656587565885658956590565915659256593565945659556596565975659856599566005660156602566035660456605566065660756608566095661056611566125661356614566155661656617566185661956620566215662256623566245662556626566275662856629566305663156632566335663456635566365663756638566395664056641566425664356644566455664656647566485664956650566515665256653566545665556656566575665856659566605666156662566635666456665566665666756668566695667056671566725667356674566755667656677566785667956680566815668256683566845668556686566875668856689566905669156692566935669456695566965669756698566995670056701567025670356704567055670656707567085670956710567115671256713567145671556716567175671856719567205672156722567235672456725567265672756728567295673056731567325673356734567355673656737567385673956740567415674256743567445674556746567475674856749567505675156752567535675456755567565675756758567595676056761567625676356764567655676656767567685676956770567715677256773567745677556776567775677856779567805678156782567835678456785567865678756788567895679056791567925679356794567955679656797567985679956800568015680256803568045680556806568075680856809568105681156812568135681456815568165681756818568195682056821568225682356824568255682656827568285682956830568315683256833568345683556836568375683856839568405684156842568435684456845568465684756848568495685056851568525685356854568555685656857568585685956860568615686256863568645686556866568675686856869568705687156872568735687456875568765687756878568795688056881568825688356884568855688656887568885688956890568915689256893568945689556896568975689856899569005690156902569035690456905569065690756908569095691056911569125691356914569155691656917569185691956920569215692256923569245692556926569275692856929569305693156932569335693456935569365693756938569395694056941569425694356944569455694656947569485694956950569515695256953569545695556956569575695856959569605696156962569635696456965569665696756968569695697056971569725697356974569755697656977569785697956980569815698256983569845698556986569875698856989569905699156992569935699456995569965699756998569995700057001570025700357004570055700657007570085700957010570115701257013570145701557016570175701857019570205702157022570235702457025570265702757028570295703057031570325703357034570355703657037570385703957040570415704257043570445704557046570475704857049570505705157052570535705457055570565705757058570595706057061570625706357064570655706657067570685706957070570715707257073570745707557076570775707857079570805708157082570835708457085570865708757088570895709057091570925709357094570955709657097570985709957100571015710257103571045710557106571075710857109571105711157112571135711457115571165711757118571195712057121571225712357124571255712657127571285712957130571315713257133571345713557136571375713857139571405714157142571435714457145571465714757148571495715057151571525715357154571555715657157571585715957160571615716257163571645716557166571675716857169571705717157172571735717457175571765717757178571795718057181571825718357184571855718657187571885718957190571915719257193571945719557196571975719857199572005720157202572035720457205572065720757208572095721057211572125721357214572155721657217572185721957220572215722257223572245722557226572275722857229572305723157232572335723457235572365723757238572395724057241572425724357244572455724657247572485724957250572515725257253572545725557256572575725857259572605726157262572635726457265572665726757268572695727057271572725727357274572755727657277572785727957280572815728257283572845728557286572875728857289572905729157292572935729457295572965729757298572995730057301573025730357304573055730657307573085730957310573115731257313573145731557316573175731857319573205732157322573235732457325573265732757328573295733057331573325733357334573355733657337573385733957340573415734257343573445734557346573475734857349573505735157352573535735457355573565735757358573595736057361573625736357364573655736657367573685736957370573715737257373573745737557376573775737857379573805738157382573835738457385573865738757388573895739057391573925739357394573955739657397573985739957400574015740257403574045740557406574075740857409574105741157412574135741457415574165741757418574195742057421574225742357424574255742657427574285742957430574315743257433574345743557436574375743857439574405744157442574435744457445574465744757448574495745057451574525745357454574555745657457574585745957460574615746257463574645746557466574675746857469574705747157472574735747457475574765747757478574795748057481574825748357484574855748657487574885748957490574915749257493574945749557496574975749857499575005750157502575035750457505575065750757508575095751057511575125751357514575155751657517575185751957520575215752257523575245752557526575275752857529575305753157532575335753457535575365753757538575395754057541575425754357544575455754657547575485754957550575515755257553575545755557556575575755857559575605756157562575635756457565575665756757568575695757057571575725757357574575755757657577575785757957580575815758257583575845758557586575875758857589575905759157592575935759457595575965759757598575995760057601576025760357604576055760657607576085760957610576115761257613576145761557616576175761857619576205762157622576235762457625576265762757628576295763057631576325763357634576355763657637576385763957640576415764257643576445764557646576475764857649576505765157652576535765457655576565765757658576595766057661576625766357664576655766657667576685766957670576715767257673576745767557676576775767857679576805768157682576835768457685576865768757688576895769057691576925769357694576955769657697576985769957700577015770257703577045770557706577075770857709577105771157712577135771457715577165771757718577195772057721577225772357724577255772657727577285772957730577315773257733577345773557736577375773857739577405774157742577435774457745577465774757748577495775057751577525775357754577555775657757577585775957760577615776257763577645776557766577675776857769577705777157772577735777457775577765777757778577795778057781577825778357784577855778657787577885778957790577915779257793577945779557796577975779857799578005780157802578035780457805578065780757808578095781057811578125781357814578155781657817578185781957820578215782257823578245782557826578275782857829578305783157832578335783457835578365783757838578395784057841578425784357844578455784657847578485784957850578515785257853578545785557856578575785857859578605786157862578635786457865578665786757868578695787057871578725787357874578755787657877578785787957880578815788257883578845788557886578875788857889578905789157892578935789457895578965789757898578995790057901579025790357904579055790657907579085790957910579115791257913579145791557916579175791857919579205792157922579235792457925579265792757928579295793057931579325793357934579355793657937579385793957940579415794257943579445794557946579475794857949579505795157952579535795457955579565795757958579595796057961579625796357964579655796657967579685796957970579715797257973579745797557976579775797857979579805798157982579835798457985579865798757988579895799057991579925799357994579955799657997579985799958000580015800258003580045800558006580075800858009580105801158012580135801458015580165801758018580195802058021580225802358024580255802658027580285802958030580315803258033580345803558036580375803858039580405804158042580435804458045580465804758048580495805058051580525805358054580555805658057580585805958060580615806258063580645806558066580675806858069580705807158072580735807458075580765807758078580795808058081580825808358084580855808658087580885808958090580915809258093580945809558096580975809858099581005810158102581035810458105581065810758108581095811058111581125811358114581155811658117581185811958120581215812258123581245812558126581275812858129581305813158132581335813458135581365813758138581395814058141581425814358144581455814658147581485814958150581515815258153581545815558156581575815858159581605816158162581635816458165581665816758168581695817058171581725817358174581755817658177581785817958180581815818258183581845818558186581875818858189581905819158192581935819458195581965819758198581995820058201582025820358204582055820658207582085820958210582115821258213582145821558216582175821858219582205822158222582235822458225582265822758228582295823058231582325823358234582355823658237582385823958240582415824258243582445824558246582475824858249582505825158252582535825458255582565825758258582595826058261582625826358264582655826658267582685826958270582715827258273582745827558276582775827858279582805828158282582835828458285582865828758288582895829058291582925829358294582955829658297582985829958300583015830258303583045830558306583075830858309583105831158312583135831458315583165831758318583195832058321583225832358324583255832658327583285832958330583315833258333583345833558336583375833858339583405834158342583435834458345583465834758348583495835058351583525835358354583555835658357583585835958360583615836258363583645836558366583675836858369583705837158372583735837458375583765837758378583795838058381583825838358384583855838658387583885838958390583915839258393583945839558396583975839858399584005840158402584035840458405584065840758408584095841058411584125841358414584155841658417584185841958420584215842258423584245842558426584275842858429584305843158432584335843458435584365843758438584395844058441584425844358444584455844658447584485844958450584515845258453584545845558456584575845858459584605846158462584635846458465584665846758468584695847058471584725847358474584755847658477584785847958480584815848258483584845848558486584875848858489584905849158492584935849458495584965849758498584995850058501585025850358504585055850658507585085850958510585115851258513585145851558516585175851858519585205852158522585235852458525585265852758528585295853058531585325853358534585355853658537585385853958540585415854258543585445854558546585475854858549585505855158552585535855458555585565855758558585595856058561585625856358564585655856658567585685856958570585715857258573585745857558576585775857858579585805858158582585835858458585585865858758588585895859058591585925859358594585955859658597585985859958600586015860258603586045860558606586075860858609586105861158612586135861458615586165861758618586195862058621586225862358624586255862658627586285862958630586315863258633586345863558636586375863858639586405864158642586435864458645586465864758648586495865058651586525865358654586555865658657586585865958660586615866258663586645866558666586675866858669586705867158672586735867458675586765867758678586795868058681586825868358684586855868658687586885868958690586915869258693586945869558696586975869858699587005870158702587035870458705587065870758708587095871058711587125871358714587155871658717587185871958720587215872258723587245872558726587275872858729587305873158732587335873458735587365873758738587395874058741587425874358744587455874658747587485874958750587515875258753587545875558756587575875858759587605876158762587635876458765587665876758768587695877058771587725877358774587755877658777587785877958780587815878258783587845878558786587875878858789587905879158792587935879458795587965879758798587995880058801588025880358804588055880658807588085880958810588115881258813588145881558816588175881858819588205882158822588235882458825588265882758828588295883058831588325883358834588355883658837588385883958840588415884258843588445884558846588475884858849588505885158852588535885458855588565885758858588595886058861588625886358864588655886658867588685886958870588715887258873588745887558876588775887858879588805888158882588835888458885588865888758888588895889058891588925889358894588955889658897588985889958900589015890258903589045890558906589075890858909589105891158912589135891458915589165891758918589195892058921589225892358924589255892658927589285892958930589315893258933589345893558936589375893858939589405894158942589435894458945589465894758948589495895058951589525895358954589555895658957589585895958960589615896258963589645896558966589675896858969589705897158972589735897458975589765897758978589795898058981589825898358984589855898658987589885898958990589915899258993589945899558996589975899858999590005900159002590035900459005590065900759008590095901059011590125901359014590155901659017590185901959020590215902259023590245902559026590275902859029590305903159032590335903459035590365903759038590395904059041590425904359044590455904659047590485904959050590515905259053590545905559056590575905859059590605906159062590635906459065590665906759068590695907059071590725907359074590755907659077590785907959080590815908259083590845908559086590875908859089590905909159092590935909459095590965909759098590995910059101591025910359104591055910659107591085910959110591115911259113591145911559116591175911859119591205912159122591235912459125591265912759128591295913059131591325913359134591355913659137591385913959140591415914259143591445914559146591475914859149591505915159152591535915459155591565915759158591595916059161591625916359164591655916659167591685916959170591715917259173591745917559176591775917859179591805918159182591835918459185591865918759188591895919059191591925919359194591955919659197591985919959200592015920259203592045920559206592075920859209592105921159212592135921459215592165921759218592195922059221592225922359224592255922659227592285922959230592315923259233592345923559236592375923859239592405924159242592435924459245592465924759248592495925059251592525925359254592555925659257592585925959260592615926259263592645926559266592675926859269592705927159272592735927459275592765927759278592795928059281592825928359284592855928659287592885928959290592915929259293592945929559296592975929859299593005930159302593035930459305593065930759308593095931059311593125931359314593155931659317593185931959320593215932259323593245932559326593275932859329593305933159332593335933459335593365933759338593395934059341593425934359344593455934659347593485934959350593515935259353593545935559356593575935859359593605936159362593635936459365593665936759368593695937059371593725937359374593755937659377593785937959380593815938259383593845938559386593875938859389593905939159392593935939459395593965939759398593995940059401594025940359404594055940659407594085940959410594115941259413594145941559416594175941859419594205942159422594235942459425594265942759428594295943059431594325943359434594355943659437594385943959440594415944259443594445944559446594475944859449594505945159452594535945459455594565945759458594595946059461594625946359464594655946659467594685946959470594715947259473594745947559476594775947859479594805948159482594835948459485594865948759488594895949059491594925949359494594955949659497594985949959500595015950259503595045950559506595075950859509595105951159512595135951459515595165951759518595195952059521595225952359524595255952659527595285952959530595315953259533595345953559536595375953859539595405954159542595435954459545595465954759548595495955059551595525955359554595555955659557595585955959560595615956259563595645956559566595675956859569595705957159572595735957459575595765957759578595795958059581595825958359584595855958659587595885958959590595915959259593595945959559596595975959859599596005960159602596035960459605596065960759608596095961059611596125961359614596155961659617596185961959620596215962259623596245962559626596275962859629596305963159632596335963459635596365963759638596395964059641596425964359644596455964659647596485964959650596515965259653596545965559656596575965859659596605966159662596635966459665596665966759668596695967059671596725967359674596755967659677596785967959680596815968259683596845968559686596875968859689596905969159692596935969459695596965969759698596995970059701597025970359704597055970659707597085970959710597115971259713597145971559716597175971859719597205972159722597235972459725597265972759728597295973059731597325973359734597355973659737597385973959740597415974259743597445974559746597475974859749597505975159752597535975459755597565975759758597595976059761597625976359764597655976659767597685976959770597715977259773597745977559776597775977859779597805978159782597835978459785597865978759788597895979059791597925979359794597955979659797597985979959800598015980259803598045980559806598075980859809598105981159812598135981459815598165981759818598195982059821598225982359824598255982659827598285982959830598315983259833598345983559836598375983859839598405984159842598435984459845598465984759848598495985059851598525985359854598555985659857598585985959860598615986259863598645986559866598675986859869598705987159872598735987459875598765987759878598795988059881598825988359884598855988659887598885988959890598915989259893598945989559896598975989859899599005990159902599035990459905599065990759908599095991059911599125991359914599155991659917599185991959920599215992259923599245992559926599275992859929599305993159932599335993459935599365993759938599395994059941599425994359944599455994659947599485994959950599515995259953599545995559956599575995859959599605996159962599635996459965599665996759968599695997059971599725997359974599755997659977599785997959980599815998259983599845998559986599875998859989599905999159992599935999459995599965999759998599996000060001600026000360004600056000660007600086000960010600116001260013600146001560016600176001860019600206002160022600236002460025600266002760028600296003060031600326003360034600356003660037600386003960040600416004260043600446004560046600476004860049600506005160052600536005460055600566005760058600596006060061600626006360064600656006660067600686006960070600716007260073600746007560076600776007860079600806008160082600836008460085600866008760088600896009060091600926009360094600956009660097600986009960100601016010260103601046010560106601076010860109601106011160112601136011460115601166011760118601196012060121601226012360124601256012660127601286012960130601316013260133601346013560136601376013860139601406014160142601436014460145601466014760148601496015060151601526015360154601556015660157601586015960160601616016260163601646016560166601676016860169601706017160172601736017460175601766017760178601796018060181601826018360184601856018660187601886018960190601916019260193601946019560196601976019860199602006020160202602036020460205602066020760208602096021060211602126021360214602156021660217602186021960220602216022260223602246022560226602276022860229602306023160232602336023460235602366023760238602396024060241602426024360244602456024660247602486024960250602516025260253602546025560256602576025860259602606026160262602636026460265602666026760268602696027060271602726027360274602756027660277602786027960280602816028260283602846028560286602876028860289602906029160292602936029460295602966029760298602996030060301603026030360304603056030660307603086030960310603116031260313603146031560316603176031860319603206032160322603236032460325603266032760328603296033060331603326033360334603356033660337603386033960340603416034260343603446034560346603476034860349603506035160352603536035460355603566035760358603596036060361603626036360364603656036660367603686036960370603716037260373603746037560376603776037860379603806038160382603836038460385603866038760388603896039060391603926039360394603956039660397603986039960400604016040260403604046040560406604076040860409604106041160412604136041460415604166041760418604196042060421604226042360424604256042660427604286042960430604316043260433604346043560436604376043860439604406044160442604436044460445604466044760448604496045060451604526045360454604556045660457604586045960460604616046260463604646046560466604676046860469604706047160472604736047460475604766047760478604796048060481604826048360484604856048660487604886048960490604916049260493604946049560496604976049860499605006050160502605036050460505605066050760508605096051060511605126051360514605156051660517605186051960520605216052260523605246052560526605276052860529605306053160532605336053460535605366053760538605396054060541605426054360544605456054660547605486054960550605516055260553605546055560556605576055860559605606056160562605636056460565605666056760568605696057060571605726057360574605756057660577605786057960580605816058260583605846058560586605876058860589605906059160592605936059460595605966059760598605996060060601606026060360604606056060660607606086060960610606116061260613606146061560616606176061860619606206062160622606236062460625606266062760628606296063060631606326063360634606356063660637606386063960640606416064260643606446064560646606476064860649606506065160652606536065460655606566065760658606596066060661606626066360664606656066660667606686066960670606716067260673606746067560676606776067860679606806068160682606836068460685606866068760688606896069060691606926069360694606956069660697606986069960700607016070260703607046070560706607076070860709607106071160712607136071460715607166071760718607196072060721607226072360724607256072660727607286072960730607316073260733607346073560736607376073860739607406074160742607436074460745607466074760748607496075060751607526075360754607556075660757607586075960760607616076260763607646076560766607676076860769607706077160772607736077460775607766077760778607796078060781607826078360784607856078660787607886078960790607916079260793607946079560796607976079860799608006080160802608036080460805608066080760808608096081060811608126081360814608156081660817608186081960820608216082260823608246082560826608276082860829608306083160832608336083460835608366083760838608396084060841608426084360844608456084660847608486084960850608516085260853608546085560856608576085860859608606086160862608636086460865608666086760868608696087060871608726087360874608756087660877608786087960880608816088260883608846088560886608876088860889608906089160892608936089460895608966089760898608996090060901609026090360904609056090660907609086090960910609116091260913609146091560916609176091860919609206092160922609236092460925609266092760928609296093060931609326093360934609356093660937609386093960940609416094260943609446094560946609476094860949609506095160952609536095460955609566095760958609596096060961609626096360964609656096660967609686096960970609716097260973609746097560976609776097860979609806098160982609836098460985609866098760988609896099060991609926099360994609956099660997609986099961000610016100261003610046100561006610076100861009610106101161012610136101461015610166101761018610196102061021610226102361024610256102661027610286102961030610316103261033610346103561036610376103861039610406104161042610436104461045610466104761048610496105061051610526105361054610556105661057610586105961060610616106261063610646106561066610676106861069610706107161072610736107461075610766107761078610796108061081610826108361084610856108661087610886108961090610916109261093610946109561096610976109861099611006110161102611036110461105611066110761108611096111061111611126111361114611156111661117611186111961120611216112261123611246112561126611276112861129611306113161132611336113461135611366113761138611396114061141611426114361144611456114661147611486114961150611516115261153611546115561156611576115861159611606116161162611636116461165611666116761168611696117061171611726117361174611756117661177611786117961180611816118261183611846118561186611876118861189611906119161192611936119461195611966119761198611996120061201612026120361204612056120661207612086120961210612116121261213612146121561216612176121861219612206122161222612236122461225612266122761228612296123061231612326123361234612356123661237612386123961240612416124261243612446124561246612476124861249612506125161252612536125461255612566125761258612596126061261612626126361264612656126661267612686126961270612716127261273612746127561276612776127861279612806128161282612836128461285612866128761288612896129061291612926129361294612956129661297612986129961300613016130261303613046130561306613076130861309613106131161312613136131461315613166131761318613196132061321613226132361324613256132661327613286132961330613316133261333613346133561336613376133861339613406134161342613436134461345613466134761348613496135061351613526135361354613556135661357613586135961360613616136261363613646136561366613676136861369613706137161372613736137461375613766137761378613796138061381613826138361384613856138661387613886138961390613916139261393613946139561396613976139861399614006140161402614036140461405614066140761408614096141061411614126141361414614156141661417614186141961420614216142261423614246142561426614276142861429614306143161432614336143461435614366143761438614396144061441614426144361444614456144661447614486144961450614516145261453614546145561456614576145861459614606146161462614636146461465614666146761468614696147061471614726147361474614756147661477614786147961480614816148261483614846148561486614876148861489614906149161492614936149461495614966149761498614996150061501615026150361504615056150661507615086150961510615116151261513615146151561516615176151861519615206152161522615236152461525615266152761528615296153061531615326153361534615356153661537615386153961540615416154261543615446154561546615476154861549615506155161552615536155461555615566155761558615596156061561615626156361564615656156661567615686156961570615716157261573615746157561576615776157861579615806158161582615836158461585615866158761588615896159061591615926159361594615956159661597615986159961600616016160261603616046160561606616076160861609616106161161612616136161461615616166161761618616196162061621616226162361624616256162661627616286162961630616316163261633616346163561636616376163861639616406164161642616436164461645616466164761648616496165061651616526165361654616556165661657616586165961660616616166261663616646166561666616676166861669616706167161672616736167461675616766167761678616796168061681616826168361684616856168661687616886168961690616916169261693616946169561696616976169861699617006170161702617036170461705617066170761708617096171061711617126171361714617156171661717617186171961720617216172261723617246172561726617276172861729617306173161732617336173461735617366173761738617396174061741617426174361744617456174661747617486174961750617516175261753617546175561756617576175861759617606176161762617636176461765617666176761768617696177061771617726177361774617756177661777617786177961780617816178261783617846178561786617876178861789617906179161792617936179461795617966179761798617996180061801618026180361804618056180661807618086180961810618116181261813618146181561816618176181861819618206182161822618236182461825618266182761828618296183061831618326183361834618356183661837618386183961840618416184261843618446184561846618476184861849618506185161852618536185461855618566185761858618596186061861618626186361864618656186661867618686186961870618716187261873618746187561876618776187861879618806188161882618836188461885618866188761888618896189061891618926189361894618956189661897618986189961900619016190261903619046190561906619076190861909619106191161912619136191461915619166191761918619196192061921619226192361924619256192661927619286192961930619316193261933619346193561936619376193861939619406194161942619436194461945619466194761948619496195061951619526195361954619556195661957619586195961960619616196261963619646196561966619676196861969619706197161972619736197461975619766197761978619796198061981619826198361984619856198661987619886198961990619916199261993619946199561996619976199861999620006200162002620036200462005620066200762008620096201062011620126201362014620156201662017620186201962020620216202262023620246202562026620276202862029620306203162032620336203462035620366203762038620396204062041620426204362044620456204662047620486204962050620516205262053620546205562056620576205862059620606206162062620636206462065620666206762068620696207062071620726207362074620756207662077620786207962080620816208262083620846208562086620876208862089620906209162092620936209462095620966209762098620996210062101621026210362104621056210662107621086210962110621116211262113621146211562116621176211862119621206212162122621236212462125621266212762128621296213062131621326213362134621356213662137621386213962140621416214262143621446214562146621476214862149621506215162152621536215462155621566215762158621596216062161621626216362164621656216662167621686216962170621716217262173621746217562176621776217862179621806218162182621836218462185621866218762188621896219062191621926219362194621956219662197621986219962200622016220262203622046220562206622076220862209622106221162212622136221462215622166221762218622196222062221622226222362224622256222662227622286222962230622316223262233622346223562236622376223862239622406224162242622436224462245622466224762248622496225062251622526225362254622556225662257622586225962260622616226262263622646226562266622676226862269622706227162272622736227462275622766227762278622796228062281622826228362284622856228662287622886228962290622916229262293622946229562296622976229862299623006230162302623036230462305623066230762308623096231062311623126231362314623156231662317623186231962320623216232262323623246232562326623276232862329623306233162332623336233462335623366233762338623396234062341623426234362344623456234662347623486234962350623516235262353623546235562356623576235862359623606236162362623636236462365623666236762368623696237062371623726237362374623756237662377623786237962380623816238262383623846238562386623876238862389623906239162392623936239462395623966239762398623996240062401624026240362404624056240662407624086240962410624116241262413624146241562416624176241862419624206242162422624236242462425624266242762428624296243062431624326243362434624356243662437624386243962440624416244262443624446244562446624476244862449624506245162452624536245462455624566245762458624596246062461624626246362464624656246662467624686246962470624716247262473624746247562476624776247862479624806248162482624836248462485624866248762488624896249062491624926249362494624956249662497624986249962500625016250262503625046250562506625076250862509625106251162512625136251462515625166251762518625196252062521625226252362524625256252662527625286252962530625316253262533625346253562536625376253862539625406254162542625436254462545625466254762548625496255062551625526255362554625556255662557625586255962560625616256262563625646256562566625676256862569625706257162572625736257462575625766257762578625796258062581625826258362584625856258662587625886258962590625916259262593625946259562596625976259862599626006260162602626036260462605626066260762608626096261062611626126261362614626156261662617626186261962620626216262262623626246262562626626276262862629626306263162632626336263462635626366263762638626396264062641626426264362644626456264662647626486264962650626516265262653626546265562656626576265862659626606266162662626636266462665626666266762668626696267062671626726267362674626756267662677626786267962680626816268262683626846268562686626876268862689626906269162692626936269462695626966269762698626996270062701627026270362704627056270662707627086270962710627116271262713627146271562716627176271862719627206272162722627236272462725627266272762728627296273062731627326273362734627356273662737627386273962740627416274262743627446274562746627476274862749627506275162752627536275462755627566275762758627596276062761627626276362764627656276662767627686276962770627716277262773627746277562776627776277862779627806278162782627836278462785627866278762788627896279062791627926279362794627956279662797627986279962800628016280262803628046280562806628076280862809628106281162812628136281462815628166281762818628196282062821628226282362824628256282662827628286282962830628316283262833628346283562836628376283862839628406284162842628436284462845628466284762848628496285062851628526285362854628556285662857628586285962860628616286262863628646286562866628676286862869628706287162872628736287462875628766287762878628796288062881628826288362884628856288662887628886288962890628916289262893628946289562896628976289862899629006290162902629036290462905629066290762908629096291062911629126291362914629156291662917629186291962920629216292262923629246292562926629276292862929629306293162932629336293462935629366293762938629396294062941629426294362944629456294662947629486294962950629516295262953629546295562956629576295862959629606296162962629636296462965629666296762968629696297062971629726297362974629756297662977629786297962980629816298262983629846298562986629876298862989629906299162992629936299462995629966299762998629996300063001630026300363004630056300663007630086300963010630116301263013630146301563016630176301863019630206302163022630236302463025630266302763028630296303063031630326303363034630356303663037630386303963040630416304263043630446304563046630476304863049630506305163052630536305463055630566305763058630596306063061630626306363064630656306663067630686306963070630716307263073630746307563076630776307863079630806308163082630836308463085630866308763088630896309063091630926309363094630956309663097630986309963100631016310263103631046310563106631076310863109631106311163112631136311463115631166311763118631196312063121631226312363124631256312663127631286312963130631316313263133631346313563136631376313863139631406314163142631436314463145631466314763148631496315063151631526315363154631556315663157631586315963160631616316263163631646316563166631676316863169631706317163172631736317463175631766317763178631796318063181631826318363184631856318663187631886318963190631916319263193631946319563196631976319863199632006320163202632036320463205632066320763208632096321063211632126321363214632156321663217632186321963220632216322263223632246322563226632276322863229632306323163232632336323463235632366323763238632396324063241632426324363244632456324663247632486324963250632516325263253632546325563256632576325863259632606326163262632636326463265632666326763268632696327063271632726327363274632756327663277632786327963280632816328263283632846328563286632876328863289632906329163292632936329463295632966329763298632996330063301633026330363304633056330663307633086330963310633116331263313633146331563316633176331863319633206332163322633236332463325633266332763328633296333063331633326333363334633356333663337633386333963340633416334263343633446334563346633476334863349633506335163352633536335463355633566335763358633596336063361633626336363364633656336663367633686336963370633716337263373633746337563376633776337863379633806338163382633836338463385633866338763388633896339063391633926339363394633956339663397633986339963400634016340263403634046340563406634076340863409634106341163412634136341463415634166341763418634196342063421634226342363424634256342663427634286342963430634316343263433634346343563436634376343863439634406344163442634436344463445634466344763448634496345063451634526345363454634556345663457634586345963460634616346263463634646346563466634676346863469634706347163472634736347463475634766347763478634796348063481634826348363484634856348663487634886348963490634916349263493634946349563496634976349863499635006350163502635036350463505635066350763508635096351063511635126351363514635156351663517635186351963520635216352263523635246352563526635276352863529635306353163532635336353463535635366353763538635396354063541635426354363544635456354663547635486354963550635516355263553635546355563556635576355863559635606356163562635636356463565635666356763568635696357063571635726357363574635756357663577635786357963580635816358263583635846358563586635876358863589635906359163592635936359463595635966359763598635996360063601636026360363604636056360663607636086360963610636116361263613636146361563616636176361863619636206362163622636236362463625636266362763628636296363063631636326363363634636356363663637636386363963640636416364263643636446364563646636476364863649636506365163652636536365463655636566365763658636596366063661636626366363664636656366663667636686366963670636716367263673636746367563676636776367863679636806368163682636836368463685636866368763688636896369063691636926369363694636956369663697636986369963700637016370263703637046370563706637076370863709637106371163712637136371463715637166371763718637196372063721637226372363724637256372663727637286372963730637316373263733637346373563736637376373863739637406374163742637436374463745637466374763748637496375063751637526375363754637556375663757637586375963760637616376263763637646376563766637676376863769637706377163772637736377463775637766377763778637796378063781637826378363784637856378663787637886378963790637916379263793637946379563796637976379863799638006380163802638036380463805638066380763808638096381063811638126381363814638156381663817638186381963820638216382263823638246382563826638276382863829638306383163832638336383463835638366383763838638396384063841638426384363844638456384663847638486384963850638516385263853638546385563856638576385863859638606386163862638636386463865638666386763868638696387063871638726387363874638756387663877638786387963880638816388263883638846388563886638876388863889638906389163892638936389463895638966389763898638996390063901639026390363904639056390663907639086390963910639116391263913639146391563916639176391863919639206392163922639236392463925639266392763928639296393063931639326393363934639356393663937639386393963940639416394263943639446394563946639476394863949639506395163952639536395463955639566395763958639596396063961639626396363964639656396663967639686396963970639716397263973639746397563976639776397863979639806398163982639836398463985639866398763988639896399063991639926399363994639956399663997639986399964000640016400264003640046400564006640076400864009640106401164012640136401464015640166401764018640196402064021640226402364024640256402664027640286402964030640316403264033640346403564036640376403864039640406404164042640436404464045640466404764048640496405064051640526405364054640556405664057640586405964060640616406264063640646406564066640676406864069640706407164072640736407464075640766407764078640796408064081640826408364084640856408664087640886408964090640916409264093640946409564096640976409864099641006410164102641036410464105641066410764108641096411064111641126411364114641156411664117641186411964120641216412264123641246412564126641276412864129641306413164132641336413464135641366413764138641396414064141641426414364144641456414664147641486414964150641516415264153641546415564156641576415864159641606416164162641636416464165641666416764168641696417064171641726417364174641756417664177641786417964180641816418264183641846418564186641876418864189641906419164192641936419464195641966419764198641996420064201642026420364204642056420664207642086420964210642116421264213642146421564216642176421864219642206422164222642236422464225642266422764228642296423064231642326423364234642356423664237642386423964240642416424264243642446424564246642476424864249642506425164252642536425464255642566425764258642596426064261642626426364264642656426664267642686426964270642716427264273642746427564276642776427864279642806428164282642836428464285642866428764288642896429064291642926429364294642956429664297642986429964300643016430264303643046430564306643076430864309643106431164312643136431464315643166431764318643196432064321643226432364324643256432664327643286432964330643316433264333643346433564336643376433864339643406434164342643436434464345643466434764348643496435064351643526435364354643556435664357643586435964360643616436264363643646436564366643676436864369643706437164372643736437464375643766437764378643796438064381643826438364384643856438664387643886438964390643916439264393643946439564396643976439864399644006440164402644036440464405644066440764408644096441064411644126441364414644156441664417644186441964420644216442264423644246442564426644276442864429644306443164432644336443464435644366443764438644396444064441644426444364444644456444664447644486444964450644516445264453644546445564456644576445864459644606446164462644636446464465644666446764468644696447064471644726447364474644756447664477644786447964480644816448264483644846448564486644876448864489644906449164492644936449464495644966449764498644996450064501645026450364504645056450664507645086450964510645116451264513645146451564516645176451864519645206452164522645236452464525645266452764528645296453064531645326453364534645356453664537645386453964540645416454264543645446454564546645476454864549645506455164552645536455464555645566455764558645596456064561645626456364564645656456664567645686456964570645716457264573645746457564576645776457864579645806458164582645836458464585645866458764588645896459064591645926459364594645956459664597645986459964600646016460264603646046460564606646076460864609646106461164612646136461464615646166461764618646196462064621646226462364624646256462664627646286462964630646316463264633646346463564636646376463864639646406464164642646436464464645646466464764648646496465064651646526465364654646556465664657646586465964660646616466264663646646466564666646676466864669646706467164672646736467464675646766467764678646796468064681646826468364684646856468664687646886468964690646916469264693646946469564696646976469864699647006470164702647036470464705647066470764708647096471064711647126471364714647156471664717647186471964720647216472264723647246472564726647276472864729647306473164732647336473464735647366473764738647396474064741647426474364744647456474664747647486474964750647516475264753647546475564756647576475864759647606476164762647636476464765647666476764768647696477064771647726477364774647756477664777647786477964780647816478264783647846478564786647876478864789647906479164792647936479464795647966479764798647996480064801648026480364804648056480664807648086480964810648116481264813648146481564816648176481864819648206482164822648236482464825648266482764828648296483064831648326483364834648356483664837648386483964840648416484264843648446484564846648476484864849648506485164852648536485464855648566485764858648596486064861648626486364864648656486664867648686486964870648716487264873648746487564876648776487864879648806488164882648836488464885648866488764888648896489064891648926489364894648956489664897648986489964900649016490264903649046490564906649076490864909649106491164912649136491464915649166491764918649196492064921649226492364924649256492664927649286492964930649316493264933649346493564936649376493864939649406494164942649436494464945649466494764948649496495064951649526495364954649556495664957649586495964960649616496264963649646496564966649676496864969649706497164972649736497464975649766497764978649796498064981649826498364984649856498664987649886498964990649916499264993649946499564996649976499864999650006500165002650036500465005650066500765008650096501065011650126501365014650156501665017650186501965020650216502265023650246502565026650276502865029650306503165032650336503465035650366503765038650396504065041650426504365044650456504665047650486504965050650516505265053650546505565056650576505865059650606506165062650636506465065650666506765068650696507065071650726507365074650756507665077650786507965080650816508265083650846508565086650876508865089650906509165092650936509465095650966509765098650996510065101651026510365104651056510665107651086510965110651116511265113651146511565116651176511865119651206512165122651236512465125651266512765128651296513065131651326513365134651356513665137651386513965140651416514265143651446514565146651476514865149651506515165152651536515465155651566515765158651596516065161651626516365164651656516665167651686516965170651716517265173651746517565176651776517865179651806518165182651836518465185651866518765188651896519065191651926519365194651956519665197651986519965200652016520265203652046520565206652076520865209652106521165212652136521465215652166521765218652196522065221652226522365224652256522665227652286522965230652316523265233652346523565236652376523865239652406524165242652436524465245652466524765248652496525065251652526525365254652556525665257652586525965260652616526265263652646526565266652676526865269652706527165272652736527465275652766527765278652796528065281652826528365284652856528665287652886528965290652916529265293652946529565296652976529865299653006530165302653036530465305653066530765308653096531065311653126531365314653156531665317653186531965320653216532265323653246532565326653276532865329653306533165332653336533465335653366533765338653396534065341653426534365344653456534665347653486534965350653516535265353653546535565356653576535865359653606536165362653636536465365653666536765368653696537065371653726537365374653756537665377653786537965380653816538265383653846538565386653876538865389653906539165392653936539465395653966539765398653996540065401654026540365404654056540665407654086540965410654116541265413654146541565416654176541865419654206542165422654236542465425654266542765428654296543065431654326543365434654356543665437654386543965440654416544265443654446544565446654476544865449654506545165452654536545465455654566545765458654596546065461654626546365464654656546665467654686546965470654716547265473654746547565476654776547865479654806548165482654836548465485654866548765488654896549065491654926549365494654956549665497654986549965500655016550265503655046550565506655076550865509655106551165512655136551465515655166551765518655196552065521655226552365524655256552665527655286552965530655316553265533655346553565536655376553865539655406554165542655436554465545655466554765548655496555065551655526555365554655556555665557655586555965560655616556265563655646556565566655676556865569655706557165572655736557465575655766557765578655796558065581655826558365584655856558665587655886558965590655916559265593655946559565596655976559865599656006560165602656036560465605656066560765608656096561065611656126561365614656156561665617656186561965620656216562265623656246562565626656276562865629656306563165632656336563465635656366563765638656396564065641656426564365644656456564665647656486564965650656516565265653656546565565656656576565865659656606566165662656636566465665656666566765668656696567065671656726567365674656756567665677656786567965680656816568265683656846568565686656876568865689656906569165692656936569465695656966569765698656996570065701657026570365704657056570665707657086570965710657116571265713657146571565716657176571865719657206572165722657236572465725657266572765728657296573065731657326573365734657356573665737657386573965740657416574265743657446574565746657476574865749657506575165752657536575465755657566575765758657596576065761657626576365764657656576665767657686576965770657716577265773657746577565776657776577865779657806578165782657836578465785657866578765788657896579065791657926579365794657956579665797657986579965800658016580265803658046580565806658076580865809658106581165812658136581465815658166581765818658196582065821658226582365824658256582665827658286582965830658316583265833658346583565836658376583865839658406584165842658436584465845658466584765848658496585065851658526585365854658556585665857658586585965860658616586265863658646586565866658676586865869658706587165872658736587465875658766587765878658796588065881658826588365884658856588665887658886588965890658916589265893658946589565896658976589865899659006590165902659036590465905659066590765908659096591065911659126591365914659156591665917659186591965920659216592265923659246592565926659276592865929659306593165932659336593465935659366593765938659396594065941659426594365944659456594665947659486594965950659516595265953659546595565956659576595865959659606596165962659636596465965659666596765968659696597065971659726597365974659756597665977659786597965980659816598265983659846598565986659876598865989659906599165992659936599465995659966599765998659996600066001660026600366004660056600666007660086600966010660116601266013660146601566016660176601866019660206602166022660236602466025660266602766028660296603066031660326603366034660356603666037660386603966040660416604266043660446604566046660476604866049660506605166052660536605466055660566605766058660596606066061660626606366064660656606666067660686606966070660716607266073660746607566076660776607866079660806608166082660836608466085660866608766088660896609066091660926609366094660956609666097660986609966100661016610266103661046610566106661076610866109661106611166112661136611466115661166611766118661196612066121661226612366124661256612666127661286612966130661316613266133661346613566136661376613866139661406614166142661436614466145661466614766148661496615066151661526615366154661556615666157661586615966160661616616266163661646616566166661676616866169661706617166172661736617466175661766617766178661796618066181661826618366184661856618666187661886618966190661916619266193661946619566196661976619866199662006620166202662036620466205662066620766208662096621066211662126621366214662156621666217662186621966220662216622266223662246622566226662276622866229662306623166232662336623466235662366623766238662396624066241662426624366244662456624666247662486624966250662516625266253662546625566256662576625866259662606626166262662636626466265662666626766268662696627066271662726627366274662756627666277662786627966280662816628266283662846628566286662876628866289662906629166292662936629466295662966629766298662996630066301663026630366304663056630666307663086630966310663116631266313663146631566316663176631866319663206632166322663236632466325663266632766328663296633066331663326633366334663356633666337663386633966340663416634266343663446634566346663476634866349663506635166352663536635466355663566635766358663596636066361663626636366364663656636666367663686636966370663716637266373663746637566376663776637866379663806638166382663836638466385663866638766388663896639066391663926639366394663956639666397663986639966400664016640266403664046640566406664076640866409664106641166412664136641466415664166641766418664196642066421664226642366424664256642666427664286642966430664316643266433664346643566436664376643866439664406644166442664436644466445664466644766448664496645066451664526645366454664556645666457664586645966460664616646266463664646646566466664676646866469664706647166472664736647466475664766647766478664796648066481664826648366484664856648666487664886648966490664916649266493664946649566496664976649866499665006650166502665036650466505665066650766508665096651066511665126651366514665156651666517665186651966520665216652266523665246652566526665276652866529665306653166532665336653466535665366653766538665396654066541665426654366544665456654666547665486654966550665516655266553665546655566556665576655866559665606656166562665636656466565665666656766568665696657066571665726657366574665756657666577665786657966580665816658266583665846658566586665876658866589665906659166592665936659466595665966659766598665996660066601666026660366604666056660666607666086660966610666116661266613666146661566616666176661866619666206662166622666236662466625666266662766628666296663066631666326663366634666356663666637666386663966640666416664266643666446664566646666476664866649666506665166652666536665466655666566665766658666596666066661666626666366664666656666666667666686666966670666716667266673666746667566676666776667866679666806668166682666836668466685666866668766688666896669066691666926669366694666956669666697666986669966700667016670266703667046670566706667076670866709667106671166712667136671466715667166671766718667196672066721667226672366724667256672666727667286672966730667316673266733667346673566736667376673866739667406674166742667436674466745667466674766748667496675066751667526675366754667556675666757667586675966760667616676266763667646676566766667676676866769667706677166772667736677466775667766677766778667796678066781667826678366784667856678666787667886678966790667916679266793667946679566796667976679866799668006680166802668036680466805668066680766808668096681066811668126681366814668156681666817668186681966820668216682266823668246682566826668276682866829668306683166832668336683466835668366683766838668396684066841668426684366844668456684666847668486684966850668516685266853668546685566856668576685866859668606686166862668636686466865668666686766868668696687066871668726687366874668756687666877668786687966880668816688266883668846688566886668876688866889668906689166892668936689466895668966689766898668996690066901669026690366904669056690666907669086690966910669116691266913669146691566916669176691866919669206692166922669236692466925669266692766928669296693066931669326693366934669356693666937669386693966940669416694266943669446694566946669476694866949669506695166952669536695466955669566695766958669596696066961669626696366964669656696666967669686696966970669716697266973669746697566976669776697866979669806698166982669836698466985669866698766988669896699066991669926699366994669956699666997669986699967000670016700267003670046700567006670076700867009670106701167012670136701467015670166701767018670196702067021670226702367024670256702667027670286702967030670316703267033670346703567036670376703867039670406704167042670436704467045670466704767048670496705067051670526705367054670556705667057670586705967060670616706267063670646706567066670676706867069670706707167072670736707467075670766707767078670796708067081670826708367084670856708667087670886708967090670916709267093670946709567096670976709867099671006710167102671036710467105671066710767108671096711067111671126711367114671156711667117671186711967120671216712267123671246712567126671276712867129671306713167132671336713467135671366713767138671396714067141671426714367144671456714667147671486714967150671516715267153671546715567156671576715867159671606716167162671636716467165671666716767168671696717067171671726717367174671756717667177671786717967180671816718267183671846718567186671876718867189671906719167192671936719467195671966719767198671996720067201672026720367204672056720667207672086720967210672116721267213672146721567216672176721867219672206722167222672236722467225672266722767228672296723067231672326723367234672356723667237672386723967240672416724267243672446724567246672476724867249672506725167252672536725467255672566725767258672596726067261672626726367264672656726667267672686726967270672716727267273672746727567276672776727867279672806728167282672836728467285672866728767288672896729067291672926729367294672956729667297672986729967300673016730267303673046730567306673076730867309673106731167312673136731467315673166731767318673196732067321673226732367324673256732667327673286732967330673316733267333673346733567336673376733867339673406734167342673436734467345673466734767348673496735067351673526735367354673556735667357673586735967360673616736267363673646736567366673676736867369673706737167372673736737467375673766737767378673796738067381673826738367384673856738667387673886738967390673916739267393673946739567396673976739867399674006740167402674036740467405674066740767408674096741067411674126741367414674156741667417674186741967420674216742267423674246742567426674276742867429674306743167432674336743467435674366743767438674396744067441674426744367444674456744667447674486744967450674516745267453674546745567456674576745867459674606746167462674636746467465674666746767468674696747067471674726747367474674756747667477674786747967480674816748267483674846748567486674876748867489674906749167492674936749467495674966749767498674996750067501675026750367504675056750667507675086750967510675116751267513675146751567516675176751867519675206752167522675236752467525675266752767528675296753067531675326753367534675356753667537675386753967540675416754267543675446754567546675476754867549675506755167552675536755467555675566755767558675596756067561675626756367564675656756667567675686756967570675716757267573675746757567576675776757867579675806758167582675836758467585675866758767588675896759067591675926759367594675956759667597675986759967600676016760267603676046760567606676076760867609676106761167612676136761467615676166761767618676196762067621676226762367624676256762667627676286762967630676316763267633676346763567636676376763867639676406764167642676436764467645676466764767648676496765067651676526765367654676556765667657676586765967660676616766267663676646766567666676676766867669676706767167672676736767467675676766767767678676796768067681676826768367684676856768667687676886768967690676916769267693676946769567696676976769867699677006770167702677036770467705677066770767708677096771067711677126771367714677156771667717677186771967720677216772267723677246772567726677276772867729677306773167732677336773467735677366773767738677396774067741677426774367744677456774667747677486774967750677516775267753677546775567756677576775867759677606776167762677636776467765677666776767768677696777067771677726777367774677756777667777677786777967780677816778267783677846778567786677876778867789677906779167792677936779467795677966779767798677996780067801678026780367804678056780667807678086780967810678116781267813678146781567816678176781867819678206782167822678236782467825678266782767828678296783067831678326783367834678356783667837678386783967840678416784267843678446784567846678476784867849678506785167852678536785467855678566785767858678596786067861678626786367864678656786667867678686786967870678716787267873678746787567876678776787867879678806788167882678836788467885678866788767888678896789067891678926789367894678956789667897678986789967900679016790267903679046790567906679076790867909679106791167912679136791467915679166791767918679196792067921679226792367924679256792667927679286792967930679316793267933679346793567936679376793867939679406794167942679436794467945679466794767948679496795067951679526795367954679556795667957679586795967960679616796267963679646796567966679676796867969679706797167972679736797467975679766797767978679796798067981679826798367984679856798667987679886798967990679916799267993679946799567996679976799867999680006800168002680036800468005680066800768008680096801068011680126801368014680156801668017680186801968020680216802268023680246802568026680276802868029680306803168032680336803468035680366803768038680396804068041680426804368044680456804668047680486804968050680516805268053680546805568056680576805868059680606806168062680636806468065680666806768068680696807068071680726807368074680756807668077680786807968080680816808268083680846808568086680876808868089680906809168092680936809468095680966809768098680996810068101681026810368104681056810668107681086810968110681116811268113681146811568116681176811868119681206812168122681236812468125681266812768128681296813068131681326813368134681356813668137681386813968140681416814268143681446814568146681476814868149681506815168152681536815468155681566815768158681596816068161681626816368164681656816668167681686816968170681716817268173681746817568176681776817868179681806818168182681836818468185681866818768188681896819068191681926819368194681956819668197681986819968200682016820268203682046820568206682076820868209682106821168212682136821468215682166821768218682196822068221682226822368224682256822668227682286822968230682316823268233682346823568236682376823868239682406824168242682436824468245682466824768248682496825068251682526825368254682556825668257682586825968260682616826268263682646826568266682676826868269682706827168272682736827468275682766827768278682796828068281682826828368284682856828668287682886828968290682916829268293682946829568296682976829868299683006830168302683036830468305683066830768308683096831068311683126831368314683156831668317683186831968320683216832268323683246832568326683276832868329683306833168332683336833468335683366833768338683396834068341683426834368344683456834668347683486834968350683516835268353683546835568356683576835868359683606836168362683636836468365683666836768368683696837068371683726837368374683756837668377683786837968380683816838268383683846838568386683876838868389683906839168392683936839468395683966839768398683996840068401684026840368404684056840668407684086840968410684116841268413684146841568416684176841868419684206842168422684236842468425684266842768428684296843068431684326843368434684356843668437684386843968440684416844268443684446844568446684476844868449684506845168452684536845468455684566845768458684596846068461684626846368464684656846668467684686846968470684716847268473684746847568476684776847868479684806848168482684836848468485684866848768488684896849068491684926849368494684956849668497684986849968500685016850268503685046850568506685076850868509685106851168512685136851468515685166851768518685196852068521685226852368524685256852668527685286852968530685316853268533685346853568536685376853868539685406854168542685436854468545685466854768548685496855068551685526855368554685556855668557685586855968560685616856268563685646856568566685676856868569685706857168572685736857468575685766857768578685796858068581685826858368584685856858668587685886858968590685916859268593685946859568596685976859868599686006860168602686036860468605686066860768608686096861068611686126861368614686156861668617686186861968620686216862268623686246862568626686276862868629686306863168632686336863468635686366863768638686396864068641686426864368644686456864668647686486864968650686516865268653686546865568656686576865868659686606866168662686636866468665686666866768668686696867068671686726867368674686756867668677686786867968680686816868268683686846868568686686876868868689686906869168692686936869468695686966869768698686996870068701687026870368704687056870668707687086870968710687116871268713687146871568716687176871868719687206872168722687236872468725687266872768728687296873068731687326873368734687356873668737687386873968740687416874268743687446874568746687476874868749687506875168752687536875468755687566875768758687596876068761687626876368764687656876668767687686876968770687716877268773687746877568776687776877868779687806878168782687836878468785687866878768788687896879068791687926879368794687956879668797687986879968800688016880268803688046880568806688076880868809688106881168812688136881468815688166881768818688196882068821688226882368824688256882668827688286882968830688316883268833688346883568836688376883868839688406884168842688436884468845688466884768848688496885068851688526885368854688556885668857688586885968860688616886268863688646886568866688676886868869688706887168872688736887468875688766887768878688796888068881688826888368884688856888668887688886888968890688916889268893688946889568896688976889868899689006890168902689036890468905689066890768908689096891068911689126891368914689156891668917689186891968920689216892268923689246892568926689276892868929689306893168932689336893468935689366893768938689396894068941689426894368944689456894668947689486894968950689516895268953689546895568956689576895868959689606896168962689636896468965689666896768968689696897068971689726897368974689756897668977689786897968980689816898268983689846898568986689876898868989689906899168992689936899468995689966899768998689996900069001690026900369004690056900669007690086900969010690116901269013690146901569016690176901869019690206902169022690236902469025690266902769028690296903069031690326903369034690356903669037690386903969040690416904269043690446904569046690476904869049690506905169052690536905469055690566905769058690596906069061690626906369064690656906669067690686906969070690716907269073690746907569076690776907869079690806908169082690836908469085690866908769088690896909069091690926909369094690956909669097690986909969100691016910269103691046910569106691076910869109691106911169112691136911469115691166911769118691196912069121691226912369124691256912669127691286912969130691316913269133691346913569136691376913869139691406914169142691436914469145691466914769148691496915069151691526915369154691556915669157691586915969160691616916269163691646916569166691676916869169691706917169172691736917469175691766917769178691796918069181691826918369184691856918669187691886918969190691916919269193691946919569196691976919869199692006920169202692036920469205692066920769208692096921069211692126921369214692156921669217692186921969220692216922269223692246922569226692276922869229692306923169232692336923469235692366923769238692396924069241692426924369244692456924669247692486924969250692516925269253692546925569256692576925869259692606926169262692636926469265692666926769268692696927069271692726927369274692756927669277692786927969280692816928269283692846928569286692876928869289692906929169292692936929469295692966929769298692996930069301693026930369304693056930669307693086930969310693116931269313693146931569316693176931869319693206932169322693236932469325693266932769328693296933069331693326933369334693356933669337693386933969340693416934269343693446934569346693476934869349693506935169352693536935469355693566935769358693596936069361693626936369364693656936669367693686936969370693716937269373693746937569376693776937869379693806938169382693836938469385693866938769388693896939069391693926939369394693956939669397693986939969400694016940269403694046940569406694076940869409694106941169412694136941469415694166941769418694196942069421694226942369424694256942669427694286942969430694316943269433694346943569436694376943869439694406944169442694436944469445694466944769448694496945069451694526945369454694556945669457694586945969460694616946269463694646946569466694676946869469694706947169472694736947469475694766947769478694796948069481694826948369484694856948669487694886948969490694916949269493694946949569496694976949869499695006950169502695036950469505695066950769508695096951069511695126951369514695156951669517695186951969520695216952269523695246952569526695276952869529695306953169532695336953469535695366953769538695396954069541695426954369544695456954669547695486954969550695516955269553695546955569556695576955869559695606956169562695636956469565695666956769568695696957069571695726957369574695756957669577695786957969580695816958269583695846958569586695876958869589695906959169592695936959469595695966959769598695996960069601696026960369604696056960669607696086960969610696116961269613696146961569616696176961869619696206962169622696236962469625696266962769628696296963069631696326963369634696356963669637696386963969640696416964269643696446964569646696476964869649696506965169652696536965469655696566965769658696596966069661696626966369664696656966669667696686966969670696716967269673696746967569676696776967869679696806968169682696836968469685696866968769688696896969069691696926969369694696956969669697696986969969700697016970269703697046970569706697076970869709697106971169712697136971469715697166971769718697196972069721697226972369724697256972669727697286972969730697316973269733697346973569736697376973869739697406974169742697436974469745697466974769748697496975069751697526975369754697556975669757697586975969760697616976269763697646976569766697676976869769697706977169772697736977469775697766977769778697796978069781697826978369784697856978669787697886978969790697916979269793697946979569796697976979869799698006980169802698036980469805698066980769808698096981069811698126981369814698156981669817698186981969820698216982269823698246982569826698276982869829698306983169832698336983469835698366983769838698396984069841698426984369844698456984669847698486984969850698516985269853698546985569856698576985869859698606986169862698636986469865698666986769868698696987069871698726987369874698756987669877698786987969880698816988269883698846988569886698876988869889698906989169892698936989469895698966989769898698996990069901699026990369904699056990669907699086990969910699116991269913699146991569916699176991869919699206992169922699236992469925699266992769928699296993069931699326993369934699356993669937699386993969940699416994269943699446994569946699476994869949699506995169952699536995469955699566995769958699596996069961699626996369964699656996669967699686996969970699716997269973699746997569976699776997869979699806998169982699836998469985699866998769988699896999069991699926999369994699956999669997699986999970000700017000270003700047000570006700077000870009700107001170012700137001470015700167001770018700197002070021700227002370024700257002670027700287002970030700317003270033700347003570036700377003870039700407004170042700437004470045700467004770048700497005070051700527005370054700557005670057700587005970060700617006270063700647006570066700677006870069700707007170072700737007470075700767007770078700797008070081700827008370084700857008670087700887008970090700917009270093700947009570096700977009870099701007010170102701037010470105701067010770108701097011070111701127011370114701157011670117701187011970120701217012270123701247012570126701277012870129701307013170132701337013470135701367013770138701397014070141701427014370144701457014670147701487014970150701517015270153701547015570156701577015870159701607016170162701637016470165701667016770168701697017070171701727017370174701757017670177701787017970180701817018270183701847018570186701877018870189701907019170192701937019470195701967019770198701997020070201702027020370204702057020670207702087020970210702117021270213702147021570216702177021870219702207022170222702237022470225702267022770228702297023070231702327023370234702357023670237702387023970240702417024270243702447024570246702477024870249702507025170252702537025470255702567025770258702597026070261702627026370264702657026670267702687026970270702717027270273702747027570276702777027870279702807028170282702837028470285702867028770288702897029070291702927029370294702957029670297702987029970300703017030270303703047030570306703077030870309703107031170312703137031470315703167031770318703197032070321703227032370324703257032670327703287032970330703317033270333703347033570336703377033870339703407034170342703437034470345703467034770348703497035070351703527035370354703557035670357703587035970360703617036270363703647036570366703677036870369703707037170372703737037470375703767037770378703797038070381703827038370384703857038670387703887038970390703917039270393703947039570396703977039870399704007040170402704037040470405704067040770408704097041070411704127041370414704157041670417704187041970420704217042270423704247042570426704277042870429704307043170432704337043470435704367043770438704397044070441704427044370444704457044670447704487044970450704517045270453704547045570456704577045870459704607046170462704637046470465704667046770468704697047070471704727047370474704757047670477704787047970480704817048270483704847048570486704877048870489704907049170492704937049470495704967049770498704997050070501705027050370504705057050670507705087050970510705117051270513705147051570516705177051870519705207052170522705237052470525705267052770528705297053070531705327053370534705357053670537705387053970540705417054270543705447054570546705477054870549705507055170552705537055470555705567055770558705597056070561705627056370564705657056670567705687056970570705717057270573705747057570576705777057870579705807058170582705837058470585705867058770588705897059070591705927059370594705957059670597705987059970600706017060270603706047060570606706077060870609706107061170612706137061470615706167061770618706197062070621706227062370624706257062670627706287062970630706317063270633706347063570636706377063870639706407064170642706437064470645706467064770648706497065070651706527065370654706557065670657706587065970660706617066270663706647066570666706677066870669706707067170672706737067470675706767067770678706797068070681706827068370684706857068670687706887068970690706917069270693706947069570696706977069870699707007070170702707037070470705707067070770708707097071070711707127071370714707157071670717707187071970720707217072270723707247072570726707277072870729707307073170732707337073470735707367073770738707397074070741707427074370744707457074670747707487074970750707517075270753707547075570756707577075870759707607076170762707637076470765707667076770768707697077070771707727077370774707757077670777707787077970780707817078270783707847078570786707877078870789707907079170792707937079470795707967079770798707997080070801708027080370804708057080670807708087080970810708117081270813708147081570816708177081870819708207082170822708237082470825708267082770828708297083070831708327083370834708357083670837708387083970840708417084270843708447084570846708477084870849708507085170852708537085470855708567085770858708597086070861708627086370864708657086670867708687086970870708717087270873708747087570876708777087870879708807088170882708837088470885708867088770888708897089070891708927089370894708957089670897708987089970900709017090270903709047090570906709077090870909709107091170912709137091470915709167091770918709197092070921709227092370924709257092670927709287092970930709317093270933709347093570936709377093870939709407094170942709437094470945709467094770948709497095070951709527095370954709557095670957709587095970960709617096270963709647096570966709677096870969709707097170972709737097470975709767097770978709797098070981709827098370984709857098670987709887098970990709917099270993709947099570996709977099870999710007100171002710037100471005710067100771008710097101071011710127101371014710157101671017710187101971020710217102271023710247102571026710277102871029710307103171032710337103471035710367103771038710397104071041710427104371044710457104671047710487104971050710517105271053710547105571056710577105871059710607106171062710637106471065710667106771068710697107071071710727107371074710757107671077710787107971080710817108271083710847108571086710877108871089710907109171092710937109471095710967109771098710997110071101711027110371104711057110671107711087110971110711117111271113711147111571116711177111871119711207112171122711237112471125711267112771128711297113071131711327113371134711357113671137711387113971140711417114271143711447114571146711477114871149711507115171152711537115471155711567115771158711597116071161711627116371164711657116671167711687116971170711717117271173711747117571176711777117871179711807118171182711837118471185711867118771188711897119071191711927119371194711957119671197711987119971200712017120271203712047120571206712077120871209712107121171212712137121471215712167121771218712197122071221712227122371224712257122671227712287122971230712317123271233712347123571236712377123871239712407124171242712437124471245712467124771248712497125071251712527125371254712557125671257712587125971260712617126271263712647126571266712677126871269712707127171272712737127471275712767127771278712797128071281712827128371284712857128671287712887128971290712917129271293712947129571296712977129871299713007130171302713037130471305713067130771308713097131071311713127131371314713157131671317713187131971320713217132271323713247132571326713277132871329713307133171332713337133471335713367133771338713397134071341713427134371344713457134671347713487134971350713517135271353713547135571356713577135871359713607136171362713637136471365713667136771368713697137071371713727137371374713757137671377713787137971380713817138271383713847138571386713877138871389713907139171392713937139471395713967139771398713997140071401714027140371404714057140671407714087140971410714117141271413714147141571416714177141871419714207142171422714237142471425714267142771428714297143071431714327143371434714357143671437714387143971440714417144271443714447144571446714477144871449714507145171452714537145471455714567145771458714597146071461714627146371464714657146671467714687146971470714717147271473714747147571476714777147871479714807148171482714837148471485714867148771488714897149071491714927149371494714957149671497714987149971500715017150271503715047150571506715077150871509715107151171512715137151471515715167151771518715197152071521715227152371524715257152671527715287152971530715317153271533715347153571536715377153871539715407154171542715437154471545715467154771548715497155071551715527155371554715557155671557715587155971560715617156271563715647156571566715677156871569715707157171572715737157471575715767157771578715797158071581715827158371584715857158671587715887158971590715917159271593715947159571596715977159871599716007160171602716037160471605716067160771608716097161071611716127161371614716157161671617716187161971620716217162271623716247162571626716277162871629716307163171632716337163471635716367163771638716397164071641716427164371644716457164671647716487164971650716517165271653716547165571656716577165871659716607166171662716637166471665716667166771668716697167071671716727167371674716757167671677716787167971680716817168271683716847168571686716877168871689716907169171692716937169471695716967169771698716997170071701717027170371704717057170671707717087170971710717117171271713717147171571716717177171871719717207172171722717237172471725717267172771728717297173071731717327173371734717357173671737717387173971740717417174271743717447174571746717477174871749717507175171752717537175471755717567175771758717597176071761717627176371764717657176671767717687176971770717717177271773717747177571776717777177871779717807178171782717837178471785717867178771788717897179071791717927179371794717957179671797717987179971800718017180271803718047180571806718077180871809718107181171812718137181471815718167181771818718197182071821718227182371824718257182671827718287182971830718317183271833718347183571836718377183871839718407184171842718437184471845718467184771848718497185071851718527185371854718557185671857718587185971860718617186271863718647186571866718677186871869718707187171872718737187471875718767187771878718797188071881718827188371884718857188671887718887188971890718917189271893718947189571896718977189871899719007190171902719037190471905719067190771908719097191071911719127191371914719157191671917719187191971920719217192271923719247192571926719277192871929719307193171932719337193471935719367193771938719397194071941719427194371944719457194671947719487194971950719517195271953719547195571956719577195871959719607196171962719637196471965719667196771968719697197071971719727197371974719757197671977719787197971980719817198271983719847198571986719877198871989719907199171992719937199471995719967199771998719997200072001720027200372004720057200672007720087200972010720117201272013720147201572016720177201872019720207202172022720237202472025720267202772028720297203072031720327203372034720357203672037720387203972040720417204272043720447204572046720477204872049720507205172052720537205472055720567205772058720597206072061720627206372064720657206672067720687206972070720717207272073720747207572076720777207872079720807208172082720837208472085720867208772088720897209072091720927209372094720957209672097720987209972100721017210272103721047210572106721077210872109721107211172112721137211472115721167211772118721197212072121721227212372124721257212672127721287212972130721317213272133721347213572136721377213872139721407214172142721437214472145721467214772148721497215072151721527215372154721557215672157721587215972160721617216272163721647216572166721677216872169721707217172172721737217472175721767217772178721797218072181721827218372184721857218672187721887218972190721917219272193721947219572196721977219872199722007220172202722037220472205722067220772208722097221072211722127221372214722157221672217722187221972220722217222272223722247222572226722277222872229722307223172232722337223472235722367223772238722397224072241722427224372244722457224672247722487224972250722517225272253722547225572256722577225872259722607226172262722637226472265722667226772268722697227072271722727227372274722757227672277722787227972280722817228272283722847228572286722877228872289722907229172292722937229472295722967229772298722997230072301723027230372304723057230672307723087230972310723117231272313723147231572316723177231872319723207232172322723237232472325723267232772328723297233072331723327233372334723357233672337723387233972340723417234272343723447234572346723477234872349723507235172352723537235472355723567235772358723597236072361723627236372364723657236672367723687236972370723717237272373723747237572376723777237872379723807238172382723837238472385723867238772388723897239072391723927239372394723957239672397723987239972400724017240272403724047240572406724077240872409724107241172412724137241472415724167241772418724197242072421724227242372424724257242672427724287242972430724317243272433724347243572436724377243872439724407244172442724437244472445724467244772448724497245072451724527245372454724557245672457724587245972460724617246272463724647246572466724677246872469724707247172472724737247472475724767247772478724797248072481724827248372484724857248672487724887248972490724917249272493724947249572496724977249872499725007250172502725037250472505725067250772508725097251072511725127251372514725157251672517725187251972520725217252272523725247252572526725277252872529725307253172532725337253472535725367253772538725397254072541725427254372544725457254672547725487254972550725517255272553725547255572556725577255872559725607256172562725637256472565725667256772568725697257072571725727257372574725757257672577725787257972580725817258272583725847258572586725877258872589725907259172592725937259472595725967259772598725997260072601726027260372604726057260672607726087260972610726117261272613726147261572616726177261872619726207262172622726237262472625726267262772628726297263072631726327263372634726357263672637726387263972640726417264272643726447264572646726477264872649726507265172652726537265472655726567265772658726597266072661726627266372664726657266672667726687266972670726717267272673726747267572676726777267872679726807268172682726837268472685726867268772688726897269072691726927269372694726957269672697726987269972700727017270272703727047270572706727077270872709727107271172712727137271472715727167271772718727197272072721727227272372724727257272672727727287272972730727317273272733727347273572736727377273872739727407274172742727437274472745727467274772748727497275072751727527275372754727557275672757727587275972760727617276272763727647276572766727677276872769727707277172772727737277472775727767277772778727797278072781727827278372784727857278672787727887278972790727917279272793727947279572796727977279872799728007280172802728037280472805728067280772808728097281072811728127281372814728157281672817728187281972820728217282272823728247282572826728277282872829728307283172832728337283472835728367283772838728397284072841728427284372844728457284672847728487284972850728517285272853728547285572856728577285872859728607286172862728637286472865728667286772868728697287072871728727287372874728757287672877728787287972880728817288272883728847288572886728877288872889728907289172892728937289472895728967289772898728997290072901729027290372904729057290672907729087290972910729117291272913729147291572916729177291872919729207292172922729237292472925729267292772928729297293072931729327293372934729357293672937729387293972940729417294272943729447294572946729477294872949729507295172952729537295472955729567295772958729597296072961729627296372964729657296672967729687296972970729717297272973729747297572976729777297872979729807298172982729837298472985729867298772988729897299072991729927299372994729957299672997729987299973000730017300273003730047300573006730077300873009730107301173012730137301473015730167301773018730197302073021730227302373024730257302673027730287302973030730317303273033730347303573036730377303873039730407304173042730437304473045730467304773048730497305073051730527305373054730557305673057730587305973060730617306273063730647306573066730677306873069730707307173072730737307473075730767307773078730797308073081730827308373084730857308673087730887308973090730917309273093730947309573096730977309873099731007310173102731037310473105731067310773108731097311073111731127311373114731157311673117731187311973120731217312273123731247312573126731277312873129731307313173132731337313473135731367313773138731397314073141731427314373144731457314673147731487314973150731517315273153731547315573156731577315873159731607316173162731637316473165731667316773168731697317073171731727317373174731757317673177731787317973180731817318273183731847318573186731877318873189731907319173192731937319473195731967319773198731997320073201732027320373204732057320673207732087320973210732117321273213732147321573216732177321873219732207322173222732237322473225732267322773228732297323073231732327323373234732357323673237732387323973240732417324273243732447324573246732477324873249732507325173252732537325473255732567325773258732597326073261732627326373264732657326673267732687326973270732717327273273732747327573276732777327873279732807328173282732837328473285732867328773288732897329073291732927329373294732957329673297732987329973300733017330273303733047330573306733077330873309733107331173312733137331473315733167331773318733197332073321733227332373324733257332673327733287332973330733317333273333733347333573336733377333873339733407334173342733437334473345733467334773348733497335073351733527335373354733557335673357733587335973360733617336273363733647336573366733677336873369733707337173372733737337473375733767337773378733797338073381733827338373384733857338673387733887338973390733917339273393733947339573396733977339873399734007340173402734037340473405734067340773408734097341073411734127341373414734157341673417734187341973420734217342273423734247342573426734277342873429734307343173432734337343473435734367343773438734397344073441734427344373444734457344673447734487344973450734517345273453734547345573456734577345873459734607346173462734637346473465734667346773468734697347073471734727347373474734757347673477734787347973480734817348273483734847348573486734877348873489734907349173492734937349473495734967349773498734997350073501735027350373504735057350673507735087350973510735117351273513735147351573516735177351873519735207352173522735237352473525735267352773528735297353073531735327353373534735357353673537735387353973540735417354273543735447354573546735477354873549735507355173552735537355473555735567355773558735597356073561735627356373564735657356673567735687356973570735717357273573735747357573576735777357873579735807358173582735837358473585735867358773588735897359073591735927359373594735957359673597735987359973600736017360273603736047360573606736077360873609736107361173612736137361473615736167361773618736197362073621736227362373624736257362673627736287362973630736317363273633736347363573636736377363873639736407364173642736437364473645736467364773648736497365073651736527365373654736557365673657736587365973660736617366273663736647366573666736677366873669736707367173672736737367473675736767367773678736797368073681736827368373684736857368673687736887368973690736917369273693736947369573696736977369873699737007370173702737037370473705737067370773708737097371073711737127371373714737157371673717737187371973720737217372273723737247372573726737277372873729737307373173732737337373473735737367373773738737397374073741737427374373744737457374673747737487374973750737517375273753737547375573756737577375873759737607376173762737637376473765737667376773768737697377073771737727377373774737757377673777737787377973780737817378273783737847378573786737877378873789737907379173792737937379473795737967379773798737997380073801738027380373804738057380673807738087380973810738117381273813738147381573816738177381873819738207382173822738237382473825738267382773828738297383073831738327383373834738357383673837738387383973840738417384273843738447384573846738477384873849738507385173852738537385473855738567385773858738597386073861738627386373864738657386673867738687386973870738717387273873738747387573876738777387873879738807388173882738837388473885738867388773888738897389073891738927389373894738957389673897738987389973900739017390273903739047390573906739077390873909739107391173912739137391473915739167391773918739197392073921739227392373924739257392673927739287392973930739317393273933739347393573936739377393873939739407394173942739437394473945739467394773948739497395073951739527395373954739557395673957739587395973960739617396273963739647396573966739677396873969739707397173972739737397473975739767397773978739797398073981739827398373984739857398673987739887398973990739917399273993739947399573996739977399873999740007400174002740037400474005740067400774008740097401074011740127401374014740157401674017740187401974020740217402274023740247402574026740277402874029740307403174032740337403474035740367403774038740397404074041740427404374044740457404674047740487404974050740517405274053740547405574056740577405874059740607406174062740637406474065740667406774068740697407074071740727407374074740757407674077740787407974080740817408274083740847408574086740877408874089740907409174092740937409474095740967409774098740997410074101741027410374104741057410674107741087410974110741117411274113741147411574116741177411874119741207412174122741237412474125741267412774128741297413074131741327413374134741357413674137741387413974140741417414274143741447414574146741477414874149741507415174152741537415474155741567415774158741597416074161741627416374164741657416674167741687416974170741717417274173741747417574176741777417874179741807418174182741837418474185741867418774188741897419074191741927419374194741957419674197741987419974200742017420274203742047420574206742077420874209742107421174212742137421474215742167421774218742197422074221742227422374224742257422674227742287422974230742317423274233742347423574236742377423874239742407424174242742437424474245742467424774248742497425074251742527425374254742557425674257742587425974260742617426274263742647426574266742677426874269742707427174272742737427474275742767427774278742797428074281742827428374284742857428674287742887428974290742917429274293742947429574296742977429874299743007430174302743037430474305743067430774308743097431074311743127431374314743157431674317743187431974320743217432274323743247432574326743277432874329743307433174332743337433474335743367433774338743397434074341743427434374344743457434674347743487434974350743517435274353743547435574356743577435874359743607436174362743637436474365743667436774368743697437074371743727437374374743757437674377743787437974380743817438274383743847438574386743877438874389743907439174392743937439474395743967439774398743997440074401744027440374404744057440674407744087440974410744117441274413744147441574416744177441874419744207442174422744237442474425744267442774428744297443074431744327443374434744357443674437744387443974440744417444274443744447444574446744477444874449744507445174452744537445474455744567445774458744597446074461744627446374464744657446674467744687446974470744717447274473744747447574476744777447874479744807448174482744837448474485744867448774488744897449074491744927449374494744957449674497744987449974500745017450274503745047450574506745077450874509745107451174512745137451474515745167451774518745197452074521745227452374524745257452674527745287452974530745317453274533745347453574536745377453874539745407454174542745437454474545745467454774548745497455074551745527455374554745557455674557745587455974560745617456274563745647456574566745677456874569745707457174572745737457474575745767457774578745797458074581745827458374584745857458674587745887458974590745917459274593745947459574596745977459874599746007460174602746037460474605746067460774608746097461074611746127461374614746157461674617746187461974620746217462274623746247462574626746277462874629746307463174632746337463474635746367463774638746397464074641746427464374644746457464674647746487464974650746517465274653746547465574656746577465874659746607466174662746637466474665746667466774668746697467074671746727467374674746757467674677746787467974680746817468274683746847468574686746877468874689746907469174692746937469474695746967469774698746997470074701747027470374704747057470674707747087470974710747117471274713747147471574716747177471874719747207472174722747237472474725747267472774728747297473074731747327473374734747357473674737747387473974740747417474274743747447474574746747477474874749747507475174752747537475474755747567475774758747597476074761747627476374764747657476674767747687476974770747717477274773747747477574776747777477874779747807478174782747837478474785747867478774788747897479074791747927479374794747957479674797747987479974800748017480274803748047480574806748077480874809748107481174812748137481474815748167481774818748197482074821748227482374824748257482674827748287482974830748317483274833748347483574836748377483874839748407484174842748437484474845748467484774848748497485074851748527485374854748557485674857748587485974860748617486274863748647486574866748677486874869748707487174872748737487474875748767487774878748797488074881748827488374884748857488674887748887488974890748917489274893748947489574896748977489874899749007490174902749037490474905749067490774908749097491074911749127491374914749157491674917749187491974920749217492274923749247492574926749277492874929749307493174932749337493474935749367493774938749397494074941749427494374944749457494674947749487494974950749517495274953749547495574956749577495874959749607496174962749637496474965749667496774968749697497074971749727497374974749757497674977749787497974980749817498274983749847498574986749877498874989749907499174992749937499474995749967499774998749997500075001750027500375004750057500675007750087500975010750117501275013750147501575016750177501875019750207502175022750237502475025750267502775028750297503075031750327503375034750357503675037750387503975040750417504275043750447504575046750477504875049750507505175052750537505475055750567505775058750597506075061750627506375064750657506675067750687506975070750717507275073750747507575076750777507875079750807508175082750837508475085750867508775088750897509075091750927509375094750957509675097750987509975100751017510275103751047510575106751077510875109751107511175112751137511475115751167511775118751197512075121751227512375124751257512675127751287512975130751317513275133751347513575136751377513875139751407514175142751437514475145751467514775148751497515075151751527515375154751557515675157751587515975160751617516275163751647516575166751677516875169751707517175172751737517475175751767517775178751797518075181751827518375184751857518675187751887518975190751917519275193751947519575196751977519875199752007520175202752037520475205752067520775208752097521075211752127521375214752157521675217752187521975220752217522275223752247522575226752277522875229752307523175232752337523475235752367523775238752397524075241752427524375244752457524675247752487524975250752517525275253752547525575256752577525875259752607526175262752637526475265752667526775268752697527075271752727527375274752757527675277752787527975280752817528275283752847528575286752877528875289752907529175292752937529475295752967529775298752997530075301753027530375304753057530675307753087530975310753117531275313753147531575316753177531875319753207532175322753237532475325753267532775328753297533075331753327533375334753357533675337753387533975340753417534275343753447534575346753477534875349753507535175352753537535475355753567535775358753597536075361753627536375364753657536675367753687536975370753717537275373753747537575376753777537875379753807538175382753837538475385753867538775388753897539075391753927539375394753957539675397753987539975400754017540275403754047540575406754077540875409754107541175412754137541475415754167541775418754197542075421754227542375424754257542675427754287542975430754317543275433754347543575436754377543875439754407544175442754437544475445754467544775448754497545075451754527545375454754557545675457754587545975460754617546275463754647546575466754677546875469754707547175472754737547475475754767547775478754797548075481754827548375484754857548675487754887548975490754917549275493754947549575496754977549875499755007550175502755037550475505755067550775508755097551075511755127551375514755157551675517755187551975520755217552275523755247552575526755277552875529755307553175532755337553475535755367553775538755397554075541755427554375544755457554675547755487554975550755517555275553755547555575556755577555875559755607556175562755637556475565755667556775568755697557075571755727557375574755757557675577755787557975580755817558275583755847558575586755877558875589755907559175592755937559475595755967559775598755997560075601756027560375604756057560675607756087560975610756117561275613756147561575616756177561875619756207562175622756237562475625756267562775628756297563075631756327563375634756357563675637756387563975640756417564275643756447564575646756477564875649756507565175652756537565475655756567565775658756597566075661756627566375664756657566675667756687566975670756717567275673756747567575676756777567875679756807568175682756837568475685756867568775688756897569075691756927569375694756957569675697756987569975700757017570275703757047570575706757077570875709757107571175712757137571475715757167571775718757197572075721757227572375724757257572675727757287572975730757317573275733757347573575736757377573875739757407574175742757437574475745757467574775748757497575075751757527575375754757557575675757757587575975760757617576275763757647576575766757677576875769757707577175772757737577475775757767577775778757797578075781757827578375784757857578675787757887578975790757917579275793757947579575796757977579875799758007580175802758037580475805758067580775808758097581075811758127581375814758157581675817758187581975820758217582275823758247582575826758277582875829758307583175832758337583475835758367583775838758397584075841758427584375844758457584675847758487584975850758517585275853758547585575856758577585875859758607586175862758637586475865758667586775868758697587075871758727587375874758757587675877758787587975880758817588275883758847588575886758877588875889758907589175892758937589475895758967589775898758997590075901759027590375904759057590675907759087590975910759117591275913759147591575916759177591875919759207592175922759237592475925759267592775928759297593075931759327593375934759357593675937759387593975940759417594275943759447594575946759477594875949759507595175952759537595475955759567595775958759597596075961759627596375964759657596675967759687596975970759717597275973759747597575976759777597875979759807598175982759837598475985759867598775988759897599075991759927599375994759957599675997759987599976000760017600276003760047600576006760077600876009760107601176012760137601476015760167601776018760197602076021760227602376024760257602676027760287602976030760317603276033760347603576036760377603876039760407604176042760437604476045760467604776048760497605076051760527605376054760557605676057760587605976060760617606276063760647606576066760677606876069760707607176072760737607476075760767607776078760797608076081760827608376084760857608676087760887608976090760917609276093760947609576096760977609876099761007610176102761037610476105761067610776108761097611076111761127611376114761157611676117761187611976120761217612276123761247612576126761277612876129761307613176132761337613476135761367613776138761397614076141761427614376144761457614676147761487614976150761517615276153761547615576156761577615876159761607616176162761637616476165761667616776168761697617076171761727617376174761757617676177761787617976180761817618276183761847618576186761877618876189761907619176192761937619476195761967619776198761997620076201762027620376204762057620676207762087620976210762117621276213762147621576216762177621876219762207622176222762237622476225762267622776228762297623076231762327623376234762357623676237762387623976240762417624276243762447624576246762477624876249762507625176252762537625476255762567625776258762597626076261762627626376264762657626676267762687626976270762717627276273762747627576276762777627876279762807628176282762837628476285762867628776288762897629076291762927629376294762957629676297762987629976300763017630276303763047630576306763077630876309763107631176312763137631476315763167631776318763197632076321763227632376324763257632676327763287632976330763317633276333763347633576336763377633876339763407634176342763437634476345763467634776348763497635076351763527635376354763557635676357763587635976360763617636276363763647636576366763677636876369763707637176372763737637476375763767637776378763797638076381763827638376384763857638676387763887638976390763917639276393763947639576396763977639876399764007640176402764037640476405764067640776408764097641076411764127641376414764157641676417764187641976420764217642276423764247642576426764277642876429764307643176432764337643476435764367643776438764397644076441764427644376444764457644676447764487644976450764517645276453764547645576456764577645876459764607646176462764637646476465764667646776468764697647076471764727647376474764757647676477764787647976480764817648276483764847648576486764877648876489764907649176492764937649476495764967649776498764997650076501765027650376504765057650676507765087650976510765117651276513765147651576516765177651876519765207652176522765237652476525765267652776528765297653076531765327653376534765357653676537765387653976540765417654276543765447654576546765477654876549765507655176552765537655476555765567655776558765597656076561765627656376564765657656676567765687656976570765717657276573765747657576576765777657876579765807658176582765837658476585765867658776588765897659076591765927659376594765957659676597765987659976600766017660276603766047660576606766077660876609766107661176612766137661476615766167661776618766197662076621766227662376624766257662676627766287662976630766317663276633766347663576636766377663876639766407664176642766437664476645766467664776648766497665076651766527665376654766557665676657766587665976660766617666276663766647666576666766677666876669766707667176672766737667476675766767667776678766797668076681766827668376684766857668676687766887668976690766917669276693766947669576696766977669876699767007670176702767037670476705767067670776708767097671076711767127671376714767157671676717767187671976720767217672276723767247672576726767277672876729767307673176732767337673476735767367673776738767397674076741767427674376744767457674676747767487674976750767517675276753767547675576756767577675876759767607676176762767637676476765767667676776768767697677076771767727677376774767757677676777767787677976780767817678276783767847678576786767877678876789767907679176792767937679476795767967679776798767997680076801768027680376804768057680676807768087680976810768117681276813768147681576816768177681876819768207682176822768237682476825768267682776828768297683076831768327683376834768357683676837768387683976840768417684276843768447684576846768477684876849768507685176852768537685476855768567685776858768597686076861768627686376864768657686676867768687686976870768717687276873768747687576876768777687876879768807688176882768837688476885768867688776888768897689076891768927689376894768957689676897768987689976900769017690276903769047690576906769077690876909769107691176912769137691476915769167691776918769197692076921769227692376924769257692676927769287692976930769317693276933769347693576936769377693876939769407694176942769437694476945769467694776948769497695076951769527695376954769557695676957769587695976960769617696276963769647696576966769677696876969769707697176972769737697476975769767697776978769797698076981769827698376984769857698676987769887698976990769917699276993769947699576996769977699876999770007700177002770037700477005770067700777008770097701077011770127701377014770157701677017770187701977020770217702277023770247702577026770277702877029770307703177032770337703477035770367703777038770397704077041770427704377044770457704677047770487704977050770517705277053770547705577056770577705877059770607706177062770637706477065770667706777068770697707077071770727707377074770757707677077770787707977080770817708277083770847708577086770877708877089770907709177092770937709477095770967709777098770997710077101771027710377104771057710677107771087710977110771117711277113771147711577116771177711877119771207712177122771237712477125771267712777128771297713077131771327713377134771357713677137771387713977140771417714277143771447714577146771477714877149771507715177152771537715477155771567715777158771597716077161771627716377164771657716677167771687716977170771717717277173771747717577176771777717877179771807718177182771837718477185771867718777188771897719077191771927719377194771957719677197771987719977200772017720277203772047720577206772077720877209772107721177212772137721477215772167721777218772197722077221772227722377224772257722677227772287722977230772317723277233772347723577236772377723877239772407724177242772437724477245772467724777248772497725077251772527725377254772557725677257772587725977260772617726277263772647726577266772677726877269772707727177272772737727477275772767727777278772797728077281772827728377284772857728677287772887728977290772917729277293772947729577296772977729877299773007730177302773037730477305773067730777308773097731077311773127731377314773157731677317773187731977320773217732277323773247732577326773277732877329773307733177332773337733477335773367733777338773397734077341773427734377344773457734677347773487734977350773517735277353773547735577356773577735877359773607736177362773637736477365773667736777368773697737077371773727737377374773757737677377773787737977380773817738277383773847738577386773877738877389773907739177392773937739477395773967739777398773997740077401774027740377404774057740677407774087740977410774117741277413774147741577416774177741877419774207742177422774237742477425774267742777428774297743077431774327743377434774357743677437774387743977440774417744277443774447744577446774477744877449774507745177452774537745477455774567745777458774597746077461774627746377464774657746677467774687746977470774717747277473774747747577476774777747877479774807748177482774837748477485774867748777488774897749077491774927749377494774957749677497774987749977500775017750277503775047750577506775077750877509775107751177512775137751477515775167751777518775197752077521775227752377524775257752677527775287752977530775317753277533775347753577536775377753877539775407754177542775437754477545775467754777548775497755077551775527755377554775557755677557775587755977560775617756277563775647756577566775677756877569775707757177572775737757477575775767757777578775797758077581775827758377584775857758677587775887758977590775917759277593775947759577596775977759877599776007760177602776037760477605776067760777608776097761077611776127761377614776157761677617776187761977620776217762277623776247762577626776277762877629776307763177632776337763477635776367763777638776397764077641776427764377644776457764677647776487764977650776517765277653776547765577656776577765877659776607766177662776637766477665776667766777668776697767077671776727767377674776757767677677776787767977680776817768277683776847768577686776877768877689776907769177692776937769477695776967769777698776997770077701777027770377704777057770677707777087770977710777117771277713777147771577716777177771877719777207772177722777237772477725777267772777728777297773077731777327773377734777357773677737777387773977740777417774277743777447774577746777477774877749777507775177752777537775477755777567775777758777597776077761777627776377764777657776677767777687776977770777717777277773777747777577776777777777877779777807778177782777837778477785777867778777788777897779077791777927779377794777957779677797777987779977800778017780277803778047780577806778077780877809778107781177812778137781477815778167781777818778197782077821778227782377824778257782677827778287782977830778317783277833778347783577836778377783877839778407784177842778437784477845778467784777848778497785077851778527785377854778557785677857778587785977860778617786277863778647786577866778677786877869778707787177872778737787477875778767787777878778797788077881778827788377884778857788677887778887788977890778917789277893778947789577896778977789877899779007790177902779037790477905779067790777908779097791077911779127791377914779157791677917779187791977920779217792277923779247792577926779277792877929779307793177932779337793477935779367793777938779397794077941779427794377944779457794677947779487794977950779517795277953779547795577956779577795877959779607796177962779637796477965779667796777968779697797077971779727797377974779757797677977779787797977980779817798277983779847798577986779877798877989779907799177992779937799477995779967799777998779997800078001780027800378004780057800678007780087800978010780117801278013780147801578016780177801878019780207802178022780237802478025780267802778028780297803078031780327803378034780357803678037780387803978040780417804278043780447804578046780477804878049780507805178052780537805478055780567805778058780597806078061780627806378064780657806678067780687806978070780717807278073780747807578076780777807878079780807808178082780837808478085780867808778088780897809078091780927809378094780957809678097780987809978100781017810278103781047810578106781077810878109781107811178112781137811478115781167811778118781197812078121781227812378124781257812678127781287812978130781317813278133781347813578136781377813878139781407814178142781437814478145781467814778148781497815078151781527815378154781557815678157781587815978160781617816278163781647816578166781677816878169781707817178172781737817478175781767817778178781797818078181781827818378184781857818678187781887818978190781917819278193781947819578196781977819878199782007820178202782037820478205782067820778208782097821078211782127821378214782157821678217782187821978220782217822278223782247822578226782277822878229782307823178232782337823478235782367823778238782397824078241782427824378244782457824678247782487824978250782517825278253782547825578256782577825878259782607826178262782637826478265782667826778268782697827078271782727827378274782757827678277782787827978280782817828278283782847828578286782877828878289782907829178292782937829478295782967829778298782997830078301783027830378304783057830678307783087830978310783117831278313783147831578316783177831878319783207832178322783237832478325783267832778328783297833078331783327833378334783357833678337783387833978340783417834278343783447834578346783477834878349783507835178352783537835478355783567835778358783597836078361783627836378364783657836678367783687836978370783717837278373783747837578376783777837878379783807838178382783837838478385783867838778388783897839078391783927839378394783957839678397783987839978400784017840278403784047840578406784077840878409784107841178412784137841478415784167841778418784197842078421784227842378424784257842678427784287842978430784317843278433784347843578436784377843878439784407844178442784437844478445784467844778448784497845078451784527845378454784557845678457784587845978460784617846278463784647846578466784677846878469784707847178472784737847478475784767847778478784797848078481784827848378484784857848678487784887848978490784917849278493784947849578496784977849878499785007850178502785037850478505785067850778508785097851078511785127851378514785157851678517785187851978520785217852278523785247852578526785277852878529785307853178532785337853478535785367853778538785397854078541785427854378544785457854678547785487854978550785517855278553785547855578556785577855878559785607856178562785637856478565785667856778568785697857078571785727857378574785757857678577785787857978580785817858278583785847858578586785877858878589785907859178592785937859478595785967859778598785997860078601786027860378604786057860678607786087860978610786117861278613786147861578616786177861878619786207862178622786237862478625786267862778628786297863078631786327863378634786357863678637786387863978640786417864278643786447864578646786477864878649786507865178652786537865478655786567865778658786597866078661786627866378664786657866678667786687866978670786717867278673786747867578676786777867878679786807868178682786837868478685786867868778688786897869078691786927869378694786957869678697786987869978700787017870278703787047870578706787077870878709787107871178712787137871478715787167871778718787197872078721787227872378724787257872678727787287872978730787317873278733787347873578736787377873878739787407874178742787437874478745787467874778748787497875078751787527875378754787557875678757787587875978760787617876278763787647876578766787677876878769787707877178772787737877478775787767877778778787797878078781787827878378784787857878678787787887878978790787917879278793787947879578796787977879878799788007880178802788037880478805788067880778808788097881078811788127881378814788157881678817788187881978820788217882278823788247882578826788277882878829788307883178832788337883478835788367883778838788397884078841788427884378844788457884678847788487884978850788517885278853788547885578856788577885878859788607886178862788637886478865788667886778868788697887078871788727887378874788757887678877788787887978880788817888278883788847888578886788877888878889788907889178892788937889478895788967889778898788997890078901789027890378904789057890678907789087890978910789117891278913789147891578916789177891878919789207892178922789237892478925789267892778928789297893078931789327893378934789357893678937789387893978940789417894278943789447894578946789477894878949789507895178952789537895478955789567895778958789597896078961789627896378964789657896678967789687896978970789717897278973789747897578976789777897878979789807898178982789837898478985789867898778988789897899078991789927899378994789957899678997789987899979000790017900279003790047900579006790077900879009790107901179012790137901479015790167901779018790197902079021790227902379024790257902679027790287902979030790317903279033790347903579036790377903879039790407904179042790437904479045790467904779048790497905079051790527905379054790557905679057790587905979060790617906279063790647906579066790677906879069790707907179072790737907479075790767907779078790797908079081790827908379084790857908679087790887908979090790917909279093790947909579096790977909879099791007910179102791037910479105791067910779108791097911079111791127911379114791157911679117791187911979120791217912279123791247912579126791277912879129791307913179132791337913479135791367913779138791397914079141791427914379144791457914679147791487914979150791517915279153791547915579156791577915879159791607916179162791637916479165791667916779168791697917079171791727917379174791757917679177791787917979180791817918279183791847918579186791877918879189791907919179192791937919479195791967919779198791997920079201792027920379204792057920679207792087920979210792117921279213792147921579216792177921879219792207922179222792237922479225792267922779228792297923079231792327923379234792357923679237792387923979240792417924279243792447924579246792477924879249792507925179252792537925479255792567925779258792597926079261792627926379264792657926679267792687926979270792717927279273792747927579276792777927879279792807928179282792837928479285792867928779288792897929079291792927929379294792957929679297792987929979300793017930279303793047930579306793077930879309793107931179312793137931479315793167931779318793197932079321793227932379324793257932679327793287932979330793317933279333793347933579336793377933879339793407934179342793437934479345793467934779348793497935079351793527935379354793557935679357793587935979360793617936279363793647936579366793677936879369793707937179372793737937479375793767937779378793797938079381793827938379384793857938679387793887938979390793917939279393793947939579396793977939879399794007940179402794037940479405794067940779408794097941079411794127941379414794157941679417794187941979420794217942279423794247942579426794277942879429794307943179432794337943479435794367943779438794397944079441794427944379444794457944679447794487944979450794517945279453794547945579456794577945879459794607946179462794637946479465794667946779468794697947079471794727947379474794757947679477794787947979480794817948279483794847948579486794877948879489794907949179492794937949479495794967949779498794997950079501795027950379504795057950679507795087950979510795117951279513795147951579516795177951879519795207952179522795237952479525795267952779528795297953079531795327953379534795357953679537795387953979540795417954279543795447954579546795477954879549795507955179552795537955479555795567955779558795597956079561795627956379564795657956679567795687956979570795717957279573795747957579576795777957879579795807958179582795837958479585795867958779588795897959079591795927959379594795957959679597795987959979600796017960279603796047960579606796077960879609796107961179612796137961479615796167961779618796197962079621796227962379624796257962679627796287962979630796317963279633796347963579636796377963879639796407964179642796437964479645796467964779648796497965079651796527965379654796557965679657796587965979660796617966279663796647966579666796677966879669796707967179672796737967479675796767967779678796797968079681796827968379684796857968679687796887968979690796917969279693796947969579696796977969879699797007970179702797037970479705797067970779708797097971079711797127971379714797157971679717797187971979720797217972279723797247972579726797277972879729797307973179732797337973479735797367973779738797397974079741797427974379744797457974679747797487974979750797517975279753797547975579756797577975879759797607976179762797637976479765797667976779768797697977079771797727977379774797757977679777797787977979780797817978279783797847978579786797877978879789797907979179792797937979479795797967979779798797997980079801798027980379804798057980679807798087980979810798117981279813798147981579816798177981879819798207982179822798237982479825798267982779828798297983079831798327983379834798357983679837798387983979840798417984279843798447984579846798477984879849798507985179852798537985479855798567985779858798597986079861798627986379864798657986679867798687986979870798717987279873798747987579876798777987879879798807988179882798837988479885798867988779888798897989079891798927989379894798957989679897798987989979900799017990279903799047990579906799077990879909799107991179912799137991479915799167991779918799197992079921799227992379924799257992679927799287992979930799317993279933799347993579936799377993879939799407994179942799437994479945799467994779948799497995079951799527995379954799557995679957799587995979960799617996279963799647996579966799677996879969799707997179972799737997479975799767997779978799797998079981799827998379984799857998679987799887998979990799917999279993799947999579996799977999879999800008000180002800038000480005800068000780008800098001080011800128001380014800158001680017800188001980020800218002280023800248002580026800278002880029800308003180032800338003480035800368003780038800398004080041800428004380044800458004680047800488004980050800518005280053800548005580056800578005880059800608006180062800638006480065800668006780068800698007080071800728007380074800758007680077800788007980080800818008280083800848008580086800878008880089800908009180092800938009480095800968009780098800998010080101801028010380104801058010680107801088010980110801118011280113801148011580116801178011880119801208012180122801238012480125801268012780128801298013080131801328013380134801358013680137801388013980140801418014280143801448014580146801478014880149801508015180152801538015480155801568015780158801598016080161801628016380164801658016680167801688016980170801718017280173801748017580176801778017880179801808018180182801838018480185801868018780188801898019080191801928019380194801958019680197801988019980200802018020280203802048020580206802078020880209802108021180212802138021480215802168021780218802198022080221802228022380224802258022680227802288022980230802318023280233802348023580236802378023880239802408024180242802438024480245802468024780248802498025080251802528025380254802558025680257802588025980260802618026280263802648026580266802678026880269802708027180272802738027480275802768027780278802798028080281802828028380284802858028680287802888028980290802918029280293802948029580296802978029880299803008030180302803038030480305803068030780308803098031080311803128031380314803158031680317803188031980320803218032280323803248032580326803278032880329803308033180332803338033480335803368033780338803398034080341803428034380344803458034680347803488034980350803518035280353803548035580356803578035880359803608036180362803638036480365803668036780368803698037080371803728037380374803758037680377803788037980380803818038280383803848038580386803878038880389803908039180392803938039480395803968039780398803998040080401804028040380404804058040680407804088040980410804118041280413804148041580416804178041880419804208042180422804238042480425804268042780428804298043080431804328043380434804358043680437804388043980440804418044280443804448044580446804478044880449804508045180452804538045480455804568045780458804598046080461804628046380464804658046680467804688046980470804718047280473804748047580476804778047880479804808048180482804838048480485804868048780488804898049080491804928049380494804958049680497804988049980500805018050280503805048050580506805078050880509805108051180512805138051480515805168051780518805198052080521805228052380524805258052680527805288052980530805318053280533805348053580536805378053880539805408054180542805438054480545805468054780548805498055080551805528055380554805558055680557805588055980560805618056280563805648056580566805678056880569805708057180572805738057480575805768057780578805798058080581805828058380584805858058680587805888058980590805918059280593805948059580596805978059880599806008060180602806038060480605806068060780608806098061080611806128061380614806158061680617806188061980620806218062280623806248062580626806278062880629806308063180632806338063480635806368063780638806398064080641806428064380644806458064680647806488064980650806518065280653806548065580656806578065880659806608066180662806638066480665806668066780668806698067080671806728067380674806758067680677806788067980680806818068280683806848068580686806878068880689806908069180692806938069480695806968069780698806998070080701807028070380704807058070680707807088070980710807118071280713807148071580716807178071880719807208072180722807238072480725807268072780728807298073080731807328073380734807358073680737807388073980740807418074280743807448074580746807478074880749807508075180752807538075480755807568075780758807598076080761807628076380764807658076680767807688076980770807718077280773807748077580776807778077880779807808078180782807838078480785807868078780788807898079080791807928079380794807958079680797807988079980800808018080280803808048080580806808078080880809808108081180812808138081480815808168081780818808198082080821808228082380824808258082680827808288082980830808318083280833808348083580836808378083880839808408084180842808438084480845808468084780848808498085080851808528085380854808558085680857808588085980860808618086280863808648086580866808678086880869808708087180872808738087480875808768087780878808798088080881808828088380884808858088680887808888088980890808918089280893808948089580896808978089880899809008090180902809038090480905809068090780908809098091080911809128091380914809158091680917809188091980920809218092280923809248092580926809278092880929809308093180932809338093480935809368093780938809398094080941809428094380944809458094680947809488094980950809518095280953809548095580956809578095880959809608096180962809638096480965809668096780968809698097080971809728097380974809758097680977809788097980980809818098280983809848098580986809878098880989809908099180992809938099480995809968099780998809998100081001810028100381004810058100681007810088100981010810118101281013810148101581016810178101881019810208102181022810238102481025810268102781028810298103081031810328103381034810358103681037810388103981040810418104281043810448104581046810478104881049810508105181052810538105481055810568105781058810598106081061810628106381064810658106681067810688106981070810718107281073810748107581076810778107881079810808108181082810838108481085810868108781088810898109081091810928109381094810958109681097810988109981100811018110281103811048110581106811078110881109811108111181112811138111481115811168111781118811198112081121811228112381124811258112681127811288112981130811318113281133811348113581136811378113881139811408114181142811438114481145811468114781148811498115081151811528115381154811558115681157811588115981160811618116281163811648116581166811678116881169811708117181172811738117481175811768117781178811798118081181811828118381184811858118681187811888118981190811918119281193811948119581196811978119881199812008120181202812038120481205812068120781208812098121081211812128121381214812158121681217812188121981220812218122281223812248122581226812278122881229812308123181232812338123481235812368123781238812398124081241812428124381244812458124681247812488124981250812518125281253812548125581256812578125881259812608126181262812638126481265812668126781268812698127081271812728127381274812758127681277812788127981280812818128281283812848128581286812878128881289812908129181292812938129481295812968129781298812998130081301813028130381304813058130681307813088130981310813118131281313813148131581316813178131881319813208132181322813238132481325813268132781328813298133081331813328133381334813358133681337813388133981340813418134281343813448134581346813478134881349813508135181352813538135481355813568135781358813598136081361813628136381364813658136681367813688136981370813718137281373813748137581376813778137881379813808138181382813838138481385813868138781388813898139081391813928139381394813958139681397813988139981400814018140281403814048140581406814078140881409814108141181412814138141481415814168141781418814198142081421814228142381424814258142681427814288142981430814318143281433814348143581436
  1. unit pic32mx534f064h;
  2. interface
  3. {$goto on}
  4. {$modeswitch advancedrecords}
  5. {$INLINE ON}
  6. {$OPTIMIZATION STACKFRAME}
  7. {$L startup.o}
  8. {$PACKRECORDS 2}
  9. type
  10. TBits_1 = 0..1;
  11. TBits_2 = 0..3;
  12. TBits_3 = 0..7;
  13. TBits_4 = 0..15;
  14. TBits_5 = 0..31;
  15. TBits_6 = 0..63;
  16. TBits_7 = 0..127;
  17. TBits_8 = 0..255;
  18. TBits_9 = 0..511;
  19. TBits_10 = 0..1023;
  20. TBits_11 = 0..2047;
  21. TBits_12 = 0..4095;
  22. TBits_13 = 0..8191;
  23. TBits_14 = 0..16383;
  24. TBits_15 = 0..32767;
  25. TBits_16 = 0..65535;
  26. TBits_17 = 0..131071;
  27. TBits_18 = 0..262143;
  28. TBits_19 = 0..524287;
  29. TBits_20 = 0..1048575;
  30. TBits_21 = 0..2097151;
  31. TBits_22 = 0..4194303;
  32. TBits_23 = 0..8388607;
  33. TBits_24 = 0..16777215;
  34. TBits_25 = 0..33554431;
  35. TBits_26 = 0..67108863;
  36. TBits_27 = 0..134217727;
  37. TBits_28 = 0..268435455;
  38. TBits_29 = 0..536870911;
  39. TBits_30 = 0..1073741823;
  40. TBits_31 = 0..2147483647;
  41. TBits_32 = 0..4294967295;
  42. TWDT_WDTCON = record
  43. private
  44. function getON : TBits_1; inline;
  45. function getSWDTPS : TBits_5; inline;
  46. function getSWDTPS0 : TBits_1; inline;
  47. function getSWDTPS1 : TBits_1; inline;
  48. function getSWDTPS2 : TBits_1; inline;
  49. function getSWDTPS3 : TBits_1; inline;
  50. function getSWDTPS4 : TBits_1; inline;
  51. function getWDTCLR : TBits_1; inline;
  52. function getWDTPS : TBits_5; inline;
  53. function getWDTPSTA : TBits_5; inline;
  54. function getw : TBits_32; inline;
  55. procedure setON(thebits : TBits_1); inline;
  56. procedure setSWDTPS(thebits : TBits_5); inline;
  57. procedure setSWDTPS0(thebits : TBits_1); inline;
  58. procedure setSWDTPS1(thebits : TBits_1); inline;
  59. procedure setSWDTPS2(thebits : TBits_1); inline;
  60. procedure setSWDTPS3(thebits : TBits_1); inline;
  61. procedure setSWDTPS4(thebits : TBits_1); inline;
  62. procedure setWDTCLR(thebits : TBits_1); inline;
  63. procedure setWDTPS(thebits : TBits_5); inline;
  64. procedure setWDTPSTA(thebits : TBits_5); inline;
  65. procedure setw(thebits : TBits_32); inline;
  66. public
  67. procedure clearON; inline;
  68. procedure clearSWDTPS0; inline;
  69. procedure clearSWDTPS1; inline;
  70. procedure clearSWDTPS2; inline;
  71. procedure clearSWDTPS3; inline;
  72. procedure clearSWDTPS4; inline;
  73. procedure clearWDTCLR; inline;
  74. procedure setON; inline;
  75. procedure setSWDTPS0; inline;
  76. procedure setSWDTPS1; inline;
  77. procedure setSWDTPS2; inline;
  78. procedure setSWDTPS3; inline;
  79. procedure setSWDTPS4; inline;
  80. procedure setWDTCLR; inline;
  81. property ON : TBits_1 read getON write setON;
  82. property SWDTPS : TBits_5 read getSWDTPS write setSWDTPS;
  83. property SWDTPS0 : TBits_1 read getSWDTPS0 write setSWDTPS0;
  84. property SWDTPS1 : TBits_1 read getSWDTPS1 write setSWDTPS1;
  85. property SWDTPS2 : TBits_1 read getSWDTPS2 write setSWDTPS2;
  86. property SWDTPS3 : TBits_1 read getSWDTPS3 write setSWDTPS3;
  87. property SWDTPS4 : TBits_1 read getSWDTPS4 write setSWDTPS4;
  88. property WDTCLR : TBits_1 read getWDTCLR write setWDTCLR;
  89. property WDTPS : TBits_5 read getWDTPS write setWDTPS;
  90. property WDTPSTA : TBits_5 read getWDTPSTA write setWDTPSTA;
  91. property w : TBits_32 read getw write setw;
  92. end;
  93. type
  94. TWDTRegisters = record
  95. WDTCONbits : TWDT_WDTCON;
  96. WDTCON : longWord;
  97. WDTCONCLR : longWord;
  98. WDTCONSET : longWord;
  99. WDTCONINV : longWord;
  100. end;
  101. TRTCC_RTCCON = record
  102. private
  103. function getCAL : TBits_10; inline;
  104. function getHALFSEC : TBits_1; inline;
  105. function getON : TBits_1; inline;
  106. function getRTCCLKON : TBits_1; inline;
  107. function getRTCOE : TBits_1; inline;
  108. function getRTCSYNC : TBits_1; inline;
  109. function getRTCWREN : TBits_1; inline;
  110. function getRTSECSEL : TBits_1; inline;
  111. function getSIDL : TBits_1; inline;
  112. function getw : TBits_32; inline;
  113. procedure setCAL(thebits : TBits_10); inline;
  114. procedure setHALFSEC(thebits : TBits_1); inline;
  115. procedure setON(thebits : TBits_1); inline;
  116. procedure setRTCCLKON(thebits : TBits_1); inline;
  117. procedure setRTCOE(thebits : TBits_1); inline;
  118. procedure setRTCSYNC(thebits : TBits_1); inline;
  119. procedure setRTCWREN(thebits : TBits_1); inline;
  120. procedure setRTSECSEL(thebits : TBits_1); inline;
  121. procedure setSIDL(thebits : TBits_1); inline;
  122. procedure setw(thebits : TBits_32); inline;
  123. public
  124. procedure clearHALFSEC; inline;
  125. procedure clearON; inline;
  126. procedure clearRTCCLKON; inline;
  127. procedure clearRTCOE; inline;
  128. procedure clearRTCSYNC; inline;
  129. procedure clearRTCWREN; inline;
  130. procedure clearRTSECSEL; inline;
  131. procedure clearSIDL; inline;
  132. procedure setHALFSEC; inline;
  133. procedure setON; inline;
  134. procedure setRTCCLKON; inline;
  135. procedure setRTCOE; inline;
  136. procedure setRTCSYNC; inline;
  137. procedure setRTCWREN; inline;
  138. procedure setRTSECSEL; inline;
  139. procedure setSIDL; inline;
  140. property CAL : TBits_10 read getCAL write setCAL;
  141. property HALFSEC : TBits_1 read getHALFSEC write setHALFSEC;
  142. property ON : TBits_1 read getON write setON;
  143. property RTCCLKON : TBits_1 read getRTCCLKON write setRTCCLKON;
  144. property RTCOE : TBits_1 read getRTCOE write setRTCOE;
  145. property RTCSYNC : TBits_1 read getRTCSYNC write setRTCSYNC;
  146. property RTCWREN : TBits_1 read getRTCWREN write setRTCWREN;
  147. property RTSECSEL : TBits_1 read getRTSECSEL write setRTSECSEL;
  148. property SIDL : TBits_1 read getSIDL write setSIDL;
  149. property w : TBits_32 read getw write setw;
  150. end;
  151. TRTCC_RTCALRM = record
  152. private
  153. function getALRMEN : TBits_1; inline;
  154. function getALRMSYNC : TBits_1; inline;
  155. function getAMASK : TBits_4; inline;
  156. function getARPT : TBits_8; inline;
  157. function getCHIME : TBits_1; inline;
  158. function getPIV : TBits_1; inline;
  159. function getw : TBits_32; inline;
  160. procedure setALRMEN(thebits : TBits_1); inline;
  161. procedure setALRMSYNC(thebits : TBits_1); inline;
  162. procedure setAMASK(thebits : TBits_4); inline;
  163. procedure setARPT(thebits : TBits_8); inline;
  164. procedure setCHIME(thebits : TBits_1); inline;
  165. procedure setPIV(thebits : TBits_1); inline;
  166. procedure setw(thebits : TBits_32); inline;
  167. public
  168. procedure clearALRMEN; inline;
  169. procedure clearALRMSYNC; inline;
  170. procedure clearCHIME; inline;
  171. procedure clearPIV; inline;
  172. procedure setALRMEN; inline;
  173. procedure setALRMSYNC; inline;
  174. procedure setCHIME; inline;
  175. procedure setPIV; inline;
  176. property ALRMEN : TBits_1 read getALRMEN write setALRMEN;
  177. property ALRMSYNC : TBits_1 read getALRMSYNC write setALRMSYNC;
  178. property AMASK : TBits_4 read getAMASK write setAMASK;
  179. property ARPT : TBits_8 read getARPT write setARPT;
  180. property CHIME : TBits_1 read getCHIME write setCHIME;
  181. property PIV : TBits_1 read getPIV write setPIV;
  182. property w : TBits_32 read getw write setw;
  183. end;
  184. TRTCC_RTCTIME = record
  185. private
  186. function getHR01 : TBits_4; inline;
  187. function getHR10 : TBits_4; inline;
  188. function getMIN01 : TBits_4; inline;
  189. function getMIN10 : TBits_4; inline;
  190. function getSEC01 : TBits_4; inline;
  191. function getSEC10 : TBits_4; inline;
  192. function getw : TBits_32; inline;
  193. procedure setHR01(thebits : TBits_4); inline;
  194. procedure setHR10(thebits : TBits_4); inline;
  195. procedure setMIN01(thebits : TBits_4); inline;
  196. procedure setMIN10(thebits : TBits_4); inline;
  197. procedure setSEC01(thebits : TBits_4); inline;
  198. procedure setSEC10(thebits : TBits_4); inline;
  199. procedure setw(thebits : TBits_32); inline;
  200. public
  201. property HR01 : TBits_4 read getHR01 write setHR01;
  202. property HR10 : TBits_4 read getHR10 write setHR10;
  203. property MIN01 : TBits_4 read getMIN01 write setMIN01;
  204. property MIN10 : TBits_4 read getMIN10 write setMIN10;
  205. property SEC01 : TBits_4 read getSEC01 write setSEC01;
  206. property SEC10 : TBits_4 read getSEC10 write setSEC10;
  207. property w : TBits_32 read getw write setw;
  208. end;
  209. TRTCC_RTCDATE = record
  210. private
  211. function getDAY01 : TBits_4; inline;
  212. function getDAY10 : TBits_4; inline;
  213. function getMONTH01 : TBits_4; inline;
  214. function getMONTH10 : TBits_4; inline;
  215. function getWDAY01 : TBits_4; inline;
  216. function getYEAR01 : TBits_4; inline;
  217. function getYEAR10 : TBits_4; inline;
  218. function getw : TBits_32; inline;
  219. procedure setDAY01(thebits : TBits_4); inline;
  220. procedure setDAY10(thebits : TBits_4); inline;
  221. procedure setMONTH01(thebits : TBits_4); inline;
  222. procedure setMONTH10(thebits : TBits_4); inline;
  223. procedure setWDAY01(thebits : TBits_4); inline;
  224. procedure setYEAR01(thebits : TBits_4); inline;
  225. procedure setYEAR10(thebits : TBits_4); inline;
  226. procedure setw(thebits : TBits_32); inline;
  227. public
  228. property DAY01 : TBits_4 read getDAY01 write setDAY01;
  229. property DAY10 : TBits_4 read getDAY10 write setDAY10;
  230. property MONTH01 : TBits_4 read getMONTH01 write setMONTH01;
  231. property MONTH10 : TBits_4 read getMONTH10 write setMONTH10;
  232. property WDAY01 : TBits_4 read getWDAY01 write setWDAY01;
  233. property YEAR01 : TBits_4 read getYEAR01 write setYEAR01;
  234. property YEAR10 : TBits_4 read getYEAR10 write setYEAR10;
  235. property w : TBits_32 read getw write setw;
  236. end;
  237. TRTCC_ALRMTIME = record
  238. private
  239. function getHR01 : TBits_4; inline;
  240. function getHR10 : TBits_4; inline;
  241. function getMIN01 : TBits_4; inline;
  242. function getMIN10 : TBits_4; inline;
  243. function getSEC01 : TBits_4; inline;
  244. function getSEC10 : TBits_4; inline;
  245. function getw : TBits_32; inline;
  246. procedure setHR01(thebits : TBits_4); inline;
  247. procedure setHR10(thebits : TBits_4); inline;
  248. procedure setMIN01(thebits : TBits_4); inline;
  249. procedure setMIN10(thebits : TBits_4); inline;
  250. procedure setSEC01(thebits : TBits_4); inline;
  251. procedure setSEC10(thebits : TBits_4); inline;
  252. procedure setw(thebits : TBits_32); inline;
  253. public
  254. property HR01 : TBits_4 read getHR01 write setHR01;
  255. property HR10 : TBits_4 read getHR10 write setHR10;
  256. property MIN01 : TBits_4 read getMIN01 write setMIN01;
  257. property MIN10 : TBits_4 read getMIN10 write setMIN10;
  258. property SEC01 : TBits_4 read getSEC01 write setSEC01;
  259. property SEC10 : TBits_4 read getSEC10 write setSEC10;
  260. property w : TBits_32 read getw write setw;
  261. end;
  262. TRTCC_ALRMDATE = record
  263. private
  264. function getDAY01 : TBits_4; inline;
  265. function getDAY10 : TBits_4; inline;
  266. function getMONTH01 : TBits_4; inline;
  267. function getMONTH10 : TBits_4; inline;
  268. function getWDAY01 : TBits_4; inline;
  269. function getw : TBits_32; inline;
  270. procedure setDAY01(thebits : TBits_4); inline;
  271. procedure setDAY10(thebits : TBits_4); inline;
  272. procedure setMONTH01(thebits : TBits_4); inline;
  273. procedure setMONTH10(thebits : TBits_4); inline;
  274. procedure setWDAY01(thebits : TBits_4); inline;
  275. procedure setw(thebits : TBits_32); inline;
  276. public
  277. property DAY01 : TBits_4 read getDAY01 write setDAY01;
  278. property DAY10 : TBits_4 read getDAY10 write setDAY10;
  279. property MONTH01 : TBits_4 read getMONTH01 write setMONTH01;
  280. property MONTH10 : TBits_4 read getMONTH10 write setMONTH10;
  281. property WDAY01 : TBits_4 read getWDAY01 write setWDAY01;
  282. property w : TBits_32 read getw write setw;
  283. end;
  284. type
  285. TRTCCRegisters = record
  286. RTCCONbits : TRTCC_RTCCON;
  287. RTCCON : longWord;
  288. RTCCONCLR : longWord;
  289. RTCCONSET : longWord;
  290. RTCCONINV : longWord;
  291. RTCALRMbits : TRTCC_RTCALRM;
  292. RTCALRM : longWord;
  293. RTCALRMCLR : longWord;
  294. RTCALRMSET : longWord;
  295. RTCALRMINV : longWord;
  296. RTCTIMEbits : TRTCC_RTCTIME;
  297. RTCTIME : longWord;
  298. RTCTIMECLR : longWord;
  299. RTCTIMESET : longWord;
  300. RTCTIMEINV : longWord;
  301. RTCDATEbits : TRTCC_RTCDATE;
  302. RTCDATE : longWord;
  303. RTCDATECLR : longWord;
  304. RTCDATESET : longWord;
  305. RTCDATEINV : longWord;
  306. ALRMTIMEbits : TRTCC_ALRMTIME;
  307. ALRMTIME : longWord;
  308. ALRMTIMECLR : longWord;
  309. ALRMTIMESET : longWord;
  310. ALRMTIMEINV : longWord;
  311. ALRMDATEbits : TRTCC_ALRMDATE;
  312. ALRMDATE : longWord;
  313. ALRMDATECLR : longWord;
  314. ALRMDATESET : longWord;
  315. ALRMDATEINV : longWord;
  316. end;
  317. TTMR1_T1CON = record
  318. private
  319. function getON : TBits_1; inline;
  320. function getSIDL : TBits_1; inline;
  321. function getTCKPS : TBits_2; inline;
  322. function getTCKPS0 : TBits_1; inline;
  323. function getTCKPS1 : TBits_1; inline;
  324. function getTCS : TBits_1; inline;
  325. function getTGATE : TBits_1; inline;
  326. function getTON : TBits_1; inline;
  327. function getTSIDL : TBits_1; inline;
  328. function getTSYNC : TBits_1; inline;
  329. function getTWDIS : TBits_1; inline;
  330. function getTWIP : TBits_1; inline;
  331. function getw : TBits_32; inline;
  332. procedure setON(thebits : TBits_1); inline;
  333. procedure setSIDL(thebits : TBits_1); inline;
  334. procedure setTCKPS(thebits : TBits_2); inline;
  335. procedure setTCKPS0(thebits : TBits_1); inline;
  336. procedure setTCKPS1(thebits : TBits_1); inline;
  337. procedure setTCS(thebits : TBits_1); inline;
  338. procedure setTGATE(thebits : TBits_1); inline;
  339. procedure setTON(thebits : TBits_1); inline;
  340. procedure setTSIDL(thebits : TBits_1); inline;
  341. procedure setTSYNC(thebits : TBits_1); inline;
  342. procedure setTWDIS(thebits : TBits_1); inline;
  343. procedure setTWIP(thebits : TBits_1); inline;
  344. procedure setw(thebits : TBits_32); inline;
  345. public
  346. procedure clearON; inline;
  347. procedure clearSIDL; inline;
  348. procedure clearTCKPS0; inline;
  349. procedure clearTCKPS1; inline;
  350. procedure clearTCS; inline;
  351. procedure clearTGATE; inline;
  352. procedure clearTON; inline;
  353. procedure clearTSIDL; inline;
  354. procedure clearTSYNC; inline;
  355. procedure clearTWDIS; inline;
  356. procedure clearTWIP; inline;
  357. procedure setON; inline;
  358. procedure setSIDL; inline;
  359. procedure setTCKPS0; inline;
  360. procedure setTCKPS1; inline;
  361. procedure setTCS; inline;
  362. procedure setTGATE; inline;
  363. procedure setTON; inline;
  364. procedure setTSIDL; inline;
  365. procedure setTSYNC; inline;
  366. procedure setTWDIS; inline;
  367. procedure setTWIP; inline;
  368. property ON : TBits_1 read getON write setON;
  369. property SIDL : TBits_1 read getSIDL write setSIDL;
  370. property TCKPS : TBits_2 read getTCKPS write setTCKPS;
  371. property TCKPS0 : TBits_1 read getTCKPS0 write setTCKPS0;
  372. property TCKPS1 : TBits_1 read getTCKPS1 write setTCKPS1;
  373. property TCS : TBits_1 read getTCS write setTCS;
  374. property TGATE : TBits_1 read getTGATE write setTGATE;
  375. property TON : TBits_1 read getTON write setTON;
  376. property TSIDL : TBits_1 read getTSIDL write setTSIDL;
  377. property TSYNC : TBits_1 read getTSYNC write setTSYNC;
  378. property TWDIS : TBits_1 read getTWDIS write setTWDIS;
  379. property TWIP : TBits_1 read getTWIP write setTWIP;
  380. property w : TBits_32 read getw write setw;
  381. end;
  382. type
  383. TTMR1Registers = record
  384. T1CONbits : TTMR1_T1CON;
  385. T1CON : longWord;
  386. T1CONCLR : longWord;
  387. T1CONSET : longWord;
  388. T1CONINV : longWord;
  389. TMR1 : longWord;
  390. TMR1CLR : longWord;
  391. TMR1SET : longWord;
  392. TMR1INV : longWord;
  393. PR1 : longWord;
  394. PR1CLR : longWord;
  395. PR1SET : longWord;
  396. PR1INV : longWord;
  397. end;
  398. TTMR2_T2CON = record
  399. private
  400. function getON : TBits_1; inline;
  401. function getSIDL : TBits_1; inline;
  402. function getT32 : TBits_1; inline;
  403. function getTCKPS : TBits_3; inline;
  404. function getTCKPS0 : TBits_1; inline;
  405. function getTCKPS1 : TBits_1; inline;
  406. function getTCKPS2 : TBits_1; inline;
  407. function getTGATE : TBits_1; inline;
  408. function getTON : TBits_1; inline;
  409. function getTSIDL : TBits_1; inline;
  410. function getw : TBits_32; inline;
  411. procedure setON(thebits : TBits_1); inline;
  412. procedure setSIDL(thebits : TBits_1); inline;
  413. procedure setT32(thebits : TBits_1); inline;
  414. procedure setTCKPS(thebits : TBits_3); inline;
  415. procedure setTCKPS0(thebits : TBits_1); inline;
  416. procedure setTCKPS1(thebits : TBits_1); inline;
  417. procedure setTCKPS2(thebits : TBits_1); inline;
  418. procedure setTGATE(thebits : TBits_1); inline;
  419. procedure setTON(thebits : TBits_1); inline;
  420. procedure setTSIDL(thebits : TBits_1); inline;
  421. procedure setw(thebits : TBits_32); inline;
  422. public
  423. procedure clearON; inline;
  424. procedure clearSIDL; inline;
  425. procedure clearT32; inline;
  426. procedure clearTCKPS0; inline;
  427. procedure clearTCKPS1; inline;
  428. procedure clearTCKPS2; inline;
  429. procedure clearTGATE; inline;
  430. procedure clearTON; inline;
  431. procedure clearTSIDL; inline;
  432. procedure setON; inline;
  433. procedure setSIDL; inline;
  434. procedure setT32; inline;
  435. procedure setTCKPS0; inline;
  436. procedure setTCKPS1; inline;
  437. procedure setTCKPS2; inline;
  438. procedure setTGATE; inline;
  439. procedure setTON; inline;
  440. procedure setTSIDL; inline;
  441. property ON : TBits_1 read getON write setON;
  442. property SIDL : TBits_1 read getSIDL write setSIDL;
  443. property T32 : TBits_1 read getT32 write setT32;
  444. property TCKPS : TBits_3 read getTCKPS write setTCKPS;
  445. property TCKPS0 : TBits_1 read getTCKPS0 write setTCKPS0;
  446. property TCKPS1 : TBits_1 read getTCKPS1 write setTCKPS1;
  447. property TCKPS2 : TBits_1 read getTCKPS2 write setTCKPS2;
  448. property TGATE : TBits_1 read getTGATE write setTGATE;
  449. property TON : TBits_1 read getTON write setTON;
  450. property TSIDL : TBits_1 read getTSIDL write setTSIDL;
  451. property w : TBits_32 read getw write setw;
  452. end;
  453. type
  454. TTMR2Registers = record
  455. T2CONbits : TTMR2_T2CON;
  456. T2CON : longWord;
  457. T2CONCLR : longWord;
  458. T2CONSET : longWord;
  459. T2CONINV : longWord;
  460. TMR2 : longWord;
  461. TMR2CLR : longWord;
  462. TMR2SET : longWord;
  463. TMR2INV : longWord;
  464. PR2 : longWord;
  465. PR2CLR : longWord;
  466. PR2SET : longWord;
  467. PR2INV : longWord;
  468. end;
  469. TTMR3_T3CON = record
  470. private
  471. function getON : TBits_1; inline;
  472. function getSIDL : TBits_1; inline;
  473. function getTCKPS : TBits_3; inline;
  474. function getTCKPS0 : TBits_1; inline;
  475. function getTCKPS1 : TBits_1; inline;
  476. function getTCKPS2 : TBits_1; inline;
  477. function getTGATE : TBits_1; inline;
  478. function getTON : TBits_1; inline;
  479. function getTSIDL : TBits_1; inline;
  480. function getw : TBits_32; inline;
  481. procedure setON(thebits : TBits_1); inline;
  482. procedure setSIDL(thebits : TBits_1); inline;
  483. procedure setTCKPS(thebits : TBits_3); inline;
  484. procedure setTCKPS0(thebits : TBits_1); inline;
  485. procedure setTCKPS1(thebits : TBits_1); inline;
  486. procedure setTCKPS2(thebits : TBits_1); inline;
  487. procedure setTGATE(thebits : TBits_1); inline;
  488. procedure setTON(thebits : TBits_1); inline;
  489. procedure setTSIDL(thebits : TBits_1); inline;
  490. procedure setw(thebits : TBits_32); inline;
  491. public
  492. procedure clearON; inline;
  493. procedure clearSIDL; inline;
  494. procedure clearTCKPS0; inline;
  495. procedure clearTCKPS1; inline;
  496. procedure clearTCKPS2; inline;
  497. procedure clearTGATE; inline;
  498. procedure clearTON; inline;
  499. procedure clearTSIDL; inline;
  500. procedure setON; inline;
  501. procedure setSIDL; inline;
  502. procedure setTCKPS0; inline;
  503. procedure setTCKPS1; inline;
  504. procedure setTCKPS2; inline;
  505. procedure setTGATE; inline;
  506. procedure setTON; inline;
  507. procedure setTSIDL; inline;
  508. property ON : TBits_1 read getON write setON;
  509. property SIDL : TBits_1 read getSIDL write setSIDL;
  510. property TCKPS : TBits_3 read getTCKPS write setTCKPS;
  511. property TCKPS0 : TBits_1 read getTCKPS0 write setTCKPS0;
  512. property TCKPS1 : TBits_1 read getTCKPS1 write setTCKPS1;
  513. property TCKPS2 : TBits_1 read getTCKPS2 write setTCKPS2;
  514. property TGATE : TBits_1 read getTGATE write setTGATE;
  515. property TON : TBits_1 read getTON write setTON;
  516. property TSIDL : TBits_1 read getTSIDL write setTSIDL;
  517. property w : TBits_32 read getw write setw;
  518. end;
  519. type
  520. TTMR3Registers = record
  521. T3CONbits : TTMR3_T3CON;
  522. T3CON : longWord;
  523. T3CONCLR : longWord;
  524. T3CONSET : longWord;
  525. T3CONINV : longWord;
  526. TMR3 : longWord;
  527. TMR3CLR : longWord;
  528. TMR3SET : longWord;
  529. TMR3INV : longWord;
  530. PR3 : longWord;
  531. PR3CLR : longWord;
  532. PR3SET : longWord;
  533. PR3INV : longWord;
  534. end;
  535. TTMR4_T4CON = record
  536. private
  537. function getON : TBits_1; inline;
  538. function getSIDL : TBits_1; inline;
  539. function getT32 : TBits_1; inline;
  540. function getTCKPS : TBits_3; inline;
  541. function getTCKPS0 : TBits_1; inline;
  542. function getTCKPS1 : TBits_1; inline;
  543. function getTCKPS2 : TBits_1; inline;
  544. function getTGATE : TBits_1; inline;
  545. function getTON : TBits_1; inline;
  546. function getTSIDL : TBits_1; inline;
  547. function getw : TBits_32; inline;
  548. procedure setON(thebits : TBits_1); inline;
  549. procedure setSIDL(thebits : TBits_1); inline;
  550. procedure setT32(thebits : TBits_1); inline;
  551. procedure setTCKPS(thebits : TBits_3); inline;
  552. procedure setTCKPS0(thebits : TBits_1); inline;
  553. procedure setTCKPS1(thebits : TBits_1); inline;
  554. procedure setTCKPS2(thebits : TBits_1); inline;
  555. procedure setTGATE(thebits : TBits_1); inline;
  556. procedure setTON(thebits : TBits_1); inline;
  557. procedure setTSIDL(thebits : TBits_1); inline;
  558. procedure setw(thebits : TBits_32); inline;
  559. public
  560. procedure clearON; inline;
  561. procedure clearSIDL; inline;
  562. procedure clearT32; inline;
  563. procedure clearTCKPS0; inline;
  564. procedure clearTCKPS1; inline;
  565. procedure clearTCKPS2; inline;
  566. procedure clearTGATE; inline;
  567. procedure clearTON; inline;
  568. procedure clearTSIDL; inline;
  569. procedure setON; inline;
  570. procedure setSIDL; inline;
  571. procedure setT32; inline;
  572. procedure setTCKPS0; inline;
  573. procedure setTCKPS1; inline;
  574. procedure setTCKPS2; inline;
  575. procedure setTGATE; inline;
  576. procedure setTON; inline;
  577. procedure setTSIDL; inline;
  578. property ON : TBits_1 read getON write setON;
  579. property SIDL : TBits_1 read getSIDL write setSIDL;
  580. property T32 : TBits_1 read getT32 write setT32;
  581. property TCKPS : TBits_3 read getTCKPS write setTCKPS;
  582. property TCKPS0 : TBits_1 read getTCKPS0 write setTCKPS0;
  583. property TCKPS1 : TBits_1 read getTCKPS1 write setTCKPS1;
  584. property TCKPS2 : TBits_1 read getTCKPS2 write setTCKPS2;
  585. property TGATE : TBits_1 read getTGATE write setTGATE;
  586. property TON : TBits_1 read getTON write setTON;
  587. property TSIDL : TBits_1 read getTSIDL write setTSIDL;
  588. property w : TBits_32 read getw write setw;
  589. end;
  590. type
  591. TTMR4Registers = record
  592. T4CONbits : TTMR4_T4CON;
  593. T4CON : longWord;
  594. T4CONCLR : longWord;
  595. T4CONSET : longWord;
  596. T4CONINV : longWord;
  597. TMR4 : longWord;
  598. TMR4CLR : longWord;
  599. TMR4SET : longWord;
  600. TMR4INV : longWord;
  601. PR4 : longWord;
  602. PR4CLR : longWord;
  603. PR4SET : longWord;
  604. PR4INV : longWord;
  605. end;
  606. TTMR5_T5CON = record
  607. private
  608. function getON : TBits_1; inline;
  609. function getSIDL : TBits_1; inline;
  610. function getTCKPS : TBits_3; inline;
  611. function getTCKPS0 : TBits_1; inline;
  612. function getTCKPS1 : TBits_1; inline;
  613. function getTCKPS2 : TBits_1; inline;
  614. function getTGATE : TBits_1; inline;
  615. function getTON : TBits_1; inline;
  616. function getTSIDL : TBits_1; inline;
  617. function getw : TBits_32; inline;
  618. procedure setON(thebits : TBits_1); inline;
  619. procedure setSIDL(thebits : TBits_1); inline;
  620. procedure setTCKPS(thebits : TBits_3); inline;
  621. procedure setTCKPS0(thebits : TBits_1); inline;
  622. procedure setTCKPS1(thebits : TBits_1); inline;
  623. procedure setTCKPS2(thebits : TBits_1); inline;
  624. procedure setTGATE(thebits : TBits_1); inline;
  625. procedure setTON(thebits : TBits_1); inline;
  626. procedure setTSIDL(thebits : TBits_1); inline;
  627. procedure setw(thebits : TBits_32); inline;
  628. public
  629. procedure clearON; inline;
  630. procedure clearSIDL; inline;
  631. procedure clearTCKPS0; inline;
  632. procedure clearTCKPS1; inline;
  633. procedure clearTCKPS2; inline;
  634. procedure clearTGATE; inline;
  635. procedure clearTON; inline;
  636. procedure clearTSIDL; inline;
  637. procedure setON; inline;
  638. procedure setSIDL; inline;
  639. procedure setTCKPS0; inline;
  640. procedure setTCKPS1; inline;
  641. procedure setTCKPS2; inline;
  642. procedure setTGATE; inline;
  643. procedure setTON; inline;
  644. procedure setTSIDL; inline;
  645. property ON : TBits_1 read getON write setON;
  646. property SIDL : TBits_1 read getSIDL write setSIDL;
  647. property TCKPS : TBits_3 read getTCKPS write setTCKPS;
  648. property TCKPS0 : TBits_1 read getTCKPS0 write setTCKPS0;
  649. property TCKPS1 : TBits_1 read getTCKPS1 write setTCKPS1;
  650. property TCKPS2 : TBits_1 read getTCKPS2 write setTCKPS2;
  651. property TGATE : TBits_1 read getTGATE write setTGATE;
  652. property TON : TBits_1 read getTON write setTON;
  653. property TSIDL : TBits_1 read getTSIDL write setTSIDL;
  654. property w : TBits_32 read getw write setw;
  655. end;
  656. type
  657. TTMR5Registers = record
  658. T5CONbits : TTMR5_T5CON;
  659. T5CON : longWord;
  660. T5CONCLR : longWord;
  661. T5CONSET : longWord;
  662. T5CONINV : longWord;
  663. TMR5 : longWord;
  664. TMR5CLR : longWord;
  665. TMR5SET : longWord;
  666. TMR5INV : longWord;
  667. PR5 : longWord;
  668. PR5CLR : longWord;
  669. PR5SET : longWord;
  670. PR5INV : longWord;
  671. end;
  672. TICAP1_IC1CON = record
  673. private
  674. function getC32 : TBits_1; inline;
  675. function getFEDGE : TBits_1; inline;
  676. function getICBNE : TBits_1; inline;
  677. function getICI : TBits_2; inline;
  678. function getICI0 : TBits_1; inline;
  679. function getICI1 : TBits_1; inline;
  680. function getICM : TBits_3; inline;
  681. function getICM0 : TBits_1; inline;
  682. function getICM1 : TBits_1; inline;
  683. function getICM2 : TBits_1; inline;
  684. function getICOV : TBits_1; inline;
  685. function getICSIDL : TBits_1; inline;
  686. function getICTMR : TBits_1; inline;
  687. function getON : TBits_1; inline;
  688. function getSIDL : TBits_1; inline;
  689. function getw : TBits_32; inline;
  690. procedure setC32(thebits : TBits_1); inline;
  691. procedure setFEDGE(thebits : TBits_1); inline;
  692. procedure setICBNE(thebits : TBits_1); inline;
  693. procedure setICI(thebits : TBits_2); inline;
  694. procedure setICI0(thebits : TBits_1); inline;
  695. procedure setICI1(thebits : TBits_1); inline;
  696. procedure setICM(thebits : TBits_3); inline;
  697. procedure setICM0(thebits : TBits_1); inline;
  698. procedure setICM1(thebits : TBits_1); inline;
  699. procedure setICM2(thebits : TBits_1); inline;
  700. procedure setICOV(thebits : TBits_1); inline;
  701. procedure setICSIDL(thebits : TBits_1); inline;
  702. procedure setICTMR(thebits : TBits_1); inline;
  703. procedure setON(thebits : TBits_1); inline;
  704. procedure setSIDL(thebits : TBits_1); inline;
  705. procedure setw(thebits : TBits_32); inline;
  706. public
  707. procedure clearC32; inline;
  708. procedure clearFEDGE; inline;
  709. procedure clearICBNE; inline;
  710. procedure clearICI0; inline;
  711. procedure clearICI1; inline;
  712. procedure clearICM0; inline;
  713. procedure clearICM1; inline;
  714. procedure clearICM2; inline;
  715. procedure clearICOV; inline;
  716. procedure clearICSIDL; inline;
  717. procedure clearICTMR; inline;
  718. procedure clearON; inline;
  719. procedure clearSIDL; inline;
  720. procedure setC32; inline;
  721. procedure setFEDGE; inline;
  722. procedure setICBNE; inline;
  723. procedure setICI0; inline;
  724. procedure setICI1; inline;
  725. procedure setICM0; inline;
  726. procedure setICM1; inline;
  727. procedure setICM2; inline;
  728. procedure setICOV; inline;
  729. procedure setICSIDL; inline;
  730. procedure setICTMR; inline;
  731. procedure setON; inline;
  732. procedure setSIDL; inline;
  733. property C32 : TBits_1 read getC32 write setC32;
  734. property FEDGE : TBits_1 read getFEDGE write setFEDGE;
  735. property ICBNE : TBits_1 read getICBNE write setICBNE;
  736. property ICI : TBits_2 read getICI write setICI;
  737. property ICI0 : TBits_1 read getICI0 write setICI0;
  738. property ICI1 : TBits_1 read getICI1 write setICI1;
  739. property ICM : TBits_3 read getICM write setICM;
  740. property ICM0 : TBits_1 read getICM0 write setICM0;
  741. property ICM1 : TBits_1 read getICM1 write setICM1;
  742. property ICM2 : TBits_1 read getICM2 write setICM2;
  743. property ICOV : TBits_1 read getICOV write setICOV;
  744. property ICSIDL : TBits_1 read getICSIDL write setICSIDL;
  745. property ICTMR : TBits_1 read getICTMR write setICTMR;
  746. property ON : TBits_1 read getON write setON;
  747. property SIDL : TBits_1 read getSIDL write setSIDL;
  748. property w : TBits_32 read getw write setw;
  749. end;
  750. type
  751. TICAP1Registers = record
  752. IC1CONbits : TICAP1_IC1CON;
  753. IC1CON : longWord;
  754. IC1CONCLR : longWord;
  755. IC1CONSET : longWord;
  756. IC1CONINV : longWord;
  757. IC1BUF : longWord;
  758. end;
  759. TICAP2_IC2CON = record
  760. private
  761. function getC32 : TBits_1; inline;
  762. function getFEDGE : TBits_1; inline;
  763. function getICBNE : TBits_1; inline;
  764. function getICI : TBits_2; inline;
  765. function getICI0 : TBits_1; inline;
  766. function getICI1 : TBits_1; inline;
  767. function getICM : TBits_3; inline;
  768. function getICM0 : TBits_1; inline;
  769. function getICM1 : TBits_1; inline;
  770. function getICM2 : TBits_1; inline;
  771. function getICOV : TBits_1; inline;
  772. function getICSIDL : TBits_1; inline;
  773. function getICTMR : TBits_1; inline;
  774. function getON : TBits_1; inline;
  775. function getSIDL : TBits_1; inline;
  776. function getw : TBits_32; inline;
  777. procedure setC32(thebits : TBits_1); inline;
  778. procedure setFEDGE(thebits : TBits_1); inline;
  779. procedure setICBNE(thebits : TBits_1); inline;
  780. procedure setICI(thebits : TBits_2); inline;
  781. procedure setICI0(thebits : TBits_1); inline;
  782. procedure setICI1(thebits : TBits_1); inline;
  783. procedure setICM(thebits : TBits_3); inline;
  784. procedure setICM0(thebits : TBits_1); inline;
  785. procedure setICM1(thebits : TBits_1); inline;
  786. procedure setICM2(thebits : TBits_1); inline;
  787. procedure setICOV(thebits : TBits_1); inline;
  788. procedure setICSIDL(thebits : TBits_1); inline;
  789. procedure setICTMR(thebits : TBits_1); inline;
  790. procedure setON(thebits : TBits_1); inline;
  791. procedure setSIDL(thebits : TBits_1); inline;
  792. procedure setw(thebits : TBits_32); inline;
  793. public
  794. procedure clearC32; inline;
  795. procedure clearFEDGE; inline;
  796. procedure clearICBNE; inline;
  797. procedure clearICI0; inline;
  798. procedure clearICI1; inline;
  799. procedure clearICM0; inline;
  800. procedure clearICM1; inline;
  801. procedure clearICM2; inline;
  802. procedure clearICOV; inline;
  803. procedure clearICSIDL; inline;
  804. procedure clearICTMR; inline;
  805. procedure clearON; inline;
  806. procedure clearSIDL; inline;
  807. procedure setC32; inline;
  808. procedure setFEDGE; inline;
  809. procedure setICBNE; inline;
  810. procedure setICI0; inline;
  811. procedure setICI1; inline;
  812. procedure setICM0; inline;
  813. procedure setICM1; inline;
  814. procedure setICM2; inline;
  815. procedure setICOV; inline;
  816. procedure setICSIDL; inline;
  817. procedure setICTMR; inline;
  818. procedure setON; inline;
  819. procedure setSIDL; inline;
  820. property C32 : TBits_1 read getC32 write setC32;
  821. property FEDGE : TBits_1 read getFEDGE write setFEDGE;
  822. property ICBNE : TBits_1 read getICBNE write setICBNE;
  823. property ICI : TBits_2 read getICI write setICI;
  824. property ICI0 : TBits_1 read getICI0 write setICI0;
  825. property ICI1 : TBits_1 read getICI1 write setICI1;
  826. property ICM : TBits_3 read getICM write setICM;
  827. property ICM0 : TBits_1 read getICM0 write setICM0;
  828. property ICM1 : TBits_1 read getICM1 write setICM1;
  829. property ICM2 : TBits_1 read getICM2 write setICM2;
  830. property ICOV : TBits_1 read getICOV write setICOV;
  831. property ICSIDL : TBits_1 read getICSIDL write setICSIDL;
  832. property ICTMR : TBits_1 read getICTMR write setICTMR;
  833. property ON : TBits_1 read getON write setON;
  834. property SIDL : TBits_1 read getSIDL write setSIDL;
  835. property w : TBits_32 read getw write setw;
  836. end;
  837. type
  838. TICAP2Registers = record
  839. IC2CONbits : TICAP2_IC2CON;
  840. IC2CON : longWord;
  841. IC2CONCLR : longWord;
  842. IC2CONSET : longWord;
  843. IC2CONINV : longWord;
  844. IC2BUF : longWord;
  845. end;
  846. TICAP3_IC3CON = record
  847. private
  848. function getC32 : TBits_1; inline;
  849. function getFEDGE : TBits_1; inline;
  850. function getICBNE : TBits_1; inline;
  851. function getICI : TBits_2; inline;
  852. function getICI0 : TBits_1; inline;
  853. function getICI1 : TBits_1; inline;
  854. function getICM : TBits_3; inline;
  855. function getICM0 : TBits_1; inline;
  856. function getICM1 : TBits_1; inline;
  857. function getICM2 : TBits_1; inline;
  858. function getICOV : TBits_1; inline;
  859. function getICSIDL : TBits_1; inline;
  860. function getICTMR : TBits_1; inline;
  861. function getON : TBits_1; inline;
  862. function getSIDL : TBits_1; inline;
  863. function getw : TBits_32; inline;
  864. procedure setC32(thebits : TBits_1); inline;
  865. procedure setFEDGE(thebits : TBits_1); inline;
  866. procedure setICBNE(thebits : TBits_1); inline;
  867. procedure setICI(thebits : TBits_2); inline;
  868. procedure setICI0(thebits : TBits_1); inline;
  869. procedure setICI1(thebits : TBits_1); inline;
  870. procedure setICM(thebits : TBits_3); inline;
  871. procedure setICM0(thebits : TBits_1); inline;
  872. procedure setICM1(thebits : TBits_1); inline;
  873. procedure setICM2(thebits : TBits_1); inline;
  874. procedure setICOV(thebits : TBits_1); inline;
  875. procedure setICSIDL(thebits : TBits_1); inline;
  876. procedure setICTMR(thebits : TBits_1); inline;
  877. procedure setON(thebits : TBits_1); inline;
  878. procedure setSIDL(thebits : TBits_1); inline;
  879. procedure setw(thebits : TBits_32); inline;
  880. public
  881. procedure clearC32; inline;
  882. procedure clearFEDGE; inline;
  883. procedure clearICBNE; inline;
  884. procedure clearICI0; inline;
  885. procedure clearICI1; inline;
  886. procedure clearICM0; inline;
  887. procedure clearICM1; inline;
  888. procedure clearICM2; inline;
  889. procedure clearICOV; inline;
  890. procedure clearICSIDL; inline;
  891. procedure clearICTMR; inline;
  892. procedure clearON; inline;
  893. procedure clearSIDL; inline;
  894. procedure setC32; inline;
  895. procedure setFEDGE; inline;
  896. procedure setICBNE; inline;
  897. procedure setICI0; inline;
  898. procedure setICI1; inline;
  899. procedure setICM0; inline;
  900. procedure setICM1; inline;
  901. procedure setICM2; inline;
  902. procedure setICOV; inline;
  903. procedure setICSIDL; inline;
  904. procedure setICTMR; inline;
  905. procedure setON; inline;
  906. procedure setSIDL; inline;
  907. property C32 : TBits_1 read getC32 write setC32;
  908. property FEDGE : TBits_1 read getFEDGE write setFEDGE;
  909. property ICBNE : TBits_1 read getICBNE write setICBNE;
  910. property ICI : TBits_2 read getICI write setICI;
  911. property ICI0 : TBits_1 read getICI0 write setICI0;
  912. property ICI1 : TBits_1 read getICI1 write setICI1;
  913. property ICM : TBits_3 read getICM write setICM;
  914. property ICM0 : TBits_1 read getICM0 write setICM0;
  915. property ICM1 : TBits_1 read getICM1 write setICM1;
  916. property ICM2 : TBits_1 read getICM2 write setICM2;
  917. property ICOV : TBits_1 read getICOV write setICOV;
  918. property ICSIDL : TBits_1 read getICSIDL write setICSIDL;
  919. property ICTMR : TBits_1 read getICTMR write setICTMR;
  920. property ON : TBits_1 read getON write setON;
  921. property SIDL : TBits_1 read getSIDL write setSIDL;
  922. property w : TBits_32 read getw write setw;
  923. end;
  924. type
  925. TICAP3Registers = record
  926. IC3CONbits : TICAP3_IC3CON;
  927. IC3CON : longWord;
  928. IC3CONCLR : longWord;
  929. IC3CONSET : longWord;
  930. IC3CONINV : longWord;
  931. IC3BUF : longWord;
  932. end;
  933. TICAP4_IC4CON = record
  934. private
  935. function getC32 : TBits_1; inline;
  936. function getFEDGE : TBits_1; inline;
  937. function getICBNE : TBits_1; inline;
  938. function getICI : TBits_2; inline;
  939. function getICI0 : TBits_1; inline;
  940. function getICI1 : TBits_1; inline;
  941. function getICM : TBits_3; inline;
  942. function getICM0 : TBits_1; inline;
  943. function getICM1 : TBits_1; inline;
  944. function getICM2 : TBits_1; inline;
  945. function getICOV : TBits_1; inline;
  946. function getICSIDL : TBits_1; inline;
  947. function getICTMR : TBits_1; inline;
  948. function getON : TBits_1; inline;
  949. function getSIDL : TBits_1; inline;
  950. function getw : TBits_32; inline;
  951. procedure setC32(thebits : TBits_1); inline;
  952. procedure setFEDGE(thebits : TBits_1); inline;
  953. procedure setICBNE(thebits : TBits_1); inline;
  954. procedure setICI(thebits : TBits_2); inline;
  955. procedure setICI0(thebits : TBits_1); inline;
  956. procedure setICI1(thebits : TBits_1); inline;
  957. procedure setICM(thebits : TBits_3); inline;
  958. procedure setICM0(thebits : TBits_1); inline;
  959. procedure setICM1(thebits : TBits_1); inline;
  960. procedure setICM2(thebits : TBits_1); inline;
  961. procedure setICOV(thebits : TBits_1); inline;
  962. procedure setICSIDL(thebits : TBits_1); inline;
  963. procedure setICTMR(thebits : TBits_1); inline;
  964. procedure setON(thebits : TBits_1); inline;
  965. procedure setSIDL(thebits : TBits_1); inline;
  966. procedure setw(thebits : TBits_32); inline;
  967. public
  968. procedure clearC32; inline;
  969. procedure clearFEDGE; inline;
  970. procedure clearICBNE; inline;
  971. procedure clearICI0; inline;
  972. procedure clearICI1; inline;
  973. procedure clearICM0; inline;
  974. procedure clearICM1; inline;
  975. procedure clearICM2; inline;
  976. procedure clearICOV; inline;
  977. procedure clearICSIDL; inline;
  978. procedure clearICTMR; inline;
  979. procedure clearON; inline;
  980. procedure clearSIDL; inline;
  981. procedure setC32; inline;
  982. procedure setFEDGE; inline;
  983. procedure setICBNE; inline;
  984. procedure setICI0; inline;
  985. procedure setICI1; inline;
  986. procedure setICM0; inline;
  987. procedure setICM1; inline;
  988. procedure setICM2; inline;
  989. procedure setICOV; inline;
  990. procedure setICSIDL; inline;
  991. procedure setICTMR; inline;
  992. procedure setON; inline;
  993. procedure setSIDL; inline;
  994. property C32 : TBits_1 read getC32 write setC32;
  995. property FEDGE : TBits_1 read getFEDGE write setFEDGE;
  996. property ICBNE : TBits_1 read getICBNE write setICBNE;
  997. property ICI : TBits_2 read getICI write setICI;
  998. property ICI0 : TBits_1 read getICI0 write setICI0;
  999. property ICI1 : TBits_1 read getICI1 write setICI1;
  1000. property ICM : TBits_3 read getICM write setICM;
  1001. property ICM0 : TBits_1 read getICM0 write setICM0;
  1002. property ICM1 : TBits_1 read getICM1 write setICM1;
  1003. property ICM2 : TBits_1 read getICM2 write setICM2;
  1004. property ICOV : TBits_1 read getICOV write setICOV;
  1005. property ICSIDL : TBits_1 read getICSIDL write setICSIDL;
  1006. property ICTMR : TBits_1 read getICTMR write setICTMR;
  1007. property ON : TBits_1 read getON write setON;
  1008. property SIDL : TBits_1 read getSIDL write setSIDL;
  1009. property w : TBits_32 read getw write setw;
  1010. end;
  1011. type
  1012. TICAP4Registers = record
  1013. IC4CONbits : TICAP4_IC4CON;
  1014. IC4CON : longWord;
  1015. IC4CONCLR : longWord;
  1016. IC4CONSET : longWord;
  1017. IC4CONINV : longWord;
  1018. IC4BUF : longWord;
  1019. end;
  1020. TICAP5_IC5CON = record
  1021. private
  1022. function getC32 : TBits_1; inline;
  1023. function getFEDGE : TBits_1; inline;
  1024. function getICBNE : TBits_1; inline;
  1025. function getICI : TBits_2; inline;
  1026. function getICI0 : TBits_1; inline;
  1027. function getICI1 : TBits_1; inline;
  1028. function getICM : TBits_3; inline;
  1029. function getICM0 : TBits_1; inline;
  1030. function getICM1 : TBits_1; inline;
  1031. function getICM2 : TBits_1; inline;
  1032. function getICOV : TBits_1; inline;
  1033. function getICSIDL : TBits_1; inline;
  1034. function getICTMR : TBits_1; inline;
  1035. function getON : TBits_1; inline;
  1036. function getSIDL : TBits_1; inline;
  1037. function getw : TBits_32; inline;
  1038. procedure setC32(thebits : TBits_1); inline;
  1039. procedure setFEDGE(thebits : TBits_1); inline;
  1040. procedure setICBNE(thebits : TBits_1); inline;
  1041. procedure setICI(thebits : TBits_2); inline;
  1042. procedure setICI0(thebits : TBits_1); inline;
  1043. procedure setICI1(thebits : TBits_1); inline;
  1044. procedure setICM(thebits : TBits_3); inline;
  1045. procedure setICM0(thebits : TBits_1); inline;
  1046. procedure setICM1(thebits : TBits_1); inline;
  1047. procedure setICM2(thebits : TBits_1); inline;
  1048. procedure setICOV(thebits : TBits_1); inline;
  1049. procedure setICSIDL(thebits : TBits_1); inline;
  1050. procedure setICTMR(thebits : TBits_1); inline;
  1051. procedure setON(thebits : TBits_1); inline;
  1052. procedure setSIDL(thebits : TBits_1); inline;
  1053. procedure setw(thebits : TBits_32); inline;
  1054. public
  1055. procedure clearC32; inline;
  1056. procedure clearFEDGE; inline;
  1057. procedure clearICBNE; inline;
  1058. procedure clearICI0; inline;
  1059. procedure clearICI1; inline;
  1060. procedure clearICM0; inline;
  1061. procedure clearICM1; inline;
  1062. procedure clearICM2; inline;
  1063. procedure clearICOV; inline;
  1064. procedure clearICSIDL; inline;
  1065. procedure clearICTMR; inline;
  1066. procedure clearON; inline;
  1067. procedure clearSIDL; inline;
  1068. procedure setC32; inline;
  1069. procedure setFEDGE; inline;
  1070. procedure setICBNE; inline;
  1071. procedure setICI0; inline;
  1072. procedure setICI1; inline;
  1073. procedure setICM0; inline;
  1074. procedure setICM1; inline;
  1075. procedure setICM2; inline;
  1076. procedure setICOV; inline;
  1077. procedure setICSIDL; inline;
  1078. procedure setICTMR; inline;
  1079. procedure setON; inline;
  1080. procedure setSIDL; inline;
  1081. property C32 : TBits_1 read getC32 write setC32;
  1082. property FEDGE : TBits_1 read getFEDGE write setFEDGE;
  1083. property ICBNE : TBits_1 read getICBNE write setICBNE;
  1084. property ICI : TBits_2 read getICI write setICI;
  1085. property ICI0 : TBits_1 read getICI0 write setICI0;
  1086. property ICI1 : TBits_1 read getICI1 write setICI1;
  1087. property ICM : TBits_3 read getICM write setICM;
  1088. property ICM0 : TBits_1 read getICM0 write setICM0;
  1089. property ICM1 : TBits_1 read getICM1 write setICM1;
  1090. property ICM2 : TBits_1 read getICM2 write setICM2;
  1091. property ICOV : TBits_1 read getICOV write setICOV;
  1092. property ICSIDL : TBits_1 read getICSIDL write setICSIDL;
  1093. property ICTMR : TBits_1 read getICTMR write setICTMR;
  1094. property ON : TBits_1 read getON write setON;
  1095. property SIDL : TBits_1 read getSIDL write setSIDL;
  1096. property w : TBits_32 read getw write setw;
  1097. end;
  1098. type
  1099. TICAP5Registers = record
  1100. IC5CONbits : TICAP5_IC5CON;
  1101. IC5CON : longWord;
  1102. IC5CONCLR : longWord;
  1103. IC5CONSET : longWord;
  1104. IC5CONINV : longWord;
  1105. IC5BUF : longWord;
  1106. end;
  1107. TOCMP1_OC1CON = record
  1108. private
  1109. function getOC32 : TBits_1; inline;
  1110. function getOCFLT : TBits_1; inline;
  1111. function getOCM : TBits_3; inline;
  1112. function getOCM0 : TBits_1; inline;
  1113. function getOCM1 : TBits_1; inline;
  1114. function getOCM2 : TBits_1; inline;
  1115. function getOCSIDL : TBits_1; inline;
  1116. function getOCTSEL : TBits_1; inline;
  1117. function getON : TBits_1; inline;
  1118. function getSIDL : TBits_1; inline;
  1119. function getw : TBits_32; inline;
  1120. procedure setOC32(thebits : TBits_1); inline;
  1121. procedure setOCFLT(thebits : TBits_1); inline;
  1122. procedure setOCM(thebits : TBits_3); inline;
  1123. procedure setOCM0(thebits : TBits_1); inline;
  1124. procedure setOCM1(thebits : TBits_1); inline;
  1125. procedure setOCM2(thebits : TBits_1); inline;
  1126. procedure setOCSIDL(thebits : TBits_1); inline;
  1127. procedure setOCTSEL(thebits : TBits_1); inline;
  1128. procedure setON(thebits : TBits_1); inline;
  1129. procedure setSIDL(thebits : TBits_1); inline;
  1130. procedure setw(thebits : TBits_32); inline;
  1131. public
  1132. procedure clearOC32; inline;
  1133. procedure clearOCFLT; inline;
  1134. procedure clearOCM0; inline;
  1135. procedure clearOCM1; inline;
  1136. procedure clearOCM2; inline;
  1137. procedure clearOCSIDL; inline;
  1138. procedure clearOCTSEL; inline;
  1139. procedure clearON; inline;
  1140. procedure clearSIDL; inline;
  1141. procedure setOC32; inline;
  1142. procedure setOCFLT; inline;
  1143. procedure setOCM0; inline;
  1144. procedure setOCM1; inline;
  1145. procedure setOCM2; inline;
  1146. procedure setOCSIDL; inline;
  1147. procedure setOCTSEL; inline;
  1148. procedure setON; inline;
  1149. procedure setSIDL; inline;
  1150. property OC32 : TBits_1 read getOC32 write setOC32;
  1151. property OCFLT : TBits_1 read getOCFLT write setOCFLT;
  1152. property OCM : TBits_3 read getOCM write setOCM;
  1153. property OCM0 : TBits_1 read getOCM0 write setOCM0;
  1154. property OCM1 : TBits_1 read getOCM1 write setOCM1;
  1155. property OCM2 : TBits_1 read getOCM2 write setOCM2;
  1156. property OCSIDL : TBits_1 read getOCSIDL write setOCSIDL;
  1157. property OCTSEL : TBits_1 read getOCTSEL write setOCTSEL;
  1158. property ON : TBits_1 read getON write setON;
  1159. property SIDL : TBits_1 read getSIDL write setSIDL;
  1160. property w : TBits_32 read getw write setw;
  1161. end;
  1162. type
  1163. TOCMP1Registers = record
  1164. OC1CONbits : TOCMP1_OC1CON;
  1165. OC1CON : longWord;
  1166. OC1CONCLR : longWord;
  1167. OC1CONSET : longWord;
  1168. OC1CONINV : longWord;
  1169. OC1R : longWord;
  1170. OC1RCLR : longWord;
  1171. OC1RSET : longWord;
  1172. OC1RINV : longWord;
  1173. OC1RS : longWord;
  1174. OC1RSCLR : longWord;
  1175. OC1RSSET : longWord;
  1176. OC1RSINV : longWord;
  1177. end;
  1178. TOCMP2_OC2CON = record
  1179. private
  1180. function getOC32 : TBits_1; inline;
  1181. function getOCFLT : TBits_1; inline;
  1182. function getOCM : TBits_3; inline;
  1183. function getOCM0 : TBits_1; inline;
  1184. function getOCM1 : TBits_1; inline;
  1185. function getOCM2 : TBits_1; inline;
  1186. function getOCSIDL : TBits_1; inline;
  1187. function getOCTSEL : TBits_1; inline;
  1188. function getON : TBits_1; inline;
  1189. function getSIDL : TBits_1; inline;
  1190. function getw : TBits_32; inline;
  1191. procedure setOC32(thebits : TBits_1); inline;
  1192. procedure setOCFLT(thebits : TBits_1); inline;
  1193. procedure setOCM(thebits : TBits_3); inline;
  1194. procedure setOCM0(thebits : TBits_1); inline;
  1195. procedure setOCM1(thebits : TBits_1); inline;
  1196. procedure setOCM2(thebits : TBits_1); inline;
  1197. procedure setOCSIDL(thebits : TBits_1); inline;
  1198. procedure setOCTSEL(thebits : TBits_1); inline;
  1199. procedure setON(thebits : TBits_1); inline;
  1200. procedure setSIDL(thebits : TBits_1); inline;
  1201. procedure setw(thebits : TBits_32); inline;
  1202. public
  1203. procedure clearOC32; inline;
  1204. procedure clearOCFLT; inline;
  1205. procedure clearOCM0; inline;
  1206. procedure clearOCM1; inline;
  1207. procedure clearOCM2; inline;
  1208. procedure clearOCSIDL; inline;
  1209. procedure clearOCTSEL; inline;
  1210. procedure clearON; inline;
  1211. procedure clearSIDL; inline;
  1212. procedure setOC32; inline;
  1213. procedure setOCFLT; inline;
  1214. procedure setOCM0; inline;
  1215. procedure setOCM1; inline;
  1216. procedure setOCM2; inline;
  1217. procedure setOCSIDL; inline;
  1218. procedure setOCTSEL; inline;
  1219. procedure setON; inline;
  1220. procedure setSIDL; inline;
  1221. property OC32 : TBits_1 read getOC32 write setOC32;
  1222. property OCFLT : TBits_1 read getOCFLT write setOCFLT;
  1223. property OCM : TBits_3 read getOCM write setOCM;
  1224. property OCM0 : TBits_1 read getOCM0 write setOCM0;
  1225. property OCM1 : TBits_1 read getOCM1 write setOCM1;
  1226. property OCM2 : TBits_1 read getOCM2 write setOCM2;
  1227. property OCSIDL : TBits_1 read getOCSIDL write setOCSIDL;
  1228. property OCTSEL : TBits_1 read getOCTSEL write setOCTSEL;
  1229. property ON : TBits_1 read getON write setON;
  1230. property SIDL : TBits_1 read getSIDL write setSIDL;
  1231. property w : TBits_32 read getw write setw;
  1232. end;
  1233. type
  1234. TOCMP2Registers = record
  1235. OC2CONbits : TOCMP2_OC2CON;
  1236. OC2CON : longWord;
  1237. OC2CONCLR : longWord;
  1238. OC2CONSET : longWord;
  1239. OC2CONINV : longWord;
  1240. OC2R : longWord;
  1241. OC2RCLR : longWord;
  1242. OC2RSET : longWord;
  1243. OC2RINV : longWord;
  1244. OC2RS : longWord;
  1245. OC2RSCLR : longWord;
  1246. OC2RSSET : longWord;
  1247. OC2RSINV : longWord;
  1248. end;
  1249. TOCMP3_OC3CON = record
  1250. private
  1251. function getOC32 : TBits_1; inline;
  1252. function getOCFLT : TBits_1; inline;
  1253. function getOCM : TBits_3; inline;
  1254. function getOCM0 : TBits_1; inline;
  1255. function getOCM1 : TBits_1; inline;
  1256. function getOCM2 : TBits_1; inline;
  1257. function getOCSIDL : TBits_1; inline;
  1258. function getOCTSEL : TBits_1; inline;
  1259. function getON : TBits_1; inline;
  1260. function getSIDL : TBits_1; inline;
  1261. function getw : TBits_32; inline;
  1262. procedure setOC32(thebits : TBits_1); inline;
  1263. procedure setOCFLT(thebits : TBits_1); inline;
  1264. procedure setOCM(thebits : TBits_3); inline;
  1265. procedure setOCM0(thebits : TBits_1); inline;
  1266. procedure setOCM1(thebits : TBits_1); inline;
  1267. procedure setOCM2(thebits : TBits_1); inline;
  1268. procedure setOCSIDL(thebits : TBits_1); inline;
  1269. procedure setOCTSEL(thebits : TBits_1); inline;
  1270. procedure setON(thebits : TBits_1); inline;
  1271. procedure setSIDL(thebits : TBits_1); inline;
  1272. procedure setw(thebits : TBits_32); inline;
  1273. public
  1274. procedure clearOC32; inline;
  1275. procedure clearOCFLT; inline;
  1276. procedure clearOCM0; inline;
  1277. procedure clearOCM1; inline;
  1278. procedure clearOCM2; inline;
  1279. procedure clearOCSIDL; inline;
  1280. procedure clearOCTSEL; inline;
  1281. procedure clearON; inline;
  1282. procedure clearSIDL; inline;
  1283. procedure setOC32; inline;
  1284. procedure setOCFLT; inline;
  1285. procedure setOCM0; inline;
  1286. procedure setOCM1; inline;
  1287. procedure setOCM2; inline;
  1288. procedure setOCSIDL; inline;
  1289. procedure setOCTSEL; inline;
  1290. procedure setON; inline;
  1291. procedure setSIDL; inline;
  1292. property OC32 : TBits_1 read getOC32 write setOC32;
  1293. property OCFLT : TBits_1 read getOCFLT write setOCFLT;
  1294. property OCM : TBits_3 read getOCM write setOCM;
  1295. property OCM0 : TBits_1 read getOCM0 write setOCM0;
  1296. property OCM1 : TBits_1 read getOCM1 write setOCM1;
  1297. property OCM2 : TBits_1 read getOCM2 write setOCM2;
  1298. property OCSIDL : TBits_1 read getOCSIDL write setOCSIDL;
  1299. property OCTSEL : TBits_1 read getOCTSEL write setOCTSEL;
  1300. property ON : TBits_1 read getON write setON;
  1301. property SIDL : TBits_1 read getSIDL write setSIDL;
  1302. property w : TBits_32 read getw write setw;
  1303. end;
  1304. type
  1305. TOCMP3Registers = record
  1306. OC3CONbits : TOCMP3_OC3CON;
  1307. OC3CON : longWord;
  1308. OC3CONCLR : longWord;
  1309. OC3CONSET : longWord;
  1310. OC3CONINV : longWord;
  1311. OC3R : longWord;
  1312. OC3RCLR : longWord;
  1313. OC3RSET : longWord;
  1314. OC3RINV : longWord;
  1315. OC3RS : longWord;
  1316. OC3RSCLR : longWord;
  1317. OC3RSSET : longWord;
  1318. OC3RSINV : longWord;
  1319. end;
  1320. TOCMP4_OC4CON = record
  1321. private
  1322. function getOC32 : TBits_1; inline;
  1323. function getOCFLT : TBits_1; inline;
  1324. function getOCM : TBits_3; inline;
  1325. function getOCM0 : TBits_1; inline;
  1326. function getOCM1 : TBits_1; inline;
  1327. function getOCM2 : TBits_1; inline;
  1328. function getOCSIDL : TBits_1; inline;
  1329. function getOCTSEL : TBits_1; inline;
  1330. function getON : TBits_1; inline;
  1331. function getSIDL : TBits_1; inline;
  1332. function getw : TBits_32; inline;
  1333. procedure setOC32(thebits : TBits_1); inline;
  1334. procedure setOCFLT(thebits : TBits_1); inline;
  1335. procedure setOCM(thebits : TBits_3); inline;
  1336. procedure setOCM0(thebits : TBits_1); inline;
  1337. procedure setOCM1(thebits : TBits_1); inline;
  1338. procedure setOCM2(thebits : TBits_1); inline;
  1339. procedure setOCSIDL(thebits : TBits_1); inline;
  1340. procedure setOCTSEL(thebits : TBits_1); inline;
  1341. procedure setON(thebits : TBits_1); inline;
  1342. procedure setSIDL(thebits : TBits_1); inline;
  1343. procedure setw(thebits : TBits_32); inline;
  1344. public
  1345. procedure clearOC32; inline;
  1346. procedure clearOCFLT; inline;
  1347. procedure clearOCM0; inline;
  1348. procedure clearOCM1; inline;
  1349. procedure clearOCM2; inline;
  1350. procedure clearOCSIDL; inline;
  1351. procedure clearOCTSEL; inline;
  1352. procedure clearON; inline;
  1353. procedure clearSIDL; inline;
  1354. procedure setOC32; inline;
  1355. procedure setOCFLT; inline;
  1356. procedure setOCM0; inline;
  1357. procedure setOCM1; inline;
  1358. procedure setOCM2; inline;
  1359. procedure setOCSIDL; inline;
  1360. procedure setOCTSEL; inline;
  1361. procedure setON; inline;
  1362. procedure setSIDL; inline;
  1363. property OC32 : TBits_1 read getOC32 write setOC32;
  1364. property OCFLT : TBits_1 read getOCFLT write setOCFLT;
  1365. property OCM : TBits_3 read getOCM write setOCM;
  1366. property OCM0 : TBits_1 read getOCM0 write setOCM0;
  1367. property OCM1 : TBits_1 read getOCM1 write setOCM1;
  1368. property OCM2 : TBits_1 read getOCM2 write setOCM2;
  1369. property OCSIDL : TBits_1 read getOCSIDL write setOCSIDL;
  1370. property OCTSEL : TBits_1 read getOCTSEL write setOCTSEL;
  1371. property ON : TBits_1 read getON write setON;
  1372. property SIDL : TBits_1 read getSIDL write setSIDL;
  1373. property w : TBits_32 read getw write setw;
  1374. end;
  1375. type
  1376. TOCMP4Registers = record
  1377. OC4CONbits : TOCMP4_OC4CON;
  1378. OC4CON : longWord;
  1379. OC4CONCLR : longWord;
  1380. OC4CONSET : longWord;
  1381. OC4CONINV : longWord;
  1382. OC4R : longWord;
  1383. OC4RCLR : longWord;
  1384. OC4RSET : longWord;
  1385. OC4RINV : longWord;
  1386. OC4RS : longWord;
  1387. OC4RSCLR : longWord;
  1388. OC4RSSET : longWord;
  1389. OC4RSINV : longWord;
  1390. end;
  1391. TOCMP5_OC5CON = record
  1392. private
  1393. function getOC32 : TBits_1; inline;
  1394. function getOCFLT : TBits_1; inline;
  1395. function getOCM : TBits_3; inline;
  1396. function getOCM0 : TBits_1; inline;
  1397. function getOCM1 : TBits_1; inline;
  1398. function getOCM2 : TBits_1; inline;
  1399. function getOCSIDL : TBits_1; inline;
  1400. function getOCTSEL : TBits_1; inline;
  1401. function getON : TBits_1; inline;
  1402. function getSIDL : TBits_1; inline;
  1403. function getw : TBits_32; inline;
  1404. procedure setOC32(thebits : TBits_1); inline;
  1405. procedure setOCFLT(thebits : TBits_1); inline;
  1406. procedure setOCM(thebits : TBits_3); inline;
  1407. procedure setOCM0(thebits : TBits_1); inline;
  1408. procedure setOCM1(thebits : TBits_1); inline;
  1409. procedure setOCM2(thebits : TBits_1); inline;
  1410. procedure setOCSIDL(thebits : TBits_1); inline;
  1411. procedure setOCTSEL(thebits : TBits_1); inline;
  1412. procedure setON(thebits : TBits_1); inline;
  1413. procedure setSIDL(thebits : TBits_1); inline;
  1414. procedure setw(thebits : TBits_32); inline;
  1415. public
  1416. procedure clearOC32; inline;
  1417. procedure clearOCFLT; inline;
  1418. procedure clearOCM0; inline;
  1419. procedure clearOCM1; inline;
  1420. procedure clearOCM2; inline;
  1421. procedure clearOCSIDL; inline;
  1422. procedure clearOCTSEL; inline;
  1423. procedure clearON; inline;
  1424. procedure clearSIDL; inline;
  1425. procedure setOC32; inline;
  1426. procedure setOCFLT; inline;
  1427. procedure setOCM0; inline;
  1428. procedure setOCM1; inline;
  1429. procedure setOCM2; inline;
  1430. procedure setOCSIDL; inline;
  1431. procedure setOCTSEL; inline;
  1432. procedure setON; inline;
  1433. procedure setSIDL; inline;
  1434. property OC32 : TBits_1 read getOC32 write setOC32;
  1435. property OCFLT : TBits_1 read getOCFLT write setOCFLT;
  1436. property OCM : TBits_3 read getOCM write setOCM;
  1437. property OCM0 : TBits_1 read getOCM0 write setOCM0;
  1438. property OCM1 : TBits_1 read getOCM1 write setOCM1;
  1439. property OCM2 : TBits_1 read getOCM2 write setOCM2;
  1440. property OCSIDL : TBits_1 read getOCSIDL write setOCSIDL;
  1441. property OCTSEL : TBits_1 read getOCTSEL write setOCTSEL;
  1442. property ON : TBits_1 read getON write setON;
  1443. property SIDL : TBits_1 read getSIDL write setSIDL;
  1444. property w : TBits_32 read getw write setw;
  1445. end;
  1446. type
  1447. TOCMP5Registers = record
  1448. OC5CONbits : TOCMP5_OC5CON;
  1449. OC5CON : longWord;
  1450. OC5CONCLR : longWord;
  1451. OC5CONSET : longWord;
  1452. OC5CONINV : longWord;
  1453. OC5R : longWord;
  1454. OC5RCLR : longWord;
  1455. OC5RSET : longWord;
  1456. OC5RINV : longWord;
  1457. OC5RS : longWord;
  1458. OC5RSCLR : longWord;
  1459. OC5RSSET : longWord;
  1460. OC5RSINV : longWord;
  1461. end;
  1462. TI2C1A_I2C1ACON = record
  1463. private
  1464. function getA10M : TBits_1; inline;
  1465. function getACKDT : TBits_1; inline;
  1466. function getACKEN : TBits_1; inline;
  1467. function getDISSLW : TBits_1; inline;
  1468. function getGCEN : TBits_1; inline;
  1469. function getI2CEN : TBits_1; inline;
  1470. function getI2CSIDL : TBits_1; inline;
  1471. function getIPMIEN : TBits_1; inline;
  1472. function getON : TBits_1; inline;
  1473. function getPEN : TBits_1; inline;
  1474. function getRCEN : TBits_1; inline;
  1475. function getRSEN : TBits_1; inline;
  1476. function getSCLREL : TBits_1; inline;
  1477. function getSEN : TBits_1; inline;
  1478. function getSIDL : TBits_1; inline;
  1479. function getSMEN : TBits_1; inline;
  1480. function getSTREN : TBits_1; inline;
  1481. function getSTRICT : TBits_1; inline;
  1482. function getw : TBits_32; inline;
  1483. procedure setA10M(thebits : TBits_1); inline;
  1484. procedure setACKDT(thebits : TBits_1); inline;
  1485. procedure setACKEN(thebits : TBits_1); inline;
  1486. procedure setDISSLW(thebits : TBits_1); inline;
  1487. procedure setGCEN(thebits : TBits_1); inline;
  1488. procedure setI2CEN(thebits : TBits_1); inline;
  1489. procedure setI2CSIDL(thebits : TBits_1); inline;
  1490. procedure setIPMIEN(thebits : TBits_1); inline;
  1491. procedure setON(thebits : TBits_1); inline;
  1492. procedure setPEN(thebits : TBits_1); inline;
  1493. procedure setRCEN(thebits : TBits_1); inline;
  1494. procedure setRSEN(thebits : TBits_1); inline;
  1495. procedure setSCLREL(thebits : TBits_1); inline;
  1496. procedure setSEN(thebits : TBits_1); inline;
  1497. procedure setSIDL(thebits : TBits_1); inline;
  1498. procedure setSMEN(thebits : TBits_1); inline;
  1499. procedure setSTREN(thebits : TBits_1); inline;
  1500. procedure setSTRICT(thebits : TBits_1); inline;
  1501. procedure setw(thebits : TBits_32); inline;
  1502. public
  1503. procedure clearA10M; inline;
  1504. procedure clearACKDT; inline;
  1505. procedure clearACKEN; inline;
  1506. procedure clearDISSLW; inline;
  1507. procedure clearGCEN; inline;
  1508. procedure clearI2CEN; inline;
  1509. procedure clearI2CSIDL; inline;
  1510. procedure clearIPMIEN; inline;
  1511. procedure clearON; inline;
  1512. procedure clearPEN; inline;
  1513. procedure clearRCEN; inline;
  1514. procedure clearRSEN; inline;
  1515. procedure clearSCLREL; inline;
  1516. procedure clearSEN; inline;
  1517. procedure clearSIDL; inline;
  1518. procedure clearSMEN; inline;
  1519. procedure clearSTREN; inline;
  1520. procedure clearSTRICT; inline;
  1521. procedure setA10M; inline;
  1522. procedure setACKDT; inline;
  1523. procedure setACKEN; inline;
  1524. procedure setDISSLW; inline;
  1525. procedure setGCEN; inline;
  1526. procedure setI2CEN; inline;
  1527. procedure setI2CSIDL; inline;
  1528. procedure setIPMIEN; inline;
  1529. procedure setON; inline;
  1530. procedure setPEN; inline;
  1531. procedure setRCEN; inline;
  1532. procedure setRSEN; inline;
  1533. procedure setSCLREL; inline;
  1534. procedure setSEN; inline;
  1535. procedure setSIDL; inline;
  1536. procedure setSMEN; inline;
  1537. procedure setSTREN; inline;
  1538. procedure setSTRICT; inline;
  1539. property A10M : TBits_1 read getA10M write setA10M;
  1540. property ACKDT : TBits_1 read getACKDT write setACKDT;
  1541. property ACKEN : TBits_1 read getACKEN write setACKEN;
  1542. property DISSLW : TBits_1 read getDISSLW write setDISSLW;
  1543. property GCEN : TBits_1 read getGCEN write setGCEN;
  1544. property I2CEN : TBits_1 read getI2CEN write setI2CEN;
  1545. property I2CSIDL : TBits_1 read getI2CSIDL write setI2CSIDL;
  1546. property IPMIEN : TBits_1 read getIPMIEN write setIPMIEN;
  1547. property ON : TBits_1 read getON write setON;
  1548. property PEN : TBits_1 read getPEN write setPEN;
  1549. property RCEN : TBits_1 read getRCEN write setRCEN;
  1550. property RSEN : TBits_1 read getRSEN write setRSEN;
  1551. property SCLREL : TBits_1 read getSCLREL write setSCLREL;
  1552. property SEN : TBits_1 read getSEN write setSEN;
  1553. property SIDL : TBits_1 read getSIDL write setSIDL;
  1554. property SMEN : TBits_1 read getSMEN write setSMEN;
  1555. property STREN : TBits_1 read getSTREN write setSTREN;
  1556. property STRICT : TBits_1 read getSTRICT write setSTRICT;
  1557. property w : TBits_32 read getw write setw;
  1558. end;
  1559. TI2C1A_I2C3CON = record
  1560. private
  1561. function getA10M : TBits_1; inline;
  1562. function getACKDT : TBits_1; inline;
  1563. function getACKEN : TBits_1; inline;
  1564. function getDISSLW : TBits_1; inline;
  1565. function getGCEN : TBits_1; inline;
  1566. function getI2CEN : TBits_1; inline;
  1567. function getI2CSIDL : TBits_1; inline;
  1568. function getIPMIEN : TBits_1; inline;
  1569. function getON : TBits_1; inline;
  1570. function getPEN : TBits_1; inline;
  1571. function getRCEN : TBits_1; inline;
  1572. function getRSEN : TBits_1; inline;
  1573. function getSCLREL : TBits_1; inline;
  1574. function getSEN : TBits_1; inline;
  1575. function getSIDL : TBits_1; inline;
  1576. function getSMEN : TBits_1; inline;
  1577. function getSTREN : TBits_1; inline;
  1578. function getSTRICT : TBits_1; inline;
  1579. function getw : TBits_32; inline;
  1580. procedure setA10M(thebits : TBits_1); inline;
  1581. procedure setACKDT(thebits : TBits_1); inline;
  1582. procedure setACKEN(thebits : TBits_1); inline;
  1583. procedure setDISSLW(thebits : TBits_1); inline;
  1584. procedure setGCEN(thebits : TBits_1); inline;
  1585. procedure setI2CEN(thebits : TBits_1); inline;
  1586. procedure setI2CSIDL(thebits : TBits_1); inline;
  1587. procedure setIPMIEN(thebits : TBits_1); inline;
  1588. procedure setON(thebits : TBits_1); inline;
  1589. procedure setPEN(thebits : TBits_1); inline;
  1590. procedure setRCEN(thebits : TBits_1); inline;
  1591. procedure setRSEN(thebits : TBits_1); inline;
  1592. procedure setSCLREL(thebits : TBits_1); inline;
  1593. procedure setSEN(thebits : TBits_1); inline;
  1594. procedure setSIDL(thebits : TBits_1); inline;
  1595. procedure setSMEN(thebits : TBits_1); inline;
  1596. procedure setSTREN(thebits : TBits_1); inline;
  1597. procedure setSTRICT(thebits : TBits_1); inline;
  1598. procedure setw(thebits : TBits_32); inline;
  1599. public
  1600. procedure clearA10M; inline;
  1601. procedure clearACKDT; inline;
  1602. procedure clearACKEN; inline;
  1603. procedure clearDISSLW; inline;
  1604. procedure clearGCEN; inline;
  1605. procedure clearI2CEN; inline;
  1606. procedure clearI2CSIDL; inline;
  1607. procedure clearIPMIEN; inline;
  1608. procedure clearON; inline;
  1609. procedure clearPEN; inline;
  1610. procedure clearRCEN; inline;
  1611. procedure clearRSEN; inline;
  1612. procedure clearSCLREL; inline;
  1613. procedure clearSEN; inline;
  1614. procedure clearSIDL; inline;
  1615. procedure clearSMEN; inline;
  1616. procedure clearSTREN; inline;
  1617. procedure clearSTRICT; inline;
  1618. procedure setA10M; inline;
  1619. procedure setACKDT; inline;
  1620. procedure setACKEN; inline;
  1621. procedure setDISSLW; inline;
  1622. procedure setGCEN; inline;
  1623. procedure setI2CEN; inline;
  1624. procedure setI2CSIDL; inline;
  1625. procedure setIPMIEN; inline;
  1626. procedure setON; inline;
  1627. procedure setPEN; inline;
  1628. procedure setRCEN; inline;
  1629. procedure setRSEN; inline;
  1630. procedure setSCLREL; inline;
  1631. procedure setSEN; inline;
  1632. procedure setSIDL; inline;
  1633. procedure setSMEN; inline;
  1634. procedure setSTREN; inline;
  1635. procedure setSTRICT; inline;
  1636. property A10M : TBits_1 read getA10M write setA10M;
  1637. property ACKDT : TBits_1 read getACKDT write setACKDT;
  1638. property ACKEN : TBits_1 read getACKEN write setACKEN;
  1639. property DISSLW : TBits_1 read getDISSLW write setDISSLW;
  1640. property GCEN : TBits_1 read getGCEN write setGCEN;
  1641. property I2CEN : TBits_1 read getI2CEN write setI2CEN;
  1642. property I2CSIDL : TBits_1 read getI2CSIDL write setI2CSIDL;
  1643. property IPMIEN : TBits_1 read getIPMIEN write setIPMIEN;
  1644. property ON : TBits_1 read getON write setON;
  1645. property PEN : TBits_1 read getPEN write setPEN;
  1646. property RCEN : TBits_1 read getRCEN write setRCEN;
  1647. property RSEN : TBits_1 read getRSEN write setRSEN;
  1648. property SCLREL : TBits_1 read getSCLREL write setSCLREL;
  1649. property SEN : TBits_1 read getSEN write setSEN;
  1650. property SIDL : TBits_1 read getSIDL write setSIDL;
  1651. property SMEN : TBits_1 read getSMEN write setSMEN;
  1652. property STREN : TBits_1 read getSTREN write setSTREN;
  1653. property STRICT : TBits_1 read getSTRICT write setSTRICT;
  1654. property w : TBits_32 read getw write setw;
  1655. end;
  1656. TI2C1A_I2C1ASTAT = record
  1657. private
  1658. function getACKSTAT : TBits_1; inline;
  1659. function getADD10 : TBits_1; inline;
  1660. function getBCL : TBits_1; inline;
  1661. function getD_A : TBits_1; inline;
  1662. function getGCSTAT : TBits_1; inline;
  1663. function getI2COV : TBits_1; inline;
  1664. function getI2CPOV : TBits_1; inline;
  1665. function getIWCOL : TBits_1; inline;
  1666. function getP : TBits_1; inline;
  1667. function getRBF : TBits_1; inline;
  1668. function getR_W : TBits_1; inline;
  1669. function getS : TBits_1; inline;
  1670. function getTBF : TBits_1; inline;
  1671. function getTRSTAT : TBits_1; inline;
  1672. function getw : TBits_32; inline;
  1673. procedure setACKSTAT(thebits : TBits_1); inline;
  1674. procedure setADD10(thebits : TBits_1); inline;
  1675. procedure setBCL(thebits : TBits_1); inline;
  1676. procedure setD_A(thebits : TBits_1); inline;
  1677. procedure setGCSTAT(thebits : TBits_1); inline;
  1678. procedure setI2COV(thebits : TBits_1); inline;
  1679. procedure setI2CPOV(thebits : TBits_1); inline;
  1680. procedure setIWCOL(thebits : TBits_1); inline;
  1681. procedure setP(thebits : TBits_1); inline;
  1682. procedure setRBF(thebits : TBits_1); inline;
  1683. procedure setR_W(thebits : TBits_1); inline;
  1684. procedure setS(thebits : TBits_1); inline;
  1685. procedure setTBF(thebits : TBits_1); inline;
  1686. procedure setTRSTAT(thebits : TBits_1); inline;
  1687. procedure setw(thebits : TBits_32); inline;
  1688. public
  1689. procedure clearACKSTAT; inline;
  1690. procedure clearADD10; inline;
  1691. procedure clearBCL; inline;
  1692. procedure clearD_A; inline;
  1693. procedure clearGCSTAT; inline;
  1694. procedure clearI2COV; inline;
  1695. procedure clearI2CPOV; inline;
  1696. procedure clearIWCOL; inline;
  1697. procedure clearP; inline;
  1698. procedure clearRBF; inline;
  1699. procedure clearR_W; inline;
  1700. procedure clearS; inline;
  1701. procedure clearTBF; inline;
  1702. procedure clearTRSTAT; inline;
  1703. procedure setACKSTAT; inline;
  1704. procedure setADD10; inline;
  1705. procedure setBCL; inline;
  1706. procedure setD_A; inline;
  1707. procedure setGCSTAT; inline;
  1708. procedure setI2COV; inline;
  1709. procedure setI2CPOV; inline;
  1710. procedure setIWCOL; inline;
  1711. procedure setP; inline;
  1712. procedure setRBF; inline;
  1713. procedure setR_W; inline;
  1714. procedure setS; inline;
  1715. procedure setTBF; inline;
  1716. procedure setTRSTAT; inline;
  1717. property ACKSTAT : TBits_1 read getACKSTAT write setACKSTAT;
  1718. property ADD10 : TBits_1 read getADD10 write setADD10;
  1719. property BCL : TBits_1 read getBCL write setBCL;
  1720. property D_A : TBits_1 read getD_A write setD_A;
  1721. property GCSTAT : TBits_1 read getGCSTAT write setGCSTAT;
  1722. property I2COV : TBits_1 read getI2COV write setI2COV;
  1723. property I2CPOV : TBits_1 read getI2CPOV write setI2CPOV;
  1724. property IWCOL : TBits_1 read getIWCOL write setIWCOL;
  1725. property P : TBits_1 read getP write setP;
  1726. property RBF : TBits_1 read getRBF write setRBF;
  1727. property R_W : TBits_1 read getR_W write setR_W;
  1728. property S : TBits_1 read getS write setS;
  1729. property TBF : TBits_1 read getTBF write setTBF;
  1730. property TRSTAT : TBits_1 read getTRSTAT write setTRSTAT;
  1731. property w : TBits_32 read getw write setw;
  1732. end;
  1733. TI2C1A_I2C3STAT = record
  1734. private
  1735. function getACKSTAT : TBits_1; inline;
  1736. function getADD10 : TBits_1; inline;
  1737. function getBCL : TBits_1; inline;
  1738. function getD_A : TBits_1; inline;
  1739. function getGCSTAT : TBits_1; inline;
  1740. function getI2COV : TBits_1; inline;
  1741. function getI2CPOV : TBits_1; inline;
  1742. function getIWCOL : TBits_1; inline;
  1743. function getP : TBits_1; inline;
  1744. function getRBF : TBits_1; inline;
  1745. function getR_W : TBits_1; inline;
  1746. function getS : TBits_1; inline;
  1747. function getTBF : TBits_1; inline;
  1748. function getTRSTAT : TBits_1; inline;
  1749. function getw : TBits_32; inline;
  1750. procedure setACKSTAT(thebits : TBits_1); inline;
  1751. procedure setADD10(thebits : TBits_1); inline;
  1752. procedure setBCL(thebits : TBits_1); inline;
  1753. procedure setD_A(thebits : TBits_1); inline;
  1754. procedure setGCSTAT(thebits : TBits_1); inline;
  1755. procedure setI2COV(thebits : TBits_1); inline;
  1756. procedure setI2CPOV(thebits : TBits_1); inline;
  1757. procedure setIWCOL(thebits : TBits_1); inline;
  1758. procedure setP(thebits : TBits_1); inline;
  1759. procedure setRBF(thebits : TBits_1); inline;
  1760. procedure setR_W(thebits : TBits_1); inline;
  1761. procedure setS(thebits : TBits_1); inline;
  1762. procedure setTBF(thebits : TBits_1); inline;
  1763. procedure setTRSTAT(thebits : TBits_1); inline;
  1764. procedure setw(thebits : TBits_32); inline;
  1765. public
  1766. procedure clearACKSTAT; inline;
  1767. procedure clearADD10; inline;
  1768. procedure clearBCL; inline;
  1769. procedure clearD_A; inline;
  1770. procedure clearGCSTAT; inline;
  1771. procedure clearI2COV; inline;
  1772. procedure clearI2CPOV; inline;
  1773. procedure clearIWCOL; inline;
  1774. procedure clearP; inline;
  1775. procedure clearRBF; inline;
  1776. procedure clearR_W; inline;
  1777. procedure clearS; inline;
  1778. procedure clearTBF; inline;
  1779. procedure clearTRSTAT; inline;
  1780. procedure setACKSTAT; inline;
  1781. procedure setADD10; inline;
  1782. procedure setBCL; inline;
  1783. procedure setD_A; inline;
  1784. procedure setGCSTAT; inline;
  1785. procedure setI2COV; inline;
  1786. procedure setI2CPOV; inline;
  1787. procedure setIWCOL; inline;
  1788. procedure setP; inline;
  1789. procedure setRBF; inline;
  1790. procedure setR_W; inline;
  1791. procedure setS; inline;
  1792. procedure setTBF; inline;
  1793. procedure setTRSTAT; inline;
  1794. property ACKSTAT : TBits_1 read getACKSTAT write setACKSTAT;
  1795. property ADD10 : TBits_1 read getADD10 write setADD10;
  1796. property BCL : TBits_1 read getBCL write setBCL;
  1797. property D_A : TBits_1 read getD_A write setD_A;
  1798. property GCSTAT : TBits_1 read getGCSTAT write setGCSTAT;
  1799. property I2COV : TBits_1 read getI2COV write setI2COV;
  1800. property I2CPOV : TBits_1 read getI2CPOV write setI2CPOV;
  1801. property IWCOL : TBits_1 read getIWCOL write setIWCOL;
  1802. property P : TBits_1 read getP write setP;
  1803. property RBF : TBits_1 read getRBF write setRBF;
  1804. property R_W : TBits_1 read getR_W write setR_W;
  1805. property S : TBits_1 read getS write setS;
  1806. property TBF : TBits_1 read getTBF write setTBF;
  1807. property TRSTAT : TBits_1 read getTRSTAT write setTRSTAT;
  1808. property w : TBits_32 read getw write setw;
  1809. end;
  1810. type
  1811. TI2C1ARegisters = record
  1812. I2C1ACONbits : TI2C1A_I2C1ACON;
  1813. I2C1ACON : longWord;
  1814. I2C3CONbits : TI2C1A_I2C3CON;
  1815. I2C3CON : longWord;
  1816. I2C1ACONCLR : longWord;
  1817. I2C3CONCLR : longWord;
  1818. I2C1ACONSET : longWord;
  1819. I2C3CONSET : longWord;
  1820. I2C1ACONINV : longWord;
  1821. I2C3CONINV : longWord;
  1822. I2C1ASTATbits : TI2C1A_I2C1ASTAT;
  1823. I2C1ASTAT : longWord;
  1824. I2C3STATbits : TI2C1A_I2C3STAT;
  1825. I2C3STAT : longWord;
  1826. I2C1ASTATCLR : longWord;
  1827. I2C3STATCLR : longWord;
  1828. I2C1ASTATSET : longWord;
  1829. I2C3STATSET : longWord;
  1830. I2C1ASTATINV : longWord;
  1831. I2C3STATINV : longWord;
  1832. I2C1AADD : longWord;
  1833. I2C3ADD : longWord;
  1834. I2C1AADDCLR : longWord;
  1835. I2C3ADDCLR : longWord;
  1836. I2C1AADDSET : longWord;
  1837. I2C3ADDSET : longWord;
  1838. I2C1AADDINV : longWord;
  1839. I2C3ADDINV : longWord;
  1840. I2C1AMSK : longWord;
  1841. I2C3MSK : longWord;
  1842. I2C1AMSKCLR : longWord;
  1843. I2C3MSKCLR : longWord;
  1844. I2C1AMSKSET : longWord;
  1845. I2C3MSKSET : longWord;
  1846. I2C1AMSKINV : longWord;
  1847. I2C3MSKINV : longWord;
  1848. I2C1ABRG : longWord;
  1849. I2C3BRG : longWord;
  1850. I2C1ABRGCLR : longWord;
  1851. I2C3BRGCLR : longWord;
  1852. I2C1ABRGSET : longWord;
  1853. I2C3BRGSET : longWord;
  1854. I2C1ABRGINV : longWord;
  1855. I2C3BRGINV : longWord;
  1856. I2C1ATRN : longWord;
  1857. I2C3TRN : longWord;
  1858. I2C1ATRNCLR : longWord;
  1859. I2C3TRNCLR : longWord;
  1860. I2C1ATRNSET : longWord;
  1861. I2C3TRNSET : longWord;
  1862. I2C1ATRNINV : longWord;
  1863. I2C3TRNINV : longWord;
  1864. I2C1ARCV : longWord;
  1865. I2C3RCV : longWord;
  1866. end;
  1867. TI2C2A_I2C2ACON = record
  1868. private
  1869. function getA10M : TBits_1; inline;
  1870. function getACKDT : TBits_1; inline;
  1871. function getACKEN : TBits_1; inline;
  1872. function getDISSLW : TBits_1; inline;
  1873. function getGCEN : TBits_1; inline;
  1874. function getI2CEN : TBits_1; inline;
  1875. function getI2CSIDL : TBits_1; inline;
  1876. function getIPMIEN : TBits_1; inline;
  1877. function getON : TBits_1; inline;
  1878. function getPEN : TBits_1; inline;
  1879. function getRCEN : TBits_1; inline;
  1880. function getRSEN : TBits_1; inline;
  1881. function getSCLREL : TBits_1; inline;
  1882. function getSEN : TBits_1; inline;
  1883. function getSIDL : TBits_1; inline;
  1884. function getSMEN : TBits_1; inline;
  1885. function getSTREN : TBits_1; inline;
  1886. function getSTRICT : TBits_1; inline;
  1887. function getw : TBits_32; inline;
  1888. procedure setA10M(thebits : TBits_1); inline;
  1889. procedure setACKDT(thebits : TBits_1); inline;
  1890. procedure setACKEN(thebits : TBits_1); inline;
  1891. procedure setDISSLW(thebits : TBits_1); inline;
  1892. procedure setGCEN(thebits : TBits_1); inline;
  1893. procedure setI2CEN(thebits : TBits_1); inline;
  1894. procedure setI2CSIDL(thebits : TBits_1); inline;
  1895. procedure setIPMIEN(thebits : TBits_1); inline;
  1896. procedure setON(thebits : TBits_1); inline;
  1897. procedure setPEN(thebits : TBits_1); inline;
  1898. procedure setRCEN(thebits : TBits_1); inline;
  1899. procedure setRSEN(thebits : TBits_1); inline;
  1900. procedure setSCLREL(thebits : TBits_1); inline;
  1901. procedure setSEN(thebits : TBits_1); inline;
  1902. procedure setSIDL(thebits : TBits_1); inline;
  1903. procedure setSMEN(thebits : TBits_1); inline;
  1904. procedure setSTREN(thebits : TBits_1); inline;
  1905. procedure setSTRICT(thebits : TBits_1); inline;
  1906. procedure setw(thebits : TBits_32); inline;
  1907. public
  1908. procedure clearA10M; inline;
  1909. procedure clearACKDT; inline;
  1910. procedure clearACKEN; inline;
  1911. procedure clearDISSLW; inline;
  1912. procedure clearGCEN; inline;
  1913. procedure clearI2CEN; inline;
  1914. procedure clearI2CSIDL; inline;
  1915. procedure clearIPMIEN; inline;
  1916. procedure clearON; inline;
  1917. procedure clearPEN; inline;
  1918. procedure clearRCEN; inline;
  1919. procedure clearRSEN; inline;
  1920. procedure clearSCLREL; inline;
  1921. procedure clearSEN; inline;
  1922. procedure clearSIDL; inline;
  1923. procedure clearSMEN; inline;
  1924. procedure clearSTREN; inline;
  1925. procedure clearSTRICT; inline;
  1926. procedure setA10M; inline;
  1927. procedure setACKDT; inline;
  1928. procedure setACKEN; inline;
  1929. procedure setDISSLW; inline;
  1930. procedure setGCEN; inline;
  1931. procedure setI2CEN; inline;
  1932. procedure setI2CSIDL; inline;
  1933. procedure setIPMIEN; inline;
  1934. procedure setON; inline;
  1935. procedure setPEN; inline;
  1936. procedure setRCEN; inline;
  1937. procedure setRSEN; inline;
  1938. procedure setSCLREL; inline;
  1939. procedure setSEN; inline;
  1940. procedure setSIDL; inline;
  1941. procedure setSMEN; inline;
  1942. procedure setSTREN; inline;
  1943. procedure setSTRICT; inline;
  1944. property A10M : TBits_1 read getA10M write setA10M;
  1945. property ACKDT : TBits_1 read getACKDT write setACKDT;
  1946. property ACKEN : TBits_1 read getACKEN write setACKEN;
  1947. property DISSLW : TBits_1 read getDISSLW write setDISSLW;
  1948. property GCEN : TBits_1 read getGCEN write setGCEN;
  1949. property I2CEN : TBits_1 read getI2CEN write setI2CEN;
  1950. property I2CSIDL : TBits_1 read getI2CSIDL write setI2CSIDL;
  1951. property IPMIEN : TBits_1 read getIPMIEN write setIPMIEN;
  1952. property ON : TBits_1 read getON write setON;
  1953. property PEN : TBits_1 read getPEN write setPEN;
  1954. property RCEN : TBits_1 read getRCEN write setRCEN;
  1955. property RSEN : TBits_1 read getRSEN write setRSEN;
  1956. property SCLREL : TBits_1 read getSCLREL write setSCLREL;
  1957. property SEN : TBits_1 read getSEN write setSEN;
  1958. property SIDL : TBits_1 read getSIDL write setSIDL;
  1959. property SMEN : TBits_1 read getSMEN write setSMEN;
  1960. property STREN : TBits_1 read getSTREN write setSTREN;
  1961. property STRICT : TBits_1 read getSTRICT write setSTRICT;
  1962. property w : TBits_32 read getw write setw;
  1963. end;
  1964. TI2C2A_I2C4CON = record
  1965. private
  1966. function getA10M : TBits_1; inline;
  1967. function getACKDT : TBits_1; inline;
  1968. function getACKEN : TBits_1; inline;
  1969. function getDISSLW : TBits_1; inline;
  1970. function getGCEN : TBits_1; inline;
  1971. function getI2CEN : TBits_1; inline;
  1972. function getI2CSIDL : TBits_1; inline;
  1973. function getIPMIEN : TBits_1; inline;
  1974. function getON : TBits_1; inline;
  1975. function getPEN : TBits_1; inline;
  1976. function getRCEN : TBits_1; inline;
  1977. function getRSEN : TBits_1; inline;
  1978. function getSCLREL : TBits_1; inline;
  1979. function getSEN : TBits_1; inline;
  1980. function getSIDL : TBits_1; inline;
  1981. function getSMEN : TBits_1; inline;
  1982. function getSTREN : TBits_1; inline;
  1983. function getSTRICT : TBits_1; inline;
  1984. function getw : TBits_32; inline;
  1985. procedure setA10M(thebits : TBits_1); inline;
  1986. procedure setACKDT(thebits : TBits_1); inline;
  1987. procedure setACKEN(thebits : TBits_1); inline;
  1988. procedure setDISSLW(thebits : TBits_1); inline;
  1989. procedure setGCEN(thebits : TBits_1); inline;
  1990. procedure setI2CEN(thebits : TBits_1); inline;
  1991. procedure setI2CSIDL(thebits : TBits_1); inline;
  1992. procedure setIPMIEN(thebits : TBits_1); inline;
  1993. procedure setON(thebits : TBits_1); inline;
  1994. procedure setPEN(thebits : TBits_1); inline;
  1995. procedure setRCEN(thebits : TBits_1); inline;
  1996. procedure setRSEN(thebits : TBits_1); inline;
  1997. procedure setSCLREL(thebits : TBits_1); inline;
  1998. procedure setSEN(thebits : TBits_1); inline;
  1999. procedure setSIDL(thebits : TBits_1); inline;
  2000. procedure setSMEN(thebits : TBits_1); inline;
  2001. procedure setSTREN(thebits : TBits_1); inline;
  2002. procedure setSTRICT(thebits : TBits_1); inline;
  2003. procedure setw(thebits : TBits_32); inline;
  2004. public
  2005. procedure clearA10M; inline;
  2006. procedure clearACKDT; inline;
  2007. procedure clearACKEN; inline;
  2008. procedure clearDISSLW; inline;
  2009. procedure clearGCEN; inline;
  2010. procedure clearI2CEN; inline;
  2011. procedure clearI2CSIDL; inline;
  2012. procedure clearIPMIEN; inline;
  2013. procedure clearON; inline;
  2014. procedure clearPEN; inline;
  2015. procedure clearRCEN; inline;
  2016. procedure clearRSEN; inline;
  2017. procedure clearSCLREL; inline;
  2018. procedure clearSEN; inline;
  2019. procedure clearSIDL; inline;
  2020. procedure clearSMEN; inline;
  2021. procedure clearSTREN; inline;
  2022. procedure clearSTRICT; inline;
  2023. procedure setA10M; inline;
  2024. procedure setACKDT; inline;
  2025. procedure setACKEN; inline;
  2026. procedure setDISSLW; inline;
  2027. procedure setGCEN; inline;
  2028. procedure setI2CEN; inline;
  2029. procedure setI2CSIDL; inline;
  2030. procedure setIPMIEN; inline;
  2031. procedure setON; inline;
  2032. procedure setPEN; inline;
  2033. procedure setRCEN; inline;
  2034. procedure setRSEN; inline;
  2035. procedure setSCLREL; inline;
  2036. procedure setSEN; inline;
  2037. procedure setSIDL; inline;
  2038. procedure setSMEN; inline;
  2039. procedure setSTREN; inline;
  2040. procedure setSTRICT; inline;
  2041. property A10M : TBits_1 read getA10M write setA10M;
  2042. property ACKDT : TBits_1 read getACKDT write setACKDT;
  2043. property ACKEN : TBits_1 read getACKEN write setACKEN;
  2044. property DISSLW : TBits_1 read getDISSLW write setDISSLW;
  2045. property GCEN : TBits_1 read getGCEN write setGCEN;
  2046. property I2CEN : TBits_1 read getI2CEN write setI2CEN;
  2047. property I2CSIDL : TBits_1 read getI2CSIDL write setI2CSIDL;
  2048. property IPMIEN : TBits_1 read getIPMIEN write setIPMIEN;
  2049. property ON : TBits_1 read getON write setON;
  2050. property PEN : TBits_1 read getPEN write setPEN;
  2051. property RCEN : TBits_1 read getRCEN write setRCEN;
  2052. property RSEN : TBits_1 read getRSEN write setRSEN;
  2053. property SCLREL : TBits_1 read getSCLREL write setSCLREL;
  2054. property SEN : TBits_1 read getSEN write setSEN;
  2055. property SIDL : TBits_1 read getSIDL write setSIDL;
  2056. property SMEN : TBits_1 read getSMEN write setSMEN;
  2057. property STREN : TBits_1 read getSTREN write setSTREN;
  2058. property STRICT : TBits_1 read getSTRICT write setSTRICT;
  2059. property w : TBits_32 read getw write setw;
  2060. end;
  2061. TI2C2A_I2C2ASTAT = record
  2062. private
  2063. function getACKSTAT : TBits_1; inline;
  2064. function getADD10 : TBits_1; inline;
  2065. function getBCL : TBits_1; inline;
  2066. function getD_A : TBits_1; inline;
  2067. function getGCSTAT : TBits_1; inline;
  2068. function getI2COV : TBits_1; inline;
  2069. function getI2CPOV : TBits_1; inline;
  2070. function getIWCOL : TBits_1; inline;
  2071. function getP : TBits_1; inline;
  2072. function getRBF : TBits_1; inline;
  2073. function getR_W : TBits_1; inline;
  2074. function getS : TBits_1; inline;
  2075. function getTBF : TBits_1; inline;
  2076. function getTRSTAT : TBits_1; inline;
  2077. function getw : TBits_32; inline;
  2078. procedure setACKSTAT(thebits : TBits_1); inline;
  2079. procedure setADD10(thebits : TBits_1); inline;
  2080. procedure setBCL(thebits : TBits_1); inline;
  2081. procedure setD_A(thebits : TBits_1); inline;
  2082. procedure setGCSTAT(thebits : TBits_1); inline;
  2083. procedure setI2COV(thebits : TBits_1); inline;
  2084. procedure setI2CPOV(thebits : TBits_1); inline;
  2085. procedure setIWCOL(thebits : TBits_1); inline;
  2086. procedure setP(thebits : TBits_1); inline;
  2087. procedure setRBF(thebits : TBits_1); inline;
  2088. procedure setR_W(thebits : TBits_1); inline;
  2089. procedure setS(thebits : TBits_1); inline;
  2090. procedure setTBF(thebits : TBits_1); inline;
  2091. procedure setTRSTAT(thebits : TBits_1); inline;
  2092. procedure setw(thebits : TBits_32); inline;
  2093. public
  2094. procedure clearACKSTAT; inline;
  2095. procedure clearADD10; inline;
  2096. procedure clearBCL; inline;
  2097. procedure clearD_A; inline;
  2098. procedure clearGCSTAT; inline;
  2099. procedure clearI2COV; inline;
  2100. procedure clearI2CPOV; inline;
  2101. procedure clearIWCOL; inline;
  2102. procedure clearP; inline;
  2103. procedure clearRBF; inline;
  2104. procedure clearR_W; inline;
  2105. procedure clearS; inline;
  2106. procedure clearTBF; inline;
  2107. procedure clearTRSTAT; inline;
  2108. procedure setACKSTAT; inline;
  2109. procedure setADD10; inline;
  2110. procedure setBCL; inline;
  2111. procedure setD_A; inline;
  2112. procedure setGCSTAT; inline;
  2113. procedure setI2COV; inline;
  2114. procedure setI2CPOV; inline;
  2115. procedure setIWCOL; inline;
  2116. procedure setP; inline;
  2117. procedure setRBF; inline;
  2118. procedure setR_W; inline;
  2119. procedure setS; inline;
  2120. procedure setTBF; inline;
  2121. procedure setTRSTAT; inline;
  2122. property ACKSTAT : TBits_1 read getACKSTAT write setACKSTAT;
  2123. property ADD10 : TBits_1 read getADD10 write setADD10;
  2124. property BCL : TBits_1 read getBCL write setBCL;
  2125. property D_A : TBits_1 read getD_A write setD_A;
  2126. property GCSTAT : TBits_1 read getGCSTAT write setGCSTAT;
  2127. property I2COV : TBits_1 read getI2COV write setI2COV;
  2128. property I2CPOV : TBits_1 read getI2CPOV write setI2CPOV;
  2129. property IWCOL : TBits_1 read getIWCOL write setIWCOL;
  2130. property P : TBits_1 read getP write setP;
  2131. property RBF : TBits_1 read getRBF write setRBF;
  2132. property R_W : TBits_1 read getR_W write setR_W;
  2133. property S : TBits_1 read getS write setS;
  2134. property TBF : TBits_1 read getTBF write setTBF;
  2135. property TRSTAT : TBits_1 read getTRSTAT write setTRSTAT;
  2136. property w : TBits_32 read getw write setw;
  2137. end;
  2138. TI2C2A_I2C4STAT = record
  2139. private
  2140. function getACKSTAT : TBits_1; inline;
  2141. function getADD10 : TBits_1; inline;
  2142. function getBCL : TBits_1; inline;
  2143. function getD_A : TBits_1; inline;
  2144. function getGCSTAT : TBits_1; inline;
  2145. function getI2COV : TBits_1; inline;
  2146. function getI2CPOV : TBits_1; inline;
  2147. function getIWCOL : TBits_1; inline;
  2148. function getP : TBits_1; inline;
  2149. function getRBF : TBits_1; inline;
  2150. function getR_W : TBits_1; inline;
  2151. function getS : TBits_1; inline;
  2152. function getTBF : TBits_1; inline;
  2153. function getTRSTAT : TBits_1; inline;
  2154. function getw : TBits_32; inline;
  2155. procedure setACKSTAT(thebits : TBits_1); inline;
  2156. procedure setADD10(thebits : TBits_1); inline;
  2157. procedure setBCL(thebits : TBits_1); inline;
  2158. procedure setD_A(thebits : TBits_1); inline;
  2159. procedure setGCSTAT(thebits : TBits_1); inline;
  2160. procedure setI2COV(thebits : TBits_1); inline;
  2161. procedure setI2CPOV(thebits : TBits_1); inline;
  2162. procedure setIWCOL(thebits : TBits_1); inline;
  2163. procedure setP(thebits : TBits_1); inline;
  2164. procedure setRBF(thebits : TBits_1); inline;
  2165. procedure setR_W(thebits : TBits_1); inline;
  2166. procedure setS(thebits : TBits_1); inline;
  2167. procedure setTBF(thebits : TBits_1); inline;
  2168. procedure setTRSTAT(thebits : TBits_1); inline;
  2169. procedure setw(thebits : TBits_32); inline;
  2170. public
  2171. procedure clearACKSTAT; inline;
  2172. procedure clearADD10; inline;
  2173. procedure clearBCL; inline;
  2174. procedure clearD_A; inline;
  2175. procedure clearGCSTAT; inline;
  2176. procedure clearI2COV; inline;
  2177. procedure clearI2CPOV; inline;
  2178. procedure clearIWCOL; inline;
  2179. procedure clearP; inline;
  2180. procedure clearRBF; inline;
  2181. procedure clearR_W; inline;
  2182. procedure clearS; inline;
  2183. procedure clearTBF; inline;
  2184. procedure clearTRSTAT; inline;
  2185. procedure setACKSTAT; inline;
  2186. procedure setADD10; inline;
  2187. procedure setBCL; inline;
  2188. procedure setD_A; inline;
  2189. procedure setGCSTAT; inline;
  2190. procedure setI2COV; inline;
  2191. procedure setI2CPOV; inline;
  2192. procedure setIWCOL; inline;
  2193. procedure setP; inline;
  2194. procedure setRBF; inline;
  2195. procedure setR_W; inline;
  2196. procedure setS; inline;
  2197. procedure setTBF; inline;
  2198. procedure setTRSTAT; inline;
  2199. property ACKSTAT : TBits_1 read getACKSTAT write setACKSTAT;
  2200. property ADD10 : TBits_1 read getADD10 write setADD10;
  2201. property BCL : TBits_1 read getBCL write setBCL;
  2202. property D_A : TBits_1 read getD_A write setD_A;
  2203. property GCSTAT : TBits_1 read getGCSTAT write setGCSTAT;
  2204. property I2COV : TBits_1 read getI2COV write setI2COV;
  2205. property I2CPOV : TBits_1 read getI2CPOV write setI2CPOV;
  2206. property IWCOL : TBits_1 read getIWCOL write setIWCOL;
  2207. property P : TBits_1 read getP write setP;
  2208. property RBF : TBits_1 read getRBF write setRBF;
  2209. property R_W : TBits_1 read getR_W write setR_W;
  2210. property S : TBits_1 read getS write setS;
  2211. property TBF : TBits_1 read getTBF write setTBF;
  2212. property TRSTAT : TBits_1 read getTRSTAT write setTRSTAT;
  2213. property w : TBits_32 read getw write setw;
  2214. end;
  2215. type
  2216. TI2C2ARegisters = record
  2217. I2C2ACONbits : TI2C2A_I2C2ACON;
  2218. I2C2ACON : longWord;
  2219. I2C4CONbits : TI2C2A_I2C4CON;
  2220. I2C4CON : longWord;
  2221. I2C2ACONCLR : longWord;
  2222. I2C4CONCLR : longWord;
  2223. I2C2ACONSET : longWord;
  2224. I2C4CONSET : longWord;
  2225. I2C2ACONINV : longWord;
  2226. I2C4CONINV : longWord;
  2227. I2C2ASTATbits : TI2C2A_I2C2ASTAT;
  2228. I2C2ASTAT : longWord;
  2229. I2C4STATbits : TI2C2A_I2C4STAT;
  2230. I2C4STAT : longWord;
  2231. I2C2ASTATCLR : longWord;
  2232. I2C4STATCLR : longWord;
  2233. I2C2ASTATSET : longWord;
  2234. I2C4STATSET : longWord;
  2235. I2C2ASTATINV : longWord;
  2236. I2C4STATINV : longWord;
  2237. I2C2AADD : longWord;
  2238. I2C4ADD : longWord;
  2239. I2C2AADDCLR : longWord;
  2240. I2C4ADDCLR : longWord;
  2241. I2C2AADDSET : longWord;
  2242. I2C4ADDSET : longWord;
  2243. I2C2AADDINV : longWord;
  2244. I2C4ADDINV : longWord;
  2245. I2C2AMSK : longWord;
  2246. I2C4MSK : longWord;
  2247. I2C2AMSKCLR : longWord;
  2248. I2C4MSKCLR : longWord;
  2249. I2C2AMSKSET : longWord;
  2250. I2C4MSKSET : longWord;
  2251. I2C2AMSKINV : longWord;
  2252. I2C4MSKINV : longWord;
  2253. I2C2ABRG : longWord;
  2254. I2C4BRG : longWord;
  2255. I2C2ABRGCLR : longWord;
  2256. I2C4BRGCLR : longWord;
  2257. I2C2ABRGSET : longWord;
  2258. I2C4BRGSET : longWord;
  2259. I2C2ABRGINV : longWord;
  2260. I2C4BRGINV : longWord;
  2261. I2C2ATRN : longWord;
  2262. I2C4TRN : longWord;
  2263. I2C2ATRNCLR : longWord;
  2264. I2C4TRNCLR : longWord;
  2265. I2C2ATRNSET : longWord;
  2266. I2C4TRNSET : longWord;
  2267. I2C2ATRNINV : longWord;
  2268. I2C4TRNINV : longWord;
  2269. I2C2ARCV : longWord;
  2270. I2C4RCV : longWord;
  2271. end;
  2272. TI2C5_I2C3ACON = record
  2273. private
  2274. function getA10M : TBits_1; inline;
  2275. function getACKDT : TBits_1; inline;
  2276. function getACKEN : TBits_1; inline;
  2277. function getDISSLW : TBits_1; inline;
  2278. function getGCEN : TBits_1; inline;
  2279. function getI2CEN : TBits_1; inline;
  2280. function getI2CSIDL : TBits_1; inline;
  2281. function getIPMIEN : TBits_1; inline;
  2282. function getON : TBits_1; inline;
  2283. function getPEN : TBits_1; inline;
  2284. function getRCEN : TBits_1; inline;
  2285. function getRSEN : TBits_1; inline;
  2286. function getSCLREL : TBits_1; inline;
  2287. function getSEN : TBits_1; inline;
  2288. function getSIDL : TBits_1; inline;
  2289. function getSMEN : TBits_1; inline;
  2290. function getSTREN : TBits_1; inline;
  2291. function getSTRICT : TBits_1; inline;
  2292. function getw : TBits_32; inline;
  2293. procedure setA10M(thebits : TBits_1); inline;
  2294. procedure setACKDT(thebits : TBits_1); inline;
  2295. procedure setACKEN(thebits : TBits_1); inline;
  2296. procedure setDISSLW(thebits : TBits_1); inline;
  2297. procedure setGCEN(thebits : TBits_1); inline;
  2298. procedure setI2CEN(thebits : TBits_1); inline;
  2299. procedure setI2CSIDL(thebits : TBits_1); inline;
  2300. procedure setIPMIEN(thebits : TBits_1); inline;
  2301. procedure setON(thebits : TBits_1); inline;
  2302. procedure setPEN(thebits : TBits_1); inline;
  2303. procedure setRCEN(thebits : TBits_1); inline;
  2304. procedure setRSEN(thebits : TBits_1); inline;
  2305. procedure setSCLREL(thebits : TBits_1); inline;
  2306. procedure setSEN(thebits : TBits_1); inline;
  2307. procedure setSIDL(thebits : TBits_1); inline;
  2308. procedure setSMEN(thebits : TBits_1); inline;
  2309. procedure setSTREN(thebits : TBits_1); inline;
  2310. procedure setSTRICT(thebits : TBits_1); inline;
  2311. procedure setw(thebits : TBits_32); inline;
  2312. public
  2313. procedure clearA10M; inline;
  2314. procedure clearACKDT; inline;
  2315. procedure clearACKEN; inline;
  2316. procedure clearDISSLW; inline;
  2317. procedure clearGCEN; inline;
  2318. procedure clearI2CEN; inline;
  2319. procedure clearI2CSIDL; inline;
  2320. procedure clearIPMIEN; inline;
  2321. procedure clearON; inline;
  2322. procedure clearPEN; inline;
  2323. procedure clearRCEN; inline;
  2324. procedure clearRSEN; inline;
  2325. procedure clearSCLREL; inline;
  2326. procedure clearSEN; inline;
  2327. procedure clearSIDL; inline;
  2328. procedure clearSMEN; inline;
  2329. procedure clearSTREN; inline;
  2330. procedure clearSTRICT; inline;
  2331. procedure setA10M; inline;
  2332. procedure setACKDT; inline;
  2333. procedure setACKEN; inline;
  2334. procedure setDISSLW; inline;
  2335. procedure setGCEN; inline;
  2336. procedure setI2CEN; inline;
  2337. procedure setI2CSIDL; inline;
  2338. procedure setIPMIEN; inline;
  2339. procedure setON; inline;
  2340. procedure setPEN; inline;
  2341. procedure setRCEN; inline;
  2342. procedure setRSEN; inline;
  2343. procedure setSCLREL; inline;
  2344. procedure setSEN; inline;
  2345. procedure setSIDL; inline;
  2346. procedure setSMEN; inline;
  2347. procedure setSTREN; inline;
  2348. procedure setSTRICT; inline;
  2349. property A10M : TBits_1 read getA10M write setA10M;
  2350. property ACKDT : TBits_1 read getACKDT write setACKDT;
  2351. property ACKEN : TBits_1 read getACKEN write setACKEN;
  2352. property DISSLW : TBits_1 read getDISSLW write setDISSLW;
  2353. property GCEN : TBits_1 read getGCEN write setGCEN;
  2354. property I2CEN : TBits_1 read getI2CEN write setI2CEN;
  2355. property I2CSIDL : TBits_1 read getI2CSIDL write setI2CSIDL;
  2356. property IPMIEN : TBits_1 read getIPMIEN write setIPMIEN;
  2357. property ON : TBits_1 read getON write setON;
  2358. property PEN : TBits_1 read getPEN write setPEN;
  2359. property RCEN : TBits_1 read getRCEN write setRCEN;
  2360. property RSEN : TBits_1 read getRSEN write setRSEN;
  2361. property SCLREL : TBits_1 read getSCLREL write setSCLREL;
  2362. property SEN : TBits_1 read getSEN write setSEN;
  2363. property SIDL : TBits_1 read getSIDL write setSIDL;
  2364. property SMEN : TBits_1 read getSMEN write setSMEN;
  2365. property STREN : TBits_1 read getSTREN write setSTREN;
  2366. property STRICT : TBits_1 read getSTRICT write setSTRICT;
  2367. property w : TBits_32 read getw write setw;
  2368. end;
  2369. TI2C5_I2C5CON = record
  2370. private
  2371. function getA10M : TBits_1; inline;
  2372. function getACKDT : TBits_1; inline;
  2373. function getACKEN : TBits_1; inline;
  2374. function getDISSLW : TBits_1; inline;
  2375. function getGCEN : TBits_1; inline;
  2376. function getI2CEN : TBits_1; inline;
  2377. function getI2CSIDL : TBits_1; inline;
  2378. function getIPMIEN : TBits_1; inline;
  2379. function getON : TBits_1; inline;
  2380. function getPEN : TBits_1; inline;
  2381. function getRCEN : TBits_1; inline;
  2382. function getRSEN : TBits_1; inline;
  2383. function getSCLREL : TBits_1; inline;
  2384. function getSEN : TBits_1; inline;
  2385. function getSIDL : TBits_1; inline;
  2386. function getSMEN : TBits_1; inline;
  2387. function getSTREN : TBits_1; inline;
  2388. function getSTRICT : TBits_1; inline;
  2389. function getw : TBits_32; inline;
  2390. procedure setA10M(thebits : TBits_1); inline;
  2391. procedure setACKDT(thebits : TBits_1); inline;
  2392. procedure setACKEN(thebits : TBits_1); inline;
  2393. procedure setDISSLW(thebits : TBits_1); inline;
  2394. procedure setGCEN(thebits : TBits_1); inline;
  2395. procedure setI2CEN(thebits : TBits_1); inline;
  2396. procedure setI2CSIDL(thebits : TBits_1); inline;
  2397. procedure setIPMIEN(thebits : TBits_1); inline;
  2398. procedure setON(thebits : TBits_1); inline;
  2399. procedure setPEN(thebits : TBits_1); inline;
  2400. procedure setRCEN(thebits : TBits_1); inline;
  2401. procedure setRSEN(thebits : TBits_1); inline;
  2402. procedure setSCLREL(thebits : TBits_1); inline;
  2403. procedure setSEN(thebits : TBits_1); inline;
  2404. procedure setSIDL(thebits : TBits_1); inline;
  2405. procedure setSMEN(thebits : TBits_1); inline;
  2406. procedure setSTREN(thebits : TBits_1); inline;
  2407. procedure setSTRICT(thebits : TBits_1); inline;
  2408. procedure setw(thebits : TBits_32); inline;
  2409. public
  2410. procedure clearA10M; inline;
  2411. procedure clearACKDT; inline;
  2412. procedure clearACKEN; inline;
  2413. procedure clearDISSLW; inline;
  2414. procedure clearGCEN; inline;
  2415. procedure clearI2CEN; inline;
  2416. procedure clearI2CSIDL; inline;
  2417. procedure clearIPMIEN; inline;
  2418. procedure clearON; inline;
  2419. procedure clearPEN; inline;
  2420. procedure clearRCEN; inline;
  2421. procedure clearRSEN; inline;
  2422. procedure clearSCLREL; inline;
  2423. procedure clearSEN; inline;
  2424. procedure clearSIDL; inline;
  2425. procedure clearSMEN; inline;
  2426. procedure clearSTREN; inline;
  2427. procedure clearSTRICT; inline;
  2428. procedure setA10M; inline;
  2429. procedure setACKDT; inline;
  2430. procedure setACKEN; inline;
  2431. procedure setDISSLW; inline;
  2432. procedure setGCEN; inline;
  2433. procedure setI2CEN; inline;
  2434. procedure setI2CSIDL; inline;
  2435. procedure setIPMIEN; inline;
  2436. procedure setON; inline;
  2437. procedure setPEN; inline;
  2438. procedure setRCEN; inline;
  2439. procedure setRSEN; inline;
  2440. procedure setSCLREL; inline;
  2441. procedure setSEN; inline;
  2442. procedure setSIDL; inline;
  2443. procedure setSMEN; inline;
  2444. procedure setSTREN; inline;
  2445. procedure setSTRICT; inline;
  2446. property A10M : TBits_1 read getA10M write setA10M;
  2447. property ACKDT : TBits_1 read getACKDT write setACKDT;
  2448. property ACKEN : TBits_1 read getACKEN write setACKEN;
  2449. property DISSLW : TBits_1 read getDISSLW write setDISSLW;
  2450. property GCEN : TBits_1 read getGCEN write setGCEN;
  2451. property I2CEN : TBits_1 read getI2CEN write setI2CEN;
  2452. property I2CSIDL : TBits_1 read getI2CSIDL write setI2CSIDL;
  2453. property IPMIEN : TBits_1 read getIPMIEN write setIPMIEN;
  2454. property ON : TBits_1 read getON write setON;
  2455. property PEN : TBits_1 read getPEN write setPEN;
  2456. property RCEN : TBits_1 read getRCEN write setRCEN;
  2457. property RSEN : TBits_1 read getRSEN write setRSEN;
  2458. property SCLREL : TBits_1 read getSCLREL write setSCLREL;
  2459. property SEN : TBits_1 read getSEN write setSEN;
  2460. property SIDL : TBits_1 read getSIDL write setSIDL;
  2461. property SMEN : TBits_1 read getSMEN write setSMEN;
  2462. property STREN : TBits_1 read getSTREN write setSTREN;
  2463. property STRICT : TBits_1 read getSTRICT write setSTRICT;
  2464. property w : TBits_32 read getw write setw;
  2465. end;
  2466. TI2C5_I2C3ASTAT = record
  2467. private
  2468. function getACKSTAT : TBits_1; inline;
  2469. function getADD10 : TBits_1; inline;
  2470. function getBCL : TBits_1; inline;
  2471. function getD_A : TBits_1; inline;
  2472. function getGCSTAT : TBits_1; inline;
  2473. function getI2COV : TBits_1; inline;
  2474. function getI2CPOV : TBits_1; inline;
  2475. function getIWCOL : TBits_1; inline;
  2476. function getP : TBits_1; inline;
  2477. function getRBF : TBits_1; inline;
  2478. function getR_W : TBits_1; inline;
  2479. function getS : TBits_1; inline;
  2480. function getTBF : TBits_1; inline;
  2481. function getTRSTAT : TBits_1; inline;
  2482. function getw : TBits_32; inline;
  2483. procedure setACKSTAT(thebits : TBits_1); inline;
  2484. procedure setADD10(thebits : TBits_1); inline;
  2485. procedure setBCL(thebits : TBits_1); inline;
  2486. procedure setD_A(thebits : TBits_1); inline;
  2487. procedure setGCSTAT(thebits : TBits_1); inline;
  2488. procedure setI2COV(thebits : TBits_1); inline;
  2489. procedure setI2CPOV(thebits : TBits_1); inline;
  2490. procedure setIWCOL(thebits : TBits_1); inline;
  2491. procedure setP(thebits : TBits_1); inline;
  2492. procedure setRBF(thebits : TBits_1); inline;
  2493. procedure setR_W(thebits : TBits_1); inline;
  2494. procedure setS(thebits : TBits_1); inline;
  2495. procedure setTBF(thebits : TBits_1); inline;
  2496. procedure setTRSTAT(thebits : TBits_1); inline;
  2497. procedure setw(thebits : TBits_32); inline;
  2498. public
  2499. procedure clearACKSTAT; inline;
  2500. procedure clearADD10; inline;
  2501. procedure clearBCL; inline;
  2502. procedure clearD_A; inline;
  2503. procedure clearGCSTAT; inline;
  2504. procedure clearI2COV; inline;
  2505. procedure clearI2CPOV; inline;
  2506. procedure clearIWCOL; inline;
  2507. procedure clearP; inline;
  2508. procedure clearRBF; inline;
  2509. procedure clearR_W; inline;
  2510. procedure clearS; inline;
  2511. procedure clearTBF; inline;
  2512. procedure clearTRSTAT; inline;
  2513. procedure setACKSTAT; inline;
  2514. procedure setADD10; inline;
  2515. procedure setBCL; inline;
  2516. procedure setD_A; inline;
  2517. procedure setGCSTAT; inline;
  2518. procedure setI2COV; inline;
  2519. procedure setI2CPOV; inline;
  2520. procedure setIWCOL; inline;
  2521. procedure setP; inline;
  2522. procedure setRBF; inline;
  2523. procedure setR_W; inline;
  2524. procedure setS; inline;
  2525. procedure setTBF; inline;
  2526. procedure setTRSTAT; inline;
  2527. property ACKSTAT : TBits_1 read getACKSTAT write setACKSTAT;
  2528. property ADD10 : TBits_1 read getADD10 write setADD10;
  2529. property BCL : TBits_1 read getBCL write setBCL;
  2530. property D_A : TBits_1 read getD_A write setD_A;
  2531. property GCSTAT : TBits_1 read getGCSTAT write setGCSTAT;
  2532. property I2COV : TBits_1 read getI2COV write setI2COV;
  2533. property I2CPOV : TBits_1 read getI2CPOV write setI2CPOV;
  2534. property IWCOL : TBits_1 read getIWCOL write setIWCOL;
  2535. property P : TBits_1 read getP write setP;
  2536. property RBF : TBits_1 read getRBF write setRBF;
  2537. property R_W : TBits_1 read getR_W write setR_W;
  2538. property S : TBits_1 read getS write setS;
  2539. property TBF : TBits_1 read getTBF write setTBF;
  2540. property TRSTAT : TBits_1 read getTRSTAT write setTRSTAT;
  2541. property w : TBits_32 read getw write setw;
  2542. end;
  2543. TI2C5_I2C5STAT = record
  2544. private
  2545. function getACKSTAT : TBits_1; inline;
  2546. function getADD10 : TBits_1; inline;
  2547. function getBCL : TBits_1; inline;
  2548. function getD_A : TBits_1; inline;
  2549. function getGCSTAT : TBits_1; inline;
  2550. function getI2COV : TBits_1; inline;
  2551. function getI2CPOV : TBits_1; inline;
  2552. function getIWCOL : TBits_1; inline;
  2553. function getP : TBits_1; inline;
  2554. function getRBF : TBits_1; inline;
  2555. function getR_W : TBits_1; inline;
  2556. function getS : TBits_1; inline;
  2557. function getTBF : TBits_1; inline;
  2558. function getTRSTAT : TBits_1; inline;
  2559. function getw : TBits_32; inline;
  2560. procedure setACKSTAT(thebits : TBits_1); inline;
  2561. procedure setADD10(thebits : TBits_1); inline;
  2562. procedure setBCL(thebits : TBits_1); inline;
  2563. procedure setD_A(thebits : TBits_1); inline;
  2564. procedure setGCSTAT(thebits : TBits_1); inline;
  2565. procedure setI2COV(thebits : TBits_1); inline;
  2566. procedure setI2CPOV(thebits : TBits_1); inline;
  2567. procedure setIWCOL(thebits : TBits_1); inline;
  2568. procedure setP(thebits : TBits_1); inline;
  2569. procedure setRBF(thebits : TBits_1); inline;
  2570. procedure setR_W(thebits : TBits_1); inline;
  2571. procedure setS(thebits : TBits_1); inline;
  2572. procedure setTBF(thebits : TBits_1); inline;
  2573. procedure setTRSTAT(thebits : TBits_1); inline;
  2574. procedure setw(thebits : TBits_32); inline;
  2575. public
  2576. procedure clearACKSTAT; inline;
  2577. procedure clearADD10; inline;
  2578. procedure clearBCL; inline;
  2579. procedure clearD_A; inline;
  2580. procedure clearGCSTAT; inline;
  2581. procedure clearI2COV; inline;
  2582. procedure clearI2CPOV; inline;
  2583. procedure clearIWCOL; inline;
  2584. procedure clearP; inline;
  2585. procedure clearRBF; inline;
  2586. procedure clearR_W; inline;
  2587. procedure clearS; inline;
  2588. procedure clearTBF; inline;
  2589. procedure clearTRSTAT; inline;
  2590. procedure setACKSTAT; inline;
  2591. procedure setADD10; inline;
  2592. procedure setBCL; inline;
  2593. procedure setD_A; inline;
  2594. procedure setGCSTAT; inline;
  2595. procedure setI2COV; inline;
  2596. procedure setI2CPOV; inline;
  2597. procedure setIWCOL; inline;
  2598. procedure setP; inline;
  2599. procedure setRBF; inline;
  2600. procedure setR_W; inline;
  2601. procedure setS; inline;
  2602. procedure setTBF; inline;
  2603. procedure setTRSTAT; inline;
  2604. property ACKSTAT : TBits_1 read getACKSTAT write setACKSTAT;
  2605. property ADD10 : TBits_1 read getADD10 write setADD10;
  2606. property BCL : TBits_1 read getBCL write setBCL;
  2607. property D_A : TBits_1 read getD_A write setD_A;
  2608. property GCSTAT : TBits_1 read getGCSTAT write setGCSTAT;
  2609. property I2COV : TBits_1 read getI2COV write setI2COV;
  2610. property I2CPOV : TBits_1 read getI2CPOV write setI2CPOV;
  2611. property IWCOL : TBits_1 read getIWCOL write setIWCOL;
  2612. property P : TBits_1 read getP write setP;
  2613. property RBF : TBits_1 read getRBF write setRBF;
  2614. property R_W : TBits_1 read getR_W write setR_W;
  2615. property S : TBits_1 read getS write setS;
  2616. property TBF : TBits_1 read getTBF write setTBF;
  2617. property TRSTAT : TBits_1 read getTRSTAT write setTRSTAT;
  2618. property w : TBits_32 read getw write setw;
  2619. end;
  2620. type
  2621. TI2C5Registers = record
  2622. I2C3ACONbits : TI2C5_I2C3ACON;
  2623. I2C3ACON : longWord;
  2624. I2C5CONbits : TI2C5_I2C5CON;
  2625. I2C5CON : longWord;
  2626. I2C3ACONCLR : longWord;
  2627. I2C5CONCLR : longWord;
  2628. I2C3ACONSET : longWord;
  2629. I2C5CONSET : longWord;
  2630. I2C3ACONINV : longWord;
  2631. I2C5CONINV : longWord;
  2632. I2C3ASTATbits : TI2C5_I2C3ASTAT;
  2633. I2C3ASTAT : longWord;
  2634. I2C5STATbits : TI2C5_I2C5STAT;
  2635. I2C5STAT : longWord;
  2636. I2C3ASTATCLR : longWord;
  2637. I2C5STATCLR : longWord;
  2638. I2C3ASTATSET : longWord;
  2639. I2C5STATSET : longWord;
  2640. I2C3ASTATINV : longWord;
  2641. I2C5STATINV : longWord;
  2642. I2C3AADD : longWord;
  2643. I2C5ADD : longWord;
  2644. I2C3AADDCLR : longWord;
  2645. I2C5ADDCLR : longWord;
  2646. I2C3AADDSET : longWord;
  2647. I2C5ADDSET : longWord;
  2648. I2C3AADDINV : longWord;
  2649. I2C5ADDINV : longWord;
  2650. I2C3AMSK : longWord;
  2651. I2C5MSK : longWord;
  2652. I2C3AMSKCLR : longWord;
  2653. I2C5MSKCLR : longWord;
  2654. I2C3AMSKSET : longWord;
  2655. I2C5MSKSET : longWord;
  2656. I2C3AMSKINV : longWord;
  2657. I2C5MSKINV : longWord;
  2658. I2C3ABRG : longWord;
  2659. I2C5BRG : longWord;
  2660. I2C3ABRGCLR : longWord;
  2661. I2C5BRGCLR : longWord;
  2662. I2C3ABRGSET : longWord;
  2663. I2C5BRGSET : longWord;
  2664. I2C3ABRGINV : longWord;
  2665. I2C5BRGINV : longWord;
  2666. I2C3ATRN : longWord;
  2667. I2C5TRN : longWord;
  2668. I2C3ATRNCLR : longWord;
  2669. I2C5TRNCLR : longWord;
  2670. I2C3ATRNSET : longWord;
  2671. I2C5TRNSET : longWord;
  2672. I2C3ATRNINV : longWord;
  2673. I2C5TRNINV : longWord;
  2674. I2C3ARCV : longWord;
  2675. I2C5RCV : longWord;
  2676. end;
  2677. TI2C1_I2C1CON = record
  2678. private
  2679. function getA10M : TBits_1; inline;
  2680. function getACKDT : TBits_1; inline;
  2681. function getACKEN : TBits_1; inline;
  2682. function getDISSLW : TBits_1; inline;
  2683. function getGCEN : TBits_1; inline;
  2684. function getI2CEN : TBits_1; inline;
  2685. function getI2CSIDL : TBits_1; inline;
  2686. function getIPMIEN : TBits_1; inline;
  2687. function getON : TBits_1; inline;
  2688. function getPEN : TBits_1; inline;
  2689. function getRCEN : TBits_1; inline;
  2690. function getRSEN : TBits_1; inline;
  2691. function getSCLREL : TBits_1; inline;
  2692. function getSEN : TBits_1; inline;
  2693. function getSIDL : TBits_1; inline;
  2694. function getSMEN : TBits_1; inline;
  2695. function getSTREN : TBits_1; inline;
  2696. function getSTRICT : TBits_1; inline;
  2697. function getw : TBits_32; inline;
  2698. procedure setA10M(thebits : TBits_1); inline;
  2699. procedure setACKDT(thebits : TBits_1); inline;
  2700. procedure setACKEN(thebits : TBits_1); inline;
  2701. procedure setDISSLW(thebits : TBits_1); inline;
  2702. procedure setGCEN(thebits : TBits_1); inline;
  2703. procedure setI2CEN(thebits : TBits_1); inline;
  2704. procedure setI2CSIDL(thebits : TBits_1); inline;
  2705. procedure setIPMIEN(thebits : TBits_1); inline;
  2706. procedure setON(thebits : TBits_1); inline;
  2707. procedure setPEN(thebits : TBits_1); inline;
  2708. procedure setRCEN(thebits : TBits_1); inline;
  2709. procedure setRSEN(thebits : TBits_1); inline;
  2710. procedure setSCLREL(thebits : TBits_1); inline;
  2711. procedure setSEN(thebits : TBits_1); inline;
  2712. procedure setSIDL(thebits : TBits_1); inline;
  2713. procedure setSMEN(thebits : TBits_1); inline;
  2714. procedure setSTREN(thebits : TBits_1); inline;
  2715. procedure setSTRICT(thebits : TBits_1); inline;
  2716. procedure setw(thebits : TBits_32); inline;
  2717. public
  2718. procedure clearA10M; inline;
  2719. procedure clearACKDT; inline;
  2720. procedure clearACKEN; inline;
  2721. procedure clearDISSLW; inline;
  2722. procedure clearGCEN; inline;
  2723. procedure clearI2CEN; inline;
  2724. procedure clearI2CSIDL; inline;
  2725. procedure clearIPMIEN; inline;
  2726. procedure clearON; inline;
  2727. procedure clearPEN; inline;
  2728. procedure clearRCEN; inline;
  2729. procedure clearRSEN; inline;
  2730. procedure clearSCLREL; inline;
  2731. procedure clearSEN; inline;
  2732. procedure clearSIDL; inline;
  2733. procedure clearSMEN; inline;
  2734. procedure clearSTREN; inline;
  2735. procedure clearSTRICT; inline;
  2736. procedure setA10M; inline;
  2737. procedure setACKDT; inline;
  2738. procedure setACKEN; inline;
  2739. procedure setDISSLW; inline;
  2740. procedure setGCEN; inline;
  2741. procedure setI2CEN; inline;
  2742. procedure setI2CSIDL; inline;
  2743. procedure setIPMIEN; inline;
  2744. procedure setON; inline;
  2745. procedure setPEN; inline;
  2746. procedure setRCEN; inline;
  2747. procedure setRSEN; inline;
  2748. procedure setSCLREL; inline;
  2749. procedure setSEN; inline;
  2750. procedure setSIDL; inline;
  2751. procedure setSMEN; inline;
  2752. procedure setSTREN; inline;
  2753. procedure setSTRICT; inline;
  2754. property A10M : TBits_1 read getA10M write setA10M;
  2755. property ACKDT : TBits_1 read getACKDT write setACKDT;
  2756. property ACKEN : TBits_1 read getACKEN write setACKEN;
  2757. property DISSLW : TBits_1 read getDISSLW write setDISSLW;
  2758. property GCEN : TBits_1 read getGCEN write setGCEN;
  2759. property I2CEN : TBits_1 read getI2CEN write setI2CEN;
  2760. property I2CSIDL : TBits_1 read getI2CSIDL write setI2CSIDL;
  2761. property IPMIEN : TBits_1 read getIPMIEN write setIPMIEN;
  2762. property ON : TBits_1 read getON write setON;
  2763. property PEN : TBits_1 read getPEN write setPEN;
  2764. property RCEN : TBits_1 read getRCEN write setRCEN;
  2765. property RSEN : TBits_1 read getRSEN write setRSEN;
  2766. property SCLREL : TBits_1 read getSCLREL write setSCLREL;
  2767. property SEN : TBits_1 read getSEN write setSEN;
  2768. property SIDL : TBits_1 read getSIDL write setSIDL;
  2769. property SMEN : TBits_1 read getSMEN write setSMEN;
  2770. property STREN : TBits_1 read getSTREN write setSTREN;
  2771. property STRICT : TBits_1 read getSTRICT write setSTRICT;
  2772. property w : TBits_32 read getw write setw;
  2773. end;
  2774. TI2C1_I2C1STAT = record
  2775. private
  2776. function getACKSTAT : TBits_1; inline;
  2777. function getADD10 : TBits_1; inline;
  2778. function getBCL : TBits_1; inline;
  2779. function getD_A : TBits_1; inline;
  2780. function getGCSTAT : TBits_1; inline;
  2781. function getI2COV : TBits_1; inline;
  2782. function getI2CPOV : TBits_1; inline;
  2783. function getIWCOL : TBits_1; inline;
  2784. function getP : TBits_1; inline;
  2785. function getRBF : TBits_1; inline;
  2786. function getR_W : TBits_1; inline;
  2787. function getS : TBits_1; inline;
  2788. function getTBF : TBits_1; inline;
  2789. function getTRSTAT : TBits_1; inline;
  2790. function getw : TBits_32; inline;
  2791. procedure setACKSTAT(thebits : TBits_1); inline;
  2792. procedure setADD10(thebits : TBits_1); inline;
  2793. procedure setBCL(thebits : TBits_1); inline;
  2794. procedure setD_A(thebits : TBits_1); inline;
  2795. procedure setGCSTAT(thebits : TBits_1); inline;
  2796. procedure setI2COV(thebits : TBits_1); inline;
  2797. procedure setI2CPOV(thebits : TBits_1); inline;
  2798. procedure setIWCOL(thebits : TBits_1); inline;
  2799. procedure setP(thebits : TBits_1); inline;
  2800. procedure setRBF(thebits : TBits_1); inline;
  2801. procedure setR_W(thebits : TBits_1); inline;
  2802. procedure setS(thebits : TBits_1); inline;
  2803. procedure setTBF(thebits : TBits_1); inline;
  2804. procedure setTRSTAT(thebits : TBits_1); inline;
  2805. procedure setw(thebits : TBits_32); inline;
  2806. public
  2807. procedure clearACKSTAT; inline;
  2808. procedure clearADD10; inline;
  2809. procedure clearBCL; inline;
  2810. procedure clearD_A; inline;
  2811. procedure clearGCSTAT; inline;
  2812. procedure clearI2COV; inline;
  2813. procedure clearI2CPOV; inline;
  2814. procedure clearIWCOL; inline;
  2815. procedure clearP; inline;
  2816. procedure clearRBF; inline;
  2817. procedure clearR_W; inline;
  2818. procedure clearS; inline;
  2819. procedure clearTBF; inline;
  2820. procedure clearTRSTAT; inline;
  2821. procedure setACKSTAT; inline;
  2822. procedure setADD10; inline;
  2823. procedure setBCL; inline;
  2824. procedure setD_A; inline;
  2825. procedure setGCSTAT; inline;
  2826. procedure setI2COV; inline;
  2827. procedure setI2CPOV; inline;
  2828. procedure setIWCOL; inline;
  2829. procedure setP; inline;
  2830. procedure setRBF; inline;
  2831. procedure setR_W; inline;
  2832. procedure setS; inline;
  2833. procedure setTBF; inline;
  2834. procedure setTRSTAT; inline;
  2835. property ACKSTAT : TBits_1 read getACKSTAT write setACKSTAT;
  2836. property ADD10 : TBits_1 read getADD10 write setADD10;
  2837. property BCL : TBits_1 read getBCL write setBCL;
  2838. property D_A : TBits_1 read getD_A write setD_A;
  2839. property GCSTAT : TBits_1 read getGCSTAT write setGCSTAT;
  2840. property I2COV : TBits_1 read getI2COV write setI2COV;
  2841. property I2CPOV : TBits_1 read getI2CPOV write setI2CPOV;
  2842. property IWCOL : TBits_1 read getIWCOL write setIWCOL;
  2843. property P : TBits_1 read getP write setP;
  2844. property RBF : TBits_1 read getRBF write setRBF;
  2845. property R_W : TBits_1 read getR_W write setR_W;
  2846. property S : TBits_1 read getS write setS;
  2847. property TBF : TBits_1 read getTBF write setTBF;
  2848. property TRSTAT : TBits_1 read getTRSTAT write setTRSTAT;
  2849. property w : TBits_32 read getw write setw;
  2850. end;
  2851. type
  2852. TI2C1Registers = record
  2853. I2C1CONbits : TI2C1_I2C1CON;
  2854. I2C1CON : longWord;
  2855. I2C1CONCLR : longWord;
  2856. I2C1CONSET : longWord;
  2857. I2C1CONINV : longWord;
  2858. I2C1STATbits : TI2C1_I2C1STAT;
  2859. I2C1STAT : longWord;
  2860. I2C1STATCLR : longWord;
  2861. I2C1STATSET : longWord;
  2862. I2C1STATINV : longWord;
  2863. I2C1ADD : longWord;
  2864. I2C1ADDCLR : longWord;
  2865. I2C1ADDSET : longWord;
  2866. I2C1ADDINV : longWord;
  2867. I2C1MSK : longWord;
  2868. I2C1MSKCLR : longWord;
  2869. I2C1MSKSET : longWord;
  2870. I2C1MSKINV : longWord;
  2871. I2C1BRG : longWord;
  2872. I2C1BRGCLR : longWord;
  2873. I2C1BRGSET : longWord;
  2874. I2C1BRGINV : longWord;
  2875. I2C1TRN : longWord;
  2876. I2C1TRNCLR : longWord;
  2877. I2C1TRNSET : longWord;
  2878. I2C1TRNINV : longWord;
  2879. I2C1RCV : longWord;
  2880. end;
  2881. TSPI3_SPI1ACON = record
  2882. private
  2883. function getCKE : TBits_1; inline;
  2884. function getCKP : TBits_1; inline;
  2885. function getDISSDO : TBits_1; inline;
  2886. function getENHBUF : TBits_1; inline;
  2887. function getFRMCNT : TBits_3; inline;
  2888. function getFRMEN : TBits_1; inline;
  2889. function getFRMPOL : TBits_1; inline;
  2890. function getFRMSYNC : TBits_1; inline;
  2891. function getFRMSYPW : TBits_1; inline;
  2892. function getMODE16 : TBits_1; inline;
  2893. function getMODE32 : TBits_1; inline;
  2894. function getMSSEN : TBits_1; inline;
  2895. function getMSTEN : TBits_1; inline;
  2896. function getON : TBits_1; inline;
  2897. function getSIDL : TBits_1; inline;
  2898. function getSMP : TBits_1; inline;
  2899. function getSPIFE : TBits_1; inline;
  2900. function getSRXISEL : TBits_2; inline;
  2901. function getSSEN : TBits_1; inline;
  2902. function getSTXISEL : TBits_2; inline;
  2903. function getw : TBits_32; inline;
  2904. procedure setCKE(thebits : TBits_1); inline;
  2905. procedure setCKP(thebits : TBits_1); inline;
  2906. procedure setDISSDO(thebits : TBits_1); inline;
  2907. procedure setENHBUF(thebits : TBits_1); inline;
  2908. procedure setFRMCNT(thebits : TBits_3); inline;
  2909. procedure setFRMEN(thebits : TBits_1); inline;
  2910. procedure setFRMPOL(thebits : TBits_1); inline;
  2911. procedure setFRMSYNC(thebits : TBits_1); inline;
  2912. procedure setFRMSYPW(thebits : TBits_1); inline;
  2913. procedure setMODE16(thebits : TBits_1); inline;
  2914. procedure setMODE32(thebits : TBits_1); inline;
  2915. procedure setMSSEN(thebits : TBits_1); inline;
  2916. procedure setMSTEN(thebits : TBits_1); inline;
  2917. procedure setON(thebits : TBits_1); inline;
  2918. procedure setSIDL(thebits : TBits_1); inline;
  2919. procedure setSMP(thebits : TBits_1); inline;
  2920. procedure setSPIFE(thebits : TBits_1); inline;
  2921. procedure setSRXISEL(thebits : TBits_2); inline;
  2922. procedure setSSEN(thebits : TBits_1); inline;
  2923. procedure setSTXISEL(thebits : TBits_2); inline;
  2924. procedure setw(thebits : TBits_32); inline;
  2925. public
  2926. procedure clearCKE; inline;
  2927. procedure clearCKP; inline;
  2928. procedure clearDISSDO; inline;
  2929. procedure clearENHBUF; inline;
  2930. procedure clearFRMEN; inline;
  2931. procedure clearFRMPOL; inline;
  2932. procedure clearFRMSYNC; inline;
  2933. procedure clearFRMSYPW; inline;
  2934. procedure clearMODE16; inline;
  2935. procedure clearMODE32; inline;
  2936. procedure clearMSSEN; inline;
  2937. procedure clearMSTEN; inline;
  2938. procedure clearON; inline;
  2939. procedure clearSIDL; inline;
  2940. procedure clearSMP; inline;
  2941. procedure clearSPIFE; inline;
  2942. procedure clearSSEN; inline;
  2943. procedure setCKE; inline;
  2944. procedure setCKP; inline;
  2945. procedure setDISSDO; inline;
  2946. procedure setENHBUF; inline;
  2947. procedure setFRMEN; inline;
  2948. procedure setFRMPOL; inline;
  2949. procedure setFRMSYNC; inline;
  2950. procedure setFRMSYPW; inline;
  2951. procedure setMODE16; inline;
  2952. procedure setMODE32; inline;
  2953. procedure setMSSEN; inline;
  2954. procedure setMSTEN; inline;
  2955. procedure setON; inline;
  2956. procedure setSIDL; inline;
  2957. procedure setSMP; inline;
  2958. procedure setSPIFE; inline;
  2959. procedure setSSEN; inline;
  2960. property CKE : TBits_1 read getCKE write setCKE;
  2961. property CKP : TBits_1 read getCKP write setCKP;
  2962. property DISSDO : TBits_1 read getDISSDO write setDISSDO;
  2963. property ENHBUF : TBits_1 read getENHBUF write setENHBUF;
  2964. property FRMCNT : TBits_3 read getFRMCNT write setFRMCNT;
  2965. property FRMEN : TBits_1 read getFRMEN write setFRMEN;
  2966. property FRMPOL : TBits_1 read getFRMPOL write setFRMPOL;
  2967. property FRMSYNC : TBits_1 read getFRMSYNC write setFRMSYNC;
  2968. property FRMSYPW : TBits_1 read getFRMSYPW write setFRMSYPW;
  2969. property MODE16 : TBits_1 read getMODE16 write setMODE16;
  2970. property MODE32 : TBits_1 read getMODE32 write setMODE32;
  2971. property MSSEN : TBits_1 read getMSSEN write setMSSEN;
  2972. property MSTEN : TBits_1 read getMSTEN write setMSTEN;
  2973. property ON : TBits_1 read getON write setON;
  2974. property SIDL : TBits_1 read getSIDL write setSIDL;
  2975. property SMP : TBits_1 read getSMP write setSMP;
  2976. property SPIFE : TBits_1 read getSPIFE write setSPIFE;
  2977. property SRXISEL : TBits_2 read getSRXISEL write setSRXISEL;
  2978. property SSEN : TBits_1 read getSSEN write setSSEN;
  2979. property STXISEL : TBits_2 read getSTXISEL write setSTXISEL;
  2980. property w : TBits_32 read getw write setw;
  2981. end;
  2982. TSPI3_SPI3CON = record
  2983. private
  2984. function getCKE : TBits_1; inline;
  2985. function getCKP : TBits_1; inline;
  2986. function getDISSDO : TBits_1; inline;
  2987. function getENHBUF : TBits_1; inline;
  2988. function getFRMCNT : TBits_3; inline;
  2989. function getFRMEN : TBits_1; inline;
  2990. function getFRMPOL : TBits_1; inline;
  2991. function getFRMSYNC : TBits_1; inline;
  2992. function getFRMSYPW : TBits_1; inline;
  2993. function getMODE16 : TBits_1; inline;
  2994. function getMODE32 : TBits_1; inline;
  2995. function getMSSEN : TBits_1; inline;
  2996. function getMSTEN : TBits_1; inline;
  2997. function getON : TBits_1; inline;
  2998. function getSIDL : TBits_1; inline;
  2999. function getSMP : TBits_1; inline;
  3000. function getSPIFE : TBits_1; inline;
  3001. function getSRXISEL : TBits_2; inline;
  3002. function getSSEN : TBits_1; inline;
  3003. function getSTXISEL : TBits_2; inline;
  3004. function getw : TBits_32; inline;
  3005. procedure setCKE(thebits : TBits_1); inline;
  3006. procedure setCKP(thebits : TBits_1); inline;
  3007. procedure setDISSDO(thebits : TBits_1); inline;
  3008. procedure setENHBUF(thebits : TBits_1); inline;
  3009. procedure setFRMCNT(thebits : TBits_3); inline;
  3010. procedure setFRMEN(thebits : TBits_1); inline;
  3011. procedure setFRMPOL(thebits : TBits_1); inline;
  3012. procedure setFRMSYNC(thebits : TBits_1); inline;
  3013. procedure setFRMSYPW(thebits : TBits_1); inline;
  3014. procedure setMODE16(thebits : TBits_1); inline;
  3015. procedure setMODE32(thebits : TBits_1); inline;
  3016. procedure setMSSEN(thebits : TBits_1); inline;
  3017. procedure setMSTEN(thebits : TBits_1); inline;
  3018. procedure setON(thebits : TBits_1); inline;
  3019. procedure setSIDL(thebits : TBits_1); inline;
  3020. procedure setSMP(thebits : TBits_1); inline;
  3021. procedure setSPIFE(thebits : TBits_1); inline;
  3022. procedure setSRXISEL(thebits : TBits_2); inline;
  3023. procedure setSSEN(thebits : TBits_1); inline;
  3024. procedure setSTXISEL(thebits : TBits_2); inline;
  3025. procedure setw(thebits : TBits_32); inline;
  3026. public
  3027. procedure clearCKE; inline;
  3028. procedure clearCKP; inline;
  3029. procedure clearDISSDO; inline;
  3030. procedure clearENHBUF; inline;
  3031. procedure clearFRMEN; inline;
  3032. procedure clearFRMPOL; inline;
  3033. procedure clearFRMSYNC; inline;
  3034. procedure clearFRMSYPW; inline;
  3035. procedure clearMODE16; inline;
  3036. procedure clearMODE32; inline;
  3037. procedure clearMSSEN; inline;
  3038. procedure clearMSTEN; inline;
  3039. procedure clearON; inline;
  3040. procedure clearSIDL; inline;
  3041. procedure clearSMP; inline;
  3042. procedure clearSPIFE; inline;
  3043. procedure clearSSEN; inline;
  3044. procedure setCKE; inline;
  3045. procedure setCKP; inline;
  3046. procedure setDISSDO; inline;
  3047. procedure setENHBUF; inline;
  3048. procedure setFRMEN; inline;
  3049. procedure setFRMPOL; inline;
  3050. procedure setFRMSYNC; inline;
  3051. procedure setFRMSYPW; inline;
  3052. procedure setMODE16; inline;
  3053. procedure setMODE32; inline;
  3054. procedure setMSSEN; inline;
  3055. procedure setMSTEN; inline;
  3056. procedure setON; inline;
  3057. procedure setSIDL; inline;
  3058. procedure setSMP; inline;
  3059. procedure setSPIFE; inline;
  3060. procedure setSSEN; inline;
  3061. property CKE : TBits_1 read getCKE write setCKE;
  3062. property CKP : TBits_1 read getCKP write setCKP;
  3063. property DISSDO : TBits_1 read getDISSDO write setDISSDO;
  3064. property ENHBUF : TBits_1 read getENHBUF write setENHBUF;
  3065. property FRMCNT : TBits_3 read getFRMCNT write setFRMCNT;
  3066. property FRMEN : TBits_1 read getFRMEN write setFRMEN;
  3067. property FRMPOL : TBits_1 read getFRMPOL write setFRMPOL;
  3068. property FRMSYNC : TBits_1 read getFRMSYNC write setFRMSYNC;
  3069. property FRMSYPW : TBits_1 read getFRMSYPW write setFRMSYPW;
  3070. property MODE16 : TBits_1 read getMODE16 write setMODE16;
  3071. property MODE32 : TBits_1 read getMODE32 write setMODE32;
  3072. property MSSEN : TBits_1 read getMSSEN write setMSSEN;
  3073. property MSTEN : TBits_1 read getMSTEN write setMSTEN;
  3074. property ON : TBits_1 read getON write setON;
  3075. property SIDL : TBits_1 read getSIDL write setSIDL;
  3076. property SMP : TBits_1 read getSMP write setSMP;
  3077. property SPIFE : TBits_1 read getSPIFE write setSPIFE;
  3078. property SRXISEL : TBits_2 read getSRXISEL write setSRXISEL;
  3079. property SSEN : TBits_1 read getSSEN write setSSEN;
  3080. property STXISEL : TBits_2 read getSTXISEL write setSTXISEL;
  3081. property w : TBits_32 read getw write setw;
  3082. end;
  3083. TSPI3_SPI1ASTAT = record
  3084. private
  3085. function getRXBUFELM : TBits_5; inline;
  3086. function getSPIBUSY : TBits_1; inline;
  3087. function getSPIRBE : TBits_1; inline;
  3088. function getSPIRBF : TBits_1; inline;
  3089. function getSPIROV : TBits_1; inline;
  3090. function getSPITBE : TBits_1; inline;
  3091. function getSPITBF : TBits_1; inline;
  3092. function getSPITUR : TBits_1; inline;
  3093. function getSRMT : TBits_1; inline;
  3094. function getTXBUFELM : TBits_5; inline;
  3095. function getw : TBits_32; inline;
  3096. procedure setRXBUFELM(thebits : TBits_5); inline;
  3097. procedure setSPIBUSY(thebits : TBits_1); inline;
  3098. procedure setSPIRBE(thebits : TBits_1); inline;
  3099. procedure setSPIRBF(thebits : TBits_1); inline;
  3100. procedure setSPIROV(thebits : TBits_1); inline;
  3101. procedure setSPITBE(thebits : TBits_1); inline;
  3102. procedure setSPITBF(thebits : TBits_1); inline;
  3103. procedure setSPITUR(thebits : TBits_1); inline;
  3104. procedure setSRMT(thebits : TBits_1); inline;
  3105. procedure setTXBUFELM(thebits : TBits_5); inline;
  3106. procedure setw(thebits : TBits_32); inline;
  3107. public
  3108. procedure clearSPIBUSY; inline;
  3109. procedure clearSPIRBE; inline;
  3110. procedure clearSPIRBF; inline;
  3111. procedure clearSPIROV; inline;
  3112. procedure clearSPITBE; inline;
  3113. procedure clearSPITBF; inline;
  3114. procedure clearSPITUR; inline;
  3115. procedure clearSRMT; inline;
  3116. procedure setSPIBUSY; inline;
  3117. procedure setSPIRBE; inline;
  3118. procedure setSPIRBF; inline;
  3119. procedure setSPIROV; inline;
  3120. procedure setSPITBE; inline;
  3121. procedure setSPITBF; inline;
  3122. procedure setSPITUR; inline;
  3123. procedure setSRMT; inline;
  3124. property RXBUFELM : TBits_5 read getRXBUFELM write setRXBUFELM;
  3125. property SPIBUSY : TBits_1 read getSPIBUSY write setSPIBUSY;
  3126. property SPIRBE : TBits_1 read getSPIRBE write setSPIRBE;
  3127. property SPIRBF : TBits_1 read getSPIRBF write setSPIRBF;
  3128. property SPIROV : TBits_1 read getSPIROV write setSPIROV;
  3129. property SPITBE : TBits_1 read getSPITBE write setSPITBE;
  3130. property SPITBF : TBits_1 read getSPITBF write setSPITBF;
  3131. property SPITUR : TBits_1 read getSPITUR write setSPITUR;
  3132. property SRMT : TBits_1 read getSRMT write setSRMT;
  3133. property TXBUFELM : TBits_5 read getTXBUFELM write setTXBUFELM;
  3134. property w : TBits_32 read getw write setw;
  3135. end;
  3136. TSPI3_SPI3STAT = record
  3137. private
  3138. function getRXBUFELM : TBits_5; inline;
  3139. function getSPIBUSY : TBits_1; inline;
  3140. function getSPIRBE : TBits_1; inline;
  3141. function getSPIRBF : TBits_1; inline;
  3142. function getSPIROV : TBits_1; inline;
  3143. function getSPITBE : TBits_1; inline;
  3144. function getSPITBF : TBits_1; inline;
  3145. function getSPITUR : TBits_1; inline;
  3146. function getSRMT : TBits_1; inline;
  3147. function getTXBUFELM : TBits_5; inline;
  3148. function getw : TBits_32; inline;
  3149. procedure setRXBUFELM(thebits : TBits_5); inline;
  3150. procedure setSPIBUSY(thebits : TBits_1); inline;
  3151. procedure setSPIRBE(thebits : TBits_1); inline;
  3152. procedure setSPIRBF(thebits : TBits_1); inline;
  3153. procedure setSPIROV(thebits : TBits_1); inline;
  3154. procedure setSPITBE(thebits : TBits_1); inline;
  3155. procedure setSPITBF(thebits : TBits_1); inline;
  3156. procedure setSPITUR(thebits : TBits_1); inline;
  3157. procedure setSRMT(thebits : TBits_1); inline;
  3158. procedure setTXBUFELM(thebits : TBits_5); inline;
  3159. procedure setw(thebits : TBits_32); inline;
  3160. public
  3161. procedure clearSPIBUSY; inline;
  3162. procedure clearSPIRBE; inline;
  3163. procedure clearSPIRBF; inline;
  3164. procedure clearSPIROV; inline;
  3165. procedure clearSPITBE; inline;
  3166. procedure clearSPITBF; inline;
  3167. procedure clearSPITUR; inline;
  3168. procedure clearSRMT; inline;
  3169. procedure setSPIBUSY; inline;
  3170. procedure setSPIRBE; inline;
  3171. procedure setSPIRBF; inline;
  3172. procedure setSPIROV; inline;
  3173. procedure setSPITBE; inline;
  3174. procedure setSPITBF; inline;
  3175. procedure setSPITUR; inline;
  3176. procedure setSRMT; inline;
  3177. property RXBUFELM : TBits_5 read getRXBUFELM write setRXBUFELM;
  3178. property SPIBUSY : TBits_1 read getSPIBUSY write setSPIBUSY;
  3179. property SPIRBE : TBits_1 read getSPIRBE write setSPIRBE;
  3180. property SPIRBF : TBits_1 read getSPIRBF write setSPIRBF;
  3181. property SPIROV : TBits_1 read getSPIROV write setSPIROV;
  3182. property SPITBE : TBits_1 read getSPITBE write setSPITBE;
  3183. property SPITBF : TBits_1 read getSPITBF write setSPITBF;
  3184. property SPITUR : TBits_1 read getSPITUR write setSPITUR;
  3185. property SRMT : TBits_1 read getSRMT write setSRMT;
  3186. property TXBUFELM : TBits_5 read getTXBUFELM write setTXBUFELM;
  3187. property w : TBits_32 read getw write setw;
  3188. end;
  3189. type
  3190. TSPI3Registers = record
  3191. SPI1ACONbits : TSPI3_SPI1ACON;
  3192. SPI1ACON : longWord;
  3193. SPI3CONbits : TSPI3_SPI3CON;
  3194. SPI3CON : longWord;
  3195. SPI1ACONCLR : longWord;
  3196. SPI3CONCLR : longWord;
  3197. SPI1ACONSET : longWord;
  3198. SPI3CONSET : longWord;
  3199. SPI1ACONINV : longWord;
  3200. SPI3CONINV : longWord;
  3201. SPI1ASTATbits : TSPI3_SPI1ASTAT;
  3202. SPI1ASTAT : longWord;
  3203. SPI3STATbits : TSPI3_SPI3STAT;
  3204. SPI3STAT : longWord;
  3205. SPI1ASTATCLR : longWord;
  3206. SPI3STATCLR : longWord;
  3207. SPI1ASTATSET : longWord;
  3208. SPI3STATSET : longWord;
  3209. SPI1ASTATINV : longWord;
  3210. SPI3STATINV : longWord;
  3211. SPI1ABUF : longWord;
  3212. SPI3BUF : longWord;
  3213. SPI1ABRG : longWord;
  3214. SPI3BRG : longWord;
  3215. SPI1ABRGCLR : longWord;
  3216. SPI3BRGCLR : longWord;
  3217. SPI1ABRGSET : longWord;
  3218. SPI3BRGSET : longWord;
  3219. SPI1ABRGINV : longWord;
  3220. SPI3BRGINV : longWord;
  3221. end;
  3222. TSPI2A_SPI2ACON = record
  3223. private
  3224. function getCKE : TBits_1; inline;
  3225. function getCKP : TBits_1; inline;
  3226. function getDISSDO : TBits_1; inline;
  3227. function getENHBUF : TBits_1; inline;
  3228. function getFRMCNT : TBits_3; inline;
  3229. function getFRMEN : TBits_1; inline;
  3230. function getFRMPOL : TBits_1; inline;
  3231. function getFRMSYNC : TBits_1; inline;
  3232. function getFRMSYPW : TBits_1; inline;
  3233. function getMODE16 : TBits_1; inline;
  3234. function getMODE32 : TBits_1; inline;
  3235. function getMSSEN : TBits_1; inline;
  3236. function getMSTEN : TBits_1; inline;
  3237. function getON : TBits_1; inline;
  3238. function getSIDL : TBits_1; inline;
  3239. function getSMP : TBits_1; inline;
  3240. function getSPIFE : TBits_1; inline;
  3241. function getSRXISEL : TBits_2; inline;
  3242. function getSSEN : TBits_1; inline;
  3243. function getSTXISEL : TBits_2; inline;
  3244. function getw : TBits_32; inline;
  3245. procedure setCKE(thebits : TBits_1); inline;
  3246. procedure setCKP(thebits : TBits_1); inline;
  3247. procedure setDISSDO(thebits : TBits_1); inline;
  3248. procedure setENHBUF(thebits : TBits_1); inline;
  3249. procedure setFRMCNT(thebits : TBits_3); inline;
  3250. procedure setFRMEN(thebits : TBits_1); inline;
  3251. procedure setFRMPOL(thebits : TBits_1); inline;
  3252. procedure setFRMSYNC(thebits : TBits_1); inline;
  3253. procedure setFRMSYPW(thebits : TBits_1); inline;
  3254. procedure setMODE16(thebits : TBits_1); inline;
  3255. procedure setMODE32(thebits : TBits_1); inline;
  3256. procedure setMSSEN(thebits : TBits_1); inline;
  3257. procedure setMSTEN(thebits : TBits_1); inline;
  3258. procedure setON(thebits : TBits_1); inline;
  3259. procedure setSIDL(thebits : TBits_1); inline;
  3260. procedure setSMP(thebits : TBits_1); inline;
  3261. procedure setSPIFE(thebits : TBits_1); inline;
  3262. procedure setSRXISEL(thebits : TBits_2); inline;
  3263. procedure setSSEN(thebits : TBits_1); inline;
  3264. procedure setSTXISEL(thebits : TBits_2); inline;
  3265. procedure setw(thebits : TBits_32); inline;
  3266. public
  3267. procedure clearCKE; inline;
  3268. procedure clearCKP; inline;
  3269. procedure clearDISSDO; inline;
  3270. procedure clearENHBUF; inline;
  3271. procedure clearFRMEN; inline;
  3272. procedure clearFRMPOL; inline;
  3273. procedure clearFRMSYNC; inline;
  3274. procedure clearFRMSYPW; inline;
  3275. procedure clearMODE16; inline;
  3276. procedure clearMODE32; inline;
  3277. procedure clearMSSEN; inline;
  3278. procedure clearMSTEN; inline;
  3279. procedure clearON; inline;
  3280. procedure clearSIDL; inline;
  3281. procedure clearSMP; inline;
  3282. procedure clearSPIFE; inline;
  3283. procedure clearSSEN; inline;
  3284. procedure setCKE; inline;
  3285. procedure setCKP; inline;
  3286. procedure setDISSDO; inline;
  3287. procedure setENHBUF; inline;
  3288. procedure setFRMEN; inline;
  3289. procedure setFRMPOL; inline;
  3290. procedure setFRMSYNC; inline;
  3291. procedure setFRMSYPW; inline;
  3292. procedure setMODE16; inline;
  3293. procedure setMODE32; inline;
  3294. procedure setMSSEN; inline;
  3295. procedure setMSTEN; inline;
  3296. procedure setON; inline;
  3297. procedure setSIDL; inline;
  3298. procedure setSMP; inline;
  3299. procedure setSPIFE; inline;
  3300. procedure setSSEN; inline;
  3301. property CKE : TBits_1 read getCKE write setCKE;
  3302. property CKP : TBits_1 read getCKP write setCKP;
  3303. property DISSDO : TBits_1 read getDISSDO write setDISSDO;
  3304. property ENHBUF : TBits_1 read getENHBUF write setENHBUF;
  3305. property FRMCNT : TBits_3 read getFRMCNT write setFRMCNT;
  3306. property FRMEN : TBits_1 read getFRMEN write setFRMEN;
  3307. property FRMPOL : TBits_1 read getFRMPOL write setFRMPOL;
  3308. property FRMSYNC : TBits_1 read getFRMSYNC write setFRMSYNC;
  3309. property FRMSYPW : TBits_1 read getFRMSYPW write setFRMSYPW;
  3310. property MODE16 : TBits_1 read getMODE16 write setMODE16;
  3311. property MODE32 : TBits_1 read getMODE32 write setMODE32;
  3312. property MSSEN : TBits_1 read getMSSEN write setMSSEN;
  3313. property MSTEN : TBits_1 read getMSTEN write setMSTEN;
  3314. property ON : TBits_1 read getON write setON;
  3315. property SIDL : TBits_1 read getSIDL write setSIDL;
  3316. property SMP : TBits_1 read getSMP write setSMP;
  3317. property SPIFE : TBits_1 read getSPIFE write setSPIFE;
  3318. property SRXISEL : TBits_2 read getSRXISEL write setSRXISEL;
  3319. property SSEN : TBits_1 read getSSEN write setSSEN;
  3320. property STXISEL : TBits_2 read getSTXISEL write setSTXISEL;
  3321. property w : TBits_32 read getw write setw;
  3322. end;
  3323. TSPI2A_SPI2CON = record
  3324. private
  3325. function getCKE : TBits_1; inline;
  3326. function getCKP : TBits_1; inline;
  3327. function getDISSDO : TBits_1; inline;
  3328. function getENHBUF : TBits_1; inline;
  3329. function getFRMCNT : TBits_3; inline;
  3330. function getFRMEN : TBits_1; inline;
  3331. function getFRMPOL : TBits_1; inline;
  3332. function getFRMSYNC : TBits_1; inline;
  3333. function getFRMSYPW : TBits_1; inline;
  3334. function getMODE16 : TBits_1; inline;
  3335. function getMODE32 : TBits_1; inline;
  3336. function getMSSEN : TBits_1; inline;
  3337. function getMSTEN : TBits_1; inline;
  3338. function getON : TBits_1; inline;
  3339. function getSIDL : TBits_1; inline;
  3340. function getSMP : TBits_1; inline;
  3341. function getSPIFE : TBits_1; inline;
  3342. function getSRXISEL : TBits_2; inline;
  3343. function getSSEN : TBits_1; inline;
  3344. function getSTXISEL : TBits_2; inline;
  3345. function getw : TBits_32; inline;
  3346. procedure setCKE(thebits : TBits_1); inline;
  3347. procedure setCKP(thebits : TBits_1); inline;
  3348. procedure setDISSDO(thebits : TBits_1); inline;
  3349. procedure setENHBUF(thebits : TBits_1); inline;
  3350. procedure setFRMCNT(thebits : TBits_3); inline;
  3351. procedure setFRMEN(thebits : TBits_1); inline;
  3352. procedure setFRMPOL(thebits : TBits_1); inline;
  3353. procedure setFRMSYNC(thebits : TBits_1); inline;
  3354. procedure setFRMSYPW(thebits : TBits_1); inline;
  3355. procedure setMODE16(thebits : TBits_1); inline;
  3356. procedure setMODE32(thebits : TBits_1); inline;
  3357. procedure setMSSEN(thebits : TBits_1); inline;
  3358. procedure setMSTEN(thebits : TBits_1); inline;
  3359. procedure setON(thebits : TBits_1); inline;
  3360. procedure setSIDL(thebits : TBits_1); inline;
  3361. procedure setSMP(thebits : TBits_1); inline;
  3362. procedure setSPIFE(thebits : TBits_1); inline;
  3363. procedure setSRXISEL(thebits : TBits_2); inline;
  3364. procedure setSSEN(thebits : TBits_1); inline;
  3365. procedure setSTXISEL(thebits : TBits_2); inline;
  3366. procedure setw(thebits : TBits_32); inline;
  3367. public
  3368. procedure clearCKE; inline;
  3369. procedure clearCKP; inline;
  3370. procedure clearDISSDO; inline;
  3371. procedure clearENHBUF; inline;
  3372. procedure clearFRMEN; inline;
  3373. procedure clearFRMPOL; inline;
  3374. procedure clearFRMSYNC; inline;
  3375. procedure clearFRMSYPW; inline;
  3376. procedure clearMODE16; inline;
  3377. procedure clearMODE32; inline;
  3378. procedure clearMSSEN; inline;
  3379. procedure clearMSTEN; inline;
  3380. procedure clearON; inline;
  3381. procedure clearSIDL; inline;
  3382. procedure clearSMP; inline;
  3383. procedure clearSPIFE; inline;
  3384. procedure clearSSEN; inline;
  3385. procedure setCKE; inline;
  3386. procedure setCKP; inline;
  3387. procedure setDISSDO; inline;
  3388. procedure setENHBUF; inline;
  3389. procedure setFRMEN; inline;
  3390. procedure setFRMPOL; inline;
  3391. procedure setFRMSYNC; inline;
  3392. procedure setFRMSYPW; inline;
  3393. procedure setMODE16; inline;
  3394. procedure setMODE32; inline;
  3395. procedure setMSSEN; inline;
  3396. procedure setMSTEN; inline;
  3397. procedure setON; inline;
  3398. procedure setSIDL; inline;
  3399. procedure setSMP; inline;
  3400. procedure setSPIFE; inline;
  3401. procedure setSSEN; inline;
  3402. property CKE : TBits_1 read getCKE write setCKE;
  3403. property CKP : TBits_1 read getCKP write setCKP;
  3404. property DISSDO : TBits_1 read getDISSDO write setDISSDO;
  3405. property ENHBUF : TBits_1 read getENHBUF write setENHBUF;
  3406. property FRMCNT : TBits_3 read getFRMCNT write setFRMCNT;
  3407. property FRMEN : TBits_1 read getFRMEN write setFRMEN;
  3408. property FRMPOL : TBits_1 read getFRMPOL write setFRMPOL;
  3409. property FRMSYNC : TBits_1 read getFRMSYNC write setFRMSYNC;
  3410. property FRMSYPW : TBits_1 read getFRMSYPW write setFRMSYPW;
  3411. property MODE16 : TBits_1 read getMODE16 write setMODE16;
  3412. property MODE32 : TBits_1 read getMODE32 write setMODE32;
  3413. property MSSEN : TBits_1 read getMSSEN write setMSSEN;
  3414. property MSTEN : TBits_1 read getMSTEN write setMSTEN;
  3415. property ON : TBits_1 read getON write setON;
  3416. property SIDL : TBits_1 read getSIDL write setSIDL;
  3417. property SMP : TBits_1 read getSMP write setSMP;
  3418. property SPIFE : TBits_1 read getSPIFE write setSPIFE;
  3419. property SRXISEL : TBits_2 read getSRXISEL write setSRXISEL;
  3420. property SSEN : TBits_1 read getSSEN write setSSEN;
  3421. property STXISEL : TBits_2 read getSTXISEL write setSTXISEL;
  3422. property w : TBits_32 read getw write setw;
  3423. end;
  3424. TSPI2A_SPI2ASTAT = record
  3425. private
  3426. function getRXBUFELM : TBits_5; inline;
  3427. function getSPIBUSY : TBits_1; inline;
  3428. function getSPIRBE : TBits_1; inline;
  3429. function getSPIRBF : TBits_1; inline;
  3430. function getSPIROV : TBits_1; inline;
  3431. function getSPITBE : TBits_1; inline;
  3432. function getSPITBF : TBits_1; inline;
  3433. function getSPITUR : TBits_1; inline;
  3434. function getSRMT : TBits_1; inline;
  3435. function getTXBUFELM : TBits_5; inline;
  3436. function getw : TBits_32; inline;
  3437. procedure setRXBUFELM(thebits : TBits_5); inline;
  3438. procedure setSPIBUSY(thebits : TBits_1); inline;
  3439. procedure setSPIRBE(thebits : TBits_1); inline;
  3440. procedure setSPIRBF(thebits : TBits_1); inline;
  3441. procedure setSPIROV(thebits : TBits_1); inline;
  3442. procedure setSPITBE(thebits : TBits_1); inline;
  3443. procedure setSPITBF(thebits : TBits_1); inline;
  3444. procedure setSPITUR(thebits : TBits_1); inline;
  3445. procedure setSRMT(thebits : TBits_1); inline;
  3446. procedure setTXBUFELM(thebits : TBits_5); inline;
  3447. procedure setw(thebits : TBits_32); inline;
  3448. public
  3449. procedure clearSPIBUSY; inline;
  3450. procedure clearSPIRBE; inline;
  3451. procedure clearSPIRBF; inline;
  3452. procedure clearSPIROV; inline;
  3453. procedure clearSPITBE; inline;
  3454. procedure clearSPITBF; inline;
  3455. procedure clearSPITUR; inline;
  3456. procedure clearSRMT; inline;
  3457. procedure setSPIBUSY; inline;
  3458. procedure setSPIRBE; inline;
  3459. procedure setSPIRBF; inline;
  3460. procedure setSPIROV; inline;
  3461. procedure setSPITBE; inline;
  3462. procedure setSPITBF; inline;
  3463. procedure setSPITUR; inline;
  3464. procedure setSRMT; inline;
  3465. property RXBUFELM : TBits_5 read getRXBUFELM write setRXBUFELM;
  3466. property SPIBUSY : TBits_1 read getSPIBUSY write setSPIBUSY;
  3467. property SPIRBE : TBits_1 read getSPIRBE write setSPIRBE;
  3468. property SPIRBF : TBits_1 read getSPIRBF write setSPIRBF;
  3469. property SPIROV : TBits_1 read getSPIROV write setSPIROV;
  3470. property SPITBE : TBits_1 read getSPITBE write setSPITBE;
  3471. property SPITBF : TBits_1 read getSPITBF write setSPITBF;
  3472. property SPITUR : TBits_1 read getSPITUR write setSPITUR;
  3473. property SRMT : TBits_1 read getSRMT write setSRMT;
  3474. property TXBUFELM : TBits_5 read getTXBUFELM write setTXBUFELM;
  3475. property w : TBits_32 read getw write setw;
  3476. end;
  3477. TSPI2A_SPI2STAT = record
  3478. private
  3479. function getRXBUFELM : TBits_5; inline;
  3480. function getSPIBUSY : TBits_1; inline;
  3481. function getSPIRBE : TBits_1; inline;
  3482. function getSPIRBF : TBits_1; inline;
  3483. function getSPIROV : TBits_1; inline;
  3484. function getSPITBE : TBits_1; inline;
  3485. function getSPITBF : TBits_1; inline;
  3486. function getSPITUR : TBits_1; inline;
  3487. function getSRMT : TBits_1; inline;
  3488. function getTXBUFELM : TBits_5; inline;
  3489. function getw : TBits_32; inline;
  3490. procedure setRXBUFELM(thebits : TBits_5); inline;
  3491. procedure setSPIBUSY(thebits : TBits_1); inline;
  3492. procedure setSPIRBE(thebits : TBits_1); inline;
  3493. procedure setSPIRBF(thebits : TBits_1); inline;
  3494. procedure setSPIROV(thebits : TBits_1); inline;
  3495. procedure setSPITBE(thebits : TBits_1); inline;
  3496. procedure setSPITBF(thebits : TBits_1); inline;
  3497. procedure setSPITUR(thebits : TBits_1); inline;
  3498. procedure setSRMT(thebits : TBits_1); inline;
  3499. procedure setTXBUFELM(thebits : TBits_5); inline;
  3500. procedure setw(thebits : TBits_32); inline;
  3501. public
  3502. procedure clearSPIBUSY; inline;
  3503. procedure clearSPIRBE; inline;
  3504. procedure clearSPIRBF; inline;
  3505. procedure clearSPIROV; inline;
  3506. procedure clearSPITBE; inline;
  3507. procedure clearSPITBF; inline;
  3508. procedure clearSPITUR; inline;
  3509. procedure clearSRMT; inline;
  3510. procedure setSPIBUSY; inline;
  3511. procedure setSPIRBE; inline;
  3512. procedure setSPIRBF; inline;
  3513. procedure setSPIROV; inline;
  3514. procedure setSPITBE; inline;
  3515. procedure setSPITBF; inline;
  3516. procedure setSPITUR; inline;
  3517. procedure setSRMT; inline;
  3518. property RXBUFELM : TBits_5 read getRXBUFELM write setRXBUFELM;
  3519. property SPIBUSY : TBits_1 read getSPIBUSY write setSPIBUSY;
  3520. property SPIRBE : TBits_1 read getSPIRBE write setSPIRBE;
  3521. property SPIRBF : TBits_1 read getSPIRBF write setSPIRBF;
  3522. property SPIROV : TBits_1 read getSPIROV write setSPIROV;
  3523. property SPITBE : TBits_1 read getSPITBE write setSPITBE;
  3524. property SPITBF : TBits_1 read getSPITBF write setSPITBF;
  3525. property SPITUR : TBits_1 read getSPITUR write setSPITUR;
  3526. property SRMT : TBits_1 read getSRMT write setSRMT;
  3527. property TXBUFELM : TBits_5 read getTXBUFELM write setTXBUFELM;
  3528. property w : TBits_32 read getw write setw;
  3529. end;
  3530. type
  3531. TSPI2ARegisters = record
  3532. SPI2ACONbits : TSPI2A_SPI2ACON;
  3533. SPI2ACON : longWord;
  3534. SPI2CONbits : TSPI2A_SPI2CON;
  3535. SPI2CON : longWord;
  3536. SPI2ACONCLR : longWord;
  3537. SPI2CONCLR : longWord;
  3538. SPI2ACONSET : longWord;
  3539. SPI2CONSET : longWord;
  3540. SPI2ACONINV : longWord;
  3541. SPI2CONINV : longWord;
  3542. SPI2ASTATbits : TSPI2A_SPI2ASTAT;
  3543. SPI2ASTAT : longWord;
  3544. SPI2STATbits : TSPI2A_SPI2STAT;
  3545. SPI2STAT : longWord;
  3546. SPI2ASTATCLR : longWord;
  3547. SPI2STATCLR : longWord;
  3548. SPI2ASTATSET : longWord;
  3549. SPI2STATSET : longWord;
  3550. SPI2ASTATINV : longWord;
  3551. SPI2STATINV : longWord;
  3552. SPI2ABUF : longWord;
  3553. SPI2BUF : longWord;
  3554. SPI2ABRG : longWord;
  3555. SPI2BRG : longWord;
  3556. SPI2ABRGCLR : longWord;
  3557. SPI2BRGCLR : longWord;
  3558. SPI2ABRGSET : longWord;
  3559. SPI2BRGSET : longWord;
  3560. SPI2ABRGINV : longWord;
  3561. SPI2BRGINV : longWord;
  3562. end;
  3563. TSPI3A_SPI3ACON = record
  3564. private
  3565. function getCKE : TBits_1; inline;
  3566. function getCKP : TBits_1; inline;
  3567. function getDISSDO : TBits_1; inline;
  3568. function getENHBUF : TBits_1; inline;
  3569. function getFRMCNT : TBits_3; inline;
  3570. function getFRMEN : TBits_1; inline;
  3571. function getFRMPOL : TBits_1; inline;
  3572. function getFRMSYNC : TBits_1; inline;
  3573. function getFRMSYPW : TBits_1; inline;
  3574. function getMODE16 : TBits_1; inline;
  3575. function getMODE32 : TBits_1; inline;
  3576. function getMSSEN : TBits_1; inline;
  3577. function getMSTEN : TBits_1; inline;
  3578. function getON : TBits_1; inline;
  3579. function getSIDL : TBits_1; inline;
  3580. function getSMP : TBits_1; inline;
  3581. function getSPIFE : TBits_1; inline;
  3582. function getSRXISEL : TBits_2; inline;
  3583. function getSSEN : TBits_1; inline;
  3584. function getSTXISEL : TBits_2; inline;
  3585. function getw : TBits_32; inline;
  3586. procedure setCKE(thebits : TBits_1); inline;
  3587. procedure setCKP(thebits : TBits_1); inline;
  3588. procedure setDISSDO(thebits : TBits_1); inline;
  3589. procedure setENHBUF(thebits : TBits_1); inline;
  3590. procedure setFRMCNT(thebits : TBits_3); inline;
  3591. procedure setFRMEN(thebits : TBits_1); inline;
  3592. procedure setFRMPOL(thebits : TBits_1); inline;
  3593. procedure setFRMSYNC(thebits : TBits_1); inline;
  3594. procedure setFRMSYPW(thebits : TBits_1); inline;
  3595. procedure setMODE16(thebits : TBits_1); inline;
  3596. procedure setMODE32(thebits : TBits_1); inline;
  3597. procedure setMSSEN(thebits : TBits_1); inline;
  3598. procedure setMSTEN(thebits : TBits_1); inline;
  3599. procedure setON(thebits : TBits_1); inline;
  3600. procedure setSIDL(thebits : TBits_1); inline;
  3601. procedure setSMP(thebits : TBits_1); inline;
  3602. procedure setSPIFE(thebits : TBits_1); inline;
  3603. procedure setSRXISEL(thebits : TBits_2); inline;
  3604. procedure setSSEN(thebits : TBits_1); inline;
  3605. procedure setSTXISEL(thebits : TBits_2); inline;
  3606. procedure setw(thebits : TBits_32); inline;
  3607. public
  3608. procedure clearCKE; inline;
  3609. procedure clearCKP; inline;
  3610. procedure clearDISSDO; inline;
  3611. procedure clearENHBUF; inline;
  3612. procedure clearFRMEN; inline;
  3613. procedure clearFRMPOL; inline;
  3614. procedure clearFRMSYNC; inline;
  3615. procedure clearFRMSYPW; inline;
  3616. procedure clearMODE16; inline;
  3617. procedure clearMODE32; inline;
  3618. procedure clearMSSEN; inline;
  3619. procedure clearMSTEN; inline;
  3620. procedure clearON; inline;
  3621. procedure clearSIDL; inline;
  3622. procedure clearSMP; inline;
  3623. procedure clearSPIFE; inline;
  3624. procedure clearSSEN; inline;
  3625. procedure setCKE; inline;
  3626. procedure setCKP; inline;
  3627. procedure setDISSDO; inline;
  3628. procedure setENHBUF; inline;
  3629. procedure setFRMEN; inline;
  3630. procedure setFRMPOL; inline;
  3631. procedure setFRMSYNC; inline;
  3632. procedure setFRMSYPW; inline;
  3633. procedure setMODE16; inline;
  3634. procedure setMODE32; inline;
  3635. procedure setMSSEN; inline;
  3636. procedure setMSTEN; inline;
  3637. procedure setON; inline;
  3638. procedure setSIDL; inline;
  3639. procedure setSMP; inline;
  3640. procedure setSPIFE; inline;
  3641. procedure setSSEN; inline;
  3642. property CKE : TBits_1 read getCKE write setCKE;
  3643. property CKP : TBits_1 read getCKP write setCKP;
  3644. property DISSDO : TBits_1 read getDISSDO write setDISSDO;
  3645. property ENHBUF : TBits_1 read getENHBUF write setENHBUF;
  3646. property FRMCNT : TBits_3 read getFRMCNT write setFRMCNT;
  3647. property FRMEN : TBits_1 read getFRMEN write setFRMEN;
  3648. property FRMPOL : TBits_1 read getFRMPOL write setFRMPOL;
  3649. property FRMSYNC : TBits_1 read getFRMSYNC write setFRMSYNC;
  3650. property FRMSYPW : TBits_1 read getFRMSYPW write setFRMSYPW;
  3651. property MODE16 : TBits_1 read getMODE16 write setMODE16;
  3652. property MODE32 : TBits_1 read getMODE32 write setMODE32;
  3653. property MSSEN : TBits_1 read getMSSEN write setMSSEN;
  3654. property MSTEN : TBits_1 read getMSTEN write setMSTEN;
  3655. property ON : TBits_1 read getON write setON;
  3656. property SIDL : TBits_1 read getSIDL write setSIDL;
  3657. property SMP : TBits_1 read getSMP write setSMP;
  3658. property SPIFE : TBits_1 read getSPIFE write setSPIFE;
  3659. property SRXISEL : TBits_2 read getSRXISEL write setSRXISEL;
  3660. property SSEN : TBits_1 read getSSEN write setSSEN;
  3661. property STXISEL : TBits_2 read getSTXISEL write setSTXISEL;
  3662. property w : TBits_32 read getw write setw;
  3663. end;
  3664. TSPI3A_SPI4CON = record
  3665. private
  3666. function getCKE : TBits_1; inline;
  3667. function getCKP : TBits_1; inline;
  3668. function getDISSDO : TBits_1; inline;
  3669. function getENHBUF : TBits_1; inline;
  3670. function getFRMCNT : TBits_3; inline;
  3671. function getFRMEN : TBits_1; inline;
  3672. function getFRMPOL : TBits_1; inline;
  3673. function getFRMSYNC : TBits_1; inline;
  3674. function getFRMSYPW : TBits_1; inline;
  3675. function getMODE16 : TBits_1; inline;
  3676. function getMODE32 : TBits_1; inline;
  3677. function getMSSEN : TBits_1; inline;
  3678. function getMSTEN : TBits_1; inline;
  3679. function getON : TBits_1; inline;
  3680. function getSIDL : TBits_1; inline;
  3681. function getSMP : TBits_1; inline;
  3682. function getSPIFE : TBits_1; inline;
  3683. function getSRXISEL : TBits_2; inline;
  3684. function getSSEN : TBits_1; inline;
  3685. function getSTXISEL : TBits_2; inline;
  3686. function getw : TBits_32; inline;
  3687. procedure setCKE(thebits : TBits_1); inline;
  3688. procedure setCKP(thebits : TBits_1); inline;
  3689. procedure setDISSDO(thebits : TBits_1); inline;
  3690. procedure setENHBUF(thebits : TBits_1); inline;
  3691. procedure setFRMCNT(thebits : TBits_3); inline;
  3692. procedure setFRMEN(thebits : TBits_1); inline;
  3693. procedure setFRMPOL(thebits : TBits_1); inline;
  3694. procedure setFRMSYNC(thebits : TBits_1); inline;
  3695. procedure setFRMSYPW(thebits : TBits_1); inline;
  3696. procedure setMODE16(thebits : TBits_1); inline;
  3697. procedure setMODE32(thebits : TBits_1); inline;
  3698. procedure setMSSEN(thebits : TBits_1); inline;
  3699. procedure setMSTEN(thebits : TBits_1); inline;
  3700. procedure setON(thebits : TBits_1); inline;
  3701. procedure setSIDL(thebits : TBits_1); inline;
  3702. procedure setSMP(thebits : TBits_1); inline;
  3703. procedure setSPIFE(thebits : TBits_1); inline;
  3704. procedure setSRXISEL(thebits : TBits_2); inline;
  3705. procedure setSSEN(thebits : TBits_1); inline;
  3706. procedure setSTXISEL(thebits : TBits_2); inline;
  3707. procedure setw(thebits : TBits_32); inline;
  3708. public
  3709. procedure clearCKE; inline;
  3710. procedure clearCKP; inline;
  3711. procedure clearDISSDO; inline;
  3712. procedure clearENHBUF; inline;
  3713. procedure clearFRMEN; inline;
  3714. procedure clearFRMPOL; inline;
  3715. procedure clearFRMSYNC; inline;
  3716. procedure clearFRMSYPW; inline;
  3717. procedure clearMODE16; inline;
  3718. procedure clearMODE32; inline;
  3719. procedure clearMSSEN; inline;
  3720. procedure clearMSTEN; inline;
  3721. procedure clearON; inline;
  3722. procedure clearSIDL; inline;
  3723. procedure clearSMP; inline;
  3724. procedure clearSPIFE; inline;
  3725. procedure clearSSEN; inline;
  3726. procedure setCKE; inline;
  3727. procedure setCKP; inline;
  3728. procedure setDISSDO; inline;
  3729. procedure setENHBUF; inline;
  3730. procedure setFRMEN; inline;
  3731. procedure setFRMPOL; inline;
  3732. procedure setFRMSYNC; inline;
  3733. procedure setFRMSYPW; inline;
  3734. procedure setMODE16; inline;
  3735. procedure setMODE32; inline;
  3736. procedure setMSSEN; inline;
  3737. procedure setMSTEN; inline;
  3738. procedure setON; inline;
  3739. procedure setSIDL; inline;
  3740. procedure setSMP; inline;
  3741. procedure setSPIFE; inline;
  3742. procedure setSSEN; inline;
  3743. property CKE : TBits_1 read getCKE write setCKE;
  3744. property CKP : TBits_1 read getCKP write setCKP;
  3745. property DISSDO : TBits_1 read getDISSDO write setDISSDO;
  3746. property ENHBUF : TBits_1 read getENHBUF write setENHBUF;
  3747. property FRMCNT : TBits_3 read getFRMCNT write setFRMCNT;
  3748. property FRMEN : TBits_1 read getFRMEN write setFRMEN;
  3749. property FRMPOL : TBits_1 read getFRMPOL write setFRMPOL;
  3750. property FRMSYNC : TBits_1 read getFRMSYNC write setFRMSYNC;
  3751. property FRMSYPW : TBits_1 read getFRMSYPW write setFRMSYPW;
  3752. property MODE16 : TBits_1 read getMODE16 write setMODE16;
  3753. property MODE32 : TBits_1 read getMODE32 write setMODE32;
  3754. property MSSEN : TBits_1 read getMSSEN write setMSSEN;
  3755. property MSTEN : TBits_1 read getMSTEN write setMSTEN;
  3756. property ON : TBits_1 read getON write setON;
  3757. property SIDL : TBits_1 read getSIDL write setSIDL;
  3758. property SMP : TBits_1 read getSMP write setSMP;
  3759. property SPIFE : TBits_1 read getSPIFE write setSPIFE;
  3760. property SRXISEL : TBits_2 read getSRXISEL write setSRXISEL;
  3761. property SSEN : TBits_1 read getSSEN write setSSEN;
  3762. property STXISEL : TBits_2 read getSTXISEL write setSTXISEL;
  3763. property w : TBits_32 read getw write setw;
  3764. end;
  3765. TSPI3A_SPI3ASTAT = record
  3766. private
  3767. function getRXBUFELM : TBits_5; inline;
  3768. function getSPIBUSY : TBits_1; inline;
  3769. function getSPIRBE : TBits_1; inline;
  3770. function getSPIRBF : TBits_1; inline;
  3771. function getSPIROV : TBits_1; inline;
  3772. function getSPITBE : TBits_1; inline;
  3773. function getSPITBF : TBits_1; inline;
  3774. function getSPITUR : TBits_1; inline;
  3775. function getSRMT : TBits_1; inline;
  3776. function getTXBUFELM : TBits_5; inline;
  3777. function getw : TBits_32; inline;
  3778. procedure setRXBUFELM(thebits : TBits_5); inline;
  3779. procedure setSPIBUSY(thebits : TBits_1); inline;
  3780. procedure setSPIRBE(thebits : TBits_1); inline;
  3781. procedure setSPIRBF(thebits : TBits_1); inline;
  3782. procedure setSPIROV(thebits : TBits_1); inline;
  3783. procedure setSPITBE(thebits : TBits_1); inline;
  3784. procedure setSPITBF(thebits : TBits_1); inline;
  3785. procedure setSPITUR(thebits : TBits_1); inline;
  3786. procedure setSRMT(thebits : TBits_1); inline;
  3787. procedure setTXBUFELM(thebits : TBits_5); inline;
  3788. procedure setw(thebits : TBits_32); inline;
  3789. public
  3790. procedure clearSPIBUSY; inline;
  3791. procedure clearSPIRBE; inline;
  3792. procedure clearSPIRBF; inline;
  3793. procedure clearSPIROV; inline;
  3794. procedure clearSPITBE; inline;
  3795. procedure clearSPITBF; inline;
  3796. procedure clearSPITUR; inline;
  3797. procedure clearSRMT; inline;
  3798. procedure setSPIBUSY; inline;
  3799. procedure setSPIRBE; inline;
  3800. procedure setSPIRBF; inline;
  3801. procedure setSPIROV; inline;
  3802. procedure setSPITBE; inline;
  3803. procedure setSPITBF; inline;
  3804. procedure setSPITUR; inline;
  3805. procedure setSRMT; inline;
  3806. property RXBUFELM : TBits_5 read getRXBUFELM write setRXBUFELM;
  3807. property SPIBUSY : TBits_1 read getSPIBUSY write setSPIBUSY;
  3808. property SPIRBE : TBits_1 read getSPIRBE write setSPIRBE;
  3809. property SPIRBF : TBits_1 read getSPIRBF write setSPIRBF;
  3810. property SPIROV : TBits_1 read getSPIROV write setSPIROV;
  3811. property SPITBE : TBits_1 read getSPITBE write setSPITBE;
  3812. property SPITBF : TBits_1 read getSPITBF write setSPITBF;
  3813. property SPITUR : TBits_1 read getSPITUR write setSPITUR;
  3814. property SRMT : TBits_1 read getSRMT write setSRMT;
  3815. property TXBUFELM : TBits_5 read getTXBUFELM write setTXBUFELM;
  3816. property w : TBits_32 read getw write setw;
  3817. end;
  3818. TSPI3A_SPI4STAT = record
  3819. private
  3820. function getRXBUFELM : TBits_5; inline;
  3821. function getSPIBUSY : TBits_1; inline;
  3822. function getSPIRBE : TBits_1; inline;
  3823. function getSPIRBF : TBits_1; inline;
  3824. function getSPIROV : TBits_1; inline;
  3825. function getSPITBE : TBits_1; inline;
  3826. function getSPITBF : TBits_1; inline;
  3827. function getSPITUR : TBits_1; inline;
  3828. function getSRMT : TBits_1; inline;
  3829. function getTXBUFELM : TBits_5; inline;
  3830. function getw : TBits_32; inline;
  3831. procedure setRXBUFELM(thebits : TBits_5); inline;
  3832. procedure setSPIBUSY(thebits : TBits_1); inline;
  3833. procedure setSPIRBE(thebits : TBits_1); inline;
  3834. procedure setSPIRBF(thebits : TBits_1); inline;
  3835. procedure setSPIROV(thebits : TBits_1); inline;
  3836. procedure setSPITBE(thebits : TBits_1); inline;
  3837. procedure setSPITBF(thebits : TBits_1); inline;
  3838. procedure setSPITUR(thebits : TBits_1); inline;
  3839. procedure setSRMT(thebits : TBits_1); inline;
  3840. procedure setTXBUFELM(thebits : TBits_5); inline;
  3841. procedure setw(thebits : TBits_32); inline;
  3842. public
  3843. procedure clearSPIBUSY; inline;
  3844. procedure clearSPIRBE; inline;
  3845. procedure clearSPIRBF; inline;
  3846. procedure clearSPIROV; inline;
  3847. procedure clearSPITBE; inline;
  3848. procedure clearSPITBF; inline;
  3849. procedure clearSPITUR; inline;
  3850. procedure clearSRMT; inline;
  3851. procedure setSPIBUSY; inline;
  3852. procedure setSPIRBE; inline;
  3853. procedure setSPIRBF; inline;
  3854. procedure setSPIROV; inline;
  3855. procedure setSPITBE; inline;
  3856. procedure setSPITBF; inline;
  3857. procedure setSPITUR; inline;
  3858. procedure setSRMT; inline;
  3859. property RXBUFELM : TBits_5 read getRXBUFELM write setRXBUFELM;
  3860. property SPIBUSY : TBits_1 read getSPIBUSY write setSPIBUSY;
  3861. property SPIRBE : TBits_1 read getSPIRBE write setSPIRBE;
  3862. property SPIRBF : TBits_1 read getSPIRBF write setSPIRBF;
  3863. property SPIROV : TBits_1 read getSPIROV write setSPIROV;
  3864. property SPITBE : TBits_1 read getSPITBE write setSPITBE;
  3865. property SPITBF : TBits_1 read getSPITBF write setSPITBF;
  3866. property SPITUR : TBits_1 read getSPITUR write setSPITUR;
  3867. property SRMT : TBits_1 read getSRMT write setSRMT;
  3868. property TXBUFELM : TBits_5 read getTXBUFELM write setTXBUFELM;
  3869. property w : TBits_32 read getw write setw;
  3870. end;
  3871. type
  3872. TSPI3ARegisters = record
  3873. SPI3ACONbits : TSPI3A_SPI3ACON;
  3874. SPI3ACON : longWord;
  3875. SPI4CONbits : TSPI3A_SPI4CON;
  3876. SPI4CON : longWord;
  3877. SPI3ACONCLR : longWord;
  3878. SPI4CONCLR : longWord;
  3879. SPI3ACONSET : longWord;
  3880. SPI4CONSET : longWord;
  3881. SPI3ACONINV : longWord;
  3882. SPI4CONINV : longWord;
  3883. SPI3ASTATbits : TSPI3A_SPI3ASTAT;
  3884. SPI3ASTAT : longWord;
  3885. SPI4STATbits : TSPI3A_SPI4STAT;
  3886. SPI4STAT : longWord;
  3887. SPI3ASTATCLR : longWord;
  3888. SPI4STATCLR : longWord;
  3889. SPI3ASTATSET : longWord;
  3890. SPI4STATSET : longWord;
  3891. SPI3ASTATINV : longWord;
  3892. SPI4STATINV : longWord;
  3893. SPI3ABUF : longWord;
  3894. SPI4BUF : longWord;
  3895. SPI3ABRG : longWord;
  3896. SPI4BRG : longWord;
  3897. SPI3ABRGCLR : longWord;
  3898. SPI4BRGCLR : longWord;
  3899. SPI3ABRGSET : longWord;
  3900. SPI4BRGSET : longWord;
  3901. SPI3ABRGINV : longWord;
  3902. SPI4BRGINV : longWord;
  3903. end;
  3904. TUART1A_U1AMODE = record
  3905. private
  3906. function getABAUD : TBits_1; inline;
  3907. function getBRGH : TBits_1; inline;
  3908. function getIREN : TBits_1; inline;
  3909. function getLPBACK : TBits_1; inline;
  3910. function getON : TBits_1; inline;
  3911. function getPDSEL : TBits_2; inline;
  3912. function getPDSEL0 : TBits_1; inline;
  3913. function getPDSEL1 : TBits_1; inline;
  3914. function getRTSMD : TBits_1; inline;
  3915. function getRXINV : TBits_1; inline;
  3916. function getSIDL : TBits_1; inline;
  3917. function getSTSEL : TBits_1; inline;
  3918. function getUARTEN : TBits_1; inline;
  3919. function getUEN : TBits_2; inline;
  3920. function getUEN0 : TBits_1; inline;
  3921. function getUEN1 : TBits_1; inline;
  3922. function getUSIDL : TBits_1; inline;
  3923. function getWAKE : TBits_1; inline;
  3924. function getw : TBits_32; inline;
  3925. procedure setABAUD(thebits : TBits_1); inline;
  3926. procedure setBRGH(thebits : TBits_1); inline;
  3927. procedure setIREN(thebits : TBits_1); inline;
  3928. procedure setLPBACK(thebits : TBits_1); inline;
  3929. procedure setON(thebits : TBits_1); inline;
  3930. procedure setPDSEL(thebits : TBits_2); inline;
  3931. procedure setPDSEL0(thebits : TBits_1); inline;
  3932. procedure setPDSEL1(thebits : TBits_1); inline;
  3933. procedure setRTSMD(thebits : TBits_1); inline;
  3934. procedure setRXINV(thebits : TBits_1); inline;
  3935. procedure setSIDL(thebits : TBits_1); inline;
  3936. procedure setSTSEL(thebits : TBits_1); inline;
  3937. procedure setUARTEN(thebits : TBits_1); inline;
  3938. procedure setUEN(thebits : TBits_2); inline;
  3939. procedure setUEN0(thebits : TBits_1); inline;
  3940. procedure setUEN1(thebits : TBits_1); inline;
  3941. procedure setUSIDL(thebits : TBits_1); inline;
  3942. procedure setWAKE(thebits : TBits_1); inline;
  3943. procedure setw(thebits : TBits_32); inline;
  3944. public
  3945. procedure clearABAUD; inline;
  3946. procedure clearBRGH; inline;
  3947. procedure clearIREN; inline;
  3948. procedure clearLPBACK; inline;
  3949. procedure clearON; inline;
  3950. procedure clearPDSEL0; inline;
  3951. procedure clearPDSEL1; inline;
  3952. procedure clearRTSMD; inline;
  3953. procedure clearRXINV; inline;
  3954. procedure clearSIDL; inline;
  3955. procedure clearSTSEL; inline;
  3956. procedure clearUARTEN; inline;
  3957. procedure clearUEN0; inline;
  3958. procedure clearUEN1; inline;
  3959. procedure clearUSIDL; inline;
  3960. procedure clearWAKE; inline;
  3961. procedure setABAUD; inline;
  3962. procedure setBRGH; inline;
  3963. procedure setIREN; inline;
  3964. procedure setLPBACK; inline;
  3965. procedure setON; inline;
  3966. procedure setPDSEL0; inline;
  3967. procedure setPDSEL1; inline;
  3968. procedure setRTSMD; inline;
  3969. procedure setRXINV; inline;
  3970. procedure setSIDL; inline;
  3971. procedure setSTSEL; inline;
  3972. procedure setUARTEN; inline;
  3973. procedure setUEN0; inline;
  3974. procedure setUEN1; inline;
  3975. procedure setUSIDL; inline;
  3976. procedure setWAKE; inline;
  3977. property ABAUD : TBits_1 read getABAUD write setABAUD;
  3978. property BRGH : TBits_1 read getBRGH write setBRGH;
  3979. property IREN : TBits_1 read getIREN write setIREN;
  3980. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  3981. property ON : TBits_1 read getON write setON;
  3982. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  3983. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  3984. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  3985. property RTSMD : TBits_1 read getRTSMD write setRTSMD;
  3986. property RXINV : TBits_1 read getRXINV write setRXINV;
  3987. property SIDL : TBits_1 read getSIDL write setSIDL;
  3988. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  3989. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  3990. property UEN : TBits_2 read getUEN write setUEN;
  3991. property UEN0 : TBits_1 read getUEN0 write setUEN0;
  3992. property UEN1 : TBits_1 read getUEN1 write setUEN1;
  3993. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  3994. property WAKE : TBits_1 read getWAKE write setWAKE;
  3995. property w : TBits_32 read getw write setw;
  3996. end;
  3997. TUART1A_U1MODE = record
  3998. private
  3999. function getABAUD : TBits_1; inline;
  4000. function getBRGH : TBits_1; inline;
  4001. function getIREN : TBits_1; inline;
  4002. function getLPBACK : TBits_1; inline;
  4003. function getON : TBits_1; inline;
  4004. function getPDSEL : TBits_2; inline;
  4005. function getPDSEL0 : TBits_1; inline;
  4006. function getPDSEL1 : TBits_1; inline;
  4007. function getRTSMD : TBits_1; inline;
  4008. function getRXINV : TBits_1; inline;
  4009. function getSIDL : TBits_1; inline;
  4010. function getSTSEL : TBits_1; inline;
  4011. function getUARTEN : TBits_1; inline;
  4012. function getUEN : TBits_2; inline;
  4013. function getUEN0 : TBits_1; inline;
  4014. function getUEN1 : TBits_1; inline;
  4015. function getUSIDL : TBits_1; inline;
  4016. function getWAKE : TBits_1; inline;
  4017. function getw : TBits_32; inline;
  4018. procedure setABAUD(thebits : TBits_1); inline;
  4019. procedure setBRGH(thebits : TBits_1); inline;
  4020. procedure setIREN(thebits : TBits_1); inline;
  4021. procedure setLPBACK(thebits : TBits_1); inline;
  4022. procedure setON(thebits : TBits_1); inline;
  4023. procedure setPDSEL(thebits : TBits_2); inline;
  4024. procedure setPDSEL0(thebits : TBits_1); inline;
  4025. procedure setPDSEL1(thebits : TBits_1); inline;
  4026. procedure setRTSMD(thebits : TBits_1); inline;
  4027. procedure setRXINV(thebits : TBits_1); inline;
  4028. procedure setSIDL(thebits : TBits_1); inline;
  4029. procedure setSTSEL(thebits : TBits_1); inline;
  4030. procedure setUARTEN(thebits : TBits_1); inline;
  4031. procedure setUEN(thebits : TBits_2); inline;
  4032. procedure setUEN0(thebits : TBits_1); inline;
  4033. procedure setUEN1(thebits : TBits_1); inline;
  4034. procedure setUSIDL(thebits : TBits_1); inline;
  4035. procedure setWAKE(thebits : TBits_1); inline;
  4036. procedure setw(thebits : TBits_32); inline;
  4037. public
  4038. procedure clearABAUD; inline;
  4039. procedure clearBRGH; inline;
  4040. procedure clearIREN; inline;
  4041. procedure clearLPBACK; inline;
  4042. procedure clearON; inline;
  4043. procedure clearPDSEL0; inline;
  4044. procedure clearPDSEL1; inline;
  4045. procedure clearRTSMD; inline;
  4046. procedure clearRXINV; inline;
  4047. procedure clearSIDL; inline;
  4048. procedure clearSTSEL; inline;
  4049. procedure clearUARTEN; inline;
  4050. procedure clearUEN0; inline;
  4051. procedure clearUEN1; inline;
  4052. procedure clearUSIDL; inline;
  4053. procedure clearWAKE; inline;
  4054. procedure setABAUD; inline;
  4055. procedure setBRGH; inline;
  4056. procedure setIREN; inline;
  4057. procedure setLPBACK; inline;
  4058. procedure setON; inline;
  4059. procedure setPDSEL0; inline;
  4060. procedure setPDSEL1; inline;
  4061. procedure setRTSMD; inline;
  4062. procedure setRXINV; inline;
  4063. procedure setSIDL; inline;
  4064. procedure setSTSEL; inline;
  4065. procedure setUARTEN; inline;
  4066. procedure setUEN0; inline;
  4067. procedure setUEN1; inline;
  4068. procedure setUSIDL; inline;
  4069. procedure setWAKE; inline;
  4070. property ABAUD : TBits_1 read getABAUD write setABAUD;
  4071. property BRGH : TBits_1 read getBRGH write setBRGH;
  4072. property IREN : TBits_1 read getIREN write setIREN;
  4073. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  4074. property ON : TBits_1 read getON write setON;
  4075. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  4076. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  4077. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  4078. property RTSMD : TBits_1 read getRTSMD write setRTSMD;
  4079. property RXINV : TBits_1 read getRXINV write setRXINV;
  4080. property SIDL : TBits_1 read getSIDL write setSIDL;
  4081. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  4082. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  4083. property UEN : TBits_2 read getUEN write setUEN;
  4084. property UEN0 : TBits_1 read getUEN0 write setUEN0;
  4085. property UEN1 : TBits_1 read getUEN1 write setUEN1;
  4086. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  4087. property WAKE : TBits_1 read getWAKE write setWAKE;
  4088. property w : TBits_32 read getw write setw;
  4089. end;
  4090. TUART1A_U1ASTA = record
  4091. private
  4092. function getADDEN : TBits_1; inline;
  4093. function getADDR : TBits_8; inline;
  4094. function getADM_EN : TBits_1; inline;
  4095. function getFERR : TBits_1; inline;
  4096. function getOERR : TBits_1; inline;
  4097. function getPERR : TBits_1; inline;
  4098. function getRIDLE : TBits_1; inline;
  4099. function getTRMT : TBits_1; inline;
  4100. function getURXDA : TBits_1; inline;
  4101. function getURXEN : TBits_1; inline;
  4102. function getURXISEL : TBits_2; inline;
  4103. function getURXISEL0 : TBits_1; inline;
  4104. function getURXISEL1 : TBits_1; inline;
  4105. function getUTXBF : TBits_1; inline;
  4106. function getUTXBRK : TBits_1; inline;
  4107. function getUTXEN : TBits_1; inline;
  4108. function getUTXINV : TBits_1; inline;
  4109. function getUTXISEL : TBits_2; inline;
  4110. function getUTXISEL0 : TBits_1; inline;
  4111. function getUTXISEL1 : TBits_1; inline;
  4112. function getUTXSEL : TBits_2; inline;
  4113. function getw : TBits_32; inline;
  4114. procedure setADDEN(thebits : TBits_1); inline;
  4115. procedure setADDR(thebits : TBits_8); inline;
  4116. procedure setADM_EN(thebits : TBits_1); inline;
  4117. procedure setFERR(thebits : TBits_1); inline;
  4118. procedure setOERR(thebits : TBits_1); inline;
  4119. procedure setPERR(thebits : TBits_1); inline;
  4120. procedure setRIDLE(thebits : TBits_1); inline;
  4121. procedure setTRMT(thebits : TBits_1); inline;
  4122. procedure setURXDA(thebits : TBits_1); inline;
  4123. procedure setURXEN(thebits : TBits_1); inline;
  4124. procedure setURXISEL(thebits : TBits_2); inline;
  4125. procedure setURXISEL0(thebits : TBits_1); inline;
  4126. procedure setURXISEL1(thebits : TBits_1); inline;
  4127. procedure setUTXBF(thebits : TBits_1); inline;
  4128. procedure setUTXBRK(thebits : TBits_1); inline;
  4129. procedure setUTXEN(thebits : TBits_1); inline;
  4130. procedure setUTXINV(thebits : TBits_1); inline;
  4131. procedure setUTXISEL(thebits : TBits_2); inline;
  4132. procedure setUTXISEL0(thebits : TBits_1); inline;
  4133. procedure setUTXISEL1(thebits : TBits_1); inline;
  4134. procedure setUTXSEL(thebits : TBits_2); inline;
  4135. procedure setw(thebits : TBits_32); inline;
  4136. public
  4137. procedure clearADDEN; inline;
  4138. procedure clearADM_EN; inline;
  4139. procedure clearFERR; inline;
  4140. procedure clearOERR; inline;
  4141. procedure clearPERR; inline;
  4142. procedure clearRIDLE; inline;
  4143. procedure clearTRMT; inline;
  4144. procedure clearURXDA; inline;
  4145. procedure clearURXEN; inline;
  4146. procedure clearURXISEL0; inline;
  4147. procedure clearURXISEL1; inline;
  4148. procedure clearUTXBF; inline;
  4149. procedure clearUTXBRK; inline;
  4150. procedure clearUTXEN; inline;
  4151. procedure clearUTXINV; inline;
  4152. procedure clearUTXISEL0; inline;
  4153. procedure clearUTXISEL1; inline;
  4154. procedure setADDEN; inline;
  4155. procedure setADM_EN; inline;
  4156. procedure setFERR; inline;
  4157. procedure setOERR; inline;
  4158. procedure setPERR; inline;
  4159. procedure setRIDLE; inline;
  4160. procedure setTRMT; inline;
  4161. procedure setURXDA; inline;
  4162. procedure setURXEN; inline;
  4163. procedure setURXISEL0; inline;
  4164. procedure setURXISEL1; inline;
  4165. procedure setUTXBF; inline;
  4166. procedure setUTXBRK; inline;
  4167. procedure setUTXEN; inline;
  4168. procedure setUTXINV; inline;
  4169. procedure setUTXISEL0; inline;
  4170. procedure setUTXISEL1; inline;
  4171. property ADDEN : TBits_1 read getADDEN write setADDEN;
  4172. property ADDR : TBits_8 read getADDR write setADDR;
  4173. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  4174. property FERR : TBits_1 read getFERR write setFERR;
  4175. property OERR : TBits_1 read getOERR write setOERR;
  4176. property PERR : TBits_1 read getPERR write setPERR;
  4177. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  4178. property TRMT : TBits_1 read getTRMT write setTRMT;
  4179. property URXDA : TBits_1 read getURXDA write setURXDA;
  4180. property URXEN : TBits_1 read getURXEN write setURXEN;
  4181. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  4182. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  4183. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  4184. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  4185. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  4186. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  4187. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  4188. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  4189. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  4190. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  4191. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  4192. property w : TBits_32 read getw write setw;
  4193. end;
  4194. TUART1A_U1STA = record
  4195. private
  4196. function getADDEN : TBits_1; inline;
  4197. function getADDR : TBits_8; inline;
  4198. function getADM_EN : TBits_1; inline;
  4199. function getFERR : TBits_1; inline;
  4200. function getOERR : TBits_1; inline;
  4201. function getPERR : TBits_1; inline;
  4202. function getRIDLE : TBits_1; inline;
  4203. function getTRMT : TBits_1; inline;
  4204. function getURXDA : TBits_1; inline;
  4205. function getURXEN : TBits_1; inline;
  4206. function getURXISEL : TBits_2; inline;
  4207. function getURXISEL0 : TBits_1; inline;
  4208. function getURXISEL1 : TBits_1; inline;
  4209. function getUTXBF : TBits_1; inline;
  4210. function getUTXBRK : TBits_1; inline;
  4211. function getUTXEN : TBits_1; inline;
  4212. function getUTXINV : TBits_1; inline;
  4213. function getUTXISEL : TBits_2; inline;
  4214. function getUTXISEL0 : TBits_1; inline;
  4215. function getUTXISEL1 : TBits_1; inline;
  4216. function getUTXSEL : TBits_2; inline;
  4217. function getw : TBits_32; inline;
  4218. procedure setADDEN(thebits : TBits_1); inline;
  4219. procedure setADDR(thebits : TBits_8); inline;
  4220. procedure setADM_EN(thebits : TBits_1); inline;
  4221. procedure setFERR(thebits : TBits_1); inline;
  4222. procedure setOERR(thebits : TBits_1); inline;
  4223. procedure setPERR(thebits : TBits_1); inline;
  4224. procedure setRIDLE(thebits : TBits_1); inline;
  4225. procedure setTRMT(thebits : TBits_1); inline;
  4226. procedure setURXDA(thebits : TBits_1); inline;
  4227. procedure setURXEN(thebits : TBits_1); inline;
  4228. procedure setURXISEL(thebits : TBits_2); inline;
  4229. procedure setURXISEL0(thebits : TBits_1); inline;
  4230. procedure setURXISEL1(thebits : TBits_1); inline;
  4231. procedure setUTXBF(thebits : TBits_1); inline;
  4232. procedure setUTXBRK(thebits : TBits_1); inline;
  4233. procedure setUTXEN(thebits : TBits_1); inline;
  4234. procedure setUTXINV(thebits : TBits_1); inline;
  4235. procedure setUTXISEL(thebits : TBits_2); inline;
  4236. procedure setUTXISEL0(thebits : TBits_1); inline;
  4237. procedure setUTXISEL1(thebits : TBits_1); inline;
  4238. procedure setUTXSEL(thebits : TBits_2); inline;
  4239. procedure setw(thebits : TBits_32); inline;
  4240. public
  4241. procedure clearADDEN; inline;
  4242. procedure clearADM_EN; inline;
  4243. procedure clearFERR; inline;
  4244. procedure clearOERR; inline;
  4245. procedure clearPERR; inline;
  4246. procedure clearRIDLE; inline;
  4247. procedure clearTRMT; inline;
  4248. procedure clearURXDA; inline;
  4249. procedure clearURXEN; inline;
  4250. procedure clearURXISEL0; inline;
  4251. procedure clearURXISEL1; inline;
  4252. procedure clearUTXBF; inline;
  4253. procedure clearUTXBRK; inline;
  4254. procedure clearUTXEN; inline;
  4255. procedure clearUTXINV; inline;
  4256. procedure clearUTXISEL0; inline;
  4257. procedure clearUTXISEL1; inline;
  4258. procedure setADDEN; inline;
  4259. procedure setADM_EN; inline;
  4260. procedure setFERR; inline;
  4261. procedure setOERR; inline;
  4262. procedure setPERR; inline;
  4263. procedure setRIDLE; inline;
  4264. procedure setTRMT; inline;
  4265. procedure setURXDA; inline;
  4266. procedure setURXEN; inline;
  4267. procedure setURXISEL0; inline;
  4268. procedure setURXISEL1; inline;
  4269. procedure setUTXBF; inline;
  4270. procedure setUTXBRK; inline;
  4271. procedure setUTXEN; inline;
  4272. procedure setUTXINV; inline;
  4273. procedure setUTXISEL0; inline;
  4274. procedure setUTXISEL1; inline;
  4275. property ADDEN : TBits_1 read getADDEN write setADDEN;
  4276. property ADDR : TBits_8 read getADDR write setADDR;
  4277. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  4278. property FERR : TBits_1 read getFERR write setFERR;
  4279. property OERR : TBits_1 read getOERR write setOERR;
  4280. property PERR : TBits_1 read getPERR write setPERR;
  4281. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  4282. property TRMT : TBits_1 read getTRMT write setTRMT;
  4283. property URXDA : TBits_1 read getURXDA write setURXDA;
  4284. property URXEN : TBits_1 read getURXEN write setURXEN;
  4285. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  4286. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  4287. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  4288. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  4289. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  4290. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  4291. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  4292. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  4293. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  4294. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  4295. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  4296. property w : TBits_32 read getw write setw;
  4297. end;
  4298. type
  4299. TUART1ARegisters = record
  4300. U1AMODEbits : TUART1A_U1AMODE;
  4301. U1AMODE : longWord;
  4302. U1MODEbits : TUART1A_U1MODE;
  4303. U1MODE : longWord;
  4304. U1AMODECLR : longWord;
  4305. U1MODECLR : longWord;
  4306. U1AMODESET : longWord;
  4307. U1MODESET : longWord;
  4308. U1AMODEINV : longWord;
  4309. U1MODEINV : longWord;
  4310. U1ASTAbits : TUART1A_U1ASTA;
  4311. U1ASTA : longWord;
  4312. U1STAbits : TUART1A_U1STA;
  4313. U1STA : longWord;
  4314. U1ASTACLR : longWord;
  4315. U1STACLR : longWord;
  4316. U1ASTASET : longWord;
  4317. U1STASET : longWord;
  4318. U1ASTAINV : longWord;
  4319. U1STAINV : longWord;
  4320. U1ATXREG : longWord;
  4321. U1TXREG : longWord;
  4322. U1ARXREG : longWord;
  4323. U1RXREG : longWord;
  4324. U1ABRG : longWord;
  4325. U1BRG : longWord;
  4326. U1ABRGCLR : longWord;
  4327. U1BRGCLR : longWord;
  4328. U1ABRGSET : longWord;
  4329. U1BRGSET : longWord;
  4330. U1ABRGINV : longWord;
  4331. U1BRGINV : longWord;
  4332. end;
  4333. TUART4_U1BMODE = record
  4334. private
  4335. function getABAUD : TBits_1; inline;
  4336. function getBRGH : TBits_1; inline;
  4337. function getIREN : TBits_1; inline;
  4338. function getLPBACK : TBits_1; inline;
  4339. function getON : TBits_1; inline;
  4340. function getPDSEL : TBits_2; inline;
  4341. function getPDSEL0 : TBits_1; inline;
  4342. function getPDSEL1 : TBits_1; inline;
  4343. function getRXINV : TBits_1; inline;
  4344. function getSIDL : TBits_1; inline;
  4345. function getSTSEL : TBits_1; inline;
  4346. function getUARTEN : TBits_1; inline;
  4347. function getUSIDL : TBits_1; inline;
  4348. function getWAKE : TBits_1; inline;
  4349. function getw : TBits_32; inline;
  4350. procedure setABAUD(thebits : TBits_1); inline;
  4351. procedure setBRGH(thebits : TBits_1); inline;
  4352. procedure setIREN(thebits : TBits_1); inline;
  4353. procedure setLPBACK(thebits : TBits_1); inline;
  4354. procedure setON(thebits : TBits_1); inline;
  4355. procedure setPDSEL(thebits : TBits_2); inline;
  4356. procedure setPDSEL0(thebits : TBits_1); inline;
  4357. procedure setPDSEL1(thebits : TBits_1); inline;
  4358. procedure setRXINV(thebits : TBits_1); inline;
  4359. procedure setSIDL(thebits : TBits_1); inline;
  4360. procedure setSTSEL(thebits : TBits_1); inline;
  4361. procedure setUARTEN(thebits : TBits_1); inline;
  4362. procedure setUSIDL(thebits : TBits_1); inline;
  4363. procedure setWAKE(thebits : TBits_1); inline;
  4364. procedure setw(thebits : TBits_32); inline;
  4365. public
  4366. procedure clearABAUD; inline;
  4367. procedure clearBRGH; inline;
  4368. procedure clearIREN; inline;
  4369. procedure clearLPBACK; inline;
  4370. procedure clearON; inline;
  4371. procedure clearPDSEL0; inline;
  4372. procedure clearPDSEL1; inline;
  4373. procedure clearRXINV; inline;
  4374. procedure clearSIDL; inline;
  4375. procedure clearSTSEL; inline;
  4376. procedure clearUARTEN; inline;
  4377. procedure clearUSIDL; inline;
  4378. procedure clearWAKE; inline;
  4379. procedure setABAUD; inline;
  4380. procedure setBRGH; inline;
  4381. procedure setIREN; inline;
  4382. procedure setLPBACK; inline;
  4383. procedure setON; inline;
  4384. procedure setPDSEL0; inline;
  4385. procedure setPDSEL1; inline;
  4386. procedure setRXINV; inline;
  4387. procedure setSIDL; inline;
  4388. procedure setSTSEL; inline;
  4389. procedure setUARTEN; inline;
  4390. procedure setUSIDL; inline;
  4391. procedure setWAKE; inline;
  4392. property ABAUD : TBits_1 read getABAUD write setABAUD;
  4393. property BRGH : TBits_1 read getBRGH write setBRGH;
  4394. property IREN : TBits_1 read getIREN write setIREN;
  4395. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  4396. property ON : TBits_1 read getON write setON;
  4397. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  4398. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  4399. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  4400. property RXINV : TBits_1 read getRXINV write setRXINV;
  4401. property SIDL : TBits_1 read getSIDL write setSIDL;
  4402. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  4403. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  4404. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  4405. property WAKE : TBits_1 read getWAKE write setWAKE;
  4406. property w : TBits_32 read getw write setw;
  4407. end;
  4408. TUART4_U4MODE = record
  4409. private
  4410. function getABAUD : TBits_1; inline;
  4411. function getBRGH : TBits_1; inline;
  4412. function getIREN : TBits_1; inline;
  4413. function getLPBACK : TBits_1; inline;
  4414. function getON : TBits_1; inline;
  4415. function getPDSEL : TBits_2; inline;
  4416. function getPDSEL0 : TBits_1; inline;
  4417. function getPDSEL1 : TBits_1; inline;
  4418. function getRXINV : TBits_1; inline;
  4419. function getSIDL : TBits_1; inline;
  4420. function getSTSEL : TBits_1; inline;
  4421. function getUARTEN : TBits_1; inline;
  4422. function getUSIDL : TBits_1; inline;
  4423. function getWAKE : TBits_1; inline;
  4424. function getw : TBits_32; inline;
  4425. procedure setABAUD(thebits : TBits_1); inline;
  4426. procedure setBRGH(thebits : TBits_1); inline;
  4427. procedure setIREN(thebits : TBits_1); inline;
  4428. procedure setLPBACK(thebits : TBits_1); inline;
  4429. procedure setON(thebits : TBits_1); inline;
  4430. procedure setPDSEL(thebits : TBits_2); inline;
  4431. procedure setPDSEL0(thebits : TBits_1); inline;
  4432. procedure setPDSEL1(thebits : TBits_1); inline;
  4433. procedure setRXINV(thebits : TBits_1); inline;
  4434. procedure setSIDL(thebits : TBits_1); inline;
  4435. procedure setSTSEL(thebits : TBits_1); inline;
  4436. procedure setUARTEN(thebits : TBits_1); inline;
  4437. procedure setUSIDL(thebits : TBits_1); inline;
  4438. procedure setWAKE(thebits : TBits_1); inline;
  4439. procedure setw(thebits : TBits_32); inline;
  4440. public
  4441. procedure clearABAUD; inline;
  4442. procedure clearBRGH; inline;
  4443. procedure clearIREN; inline;
  4444. procedure clearLPBACK; inline;
  4445. procedure clearON; inline;
  4446. procedure clearPDSEL0; inline;
  4447. procedure clearPDSEL1; inline;
  4448. procedure clearRXINV; inline;
  4449. procedure clearSIDL; inline;
  4450. procedure clearSTSEL; inline;
  4451. procedure clearUARTEN; inline;
  4452. procedure clearUSIDL; inline;
  4453. procedure clearWAKE; inline;
  4454. procedure setABAUD; inline;
  4455. procedure setBRGH; inline;
  4456. procedure setIREN; inline;
  4457. procedure setLPBACK; inline;
  4458. procedure setON; inline;
  4459. procedure setPDSEL0; inline;
  4460. procedure setPDSEL1; inline;
  4461. procedure setRXINV; inline;
  4462. procedure setSIDL; inline;
  4463. procedure setSTSEL; inline;
  4464. procedure setUARTEN; inline;
  4465. procedure setUSIDL; inline;
  4466. procedure setWAKE; inline;
  4467. property ABAUD : TBits_1 read getABAUD write setABAUD;
  4468. property BRGH : TBits_1 read getBRGH write setBRGH;
  4469. property IREN : TBits_1 read getIREN write setIREN;
  4470. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  4471. property ON : TBits_1 read getON write setON;
  4472. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  4473. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  4474. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  4475. property RXINV : TBits_1 read getRXINV write setRXINV;
  4476. property SIDL : TBits_1 read getSIDL write setSIDL;
  4477. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  4478. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  4479. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  4480. property WAKE : TBits_1 read getWAKE write setWAKE;
  4481. property w : TBits_32 read getw write setw;
  4482. end;
  4483. TUART4_U1BSTA = record
  4484. private
  4485. function getADDEN : TBits_1; inline;
  4486. function getADDR : TBits_8; inline;
  4487. function getADM_EN : TBits_1; inline;
  4488. function getFERR : TBits_1; inline;
  4489. function getOERR : TBits_1; inline;
  4490. function getPERR : TBits_1; inline;
  4491. function getRIDLE : TBits_1; inline;
  4492. function getTRMT : TBits_1; inline;
  4493. function getURXDA : TBits_1; inline;
  4494. function getURXEN : TBits_1; inline;
  4495. function getURXISEL : TBits_2; inline;
  4496. function getURXISEL0 : TBits_1; inline;
  4497. function getURXISEL1 : TBits_1; inline;
  4498. function getUTXBF : TBits_1; inline;
  4499. function getUTXBRK : TBits_1; inline;
  4500. function getUTXEN : TBits_1; inline;
  4501. function getUTXINV : TBits_1; inline;
  4502. function getUTXISEL : TBits_2; inline;
  4503. function getUTXISEL0 : TBits_1; inline;
  4504. function getUTXISEL1 : TBits_1; inline;
  4505. function getUTXSEL : TBits_2; inline;
  4506. function getw : TBits_32; inline;
  4507. procedure setADDEN(thebits : TBits_1); inline;
  4508. procedure setADDR(thebits : TBits_8); inline;
  4509. procedure setADM_EN(thebits : TBits_1); inline;
  4510. procedure setFERR(thebits : TBits_1); inline;
  4511. procedure setOERR(thebits : TBits_1); inline;
  4512. procedure setPERR(thebits : TBits_1); inline;
  4513. procedure setRIDLE(thebits : TBits_1); inline;
  4514. procedure setTRMT(thebits : TBits_1); inline;
  4515. procedure setURXDA(thebits : TBits_1); inline;
  4516. procedure setURXEN(thebits : TBits_1); inline;
  4517. procedure setURXISEL(thebits : TBits_2); inline;
  4518. procedure setURXISEL0(thebits : TBits_1); inline;
  4519. procedure setURXISEL1(thebits : TBits_1); inline;
  4520. procedure setUTXBF(thebits : TBits_1); inline;
  4521. procedure setUTXBRK(thebits : TBits_1); inline;
  4522. procedure setUTXEN(thebits : TBits_1); inline;
  4523. procedure setUTXINV(thebits : TBits_1); inline;
  4524. procedure setUTXISEL(thebits : TBits_2); inline;
  4525. procedure setUTXISEL0(thebits : TBits_1); inline;
  4526. procedure setUTXISEL1(thebits : TBits_1); inline;
  4527. procedure setUTXSEL(thebits : TBits_2); inline;
  4528. procedure setw(thebits : TBits_32); inline;
  4529. public
  4530. procedure clearADDEN; inline;
  4531. procedure clearADM_EN; inline;
  4532. procedure clearFERR; inline;
  4533. procedure clearOERR; inline;
  4534. procedure clearPERR; inline;
  4535. procedure clearRIDLE; inline;
  4536. procedure clearTRMT; inline;
  4537. procedure clearURXDA; inline;
  4538. procedure clearURXEN; inline;
  4539. procedure clearURXISEL0; inline;
  4540. procedure clearURXISEL1; inline;
  4541. procedure clearUTXBF; inline;
  4542. procedure clearUTXBRK; inline;
  4543. procedure clearUTXEN; inline;
  4544. procedure clearUTXINV; inline;
  4545. procedure clearUTXISEL0; inline;
  4546. procedure clearUTXISEL1; inline;
  4547. procedure setADDEN; inline;
  4548. procedure setADM_EN; inline;
  4549. procedure setFERR; inline;
  4550. procedure setOERR; inline;
  4551. procedure setPERR; inline;
  4552. procedure setRIDLE; inline;
  4553. procedure setTRMT; inline;
  4554. procedure setURXDA; inline;
  4555. procedure setURXEN; inline;
  4556. procedure setURXISEL0; inline;
  4557. procedure setURXISEL1; inline;
  4558. procedure setUTXBF; inline;
  4559. procedure setUTXBRK; inline;
  4560. procedure setUTXEN; inline;
  4561. procedure setUTXINV; inline;
  4562. procedure setUTXISEL0; inline;
  4563. procedure setUTXISEL1; inline;
  4564. property ADDEN : TBits_1 read getADDEN write setADDEN;
  4565. property ADDR : TBits_8 read getADDR write setADDR;
  4566. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  4567. property FERR : TBits_1 read getFERR write setFERR;
  4568. property OERR : TBits_1 read getOERR write setOERR;
  4569. property PERR : TBits_1 read getPERR write setPERR;
  4570. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  4571. property TRMT : TBits_1 read getTRMT write setTRMT;
  4572. property URXDA : TBits_1 read getURXDA write setURXDA;
  4573. property URXEN : TBits_1 read getURXEN write setURXEN;
  4574. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  4575. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  4576. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  4577. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  4578. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  4579. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  4580. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  4581. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  4582. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  4583. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  4584. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  4585. property w : TBits_32 read getw write setw;
  4586. end;
  4587. TUART4_U4STA = record
  4588. private
  4589. function getADDEN : TBits_1; inline;
  4590. function getADDR : TBits_8; inline;
  4591. function getADM_EN : TBits_1; inline;
  4592. function getFERR : TBits_1; inline;
  4593. function getOERR : TBits_1; inline;
  4594. function getPERR : TBits_1; inline;
  4595. function getRIDLE : TBits_1; inline;
  4596. function getTRMT : TBits_1; inline;
  4597. function getURXDA : TBits_1; inline;
  4598. function getURXEN : TBits_1; inline;
  4599. function getURXISEL : TBits_2; inline;
  4600. function getURXISEL0 : TBits_1; inline;
  4601. function getURXISEL1 : TBits_1; inline;
  4602. function getUTXBF : TBits_1; inline;
  4603. function getUTXBRK : TBits_1; inline;
  4604. function getUTXEN : TBits_1; inline;
  4605. function getUTXINV : TBits_1; inline;
  4606. function getUTXISEL : TBits_2; inline;
  4607. function getUTXISEL0 : TBits_1; inline;
  4608. function getUTXISEL1 : TBits_1; inline;
  4609. function getUTXSEL : TBits_2; inline;
  4610. function getw : TBits_32; inline;
  4611. procedure setADDEN(thebits : TBits_1); inline;
  4612. procedure setADDR(thebits : TBits_8); inline;
  4613. procedure setADM_EN(thebits : TBits_1); inline;
  4614. procedure setFERR(thebits : TBits_1); inline;
  4615. procedure setOERR(thebits : TBits_1); inline;
  4616. procedure setPERR(thebits : TBits_1); inline;
  4617. procedure setRIDLE(thebits : TBits_1); inline;
  4618. procedure setTRMT(thebits : TBits_1); inline;
  4619. procedure setURXDA(thebits : TBits_1); inline;
  4620. procedure setURXEN(thebits : TBits_1); inline;
  4621. procedure setURXISEL(thebits : TBits_2); inline;
  4622. procedure setURXISEL0(thebits : TBits_1); inline;
  4623. procedure setURXISEL1(thebits : TBits_1); inline;
  4624. procedure setUTXBF(thebits : TBits_1); inline;
  4625. procedure setUTXBRK(thebits : TBits_1); inline;
  4626. procedure setUTXEN(thebits : TBits_1); inline;
  4627. procedure setUTXINV(thebits : TBits_1); inline;
  4628. procedure setUTXISEL(thebits : TBits_2); inline;
  4629. procedure setUTXISEL0(thebits : TBits_1); inline;
  4630. procedure setUTXISEL1(thebits : TBits_1); inline;
  4631. procedure setUTXSEL(thebits : TBits_2); inline;
  4632. procedure setw(thebits : TBits_32); inline;
  4633. public
  4634. procedure clearADDEN; inline;
  4635. procedure clearADM_EN; inline;
  4636. procedure clearFERR; inline;
  4637. procedure clearOERR; inline;
  4638. procedure clearPERR; inline;
  4639. procedure clearRIDLE; inline;
  4640. procedure clearTRMT; inline;
  4641. procedure clearURXDA; inline;
  4642. procedure clearURXEN; inline;
  4643. procedure clearURXISEL0; inline;
  4644. procedure clearURXISEL1; inline;
  4645. procedure clearUTXBF; inline;
  4646. procedure clearUTXBRK; inline;
  4647. procedure clearUTXEN; inline;
  4648. procedure clearUTXINV; inline;
  4649. procedure clearUTXISEL0; inline;
  4650. procedure clearUTXISEL1; inline;
  4651. procedure setADDEN; inline;
  4652. procedure setADM_EN; inline;
  4653. procedure setFERR; inline;
  4654. procedure setOERR; inline;
  4655. procedure setPERR; inline;
  4656. procedure setRIDLE; inline;
  4657. procedure setTRMT; inline;
  4658. procedure setURXDA; inline;
  4659. procedure setURXEN; inline;
  4660. procedure setURXISEL0; inline;
  4661. procedure setURXISEL1; inline;
  4662. procedure setUTXBF; inline;
  4663. procedure setUTXBRK; inline;
  4664. procedure setUTXEN; inline;
  4665. procedure setUTXINV; inline;
  4666. procedure setUTXISEL0; inline;
  4667. procedure setUTXISEL1; inline;
  4668. property ADDEN : TBits_1 read getADDEN write setADDEN;
  4669. property ADDR : TBits_8 read getADDR write setADDR;
  4670. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  4671. property FERR : TBits_1 read getFERR write setFERR;
  4672. property OERR : TBits_1 read getOERR write setOERR;
  4673. property PERR : TBits_1 read getPERR write setPERR;
  4674. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  4675. property TRMT : TBits_1 read getTRMT write setTRMT;
  4676. property URXDA : TBits_1 read getURXDA write setURXDA;
  4677. property URXEN : TBits_1 read getURXEN write setURXEN;
  4678. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  4679. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  4680. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  4681. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  4682. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  4683. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  4684. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  4685. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  4686. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  4687. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  4688. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  4689. property w : TBits_32 read getw write setw;
  4690. end;
  4691. type
  4692. TUART4Registers = record
  4693. U1BMODEbits : TUART4_U1BMODE;
  4694. U1BMODE : longWord;
  4695. U4MODEbits : TUART4_U4MODE;
  4696. U4MODE : longWord;
  4697. U1BMODECLR : longWord;
  4698. U4MODECLR : longWord;
  4699. U1BMODESET : longWord;
  4700. U4MODESET : longWord;
  4701. U1BMODEINV : longWord;
  4702. U4MODEINV : longWord;
  4703. U1BSTAbits : TUART4_U1BSTA;
  4704. U1BSTA : longWord;
  4705. U4STAbits : TUART4_U4STA;
  4706. U4STA : longWord;
  4707. U1BSTACLR : longWord;
  4708. U4STACLR : longWord;
  4709. U1BSTASET : longWord;
  4710. U4STASET : longWord;
  4711. U1BSTAINV : longWord;
  4712. U4STAINV : longWord;
  4713. U1BTXREG : longWord;
  4714. U4TXREG : longWord;
  4715. U1BRXREG : longWord;
  4716. U4RXREG : longWord;
  4717. U1BBRG : longWord;
  4718. U4BRG : longWord;
  4719. U1BBRGCLR : longWord;
  4720. U4BRGCLR : longWord;
  4721. U1BBRGSET : longWord;
  4722. U4BRGSET : longWord;
  4723. U1BBRGINV : longWord;
  4724. U4BRGINV : longWord;
  4725. end;
  4726. TUART2A_U2AMODE = record
  4727. private
  4728. function getABAUD : TBits_1; inline;
  4729. function getBRGH : TBits_1; inline;
  4730. function getIREN : TBits_1; inline;
  4731. function getLPBACK : TBits_1; inline;
  4732. function getON : TBits_1; inline;
  4733. function getPDSEL : TBits_2; inline;
  4734. function getPDSEL0 : TBits_1; inline;
  4735. function getPDSEL1 : TBits_1; inline;
  4736. function getRTSMD : TBits_1; inline;
  4737. function getRXINV : TBits_1; inline;
  4738. function getSIDL : TBits_1; inline;
  4739. function getSTSEL : TBits_1; inline;
  4740. function getUARTEN : TBits_1; inline;
  4741. function getUEN : TBits_2; inline;
  4742. function getUEN0 : TBits_1; inline;
  4743. function getUEN1 : TBits_1; inline;
  4744. function getUSIDL : TBits_1; inline;
  4745. function getWAKE : TBits_1; inline;
  4746. function getw : TBits_32; inline;
  4747. procedure setABAUD(thebits : TBits_1); inline;
  4748. procedure setBRGH(thebits : TBits_1); inline;
  4749. procedure setIREN(thebits : TBits_1); inline;
  4750. procedure setLPBACK(thebits : TBits_1); inline;
  4751. procedure setON(thebits : TBits_1); inline;
  4752. procedure setPDSEL(thebits : TBits_2); inline;
  4753. procedure setPDSEL0(thebits : TBits_1); inline;
  4754. procedure setPDSEL1(thebits : TBits_1); inline;
  4755. procedure setRTSMD(thebits : TBits_1); inline;
  4756. procedure setRXINV(thebits : TBits_1); inline;
  4757. procedure setSIDL(thebits : TBits_1); inline;
  4758. procedure setSTSEL(thebits : TBits_1); inline;
  4759. procedure setUARTEN(thebits : TBits_1); inline;
  4760. procedure setUEN(thebits : TBits_2); inline;
  4761. procedure setUEN0(thebits : TBits_1); inline;
  4762. procedure setUEN1(thebits : TBits_1); inline;
  4763. procedure setUSIDL(thebits : TBits_1); inline;
  4764. procedure setWAKE(thebits : TBits_1); inline;
  4765. procedure setw(thebits : TBits_32); inline;
  4766. public
  4767. procedure clearABAUD; inline;
  4768. procedure clearBRGH; inline;
  4769. procedure clearIREN; inline;
  4770. procedure clearLPBACK; inline;
  4771. procedure clearON; inline;
  4772. procedure clearPDSEL0; inline;
  4773. procedure clearPDSEL1; inline;
  4774. procedure clearRTSMD; inline;
  4775. procedure clearRXINV; inline;
  4776. procedure clearSIDL; inline;
  4777. procedure clearSTSEL; inline;
  4778. procedure clearUARTEN; inline;
  4779. procedure clearUEN0; inline;
  4780. procedure clearUEN1; inline;
  4781. procedure clearUSIDL; inline;
  4782. procedure clearWAKE; inline;
  4783. procedure setABAUD; inline;
  4784. procedure setBRGH; inline;
  4785. procedure setIREN; inline;
  4786. procedure setLPBACK; inline;
  4787. procedure setON; inline;
  4788. procedure setPDSEL0; inline;
  4789. procedure setPDSEL1; inline;
  4790. procedure setRTSMD; inline;
  4791. procedure setRXINV; inline;
  4792. procedure setSIDL; inline;
  4793. procedure setSTSEL; inline;
  4794. procedure setUARTEN; inline;
  4795. procedure setUEN0; inline;
  4796. procedure setUEN1; inline;
  4797. procedure setUSIDL; inline;
  4798. procedure setWAKE; inline;
  4799. property ABAUD : TBits_1 read getABAUD write setABAUD;
  4800. property BRGH : TBits_1 read getBRGH write setBRGH;
  4801. property IREN : TBits_1 read getIREN write setIREN;
  4802. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  4803. property ON : TBits_1 read getON write setON;
  4804. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  4805. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  4806. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  4807. property RTSMD : TBits_1 read getRTSMD write setRTSMD;
  4808. property RXINV : TBits_1 read getRXINV write setRXINV;
  4809. property SIDL : TBits_1 read getSIDL write setSIDL;
  4810. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  4811. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  4812. property UEN : TBits_2 read getUEN write setUEN;
  4813. property UEN0 : TBits_1 read getUEN0 write setUEN0;
  4814. property UEN1 : TBits_1 read getUEN1 write setUEN1;
  4815. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  4816. property WAKE : TBits_1 read getWAKE write setWAKE;
  4817. property w : TBits_32 read getw write setw;
  4818. end;
  4819. TUART2A_U3MODE = record
  4820. private
  4821. function getABAUD : TBits_1; inline;
  4822. function getBRGH : TBits_1; inline;
  4823. function getIREN : TBits_1; inline;
  4824. function getLPBACK : TBits_1; inline;
  4825. function getON : TBits_1; inline;
  4826. function getPDSEL : TBits_2; inline;
  4827. function getPDSEL0 : TBits_1; inline;
  4828. function getPDSEL1 : TBits_1; inline;
  4829. function getRTSMD : TBits_1; inline;
  4830. function getRXINV : TBits_1; inline;
  4831. function getSIDL : TBits_1; inline;
  4832. function getSTSEL : TBits_1; inline;
  4833. function getUARTEN : TBits_1; inline;
  4834. function getUEN : TBits_2; inline;
  4835. function getUEN0 : TBits_1; inline;
  4836. function getUEN1 : TBits_1; inline;
  4837. function getUSIDL : TBits_1; inline;
  4838. function getWAKE : TBits_1; inline;
  4839. function getw : TBits_32; inline;
  4840. procedure setABAUD(thebits : TBits_1); inline;
  4841. procedure setBRGH(thebits : TBits_1); inline;
  4842. procedure setIREN(thebits : TBits_1); inline;
  4843. procedure setLPBACK(thebits : TBits_1); inline;
  4844. procedure setON(thebits : TBits_1); inline;
  4845. procedure setPDSEL(thebits : TBits_2); inline;
  4846. procedure setPDSEL0(thebits : TBits_1); inline;
  4847. procedure setPDSEL1(thebits : TBits_1); inline;
  4848. procedure setRTSMD(thebits : TBits_1); inline;
  4849. procedure setRXINV(thebits : TBits_1); inline;
  4850. procedure setSIDL(thebits : TBits_1); inline;
  4851. procedure setSTSEL(thebits : TBits_1); inline;
  4852. procedure setUARTEN(thebits : TBits_1); inline;
  4853. procedure setUEN(thebits : TBits_2); inline;
  4854. procedure setUEN0(thebits : TBits_1); inline;
  4855. procedure setUEN1(thebits : TBits_1); inline;
  4856. procedure setUSIDL(thebits : TBits_1); inline;
  4857. procedure setWAKE(thebits : TBits_1); inline;
  4858. procedure setw(thebits : TBits_32); inline;
  4859. public
  4860. procedure clearABAUD; inline;
  4861. procedure clearBRGH; inline;
  4862. procedure clearIREN; inline;
  4863. procedure clearLPBACK; inline;
  4864. procedure clearON; inline;
  4865. procedure clearPDSEL0; inline;
  4866. procedure clearPDSEL1; inline;
  4867. procedure clearRTSMD; inline;
  4868. procedure clearRXINV; inline;
  4869. procedure clearSIDL; inline;
  4870. procedure clearSTSEL; inline;
  4871. procedure clearUARTEN; inline;
  4872. procedure clearUEN0; inline;
  4873. procedure clearUEN1; inline;
  4874. procedure clearUSIDL; inline;
  4875. procedure clearWAKE; inline;
  4876. procedure setABAUD; inline;
  4877. procedure setBRGH; inline;
  4878. procedure setIREN; inline;
  4879. procedure setLPBACK; inline;
  4880. procedure setON; inline;
  4881. procedure setPDSEL0; inline;
  4882. procedure setPDSEL1; inline;
  4883. procedure setRTSMD; inline;
  4884. procedure setRXINV; inline;
  4885. procedure setSIDL; inline;
  4886. procedure setSTSEL; inline;
  4887. procedure setUARTEN; inline;
  4888. procedure setUEN0; inline;
  4889. procedure setUEN1; inline;
  4890. procedure setUSIDL; inline;
  4891. procedure setWAKE; inline;
  4892. property ABAUD : TBits_1 read getABAUD write setABAUD;
  4893. property BRGH : TBits_1 read getBRGH write setBRGH;
  4894. property IREN : TBits_1 read getIREN write setIREN;
  4895. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  4896. property ON : TBits_1 read getON write setON;
  4897. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  4898. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  4899. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  4900. property RTSMD : TBits_1 read getRTSMD write setRTSMD;
  4901. property RXINV : TBits_1 read getRXINV write setRXINV;
  4902. property SIDL : TBits_1 read getSIDL write setSIDL;
  4903. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  4904. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  4905. property UEN : TBits_2 read getUEN write setUEN;
  4906. property UEN0 : TBits_1 read getUEN0 write setUEN0;
  4907. property UEN1 : TBits_1 read getUEN1 write setUEN1;
  4908. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  4909. property WAKE : TBits_1 read getWAKE write setWAKE;
  4910. property w : TBits_32 read getw write setw;
  4911. end;
  4912. TUART2A_U2ASTA = record
  4913. private
  4914. function getADDEN : TBits_1; inline;
  4915. function getADDR : TBits_8; inline;
  4916. function getADM_EN : TBits_1; inline;
  4917. function getFERR : TBits_1; inline;
  4918. function getOERR : TBits_1; inline;
  4919. function getPERR : TBits_1; inline;
  4920. function getRIDLE : TBits_1; inline;
  4921. function getTRMT : TBits_1; inline;
  4922. function getURXDA : TBits_1; inline;
  4923. function getURXEN : TBits_1; inline;
  4924. function getURXISEL : TBits_2; inline;
  4925. function getURXISEL0 : TBits_1; inline;
  4926. function getURXISEL1 : TBits_1; inline;
  4927. function getUTXBF : TBits_1; inline;
  4928. function getUTXBRK : TBits_1; inline;
  4929. function getUTXEN : TBits_1; inline;
  4930. function getUTXINV : TBits_1; inline;
  4931. function getUTXISEL : TBits_2; inline;
  4932. function getUTXISEL0 : TBits_1; inline;
  4933. function getUTXISEL1 : TBits_1; inline;
  4934. function getUTXSEL : TBits_2; inline;
  4935. function getw : TBits_32; inline;
  4936. procedure setADDEN(thebits : TBits_1); inline;
  4937. procedure setADDR(thebits : TBits_8); inline;
  4938. procedure setADM_EN(thebits : TBits_1); inline;
  4939. procedure setFERR(thebits : TBits_1); inline;
  4940. procedure setOERR(thebits : TBits_1); inline;
  4941. procedure setPERR(thebits : TBits_1); inline;
  4942. procedure setRIDLE(thebits : TBits_1); inline;
  4943. procedure setTRMT(thebits : TBits_1); inline;
  4944. procedure setURXDA(thebits : TBits_1); inline;
  4945. procedure setURXEN(thebits : TBits_1); inline;
  4946. procedure setURXISEL(thebits : TBits_2); inline;
  4947. procedure setURXISEL0(thebits : TBits_1); inline;
  4948. procedure setURXISEL1(thebits : TBits_1); inline;
  4949. procedure setUTXBF(thebits : TBits_1); inline;
  4950. procedure setUTXBRK(thebits : TBits_1); inline;
  4951. procedure setUTXEN(thebits : TBits_1); inline;
  4952. procedure setUTXINV(thebits : TBits_1); inline;
  4953. procedure setUTXISEL(thebits : TBits_2); inline;
  4954. procedure setUTXISEL0(thebits : TBits_1); inline;
  4955. procedure setUTXISEL1(thebits : TBits_1); inline;
  4956. procedure setUTXSEL(thebits : TBits_2); inline;
  4957. procedure setw(thebits : TBits_32); inline;
  4958. public
  4959. procedure clearADDEN; inline;
  4960. procedure clearADM_EN; inline;
  4961. procedure clearFERR; inline;
  4962. procedure clearOERR; inline;
  4963. procedure clearPERR; inline;
  4964. procedure clearRIDLE; inline;
  4965. procedure clearTRMT; inline;
  4966. procedure clearURXDA; inline;
  4967. procedure clearURXEN; inline;
  4968. procedure clearURXISEL0; inline;
  4969. procedure clearURXISEL1; inline;
  4970. procedure clearUTXBF; inline;
  4971. procedure clearUTXBRK; inline;
  4972. procedure clearUTXEN; inline;
  4973. procedure clearUTXINV; inline;
  4974. procedure clearUTXISEL0; inline;
  4975. procedure clearUTXISEL1; inline;
  4976. procedure setADDEN; inline;
  4977. procedure setADM_EN; inline;
  4978. procedure setFERR; inline;
  4979. procedure setOERR; inline;
  4980. procedure setPERR; inline;
  4981. procedure setRIDLE; inline;
  4982. procedure setTRMT; inline;
  4983. procedure setURXDA; inline;
  4984. procedure setURXEN; inline;
  4985. procedure setURXISEL0; inline;
  4986. procedure setURXISEL1; inline;
  4987. procedure setUTXBF; inline;
  4988. procedure setUTXBRK; inline;
  4989. procedure setUTXEN; inline;
  4990. procedure setUTXINV; inline;
  4991. procedure setUTXISEL0; inline;
  4992. procedure setUTXISEL1; inline;
  4993. property ADDEN : TBits_1 read getADDEN write setADDEN;
  4994. property ADDR : TBits_8 read getADDR write setADDR;
  4995. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  4996. property FERR : TBits_1 read getFERR write setFERR;
  4997. property OERR : TBits_1 read getOERR write setOERR;
  4998. property PERR : TBits_1 read getPERR write setPERR;
  4999. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  5000. property TRMT : TBits_1 read getTRMT write setTRMT;
  5001. property URXDA : TBits_1 read getURXDA write setURXDA;
  5002. property URXEN : TBits_1 read getURXEN write setURXEN;
  5003. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  5004. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  5005. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  5006. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  5007. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  5008. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  5009. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  5010. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  5011. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  5012. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  5013. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  5014. property w : TBits_32 read getw write setw;
  5015. end;
  5016. TUART2A_U3STA = record
  5017. private
  5018. function getADDEN : TBits_1; inline;
  5019. function getADDR : TBits_8; inline;
  5020. function getADM_EN : TBits_1; inline;
  5021. function getFERR : TBits_1; inline;
  5022. function getOERR : TBits_1; inline;
  5023. function getPERR : TBits_1; inline;
  5024. function getRIDLE : TBits_1; inline;
  5025. function getTRMT : TBits_1; inline;
  5026. function getURXDA : TBits_1; inline;
  5027. function getURXEN : TBits_1; inline;
  5028. function getURXISEL : TBits_2; inline;
  5029. function getURXISEL0 : TBits_1; inline;
  5030. function getURXISEL1 : TBits_1; inline;
  5031. function getUTXBF : TBits_1; inline;
  5032. function getUTXBRK : TBits_1; inline;
  5033. function getUTXEN : TBits_1; inline;
  5034. function getUTXINV : TBits_1; inline;
  5035. function getUTXISEL : TBits_2; inline;
  5036. function getUTXISEL0 : TBits_1; inline;
  5037. function getUTXISEL1 : TBits_1; inline;
  5038. function getUTXSEL : TBits_2; inline;
  5039. function getw : TBits_32; inline;
  5040. procedure setADDEN(thebits : TBits_1); inline;
  5041. procedure setADDR(thebits : TBits_8); inline;
  5042. procedure setADM_EN(thebits : TBits_1); inline;
  5043. procedure setFERR(thebits : TBits_1); inline;
  5044. procedure setOERR(thebits : TBits_1); inline;
  5045. procedure setPERR(thebits : TBits_1); inline;
  5046. procedure setRIDLE(thebits : TBits_1); inline;
  5047. procedure setTRMT(thebits : TBits_1); inline;
  5048. procedure setURXDA(thebits : TBits_1); inline;
  5049. procedure setURXEN(thebits : TBits_1); inline;
  5050. procedure setURXISEL(thebits : TBits_2); inline;
  5051. procedure setURXISEL0(thebits : TBits_1); inline;
  5052. procedure setURXISEL1(thebits : TBits_1); inline;
  5053. procedure setUTXBF(thebits : TBits_1); inline;
  5054. procedure setUTXBRK(thebits : TBits_1); inline;
  5055. procedure setUTXEN(thebits : TBits_1); inline;
  5056. procedure setUTXINV(thebits : TBits_1); inline;
  5057. procedure setUTXISEL(thebits : TBits_2); inline;
  5058. procedure setUTXISEL0(thebits : TBits_1); inline;
  5059. procedure setUTXISEL1(thebits : TBits_1); inline;
  5060. procedure setUTXSEL(thebits : TBits_2); inline;
  5061. procedure setw(thebits : TBits_32); inline;
  5062. public
  5063. procedure clearADDEN; inline;
  5064. procedure clearADM_EN; inline;
  5065. procedure clearFERR; inline;
  5066. procedure clearOERR; inline;
  5067. procedure clearPERR; inline;
  5068. procedure clearRIDLE; inline;
  5069. procedure clearTRMT; inline;
  5070. procedure clearURXDA; inline;
  5071. procedure clearURXEN; inline;
  5072. procedure clearURXISEL0; inline;
  5073. procedure clearURXISEL1; inline;
  5074. procedure clearUTXBF; inline;
  5075. procedure clearUTXBRK; inline;
  5076. procedure clearUTXEN; inline;
  5077. procedure clearUTXINV; inline;
  5078. procedure clearUTXISEL0; inline;
  5079. procedure clearUTXISEL1; inline;
  5080. procedure setADDEN; inline;
  5081. procedure setADM_EN; inline;
  5082. procedure setFERR; inline;
  5083. procedure setOERR; inline;
  5084. procedure setPERR; inline;
  5085. procedure setRIDLE; inline;
  5086. procedure setTRMT; inline;
  5087. procedure setURXDA; inline;
  5088. procedure setURXEN; inline;
  5089. procedure setURXISEL0; inline;
  5090. procedure setURXISEL1; inline;
  5091. procedure setUTXBF; inline;
  5092. procedure setUTXBRK; inline;
  5093. procedure setUTXEN; inline;
  5094. procedure setUTXINV; inline;
  5095. procedure setUTXISEL0; inline;
  5096. procedure setUTXISEL1; inline;
  5097. property ADDEN : TBits_1 read getADDEN write setADDEN;
  5098. property ADDR : TBits_8 read getADDR write setADDR;
  5099. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  5100. property FERR : TBits_1 read getFERR write setFERR;
  5101. property OERR : TBits_1 read getOERR write setOERR;
  5102. property PERR : TBits_1 read getPERR write setPERR;
  5103. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  5104. property TRMT : TBits_1 read getTRMT write setTRMT;
  5105. property URXDA : TBits_1 read getURXDA write setURXDA;
  5106. property URXEN : TBits_1 read getURXEN write setURXEN;
  5107. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  5108. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  5109. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  5110. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  5111. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  5112. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  5113. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  5114. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  5115. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  5116. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  5117. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  5118. property w : TBits_32 read getw write setw;
  5119. end;
  5120. type
  5121. TUART2ARegisters = record
  5122. U2AMODEbits : TUART2A_U2AMODE;
  5123. U2AMODE : longWord;
  5124. U3MODEbits : TUART2A_U3MODE;
  5125. U3MODE : longWord;
  5126. U2AMODECLR : longWord;
  5127. U3MODECLR : longWord;
  5128. U2AMODESET : longWord;
  5129. U3MODESET : longWord;
  5130. U2AMODEINV : longWord;
  5131. U3MODEINV : longWord;
  5132. U2ASTAbits : TUART2A_U2ASTA;
  5133. U2ASTA : longWord;
  5134. U3STAbits : TUART2A_U3STA;
  5135. U3STA : longWord;
  5136. U2ASTACLR : longWord;
  5137. U3STACLR : longWord;
  5138. U2ASTASET : longWord;
  5139. U3STASET : longWord;
  5140. U2ASTAINV : longWord;
  5141. U3STAINV : longWord;
  5142. U2ATXREG : longWord;
  5143. U3TXREG : longWord;
  5144. U2ARXREG : longWord;
  5145. U3RXREG : longWord;
  5146. U2ABRG : longWord;
  5147. U3BRG : longWord;
  5148. U2ABRGCLR : longWord;
  5149. U3BRGCLR : longWord;
  5150. U2ABRGSET : longWord;
  5151. U3BRGSET : longWord;
  5152. U2ABRGINV : longWord;
  5153. U3BRGINV : longWord;
  5154. end;
  5155. TUART6_U2BMODE = record
  5156. private
  5157. function getABAUD : TBits_1; inline;
  5158. function getBRGH : TBits_1; inline;
  5159. function getIREN : TBits_1; inline;
  5160. function getLPBACK : TBits_1; inline;
  5161. function getON : TBits_1; inline;
  5162. function getPDSEL : TBits_2; inline;
  5163. function getPDSEL0 : TBits_1; inline;
  5164. function getPDSEL1 : TBits_1; inline;
  5165. function getRXINV : TBits_1; inline;
  5166. function getSIDL : TBits_1; inline;
  5167. function getSTSEL : TBits_1; inline;
  5168. function getUARTEN : TBits_1; inline;
  5169. function getUSIDL : TBits_1; inline;
  5170. function getWAKE : TBits_1; inline;
  5171. function getw : TBits_32; inline;
  5172. procedure setABAUD(thebits : TBits_1); inline;
  5173. procedure setBRGH(thebits : TBits_1); inline;
  5174. procedure setIREN(thebits : TBits_1); inline;
  5175. procedure setLPBACK(thebits : TBits_1); inline;
  5176. procedure setON(thebits : TBits_1); inline;
  5177. procedure setPDSEL(thebits : TBits_2); inline;
  5178. procedure setPDSEL0(thebits : TBits_1); inline;
  5179. procedure setPDSEL1(thebits : TBits_1); inline;
  5180. procedure setRXINV(thebits : TBits_1); inline;
  5181. procedure setSIDL(thebits : TBits_1); inline;
  5182. procedure setSTSEL(thebits : TBits_1); inline;
  5183. procedure setUARTEN(thebits : TBits_1); inline;
  5184. procedure setUSIDL(thebits : TBits_1); inline;
  5185. procedure setWAKE(thebits : TBits_1); inline;
  5186. procedure setw(thebits : TBits_32); inline;
  5187. public
  5188. procedure clearABAUD; inline;
  5189. procedure clearBRGH; inline;
  5190. procedure clearIREN; inline;
  5191. procedure clearLPBACK; inline;
  5192. procedure clearON; inline;
  5193. procedure clearPDSEL0; inline;
  5194. procedure clearPDSEL1; inline;
  5195. procedure clearRXINV; inline;
  5196. procedure clearSIDL; inline;
  5197. procedure clearSTSEL; inline;
  5198. procedure clearUARTEN; inline;
  5199. procedure clearUSIDL; inline;
  5200. procedure clearWAKE; inline;
  5201. procedure setABAUD; inline;
  5202. procedure setBRGH; inline;
  5203. procedure setIREN; inline;
  5204. procedure setLPBACK; inline;
  5205. procedure setON; inline;
  5206. procedure setPDSEL0; inline;
  5207. procedure setPDSEL1; inline;
  5208. procedure setRXINV; inline;
  5209. procedure setSIDL; inline;
  5210. procedure setSTSEL; inline;
  5211. procedure setUARTEN; inline;
  5212. procedure setUSIDL; inline;
  5213. procedure setWAKE; inline;
  5214. property ABAUD : TBits_1 read getABAUD write setABAUD;
  5215. property BRGH : TBits_1 read getBRGH write setBRGH;
  5216. property IREN : TBits_1 read getIREN write setIREN;
  5217. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  5218. property ON : TBits_1 read getON write setON;
  5219. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  5220. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  5221. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  5222. property RXINV : TBits_1 read getRXINV write setRXINV;
  5223. property SIDL : TBits_1 read getSIDL write setSIDL;
  5224. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  5225. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  5226. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  5227. property WAKE : TBits_1 read getWAKE write setWAKE;
  5228. property w : TBits_32 read getw write setw;
  5229. end;
  5230. TUART6_U6MODE = record
  5231. private
  5232. function getABAUD : TBits_1; inline;
  5233. function getBRGH : TBits_1; inline;
  5234. function getIREN : TBits_1; inline;
  5235. function getLPBACK : TBits_1; inline;
  5236. function getON : TBits_1; inline;
  5237. function getPDSEL : TBits_2; inline;
  5238. function getPDSEL0 : TBits_1; inline;
  5239. function getPDSEL1 : TBits_1; inline;
  5240. function getRXINV : TBits_1; inline;
  5241. function getSIDL : TBits_1; inline;
  5242. function getSTSEL : TBits_1; inline;
  5243. function getUARTEN : TBits_1; inline;
  5244. function getUSIDL : TBits_1; inline;
  5245. function getWAKE : TBits_1; inline;
  5246. function getw : TBits_32; inline;
  5247. procedure setABAUD(thebits : TBits_1); inline;
  5248. procedure setBRGH(thebits : TBits_1); inline;
  5249. procedure setIREN(thebits : TBits_1); inline;
  5250. procedure setLPBACK(thebits : TBits_1); inline;
  5251. procedure setON(thebits : TBits_1); inline;
  5252. procedure setPDSEL(thebits : TBits_2); inline;
  5253. procedure setPDSEL0(thebits : TBits_1); inline;
  5254. procedure setPDSEL1(thebits : TBits_1); inline;
  5255. procedure setRXINV(thebits : TBits_1); inline;
  5256. procedure setSIDL(thebits : TBits_1); inline;
  5257. procedure setSTSEL(thebits : TBits_1); inline;
  5258. procedure setUARTEN(thebits : TBits_1); inline;
  5259. procedure setUSIDL(thebits : TBits_1); inline;
  5260. procedure setWAKE(thebits : TBits_1); inline;
  5261. procedure setw(thebits : TBits_32); inline;
  5262. public
  5263. procedure clearABAUD; inline;
  5264. procedure clearBRGH; inline;
  5265. procedure clearIREN; inline;
  5266. procedure clearLPBACK; inline;
  5267. procedure clearON; inline;
  5268. procedure clearPDSEL0; inline;
  5269. procedure clearPDSEL1; inline;
  5270. procedure clearRXINV; inline;
  5271. procedure clearSIDL; inline;
  5272. procedure clearSTSEL; inline;
  5273. procedure clearUARTEN; inline;
  5274. procedure clearUSIDL; inline;
  5275. procedure clearWAKE; inline;
  5276. procedure setABAUD; inline;
  5277. procedure setBRGH; inline;
  5278. procedure setIREN; inline;
  5279. procedure setLPBACK; inline;
  5280. procedure setON; inline;
  5281. procedure setPDSEL0; inline;
  5282. procedure setPDSEL1; inline;
  5283. procedure setRXINV; inline;
  5284. procedure setSIDL; inline;
  5285. procedure setSTSEL; inline;
  5286. procedure setUARTEN; inline;
  5287. procedure setUSIDL; inline;
  5288. procedure setWAKE; inline;
  5289. property ABAUD : TBits_1 read getABAUD write setABAUD;
  5290. property BRGH : TBits_1 read getBRGH write setBRGH;
  5291. property IREN : TBits_1 read getIREN write setIREN;
  5292. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  5293. property ON : TBits_1 read getON write setON;
  5294. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  5295. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  5296. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  5297. property RXINV : TBits_1 read getRXINV write setRXINV;
  5298. property SIDL : TBits_1 read getSIDL write setSIDL;
  5299. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  5300. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  5301. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  5302. property WAKE : TBits_1 read getWAKE write setWAKE;
  5303. property w : TBits_32 read getw write setw;
  5304. end;
  5305. TUART6_U2BSTA = record
  5306. private
  5307. function getADDEN : TBits_1; inline;
  5308. function getADDR : TBits_8; inline;
  5309. function getADM_EN : TBits_1; inline;
  5310. function getFERR : TBits_1; inline;
  5311. function getOERR : TBits_1; inline;
  5312. function getPERR : TBits_1; inline;
  5313. function getRIDLE : TBits_1; inline;
  5314. function getTRMT : TBits_1; inline;
  5315. function getURXDA : TBits_1; inline;
  5316. function getURXEN : TBits_1; inline;
  5317. function getURXISEL : TBits_2; inline;
  5318. function getURXISEL0 : TBits_1; inline;
  5319. function getURXISEL1 : TBits_1; inline;
  5320. function getUTXBF : TBits_1; inline;
  5321. function getUTXBRK : TBits_1; inline;
  5322. function getUTXEN : TBits_1; inline;
  5323. function getUTXINV : TBits_1; inline;
  5324. function getUTXISEL : TBits_2; inline;
  5325. function getUTXISEL0 : TBits_1; inline;
  5326. function getUTXISEL1 : TBits_1; inline;
  5327. function getUTXSEL : TBits_2; inline;
  5328. function getw : TBits_32; inline;
  5329. procedure setADDEN(thebits : TBits_1); inline;
  5330. procedure setADDR(thebits : TBits_8); inline;
  5331. procedure setADM_EN(thebits : TBits_1); inline;
  5332. procedure setFERR(thebits : TBits_1); inline;
  5333. procedure setOERR(thebits : TBits_1); inline;
  5334. procedure setPERR(thebits : TBits_1); inline;
  5335. procedure setRIDLE(thebits : TBits_1); inline;
  5336. procedure setTRMT(thebits : TBits_1); inline;
  5337. procedure setURXDA(thebits : TBits_1); inline;
  5338. procedure setURXEN(thebits : TBits_1); inline;
  5339. procedure setURXISEL(thebits : TBits_2); inline;
  5340. procedure setURXISEL0(thebits : TBits_1); inline;
  5341. procedure setURXISEL1(thebits : TBits_1); inline;
  5342. procedure setUTXBF(thebits : TBits_1); inline;
  5343. procedure setUTXBRK(thebits : TBits_1); inline;
  5344. procedure setUTXEN(thebits : TBits_1); inline;
  5345. procedure setUTXINV(thebits : TBits_1); inline;
  5346. procedure setUTXISEL(thebits : TBits_2); inline;
  5347. procedure setUTXISEL0(thebits : TBits_1); inline;
  5348. procedure setUTXISEL1(thebits : TBits_1); inline;
  5349. procedure setUTXSEL(thebits : TBits_2); inline;
  5350. procedure setw(thebits : TBits_32); inline;
  5351. public
  5352. procedure clearADDEN; inline;
  5353. procedure clearADM_EN; inline;
  5354. procedure clearFERR; inline;
  5355. procedure clearOERR; inline;
  5356. procedure clearPERR; inline;
  5357. procedure clearRIDLE; inline;
  5358. procedure clearTRMT; inline;
  5359. procedure clearURXDA; inline;
  5360. procedure clearURXEN; inline;
  5361. procedure clearURXISEL0; inline;
  5362. procedure clearURXISEL1; inline;
  5363. procedure clearUTXBF; inline;
  5364. procedure clearUTXBRK; inline;
  5365. procedure clearUTXEN; inline;
  5366. procedure clearUTXINV; inline;
  5367. procedure clearUTXISEL0; inline;
  5368. procedure clearUTXISEL1; inline;
  5369. procedure setADDEN; inline;
  5370. procedure setADM_EN; inline;
  5371. procedure setFERR; inline;
  5372. procedure setOERR; inline;
  5373. procedure setPERR; inline;
  5374. procedure setRIDLE; inline;
  5375. procedure setTRMT; inline;
  5376. procedure setURXDA; inline;
  5377. procedure setURXEN; inline;
  5378. procedure setURXISEL0; inline;
  5379. procedure setURXISEL1; inline;
  5380. procedure setUTXBF; inline;
  5381. procedure setUTXBRK; inline;
  5382. procedure setUTXEN; inline;
  5383. procedure setUTXINV; inline;
  5384. procedure setUTXISEL0; inline;
  5385. procedure setUTXISEL1; inline;
  5386. property ADDEN : TBits_1 read getADDEN write setADDEN;
  5387. property ADDR : TBits_8 read getADDR write setADDR;
  5388. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  5389. property FERR : TBits_1 read getFERR write setFERR;
  5390. property OERR : TBits_1 read getOERR write setOERR;
  5391. property PERR : TBits_1 read getPERR write setPERR;
  5392. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  5393. property TRMT : TBits_1 read getTRMT write setTRMT;
  5394. property URXDA : TBits_1 read getURXDA write setURXDA;
  5395. property URXEN : TBits_1 read getURXEN write setURXEN;
  5396. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  5397. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  5398. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  5399. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  5400. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  5401. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  5402. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  5403. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  5404. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  5405. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  5406. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  5407. property w : TBits_32 read getw write setw;
  5408. end;
  5409. TUART6_U6STA = record
  5410. private
  5411. function getADDEN : TBits_1; inline;
  5412. function getADDR : TBits_8; inline;
  5413. function getADM_EN : TBits_1; inline;
  5414. function getFERR : TBits_1; inline;
  5415. function getOERR : TBits_1; inline;
  5416. function getPERR : TBits_1; inline;
  5417. function getRIDLE : TBits_1; inline;
  5418. function getTRMT : TBits_1; inline;
  5419. function getURXDA : TBits_1; inline;
  5420. function getURXEN : TBits_1; inline;
  5421. function getURXISEL : TBits_2; inline;
  5422. function getURXISEL0 : TBits_1; inline;
  5423. function getURXISEL1 : TBits_1; inline;
  5424. function getUTXBF : TBits_1; inline;
  5425. function getUTXBRK : TBits_1; inline;
  5426. function getUTXEN : TBits_1; inline;
  5427. function getUTXINV : TBits_1; inline;
  5428. function getUTXISEL : TBits_2; inline;
  5429. function getUTXISEL0 : TBits_1; inline;
  5430. function getUTXISEL1 : TBits_1; inline;
  5431. function getUTXSEL : TBits_2; inline;
  5432. function getw : TBits_32; inline;
  5433. procedure setADDEN(thebits : TBits_1); inline;
  5434. procedure setADDR(thebits : TBits_8); inline;
  5435. procedure setADM_EN(thebits : TBits_1); inline;
  5436. procedure setFERR(thebits : TBits_1); inline;
  5437. procedure setOERR(thebits : TBits_1); inline;
  5438. procedure setPERR(thebits : TBits_1); inline;
  5439. procedure setRIDLE(thebits : TBits_1); inline;
  5440. procedure setTRMT(thebits : TBits_1); inline;
  5441. procedure setURXDA(thebits : TBits_1); inline;
  5442. procedure setURXEN(thebits : TBits_1); inline;
  5443. procedure setURXISEL(thebits : TBits_2); inline;
  5444. procedure setURXISEL0(thebits : TBits_1); inline;
  5445. procedure setURXISEL1(thebits : TBits_1); inline;
  5446. procedure setUTXBF(thebits : TBits_1); inline;
  5447. procedure setUTXBRK(thebits : TBits_1); inline;
  5448. procedure setUTXEN(thebits : TBits_1); inline;
  5449. procedure setUTXINV(thebits : TBits_1); inline;
  5450. procedure setUTXISEL(thebits : TBits_2); inline;
  5451. procedure setUTXISEL0(thebits : TBits_1); inline;
  5452. procedure setUTXISEL1(thebits : TBits_1); inline;
  5453. procedure setUTXSEL(thebits : TBits_2); inline;
  5454. procedure setw(thebits : TBits_32); inline;
  5455. public
  5456. procedure clearADDEN; inline;
  5457. procedure clearADM_EN; inline;
  5458. procedure clearFERR; inline;
  5459. procedure clearOERR; inline;
  5460. procedure clearPERR; inline;
  5461. procedure clearRIDLE; inline;
  5462. procedure clearTRMT; inline;
  5463. procedure clearURXDA; inline;
  5464. procedure clearURXEN; inline;
  5465. procedure clearURXISEL0; inline;
  5466. procedure clearURXISEL1; inline;
  5467. procedure clearUTXBF; inline;
  5468. procedure clearUTXBRK; inline;
  5469. procedure clearUTXEN; inline;
  5470. procedure clearUTXINV; inline;
  5471. procedure clearUTXISEL0; inline;
  5472. procedure clearUTXISEL1; inline;
  5473. procedure setADDEN; inline;
  5474. procedure setADM_EN; inline;
  5475. procedure setFERR; inline;
  5476. procedure setOERR; inline;
  5477. procedure setPERR; inline;
  5478. procedure setRIDLE; inline;
  5479. procedure setTRMT; inline;
  5480. procedure setURXDA; inline;
  5481. procedure setURXEN; inline;
  5482. procedure setURXISEL0; inline;
  5483. procedure setURXISEL1; inline;
  5484. procedure setUTXBF; inline;
  5485. procedure setUTXBRK; inline;
  5486. procedure setUTXEN; inline;
  5487. procedure setUTXINV; inline;
  5488. procedure setUTXISEL0; inline;
  5489. procedure setUTXISEL1; inline;
  5490. property ADDEN : TBits_1 read getADDEN write setADDEN;
  5491. property ADDR : TBits_8 read getADDR write setADDR;
  5492. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  5493. property FERR : TBits_1 read getFERR write setFERR;
  5494. property OERR : TBits_1 read getOERR write setOERR;
  5495. property PERR : TBits_1 read getPERR write setPERR;
  5496. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  5497. property TRMT : TBits_1 read getTRMT write setTRMT;
  5498. property URXDA : TBits_1 read getURXDA write setURXDA;
  5499. property URXEN : TBits_1 read getURXEN write setURXEN;
  5500. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  5501. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  5502. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  5503. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  5504. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  5505. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  5506. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  5507. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  5508. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  5509. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  5510. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  5511. property w : TBits_32 read getw write setw;
  5512. end;
  5513. type
  5514. TUART6Registers = record
  5515. U2BMODEbits : TUART6_U2BMODE;
  5516. U2BMODE : longWord;
  5517. U6MODEbits : TUART6_U6MODE;
  5518. U6MODE : longWord;
  5519. U2BMODECLR : longWord;
  5520. U6MODECLR : longWord;
  5521. U2BMODESET : longWord;
  5522. U6MODESET : longWord;
  5523. U2BMODEINV : longWord;
  5524. U6MODEINV : longWord;
  5525. U2BSTAbits : TUART6_U2BSTA;
  5526. U2BSTA : longWord;
  5527. U6STAbits : TUART6_U6STA;
  5528. U6STA : longWord;
  5529. U2BSTACLR : longWord;
  5530. U6STACLR : longWord;
  5531. U2BSTASET : longWord;
  5532. U6STASET : longWord;
  5533. U2BSTAINV : longWord;
  5534. U6STAINV : longWord;
  5535. U2BTXREG : longWord;
  5536. U6TXREG : longWord;
  5537. U2BRXREG : longWord;
  5538. U6RXREG : longWord;
  5539. U2BBRG : longWord;
  5540. U6BRG : longWord;
  5541. U2BBRGCLR : longWord;
  5542. U6BRGCLR : longWord;
  5543. U2BBRGSET : longWord;
  5544. U6BRGSET : longWord;
  5545. U2BBRGINV : longWord;
  5546. U6BRGINV : longWord;
  5547. end;
  5548. TUART2_U2MODE = record
  5549. private
  5550. function getABAUD : TBits_1; inline;
  5551. function getBRGH : TBits_1; inline;
  5552. function getIREN : TBits_1; inline;
  5553. function getLPBACK : TBits_1; inline;
  5554. function getON : TBits_1; inline;
  5555. function getPDSEL : TBits_2; inline;
  5556. function getPDSEL0 : TBits_1; inline;
  5557. function getPDSEL1 : TBits_1; inline;
  5558. function getRTSMD : TBits_1; inline;
  5559. function getRXINV : TBits_1; inline;
  5560. function getSIDL : TBits_1; inline;
  5561. function getSTSEL : TBits_1; inline;
  5562. function getUARTEN : TBits_1; inline;
  5563. function getUEN : TBits_2; inline;
  5564. function getUEN0 : TBits_1; inline;
  5565. function getUEN1 : TBits_1; inline;
  5566. function getUSIDL : TBits_1; inline;
  5567. function getWAKE : TBits_1; inline;
  5568. function getw : TBits_32; inline;
  5569. procedure setABAUD(thebits : TBits_1); inline;
  5570. procedure setBRGH(thebits : TBits_1); inline;
  5571. procedure setIREN(thebits : TBits_1); inline;
  5572. procedure setLPBACK(thebits : TBits_1); inline;
  5573. procedure setON(thebits : TBits_1); inline;
  5574. procedure setPDSEL(thebits : TBits_2); inline;
  5575. procedure setPDSEL0(thebits : TBits_1); inline;
  5576. procedure setPDSEL1(thebits : TBits_1); inline;
  5577. procedure setRTSMD(thebits : TBits_1); inline;
  5578. procedure setRXINV(thebits : TBits_1); inline;
  5579. procedure setSIDL(thebits : TBits_1); inline;
  5580. procedure setSTSEL(thebits : TBits_1); inline;
  5581. procedure setUARTEN(thebits : TBits_1); inline;
  5582. procedure setUEN(thebits : TBits_2); inline;
  5583. procedure setUEN0(thebits : TBits_1); inline;
  5584. procedure setUEN1(thebits : TBits_1); inline;
  5585. procedure setUSIDL(thebits : TBits_1); inline;
  5586. procedure setWAKE(thebits : TBits_1); inline;
  5587. procedure setw(thebits : TBits_32); inline;
  5588. public
  5589. procedure clearABAUD; inline;
  5590. procedure clearBRGH; inline;
  5591. procedure clearIREN; inline;
  5592. procedure clearLPBACK; inline;
  5593. procedure clearON; inline;
  5594. procedure clearPDSEL0; inline;
  5595. procedure clearPDSEL1; inline;
  5596. procedure clearRTSMD; inline;
  5597. procedure clearRXINV; inline;
  5598. procedure clearSIDL; inline;
  5599. procedure clearSTSEL; inline;
  5600. procedure clearUARTEN; inline;
  5601. procedure clearUEN0; inline;
  5602. procedure clearUEN1; inline;
  5603. procedure clearUSIDL; inline;
  5604. procedure clearWAKE; inline;
  5605. procedure setABAUD; inline;
  5606. procedure setBRGH; inline;
  5607. procedure setIREN; inline;
  5608. procedure setLPBACK; inline;
  5609. procedure setON; inline;
  5610. procedure setPDSEL0; inline;
  5611. procedure setPDSEL1; inline;
  5612. procedure setRTSMD; inline;
  5613. procedure setRXINV; inline;
  5614. procedure setSIDL; inline;
  5615. procedure setSTSEL; inline;
  5616. procedure setUARTEN; inline;
  5617. procedure setUEN0; inline;
  5618. procedure setUEN1; inline;
  5619. procedure setUSIDL; inline;
  5620. procedure setWAKE; inline;
  5621. property ABAUD : TBits_1 read getABAUD write setABAUD;
  5622. property BRGH : TBits_1 read getBRGH write setBRGH;
  5623. property IREN : TBits_1 read getIREN write setIREN;
  5624. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  5625. property ON : TBits_1 read getON write setON;
  5626. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  5627. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  5628. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  5629. property RTSMD : TBits_1 read getRTSMD write setRTSMD;
  5630. property RXINV : TBits_1 read getRXINV write setRXINV;
  5631. property SIDL : TBits_1 read getSIDL write setSIDL;
  5632. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  5633. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  5634. property UEN : TBits_2 read getUEN write setUEN;
  5635. property UEN0 : TBits_1 read getUEN0 write setUEN0;
  5636. property UEN1 : TBits_1 read getUEN1 write setUEN1;
  5637. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  5638. property WAKE : TBits_1 read getWAKE write setWAKE;
  5639. property w : TBits_32 read getw write setw;
  5640. end;
  5641. TUART2_U3AMODE = record
  5642. private
  5643. function getABAUD : TBits_1; inline;
  5644. function getBRGH : TBits_1; inline;
  5645. function getIREN : TBits_1; inline;
  5646. function getLPBACK : TBits_1; inline;
  5647. function getON : TBits_1; inline;
  5648. function getPDSEL : TBits_2; inline;
  5649. function getPDSEL0 : TBits_1; inline;
  5650. function getPDSEL1 : TBits_1; inline;
  5651. function getRTSMD : TBits_1; inline;
  5652. function getRXINV : TBits_1; inline;
  5653. function getSIDL : TBits_1; inline;
  5654. function getSTSEL : TBits_1; inline;
  5655. function getUARTEN : TBits_1; inline;
  5656. function getUEN : TBits_2; inline;
  5657. function getUEN0 : TBits_1; inline;
  5658. function getUEN1 : TBits_1; inline;
  5659. function getUSIDL : TBits_1; inline;
  5660. function getWAKE : TBits_1; inline;
  5661. function getw : TBits_32; inline;
  5662. procedure setABAUD(thebits : TBits_1); inline;
  5663. procedure setBRGH(thebits : TBits_1); inline;
  5664. procedure setIREN(thebits : TBits_1); inline;
  5665. procedure setLPBACK(thebits : TBits_1); inline;
  5666. procedure setON(thebits : TBits_1); inline;
  5667. procedure setPDSEL(thebits : TBits_2); inline;
  5668. procedure setPDSEL0(thebits : TBits_1); inline;
  5669. procedure setPDSEL1(thebits : TBits_1); inline;
  5670. procedure setRTSMD(thebits : TBits_1); inline;
  5671. procedure setRXINV(thebits : TBits_1); inline;
  5672. procedure setSIDL(thebits : TBits_1); inline;
  5673. procedure setSTSEL(thebits : TBits_1); inline;
  5674. procedure setUARTEN(thebits : TBits_1); inline;
  5675. procedure setUEN(thebits : TBits_2); inline;
  5676. procedure setUEN0(thebits : TBits_1); inline;
  5677. procedure setUEN1(thebits : TBits_1); inline;
  5678. procedure setUSIDL(thebits : TBits_1); inline;
  5679. procedure setWAKE(thebits : TBits_1); inline;
  5680. procedure setw(thebits : TBits_32); inline;
  5681. public
  5682. procedure clearABAUD; inline;
  5683. procedure clearBRGH; inline;
  5684. procedure clearIREN; inline;
  5685. procedure clearLPBACK; inline;
  5686. procedure clearON; inline;
  5687. procedure clearPDSEL0; inline;
  5688. procedure clearPDSEL1; inline;
  5689. procedure clearRTSMD; inline;
  5690. procedure clearRXINV; inline;
  5691. procedure clearSIDL; inline;
  5692. procedure clearSTSEL; inline;
  5693. procedure clearUARTEN; inline;
  5694. procedure clearUEN0; inline;
  5695. procedure clearUEN1; inline;
  5696. procedure clearUSIDL; inline;
  5697. procedure clearWAKE; inline;
  5698. procedure setABAUD; inline;
  5699. procedure setBRGH; inline;
  5700. procedure setIREN; inline;
  5701. procedure setLPBACK; inline;
  5702. procedure setON; inline;
  5703. procedure setPDSEL0; inline;
  5704. procedure setPDSEL1; inline;
  5705. procedure setRTSMD; inline;
  5706. procedure setRXINV; inline;
  5707. procedure setSIDL; inline;
  5708. procedure setSTSEL; inline;
  5709. procedure setUARTEN; inline;
  5710. procedure setUEN0; inline;
  5711. procedure setUEN1; inline;
  5712. procedure setUSIDL; inline;
  5713. procedure setWAKE; inline;
  5714. property ABAUD : TBits_1 read getABAUD write setABAUD;
  5715. property BRGH : TBits_1 read getBRGH write setBRGH;
  5716. property IREN : TBits_1 read getIREN write setIREN;
  5717. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  5718. property ON : TBits_1 read getON write setON;
  5719. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  5720. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  5721. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  5722. property RTSMD : TBits_1 read getRTSMD write setRTSMD;
  5723. property RXINV : TBits_1 read getRXINV write setRXINV;
  5724. property SIDL : TBits_1 read getSIDL write setSIDL;
  5725. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  5726. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  5727. property UEN : TBits_2 read getUEN write setUEN;
  5728. property UEN0 : TBits_1 read getUEN0 write setUEN0;
  5729. property UEN1 : TBits_1 read getUEN1 write setUEN1;
  5730. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  5731. property WAKE : TBits_1 read getWAKE write setWAKE;
  5732. property w : TBits_32 read getw write setw;
  5733. end;
  5734. TUART2_U2STA = record
  5735. private
  5736. function getADDEN : TBits_1; inline;
  5737. function getADDR : TBits_8; inline;
  5738. function getADM_EN : TBits_1; inline;
  5739. function getFERR : TBits_1; inline;
  5740. function getOERR : TBits_1; inline;
  5741. function getPERR : TBits_1; inline;
  5742. function getRIDLE : TBits_1; inline;
  5743. function getTRMT : TBits_1; inline;
  5744. function getURXDA : TBits_1; inline;
  5745. function getURXEN : TBits_1; inline;
  5746. function getURXISEL : TBits_2; inline;
  5747. function getURXISEL0 : TBits_1; inline;
  5748. function getURXISEL1 : TBits_1; inline;
  5749. function getUTXBF : TBits_1; inline;
  5750. function getUTXBRK : TBits_1; inline;
  5751. function getUTXEN : TBits_1; inline;
  5752. function getUTXINV : TBits_1; inline;
  5753. function getUTXISEL : TBits_2; inline;
  5754. function getUTXISEL0 : TBits_1; inline;
  5755. function getUTXISEL1 : TBits_1; inline;
  5756. function getUTXSEL : TBits_2; inline;
  5757. function getw : TBits_32; inline;
  5758. procedure setADDEN(thebits : TBits_1); inline;
  5759. procedure setADDR(thebits : TBits_8); inline;
  5760. procedure setADM_EN(thebits : TBits_1); inline;
  5761. procedure setFERR(thebits : TBits_1); inline;
  5762. procedure setOERR(thebits : TBits_1); inline;
  5763. procedure setPERR(thebits : TBits_1); inline;
  5764. procedure setRIDLE(thebits : TBits_1); inline;
  5765. procedure setTRMT(thebits : TBits_1); inline;
  5766. procedure setURXDA(thebits : TBits_1); inline;
  5767. procedure setURXEN(thebits : TBits_1); inline;
  5768. procedure setURXISEL(thebits : TBits_2); inline;
  5769. procedure setURXISEL0(thebits : TBits_1); inline;
  5770. procedure setURXISEL1(thebits : TBits_1); inline;
  5771. procedure setUTXBF(thebits : TBits_1); inline;
  5772. procedure setUTXBRK(thebits : TBits_1); inline;
  5773. procedure setUTXEN(thebits : TBits_1); inline;
  5774. procedure setUTXINV(thebits : TBits_1); inline;
  5775. procedure setUTXISEL(thebits : TBits_2); inline;
  5776. procedure setUTXISEL0(thebits : TBits_1); inline;
  5777. procedure setUTXISEL1(thebits : TBits_1); inline;
  5778. procedure setUTXSEL(thebits : TBits_2); inline;
  5779. procedure setw(thebits : TBits_32); inline;
  5780. public
  5781. procedure clearADDEN; inline;
  5782. procedure clearADM_EN; inline;
  5783. procedure clearFERR; inline;
  5784. procedure clearOERR; inline;
  5785. procedure clearPERR; inline;
  5786. procedure clearRIDLE; inline;
  5787. procedure clearTRMT; inline;
  5788. procedure clearURXDA; inline;
  5789. procedure clearURXEN; inline;
  5790. procedure clearURXISEL0; inline;
  5791. procedure clearURXISEL1; inline;
  5792. procedure clearUTXBF; inline;
  5793. procedure clearUTXBRK; inline;
  5794. procedure clearUTXEN; inline;
  5795. procedure clearUTXINV; inline;
  5796. procedure clearUTXISEL0; inline;
  5797. procedure clearUTXISEL1; inline;
  5798. procedure setADDEN; inline;
  5799. procedure setADM_EN; inline;
  5800. procedure setFERR; inline;
  5801. procedure setOERR; inline;
  5802. procedure setPERR; inline;
  5803. procedure setRIDLE; inline;
  5804. procedure setTRMT; inline;
  5805. procedure setURXDA; inline;
  5806. procedure setURXEN; inline;
  5807. procedure setURXISEL0; inline;
  5808. procedure setURXISEL1; inline;
  5809. procedure setUTXBF; inline;
  5810. procedure setUTXBRK; inline;
  5811. procedure setUTXEN; inline;
  5812. procedure setUTXINV; inline;
  5813. procedure setUTXISEL0; inline;
  5814. procedure setUTXISEL1; inline;
  5815. property ADDEN : TBits_1 read getADDEN write setADDEN;
  5816. property ADDR : TBits_8 read getADDR write setADDR;
  5817. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  5818. property FERR : TBits_1 read getFERR write setFERR;
  5819. property OERR : TBits_1 read getOERR write setOERR;
  5820. property PERR : TBits_1 read getPERR write setPERR;
  5821. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  5822. property TRMT : TBits_1 read getTRMT write setTRMT;
  5823. property URXDA : TBits_1 read getURXDA write setURXDA;
  5824. property URXEN : TBits_1 read getURXEN write setURXEN;
  5825. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  5826. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  5827. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  5828. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  5829. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  5830. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  5831. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  5832. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  5833. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  5834. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  5835. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  5836. property w : TBits_32 read getw write setw;
  5837. end;
  5838. TUART2_U3ASTA = record
  5839. private
  5840. function getADDEN : TBits_1; inline;
  5841. function getADDR : TBits_8; inline;
  5842. function getADM_EN : TBits_1; inline;
  5843. function getFERR : TBits_1; inline;
  5844. function getOERR : TBits_1; inline;
  5845. function getPERR : TBits_1; inline;
  5846. function getRIDLE : TBits_1; inline;
  5847. function getTRMT : TBits_1; inline;
  5848. function getURXDA : TBits_1; inline;
  5849. function getURXEN : TBits_1; inline;
  5850. function getURXISEL : TBits_2; inline;
  5851. function getURXISEL0 : TBits_1; inline;
  5852. function getURXISEL1 : TBits_1; inline;
  5853. function getUTXBF : TBits_1; inline;
  5854. function getUTXBRK : TBits_1; inline;
  5855. function getUTXEN : TBits_1; inline;
  5856. function getUTXINV : TBits_1; inline;
  5857. function getUTXISEL : TBits_2; inline;
  5858. function getUTXISEL0 : TBits_1; inline;
  5859. function getUTXISEL1 : TBits_1; inline;
  5860. function getUTXSEL : TBits_2; inline;
  5861. function getw : TBits_32; inline;
  5862. procedure setADDEN(thebits : TBits_1); inline;
  5863. procedure setADDR(thebits : TBits_8); inline;
  5864. procedure setADM_EN(thebits : TBits_1); inline;
  5865. procedure setFERR(thebits : TBits_1); inline;
  5866. procedure setOERR(thebits : TBits_1); inline;
  5867. procedure setPERR(thebits : TBits_1); inline;
  5868. procedure setRIDLE(thebits : TBits_1); inline;
  5869. procedure setTRMT(thebits : TBits_1); inline;
  5870. procedure setURXDA(thebits : TBits_1); inline;
  5871. procedure setURXEN(thebits : TBits_1); inline;
  5872. procedure setURXISEL(thebits : TBits_2); inline;
  5873. procedure setURXISEL0(thebits : TBits_1); inline;
  5874. procedure setURXISEL1(thebits : TBits_1); inline;
  5875. procedure setUTXBF(thebits : TBits_1); inline;
  5876. procedure setUTXBRK(thebits : TBits_1); inline;
  5877. procedure setUTXEN(thebits : TBits_1); inline;
  5878. procedure setUTXINV(thebits : TBits_1); inline;
  5879. procedure setUTXISEL(thebits : TBits_2); inline;
  5880. procedure setUTXISEL0(thebits : TBits_1); inline;
  5881. procedure setUTXISEL1(thebits : TBits_1); inline;
  5882. procedure setUTXSEL(thebits : TBits_2); inline;
  5883. procedure setw(thebits : TBits_32); inline;
  5884. public
  5885. procedure clearADDEN; inline;
  5886. procedure clearADM_EN; inline;
  5887. procedure clearFERR; inline;
  5888. procedure clearOERR; inline;
  5889. procedure clearPERR; inline;
  5890. procedure clearRIDLE; inline;
  5891. procedure clearTRMT; inline;
  5892. procedure clearURXDA; inline;
  5893. procedure clearURXEN; inline;
  5894. procedure clearURXISEL0; inline;
  5895. procedure clearURXISEL1; inline;
  5896. procedure clearUTXBF; inline;
  5897. procedure clearUTXBRK; inline;
  5898. procedure clearUTXEN; inline;
  5899. procedure clearUTXINV; inline;
  5900. procedure clearUTXISEL0; inline;
  5901. procedure clearUTXISEL1; inline;
  5902. procedure setADDEN; inline;
  5903. procedure setADM_EN; inline;
  5904. procedure setFERR; inline;
  5905. procedure setOERR; inline;
  5906. procedure setPERR; inline;
  5907. procedure setRIDLE; inline;
  5908. procedure setTRMT; inline;
  5909. procedure setURXDA; inline;
  5910. procedure setURXEN; inline;
  5911. procedure setURXISEL0; inline;
  5912. procedure setURXISEL1; inline;
  5913. procedure setUTXBF; inline;
  5914. procedure setUTXBRK; inline;
  5915. procedure setUTXEN; inline;
  5916. procedure setUTXINV; inline;
  5917. procedure setUTXISEL0; inline;
  5918. procedure setUTXISEL1; inline;
  5919. property ADDEN : TBits_1 read getADDEN write setADDEN;
  5920. property ADDR : TBits_8 read getADDR write setADDR;
  5921. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  5922. property FERR : TBits_1 read getFERR write setFERR;
  5923. property OERR : TBits_1 read getOERR write setOERR;
  5924. property PERR : TBits_1 read getPERR write setPERR;
  5925. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  5926. property TRMT : TBits_1 read getTRMT write setTRMT;
  5927. property URXDA : TBits_1 read getURXDA write setURXDA;
  5928. property URXEN : TBits_1 read getURXEN write setURXEN;
  5929. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  5930. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  5931. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  5932. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  5933. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  5934. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  5935. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  5936. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  5937. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  5938. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  5939. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  5940. property w : TBits_32 read getw write setw;
  5941. end;
  5942. type
  5943. TUART2Registers = record
  5944. U2MODEbits : TUART2_U2MODE;
  5945. U2MODE : longWord;
  5946. U3AMODEbits : TUART2_U3AMODE;
  5947. U3AMODE : longWord;
  5948. U2MODECLR : longWord;
  5949. U3AMODECLR : longWord;
  5950. U2MODESET : longWord;
  5951. U3AMODESET : longWord;
  5952. U2MODEINV : longWord;
  5953. U3AMODEINV : longWord;
  5954. U2STAbits : TUART2_U2STA;
  5955. U2STA : longWord;
  5956. U3ASTAbits : TUART2_U3ASTA;
  5957. U3ASTA : longWord;
  5958. U2STACLR : longWord;
  5959. U3ASTACLR : longWord;
  5960. U2STASET : longWord;
  5961. U3ASTASET : longWord;
  5962. U2STAINV : longWord;
  5963. U3ASTAINV : longWord;
  5964. U2TXREG : longWord;
  5965. U3ATXREG : longWord;
  5966. U2RXREG : longWord;
  5967. U3ARXREG : longWord;
  5968. U2BRG : longWord;
  5969. U3ABRG : longWord;
  5970. U2BRGCLR : longWord;
  5971. U3ABRGCLR : longWord;
  5972. U2BRGSET : longWord;
  5973. U3ABRGSET : longWord;
  5974. U2BRGINV : longWord;
  5975. U3ABRGINV : longWord;
  5976. end;
  5977. TUART5_U3BMODE = record
  5978. private
  5979. function getABAUD : TBits_1; inline;
  5980. function getBRGH : TBits_1; inline;
  5981. function getIREN : TBits_1; inline;
  5982. function getLPBACK : TBits_1; inline;
  5983. function getON : TBits_1; inline;
  5984. function getPDSEL : TBits_2; inline;
  5985. function getPDSEL0 : TBits_1; inline;
  5986. function getPDSEL1 : TBits_1; inline;
  5987. function getRXINV : TBits_1; inline;
  5988. function getSIDL : TBits_1; inline;
  5989. function getSTSEL : TBits_1; inline;
  5990. function getUARTEN : TBits_1; inline;
  5991. function getUSIDL : TBits_1; inline;
  5992. function getWAKE : TBits_1; inline;
  5993. function getw : TBits_32; inline;
  5994. procedure setABAUD(thebits : TBits_1); inline;
  5995. procedure setBRGH(thebits : TBits_1); inline;
  5996. procedure setIREN(thebits : TBits_1); inline;
  5997. procedure setLPBACK(thebits : TBits_1); inline;
  5998. procedure setON(thebits : TBits_1); inline;
  5999. procedure setPDSEL(thebits : TBits_2); inline;
  6000. procedure setPDSEL0(thebits : TBits_1); inline;
  6001. procedure setPDSEL1(thebits : TBits_1); inline;
  6002. procedure setRXINV(thebits : TBits_1); inline;
  6003. procedure setSIDL(thebits : TBits_1); inline;
  6004. procedure setSTSEL(thebits : TBits_1); inline;
  6005. procedure setUARTEN(thebits : TBits_1); inline;
  6006. procedure setUSIDL(thebits : TBits_1); inline;
  6007. procedure setWAKE(thebits : TBits_1); inline;
  6008. procedure setw(thebits : TBits_32); inline;
  6009. public
  6010. procedure clearABAUD; inline;
  6011. procedure clearBRGH; inline;
  6012. procedure clearIREN; inline;
  6013. procedure clearLPBACK; inline;
  6014. procedure clearON; inline;
  6015. procedure clearPDSEL0; inline;
  6016. procedure clearPDSEL1; inline;
  6017. procedure clearRXINV; inline;
  6018. procedure clearSIDL; inline;
  6019. procedure clearSTSEL; inline;
  6020. procedure clearUARTEN; inline;
  6021. procedure clearUSIDL; inline;
  6022. procedure clearWAKE; inline;
  6023. procedure setABAUD; inline;
  6024. procedure setBRGH; inline;
  6025. procedure setIREN; inline;
  6026. procedure setLPBACK; inline;
  6027. procedure setON; inline;
  6028. procedure setPDSEL0; inline;
  6029. procedure setPDSEL1; inline;
  6030. procedure setRXINV; inline;
  6031. procedure setSIDL; inline;
  6032. procedure setSTSEL; inline;
  6033. procedure setUARTEN; inline;
  6034. procedure setUSIDL; inline;
  6035. procedure setWAKE; inline;
  6036. property ABAUD : TBits_1 read getABAUD write setABAUD;
  6037. property BRGH : TBits_1 read getBRGH write setBRGH;
  6038. property IREN : TBits_1 read getIREN write setIREN;
  6039. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  6040. property ON : TBits_1 read getON write setON;
  6041. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  6042. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  6043. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  6044. property RXINV : TBits_1 read getRXINV write setRXINV;
  6045. property SIDL : TBits_1 read getSIDL write setSIDL;
  6046. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  6047. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  6048. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  6049. property WAKE : TBits_1 read getWAKE write setWAKE;
  6050. property w : TBits_32 read getw write setw;
  6051. end;
  6052. TUART5_U5MODE = record
  6053. private
  6054. function getABAUD : TBits_1; inline;
  6055. function getBRGH : TBits_1; inline;
  6056. function getIREN : TBits_1; inline;
  6057. function getLPBACK : TBits_1; inline;
  6058. function getON : TBits_1; inline;
  6059. function getPDSEL : TBits_2; inline;
  6060. function getPDSEL0 : TBits_1; inline;
  6061. function getPDSEL1 : TBits_1; inline;
  6062. function getRXINV : TBits_1; inline;
  6063. function getSIDL : TBits_1; inline;
  6064. function getSTSEL : TBits_1; inline;
  6065. function getUARTEN : TBits_1; inline;
  6066. function getUSIDL : TBits_1; inline;
  6067. function getWAKE : TBits_1; inline;
  6068. function getw : TBits_32; inline;
  6069. procedure setABAUD(thebits : TBits_1); inline;
  6070. procedure setBRGH(thebits : TBits_1); inline;
  6071. procedure setIREN(thebits : TBits_1); inline;
  6072. procedure setLPBACK(thebits : TBits_1); inline;
  6073. procedure setON(thebits : TBits_1); inline;
  6074. procedure setPDSEL(thebits : TBits_2); inline;
  6075. procedure setPDSEL0(thebits : TBits_1); inline;
  6076. procedure setPDSEL1(thebits : TBits_1); inline;
  6077. procedure setRXINV(thebits : TBits_1); inline;
  6078. procedure setSIDL(thebits : TBits_1); inline;
  6079. procedure setSTSEL(thebits : TBits_1); inline;
  6080. procedure setUARTEN(thebits : TBits_1); inline;
  6081. procedure setUSIDL(thebits : TBits_1); inline;
  6082. procedure setWAKE(thebits : TBits_1); inline;
  6083. procedure setw(thebits : TBits_32); inline;
  6084. public
  6085. procedure clearABAUD; inline;
  6086. procedure clearBRGH; inline;
  6087. procedure clearIREN; inline;
  6088. procedure clearLPBACK; inline;
  6089. procedure clearON; inline;
  6090. procedure clearPDSEL0; inline;
  6091. procedure clearPDSEL1; inline;
  6092. procedure clearRXINV; inline;
  6093. procedure clearSIDL; inline;
  6094. procedure clearSTSEL; inline;
  6095. procedure clearUARTEN; inline;
  6096. procedure clearUSIDL; inline;
  6097. procedure clearWAKE; inline;
  6098. procedure setABAUD; inline;
  6099. procedure setBRGH; inline;
  6100. procedure setIREN; inline;
  6101. procedure setLPBACK; inline;
  6102. procedure setON; inline;
  6103. procedure setPDSEL0; inline;
  6104. procedure setPDSEL1; inline;
  6105. procedure setRXINV; inline;
  6106. procedure setSIDL; inline;
  6107. procedure setSTSEL; inline;
  6108. procedure setUARTEN; inline;
  6109. procedure setUSIDL; inline;
  6110. procedure setWAKE; inline;
  6111. property ABAUD : TBits_1 read getABAUD write setABAUD;
  6112. property BRGH : TBits_1 read getBRGH write setBRGH;
  6113. property IREN : TBits_1 read getIREN write setIREN;
  6114. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  6115. property ON : TBits_1 read getON write setON;
  6116. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  6117. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  6118. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  6119. property RXINV : TBits_1 read getRXINV write setRXINV;
  6120. property SIDL : TBits_1 read getSIDL write setSIDL;
  6121. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  6122. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  6123. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  6124. property WAKE : TBits_1 read getWAKE write setWAKE;
  6125. property w : TBits_32 read getw write setw;
  6126. end;
  6127. TUART5_U3BSTA = record
  6128. private
  6129. function getADDEN : TBits_1; inline;
  6130. function getADDR : TBits_8; inline;
  6131. function getADM_EN : TBits_1; inline;
  6132. function getFERR : TBits_1; inline;
  6133. function getOERR : TBits_1; inline;
  6134. function getPERR : TBits_1; inline;
  6135. function getRIDLE : TBits_1; inline;
  6136. function getTRMT : TBits_1; inline;
  6137. function getURXDA : TBits_1; inline;
  6138. function getURXEN : TBits_1; inline;
  6139. function getURXISEL : TBits_2; inline;
  6140. function getURXISEL0 : TBits_1; inline;
  6141. function getURXISEL1 : TBits_1; inline;
  6142. function getUTXBF : TBits_1; inline;
  6143. function getUTXBRK : TBits_1; inline;
  6144. function getUTXEN : TBits_1; inline;
  6145. function getUTXINV : TBits_1; inline;
  6146. function getUTXISEL : TBits_2; inline;
  6147. function getUTXISEL0 : TBits_1; inline;
  6148. function getUTXISEL1 : TBits_1; inline;
  6149. function getUTXSEL : TBits_2; inline;
  6150. function getw : TBits_32; inline;
  6151. procedure setADDEN(thebits : TBits_1); inline;
  6152. procedure setADDR(thebits : TBits_8); inline;
  6153. procedure setADM_EN(thebits : TBits_1); inline;
  6154. procedure setFERR(thebits : TBits_1); inline;
  6155. procedure setOERR(thebits : TBits_1); inline;
  6156. procedure setPERR(thebits : TBits_1); inline;
  6157. procedure setRIDLE(thebits : TBits_1); inline;
  6158. procedure setTRMT(thebits : TBits_1); inline;
  6159. procedure setURXDA(thebits : TBits_1); inline;
  6160. procedure setURXEN(thebits : TBits_1); inline;
  6161. procedure setURXISEL(thebits : TBits_2); inline;
  6162. procedure setURXISEL0(thebits : TBits_1); inline;
  6163. procedure setURXISEL1(thebits : TBits_1); inline;
  6164. procedure setUTXBF(thebits : TBits_1); inline;
  6165. procedure setUTXBRK(thebits : TBits_1); inline;
  6166. procedure setUTXEN(thebits : TBits_1); inline;
  6167. procedure setUTXINV(thebits : TBits_1); inline;
  6168. procedure setUTXISEL(thebits : TBits_2); inline;
  6169. procedure setUTXISEL0(thebits : TBits_1); inline;
  6170. procedure setUTXISEL1(thebits : TBits_1); inline;
  6171. procedure setUTXSEL(thebits : TBits_2); inline;
  6172. procedure setw(thebits : TBits_32); inline;
  6173. public
  6174. procedure clearADDEN; inline;
  6175. procedure clearADM_EN; inline;
  6176. procedure clearFERR; inline;
  6177. procedure clearOERR; inline;
  6178. procedure clearPERR; inline;
  6179. procedure clearRIDLE; inline;
  6180. procedure clearTRMT; inline;
  6181. procedure clearURXDA; inline;
  6182. procedure clearURXEN; inline;
  6183. procedure clearURXISEL0; inline;
  6184. procedure clearURXISEL1; inline;
  6185. procedure clearUTXBF; inline;
  6186. procedure clearUTXBRK; inline;
  6187. procedure clearUTXEN; inline;
  6188. procedure clearUTXINV; inline;
  6189. procedure clearUTXISEL0; inline;
  6190. procedure clearUTXISEL1; inline;
  6191. procedure setADDEN; inline;
  6192. procedure setADM_EN; inline;
  6193. procedure setFERR; inline;
  6194. procedure setOERR; inline;
  6195. procedure setPERR; inline;
  6196. procedure setRIDLE; inline;
  6197. procedure setTRMT; inline;
  6198. procedure setURXDA; inline;
  6199. procedure setURXEN; inline;
  6200. procedure setURXISEL0; inline;
  6201. procedure setURXISEL1; inline;
  6202. procedure setUTXBF; inline;
  6203. procedure setUTXBRK; inline;
  6204. procedure setUTXEN; inline;
  6205. procedure setUTXINV; inline;
  6206. procedure setUTXISEL0; inline;
  6207. procedure setUTXISEL1; inline;
  6208. property ADDEN : TBits_1 read getADDEN write setADDEN;
  6209. property ADDR : TBits_8 read getADDR write setADDR;
  6210. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  6211. property FERR : TBits_1 read getFERR write setFERR;
  6212. property OERR : TBits_1 read getOERR write setOERR;
  6213. property PERR : TBits_1 read getPERR write setPERR;
  6214. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  6215. property TRMT : TBits_1 read getTRMT write setTRMT;
  6216. property URXDA : TBits_1 read getURXDA write setURXDA;
  6217. property URXEN : TBits_1 read getURXEN write setURXEN;
  6218. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  6219. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  6220. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  6221. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  6222. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  6223. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  6224. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  6225. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  6226. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  6227. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  6228. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  6229. property w : TBits_32 read getw write setw;
  6230. end;
  6231. TUART5_U5STA = record
  6232. private
  6233. function getADDEN : TBits_1; inline;
  6234. function getADDR : TBits_8; inline;
  6235. function getADM_EN : TBits_1; inline;
  6236. function getFERR : TBits_1; inline;
  6237. function getOERR : TBits_1; inline;
  6238. function getPERR : TBits_1; inline;
  6239. function getRIDLE : TBits_1; inline;
  6240. function getTRMT : TBits_1; inline;
  6241. function getURXDA : TBits_1; inline;
  6242. function getURXEN : TBits_1; inline;
  6243. function getURXISEL : TBits_2; inline;
  6244. function getURXISEL0 : TBits_1; inline;
  6245. function getURXISEL1 : TBits_1; inline;
  6246. function getUTXBF : TBits_1; inline;
  6247. function getUTXBRK : TBits_1; inline;
  6248. function getUTXEN : TBits_1; inline;
  6249. function getUTXINV : TBits_1; inline;
  6250. function getUTXISEL : TBits_2; inline;
  6251. function getUTXISEL0 : TBits_1; inline;
  6252. function getUTXISEL1 : TBits_1; inline;
  6253. function getUTXSEL : TBits_2; inline;
  6254. function getw : TBits_32; inline;
  6255. procedure setADDEN(thebits : TBits_1); inline;
  6256. procedure setADDR(thebits : TBits_8); inline;
  6257. procedure setADM_EN(thebits : TBits_1); inline;
  6258. procedure setFERR(thebits : TBits_1); inline;
  6259. procedure setOERR(thebits : TBits_1); inline;
  6260. procedure setPERR(thebits : TBits_1); inline;
  6261. procedure setRIDLE(thebits : TBits_1); inline;
  6262. procedure setTRMT(thebits : TBits_1); inline;
  6263. procedure setURXDA(thebits : TBits_1); inline;
  6264. procedure setURXEN(thebits : TBits_1); inline;
  6265. procedure setURXISEL(thebits : TBits_2); inline;
  6266. procedure setURXISEL0(thebits : TBits_1); inline;
  6267. procedure setURXISEL1(thebits : TBits_1); inline;
  6268. procedure setUTXBF(thebits : TBits_1); inline;
  6269. procedure setUTXBRK(thebits : TBits_1); inline;
  6270. procedure setUTXEN(thebits : TBits_1); inline;
  6271. procedure setUTXINV(thebits : TBits_1); inline;
  6272. procedure setUTXISEL(thebits : TBits_2); inline;
  6273. procedure setUTXISEL0(thebits : TBits_1); inline;
  6274. procedure setUTXISEL1(thebits : TBits_1); inline;
  6275. procedure setUTXSEL(thebits : TBits_2); inline;
  6276. procedure setw(thebits : TBits_32); inline;
  6277. public
  6278. procedure clearADDEN; inline;
  6279. procedure clearADM_EN; inline;
  6280. procedure clearFERR; inline;
  6281. procedure clearOERR; inline;
  6282. procedure clearPERR; inline;
  6283. procedure clearRIDLE; inline;
  6284. procedure clearTRMT; inline;
  6285. procedure clearURXDA; inline;
  6286. procedure clearURXEN; inline;
  6287. procedure clearURXISEL0; inline;
  6288. procedure clearURXISEL1; inline;
  6289. procedure clearUTXBF; inline;
  6290. procedure clearUTXBRK; inline;
  6291. procedure clearUTXEN; inline;
  6292. procedure clearUTXINV; inline;
  6293. procedure clearUTXISEL0; inline;
  6294. procedure clearUTXISEL1; inline;
  6295. procedure setADDEN; inline;
  6296. procedure setADM_EN; inline;
  6297. procedure setFERR; inline;
  6298. procedure setOERR; inline;
  6299. procedure setPERR; inline;
  6300. procedure setRIDLE; inline;
  6301. procedure setTRMT; inline;
  6302. procedure setURXDA; inline;
  6303. procedure setURXEN; inline;
  6304. procedure setURXISEL0; inline;
  6305. procedure setURXISEL1; inline;
  6306. procedure setUTXBF; inline;
  6307. procedure setUTXBRK; inline;
  6308. procedure setUTXEN; inline;
  6309. procedure setUTXINV; inline;
  6310. procedure setUTXISEL0; inline;
  6311. procedure setUTXISEL1; inline;
  6312. property ADDEN : TBits_1 read getADDEN write setADDEN;
  6313. property ADDR : TBits_8 read getADDR write setADDR;
  6314. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  6315. property FERR : TBits_1 read getFERR write setFERR;
  6316. property OERR : TBits_1 read getOERR write setOERR;
  6317. property PERR : TBits_1 read getPERR write setPERR;
  6318. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  6319. property TRMT : TBits_1 read getTRMT write setTRMT;
  6320. property URXDA : TBits_1 read getURXDA write setURXDA;
  6321. property URXEN : TBits_1 read getURXEN write setURXEN;
  6322. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  6323. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  6324. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  6325. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  6326. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  6327. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  6328. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  6329. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  6330. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  6331. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  6332. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  6333. property w : TBits_32 read getw write setw;
  6334. end;
  6335. type
  6336. TUART5Registers = record
  6337. U3BMODEbits : TUART5_U3BMODE;
  6338. U3BMODE : longWord;
  6339. U5MODEbits : TUART5_U5MODE;
  6340. U5MODE : longWord;
  6341. U3BMODECLR : longWord;
  6342. U5MODECLR : longWord;
  6343. U3BMODESET : longWord;
  6344. U5MODESET : longWord;
  6345. U3BMODEINV : longWord;
  6346. U5MODEINV : longWord;
  6347. U3BSTAbits : TUART5_U3BSTA;
  6348. U3BSTA : longWord;
  6349. U5STAbits : TUART5_U5STA;
  6350. U5STA : longWord;
  6351. U3BSTACLR : longWord;
  6352. U5STACLR : longWord;
  6353. U3BSTASET : longWord;
  6354. U5STASET : longWord;
  6355. U3BSTAINV : longWord;
  6356. U5STAINV : longWord;
  6357. U3BTXREG : longWord;
  6358. U5TXREG : longWord;
  6359. U3BRXREG : longWord;
  6360. U5RXREG : longWord;
  6361. U3BBRG : longWord;
  6362. U5BRG : longWord;
  6363. U3BBRGCLR : longWord;
  6364. U5BRGCLR : longWord;
  6365. U3BBRGSET : longWord;
  6366. U5BRGSET : longWord;
  6367. U3BBRGINV : longWord;
  6368. U5BRGINV : longWord;
  6369. end;
  6370. TPMP_PMCON = record
  6371. private
  6372. function getADRMUX : TBits_2; inline;
  6373. function getADRMUX0 : TBits_1; inline;
  6374. function getADRMUX1 : TBits_1; inline;
  6375. function getALP : TBits_1; inline;
  6376. function getCS1P : TBits_1; inline;
  6377. function getCS2P : TBits_1; inline;
  6378. function getCSF : TBits_2; inline;
  6379. function getCSF0 : TBits_1; inline;
  6380. function getCSF1 : TBits_1; inline;
  6381. function getON : TBits_1; inline;
  6382. function getPMPEN : TBits_1; inline;
  6383. function getPMPTTL : TBits_1; inline;
  6384. function getPSIDL : TBits_1; inline;
  6385. function getPTRDEN : TBits_1; inline;
  6386. function getPTWREN : TBits_1; inline;
  6387. function getRDSP : TBits_1; inline;
  6388. function getSIDL : TBits_1; inline;
  6389. function getWRSP : TBits_1; inline;
  6390. function getw : TBits_32; inline;
  6391. procedure setADRMUX(thebits : TBits_2); inline;
  6392. procedure setADRMUX0(thebits : TBits_1); inline;
  6393. procedure setADRMUX1(thebits : TBits_1); inline;
  6394. procedure setALP(thebits : TBits_1); inline;
  6395. procedure setCS1P(thebits : TBits_1); inline;
  6396. procedure setCS2P(thebits : TBits_1); inline;
  6397. procedure setCSF(thebits : TBits_2); inline;
  6398. procedure setCSF0(thebits : TBits_1); inline;
  6399. procedure setCSF1(thebits : TBits_1); inline;
  6400. procedure setON(thebits : TBits_1); inline;
  6401. procedure setPMPEN(thebits : TBits_1); inline;
  6402. procedure setPMPTTL(thebits : TBits_1); inline;
  6403. procedure setPSIDL(thebits : TBits_1); inline;
  6404. procedure setPTRDEN(thebits : TBits_1); inline;
  6405. procedure setPTWREN(thebits : TBits_1); inline;
  6406. procedure setRDSP(thebits : TBits_1); inline;
  6407. procedure setSIDL(thebits : TBits_1); inline;
  6408. procedure setWRSP(thebits : TBits_1); inline;
  6409. procedure setw(thebits : TBits_32); inline;
  6410. public
  6411. procedure clearADRMUX0; inline;
  6412. procedure clearADRMUX1; inline;
  6413. procedure clearALP; inline;
  6414. procedure clearCS1P; inline;
  6415. procedure clearCS2P; inline;
  6416. procedure clearCSF0; inline;
  6417. procedure clearCSF1; inline;
  6418. procedure clearON; inline;
  6419. procedure clearPMPEN; inline;
  6420. procedure clearPMPTTL; inline;
  6421. procedure clearPSIDL; inline;
  6422. procedure clearPTRDEN; inline;
  6423. procedure clearPTWREN; inline;
  6424. procedure clearRDSP; inline;
  6425. procedure clearSIDL; inline;
  6426. procedure clearWRSP; inline;
  6427. procedure setADRMUX0; inline;
  6428. procedure setADRMUX1; inline;
  6429. procedure setALP; inline;
  6430. procedure setCS1P; inline;
  6431. procedure setCS2P; inline;
  6432. procedure setCSF0; inline;
  6433. procedure setCSF1; inline;
  6434. procedure setON; inline;
  6435. procedure setPMPEN; inline;
  6436. procedure setPMPTTL; inline;
  6437. procedure setPSIDL; inline;
  6438. procedure setPTRDEN; inline;
  6439. procedure setPTWREN; inline;
  6440. procedure setRDSP; inline;
  6441. procedure setSIDL; inline;
  6442. procedure setWRSP; inline;
  6443. property ADRMUX : TBits_2 read getADRMUX write setADRMUX;
  6444. property ADRMUX0 : TBits_1 read getADRMUX0 write setADRMUX0;
  6445. property ADRMUX1 : TBits_1 read getADRMUX1 write setADRMUX1;
  6446. property ALP : TBits_1 read getALP write setALP;
  6447. property CS1P : TBits_1 read getCS1P write setCS1P;
  6448. property CS2P : TBits_1 read getCS2P write setCS2P;
  6449. property CSF : TBits_2 read getCSF write setCSF;
  6450. property CSF0 : TBits_1 read getCSF0 write setCSF0;
  6451. property CSF1 : TBits_1 read getCSF1 write setCSF1;
  6452. property ON : TBits_1 read getON write setON;
  6453. property PMPEN : TBits_1 read getPMPEN write setPMPEN;
  6454. property PMPTTL : TBits_1 read getPMPTTL write setPMPTTL;
  6455. property PSIDL : TBits_1 read getPSIDL write setPSIDL;
  6456. property PTRDEN : TBits_1 read getPTRDEN write setPTRDEN;
  6457. property PTWREN : TBits_1 read getPTWREN write setPTWREN;
  6458. property RDSP : TBits_1 read getRDSP write setRDSP;
  6459. property SIDL : TBits_1 read getSIDL write setSIDL;
  6460. property WRSP : TBits_1 read getWRSP write setWRSP;
  6461. property w : TBits_32 read getw write setw;
  6462. end;
  6463. TPMP_PMMODE = record
  6464. private
  6465. function getBUSY : TBits_1; inline;
  6466. function getINCM : TBits_2; inline;
  6467. function getINCM0 : TBits_1; inline;
  6468. function getINCM1 : TBits_1; inline;
  6469. function getIRQM : TBits_2; inline;
  6470. function getIRQM0 : TBits_1; inline;
  6471. function getIRQM1 : TBits_1; inline;
  6472. function getMODE : TBits_2; inline;
  6473. function getMODE0 : TBits_1; inline;
  6474. function getMODE1 : TBits_1; inline;
  6475. function getMODE16 : TBits_1; inline;
  6476. function getWAITB : TBits_2; inline;
  6477. function getWAITB0 : TBits_1; inline;
  6478. function getWAITB1 : TBits_1; inline;
  6479. function getWAITE : TBits_2; inline;
  6480. function getWAITE0 : TBits_1; inline;
  6481. function getWAITE1 : TBits_1; inline;
  6482. function getWAITM : TBits_4; inline;
  6483. function getWAITM0 : TBits_1; inline;
  6484. function getWAITM1 : TBits_1; inline;
  6485. function getWAITM2 : TBits_1; inline;
  6486. function getWAITM3 : TBits_1; inline;
  6487. function getw : TBits_32; inline;
  6488. procedure setBUSY(thebits : TBits_1); inline;
  6489. procedure setINCM(thebits : TBits_2); inline;
  6490. procedure setINCM0(thebits : TBits_1); inline;
  6491. procedure setINCM1(thebits : TBits_1); inline;
  6492. procedure setIRQM(thebits : TBits_2); inline;
  6493. procedure setIRQM0(thebits : TBits_1); inline;
  6494. procedure setIRQM1(thebits : TBits_1); inline;
  6495. procedure setMODE(thebits : TBits_2); inline;
  6496. procedure setMODE0(thebits : TBits_1); inline;
  6497. procedure setMODE1(thebits : TBits_1); inline;
  6498. procedure setMODE16(thebits : TBits_1); inline;
  6499. procedure setWAITB(thebits : TBits_2); inline;
  6500. procedure setWAITB0(thebits : TBits_1); inline;
  6501. procedure setWAITB1(thebits : TBits_1); inline;
  6502. procedure setWAITE(thebits : TBits_2); inline;
  6503. procedure setWAITE0(thebits : TBits_1); inline;
  6504. procedure setWAITE1(thebits : TBits_1); inline;
  6505. procedure setWAITM(thebits : TBits_4); inline;
  6506. procedure setWAITM0(thebits : TBits_1); inline;
  6507. procedure setWAITM1(thebits : TBits_1); inline;
  6508. procedure setWAITM2(thebits : TBits_1); inline;
  6509. procedure setWAITM3(thebits : TBits_1); inline;
  6510. procedure setw(thebits : TBits_32); inline;
  6511. public
  6512. procedure clearBUSY; inline;
  6513. procedure clearINCM0; inline;
  6514. procedure clearINCM1; inline;
  6515. procedure clearIRQM0; inline;
  6516. procedure clearIRQM1; inline;
  6517. procedure clearMODE0; inline;
  6518. procedure clearMODE16; inline;
  6519. procedure clearMODE1; inline;
  6520. procedure clearWAITB0; inline;
  6521. procedure clearWAITB1; inline;
  6522. procedure clearWAITE0; inline;
  6523. procedure clearWAITE1; inline;
  6524. procedure clearWAITM0; inline;
  6525. procedure clearWAITM1; inline;
  6526. procedure clearWAITM2; inline;
  6527. procedure clearWAITM3; inline;
  6528. procedure setBUSY; inline;
  6529. procedure setINCM0; inline;
  6530. procedure setINCM1; inline;
  6531. procedure setIRQM0; inline;
  6532. procedure setIRQM1; inline;
  6533. procedure setMODE0; inline;
  6534. procedure setMODE16; inline;
  6535. procedure setMODE1; inline;
  6536. procedure setWAITB0; inline;
  6537. procedure setWAITB1; inline;
  6538. procedure setWAITE0; inline;
  6539. procedure setWAITE1; inline;
  6540. procedure setWAITM0; inline;
  6541. procedure setWAITM1; inline;
  6542. procedure setWAITM2; inline;
  6543. procedure setWAITM3; inline;
  6544. property BUSY : TBits_1 read getBUSY write setBUSY;
  6545. property INCM : TBits_2 read getINCM write setINCM;
  6546. property INCM0 : TBits_1 read getINCM0 write setINCM0;
  6547. property INCM1 : TBits_1 read getINCM1 write setINCM1;
  6548. property IRQM : TBits_2 read getIRQM write setIRQM;
  6549. property IRQM0 : TBits_1 read getIRQM0 write setIRQM0;
  6550. property IRQM1 : TBits_1 read getIRQM1 write setIRQM1;
  6551. property MODE : TBits_2 read getMODE write setMODE;
  6552. property MODE0 : TBits_1 read getMODE0 write setMODE0;
  6553. property MODE1 : TBits_1 read getMODE1 write setMODE1;
  6554. property MODE16 : TBits_1 read getMODE16 write setMODE16;
  6555. property WAITB : TBits_2 read getWAITB write setWAITB;
  6556. property WAITB0 : TBits_1 read getWAITB0 write setWAITB0;
  6557. property WAITB1 : TBits_1 read getWAITB1 write setWAITB1;
  6558. property WAITE : TBits_2 read getWAITE write setWAITE;
  6559. property WAITE0 : TBits_1 read getWAITE0 write setWAITE0;
  6560. property WAITE1 : TBits_1 read getWAITE1 write setWAITE1;
  6561. property WAITM : TBits_4 read getWAITM write setWAITM;
  6562. property WAITM0 : TBits_1 read getWAITM0 write setWAITM0;
  6563. property WAITM1 : TBits_1 read getWAITM1 write setWAITM1;
  6564. property WAITM2 : TBits_1 read getWAITM2 write setWAITM2;
  6565. property WAITM3 : TBits_1 read getWAITM3 write setWAITM3;
  6566. property w : TBits_32 read getw write setw;
  6567. end;
  6568. TPMP_PMADDR = record
  6569. private
  6570. function getADDR : TBits_14; inline;
  6571. function getCS : TBits_2; inline;
  6572. function getCS1 : TBits_1; inline;
  6573. function getCS2 : TBits_1; inline;
  6574. function getPADDR : TBits_14; inline;
  6575. function getw : TBits_32; inline;
  6576. procedure setADDR(thebits : TBits_14); inline;
  6577. procedure setCS(thebits : TBits_2); inline;
  6578. procedure setCS1(thebits : TBits_1); inline;
  6579. procedure setCS2(thebits : TBits_1); inline;
  6580. procedure setPADDR(thebits : TBits_14); inline;
  6581. procedure setw(thebits : TBits_32); inline;
  6582. public
  6583. procedure clearCS1; inline;
  6584. procedure clearCS2; inline;
  6585. procedure setCS1; inline;
  6586. procedure setCS2; inline;
  6587. property ADDR : TBits_14 read getADDR write setADDR;
  6588. property CS : TBits_2 read getCS write setCS;
  6589. property CS1 : TBits_1 read getCS1 write setCS1;
  6590. property CS2 : TBits_1 read getCS2 write setCS2;
  6591. property PADDR : TBits_14 read getPADDR write setPADDR;
  6592. property w : TBits_32 read getw write setw;
  6593. end;
  6594. TPMP_PMDOUT = record
  6595. private
  6596. function getDATAOUT : TBits_32; inline;
  6597. function getw : TBits_32; inline;
  6598. procedure setDATAOUT(thebits : TBits_32); inline;
  6599. procedure setw(thebits : TBits_32); inline;
  6600. public
  6601. property DATAOUT : TBits_32 read getDATAOUT write setDATAOUT;
  6602. property w : TBits_32 read getw write setw;
  6603. end;
  6604. TPMP_PMDIN = record
  6605. private
  6606. function getDATAIN : TBits_32; inline;
  6607. function getw : TBits_32; inline;
  6608. procedure setDATAIN(thebits : TBits_32); inline;
  6609. procedure setw(thebits : TBits_32); inline;
  6610. public
  6611. property DATAIN : TBits_32 read getDATAIN write setDATAIN;
  6612. property w : TBits_32 read getw write setw;
  6613. end;
  6614. TPMP_PMAEN = record
  6615. private
  6616. function getPTEN : TBits_16; inline;
  6617. function getPTEN0 : TBits_1; inline;
  6618. function getPTEN1 : TBits_1; inline;
  6619. function getPTEN10 : TBits_1; inline;
  6620. function getPTEN11 : TBits_1; inline;
  6621. function getPTEN12 : TBits_1; inline;
  6622. function getPTEN13 : TBits_1; inline;
  6623. function getPTEN14 : TBits_1; inline;
  6624. function getPTEN15 : TBits_1; inline;
  6625. function getPTEN2 : TBits_1; inline;
  6626. function getPTEN3 : TBits_1; inline;
  6627. function getPTEN4 : TBits_1; inline;
  6628. function getPTEN5 : TBits_1; inline;
  6629. function getPTEN6 : TBits_1; inline;
  6630. function getPTEN7 : TBits_1; inline;
  6631. function getPTEN8 : TBits_1; inline;
  6632. function getPTEN9 : TBits_1; inline;
  6633. function getw : TBits_32; inline;
  6634. procedure setPTEN(thebits : TBits_16); inline;
  6635. procedure setPTEN0(thebits : TBits_1); inline;
  6636. procedure setPTEN1(thebits : TBits_1); inline;
  6637. procedure setPTEN10(thebits : TBits_1); inline;
  6638. procedure setPTEN11(thebits : TBits_1); inline;
  6639. procedure setPTEN12(thebits : TBits_1); inline;
  6640. procedure setPTEN13(thebits : TBits_1); inline;
  6641. procedure setPTEN14(thebits : TBits_1); inline;
  6642. procedure setPTEN15(thebits : TBits_1); inline;
  6643. procedure setPTEN2(thebits : TBits_1); inline;
  6644. procedure setPTEN3(thebits : TBits_1); inline;
  6645. procedure setPTEN4(thebits : TBits_1); inline;
  6646. procedure setPTEN5(thebits : TBits_1); inline;
  6647. procedure setPTEN6(thebits : TBits_1); inline;
  6648. procedure setPTEN7(thebits : TBits_1); inline;
  6649. procedure setPTEN8(thebits : TBits_1); inline;
  6650. procedure setPTEN9(thebits : TBits_1); inline;
  6651. procedure setw(thebits : TBits_32); inline;
  6652. public
  6653. procedure clearPTEN0; inline;
  6654. procedure clearPTEN10; inline;
  6655. procedure clearPTEN11; inline;
  6656. procedure clearPTEN12; inline;
  6657. procedure clearPTEN13; inline;
  6658. procedure clearPTEN14; inline;
  6659. procedure clearPTEN15; inline;
  6660. procedure clearPTEN1; inline;
  6661. procedure clearPTEN2; inline;
  6662. procedure clearPTEN3; inline;
  6663. procedure clearPTEN4; inline;
  6664. procedure clearPTEN5; inline;
  6665. procedure clearPTEN6; inline;
  6666. procedure clearPTEN7; inline;
  6667. procedure clearPTEN8; inline;
  6668. procedure clearPTEN9; inline;
  6669. procedure setPTEN0; inline;
  6670. procedure setPTEN10; inline;
  6671. procedure setPTEN11; inline;
  6672. procedure setPTEN12; inline;
  6673. procedure setPTEN13; inline;
  6674. procedure setPTEN14; inline;
  6675. procedure setPTEN15; inline;
  6676. procedure setPTEN1; inline;
  6677. procedure setPTEN2; inline;
  6678. procedure setPTEN3; inline;
  6679. procedure setPTEN4; inline;
  6680. procedure setPTEN5; inline;
  6681. procedure setPTEN6; inline;
  6682. procedure setPTEN7; inline;
  6683. procedure setPTEN8; inline;
  6684. procedure setPTEN9; inline;
  6685. property PTEN : TBits_16 read getPTEN write setPTEN;
  6686. property PTEN0 : TBits_1 read getPTEN0 write setPTEN0;
  6687. property PTEN1 : TBits_1 read getPTEN1 write setPTEN1;
  6688. property PTEN10 : TBits_1 read getPTEN10 write setPTEN10;
  6689. property PTEN11 : TBits_1 read getPTEN11 write setPTEN11;
  6690. property PTEN12 : TBits_1 read getPTEN12 write setPTEN12;
  6691. property PTEN13 : TBits_1 read getPTEN13 write setPTEN13;
  6692. property PTEN14 : TBits_1 read getPTEN14 write setPTEN14;
  6693. property PTEN15 : TBits_1 read getPTEN15 write setPTEN15;
  6694. property PTEN2 : TBits_1 read getPTEN2 write setPTEN2;
  6695. property PTEN3 : TBits_1 read getPTEN3 write setPTEN3;
  6696. property PTEN4 : TBits_1 read getPTEN4 write setPTEN4;
  6697. property PTEN5 : TBits_1 read getPTEN5 write setPTEN5;
  6698. property PTEN6 : TBits_1 read getPTEN6 write setPTEN6;
  6699. property PTEN7 : TBits_1 read getPTEN7 write setPTEN7;
  6700. property PTEN8 : TBits_1 read getPTEN8 write setPTEN8;
  6701. property PTEN9 : TBits_1 read getPTEN9 write setPTEN9;
  6702. property w : TBits_32 read getw write setw;
  6703. end;
  6704. TPMP_PMSTAT = record
  6705. private
  6706. function getIB0F : TBits_1; inline;
  6707. function getIB1F : TBits_1; inline;
  6708. function getIB2F : TBits_1; inline;
  6709. function getIB3F : TBits_1; inline;
  6710. function getIBF : TBits_1; inline;
  6711. function getIBOV : TBits_1; inline;
  6712. function getOB0E : TBits_1; inline;
  6713. function getOB1E : TBits_1; inline;
  6714. function getOB2E : TBits_1; inline;
  6715. function getOB3E : TBits_1; inline;
  6716. function getOBE : TBits_1; inline;
  6717. function getOBUF : TBits_1; inline;
  6718. function getw : TBits_32; inline;
  6719. procedure setIB0F(thebits : TBits_1); inline;
  6720. procedure setIB1F(thebits : TBits_1); inline;
  6721. procedure setIB2F(thebits : TBits_1); inline;
  6722. procedure setIB3F(thebits : TBits_1); inline;
  6723. procedure setIBF(thebits : TBits_1); inline;
  6724. procedure setIBOV(thebits : TBits_1); inline;
  6725. procedure setOB0E(thebits : TBits_1); inline;
  6726. procedure setOB1E(thebits : TBits_1); inline;
  6727. procedure setOB2E(thebits : TBits_1); inline;
  6728. procedure setOB3E(thebits : TBits_1); inline;
  6729. procedure setOBE(thebits : TBits_1); inline;
  6730. procedure setOBUF(thebits : TBits_1); inline;
  6731. procedure setw(thebits : TBits_32); inline;
  6732. public
  6733. procedure clearIB0F; inline;
  6734. procedure clearIB1F; inline;
  6735. procedure clearIB2F; inline;
  6736. procedure clearIB3F; inline;
  6737. procedure clearIBF; inline;
  6738. procedure clearIBOV; inline;
  6739. procedure clearOB0E; inline;
  6740. procedure clearOB1E; inline;
  6741. procedure clearOB2E; inline;
  6742. procedure clearOB3E; inline;
  6743. procedure clearOBE; inline;
  6744. procedure clearOBUF; inline;
  6745. procedure setIB0F; inline;
  6746. procedure setIB1F; inline;
  6747. procedure setIB2F; inline;
  6748. procedure setIB3F; inline;
  6749. procedure setIBF; inline;
  6750. procedure setIBOV; inline;
  6751. procedure setOB0E; inline;
  6752. procedure setOB1E; inline;
  6753. procedure setOB2E; inline;
  6754. procedure setOB3E; inline;
  6755. procedure setOBE; inline;
  6756. procedure setOBUF; inline;
  6757. property IB0F : TBits_1 read getIB0F write setIB0F;
  6758. property IB1F : TBits_1 read getIB1F write setIB1F;
  6759. property IB2F : TBits_1 read getIB2F write setIB2F;
  6760. property IB3F : TBits_1 read getIB3F write setIB3F;
  6761. property IBF : TBits_1 read getIBF write setIBF;
  6762. property IBOV : TBits_1 read getIBOV write setIBOV;
  6763. property OB0E : TBits_1 read getOB0E write setOB0E;
  6764. property OB1E : TBits_1 read getOB1E write setOB1E;
  6765. property OB2E : TBits_1 read getOB2E write setOB2E;
  6766. property OB3E : TBits_1 read getOB3E write setOB3E;
  6767. property OBE : TBits_1 read getOBE write setOBE;
  6768. property OBUF : TBits_1 read getOBUF write setOBUF;
  6769. property w : TBits_32 read getw write setw;
  6770. end;
  6771. type
  6772. TPMPRegisters = record
  6773. PMCONbits : TPMP_PMCON;
  6774. PMCON : longWord;
  6775. PMCONCLR : longWord;
  6776. PMCONSET : longWord;
  6777. PMCONINV : longWord;
  6778. PMMODEbits : TPMP_PMMODE;
  6779. PMMODE : longWord;
  6780. PMMODECLR : longWord;
  6781. PMMODESET : longWord;
  6782. PMMODEINV : longWord;
  6783. PMADDRbits : TPMP_PMADDR;
  6784. PMADDR : longWord;
  6785. PMADDRCLR : longWord;
  6786. PMADDRSET : longWord;
  6787. PMADDRINV : longWord;
  6788. PMDOUTbits : TPMP_PMDOUT;
  6789. PMDOUT : longWord;
  6790. PMDOUTCLR : longWord;
  6791. PMDOUTSET : longWord;
  6792. PMDOUTINV : longWord;
  6793. PMDINbits : TPMP_PMDIN;
  6794. PMDIN : longWord;
  6795. PMDINCLR : longWord;
  6796. PMDINSET : longWord;
  6797. PMDININV : longWord;
  6798. PMAENbits : TPMP_PMAEN;
  6799. PMAEN : longWord;
  6800. PMAENCLR : longWord;
  6801. PMAENSET : longWord;
  6802. PMAENINV : longWord;
  6803. PMSTATbits : TPMP_PMSTAT;
  6804. PMSTAT : longWord;
  6805. PMSTATCLR : longWord;
  6806. PMSTATSET : longWord;
  6807. PMSTATINV : longWord;
  6808. end;
  6809. TADC10_AD1CON1 = record
  6810. private
  6811. function getADON : TBits_1; inline;
  6812. function getADSIDL : TBits_1; inline;
  6813. function getASAM : TBits_1; inline;
  6814. function getCLRASAM : TBits_1; inline;
  6815. function getDONE : TBits_1; inline;
  6816. function getFORM : TBits_3; inline;
  6817. function getFORM0 : TBits_1; inline;
  6818. function getFORM1 : TBits_1; inline;
  6819. function getFORM2 : TBits_1; inline;
  6820. function getON : TBits_1; inline;
  6821. function getSAMP : TBits_1; inline;
  6822. function getSIDL : TBits_1; inline;
  6823. function getSSRC : TBits_3; inline;
  6824. function getSSRC0 : TBits_1; inline;
  6825. function getSSRC1 : TBits_1; inline;
  6826. function getSSRC2 : TBits_1; inline;
  6827. function getw : TBits_32; inline;
  6828. procedure setADON(thebits : TBits_1); inline;
  6829. procedure setADSIDL(thebits : TBits_1); inline;
  6830. procedure setASAM(thebits : TBits_1); inline;
  6831. procedure setCLRASAM(thebits : TBits_1); inline;
  6832. procedure setDONE(thebits : TBits_1); inline;
  6833. procedure setFORM(thebits : TBits_3); inline;
  6834. procedure setFORM0(thebits : TBits_1); inline;
  6835. procedure setFORM1(thebits : TBits_1); inline;
  6836. procedure setFORM2(thebits : TBits_1); inline;
  6837. procedure setON(thebits : TBits_1); inline;
  6838. procedure setSAMP(thebits : TBits_1); inline;
  6839. procedure setSIDL(thebits : TBits_1); inline;
  6840. procedure setSSRC(thebits : TBits_3); inline;
  6841. procedure setSSRC0(thebits : TBits_1); inline;
  6842. procedure setSSRC1(thebits : TBits_1); inline;
  6843. procedure setSSRC2(thebits : TBits_1); inline;
  6844. procedure setw(thebits : TBits_32); inline;
  6845. public
  6846. procedure clearADON; inline;
  6847. procedure clearADSIDL; inline;
  6848. procedure clearASAM; inline;
  6849. procedure clearCLRASAM; inline;
  6850. procedure clearDONE; inline;
  6851. procedure clearFORM0; inline;
  6852. procedure clearFORM1; inline;
  6853. procedure clearFORM2; inline;
  6854. procedure clearON; inline;
  6855. procedure clearSAMP; inline;
  6856. procedure clearSIDL; inline;
  6857. procedure clearSSRC0; inline;
  6858. procedure clearSSRC1; inline;
  6859. procedure clearSSRC2; inline;
  6860. procedure setADON; inline;
  6861. procedure setADSIDL; inline;
  6862. procedure setASAM; inline;
  6863. procedure setCLRASAM; inline;
  6864. procedure setDONE; inline;
  6865. procedure setFORM0; inline;
  6866. procedure setFORM1; inline;
  6867. procedure setFORM2; inline;
  6868. procedure setON; inline;
  6869. procedure setSAMP; inline;
  6870. procedure setSIDL; inline;
  6871. procedure setSSRC0; inline;
  6872. procedure setSSRC1; inline;
  6873. procedure setSSRC2; inline;
  6874. property ADON : TBits_1 read getADON write setADON;
  6875. property ADSIDL : TBits_1 read getADSIDL write setADSIDL;
  6876. property ASAM : TBits_1 read getASAM write setASAM;
  6877. property CLRASAM : TBits_1 read getCLRASAM write setCLRASAM;
  6878. property DONE : TBits_1 read getDONE write setDONE;
  6879. property FORM : TBits_3 read getFORM write setFORM;
  6880. property FORM0 : TBits_1 read getFORM0 write setFORM0;
  6881. property FORM1 : TBits_1 read getFORM1 write setFORM1;
  6882. property FORM2 : TBits_1 read getFORM2 write setFORM2;
  6883. property ON : TBits_1 read getON write setON;
  6884. property SAMP : TBits_1 read getSAMP write setSAMP;
  6885. property SIDL : TBits_1 read getSIDL write setSIDL;
  6886. property SSRC : TBits_3 read getSSRC write setSSRC;
  6887. property SSRC0 : TBits_1 read getSSRC0 write setSSRC0;
  6888. property SSRC1 : TBits_1 read getSSRC1 write setSSRC1;
  6889. property SSRC2 : TBits_1 read getSSRC2 write setSSRC2;
  6890. property w : TBits_32 read getw write setw;
  6891. end;
  6892. TADC10_AD1CON2 = record
  6893. private
  6894. function getALTS : TBits_1; inline;
  6895. function getBUFM : TBits_1; inline;
  6896. function getBUFS : TBits_1; inline;
  6897. function getCSCNA : TBits_1; inline;
  6898. function getOFFCAL : TBits_1; inline;
  6899. function getSMPI : TBits_4; inline;
  6900. function getSMPI0 : TBits_1; inline;
  6901. function getSMPI1 : TBits_1; inline;
  6902. function getSMPI2 : TBits_1; inline;
  6903. function getSMPI3 : TBits_1; inline;
  6904. function getVCFG : TBits_3; inline;
  6905. function getVCFG0 : TBits_1; inline;
  6906. function getVCFG1 : TBits_1; inline;
  6907. function getVCFG2 : TBits_1; inline;
  6908. function getw : TBits_32; inline;
  6909. procedure setALTS(thebits : TBits_1); inline;
  6910. procedure setBUFM(thebits : TBits_1); inline;
  6911. procedure setBUFS(thebits : TBits_1); inline;
  6912. procedure setCSCNA(thebits : TBits_1); inline;
  6913. procedure setOFFCAL(thebits : TBits_1); inline;
  6914. procedure setSMPI(thebits : TBits_4); inline;
  6915. procedure setSMPI0(thebits : TBits_1); inline;
  6916. procedure setSMPI1(thebits : TBits_1); inline;
  6917. procedure setSMPI2(thebits : TBits_1); inline;
  6918. procedure setSMPI3(thebits : TBits_1); inline;
  6919. procedure setVCFG(thebits : TBits_3); inline;
  6920. procedure setVCFG0(thebits : TBits_1); inline;
  6921. procedure setVCFG1(thebits : TBits_1); inline;
  6922. procedure setVCFG2(thebits : TBits_1); inline;
  6923. procedure setw(thebits : TBits_32); inline;
  6924. public
  6925. procedure clearALTS; inline;
  6926. procedure clearBUFM; inline;
  6927. procedure clearBUFS; inline;
  6928. procedure clearCSCNA; inline;
  6929. procedure clearOFFCAL; inline;
  6930. procedure clearSMPI0; inline;
  6931. procedure clearSMPI1; inline;
  6932. procedure clearSMPI2; inline;
  6933. procedure clearSMPI3; inline;
  6934. procedure clearVCFG0; inline;
  6935. procedure clearVCFG1; inline;
  6936. procedure clearVCFG2; inline;
  6937. procedure setALTS; inline;
  6938. procedure setBUFM; inline;
  6939. procedure setBUFS; inline;
  6940. procedure setCSCNA; inline;
  6941. procedure setOFFCAL; inline;
  6942. procedure setSMPI0; inline;
  6943. procedure setSMPI1; inline;
  6944. procedure setSMPI2; inline;
  6945. procedure setSMPI3; inline;
  6946. procedure setVCFG0; inline;
  6947. procedure setVCFG1; inline;
  6948. procedure setVCFG2; inline;
  6949. property ALTS : TBits_1 read getALTS write setALTS;
  6950. property BUFM : TBits_1 read getBUFM write setBUFM;
  6951. property BUFS : TBits_1 read getBUFS write setBUFS;
  6952. property CSCNA : TBits_1 read getCSCNA write setCSCNA;
  6953. property OFFCAL : TBits_1 read getOFFCAL write setOFFCAL;
  6954. property SMPI : TBits_4 read getSMPI write setSMPI;
  6955. property SMPI0 : TBits_1 read getSMPI0 write setSMPI0;
  6956. property SMPI1 : TBits_1 read getSMPI1 write setSMPI1;
  6957. property SMPI2 : TBits_1 read getSMPI2 write setSMPI2;
  6958. property SMPI3 : TBits_1 read getSMPI3 write setSMPI3;
  6959. property VCFG : TBits_3 read getVCFG write setVCFG;
  6960. property VCFG0 : TBits_1 read getVCFG0 write setVCFG0;
  6961. property VCFG1 : TBits_1 read getVCFG1 write setVCFG1;
  6962. property VCFG2 : TBits_1 read getVCFG2 write setVCFG2;
  6963. property w : TBits_32 read getw write setw;
  6964. end;
  6965. TADC10_AD1CON3 = record
  6966. private
  6967. function getADCS : TBits_8; inline;
  6968. function getADCS0 : TBits_1; inline;
  6969. function getADCS1 : TBits_1; inline;
  6970. function getADCS2 : TBits_1; inline;
  6971. function getADCS3 : TBits_1; inline;
  6972. function getADCS4 : TBits_1; inline;
  6973. function getADCS5 : TBits_1; inline;
  6974. function getADCS6 : TBits_1; inline;
  6975. function getADCS7 : TBits_1; inline;
  6976. function getADRC : TBits_1; inline;
  6977. function getSAMC : TBits_5; inline;
  6978. function getSAMC0 : TBits_1; inline;
  6979. function getSAMC1 : TBits_1; inline;
  6980. function getSAMC2 : TBits_1; inline;
  6981. function getSAMC3 : TBits_1; inline;
  6982. function getSAMC4 : TBits_1; inline;
  6983. function getw : TBits_32; inline;
  6984. procedure setADCS(thebits : TBits_8); inline;
  6985. procedure setADCS0(thebits : TBits_1); inline;
  6986. procedure setADCS1(thebits : TBits_1); inline;
  6987. procedure setADCS2(thebits : TBits_1); inline;
  6988. procedure setADCS3(thebits : TBits_1); inline;
  6989. procedure setADCS4(thebits : TBits_1); inline;
  6990. procedure setADCS5(thebits : TBits_1); inline;
  6991. procedure setADCS6(thebits : TBits_1); inline;
  6992. procedure setADCS7(thebits : TBits_1); inline;
  6993. procedure setADRC(thebits : TBits_1); inline;
  6994. procedure setSAMC(thebits : TBits_5); inline;
  6995. procedure setSAMC0(thebits : TBits_1); inline;
  6996. procedure setSAMC1(thebits : TBits_1); inline;
  6997. procedure setSAMC2(thebits : TBits_1); inline;
  6998. procedure setSAMC3(thebits : TBits_1); inline;
  6999. procedure setSAMC4(thebits : TBits_1); inline;
  7000. procedure setw(thebits : TBits_32); inline;
  7001. public
  7002. procedure clearADCS0; inline;
  7003. procedure clearADCS1; inline;
  7004. procedure clearADCS2; inline;
  7005. procedure clearADCS3; inline;
  7006. procedure clearADCS4; inline;
  7007. procedure clearADCS5; inline;
  7008. procedure clearADCS6; inline;
  7009. procedure clearADCS7; inline;
  7010. procedure clearADRC; inline;
  7011. procedure clearSAMC0; inline;
  7012. procedure clearSAMC1; inline;
  7013. procedure clearSAMC2; inline;
  7014. procedure clearSAMC3; inline;
  7015. procedure clearSAMC4; inline;
  7016. procedure setADCS0; inline;
  7017. procedure setADCS1; inline;
  7018. procedure setADCS2; inline;
  7019. procedure setADCS3; inline;
  7020. procedure setADCS4; inline;
  7021. procedure setADCS5; inline;
  7022. procedure setADCS6; inline;
  7023. procedure setADCS7; inline;
  7024. procedure setADRC; inline;
  7025. procedure setSAMC0; inline;
  7026. procedure setSAMC1; inline;
  7027. procedure setSAMC2; inline;
  7028. procedure setSAMC3; inline;
  7029. procedure setSAMC4; inline;
  7030. property ADCS : TBits_8 read getADCS write setADCS;
  7031. property ADCS0 : TBits_1 read getADCS0 write setADCS0;
  7032. property ADCS1 : TBits_1 read getADCS1 write setADCS1;
  7033. property ADCS2 : TBits_1 read getADCS2 write setADCS2;
  7034. property ADCS3 : TBits_1 read getADCS3 write setADCS3;
  7035. property ADCS4 : TBits_1 read getADCS4 write setADCS4;
  7036. property ADCS5 : TBits_1 read getADCS5 write setADCS5;
  7037. property ADCS6 : TBits_1 read getADCS6 write setADCS6;
  7038. property ADCS7 : TBits_1 read getADCS7 write setADCS7;
  7039. property ADRC : TBits_1 read getADRC write setADRC;
  7040. property SAMC : TBits_5 read getSAMC write setSAMC;
  7041. property SAMC0 : TBits_1 read getSAMC0 write setSAMC0;
  7042. property SAMC1 : TBits_1 read getSAMC1 write setSAMC1;
  7043. property SAMC2 : TBits_1 read getSAMC2 write setSAMC2;
  7044. property SAMC3 : TBits_1 read getSAMC3 write setSAMC3;
  7045. property SAMC4 : TBits_1 read getSAMC4 write setSAMC4;
  7046. property w : TBits_32 read getw write setw;
  7047. end;
  7048. TADC10_AD1CHS = record
  7049. private
  7050. function getCH0NA : TBits_1; inline;
  7051. function getCH0NB : TBits_1; inline;
  7052. function getCH0SA : TBits_4; inline;
  7053. function getCH0SA0 : TBits_1; inline;
  7054. function getCH0SA1 : TBits_1; inline;
  7055. function getCH0SA2 : TBits_1; inline;
  7056. function getCH0SA3 : TBits_1; inline;
  7057. function getCH0SB : TBits_4; inline;
  7058. function getCH0SB0 : TBits_1; inline;
  7059. function getCH0SB1 : TBits_1; inline;
  7060. function getCH0SB2 : TBits_1; inline;
  7061. function getCH0SB3 : TBits_1; inline;
  7062. function getw : TBits_32; inline;
  7063. procedure setCH0NA(thebits : TBits_1); inline;
  7064. procedure setCH0NB(thebits : TBits_1); inline;
  7065. procedure setCH0SA(thebits : TBits_4); inline;
  7066. procedure setCH0SA0(thebits : TBits_1); inline;
  7067. procedure setCH0SA1(thebits : TBits_1); inline;
  7068. procedure setCH0SA2(thebits : TBits_1); inline;
  7069. procedure setCH0SA3(thebits : TBits_1); inline;
  7070. procedure setCH0SB(thebits : TBits_4); inline;
  7071. procedure setCH0SB0(thebits : TBits_1); inline;
  7072. procedure setCH0SB1(thebits : TBits_1); inline;
  7073. procedure setCH0SB2(thebits : TBits_1); inline;
  7074. procedure setCH0SB3(thebits : TBits_1); inline;
  7075. procedure setw(thebits : TBits_32); inline;
  7076. public
  7077. procedure clearCH0NA; inline;
  7078. procedure clearCH0NB; inline;
  7079. procedure clearCH0SA0; inline;
  7080. procedure clearCH0SA1; inline;
  7081. procedure clearCH0SA2; inline;
  7082. procedure clearCH0SA3; inline;
  7083. procedure clearCH0SB0; inline;
  7084. procedure clearCH0SB1; inline;
  7085. procedure clearCH0SB2; inline;
  7086. procedure clearCH0SB3; inline;
  7087. procedure setCH0NA; inline;
  7088. procedure setCH0NB; inline;
  7089. procedure setCH0SA0; inline;
  7090. procedure setCH0SA1; inline;
  7091. procedure setCH0SA2; inline;
  7092. procedure setCH0SA3; inline;
  7093. procedure setCH0SB0; inline;
  7094. procedure setCH0SB1; inline;
  7095. procedure setCH0SB2; inline;
  7096. procedure setCH0SB3; inline;
  7097. property CH0NA : TBits_1 read getCH0NA write setCH0NA;
  7098. property CH0NB : TBits_1 read getCH0NB write setCH0NB;
  7099. property CH0SA : TBits_4 read getCH0SA write setCH0SA;
  7100. property CH0SA0 : TBits_1 read getCH0SA0 write setCH0SA0;
  7101. property CH0SA1 : TBits_1 read getCH0SA1 write setCH0SA1;
  7102. property CH0SA2 : TBits_1 read getCH0SA2 write setCH0SA2;
  7103. property CH0SA3 : TBits_1 read getCH0SA3 write setCH0SA3;
  7104. property CH0SB : TBits_4 read getCH0SB write setCH0SB;
  7105. property CH0SB0 : TBits_1 read getCH0SB0 write setCH0SB0;
  7106. property CH0SB1 : TBits_1 read getCH0SB1 write setCH0SB1;
  7107. property CH0SB2 : TBits_1 read getCH0SB2 write setCH0SB2;
  7108. property CH0SB3 : TBits_1 read getCH0SB3 write setCH0SB3;
  7109. property w : TBits_32 read getw write setw;
  7110. end;
  7111. TADC10_AD1CSSL = record
  7112. private
  7113. function getCSSL : TBits_16; inline;
  7114. function getCSSL0 : TBits_1; inline;
  7115. function getCSSL1 : TBits_1; inline;
  7116. function getCSSL10 : TBits_1; inline;
  7117. function getCSSL11 : TBits_1; inline;
  7118. function getCSSL12 : TBits_1; inline;
  7119. function getCSSL13 : TBits_1; inline;
  7120. function getCSSL14 : TBits_1; inline;
  7121. function getCSSL15 : TBits_1; inline;
  7122. function getCSSL2 : TBits_1; inline;
  7123. function getCSSL3 : TBits_1; inline;
  7124. function getCSSL4 : TBits_1; inline;
  7125. function getCSSL5 : TBits_1; inline;
  7126. function getCSSL6 : TBits_1; inline;
  7127. function getCSSL7 : TBits_1; inline;
  7128. function getCSSL8 : TBits_1; inline;
  7129. function getCSSL9 : TBits_1; inline;
  7130. function getw : TBits_32; inline;
  7131. procedure setCSSL(thebits : TBits_16); inline;
  7132. procedure setCSSL0(thebits : TBits_1); inline;
  7133. procedure setCSSL1(thebits : TBits_1); inline;
  7134. procedure setCSSL10(thebits : TBits_1); inline;
  7135. procedure setCSSL11(thebits : TBits_1); inline;
  7136. procedure setCSSL12(thebits : TBits_1); inline;
  7137. procedure setCSSL13(thebits : TBits_1); inline;
  7138. procedure setCSSL14(thebits : TBits_1); inline;
  7139. procedure setCSSL15(thebits : TBits_1); inline;
  7140. procedure setCSSL2(thebits : TBits_1); inline;
  7141. procedure setCSSL3(thebits : TBits_1); inline;
  7142. procedure setCSSL4(thebits : TBits_1); inline;
  7143. procedure setCSSL5(thebits : TBits_1); inline;
  7144. procedure setCSSL6(thebits : TBits_1); inline;
  7145. procedure setCSSL7(thebits : TBits_1); inline;
  7146. procedure setCSSL8(thebits : TBits_1); inline;
  7147. procedure setCSSL9(thebits : TBits_1); inline;
  7148. procedure setw(thebits : TBits_32); inline;
  7149. public
  7150. procedure clearCSSL0; inline;
  7151. procedure clearCSSL10; inline;
  7152. procedure clearCSSL11; inline;
  7153. procedure clearCSSL12; inline;
  7154. procedure clearCSSL13; inline;
  7155. procedure clearCSSL14; inline;
  7156. procedure clearCSSL15; inline;
  7157. procedure clearCSSL1; inline;
  7158. procedure clearCSSL2; inline;
  7159. procedure clearCSSL3; inline;
  7160. procedure clearCSSL4; inline;
  7161. procedure clearCSSL5; inline;
  7162. procedure clearCSSL6; inline;
  7163. procedure clearCSSL7; inline;
  7164. procedure clearCSSL8; inline;
  7165. procedure clearCSSL9; inline;
  7166. procedure setCSSL0; inline;
  7167. procedure setCSSL10; inline;
  7168. procedure setCSSL11; inline;
  7169. procedure setCSSL12; inline;
  7170. procedure setCSSL13; inline;
  7171. procedure setCSSL14; inline;
  7172. procedure setCSSL15; inline;
  7173. procedure setCSSL1; inline;
  7174. procedure setCSSL2; inline;
  7175. procedure setCSSL3; inline;
  7176. procedure setCSSL4; inline;
  7177. procedure setCSSL5; inline;
  7178. procedure setCSSL6; inline;
  7179. procedure setCSSL7; inline;
  7180. procedure setCSSL8; inline;
  7181. procedure setCSSL9; inline;
  7182. property CSSL : TBits_16 read getCSSL write setCSSL;
  7183. property CSSL0 : TBits_1 read getCSSL0 write setCSSL0;
  7184. property CSSL1 : TBits_1 read getCSSL1 write setCSSL1;
  7185. property CSSL10 : TBits_1 read getCSSL10 write setCSSL10;
  7186. property CSSL11 : TBits_1 read getCSSL11 write setCSSL11;
  7187. property CSSL12 : TBits_1 read getCSSL12 write setCSSL12;
  7188. property CSSL13 : TBits_1 read getCSSL13 write setCSSL13;
  7189. property CSSL14 : TBits_1 read getCSSL14 write setCSSL14;
  7190. property CSSL15 : TBits_1 read getCSSL15 write setCSSL15;
  7191. property CSSL2 : TBits_1 read getCSSL2 write setCSSL2;
  7192. property CSSL3 : TBits_1 read getCSSL3 write setCSSL3;
  7193. property CSSL4 : TBits_1 read getCSSL4 write setCSSL4;
  7194. property CSSL5 : TBits_1 read getCSSL5 write setCSSL5;
  7195. property CSSL6 : TBits_1 read getCSSL6 write setCSSL6;
  7196. property CSSL7 : TBits_1 read getCSSL7 write setCSSL7;
  7197. property CSSL8 : TBits_1 read getCSSL8 write setCSSL8;
  7198. property CSSL9 : TBits_1 read getCSSL9 write setCSSL9;
  7199. property w : TBits_32 read getw write setw;
  7200. end;
  7201. TADC10_AD1PCFG = record
  7202. private
  7203. function getPCFG : TBits_16; inline;
  7204. function getPCFG0 : TBits_1; inline;
  7205. function getPCFG1 : TBits_1; inline;
  7206. function getPCFG10 : TBits_1; inline;
  7207. function getPCFG11 : TBits_1; inline;
  7208. function getPCFG12 : TBits_1; inline;
  7209. function getPCFG13 : TBits_1; inline;
  7210. function getPCFG14 : TBits_1; inline;
  7211. function getPCFG15 : TBits_1; inline;
  7212. function getPCFG2 : TBits_1; inline;
  7213. function getPCFG3 : TBits_1; inline;
  7214. function getPCFG4 : TBits_1; inline;
  7215. function getPCFG5 : TBits_1; inline;
  7216. function getPCFG6 : TBits_1; inline;
  7217. function getPCFG7 : TBits_1; inline;
  7218. function getPCFG8 : TBits_1; inline;
  7219. function getPCFG9 : TBits_1; inline;
  7220. function getw : TBits_32; inline;
  7221. procedure setPCFG(thebits : TBits_16); inline;
  7222. procedure setPCFG0(thebits : TBits_1); inline;
  7223. procedure setPCFG1(thebits : TBits_1); inline;
  7224. procedure setPCFG10(thebits : TBits_1); inline;
  7225. procedure setPCFG11(thebits : TBits_1); inline;
  7226. procedure setPCFG12(thebits : TBits_1); inline;
  7227. procedure setPCFG13(thebits : TBits_1); inline;
  7228. procedure setPCFG14(thebits : TBits_1); inline;
  7229. procedure setPCFG15(thebits : TBits_1); inline;
  7230. procedure setPCFG2(thebits : TBits_1); inline;
  7231. procedure setPCFG3(thebits : TBits_1); inline;
  7232. procedure setPCFG4(thebits : TBits_1); inline;
  7233. procedure setPCFG5(thebits : TBits_1); inline;
  7234. procedure setPCFG6(thebits : TBits_1); inline;
  7235. procedure setPCFG7(thebits : TBits_1); inline;
  7236. procedure setPCFG8(thebits : TBits_1); inline;
  7237. procedure setPCFG9(thebits : TBits_1); inline;
  7238. procedure setw(thebits : TBits_32); inline;
  7239. public
  7240. procedure clearPCFG0; inline;
  7241. procedure clearPCFG10; inline;
  7242. procedure clearPCFG11; inline;
  7243. procedure clearPCFG12; inline;
  7244. procedure clearPCFG13; inline;
  7245. procedure clearPCFG14; inline;
  7246. procedure clearPCFG15; inline;
  7247. procedure clearPCFG1; inline;
  7248. procedure clearPCFG2; inline;
  7249. procedure clearPCFG3; inline;
  7250. procedure clearPCFG4; inline;
  7251. procedure clearPCFG5; inline;
  7252. procedure clearPCFG6; inline;
  7253. procedure clearPCFG7; inline;
  7254. procedure clearPCFG8; inline;
  7255. procedure clearPCFG9; inline;
  7256. procedure setPCFG0; inline;
  7257. procedure setPCFG10; inline;
  7258. procedure setPCFG11; inline;
  7259. procedure setPCFG12; inline;
  7260. procedure setPCFG13; inline;
  7261. procedure setPCFG14; inline;
  7262. procedure setPCFG15; inline;
  7263. procedure setPCFG1; inline;
  7264. procedure setPCFG2; inline;
  7265. procedure setPCFG3; inline;
  7266. procedure setPCFG4; inline;
  7267. procedure setPCFG5; inline;
  7268. procedure setPCFG6; inline;
  7269. procedure setPCFG7; inline;
  7270. procedure setPCFG8; inline;
  7271. procedure setPCFG9; inline;
  7272. property PCFG : TBits_16 read getPCFG write setPCFG;
  7273. property PCFG0 : TBits_1 read getPCFG0 write setPCFG0;
  7274. property PCFG1 : TBits_1 read getPCFG1 write setPCFG1;
  7275. property PCFG10 : TBits_1 read getPCFG10 write setPCFG10;
  7276. property PCFG11 : TBits_1 read getPCFG11 write setPCFG11;
  7277. property PCFG12 : TBits_1 read getPCFG12 write setPCFG12;
  7278. property PCFG13 : TBits_1 read getPCFG13 write setPCFG13;
  7279. property PCFG14 : TBits_1 read getPCFG14 write setPCFG14;
  7280. property PCFG15 : TBits_1 read getPCFG15 write setPCFG15;
  7281. property PCFG2 : TBits_1 read getPCFG2 write setPCFG2;
  7282. property PCFG3 : TBits_1 read getPCFG3 write setPCFG3;
  7283. property PCFG4 : TBits_1 read getPCFG4 write setPCFG4;
  7284. property PCFG5 : TBits_1 read getPCFG5 write setPCFG5;
  7285. property PCFG6 : TBits_1 read getPCFG6 write setPCFG6;
  7286. property PCFG7 : TBits_1 read getPCFG7 write setPCFG7;
  7287. property PCFG8 : TBits_1 read getPCFG8 write setPCFG8;
  7288. property PCFG9 : TBits_1 read getPCFG9 write setPCFG9;
  7289. property w : TBits_32 read getw write setw;
  7290. end;
  7291. type
  7292. TADC10Registers = record
  7293. AD1CON1bits : TADC10_AD1CON1;
  7294. AD1CON1 : longWord;
  7295. AD1CON1CLR : longWord;
  7296. AD1CON1SET : longWord;
  7297. AD1CON1INV : longWord;
  7298. AD1CON2bits : TADC10_AD1CON2;
  7299. AD1CON2 : longWord;
  7300. AD1CON2CLR : longWord;
  7301. AD1CON2SET : longWord;
  7302. AD1CON2INV : longWord;
  7303. AD1CON3bits : TADC10_AD1CON3;
  7304. AD1CON3 : longWord;
  7305. AD1CON3CLR : longWord;
  7306. AD1CON3SET : longWord;
  7307. AD1CON3INV : longWord;
  7308. AD1CHSbits : TADC10_AD1CHS;
  7309. AD1CHS : longWord;
  7310. AD1CHSCLR : longWord;
  7311. AD1CHSSET : longWord;
  7312. AD1CHSINV : longWord;
  7313. AD1CSSLbits : TADC10_AD1CSSL;
  7314. AD1CSSL : longWord;
  7315. AD1CSSLCLR : longWord;
  7316. AD1CSSLSET : longWord;
  7317. AD1CSSLINV : longWord;
  7318. AD1PCFGbits : TADC10_AD1PCFG;
  7319. AD1PCFG : longWord;
  7320. AD1PCFGCLR : longWord;
  7321. AD1PCFGSET : longWord;
  7322. AD1PCFGINV : longWord;
  7323. ADC1BUF0 : longWord;
  7324. ADC1BUF1 : longWord;
  7325. ADC1BUF2 : longWord;
  7326. ADC1BUF3 : longWord;
  7327. ADC1BUF4 : longWord;
  7328. ADC1BUF5 : longWord;
  7329. ADC1BUF6 : longWord;
  7330. ADC1BUF7 : longWord;
  7331. ADC1BUF8 : longWord;
  7332. ADC1BUF9 : longWord;
  7333. ADC1BUFA : longWord;
  7334. ADC1BUFB : longWord;
  7335. ADC1BUFC : longWord;
  7336. ADC1BUFD : longWord;
  7337. ADC1BUFE : longWord;
  7338. ADC1BUFF : longWord;
  7339. end;
  7340. TCVR_CVRCON = record
  7341. private
  7342. function getBGSEL : TBits_2; inline;
  7343. function getBGSEL0 : TBits_1; inline;
  7344. function getBGSEL1 : TBits_1; inline;
  7345. function getCVR : TBits_4; inline;
  7346. function getCVR0 : TBits_1; inline;
  7347. function getCVR1 : TBits_1; inline;
  7348. function getCVR2 : TBits_1; inline;
  7349. function getCVR3 : TBits_1; inline;
  7350. function getCVROE : TBits_1; inline;
  7351. function getCVRR : TBits_1; inline;
  7352. function getCVRSS : TBits_1; inline;
  7353. function getON : TBits_1; inline;
  7354. function getVREFSEL : TBits_1; inline;
  7355. function getw : TBits_32; inline;
  7356. procedure setBGSEL(thebits : TBits_2); inline;
  7357. procedure setBGSEL0(thebits : TBits_1); inline;
  7358. procedure setBGSEL1(thebits : TBits_1); inline;
  7359. procedure setCVR(thebits : TBits_4); inline;
  7360. procedure setCVR0(thebits : TBits_1); inline;
  7361. procedure setCVR1(thebits : TBits_1); inline;
  7362. procedure setCVR2(thebits : TBits_1); inline;
  7363. procedure setCVR3(thebits : TBits_1); inline;
  7364. procedure setCVROE(thebits : TBits_1); inline;
  7365. procedure setCVRR(thebits : TBits_1); inline;
  7366. procedure setCVRSS(thebits : TBits_1); inline;
  7367. procedure setON(thebits : TBits_1); inline;
  7368. procedure setVREFSEL(thebits : TBits_1); inline;
  7369. procedure setw(thebits : TBits_32); inline;
  7370. public
  7371. procedure clearBGSEL0; inline;
  7372. procedure clearBGSEL1; inline;
  7373. procedure clearCVR0; inline;
  7374. procedure clearCVR1; inline;
  7375. procedure clearCVR2; inline;
  7376. procedure clearCVR3; inline;
  7377. procedure clearCVROE; inline;
  7378. procedure clearCVRR; inline;
  7379. procedure clearCVRSS; inline;
  7380. procedure clearON; inline;
  7381. procedure clearVREFSEL; inline;
  7382. procedure setBGSEL0; inline;
  7383. procedure setBGSEL1; inline;
  7384. procedure setCVR0; inline;
  7385. procedure setCVR1; inline;
  7386. procedure setCVR2; inline;
  7387. procedure setCVR3; inline;
  7388. procedure setCVROE; inline;
  7389. procedure setCVRR; inline;
  7390. procedure setCVRSS; inline;
  7391. procedure setON; inline;
  7392. procedure setVREFSEL; inline;
  7393. property BGSEL : TBits_2 read getBGSEL write setBGSEL;
  7394. property BGSEL0 : TBits_1 read getBGSEL0 write setBGSEL0;
  7395. property BGSEL1 : TBits_1 read getBGSEL1 write setBGSEL1;
  7396. property CVR : TBits_4 read getCVR write setCVR;
  7397. property CVR0 : TBits_1 read getCVR0 write setCVR0;
  7398. property CVR1 : TBits_1 read getCVR1 write setCVR1;
  7399. property CVR2 : TBits_1 read getCVR2 write setCVR2;
  7400. property CVR3 : TBits_1 read getCVR3 write setCVR3;
  7401. property CVROE : TBits_1 read getCVROE write setCVROE;
  7402. property CVRR : TBits_1 read getCVRR write setCVRR;
  7403. property CVRSS : TBits_1 read getCVRSS write setCVRSS;
  7404. property ON : TBits_1 read getON write setON;
  7405. property VREFSEL : TBits_1 read getVREFSEL write setVREFSEL;
  7406. property w : TBits_32 read getw write setw;
  7407. end;
  7408. type
  7409. TCVRRegisters = record
  7410. CVRCONbits : TCVR_CVRCON;
  7411. CVRCON : longWord;
  7412. CVRCONCLR : longWord;
  7413. CVRCONSET : longWord;
  7414. CVRCONINV : longWord;
  7415. end;
  7416. TCMP_CM1CON = record
  7417. private
  7418. function getCCH : TBits_2; inline;
  7419. function getCCH0 : TBits_1; inline;
  7420. function getCCH1 : TBits_1; inline;
  7421. function getCOE : TBits_1; inline;
  7422. function getCOUT : TBits_1; inline;
  7423. function getCPOL : TBits_1; inline;
  7424. function getCREF : TBits_1; inline;
  7425. function getEVPOL : TBits_2; inline;
  7426. function getEVPOL0 : TBits_1; inline;
  7427. function getEVPOL1 : TBits_1; inline;
  7428. function getON : TBits_1; inline;
  7429. function getw : TBits_32; inline;
  7430. procedure setCCH(thebits : TBits_2); inline;
  7431. procedure setCCH0(thebits : TBits_1); inline;
  7432. procedure setCCH1(thebits : TBits_1); inline;
  7433. procedure setCOE(thebits : TBits_1); inline;
  7434. procedure setCOUT(thebits : TBits_1); inline;
  7435. procedure setCPOL(thebits : TBits_1); inline;
  7436. procedure setCREF(thebits : TBits_1); inline;
  7437. procedure setEVPOL(thebits : TBits_2); inline;
  7438. procedure setEVPOL0(thebits : TBits_1); inline;
  7439. procedure setEVPOL1(thebits : TBits_1); inline;
  7440. procedure setON(thebits : TBits_1); inline;
  7441. procedure setw(thebits : TBits_32); inline;
  7442. public
  7443. procedure clearCCH0; inline;
  7444. procedure clearCCH1; inline;
  7445. procedure clearCOE; inline;
  7446. procedure clearCOUT; inline;
  7447. procedure clearCPOL; inline;
  7448. procedure clearCREF; inline;
  7449. procedure clearEVPOL0; inline;
  7450. procedure clearEVPOL1; inline;
  7451. procedure clearON; inline;
  7452. procedure setCCH0; inline;
  7453. procedure setCCH1; inline;
  7454. procedure setCOE; inline;
  7455. procedure setCOUT; inline;
  7456. procedure setCPOL; inline;
  7457. procedure setCREF; inline;
  7458. procedure setEVPOL0; inline;
  7459. procedure setEVPOL1; inline;
  7460. procedure setON; inline;
  7461. property CCH : TBits_2 read getCCH write setCCH;
  7462. property CCH0 : TBits_1 read getCCH0 write setCCH0;
  7463. property CCH1 : TBits_1 read getCCH1 write setCCH1;
  7464. property COE : TBits_1 read getCOE write setCOE;
  7465. property COUT : TBits_1 read getCOUT write setCOUT;
  7466. property CPOL : TBits_1 read getCPOL write setCPOL;
  7467. property CREF : TBits_1 read getCREF write setCREF;
  7468. property EVPOL : TBits_2 read getEVPOL write setEVPOL;
  7469. property EVPOL0 : TBits_1 read getEVPOL0 write setEVPOL0;
  7470. property EVPOL1 : TBits_1 read getEVPOL1 write setEVPOL1;
  7471. property ON : TBits_1 read getON write setON;
  7472. property w : TBits_32 read getw write setw;
  7473. end;
  7474. TCMP_CM2CON = record
  7475. private
  7476. function getCCH : TBits_2; inline;
  7477. function getCCH0 : TBits_1; inline;
  7478. function getCCH1 : TBits_1; inline;
  7479. function getCOE : TBits_1; inline;
  7480. function getCOUT : TBits_1; inline;
  7481. function getCPOL : TBits_1; inline;
  7482. function getCREF : TBits_1; inline;
  7483. function getEVPOL : TBits_2; inline;
  7484. function getEVPOL0 : TBits_1; inline;
  7485. function getEVPOL1 : TBits_1; inline;
  7486. function getON : TBits_1; inline;
  7487. function getw : TBits_32; inline;
  7488. procedure setCCH(thebits : TBits_2); inline;
  7489. procedure setCCH0(thebits : TBits_1); inline;
  7490. procedure setCCH1(thebits : TBits_1); inline;
  7491. procedure setCOE(thebits : TBits_1); inline;
  7492. procedure setCOUT(thebits : TBits_1); inline;
  7493. procedure setCPOL(thebits : TBits_1); inline;
  7494. procedure setCREF(thebits : TBits_1); inline;
  7495. procedure setEVPOL(thebits : TBits_2); inline;
  7496. procedure setEVPOL0(thebits : TBits_1); inline;
  7497. procedure setEVPOL1(thebits : TBits_1); inline;
  7498. procedure setON(thebits : TBits_1); inline;
  7499. procedure setw(thebits : TBits_32); inline;
  7500. public
  7501. procedure clearCCH0; inline;
  7502. procedure clearCCH1; inline;
  7503. procedure clearCOE; inline;
  7504. procedure clearCOUT; inline;
  7505. procedure clearCPOL; inline;
  7506. procedure clearCREF; inline;
  7507. procedure clearEVPOL0; inline;
  7508. procedure clearEVPOL1; inline;
  7509. procedure clearON; inline;
  7510. procedure setCCH0; inline;
  7511. procedure setCCH1; inline;
  7512. procedure setCOE; inline;
  7513. procedure setCOUT; inline;
  7514. procedure setCPOL; inline;
  7515. procedure setCREF; inline;
  7516. procedure setEVPOL0; inline;
  7517. procedure setEVPOL1; inline;
  7518. procedure setON; inline;
  7519. property CCH : TBits_2 read getCCH write setCCH;
  7520. property CCH0 : TBits_1 read getCCH0 write setCCH0;
  7521. property CCH1 : TBits_1 read getCCH1 write setCCH1;
  7522. property COE : TBits_1 read getCOE write setCOE;
  7523. property COUT : TBits_1 read getCOUT write setCOUT;
  7524. property CPOL : TBits_1 read getCPOL write setCPOL;
  7525. property CREF : TBits_1 read getCREF write setCREF;
  7526. property EVPOL : TBits_2 read getEVPOL write setEVPOL;
  7527. property EVPOL0 : TBits_1 read getEVPOL0 write setEVPOL0;
  7528. property EVPOL1 : TBits_1 read getEVPOL1 write setEVPOL1;
  7529. property ON : TBits_1 read getON write setON;
  7530. property w : TBits_32 read getw write setw;
  7531. end;
  7532. TCMP_CMSTAT = record
  7533. private
  7534. function getC1OUT : TBits_1; inline;
  7535. function getC2OUT : TBits_1; inline;
  7536. function getSIDL : TBits_1; inline;
  7537. function getw : TBits_32; inline;
  7538. procedure setC1OUT(thebits : TBits_1); inline;
  7539. procedure setC2OUT(thebits : TBits_1); inline;
  7540. procedure setSIDL(thebits : TBits_1); inline;
  7541. procedure setw(thebits : TBits_32); inline;
  7542. public
  7543. procedure clearC1OUT; inline;
  7544. procedure clearC2OUT; inline;
  7545. procedure clearSIDL; inline;
  7546. procedure setC1OUT; inline;
  7547. procedure setC2OUT; inline;
  7548. procedure setSIDL; inline;
  7549. property C1OUT : TBits_1 read getC1OUT write setC1OUT;
  7550. property C2OUT : TBits_1 read getC2OUT write setC2OUT;
  7551. property SIDL : TBits_1 read getSIDL write setSIDL;
  7552. property w : TBits_32 read getw write setw;
  7553. end;
  7554. type
  7555. TCMPRegisters = record
  7556. CM1CONbits : TCMP_CM1CON;
  7557. CM1CON : longWord;
  7558. CM1CONCLR : longWord;
  7559. CM1CONSET : longWord;
  7560. CM1CONINV : longWord;
  7561. CM2CONbits : TCMP_CM2CON;
  7562. CM2CON : longWord;
  7563. CM2CONCLR : longWord;
  7564. CM2CONSET : longWord;
  7565. CM2CONINV : longWord;
  7566. CMSTATbits : TCMP_CMSTAT;
  7567. CMSTAT : longWord;
  7568. CMSTATCLR : longWord;
  7569. CMSTATSET : longWord;
  7570. CMSTATINV : longWord;
  7571. end;
  7572. TOSC_OSCCON = record
  7573. private
  7574. function getCF : TBits_1; inline;
  7575. function getCLKLOCK : TBits_1; inline;
  7576. function getCOSC : TBits_3; inline;
  7577. function getCOSC0 : TBits_1; inline;
  7578. function getCOSC1 : TBits_1; inline;
  7579. function getCOSC2 : TBits_1; inline;
  7580. function getFRCDIV : TBits_3; inline;
  7581. function getFRCDIV0 : TBits_1; inline;
  7582. function getFRCDIV1 : TBits_1; inline;
  7583. function getFRCDIV2 : TBits_1; inline;
  7584. function getNOSC : TBits_3; inline;
  7585. function getNOSC0 : TBits_1; inline;
  7586. function getNOSC1 : TBits_1; inline;
  7587. function getNOSC2 : TBits_1; inline;
  7588. function getOSWEN : TBits_1; inline;
  7589. function getPBDIV : TBits_2; inline;
  7590. function getPBDIV0 : TBits_1; inline;
  7591. function getPBDIV1 : TBits_1; inline;
  7592. function getPLLMULT : TBits_3; inline;
  7593. function getPLLMULT0 : TBits_1; inline;
  7594. function getPLLMULT1 : TBits_1; inline;
  7595. function getPLLMULT2 : TBits_1; inline;
  7596. function getPLLODIV : TBits_3; inline;
  7597. function getPLLODIV0 : TBits_1; inline;
  7598. function getPLLODIV1 : TBits_1; inline;
  7599. function getPLLODIV2 : TBits_1; inline;
  7600. function getSLOCK : TBits_1; inline;
  7601. function getSLPEN : TBits_1; inline;
  7602. function getSOSCEN : TBits_1; inline;
  7603. function getSOSCRDY : TBits_1; inline;
  7604. function getUFRCEN : TBits_1; inline;
  7605. function getULOCK : TBits_1; inline;
  7606. function getw : TBits_32; inline;
  7607. procedure setCF(thebits : TBits_1); inline;
  7608. procedure setCLKLOCK(thebits : TBits_1); inline;
  7609. procedure setCOSC(thebits : TBits_3); inline;
  7610. procedure setCOSC0(thebits : TBits_1); inline;
  7611. procedure setCOSC1(thebits : TBits_1); inline;
  7612. procedure setCOSC2(thebits : TBits_1); inline;
  7613. procedure setFRCDIV(thebits : TBits_3); inline;
  7614. procedure setFRCDIV0(thebits : TBits_1); inline;
  7615. procedure setFRCDIV1(thebits : TBits_1); inline;
  7616. procedure setFRCDIV2(thebits : TBits_1); inline;
  7617. procedure setNOSC(thebits : TBits_3); inline;
  7618. procedure setNOSC0(thebits : TBits_1); inline;
  7619. procedure setNOSC1(thebits : TBits_1); inline;
  7620. procedure setNOSC2(thebits : TBits_1); inline;
  7621. procedure setOSWEN(thebits : TBits_1); inline;
  7622. procedure setPBDIV(thebits : TBits_2); inline;
  7623. procedure setPBDIV0(thebits : TBits_1); inline;
  7624. procedure setPBDIV1(thebits : TBits_1); inline;
  7625. procedure setPLLMULT(thebits : TBits_3); inline;
  7626. procedure setPLLMULT0(thebits : TBits_1); inline;
  7627. procedure setPLLMULT1(thebits : TBits_1); inline;
  7628. procedure setPLLMULT2(thebits : TBits_1); inline;
  7629. procedure setPLLODIV(thebits : TBits_3); inline;
  7630. procedure setPLLODIV0(thebits : TBits_1); inline;
  7631. procedure setPLLODIV1(thebits : TBits_1); inline;
  7632. procedure setPLLODIV2(thebits : TBits_1); inline;
  7633. procedure setSLOCK(thebits : TBits_1); inline;
  7634. procedure setSLPEN(thebits : TBits_1); inline;
  7635. procedure setSOSCEN(thebits : TBits_1); inline;
  7636. procedure setSOSCRDY(thebits : TBits_1); inline;
  7637. procedure setUFRCEN(thebits : TBits_1); inline;
  7638. procedure setULOCK(thebits : TBits_1); inline;
  7639. procedure setw(thebits : TBits_32); inline;
  7640. public
  7641. procedure clearCF; inline;
  7642. procedure clearCLKLOCK; inline;
  7643. procedure clearCOSC0; inline;
  7644. procedure clearCOSC1; inline;
  7645. procedure clearCOSC2; inline;
  7646. procedure clearFRCDIV0; inline;
  7647. procedure clearFRCDIV1; inline;
  7648. procedure clearFRCDIV2; inline;
  7649. procedure clearNOSC0; inline;
  7650. procedure clearNOSC1; inline;
  7651. procedure clearNOSC2; inline;
  7652. procedure clearOSWEN; inline;
  7653. procedure clearPBDIV0; inline;
  7654. procedure clearPBDIV1; inline;
  7655. procedure clearPLLMULT0; inline;
  7656. procedure clearPLLMULT1; inline;
  7657. procedure clearPLLMULT2; inline;
  7658. procedure clearPLLODIV0; inline;
  7659. procedure clearPLLODIV1; inline;
  7660. procedure clearPLLODIV2; inline;
  7661. procedure clearSLOCK; inline;
  7662. procedure clearSLPEN; inline;
  7663. procedure clearSOSCEN; inline;
  7664. procedure clearSOSCRDY; inline;
  7665. procedure clearUFRCEN; inline;
  7666. procedure clearULOCK; inline;
  7667. procedure setCF; inline;
  7668. procedure setCLKLOCK; inline;
  7669. procedure setCOSC0; inline;
  7670. procedure setCOSC1; inline;
  7671. procedure setCOSC2; inline;
  7672. procedure setFRCDIV0; inline;
  7673. procedure setFRCDIV1; inline;
  7674. procedure setFRCDIV2; inline;
  7675. procedure setNOSC0; inline;
  7676. procedure setNOSC1; inline;
  7677. procedure setNOSC2; inline;
  7678. procedure setOSWEN; inline;
  7679. procedure setPBDIV0; inline;
  7680. procedure setPBDIV1; inline;
  7681. procedure setPLLMULT0; inline;
  7682. procedure setPLLMULT1; inline;
  7683. procedure setPLLMULT2; inline;
  7684. procedure setPLLODIV0; inline;
  7685. procedure setPLLODIV1; inline;
  7686. procedure setPLLODIV2; inline;
  7687. procedure setSLOCK; inline;
  7688. procedure setSLPEN; inline;
  7689. procedure setSOSCEN; inline;
  7690. procedure setSOSCRDY; inline;
  7691. procedure setUFRCEN; inline;
  7692. procedure setULOCK; inline;
  7693. property CF : TBits_1 read getCF write setCF;
  7694. property CLKLOCK : TBits_1 read getCLKLOCK write setCLKLOCK;
  7695. property COSC : TBits_3 read getCOSC write setCOSC;
  7696. property COSC0 : TBits_1 read getCOSC0 write setCOSC0;
  7697. property COSC1 : TBits_1 read getCOSC1 write setCOSC1;
  7698. property COSC2 : TBits_1 read getCOSC2 write setCOSC2;
  7699. property FRCDIV : TBits_3 read getFRCDIV write setFRCDIV;
  7700. property FRCDIV0 : TBits_1 read getFRCDIV0 write setFRCDIV0;
  7701. property FRCDIV1 : TBits_1 read getFRCDIV1 write setFRCDIV1;
  7702. property FRCDIV2 : TBits_1 read getFRCDIV2 write setFRCDIV2;
  7703. property NOSC : TBits_3 read getNOSC write setNOSC;
  7704. property NOSC0 : TBits_1 read getNOSC0 write setNOSC0;
  7705. property NOSC1 : TBits_1 read getNOSC1 write setNOSC1;
  7706. property NOSC2 : TBits_1 read getNOSC2 write setNOSC2;
  7707. property OSWEN : TBits_1 read getOSWEN write setOSWEN;
  7708. property PBDIV : TBits_2 read getPBDIV write setPBDIV;
  7709. property PBDIV0 : TBits_1 read getPBDIV0 write setPBDIV0;
  7710. property PBDIV1 : TBits_1 read getPBDIV1 write setPBDIV1;
  7711. property PLLMULT : TBits_3 read getPLLMULT write setPLLMULT;
  7712. property PLLMULT0 : TBits_1 read getPLLMULT0 write setPLLMULT0;
  7713. property PLLMULT1 : TBits_1 read getPLLMULT1 write setPLLMULT1;
  7714. property PLLMULT2 : TBits_1 read getPLLMULT2 write setPLLMULT2;
  7715. property PLLODIV : TBits_3 read getPLLODIV write setPLLODIV;
  7716. property PLLODIV0 : TBits_1 read getPLLODIV0 write setPLLODIV0;
  7717. property PLLODIV1 : TBits_1 read getPLLODIV1 write setPLLODIV1;
  7718. property PLLODIV2 : TBits_1 read getPLLODIV2 write setPLLODIV2;
  7719. property SLOCK : TBits_1 read getSLOCK write setSLOCK;
  7720. property SLPEN : TBits_1 read getSLPEN write setSLPEN;
  7721. property SOSCEN : TBits_1 read getSOSCEN write setSOSCEN;
  7722. property SOSCRDY : TBits_1 read getSOSCRDY write setSOSCRDY;
  7723. property UFRCEN : TBits_1 read getUFRCEN write setUFRCEN;
  7724. property ULOCK : TBits_1 read getULOCK write setULOCK;
  7725. property w : TBits_32 read getw write setw;
  7726. end;
  7727. TOSC_OSCTUN = record
  7728. private
  7729. function getTUN : TBits_6; inline;
  7730. function getTUN0 : TBits_1; inline;
  7731. function getTUN1 : TBits_1; inline;
  7732. function getTUN2 : TBits_1; inline;
  7733. function getTUN3 : TBits_1; inline;
  7734. function getTUN4 : TBits_1; inline;
  7735. function getTUN5 : TBits_1; inline;
  7736. function getw : TBits_32; inline;
  7737. procedure setTUN(thebits : TBits_6); inline;
  7738. procedure setTUN0(thebits : TBits_1); inline;
  7739. procedure setTUN1(thebits : TBits_1); inline;
  7740. procedure setTUN2(thebits : TBits_1); inline;
  7741. procedure setTUN3(thebits : TBits_1); inline;
  7742. procedure setTUN4(thebits : TBits_1); inline;
  7743. procedure setTUN5(thebits : TBits_1); inline;
  7744. procedure setw(thebits : TBits_32); inline;
  7745. public
  7746. procedure clearTUN0; inline;
  7747. procedure clearTUN1; inline;
  7748. procedure clearTUN2; inline;
  7749. procedure clearTUN3; inline;
  7750. procedure clearTUN4; inline;
  7751. procedure clearTUN5; inline;
  7752. procedure setTUN0; inline;
  7753. procedure setTUN1; inline;
  7754. procedure setTUN2; inline;
  7755. procedure setTUN3; inline;
  7756. procedure setTUN4; inline;
  7757. procedure setTUN5; inline;
  7758. property TUN : TBits_6 read getTUN write setTUN;
  7759. property TUN0 : TBits_1 read getTUN0 write setTUN0;
  7760. property TUN1 : TBits_1 read getTUN1 write setTUN1;
  7761. property TUN2 : TBits_1 read getTUN2 write setTUN2;
  7762. property TUN3 : TBits_1 read getTUN3 write setTUN3;
  7763. property TUN4 : TBits_1 read getTUN4 write setTUN4;
  7764. property TUN5 : TBits_1 read getTUN5 write setTUN5;
  7765. property w : TBits_32 read getw write setw;
  7766. end;
  7767. type
  7768. TOSCRegisters = record
  7769. OSCCONbits : TOSC_OSCCON;
  7770. OSCCON : longWord;
  7771. OSCCONCLR : longWord;
  7772. OSCCONSET : longWord;
  7773. OSCCONINV : longWord;
  7774. OSCTUNbits : TOSC_OSCTUN;
  7775. OSCTUN : longWord;
  7776. OSCTUNCLR : longWord;
  7777. OSCTUNSET : longWord;
  7778. OSCTUNINV : longWord;
  7779. end;
  7780. type
  7781. TCFGRegisters = record
  7782. DDPCON : longWord;
  7783. DEVID : longWord;
  7784. SYSKEY : longWord;
  7785. SYSKEYCLR : longWord;
  7786. SYSKEYSET : longWord;
  7787. SYSKEYINV : longWord;
  7788. end;
  7789. TNVM_NVMCON = record
  7790. private
  7791. function getLVDERR : TBits_1; inline;
  7792. function getLVDSTAT : TBits_1; inline;
  7793. function getNVMOP : TBits_4; inline;
  7794. function getNVMOP0 : TBits_1; inline;
  7795. function getNVMOP1 : TBits_1; inline;
  7796. function getNVMOP2 : TBits_1; inline;
  7797. function getNVMOP3 : TBits_1; inline;
  7798. function getPROGOP : TBits_4; inline;
  7799. function getPROGOP0 : TBits_1; inline;
  7800. function getPROGOP1 : TBits_1; inline;
  7801. function getPROGOP2 : TBits_1; inline;
  7802. function getPROGOP3 : TBits_1; inline;
  7803. function getWR : TBits_1; inline;
  7804. function getWREN : TBits_1; inline;
  7805. function getWRERR : TBits_1; inline;
  7806. function getw : TBits_32; inline;
  7807. procedure setLVDERR(thebits : TBits_1); inline;
  7808. procedure setLVDSTAT(thebits : TBits_1); inline;
  7809. procedure setNVMOP(thebits : TBits_4); inline;
  7810. procedure setNVMOP0(thebits : TBits_1); inline;
  7811. procedure setNVMOP1(thebits : TBits_1); inline;
  7812. procedure setNVMOP2(thebits : TBits_1); inline;
  7813. procedure setNVMOP3(thebits : TBits_1); inline;
  7814. procedure setPROGOP(thebits : TBits_4); inline;
  7815. procedure setPROGOP0(thebits : TBits_1); inline;
  7816. procedure setPROGOP1(thebits : TBits_1); inline;
  7817. procedure setPROGOP2(thebits : TBits_1); inline;
  7818. procedure setPROGOP3(thebits : TBits_1); inline;
  7819. procedure setWR(thebits : TBits_1); inline;
  7820. procedure setWREN(thebits : TBits_1); inline;
  7821. procedure setWRERR(thebits : TBits_1); inline;
  7822. procedure setw(thebits : TBits_32); inline;
  7823. public
  7824. procedure clearLVDERR; inline;
  7825. procedure clearLVDSTAT; inline;
  7826. procedure clearNVMOP0; inline;
  7827. procedure clearNVMOP1; inline;
  7828. procedure clearNVMOP2; inline;
  7829. procedure clearNVMOP3; inline;
  7830. procedure clearPROGOP0; inline;
  7831. procedure clearPROGOP1; inline;
  7832. procedure clearPROGOP2; inline;
  7833. procedure clearPROGOP3; inline;
  7834. procedure clearWR; inline;
  7835. procedure clearWREN; inline;
  7836. procedure clearWRERR; inline;
  7837. procedure setLVDERR; inline;
  7838. procedure setLVDSTAT; inline;
  7839. procedure setNVMOP0; inline;
  7840. procedure setNVMOP1; inline;
  7841. procedure setNVMOP2; inline;
  7842. procedure setNVMOP3; inline;
  7843. procedure setPROGOP0; inline;
  7844. procedure setPROGOP1; inline;
  7845. procedure setPROGOP2; inline;
  7846. procedure setPROGOP3; inline;
  7847. procedure setWR; inline;
  7848. procedure setWREN; inline;
  7849. procedure setWRERR; inline;
  7850. property LVDERR : TBits_1 read getLVDERR write setLVDERR;
  7851. property LVDSTAT : TBits_1 read getLVDSTAT write setLVDSTAT;
  7852. property NVMOP : TBits_4 read getNVMOP write setNVMOP;
  7853. property NVMOP0 : TBits_1 read getNVMOP0 write setNVMOP0;
  7854. property NVMOP1 : TBits_1 read getNVMOP1 write setNVMOP1;
  7855. property NVMOP2 : TBits_1 read getNVMOP2 write setNVMOP2;
  7856. property NVMOP3 : TBits_1 read getNVMOP3 write setNVMOP3;
  7857. property PROGOP : TBits_4 read getPROGOP write setPROGOP;
  7858. property PROGOP0 : TBits_1 read getPROGOP0 write setPROGOP0;
  7859. property PROGOP1 : TBits_1 read getPROGOP1 write setPROGOP1;
  7860. property PROGOP2 : TBits_1 read getPROGOP2 write setPROGOP2;
  7861. property PROGOP3 : TBits_1 read getPROGOP3 write setPROGOP3;
  7862. property WR : TBits_1 read getWR write setWR;
  7863. property WREN : TBits_1 read getWREN write setWREN;
  7864. property WRERR : TBits_1 read getWRERR write setWRERR;
  7865. property w : TBits_32 read getw write setw;
  7866. end;
  7867. type
  7868. TNVMRegisters = record
  7869. NVMCONbits : TNVM_NVMCON;
  7870. NVMCON : longWord;
  7871. NVMCONCLR : longWord;
  7872. NVMCONSET : longWord;
  7873. NVMCONINV : longWord;
  7874. NVMKEY : longWord;
  7875. NVMADDR : longWord;
  7876. NVMADDRCLR : longWord;
  7877. NVMADDRSET : longWord;
  7878. NVMADDRINV : longWord;
  7879. NVMDATA : longWord;
  7880. NVMSRCADDR : longWord;
  7881. end;
  7882. TRCON_RCON = record
  7883. private
  7884. function getBOR : TBits_1; inline;
  7885. function getCMR : TBits_1; inline;
  7886. function getEXTR : TBits_1; inline;
  7887. function getIDLE : TBits_1; inline;
  7888. function getPOR : TBits_1; inline;
  7889. function getSLEEP : TBits_1; inline;
  7890. function getSWR : TBits_1; inline;
  7891. function getVREGS : TBits_1; inline;
  7892. function getWDTO : TBits_1; inline;
  7893. function getw : TBits_32; inline;
  7894. procedure setBOR(thebits : TBits_1); inline;
  7895. procedure setCMR(thebits : TBits_1); inline;
  7896. procedure setEXTR(thebits : TBits_1); inline;
  7897. procedure setIDLE(thebits : TBits_1); inline;
  7898. procedure setPOR(thebits : TBits_1); inline;
  7899. procedure setSLEEP(thebits : TBits_1); inline;
  7900. procedure setSWR(thebits : TBits_1); inline;
  7901. procedure setVREGS(thebits : TBits_1); inline;
  7902. procedure setWDTO(thebits : TBits_1); inline;
  7903. procedure setw(thebits : TBits_32); inline;
  7904. public
  7905. procedure clearBOR; inline;
  7906. procedure clearCMR; inline;
  7907. procedure clearEXTR; inline;
  7908. procedure clearIDLE; inline;
  7909. procedure clearPOR; inline;
  7910. procedure clearSLEEP; inline;
  7911. procedure clearSWR; inline;
  7912. procedure clearVREGS; inline;
  7913. procedure clearWDTO; inline;
  7914. procedure setBOR; inline;
  7915. procedure setCMR; inline;
  7916. procedure setEXTR; inline;
  7917. procedure setIDLE; inline;
  7918. procedure setPOR; inline;
  7919. procedure setSLEEP; inline;
  7920. procedure setSWR; inline;
  7921. procedure setVREGS; inline;
  7922. procedure setWDTO; inline;
  7923. property BOR : TBits_1 read getBOR write setBOR;
  7924. property CMR : TBits_1 read getCMR write setCMR;
  7925. property EXTR : TBits_1 read getEXTR write setEXTR;
  7926. property IDLE : TBits_1 read getIDLE write setIDLE;
  7927. property POR : TBits_1 read getPOR write setPOR;
  7928. property SLEEP : TBits_1 read getSLEEP write setSLEEP;
  7929. property SWR : TBits_1 read getSWR write setSWR;
  7930. property VREGS : TBits_1 read getVREGS write setVREGS;
  7931. property WDTO : TBits_1 read getWDTO write setWDTO;
  7932. property w : TBits_32 read getw write setw;
  7933. end;
  7934. TRCON_RSWRST = record
  7935. private
  7936. function getSWRST : TBits_1; inline;
  7937. function getw : TBits_32; inline;
  7938. procedure setSWRST(thebits : TBits_1); inline;
  7939. procedure setw(thebits : TBits_32); inline;
  7940. public
  7941. procedure clearSWRST; inline;
  7942. procedure setSWRST; inline;
  7943. property SWRST : TBits_1 read getSWRST write setSWRST;
  7944. property w : TBits_32 read getw write setw;
  7945. end;
  7946. type
  7947. TRCONRegisters = record
  7948. RCONbits : TRCON_RCON;
  7949. RCON : longWord;
  7950. RCONCLR : longWord;
  7951. RCONSET : longWord;
  7952. RCONINV : longWord;
  7953. RSWRSTbits : TRCON_RSWRST;
  7954. RSWRST : longWord;
  7955. RSWRSTCLR : longWord;
  7956. RSWRSTSET : longWord;
  7957. RSWRSTINV : longWord;
  7958. end;
  7959. type
  7960. T_DDPSTATRegisters = record
  7961. _DDPSTAT : longWord;
  7962. end;
  7963. type
  7964. T_STRORegisters = record
  7965. _STRO : longWord;
  7966. _STROCLR : longWord;
  7967. _STROSET : longWord;
  7968. _STROINV : longWord;
  7969. end;
  7970. type
  7971. T_APPORegisters = record
  7972. _APPO : longWord;
  7973. _APPOCLR : longWord;
  7974. _APPOSET : longWord;
  7975. _APPOINV : longWord;
  7976. end;
  7977. type
  7978. T_APPIRegisters = record
  7979. _APPI : longWord;
  7980. end;
  7981. TINT_INTCON = record
  7982. private
  7983. function getFRZ : TBits_1; inline;
  7984. function getINT0EP : TBits_1; inline;
  7985. function getINT1EP : TBits_1; inline;
  7986. function getINT2EP : TBits_1; inline;
  7987. function getINT3EP : TBits_1; inline;
  7988. function getINT4EP : TBits_1; inline;
  7989. function getMVEC : TBits_1; inline;
  7990. function getSS0 : TBits_1; inline;
  7991. function getTPC : TBits_3; inline;
  7992. function getw : TBits_32; inline;
  7993. procedure setFRZ(thebits : TBits_1); inline;
  7994. procedure setINT0EP(thebits : TBits_1); inline;
  7995. procedure setINT1EP(thebits : TBits_1); inline;
  7996. procedure setINT2EP(thebits : TBits_1); inline;
  7997. procedure setINT3EP(thebits : TBits_1); inline;
  7998. procedure setINT4EP(thebits : TBits_1); inline;
  7999. procedure setMVEC(thebits : TBits_1); inline;
  8000. procedure setSS0(thebits : TBits_1); inline;
  8001. procedure setTPC(thebits : TBits_3); inline;
  8002. procedure setw(thebits : TBits_32); inline;
  8003. public
  8004. procedure clearFRZ; inline;
  8005. procedure clearINT0EP; inline;
  8006. procedure clearINT1EP; inline;
  8007. procedure clearINT2EP; inline;
  8008. procedure clearINT3EP; inline;
  8009. procedure clearINT4EP; inline;
  8010. procedure clearMVEC; inline;
  8011. procedure clearSS0; inline;
  8012. procedure setFRZ; inline;
  8013. procedure setINT0EP; inline;
  8014. procedure setINT1EP; inline;
  8015. procedure setINT2EP; inline;
  8016. procedure setINT3EP; inline;
  8017. procedure setINT4EP; inline;
  8018. procedure setMVEC; inline;
  8019. procedure setSS0; inline;
  8020. property FRZ : TBits_1 read getFRZ write setFRZ;
  8021. property INT0EP : TBits_1 read getINT0EP write setINT0EP;
  8022. property INT1EP : TBits_1 read getINT1EP write setINT1EP;
  8023. property INT2EP : TBits_1 read getINT2EP write setINT2EP;
  8024. property INT3EP : TBits_1 read getINT3EP write setINT3EP;
  8025. property INT4EP : TBits_1 read getINT4EP write setINT4EP;
  8026. property MVEC : TBits_1 read getMVEC write setMVEC;
  8027. property SS0 : TBits_1 read getSS0 write setSS0;
  8028. property TPC : TBits_3 read getTPC write setTPC;
  8029. property w : TBits_32 read getw write setw;
  8030. end;
  8031. TINT_IFS0 = record
  8032. private
  8033. function getCS0IF : TBits_1; inline;
  8034. function getCS1IF : TBits_1; inline;
  8035. function getCTIF : TBits_1; inline;
  8036. function getI2C1ABIF : TBits_1; inline;
  8037. function getI2C1AMIF : TBits_1; inline;
  8038. function getI2C1ASIF : TBits_1; inline;
  8039. function getI2C1BIF : TBits_1; inline;
  8040. function getI2C1MIF : TBits_1; inline;
  8041. function getI2C1SIF : TBits_1; inline;
  8042. function getI2C3BIF : TBits_1; inline;
  8043. function getI2C3MIF : TBits_1; inline;
  8044. function getI2C3SIF : TBits_1; inline;
  8045. function getIC1IF : TBits_1; inline;
  8046. function getIC2IF : TBits_1; inline;
  8047. function getIC3IF : TBits_1; inline;
  8048. function getIC4IF : TBits_1; inline;
  8049. function getIC5IF : TBits_1; inline;
  8050. function getINT0IF : TBits_1; inline;
  8051. function getINT1IF : TBits_1; inline;
  8052. function getINT2IF : TBits_1; inline;
  8053. function getINT3IF : TBits_1; inline;
  8054. function getINT4IF : TBits_1; inline;
  8055. function getOC1IF : TBits_1; inline;
  8056. function getOC2IF : TBits_1; inline;
  8057. function getOC3IF : TBits_1; inline;
  8058. function getOC4IF : TBits_1; inline;
  8059. function getOC5IF : TBits_1; inline;
  8060. function getSPI1AEIF : TBits_1; inline;
  8061. function getSPI1ARXIF : TBits_1; inline;
  8062. function getSPI1ATXIF : TBits_1; inline;
  8063. function getSPI3EIF : TBits_1; inline;
  8064. function getSPI3RXIF : TBits_1; inline;
  8065. function getSPI3TXIF : TBits_1; inline;
  8066. function getT1IF : TBits_1; inline;
  8067. function getT2IF : TBits_1; inline;
  8068. function getT3IF : TBits_1; inline;
  8069. function getT4IF : TBits_1; inline;
  8070. function getT5IF : TBits_1; inline;
  8071. function getU1AEIF : TBits_1; inline;
  8072. function getU1ARXIF : TBits_1; inline;
  8073. function getU1ATXIF : TBits_1; inline;
  8074. function getU1EIF : TBits_1; inline;
  8075. function getU1RXIF : TBits_1; inline;
  8076. function getU1TXIF : TBits_1; inline;
  8077. function getw : TBits_32; inline;
  8078. procedure setCS0IF(thebits : TBits_1); inline;
  8079. procedure setCS1IF(thebits : TBits_1); inline;
  8080. procedure setCTIF(thebits : TBits_1); inline;
  8081. procedure setI2C1ABIF(thebits : TBits_1); inline;
  8082. procedure setI2C1AMIF(thebits : TBits_1); inline;
  8083. procedure setI2C1ASIF(thebits : TBits_1); inline;
  8084. procedure setI2C1BIF(thebits : TBits_1); inline;
  8085. procedure setI2C1MIF(thebits : TBits_1); inline;
  8086. procedure setI2C1SIF(thebits : TBits_1); inline;
  8087. procedure setI2C3BIF(thebits : TBits_1); inline;
  8088. procedure setI2C3MIF(thebits : TBits_1); inline;
  8089. procedure setI2C3SIF(thebits : TBits_1); inline;
  8090. procedure setIC1IF(thebits : TBits_1); inline;
  8091. procedure setIC2IF(thebits : TBits_1); inline;
  8092. procedure setIC3IF(thebits : TBits_1); inline;
  8093. procedure setIC4IF(thebits : TBits_1); inline;
  8094. procedure setIC5IF(thebits : TBits_1); inline;
  8095. procedure setINT0IF(thebits : TBits_1); inline;
  8096. procedure setINT1IF(thebits : TBits_1); inline;
  8097. procedure setINT2IF(thebits : TBits_1); inline;
  8098. procedure setINT3IF(thebits : TBits_1); inline;
  8099. procedure setINT4IF(thebits : TBits_1); inline;
  8100. procedure setOC1IF(thebits : TBits_1); inline;
  8101. procedure setOC2IF(thebits : TBits_1); inline;
  8102. procedure setOC3IF(thebits : TBits_1); inline;
  8103. procedure setOC4IF(thebits : TBits_1); inline;
  8104. procedure setOC5IF(thebits : TBits_1); inline;
  8105. procedure setSPI1AEIF(thebits : TBits_1); inline;
  8106. procedure setSPI1ARXIF(thebits : TBits_1); inline;
  8107. procedure setSPI1ATXIF(thebits : TBits_1); inline;
  8108. procedure setSPI3EIF(thebits : TBits_1); inline;
  8109. procedure setSPI3RXIF(thebits : TBits_1); inline;
  8110. procedure setSPI3TXIF(thebits : TBits_1); inline;
  8111. procedure setT1IF(thebits : TBits_1); inline;
  8112. procedure setT2IF(thebits : TBits_1); inline;
  8113. procedure setT3IF(thebits : TBits_1); inline;
  8114. procedure setT4IF(thebits : TBits_1); inline;
  8115. procedure setT5IF(thebits : TBits_1); inline;
  8116. procedure setU1AEIF(thebits : TBits_1); inline;
  8117. procedure setU1ARXIF(thebits : TBits_1); inline;
  8118. procedure setU1ATXIF(thebits : TBits_1); inline;
  8119. procedure setU1EIF(thebits : TBits_1); inline;
  8120. procedure setU1RXIF(thebits : TBits_1); inline;
  8121. procedure setU1TXIF(thebits : TBits_1); inline;
  8122. procedure setw(thebits : TBits_32); inline;
  8123. public
  8124. procedure clearCS0IF; inline;
  8125. procedure clearCS1IF; inline;
  8126. procedure clearCTIF; inline;
  8127. procedure clearI2C1ABIF; inline;
  8128. procedure clearI2C1AMIF; inline;
  8129. procedure clearI2C1ASIF; inline;
  8130. procedure clearI2C1BIF; inline;
  8131. procedure clearI2C1MIF; inline;
  8132. procedure clearI2C1SIF; inline;
  8133. procedure clearI2C3BIF; inline;
  8134. procedure clearI2C3MIF; inline;
  8135. procedure clearI2C3SIF; inline;
  8136. procedure clearIC1IF; inline;
  8137. procedure clearIC2IF; inline;
  8138. procedure clearIC3IF; inline;
  8139. procedure clearIC4IF; inline;
  8140. procedure clearIC5IF; inline;
  8141. procedure clearINT0IF; inline;
  8142. procedure clearINT1IF; inline;
  8143. procedure clearINT2IF; inline;
  8144. procedure clearINT3IF; inline;
  8145. procedure clearINT4IF; inline;
  8146. procedure clearOC1IF; inline;
  8147. procedure clearOC2IF; inline;
  8148. procedure clearOC3IF; inline;
  8149. procedure clearOC4IF; inline;
  8150. procedure clearOC5IF; inline;
  8151. procedure clearSPI1AEIF; inline;
  8152. procedure clearSPI1ARXIF; inline;
  8153. procedure clearSPI1ATXIF; inline;
  8154. procedure clearSPI3EIF; inline;
  8155. procedure clearSPI3RXIF; inline;
  8156. procedure clearSPI3TXIF; inline;
  8157. procedure clearT1IF; inline;
  8158. procedure clearT2IF; inline;
  8159. procedure clearT3IF; inline;
  8160. procedure clearT4IF; inline;
  8161. procedure clearT5IF; inline;
  8162. procedure clearU1AEIF; inline;
  8163. procedure clearU1ARXIF; inline;
  8164. procedure clearU1ATXIF; inline;
  8165. procedure clearU1EIF; inline;
  8166. procedure clearU1RXIF; inline;
  8167. procedure clearU1TXIF; inline;
  8168. procedure setCS0IF; inline;
  8169. procedure setCS1IF; inline;
  8170. procedure setCTIF; inline;
  8171. procedure setI2C1ABIF; inline;
  8172. procedure setI2C1AMIF; inline;
  8173. procedure setI2C1ASIF; inline;
  8174. procedure setI2C1BIF; inline;
  8175. procedure setI2C1MIF; inline;
  8176. procedure setI2C1SIF; inline;
  8177. procedure setI2C3BIF; inline;
  8178. procedure setI2C3MIF; inline;
  8179. procedure setI2C3SIF; inline;
  8180. procedure setIC1IF; inline;
  8181. procedure setIC2IF; inline;
  8182. procedure setIC3IF; inline;
  8183. procedure setIC4IF; inline;
  8184. procedure setIC5IF; inline;
  8185. procedure setINT0IF; inline;
  8186. procedure setINT1IF; inline;
  8187. procedure setINT2IF; inline;
  8188. procedure setINT3IF; inline;
  8189. procedure setINT4IF; inline;
  8190. procedure setOC1IF; inline;
  8191. procedure setOC2IF; inline;
  8192. procedure setOC3IF; inline;
  8193. procedure setOC4IF; inline;
  8194. procedure setOC5IF; inline;
  8195. procedure setSPI1AEIF; inline;
  8196. procedure setSPI1ARXIF; inline;
  8197. procedure setSPI1ATXIF; inline;
  8198. procedure setSPI3EIF; inline;
  8199. procedure setSPI3RXIF; inline;
  8200. procedure setSPI3TXIF; inline;
  8201. procedure setT1IF; inline;
  8202. procedure setT2IF; inline;
  8203. procedure setT3IF; inline;
  8204. procedure setT4IF; inline;
  8205. procedure setT5IF; inline;
  8206. procedure setU1AEIF; inline;
  8207. procedure setU1ARXIF; inline;
  8208. procedure setU1ATXIF; inline;
  8209. procedure setU1EIF; inline;
  8210. procedure setU1RXIF; inline;
  8211. procedure setU1TXIF; inline;
  8212. property CS0IF : TBits_1 read getCS0IF write setCS0IF;
  8213. property CS1IF : TBits_1 read getCS1IF write setCS1IF;
  8214. property CTIF : TBits_1 read getCTIF write setCTIF;
  8215. property I2C1ABIF : TBits_1 read getI2C1ABIF write setI2C1ABIF;
  8216. property I2C1AMIF : TBits_1 read getI2C1AMIF write setI2C1AMIF;
  8217. property I2C1ASIF : TBits_1 read getI2C1ASIF write setI2C1ASIF;
  8218. property I2C1BIF : TBits_1 read getI2C1BIF write setI2C1BIF;
  8219. property I2C1MIF : TBits_1 read getI2C1MIF write setI2C1MIF;
  8220. property I2C1SIF : TBits_1 read getI2C1SIF write setI2C1SIF;
  8221. property I2C3BIF : TBits_1 read getI2C3BIF write setI2C3BIF;
  8222. property I2C3MIF : TBits_1 read getI2C3MIF write setI2C3MIF;
  8223. property I2C3SIF : TBits_1 read getI2C3SIF write setI2C3SIF;
  8224. property IC1IF : TBits_1 read getIC1IF write setIC1IF;
  8225. property IC2IF : TBits_1 read getIC2IF write setIC2IF;
  8226. property IC3IF : TBits_1 read getIC3IF write setIC3IF;
  8227. property IC4IF : TBits_1 read getIC4IF write setIC4IF;
  8228. property IC5IF : TBits_1 read getIC5IF write setIC5IF;
  8229. property INT0IF : TBits_1 read getINT0IF write setINT0IF;
  8230. property INT1IF : TBits_1 read getINT1IF write setINT1IF;
  8231. property INT2IF : TBits_1 read getINT2IF write setINT2IF;
  8232. property INT3IF : TBits_1 read getINT3IF write setINT3IF;
  8233. property INT4IF : TBits_1 read getINT4IF write setINT4IF;
  8234. property OC1IF : TBits_1 read getOC1IF write setOC1IF;
  8235. property OC2IF : TBits_1 read getOC2IF write setOC2IF;
  8236. property OC3IF : TBits_1 read getOC3IF write setOC3IF;
  8237. property OC4IF : TBits_1 read getOC4IF write setOC4IF;
  8238. property OC5IF : TBits_1 read getOC5IF write setOC5IF;
  8239. property SPI1AEIF : TBits_1 read getSPI1AEIF write setSPI1AEIF;
  8240. property SPI1ARXIF : TBits_1 read getSPI1ARXIF write setSPI1ARXIF;
  8241. property SPI1ATXIF : TBits_1 read getSPI1ATXIF write setSPI1ATXIF;
  8242. property SPI3EIF : TBits_1 read getSPI3EIF write setSPI3EIF;
  8243. property SPI3RXIF : TBits_1 read getSPI3RXIF write setSPI3RXIF;
  8244. property SPI3TXIF : TBits_1 read getSPI3TXIF write setSPI3TXIF;
  8245. property T1IF : TBits_1 read getT1IF write setT1IF;
  8246. property T2IF : TBits_1 read getT2IF write setT2IF;
  8247. property T3IF : TBits_1 read getT3IF write setT3IF;
  8248. property T4IF : TBits_1 read getT4IF write setT4IF;
  8249. property T5IF : TBits_1 read getT5IF write setT5IF;
  8250. property U1AEIF : TBits_1 read getU1AEIF write setU1AEIF;
  8251. property U1ARXIF : TBits_1 read getU1ARXIF write setU1ARXIF;
  8252. property U1ATXIF : TBits_1 read getU1ATXIF write setU1ATXIF;
  8253. property U1EIF : TBits_1 read getU1EIF write setU1EIF;
  8254. property U1RXIF : TBits_1 read getU1RXIF write setU1RXIF;
  8255. property U1TXIF : TBits_1 read getU1TXIF write setU1TXIF;
  8256. property w : TBits_32 read getw write setw;
  8257. end;
  8258. TINT_IFS1 = record
  8259. private
  8260. function getAD1IF : TBits_1; inline;
  8261. function getCAN1IF : TBits_1; inline;
  8262. function getCMP1IF : TBits_1; inline;
  8263. function getCMP2IF : TBits_1; inline;
  8264. function getCNIF : TBits_1; inline;
  8265. function getDMA0IF : TBits_1; inline;
  8266. function getDMA1IF : TBits_1; inline;
  8267. function getDMA2IF : TBits_1; inline;
  8268. function getDMA3IF : TBits_1; inline;
  8269. function getFCEIF : TBits_1; inline;
  8270. function getFSCMIF : TBits_1; inline;
  8271. function getI2C2ABIF : TBits_1; inline;
  8272. function getI2C2AMIF : TBits_1; inline;
  8273. function getI2C2ASIF : TBits_1; inline;
  8274. function getI2C3ABIF : TBits_1; inline;
  8275. function getI2C3AMIF : TBits_1; inline;
  8276. function getI2C3ASIF : TBits_1; inline;
  8277. function getI2C4BIF : TBits_1; inline;
  8278. function getI2C4MIF : TBits_1; inline;
  8279. function getI2C4SIF : TBits_1; inline;
  8280. function getI2C5BIF : TBits_1; inline;
  8281. function getI2C5MIF : TBits_1; inline;
  8282. function getI2C5SIF : TBits_1; inline;
  8283. function getIC1EIF : TBits_1; inline;
  8284. function getIC2EIF : TBits_1; inline;
  8285. function getIC3EIF : TBits_1; inline;
  8286. function getPMPIF : TBits_1; inline;
  8287. function getRTCCIF : TBits_1; inline;
  8288. function getSPI2AEIF : TBits_1; inline;
  8289. function getSPI2ARXIF : TBits_1; inline;
  8290. function getSPI2ATXIF : TBits_1; inline;
  8291. function getSPI2EIF : TBits_1; inline;
  8292. function getSPI2RXIF : TBits_1; inline;
  8293. function getSPI2TXIF : TBits_1; inline;
  8294. function getSPI3AEIF : TBits_1; inline;
  8295. function getSPI3ARXIF : TBits_1; inline;
  8296. function getSPI3ATXIF : TBits_1; inline;
  8297. function getSPI4EIF : TBits_1; inline;
  8298. function getSPI4RXIF : TBits_1; inline;
  8299. function getSPI4TXIF : TBits_1; inline;
  8300. function getU2AEIF : TBits_1; inline;
  8301. function getU2ARXIF : TBits_1; inline;
  8302. function getU2ATXIF : TBits_1; inline;
  8303. function getU2EIF : TBits_1; inline;
  8304. function getU2RXIF : TBits_1; inline;
  8305. function getU2TXIF : TBits_1; inline;
  8306. function getU3AEIF : TBits_1; inline;
  8307. function getU3ARXIF : TBits_1; inline;
  8308. function getU3ATXIF : TBits_1; inline;
  8309. function getU3EIF : TBits_1; inline;
  8310. function getU3RXIF : TBits_1; inline;
  8311. function getU3TXIF : TBits_1; inline;
  8312. function getUSBIF : TBits_1; inline;
  8313. function getw : TBits_32; inline;
  8314. procedure setAD1IF(thebits : TBits_1); inline;
  8315. procedure setCAN1IF(thebits : TBits_1); inline;
  8316. procedure setCMP1IF(thebits : TBits_1); inline;
  8317. procedure setCMP2IF(thebits : TBits_1); inline;
  8318. procedure setCNIF(thebits : TBits_1); inline;
  8319. procedure setDMA0IF(thebits : TBits_1); inline;
  8320. procedure setDMA1IF(thebits : TBits_1); inline;
  8321. procedure setDMA2IF(thebits : TBits_1); inline;
  8322. procedure setDMA3IF(thebits : TBits_1); inline;
  8323. procedure setFCEIF(thebits : TBits_1); inline;
  8324. procedure setFSCMIF(thebits : TBits_1); inline;
  8325. procedure setI2C2ABIF(thebits : TBits_1); inline;
  8326. procedure setI2C2AMIF(thebits : TBits_1); inline;
  8327. procedure setI2C2ASIF(thebits : TBits_1); inline;
  8328. procedure setI2C3ABIF(thebits : TBits_1); inline;
  8329. procedure setI2C3AMIF(thebits : TBits_1); inline;
  8330. procedure setI2C3ASIF(thebits : TBits_1); inline;
  8331. procedure setI2C4BIF(thebits : TBits_1); inline;
  8332. procedure setI2C4MIF(thebits : TBits_1); inline;
  8333. procedure setI2C4SIF(thebits : TBits_1); inline;
  8334. procedure setI2C5BIF(thebits : TBits_1); inline;
  8335. procedure setI2C5MIF(thebits : TBits_1); inline;
  8336. procedure setI2C5SIF(thebits : TBits_1); inline;
  8337. procedure setIC1EIF(thebits : TBits_1); inline;
  8338. procedure setIC2EIF(thebits : TBits_1); inline;
  8339. procedure setIC3EIF(thebits : TBits_1); inline;
  8340. procedure setPMPIF(thebits : TBits_1); inline;
  8341. procedure setRTCCIF(thebits : TBits_1); inline;
  8342. procedure setSPI2AEIF(thebits : TBits_1); inline;
  8343. procedure setSPI2ARXIF(thebits : TBits_1); inline;
  8344. procedure setSPI2ATXIF(thebits : TBits_1); inline;
  8345. procedure setSPI2EIF(thebits : TBits_1); inline;
  8346. procedure setSPI2RXIF(thebits : TBits_1); inline;
  8347. procedure setSPI2TXIF(thebits : TBits_1); inline;
  8348. procedure setSPI3AEIF(thebits : TBits_1); inline;
  8349. procedure setSPI3ARXIF(thebits : TBits_1); inline;
  8350. procedure setSPI3ATXIF(thebits : TBits_1); inline;
  8351. procedure setSPI4EIF(thebits : TBits_1); inline;
  8352. procedure setSPI4RXIF(thebits : TBits_1); inline;
  8353. procedure setSPI4TXIF(thebits : TBits_1); inline;
  8354. procedure setU2AEIF(thebits : TBits_1); inline;
  8355. procedure setU2ARXIF(thebits : TBits_1); inline;
  8356. procedure setU2ATXIF(thebits : TBits_1); inline;
  8357. procedure setU2EIF(thebits : TBits_1); inline;
  8358. procedure setU2RXIF(thebits : TBits_1); inline;
  8359. procedure setU2TXIF(thebits : TBits_1); inline;
  8360. procedure setU3AEIF(thebits : TBits_1); inline;
  8361. procedure setU3ARXIF(thebits : TBits_1); inline;
  8362. procedure setU3ATXIF(thebits : TBits_1); inline;
  8363. procedure setU3EIF(thebits : TBits_1); inline;
  8364. procedure setU3RXIF(thebits : TBits_1); inline;
  8365. procedure setU3TXIF(thebits : TBits_1); inline;
  8366. procedure setUSBIF(thebits : TBits_1); inline;
  8367. procedure setw(thebits : TBits_32); inline;
  8368. public
  8369. procedure clearAD1IF; inline;
  8370. procedure clearCAN1IF; inline;
  8371. procedure clearCMP1IF; inline;
  8372. procedure clearCMP2IF; inline;
  8373. procedure clearCNIF; inline;
  8374. procedure clearDMA0IF; inline;
  8375. procedure clearDMA1IF; inline;
  8376. procedure clearDMA2IF; inline;
  8377. procedure clearDMA3IF; inline;
  8378. procedure clearFCEIF; inline;
  8379. procedure clearFSCMIF; inline;
  8380. procedure clearI2C2ABIF; inline;
  8381. procedure clearI2C2AMIF; inline;
  8382. procedure clearI2C2ASIF; inline;
  8383. procedure clearI2C3ABIF; inline;
  8384. procedure clearI2C3AMIF; inline;
  8385. procedure clearI2C3ASIF; inline;
  8386. procedure clearI2C4BIF; inline;
  8387. procedure clearI2C4MIF; inline;
  8388. procedure clearI2C4SIF; inline;
  8389. procedure clearI2C5BIF; inline;
  8390. procedure clearI2C5MIF; inline;
  8391. procedure clearI2C5SIF; inline;
  8392. procedure clearIC1EIF; inline;
  8393. procedure clearIC2EIF; inline;
  8394. procedure clearIC3EIF; inline;
  8395. procedure clearPMPIF; inline;
  8396. procedure clearRTCCIF; inline;
  8397. procedure clearSPI2AEIF; inline;
  8398. procedure clearSPI2ARXIF; inline;
  8399. procedure clearSPI2ATXIF; inline;
  8400. procedure clearSPI2EIF; inline;
  8401. procedure clearSPI2RXIF; inline;
  8402. procedure clearSPI2TXIF; inline;
  8403. procedure clearSPI3AEIF; inline;
  8404. procedure clearSPI3ARXIF; inline;
  8405. procedure clearSPI3ATXIF; inline;
  8406. procedure clearSPI4EIF; inline;
  8407. procedure clearSPI4RXIF; inline;
  8408. procedure clearSPI4TXIF; inline;
  8409. procedure clearU2AEIF; inline;
  8410. procedure clearU2ARXIF; inline;
  8411. procedure clearU2ATXIF; inline;
  8412. procedure clearU2EIF; inline;
  8413. procedure clearU2RXIF; inline;
  8414. procedure clearU2TXIF; inline;
  8415. procedure clearU3AEIF; inline;
  8416. procedure clearU3ARXIF; inline;
  8417. procedure clearU3ATXIF; inline;
  8418. procedure clearU3EIF; inline;
  8419. procedure clearU3RXIF; inline;
  8420. procedure clearU3TXIF; inline;
  8421. procedure clearUSBIF; inline;
  8422. procedure setAD1IF; inline;
  8423. procedure setCAN1IF; inline;
  8424. procedure setCMP1IF; inline;
  8425. procedure setCMP2IF; inline;
  8426. procedure setCNIF; inline;
  8427. procedure setDMA0IF; inline;
  8428. procedure setDMA1IF; inline;
  8429. procedure setDMA2IF; inline;
  8430. procedure setDMA3IF; inline;
  8431. procedure setFCEIF; inline;
  8432. procedure setFSCMIF; inline;
  8433. procedure setI2C2ABIF; inline;
  8434. procedure setI2C2AMIF; inline;
  8435. procedure setI2C2ASIF; inline;
  8436. procedure setI2C3ABIF; inline;
  8437. procedure setI2C3AMIF; inline;
  8438. procedure setI2C3ASIF; inline;
  8439. procedure setI2C4BIF; inline;
  8440. procedure setI2C4MIF; inline;
  8441. procedure setI2C4SIF; inline;
  8442. procedure setI2C5BIF; inline;
  8443. procedure setI2C5MIF; inline;
  8444. procedure setI2C5SIF; inline;
  8445. procedure setIC1EIF; inline;
  8446. procedure setIC2EIF; inline;
  8447. procedure setIC3EIF; inline;
  8448. procedure setPMPIF; inline;
  8449. procedure setRTCCIF; inline;
  8450. procedure setSPI2AEIF; inline;
  8451. procedure setSPI2ARXIF; inline;
  8452. procedure setSPI2ATXIF; inline;
  8453. procedure setSPI2EIF; inline;
  8454. procedure setSPI2RXIF; inline;
  8455. procedure setSPI2TXIF; inline;
  8456. procedure setSPI3AEIF; inline;
  8457. procedure setSPI3ARXIF; inline;
  8458. procedure setSPI3ATXIF; inline;
  8459. procedure setSPI4EIF; inline;
  8460. procedure setSPI4RXIF; inline;
  8461. procedure setSPI4TXIF; inline;
  8462. procedure setU2AEIF; inline;
  8463. procedure setU2ARXIF; inline;
  8464. procedure setU2ATXIF; inline;
  8465. procedure setU2EIF; inline;
  8466. procedure setU2RXIF; inline;
  8467. procedure setU2TXIF; inline;
  8468. procedure setU3AEIF; inline;
  8469. procedure setU3ARXIF; inline;
  8470. procedure setU3ATXIF; inline;
  8471. procedure setU3EIF; inline;
  8472. procedure setU3RXIF; inline;
  8473. procedure setU3TXIF; inline;
  8474. procedure setUSBIF; inline;
  8475. property AD1IF : TBits_1 read getAD1IF write setAD1IF;
  8476. property CAN1IF : TBits_1 read getCAN1IF write setCAN1IF;
  8477. property CMP1IF : TBits_1 read getCMP1IF write setCMP1IF;
  8478. property CMP2IF : TBits_1 read getCMP2IF write setCMP2IF;
  8479. property CNIF : TBits_1 read getCNIF write setCNIF;
  8480. property DMA0IF : TBits_1 read getDMA0IF write setDMA0IF;
  8481. property DMA1IF : TBits_1 read getDMA1IF write setDMA1IF;
  8482. property DMA2IF : TBits_1 read getDMA2IF write setDMA2IF;
  8483. property DMA3IF : TBits_1 read getDMA3IF write setDMA3IF;
  8484. property FCEIF : TBits_1 read getFCEIF write setFCEIF;
  8485. property FSCMIF : TBits_1 read getFSCMIF write setFSCMIF;
  8486. property I2C2ABIF : TBits_1 read getI2C2ABIF write setI2C2ABIF;
  8487. property I2C2AMIF : TBits_1 read getI2C2AMIF write setI2C2AMIF;
  8488. property I2C2ASIF : TBits_1 read getI2C2ASIF write setI2C2ASIF;
  8489. property I2C3ABIF : TBits_1 read getI2C3ABIF write setI2C3ABIF;
  8490. property I2C3AMIF : TBits_1 read getI2C3AMIF write setI2C3AMIF;
  8491. property I2C3ASIF : TBits_1 read getI2C3ASIF write setI2C3ASIF;
  8492. property I2C4BIF : TBits_1 read getI2C4BIF write setI2C4BIF;
  8493. property I2C4MIF : TBits_1 read getI2C4MIF write setI2C4MIF;
  8494. property I2C4SIF : TBits_1 read getI2C4SIF write setI2C4SIF;
  8495. property I2C5BIF : TBits_1 read getI2C5BIF write setI2C5BIF;
  8496. property I2C5MIF : TBits_1 read getI2C5MIF write setI2C5MIF;
  8497. property I2C5SIF : TBits_1 read getI2C5SIF write setI2C5SIF;
  8498. property IC1EIF : TBits_1 read getIC1EIF write setIC1EIF;
  8499. property IC2EIF : TBits_1 read getIC2EIF write setIC2EIF;
  8500. property IC3EIF : TBits_1 read getIC3EIF write setIC3EIF;
  8501. property PMPIF : TBits_1 read getPMPIF write setPMPIF;
  8502. property RTCCIF : TBits_1 read getRTCCIF write setRTCCIF;
  8503. property SPI2AEIF : TBits_1 read getSPI2AEIF write setSPI2AEIF;
  8504. property SPI2ARXIF : TBits_1 read getSPI2ARXIF write setSPI2ARXIF;
  8505. property SPI2ATXIF : TBits_1 read getSPI2ATXIF write setSPI2ATXIF;
  8506. property SPI2EIF : TBits_1 read getSPI2EIF write setSPI2EIF;
  8507. property SPI2RXIF : TBits_1 read getSPI2RXIF write setSPI2RXIF;
  8508. property SPI2TXIF : TBits_1 read getSPI2TXIF write setSPI2TXIF;
  8509. property SPI3AEIF : TBits_1 read getSPI3AEIF write setSPI3AEIF;
  8510. property SPI3ARXIF : TBits_1 read getSPI3ARXIF write setSPI3ARXIF;
  8511. property SPI3ATXIF : TBits_1 read getSPI3ATXIF write setSPI3ATXIF;
  8512. property SPI4EIF : TBits_1 read getSPI4EIF write setSPI4EIF;
  8513. property SPI4RXIF : TBits_1 read getSPI4RXIF write setSPI4RXIF;
  8514. property SPI4TXIF : TBits_1 read getSPI4TXIF write setSPI4TXIF;
  8515. property U2AEIF : TBits_1 read getU2AEIF write setU2AEIF;
  8516. property U2ARXIF : TBits_1 read getU2ARXIF write setU2ARXIF;
  8517. property U2ATXIF : TBits_1 read getU2ATXIF write setU2ATXIF;
  8518. property U2EIF : TBits_1 read getU2EIF write setU2EIF;
  8519. property U2RXIF : TBits_1 read getU2RXIF write setU2RXIF;
  8520. property U2TXIF : TBits_1 read getU2TXIF write setU2TXIF;
  8521. property U3AEIF : TBits_1 read getU3AEIF write setU3AEIF;
  8522. property U3ARXIF : TBits_1 read getU3ARXIF write setU3ARXIF;
  8523. property U3ATXIF : TBits_1 read getU3ATXIF write setU3ATXIF;
  8524. property U3EIF : TBits_1 read getU3EIF write setU3EIF;
  8525. property U3RXIF : TBits_1 read getU3RXIF write setU3RXIF;
  8526. property U3TXIF : TBits_1 read getU3TXIF write setU3TXIF;
  8527. property USBIF : TBits_1 read getUSBIF write setUSBIF;
  8528. property w : TBits_32 read getw write setw;
  8529. end;
  8530. TINT_IFS2 = record
  8531. private
  8532. function getIC4EIF : TBits_1; inline;
  8533. function getIC5EIF : TBits_1; inline;
  8534. function getPMPEIF : TBits_1; inline;
  8535. function getU1BEIF : TBits_1; inline;
  8536. function getU1BRXIF : TBits_1; inline;
  8537. function getU1BTXIF : TBits_1; inline;
  8538. function getU2BEIF : TBits_1; inline;
  8539. function getU2BRXIF : TBits_1; inline;
  8540. function getU2BTXIF : TBits_1; inline;
  8541. function getU3BEIF : TBits_1; inline;
  8542. function getU3BRXIF : TBits_1; inline;
  8543. function getU3BTXIF : TBits_1; inline;
  8544. function getU4EIF : TBits_1; inline;
  8545. function getU4RXIF : TBits_1; inline;
  8546. function getU4TXIF : TBits_1; inline;
  8547. function getU5EIF : TBits_1; inline;
  8548. function getU5RXIF : TBits_1; inline;
  8549. function getU5TXIF : TBits_1; inline;
  8550. function getU6EIF : TBits_1; inline;
  8551. function getU6RXIF : TBits_1; inline;
  8552. function getU6TXIF : TBits_1; inline;
  8553. function getw : TBits_32; inline;
  8554. procedure setIC4EIF(thebits : TBits_1); inline;
  8555. procedure setIC5EIF(thebits : TBits_1); inline;
  8556. procedure setPMPEIF(thebits : TBits_1); inline;
  8557. procedure setU1BEIF(thebits : TBits_1); inline;
  8558. procedure setU1BRXIF(thebits : TBits_1); inline;
  8559. procedure setU1BTXIF(thebits : TBits_1); inline;
  8560. procedure setU2BEIF(thebits : TBits_1); inline;
  8561. procedure setU2BRXIF(thebits : TBits_1); inline;
  8562. procedure setU2BTXIF(thebits : TBits_1); inline;
  8563. procedure setU3BEIF(thebits : TBits_1); inline;
  8564. procedure setU3BRXIF(thebits : TBits_1); inline;
  8565. procedure setU3BTXIF(thebits : TBits_1); inline;
  8566. procedure setU4EIF(thebits : TBits_1); inline;
  8567. procedure setU4RXIF(thebits : TBits_1); inline;
  8568. procedure setU4TXIF(thebits : TBits_1); inline;
  8569. procedure setU5EIF(thebits : TBits_1); inline;
  8570. procedure setU5RXIF(thebits : TBits_1); inline;
  8571. procedure setU5TXIF(thebits : TBits_1); inline;
  8572. procedure setU6EIF(thebits : TBits_1); inline;
  8573. procedure setU6RXIF(thebits : TBits_1); inline;
  8574. procedure setU6TXIF(thebits : TBits_1); inline;
  8575. procedure setw(thebits : TBits_32); inline;
  8576. public
  8577. procedure clearIC4EIF; inline;
  8578. procedure clearIC5EIF; inline;
  8579. procedure clearPMPEIF; inline;
  8580. procedure clearU1BEIF; inline;
  8581. procedure clearU1BRXIF; inline;
  8582. procedure clearU1BTXIF; inline;
  8583. procedure clearU2BEIF; inline;
  8584. procedure clearU2BRXIF; inline;
  8585. procedure clearU2BTXIF; inline;
  8586. procedure clearU3BEIF; inline;
  8587. procedure clearU3BRXIF; inline;
  8588. procedure clearU3BTXIF; inline;
  8589. procedure clearU4EIF; inline;
  8590. procedure clearU4RXIF; inline;
  8591. procedure clearU4TXIF; inline;
  8592. procedure clearU5EIF; inline;
  8593. procedure clearU5RXIF; inline;
  8594. procedure clearU5TXIF; inline;
  8595. procedure clearU6EIF; inline;
  8596. procedure clearU6RXIF; inline;
  8597. procedure clearU6TXIF; inline;
  8598. procedure setIC4EIF; inline;
  8599. procedure setIC5EIF; inline;
  8600. procedure setPMPEIF; inline;
  8601. procedure setU1BEIF; inline;
  8602. procedure setU1BRXIF; inline;
  8603. procedure setU1BTXIF; inline;
  8604. procedure setU2BEIF; inline;
  8605. procedure setU2BRXIF; inline;
  8606. procedure setU2BTXIF; inline;
  8607. procedure setU3BEIF; inline;
  8608. procedure setU3BRXIF; inline;
  8609. procedure setU3BTXIF; inline;
  8610. procedure setU4EIF; inline;
  8611. procedure setU4RXIF; inline;
  8612. procedure setU4TXIF; inline;
  8613. procedure setU5EIF; inline;
  8614. procedure setU5RXIF; inline;
  8615. procedure setU5TXIF; inline;
  8616. procedure setU6EIF; inline;
  8617. procedure setU6RXIF; inline;
  8618. procedure setU6TXIF; inline;
  8619. property IC4EIF : TBits_1 read getIC4EIF write setIC4EIF;
  8620. property IC5EIF : TBits_1 read getIC5EIF write setIC5EIF;
  8621. property PMPEIF : TBits_1 read getPMPEIF write setPMPEIF;
  8622. property U1BEIF : TBits_1 read getU1BEIF write setU1BEIF;
  8623. property U1BRXIF : TBits_1 read getU1BRXIF write setU1BRXIF;
  8624. property U1BTXIF : TBits_1 read getU1BTXIF write setU1BTXIF;
  8625. property U2BEIF : TBits_1 read getU2BEIF write setU2BEIF;
  8626. property U2BRXIF : TBits_1 read getU2BRXIF write setU2BRXIF;
  8627. property U2BTXIF : TBits_1 read getU2BTXIF write setU2BTXIF;
  8628. property U3BEIF : TBits_1 read getU3BEIF write setU3BEIF;
  8629. property U3BRXIF : TBits_1 read getU3BRXIF write setU3BRXIF;
  8630. property U3BTXIF : TBits_1 read getU3BTXIF write setU3BTXIF;
  8631. property U4EIF : TBits_1 read getU4EIF write setU4EIF;
  8632. property U4RXIF : TBits_1 read getU4RXIF write setU4RXIF;
  8633. property U4TXIF : TBits_1 read getU4TXIF write setU4TXIF;
  8634. property U5EIF : TBits_1 read getU5EIF write setU5EIF;
  8635. property U5RXIF : TBits_1 read getU5RXIF write setU5RXIF;
  8636. property U5TXIF : TBits_1 read getU5TXIF write setU5TXIF;
  8637. property U6EIF : TBits_1 read getU6EIF write setU6EIF;
  8638. property U6RXIF : TBits_1 read getU6RXIF write setU6RXIF;
  8639. property U6TXIF : TBits_1 read getU6TXIF write setU6TXIF;
  8640. property w : TBits_32 read getw write setw;
  8641. end;
  8642. TINT_IEC0 = record
  8643. private
  8644. function getCS0IE : TBits_1; inline;
  8645. function getCS1IE : TBits_1; inline;
  8646. function getCTIE : TBits_1; inline;
  8647. function getI2C1ABIE : TBits_1; inline;
  8648. function getI2C1AMIE : TBits_1; inline;
  8649. function getI2C1ASIE : TBits_1; inline;
  8650. function getI2C1BIE : TBits_1; inline;
  8651. function getI2C1MIE : TBits_1; inline;
  8652. function getI2C1SIE : TBits_1; inline;
  8653. function getI2C3BIE : TBits_1; inline;
  8654. function getI2C3MIE : TBits_1; inline;
  8655. function getI2C3SIE : TBits_1; inline;
  8656. function getIC1IE : TBits_1; inline;
  8657. function getIC2IE : TBits_1; inline;
  8658. function getIC3IE : TBits_1; inline;
  8659. function getIC4IE : TBits_1; inline;
  8660. function getIC5IE : TBits_1; inline;
  8661. function getINT0IE : TBits_1; inline;
  8662. function getINT1IE : TBits_1; inline;
  8663. function getINT2IE : TBits_1; inline;
  8664. function getINT3IE : TBits_1; inline;
  8665. function getINT4IE : TBits_1; inline;
  8666. function getOC1IE : TBits_1; inline;
  8667. function getOC2IE : TBits_1; inline;
  8668. function getOC3IE : TBits_1; inline;
  8669. function getOC4IE : TBits_1; inline;
  8670. function getOC5IE : TBits_1; inline;
  8671. function getSPI1AEIE : TBits_1; inline;
  8672. function getSPI1ARXIE : TBits_1; inline;
  8673. function getSPI1ATXIE : TBits_1; inline;
  8674. function getSPI3EIE : TBits_1; inline;
  8675. function getSPI3RXIE : TBits_1; inline;
  8676. function getSPI3TXIE : TBits_1; inline;
  8677. function getT1IE : TBits_1; inline;
  8678. function getT2IE : TBits_1; inline;
  8679. function getT3IE : TBits_1; inline;
  8680. function getT4IE : TBits_1; inline;
  8681. function getT5IE : TBits_1; inline;
  8682. function getU1AEIE : TBits_1; inline;
  8683. function getU1ARXIE : TBits_1; inline;
  8684. function getU1ATXIE : TBits_1; inline;
  8685. function getU1EIE : TBits_1; inline;
  8686. function getU1RXIE : TBits_1; inline;
  8687. function getU1TXIE : TBits_1; inline;
  8688. function getw : TBits_32; inline;
  8689. procedure setCS0IE(thebits : TBits_1); inline;
  8690. procedure setCS1IE(thebits : TBits_1); inline;
  8691. procedure setCTIE(thebits : TBits_1); inline;
  8692. procedure setI2C1ABIE(thebits : TBits_1); inline;
  8693. procedure setI2C1AMIE(thebits : TBits_1); inline;
  8694. procedure setI2C1ASIE(thebits : TBits_1); inline;
  8695. procedure setI2C1BIE(thebits : TBits_1); inline;
  8696. procedure setI2C1MIE(thebits : TBits_1); inline;
  8697. procedure setI2C1SIE(thebits : TBits_1); inline;
  8698. procedure setI2C3BIE(thebits : TBits_1); inline;
  8699. procedure setI2C3MIE(thebits : TBits_1); inline;
  8700. procedure setI2C3SIE(thebits : TBits_1); inline;
  8701. procedure setIC1IE(thebits : TBits_1); inline;
  8702. procedure setIC2IE(thebits : TBits_1); inline;
  8703. procedure setIC3IE(thebits : TBits_1); inline;
  8704. procedure setIC4IE(thebits : TBits_1); inline;
  8705. procedure setIC5IE(thebits : TBits_1); inline;
  8706. procedure setINT0IE(thebits : TBits_1); inline;
  8707. procedure setINT1IE(thebits : TBits_1); inline;
  8708. procedure setINT2IE(thebits : TBits_1); inline;
  8709. procedure setINT3IE(thebits : TBits_1); inline;
  8710. procedure setINT4IE(thebits : TBits_1); inline;
  8711. procedure setOC1IE(thebits : TBits_1); inline;
  8712. procedure setOC2IE(thebits : TBits_1); inline;
  8713. procedure setOC3IE(thebits : TBits_1); inline;
  8714. procedure setOC4IE(thebits : TBits_1); inline;
  8715. procedure setOC5IE(thebits : TBits_1); inline;
  8716. procedure setSPI1AEIE(thebits : TBits_1); inline;
  8717. procedure setSPI1ARXIE(thebits : TBits_1); inline;
  8718. procedure setSPI1ATXIE(thebits : TBits_1); inline;
  8719. procedure setSPI3EIE(thebits : TBits_1); inline;
  8720. procedure setSPI3RXIE(thebits : TBits_1); inline;
  8721. procedure setSPI3TXIE(thebits : TBits_1); inline;
  8722. procedure setT1IE(thebits : TBits_1); inline;
  8723. procedure setT2IE(thebits : TBits_1); inline;
  8724. procedure setT3IE(thebits : TBits_1); inline;
  8725. procedure setT4IE(thebits : TBits_1); inline;
  8726. procedure setT5IE(thebits : TBits_1); inline;
  8727. procedure setU1AEIE(thebits : TBits_1); inline;
  8728. procedure setU1ARXIE(thebits : TBits_1); inline;
  8729. procedure setU1ATXIE(thebits : TBits_1); inline;
  8730. procedure setU1EIE(thebits : TBits_1); inline;
  8731. procedure setU1RXIE(thebits : TBits_1); inline;
  8732. procedure setU1TXIE(thebits : TBits_1); inline;
  8733. procedure setw(thebits : TBits_32); inline;
  8734. public
  8735. procedure clearCS0IE; inline;
  8736. procedure clearCS1IE; inline;
  8737. procedure clearCTIE; inline;
  8738. procedure clearI2C1ABIE; inline;
  8739. procedure clearI2C1AMIE; inline;
  8740. procedure clearI2C1ASIE; inline;
  8741. procedure clearI2C1BIE; inline;
  8742. procedure clearI2C1MIE; inline;
  8743. procedure clearI2C1SIE; inline;
  8744. procedure clearI2C3BIE; inline;
  8745. procedure clearI2C3MIE; inline;
  8746. procedure clearI2C3SIE; inline;
  8747. procedure clearIC1IE; inline;
  8748. procedure clearIC2IE; inline;
  8749. procedure clearIC3IE; inline;
  8750. procedure clearIC4IE; inline;
  8751. procedure clearIC5IE; inline;
  8752. procedure clearINT0IE; inline;
  8753. procedure clearINT1IE; inline;
  8754. procedure clearINT2IE; inline;
  8755. procedure clearINT3IE; inline;
  8756. procedure clearINT4IE; inline;
  8757. procedure clearOC1IE; inline;
  8758. procedure clearOC2IE; inline;
  8759. procedure clearOC3IE; inline;
  8760. procedure clearOC4IE; inline;
  8761. procedure clearOC5IE; inline;
  8762. procedure clearSPI1AEIE; inline;
  8763. procedure clearSPI1ARXIE; inline;
  8764. procedure clearSPI1ATXIE; inline;
  8765. procedure clearSPI3EIE; inline;
  8766. procedure clearSPI3RXIE; inline;
  8767. procedure clearSPI3TXIE; inline;
  8768. procedure clearT1IE; inline;
  8769. procedure clearT2IE; inline;
  8770. procedure clearT3IE; inline;
  8771. procedure clearT4IE; inline;
  8772. procedure clearT5IE; inline;
  8773. procedure clearU1AEIE; inline;
  8774. procedure clearU1ARXIE; inline;
  8775. procedure clearU1ATXIE; inline;
  8776. procedure clearU1EIE; inline;
  8777. procedure clearU1RXIE; inline;
  8778. procedure clearU1TXIE; inline;
  8779. procedure setCS0IE; inline;
  8780. procedure setCS1IE; inline;
  8781. procedure setCTIE; inline;
  8782. procedure setI2C1ABIE; inline;
  8783. procedure setI2C1AMIE; inline;
  8784. procedure setI2C1ASIE; inline;
  8785. procedure setI2C1BIE; inline;
  8786. procedure setI2C1MIE; inline;
  8787. procedure setI2C1SIE; inline;
  8788. procedure setI2C3BIE; inline;
  8789. procedure setI2C3MIE; inline;
  8790. procedure setI2C3SIE; inline;
  8791. procedure setIC1IE; inline;
  8792. procedure setIC2IE; inline;
  8793. procedure setIC3IE; inline;
  8794. procedure setIC4IE; inline;
  8795. procedure setIC5IE; inline;
  8796. procedure setINT0IE; inline;
  8797. procedure setINT1IE; inline;
  8798. procedure setINT2IE; inline;
  8799. procedure setINT3IE; inline;
  8800. procedure setINT4IE; inline;
  8801. procedure setOC1IE; inline;
  8802. procedure setOC2IE; inline;
  8803. procedure setOC3IE; inline;
  8804. procedure setOC4IE; inline;
  8805. procedure setOC5IE; inline;
  8806. procedure setSPI1AEIE; inline;
  8807. procedure setSPI1ARXIE; inline;
  8808. procedure setSPI1ATXIE; inline;
  8809. procedure setSPI3EIE; inline;
  8810. procedure setSPI3RXIE; inline;
  8811. procedure setSPI3TXIE; inline;
  8812. procedure setT1IE; inline;
  8813. procedure setT2IE; inline;
  8814. procedure setT3IE; inline;
  8815. procedure setT4IE; inline;
  8816. procedure setT5IE; inline;
  8817. procedure setU1AEIE; inline;
  8818. procedure setU1ARXIE; inline;
  8819. procedure setU1ATXIE; inline;
  8820. procedure setU1EIE; inline;
  8821. procedure setU1RXIE; inline;
  8822. procedure setU1TXIE; inline;
  8823. property CS0IE : TBits_1 read getCS0IE write setCS0IE;
  8824. property CS1IE : TBits_1 read getCS1IE write setCS1IE;
  8825. property CTIE : TBits_1 read getCTIE write setCTIE;
  8826. property I2C1ABIE : TBits_1 read getI2C1ABIE write setI2C1ABIE;
  8827. property I2C1AMIE : TBits_1 read getI2C1AMIE write setI2C1AMIE;
  8828. property I2C1ASIE : TBits_1 read getI2C1ASIE write setI2C1ASIE;
  8829. property I2C1BIE : TBits_1 read getI2C1BIE write setI2C1BIE;
  8830. property I2C1MIE : TBits_1 read getI2C1MIE write setI2C1MIE;
  8831. property I2C1SIE : TBits_1 read getI2C1SIE write setI2C1SIE;
  8832. property I2C3BIE : TBits_1 read getI2C3BIE write setI2C3BIE;
  8833. property I2C3MIE : TBits_1 read getI2C3MIE write setI2C3MIE;
  8834. property I2C3SIE : TBits_1 read getI2C3SIE write setI2C3SIE;
  8835. property IC1IE : TBits_1 read getIC1IE write setIC1IE;
  8836. property IC2IE : TBits_1 read getIC2IE write setIC2IE;
  8837. property IC3IE : TBits_1 read getIC3IE write setIC3IE;
  8838. property IC4IE : TBits_1 read getIC4IE write setIC4IE;
  8839. property IC5IE : TBits_1 read getIC5IE write setIC5IE;
  8840. property INT0IE : TBits_1 read getINT0IE write setINT0IE;
  8841. property INT1IE : TBits_1 read getINT1IE write setINT1IE;
  8842. property INT2IE : TBits_1 read getINT2IE write setINT2IE;
  8843. property INT3IE : TBits_1 read getINT3IE write setINT3IE;
  8844. property INT4IE : TBits_1 read getINT4IE write setINT4IE;
  8845. property OC1IE : TBits_1 read getOC1IE write setOC1IE;
  8846. property OC2IE : TBits_1 read getOC2IE write setOC2IE;
  8847. property OC3IE : TBits_1 read getOC3IE write setOC3IE;
  8848. property OC4IE : TBits_1 read getOC4IE write setOC4IE;
  8849. property OC5IE : TBits_1 read getOC5IE write setOC5IE;
  8850. property SPI1AEIE : TBits_1 read getSPI1AEIE write setSPI1AEIE;
  8851. property SPI1ARXIE : TBits_1 read getSPI1ARXIE write setSPI1ARXIE;
  8852. property SPI1ATXIE : TBits_1 read getSPI1ATXIE write setSPI1ATXIE;
  8853. property SPI3EIE : TBits_1 read getSPI3EIE write setSPI3EIE;
  8854. property SPI3RXIE : TBits_1 read getSPI3RXIE write setSPI3RXIE;
  8855. property SPI3TXIE : TBits_1 read getSPI3TXIE write setSPI3TXIE;
  8856. property T1IE : TBits_1 read getT1IE write setT1IE;
  8857. property T2IE : TBits_1 read getT2IE write setT2IE;
  8858. property T3IE : TBits_1 read getT3IE write setT3IE;
  8859. property T4IE : TBits_1 read getT4IE write setT4IE;
  8860. property T5IE : TBits_1 read getT5IE write setT5IE;
  8861. property U1AEIE : TBits_1 read getU1AEIE write setU1AEIE;
  8862. property U1ARXIE : TBits_1 read getU1ARXIE write setU1ARXIE;
  8863. property U1ATXIE : TBits_1 read getU1ATXIE write setU1ATXIE;
  8864. property U1EIE : TBits_1 read getU1EIE write setU1EIE;
  8865. property U1RXIE : TBits_1 read getU1RXIE write setU1RXIE;
  8866. property U1TXIE : TBits_1 read getU1TXIE write setU1TXIE;
  8867. property w : TBits_32 read getw write setw;
  8868. end;
  8869. TINT_IEC1 = record
  8870. private
  8871. function getAD1IE : TBits_1; inline;
  8872. function getCAN1IE : TBits_1; inline;
  8873. function getCMP1IE : TBits_1; inline;
  8874. function getCMP2IE : TBits_1; inline;
  8875. function getCNIE : TBits_1; inline;
  8876. function getDMA0IE : TBits_1; inline;
  8877. function getDMA1IE : TBits_1; inline;
  8878. function getDMA2IE : TBits_1; inline;
  8879. function getDMA3IE : TBits_1; inline;
  8880. function getFCEIE : TBits_1; inline;
  8881. function getFSCMIE : TBits_1; inline;
  8882. function getI2C2ABIE : TBits_1; inline;
  8883. function getI2C2AMIE : TBits_1; inline;
  8884. function getI2C2ASIE : TBits_1; inline;
  8885. function getI2C3ABIE : TBits_1; inline;
  8886. function getI2C3AMIE : TBits_1; inline;
  8887. function getI2C3ASIE : TBits_1; inline;
  8888. function getI2C4BIE : TBits_1; inline;
  8889. function getI2C4MIE : TBits_1; inline;
  8890. function getI2C4SIE : TBits_1; inline;
  8891. function getI2C5BIE : TBits_1; inline;
  8892. function getI2C5MIE : TBits_1; inline;
  8893. function getI2C5SIE : TBits_1; inline;
  8894. function getIC1EIE : TBits_1; inline;
  8895. function getIC2EIE : TBits_1; inline;
  8896. function getIC3EIE : TBits_1; inline;
  8897. function getPMPIE : TBits_1; inline;
  8898. function getRTCCIE : TBits_1; inline;
  8899. function getSPI2AEIE : TBits_1; inline;
  8900. function getSPI2ARXIE : TBits_1; inline;
  8901. function getSPI2ATXIE : TBits_1; inline;
  8902. function getSPI2EIE : TBits_1; inline;
  8903. function getSPI2RXIE : TBits_1; inline;
  8904. function getSPI2TXIE : TBits_1; inline;
  8905. function getSPI3AEIE : TBits_1; inline;
  8906. function getSPI3ARXIE : TBits_1; inline;
  8907. function getSPI3ATXIE : TBits_1; inline;
  8908. function getSPI4EIE : TBits_1; inline;
  8909. function getSPI4RXIE : TBits_1; inline;
  8910. function getSPI4TXIE : TBits_1; inline;
  8911. function getU2AEIE : TBits_1; inline;
  8912. function getU2ARXIE : TBits_1; inline;
  8913. function getU2ATXIE : TBits_1; inline;
  8914. function getU2EIE : TBits_1; inline;
  8915. function getU2RXIE : TBits_1; inline;
  8916. function getU2TXIE : TBits_1; inline;
  8917. function getU3AEIE : TBits_1; inline;
  8918. function getU3ARXIE : TBits_1; inline;
  8919. function getU3ATXIE : TBits_1; inline;
  8920. function getU3EIE : TBits_1; inline;
  8921. function getU3RXIE : TBits_1; inline;
  8922. function getU3TXIE : TBits_1; inline;
  8923. function getUSBIE : TBits_1; inline;
  8924. function getw : TBits_32; inline;
  8925. procedure setAD1IE(thebits : TBits_1); inline;
  8926. procedure setCAN1IE(thebits : TBits_1); inline;
  8927. procedure setCMP1IE(thebits : TBits_1); inline;
  8928. procedure setCMP2IE(thebits : TBits_1); inline;
  8929. procedure setCNIE(thebits : TBits_1); inline;
  8930. procedure setDMA0IE(thebits : TBits_1); inline;
  8931. procedure setDMA1IE(thebits : TBits_1); inline;
  8932. procedure setDMA2IE(thebits : TBits_1); inline;
  8933. procedure setDMA3IE(thebits : TBits_1); inline;
  8934. procedure setFCEIE(thebits : TBits_1); inline;
  8935. procedure setFSCMIE(thebits : TBits_1); inline;
  8936. procedure setI2C2ABIE(thebits : TBits_1); inline;
  8937. procedure setI2C2AMIE(thebits : TBits_1); inline;
  8938. procedure setI2C2ASIE(thebits : TBits_1); inline;
  8939. procedure setI2C3ABIE(thebits : TBits_1); inline;
  8940. procedure setI2C3AMIE(thebits : TBits_1); inline;
  8941. procedure setI2C3ASIE(thebits : TBits_1); inline;
  8942. procedure setI2C4BIE(thebits : TBits_1); inline;
  8943. procedure setI2C4MIE(thebits : TBits_1); inline;
  8944. procedure setI2C4SIE(thebits : TBits_1); inline;
  8945. procedure setI2C5BIE(thebits : TBits_1); inline;
  8946. procedure setI2C5MIE(thebits : TBits_1); inline;
  8947. procedure setI2C5SIE(thebits : TBits_1); inline;
  8948. procedure setIC1EIE(thebits : TBits_1); inline;
  8949. procedure setIC2EIE(thebits : TBits_1); inline;
  8950. procedure setIC3EIE(thebits : TBits_1); inline;
  8951. procedure setPMPIE(thebits : TBits_1); inline;
  8952. procedure setRTCCIE(thebits : TBits_1); inline;
  8953. procedure setSPI2AEIE(thebits : TBits_1); inline;
  8954. procedure setSPI2ARXIE(thebits : TBits_1); inline;
  8955. procedure setSPI2ATXIE(thebits : TBits_1); inline;
  8956. procedure setSPI2EIE(thebits : TBits_1); inline;
  8957. procedure setSPI2RXIE(thebits : TBits_1); inline;
  8958. procedure setSPI2TXIE(thebits : TBits_1); inline;
  8959. procedure setSPI3AEIE(thebits : TBits_1); inline;
  8960. procedure setSPI3ARXIE(thebits : TBits_1); inline;
  8961. procedure setSPI3ATXIE(thebits : TBits_1); inline;
  8962. procedure setSPI4EIE(thebits : TBits_1); inline;
  8963. procedure setSPI4RXIE(thebits : TBits_1); inline;
  8964. procedure setSPI4TXIE(thebits : TBits_1); inline;
  8965. procedure setU2AEIE(thebits : TBits_1); inline;
  8966. procedure setU2ARXIE(thebits : TBits_1); inline;
  8967. procedure setU2ATXIE(thebits : TBits_1); inline;
  8968. procedure setU2EIE(thebits : TBits_1); inline;
  8969. procedure setU2RXIE(thebits : TBits_1); inline;
  8970. procedure setU2TXIE(thebits : TBits_1); inline;
  8971. procedure setU3AEIE(thebits : TBits_1); inline;
  8972. procedure setU3ARXIE(thebits : TBits_1); inline;
  8973. procedure setU3ATXIE(thebits : TBits_1); inline;
  8974. procedure setU3EIE(thebits : TBits_1); inline;
  8975. procedure setU3RXIE(thebits : TBits_1); inline;
  8976. procedure setU3TXIE(thebits : TBits_1); inline;
  8977. procedure setUSBIE(thebits : TBits_1); inline;
  8978. procedure setw(thebits : TBits_32); inline;
  8979. public
  8980. procedure clearAD1IE; inline;
  8981. procedure clearCAN1IE; inline;
  8982. procedure clearCMP1IE; inline;
  8983. procedure clearCMP2IE; inline;
  8984. procedure clearCNIE; inline;
  8985. procedure clearDMA0IE; inline;
  8986. procedure clearDMA1IE; inline;
  8987. procedure clearDMA2IE; inline;
  8988. procedure clearDMA3IE; inline;
  8989. procedure clearFCEIE; inline;
  8990. procedure clearFSCMIE; inline;
  8991. procedure clearI2C2ABIE; inline;
  8992. procedure clearI2C2AMIE; inline;
  8993. procedure clearI2C2ASIE; inline;
  8994. procedure clearI2C3ABIE; inline;
  8995. procedure clearI2C3AMIE; inline;
  8996. procedure clearI2C3ASIE; inline;
  8997. procedure clearI2C4BIE; inline;
  8998. procedure clearI2C4MIE; inline;
  8999. procedure clearI2C4SIE; inline;
  9000. procedure clearI2C5BIE; inline;
  9001. procedure clearI2C5MIE; inline;
  9002. procedure clearI2C5SIE; inline;
  9003. procedure clearIC1EIE; inline;
  9004. procedure clearIC2EIE; inline;
  9005. procedure clearIC3EIE; inline;
  9006. procedure clearPMPIE; inline;
  9007. procedure clearRTCCIE; inline;
  9008. procedure clearSPI2AEIE; inline;
  9009. procedure clearSPI2ARXIE; inline;
  9010. procedure clearSPI2ATXIE; inline;
  9011. procedure clearSPI2EIE; inline;
  9012. procedure clearSPI2RXIE; inline;
  9013. procedure clearSPI2TXIE; inline;
  9014. procedure clearSPI3AEIE; inline;
  9015. procedure clearSPI3ARXIE; inline;
  9016. procedure clearSPI3ATXIE; inline;
  9017. procedure clearSPI4EIE; inline;
  9018. procedure clearSPI4RXIE; inline;
  9019. procedure clearSPI4TXIE; inline;
  9020. procedure clearU2AEIE; inline;
  9021. procedure clearU2ARXIE; inline;
  9022. procedure clearU2ATXIE; inline;
  9023. procedure clearU2EIE; inline;
  9024. procedure clearU2RXIE; inline;
  9025. procedure clearU2TXIE; inline;
  9026. procedure clearU3AEIE; inline;
  9027. procedure clearU3ARXIE; inline;
  9028. procedure clearU3ATXIE; inline;
  9029. procedure clearU3EIE; inline;
  9030. procedure clearU3RXIE; inline;
  9031. procedure clearU3TXIE; inline;
  9032. procedure clearUSBIE; inline;
  9033. procedure setAD1IE; inline;
  9034. procedure setCAN1IE; inline;
  9035. procedure setCMP1IE; inline;
  9036. procedure setCMP2IE; inline;
  9037. procedure setCNIE; inline;
  9038. procedure setDMA0IE; inline;
  9039. procedure setDMA1IE; inline;
  9040. procedure setDMA2IE; inline;
  9041. procedure setDMA3IE; inline;
  9042. procedure setFCEIE; inline;
  9043. procedure setFSCMIE; inline;
  9044. procedure setI2C2ABIE; inline;
  9045. procedure setI2C2AMIE; inline;
  9046. procedure setI2C2ASIE; inline;
  9047. procedure setI2C3ABIE; inline;
  9048. procedure setI2C3AMIE; inline;
  9049. procedure setI2C3ASIE; inline;
  9050. procedure setI2C4BIE; inline;
  9051. procedure setI2C4MIE; inline;
  9052. procedure setI2C4SIE; inline;
  9053. procedure setI2C5BIE; inline;
  9054. procedure setI2C5MIE; inline;
  9055. procedure setI2C5SIE; inline;
  9056. procedure setIC1EIE; inline;
  9057. procedure setIC2EIE; inline;
  9058. procedure setIC3EIE; inline;
  9059. procedure setPMPIE; inline;
  9060. procedure setRTCCIE; inline;
  9061. procedure setSPI2AEIE; inline;
  9062. procedure setSPI2ARXIE; inline;
  9063. procedure setSPI2ATXIE; inline;
  9064. procedure setSPI2EIE; inline;
  9065. procedure setSPI2RXIE; inline;
  9066. procedure setSPI2TXIE; inline;
  9067. procedure setSPI3AEIE; inline;
  9068. procedure setSPI3ARXIE; inline;
  9069. procedure setSPI3ATXIE; inline;
  9070. procedure setSPI4EIE; inline;
  9071. procedure setSPI4RXIE; inline;
  9072. procedure setSPI4TXIE; inline;
  9073. procedure setU2AEIE; inline;
  9074. procedure setU2ARXIE; inline;
  9075. procedure setU2ATXIE; inline;
  9076. procedure setU2EIE; inline;
  9077. procedure setU2RXIE; inline;
  9078. procedure setU2TXIE; inline;
  9079. procedure setU3AEIE; inline;
  9080. procedure setU3ARXIE; inline;
  9081. procedure setU3ATXIE; inline;
  9082. procedure setU3EIE; inline;
  9083. procedure setU3RXIE; inline;
  9084. procedure setU3TXIE; inline;
  9085. procedure setUSBIE; inline;
  9086. property AD1IE : TBits_1 read getAD1IE write setAD1IE;
  9087. property CAN1IE : TBits_1 read getCAN1IE write setCAN1IE;
  9088. property CMP1IE : TBits_1 read getCMP1IE write setCMP1IE;
  9089. property CMP2IE : TBits_1 read getCMP2IE write setCMP2IE;
  9090. property CNIE : TBits_1 read getCNIE write setCNIE;
  9091. property DMA0IE : TBits_1 read getDMA0IE write setDMA0IE;
  9092. property DMA1IE : TBits_1 read getDMA1IE write setDMA1IE;
  9093. property DMA2IE : TBits_1 read getDMA2IE write setDMA2IE;
  9094. property DMA3IE : TBits_1 read getDMA3IE write setDMA3IE;
  9095. property FCEIE : TBits_1 read getFCEIE write setFCEIE;
  9096. property FSCMIE : TBits_1 read getFSCMIE write setFSCMIE;
  9097. property I2C2ABIE : TBits_1 read getI2C2ABIE write setI2C2ABIE;
  9098. property I2C2AMIE : TBits_1 read getI2C2AMIE write setI2C2AMIE;
  9099. property I2C2ASIE : TBits_1 read getI2C2ASIE write setI2C2ASIE;
  9100. property I2C3ABIE : TBits_1 read getI2C3ABIE write setI2C3ABIE;
  9101. property I2C3AMIE : TBits_1 read getI2C3AMIE write setI2C3AMIE;
  9102. property I2C3ASIE : TBits_1 read getI2C3ASIE write setI2C3ASIE;
  9103. property I2C4BIE : TBits_1 read getI2C4BIE write setI2C4BIE;
  9104. property I2C4MIE : TBits_1 read getI2C4MIE write setI2C4MIE;
  9105. property I2C4SIE : TBits_1 read getI2C4SIE write setI2C4SIE;
  9106. property I2C5BIE : TBits_1 read getI2C5BIE write setI2C5BIE;
  9107. property I2C5MIE : TBits_1 read getI2C5MIE write setI2C5MIE;
  9108. property I2C5SIE : TBits_1 read getI2C5SIE write setI2C5SIE;
  9109. property IC1EIE : TBits_1 read getIC1EIE write setIC1EIE;
  9110. property IC2EIE : TBits_1 read getIC2EIE write setIC2EIE;
  9111. property IC3EIE : TBits_1 read getIC3EIE write setIC3EIE;
  9112. property PMPIE : TBits_1 read getPMPIE write setPMPIE;
  9113. property RTCCIE : TBits_1 read getRTCCIE write setRTCCIE;
  9114. property SPI2AEIE : TBits_1 read getSPI2AEIE write setSPI2AEIE;
  9115. property SPI2ARXIE : TBits_1 read getSPI2ARXIE write setSPI2ARXIE;
  9116. property SPI2ATXIE : TBits_1 read getSPI2ATXIE write setSPI2ATXIE;
  9117. property SPI2EIE : TBits_1 read getSPI2EIE write setSPI2EIE;
  9118. property SPI2RXIE : TBits_1 read getSPI2RXIE write setSPI2RXIE;
  9119. property SPI2TXIE : TBits_1 read getSPI2TXIE write setSPI2TXIE;
  9120. property SPI3AEIE : TBits_1 read getSPI3AEIE write setSPI3AEIE;
  9121. property SPI3ARXIE : TBits_1 read getSPI3ARXIE write setSPI3ARXIE;
  9122. property SPI3ATXIE : TBits_1 read getSPI3ATXIE write setSPI3ATXIE;
  9123. property SPI4EIE : TBits_1 read getSPI4EIE write setSPI4EIE;
  9124. property SPI4RXIE : TBits_1 read getSPI4RXIE write setSPI4RXIE;
  9125. property SPI4TXIE : TBits_1 read getSPI4TXIE write setSPI4TXIE;
  9126. property U2AEIE : TBits_1 read getU2AEIE write setU2AEIE;
  9127. property U2ARXIE : TBits_1 read getU2ARXIE write setU2ARXIE;
  9128. property U2ATXIE : TBits_1 read getU2ATXIE write setU2ATXIE;
  9129. property U2EIE : TBits_1 read getU2EIE write setU2EIE;
  9130. property U2RXIE : TBits_1 read getU2RXIE write setU2RXIE;
  9131. property U2TXIE : TBits_1 read getU2TXIE write setU2TXIE;
  9132. property U3AEIE : TBits_1 read getU3AEIE write setU3AEIE;
  9133. property U3ARXIE : TBits_1 read getU3ARXIE write setU3ARXIE;
  9134. property U3ATXIE : TBits_1 read getU3ATXIE write setU3ATXIE;
  9135. property U3EIE : TBits_1 read getU3EIE write setU3EIE;
  9136. property U3RXIE : TBits_1 read getU3RXIE write setU3RXIE;
  9137. property U3TXIE : TBits_1 read getU3TXIE write setU3TXIE;
  9138. property USBIE : TBits_1 read getUSBIE write setUSBIE;
  9139. property w : TBits_32 read getw write setw;
  9140. end;
  9141. TINT_IEC2 = record
  9142. private
  9143. function getIC4EIE : TBits_1; inline;
  9144. function getIC5EIE : TBits_1; inline;
  9145. function getPMPEIE : TBits_1; inline;
  9146. function getU1BEIE : TBits_1; inline;
  9147. function getU1BRXIE : TBits_1; inline;
  9148. function getU1BTXIE : TBits_1; inline;
  9149. function getU2BEIE : TBits_1; inline;
  9150. function getU2BRXIE : TBits_1; inline;
  9151. function getU2BTXIE : TBits_1; inline;
  9152. function getU3BEIE : TBits_1; inline;
  9153. function getU3BRXIE : TBits_1; inline;
  9154. function getU3BTXIE : TBits_1; inline;
  9155. function getU4EIE : TBits_1; inline;
  9156. function getU4RXIE : TBits_1; inline;
  9157. function getU4TXIE : TBits_1; inline;
  9158. function getU5EIE : TBits_1; inline;
  9159. function getU5RXIE : TBits_1; inline;
  9160. function getU5TXIE : TBits_1; inline;
  9161. function getU6EIE : TBits_1; inline;
  9162. function getU6RXIE : TBits_1; inline;
  9163. function getU6TXIE : TBits_1; inline;
  9164. function getw : TBits_32; inline;
  9165. procedure setIC4EIE(thebits : TBits_1); inline;
  9166. procedure setIC5EIE(thebits : TBits_1); inline;
  9167. procedure setPMPEIE(thebits : TBits_1); inline;
  9168. procedure setU1BEIE(thebits : TBits_1); inline;
  9169. procedure setU1BRXIE(thebits : TBits_1); inline;
  9170. procedure setU1BTXIE(thebits : TBits_1); inline;
  9171. procedure setU2BEIE(thebits : TBits_1); inline;
  9172. procedure setU2BRXIE(thebits : TBits_1); inline;
  9173. procedure setU2BTXIE(thebits : TBits_1); inline;
  9174. procedure setU3BEIE(thebits : TBits_1); inline;
  9175. procedure setU3BRXIE(thebits : TBits_1); inline;
  9176. procedure setU3BTXIE(thebits : TBits_1); inline;
  9177. procedure setU4EIE(thebits : TBits_1); inline;
  9178. procedure setU4RXIE(thebits : TBits_1); inline;
  9179. procedure setU4TXIE(thebits : TBits_1); inline;
  9180. procedure setU5EIE(thebits : TBits_1); inline;
  9181. procedure setU5RXIE(thebits : TBits_1); inline;
  9182. procedure setU5TXIE(thebits : TBits_1); inline;
  9183. procedure setU6EIE(thebits : TBits_1); inline;
  9184. procedure setU6RXIE(thebits : TBits_1); inline;
  9185. procedure setU6TXIE(thebits : TBits_1); inline;
  9186. procedure setw(thebits : TBits_32); inline;
  9187. public
  9188. procedure clearIC4EIE; inline;
  9189. procedure clearIC5EIE; inline;
  9190. procedure clearPMPEIE; inline;
  9191. procedure clearU1BEIE; inline;
  9192. procedure clearU1BRXIE; inline;
  9193. procedure clearU1BTXIE; inline;
  9194. procedure clearU2BEIE; inline;
  9195. procedure clearU2BRXIE; inline;
  9196. procedure clearU2BTXIE; inline;
  9197. procedure clearU3BEIE; inline;
  9198. procedure clearU3BRXIE; inline;
  9199. procedure clearU3BTXIE; inline;
  9200. procedure clearU4EIE; inline;
  9201. procedure clearU4RXIE; inline;
  9202. procedure clearU4TXIE; inline;
  9203. procedure clearU5EIE; inline;
  9204. procedure clearU5RXIE; inline;
  9205. procedure clearU5TXIE; inline;
  9206. procedure clearU6EIE; inline;
  9207. procedure clearU6RXIE; inline;
  9208. procedure clearU6TXIE; inline;
  9209. procedure setIC4EIE; inline;
  9210. procedure setIC5EIE; inline;
  9211. procedure setPMPEIE; inline;
  9212. procedure setU1BEIE; inline;
  9213. procedure setU1BRXIE; inline;
  9214. procedure setU1BTXIE; inline;
  9215. procedure setU2BEIE; inline;
  9216. procedure setU2BRXIE; inline;
  9217. procedure setU2BTXIE; inline;
  9218. procedure setU3BEIE; inline;
  9219. procedure setU3BRXIE; inline;
  9220. procedure setU3BTXIE; inline;
  9221. procedure setU4EIE; inline;
  9222. procedure setU4RXIE; inline;
  9223. procedure setU4TXIE; inline;
  9224. procedure setU5EIE; inline;
  9225. procedure setU5RXIE; inline;
  9226. procedure setU5TXIE; inline;
  9227. procedure setU6EIE; inline;
  9228. procedure setU6RXIE; inline;
  9229. procedure setU6TXIE; inline;
  9230. property IC4EIE : TBits_1 read getIC4EIE write setIC4EIE;
  9231. property IC5EIE : TBits_1 read getIC5EIE write setIC5EIE;
  9232. property PMPEIE : TBits_1 read getPMPEIE write setPMPEIE;
  9233. property U1BEIE : TBits_1 read getU1BEIE write setU1BEIE;
  9234. property U1BRXIE : TBits_1 read getU1BRXIE write setU1BRXIE;
  9235. property U1BTXIE : TBits_1 read getU1BTXIE write setU1BTXIE;
  9236. property U2BEIE : TBits_1 read getU2BEIE write setU2BEIE;
  9237. property U2BRXIE : TBits_1 read getU2BRXIE write setU2BRXIE;
  9238. property U2BTXIE : TBits_1 read getU2BTXIE write setU2BTXIE;
  9239. property U3BEIE : TBits_1 read getU3BEIE write setU3BEIE;
  9240. property U3BRXIE : TBits_1 read getU3BRXIE write setU3BRXIE;
  9241. property U3BTXIE : TBits_1 read getU3BTXIE write setU3BTXIE;
  9242. property U4EIE : TBits_1 read getU4EIE write setU4EIE;
  9243. property U4RXIE : TBits_1 read getU4RXIE write setU4RXIE;
  9244. property U4TXIE : TBits_1 read getU4TXIE write setU4TXIE;
  9245. property U5EIE : TBits_1 read getU5EIE write setU5EIE;
  9246. property U5RXIE : TBits_1 read getU5RXIE write setU5RXIE;
  9247. property U5TXIE : TBits_1 read getU5TXIE write setU5TXIE;
  9248. property U6EIE : TBits_1 read getU6EIE write setU6EIE;
  9249. property U6RXIE : TBits_1 read getU6RXIE write setU6RXIE;
  9250. property U6TXIE : TBits_1 read getU6TXIE write setU6TXIE;
  9251. property w : TBits_32 read getw write setw;
  9252. end;
  9253. TINT_IPC0 = record
  9254. private
  9255. function getCS0IP : TBits_3; inline;
  9256. function getCS0IS : TBits_2; inline;
  9257. function getCS1IP : TBits_3; inline;
  9258. function getCS1IS : TBits_2; inline;
  9259. function getCTIP : TBits_3; inline;
  9260. function getCTIS : TBits_2; inline;
  9261. function getINT0IP : TBits_3; inline;
  9262. function getINT0IS : TBits_2; inline;
  9263. function getw : TBits_32; inline;
  9264. procedure setCS0IP(thebits : TBits_3); inline;
  9265. procedure setCS0IS(thebits : TBits_2); inline;
  9266. procedure setCS1IP(thebits : TBits_3); inline;
  9267. procedure setCS1IS(thebits : TBits_2); inline;
  9268. procedure setCTIP(thebits : TBits_3); inline;
  9269. procedure setCTIS(thebits : TBits_2); inline;
  9270. procedure setINT0IP(thebits : TBits_3); inline;
  9271. procedure setINT0IS(thebits : TBits_2); inline;
  9272. procedure setw(thebits : TBits_32); inline;
  9273. public
  9274. property CS0IP : TBits_3 read getCS0IP write setCS0IP;
  9275. property CS0IS : TBits_2 read getCS0IS write setCS0IS;
  9276. property CS1IP : TBits_3 read getCS1IP write setCS1IP;
  9277. property CS1IS : TBits_2 read getCS1IS write setCS1IS;
  9278. property CTIP : TBits_3 read getCTIP write setCTIP;
  9279. property CTIS : TBits_2 read getCTIS write setCTIS;
  9280. property INT0IP : TBits_3 read getINT0IP write setINT0IP;
  9281. property INT0IS : TBits_2 read getINT0IS write setINT0IS;
  9282. property w : TBits_32 read getw write setw;
  9283. end;
  9284. TINT_IPC1 = record
  9285. private
  9286. function getIC1IP : TBits_3; inline;
  9287. function getIC1IS : TBits_2; inline;
  9288. function getINT1IP : TBits_3; inline;
  9289. function getINT1IS : TBits_2; inline;
  9290. function getOC1IP : TBits_3; inline;
  9291. function getOC1IS : TBits_2; inline;
  9292. function getT1IP : TBits_3; inline;
  9293. function getT1IS : TBits_2; inline;
  9294. function getw : TBits_32; inline;
  9295. procedure setIC1IP(thebits : TBits_3); inline;
  9296. procedure setIC1IS(thebits : TBits_2); inline;
  9297. procedure setINT1IP(thebits : TBits_3); inline;
  9298. procedure setINT1IS(thebits : TBits_2); inline;
  9299. procedure setOC1IP(thebits : TBits_3); inline;
  9300. procedure setOC1IS(thebits : TBits_2); inline;
  9301. procedure setT1IP(thebits : TBits_3); inline;
  9302. procedure setT1IS(thebits : TBits_2); inline;
  9303. procedure setw(thebits : TBits_32); inline;
  9304. public
  9305. property IC1IP : TBits_3 read getIC1IP write setIC1IP;
  9306. property IC1IS : TBits_2 read getIC1IS write setIC1IS;
  9307. property INT1IP : TBits_3 read getINT1IP write setINT1IP;
  9308. property INT1IS : TBits_2 read getINT1IS write setINT1IS;
  9309. property OC1IP : TBits_3 read getOC1IP write setOC1IP;
  9310. property OC1IS : TBits_2 read getOC1IS write setOC1IS;
  9311. property T1IP : TBits_3 read getT1IP write setT1IP;
  9312. property T1IS : TBits_2 read getT1IS write setT1IS;
  9313. property w : TBits_32 read getw write setw;
  9314. end;
  9315. TINT_IPC2 = record
  9316. private
  9317. function getIC2IP : TBits_3; inline;
  9318. function getIC2IS : TBits_2; inline;
  9319. function getINT2IP : TBits_3; inline;
  9320. function getINT2IS : TBits_2; inline;
  9321. function getOC2IP : TBits_3; inline;
  9322. function getOC2IS : TBits_2; inline;
  9323. function getT2IP : TBits_3; inline;
  9324. function getT2IS : TBits_2; inline;
  9325. function getw : TBits_32; inline;
  9326. procedure setIC2IP(thebits : TBits_3); inline;
  9327. procedure setIC2IS(thebits : TBits_2); inline;
  9328. procedure setINT2IP(thebits : TBits_3); inline;
  9329. procedure setINT2IS(thebits : TBits_2); inline;
  9330. procedure setOC2IP(thebits : TBits_3); inline;
  9331. procedure setOC2IS(thebits : TBits_2); inline;
  9332. procedure setT2IP(thebits : TBits_3); inline;
  9333. procedure setT2IS(thebits : TBits_2); inline;
  9334. procedure setw(thebits : TBits_32); inline;
  9335. public
  9336. property IC2IP : TBits_3 read getIC2IP write setIC2IP;
  9337. property IC2IS : TBits_2 read getIC2IS write setIC2IS;
  9338. property INT2IP : TBits_3 read getINT2IP write setINT2IP;
  9339. property INT2IS : TBits_2 read getINT2IS write setINT2IS;
  9340. property OC2IP : TBits_3 read getOC2IP write setOC2IP;
  9341. property OC2IS : TBits_2 read getOC2IS write setOC2IS;
  9342. property T2IP : TBits_3 read getT2IP write setT2IP;
  9343. property T2IS : TBits_2 read getT2IS write setT2IS;
  9344. property w : TBits_32 read getw write setw;
  9345. end;
  9346. TINT_IPC3 = record
  9347. private
  9348. function getIC3IP : TBits_3; inline;
  9349. function getIC3IS : TBits_2; inline;
  9350. function getINT3IP : TBits_3; inline;
  9351. function getINT3IS : TBits_2; inline;
  9352. function getOC3IP : TBits_3; inline;
  9353. function getOC3IS : TBits_2; inline;
  9354. function getT3IP : TBits_3; inline;
  9355. function getT3IS : TBits_2; inline;
  9356. function getw : TBits_32; inline;
  9357. procedure setIC3IP(thebits : TBits_3); inline;
  9358. procedure setIC3IS(thebits : TBits_2); inline;
  9359. procedure setINT3IP(thebits : TBits_3); inline;
  9360. procedure setINT3IS(thebits : TBits_2); inline;
  9361. procedure setOC3IP(thebits : TBits_3); inline;
  9362. procedure setOC3IS(thebits : TBits_2); inline;
  9363. procedure setT3IP(thebits : TBits_3); inline;
  9364. procedure setT3IS(thebits : TBits_2); inline;
  9365. procedure setw(thebits : TBits_32); inline;
  9366. public
  9367. property IC3IP : TBits_3 read getIC3IP write setIC3IP;
  9368. property IC3IS : TBits_2 read getIC3IS write setIC3IS;
  9369. property INT3IP : TBits_3 read getINT3IP write setINT3IP;
  9370. property INT3IS : TBits_2 read getINT3IS write setINT3IS;
  9371. property OC3IP : TBits_3 read getOC3IP write setOC3IP;
  9372. property OC3IS : TBits_2 read getOC3IS write setOC3IS;
  9373. property T3IP : TBits_3 read getT3IP write setT3IP;
  9374. property T3IS : TBits_2 read getT3IS write setT3IS;
  9375. property w : TBits_32 read getw write setw;
  9376. end;
  9377. TINT_IPC4 = record
  9378. private
  9379. function getIC4IP : TBits_3; inline;
  9380. function getIC4IS : TBits_2; inline;
  9381. function getINT4IP : TBits_3; inline;
  9382. function getINT4IS : TBits_2; inline;
  9383. function getOC4IP : TBits_3; inline;
  9384. function getOC4IS : TBits_2; inline;
  9385. function getT4IP : TBits_3; inline;
  9386. function getT4IS : TBits_2; inline;
  9387. function getw : TBits_32; inline;
  9388. procedure setIC4IP(thebits : TBits_3); inline;
  9389. procedure setIC4IS(thebits : TBits_2); inline;
  9390. procedure setINT4IP(thebits : TBits_3); inline;
  9391. procedure setINT4IS(thebits : TBits_2); inline;
  9392. procedure setOC4IP(thebits : TBits_3); inline;
  9393. procedure setOC4IS(thebits : TBits_2); inline;
  9394. procedure setT4IP(thebits : TBits_3); inline;
  9395. procedure setT4IS(thebits : TBits_2); inline;
  9396. procedure setw(thebits : TBits_32); inline;
  9397. public
  9398. property IC4IP : TBits_3 read getIC4IP write setIC4IP;
  9399. property IC4IS : TBits_2 read getIC4IS write setIC4IS;
  9400. property INT4IP : TBits_3 read getINT4IP write setINT4IP;
  9401. property INT4IS : TBits_2 read getINT4IS write setINT4IS;
  9402. property OC4IP : TBits_3 read getOC4IP write setOC4IP;
  9403. property OC4IS : TBits_2 read getOC4IS write setOC4IS;
  9404. property T4IP : TBits_3 read getT4IP write setT4IP;
  9405. property T4IS : TBits_2 read getT4IS write setT4IS;
  9406. property w : TBits_32 read getw write setw;
  9407. end;
  9408. TINT_IPC5 = record
  9409. private
  9410. function getIC5IP : TBits_3; inline;
  9411. function getIC5IS : TBits_2; inline;
  9412. function getOC5IP : TBits_3; inline;
  9413. function getOC5IS : TBits_2; inline;
  9414. function getT5IP : TBits_3; inline;
  9415. function getT5IS : TBits_2; inline;
  9416. function getw : TBits_32; inline;
  9417. procedure setIC5IP(thebits : TBits_3); inline;
  9418. procedure setIC5IS(thebits : TBits_2); inline;
  9419. procedure setOC5IP(thebits : TBits_3); inline;
  9420. procedure setOC5IS(thebits : TBits_2); inline;
  9421. procedure setT5IP(thebits : TBits_3); inline;
  9422. procedure setT5IS(thebits : TBits_2); inline;
  9423. procedure setw(thebits : TBits_32); inline;
  9424. public
  9425. property IC5IP : TBits_3 read getIC5IP write setIC5IP;
  9426. property IC5IS : TBits_2 read getIC5IS write setIC5IS;
  9427. property OC5IP : TBits_3 read getOC5IP write setOC5IP;
  9428. property OC5IS : TBits_2 read getOC5IS write setOC5IS;
  9429. property T5IP : TBits_3 read getT5IP write setT5IP;
  9430. property T5IS : TBits_2 read getT5IS write setT5IS;
  9431. property w : TBits_32 read getw write setw;
  9432. end;
  9433. TINT_IPC6 = record
  9434. private
  9435. function getAD1IP : TBits_3; inline;
  9436. function getAD1IS : TBits_2; inline;
  9437. function getCNIP : TBits_3; inline;
  9438. function getCNIS : TBits_2; inline;
  9439. function getI2C1AIP : TBits_3; inline;
  9440. function getI2C1AIS : TBits_2; inline;
  9441. function getI2C1IP : TBits_3; inline;
  9442. function getI2C1IS : TBits_2; inline;
  9443. function getI2C3IP : TBits_3; inline;
  9444. function getI2C3IS : TBits_2; inline;
  9445. function getSPI1AIP : TBits_3; inline;
  9446. function getSPI1AIS : TBits_2; inline;
  9447. function getSPI3IP : TBits_3; inline;
  9448. function getSPI3IS : TBits_2; inline;
  9449. function getU1AIP : TBits_3; inline;
  9450. function getU1AIS : TBits_2; inline;
  9451. function getU1IP : TBits_3; inline;
  9452. function getU1IS : TBits_2; inline;
  9453. function getw : TBits_32; inline;
  9454. procedure setAD1IP(thebits : TBits_3); inline;
  9455. procedure setAD1IS(thebits : TBits_2); inline;
  9456. procedure setCNIP(thebits : TBits_3); inline;
  9457. procedure setCNIS(thebits : TBits_2); inline;
  9458. procedure setI2C1AIP(thebits : TBits_3); inline;
  9459. procedure setI2C1AIS(thebits : TBits_2); inline;
  9460. procedure setI2C1IP(thebits : TBits_3); inline;
  9461. procedure setI2C1IS(thebits : TBits_2); inline;
  9462. procedure setI2C3IP(thebits : TBits_3); inline;
  9463. procedure setI2C3IS(thebits : TBits_2); inline;
  9464. procedure setSPI1AIP(thebits : TBits_3); inline;
  9465. procedure setSPI1AIS(thebits : TBits_2); inline;
  9466. procedure setSPI3IP(thebits : TBits_3); inline;
  9467. procedure setSPI3IS(thebits : TBits_2); inline;
  9468. procedure setU1AIP(thebits : TBits_3); inline;
  9469. procedure setU1AIS(thebits : TBits_2); inline;
  9470. procedure setU1IP(thebits : TBits_3); inline;
  9471. procedure setU1IS(thebits : TBits_2); inline;
  9472. procedure setw(thebits : TBits_32); inline;
  9473. public
  9474. property AD1IP : TBits_3 read getAD1IP write setAD1IP;
  9475. property AD1IS : TBits_2 read getAD1IS write setAD1IS;
  9476. property CNIP : TBits_3 read getCNIP write setCNIP;
  9477. property CNIS : TBits_2 read getCNIS write setCNIS;
  9478. property I2C1AIP : TBits_3 read getI2C1AIP write setI2C1AIP;
  9479. property I2C1AIS : TBits_2 read getI2C1AIS write setI2C1AIS;
  9480. property I2C1IP : TBits_3 read getI2C1IP write setI2C1IP;
  9481. property I2C1IS : TBits_2 read getI2C1IS write setI2C1IS;
  9482. property I2C3IP : TBits_3 read getI2C3IP write setI2C3IP;
  9483. property I2C3IS : TBits_2 read getI2C3IS write setI2C3IS;
  9484. property SPI1AIP : TBits_3 read getSPI1AIP write setSPI1AIP;
  9485. property SPI1AIS : TBits_2 read getSPI1AIS write setSPI1AIS;
  9486. property SPI3IP : TBits_3 read getSPI3IP write setSPI3IP;
  9487. property SPI3IS : TBits_2 read getSPI3IS write setSPI3IS;
  9488. property U1AIP : TBits_3 read getU1AIP write setU1AIP;
  9489. property U1AIS : TBits_2 read getU1AIS write setU1AIS;
  9490. property U1IP : TBits_3 read getU1IP write setU1IP;
  9491. property U1IS : TBits_2 read getU1IS write setU1IS;
  9492. property w : TBits_32 read getw write setw;
  9493. end;
  9494. TINT_IPC7 = record
  9495. private
  9496. function getCMP1IP : TBits_3; inline;
  9497. function getCMP1IS : TBits_2; inline;
  9498. function getCMP2IP : TBits_3; inline;
  9499. function getCMP2IS : TBits_2; inline;
  9500. function getI2C2AIP : TBits_3; inline;
  9501. function getI2C2AIS : TBits_2; inline;
  9502. function getI2C4IP : TBits_3; inline;
  9503. function getI2C4IS : TBits_2; inline;
  9504. function getPMPIP : TBits_3; inline;
  9505. function getPMPIS : TBits_2; inline;
  9506. function getSPI2AIP : TBits_3; inline;
  9507. function getSPI2AIS : TBits_2; inline;
  9508. function getSPI2IP : TBits_3; inline;
  9509. function getSPI2IS : TBits_2; inline;
  9510. function getU2AIP : TBits_3; inline;
  9511. function getU2AIS : TBits_2; inline;
  9512. function getU3IP : TBits_3; inline;
  9513. function getU3IS : TBits_2; inline;
  9514. function getw : TBits_32; inline;
  9515. procedure setCMP1IP(thebits : TBits_3); inline;
  9516. procedure setCMP1IS(thebits : TBits_2); inline;
  9517. procedure setCMP2IP(thebits : TBits_3); inline;
  9518. procedure setCMP2IS(thebits : TBits_2); inline;
  9519. procedure setI2C2AIP(thebits : TBits_3); inline;
  9520. procedure setI2C2AIS(thebits : TBits_2); inline;
  9521. procedure setI2C4IP(thebits : TBits_3); inline;
  9522. procedure setI2C4IS(thebits : TBits_2); inline;
  9523. procedure setPMPIP(thebits : TBits_3); inline;
  9524. procedure setPMPIS(thebits : TBits_2); inline;
  9525. procedure setSPI2AIP(thebits : TBits_3); inline;
  9526. procedure setSPI2AIS(thebits : TBits_2); inline;
  9527. procedure setSPI2IP(thebits : TBits_3); inline;
  9528. procedure setSPI2IS(thebits : TBits_2); inline;
  9529. procedure setU2AIP(thebits : TBits_3); inline;
  9530. procedure setU2AIS(thebits : TBits_2); inline;
  9531. procedure setU3IP(thebits : TBits_3); inline;
  9532. procedure setU3IS(thebits : TBits_2); inline;
  9533. procedure setw(thebits : TBits_32); inline;
  9534. public
  9535. property CMP1IP : TBits_3 read getCMP1IP write setCMP1IP;
  9536. property CMP1IS : TBits_2 read getCMP1IS write setCMP1IS;
  9537. property CMP2IP : TBits_3 read getCMP2IP write setCMP2IP;
  9538. property CMP2IS : TBits_2 read getCMP2IS write setCMP2IS;
  9539. property I2C2AIP : TBits_3 read getI2C2AIP write setI2C2AIP;
  9540. property I2C2AIS : TBits_2 read getI2C2AIS write setI2C2AIS;
  9541. property I2C4IP : TBits_3 read getI2C4IP write setI2C4IP;
  9542. property I2C4IS : TBits_2 read getI2C4IS write setI2C4IS;
  9543. property PMPIP : TBits_3 read getPMPIP write setPMPIP;
  9544. property PMPIS : TBits_2 read getPMPIS write setPMPIS;
  9545. property SPI2AIP : TBits_3 read getSPI2AIP write setSPI2AIP;
  9546. property SPI2AIS : TBits_2 read getSPI2AIS write setSPI2AIS;
  9547. property SPI2IP : TBits_3 read getSPI2IP write setSPI2IP;
  9548. property SPI2IS : TBits_2 read getSPI2IS write setSPI2IS;
  9549. property U2AIP : TBits_3 read getU2AIP write setU2AIP;
  9550. property U2AIS : TBits_2 read getU2AIS write setU2AIS;
  9551. property U3IP : TBits_3 read getU3IP write setU3IP;
  9552. property U3IS : TBits_2 read getU3IS write setU3IS;
  9553. property w : TBits_32 read getw write setw;
  9554. end;
  9555. TINT_IPC8 = record
  9556. private
  9557. function getFSCMIP : TBits_3; inline;
  9558. function getFSCMIS : TBits_2; inline;
  9559. function getI2C3AIP : TBits_3; inline;
  9560. function getI2C3AIS : TBits_2; inline;
  9561. function getI2C5IP : TBits_3; inline;
  9562. function getI2C5IS : TBits_2; inline;
  9563. function getRTCCIP : TBits_3; inline;
  9564. function getRTCCIS : TBits_2; inline;
  9565. function getSPI3AIP : TBits_3; inline;
  9566. function getSPI3AIS : TBits_2; inline;
  9567. function getSPI4IP : TBits_3; inline;
  9568. function getSPI4IS : TBits_2; inline;
  9569. function getU2IP : TBits_3; inline;
  9570. function getU2IS : TBits_2; inline;
  9571. function getU3AIP : TBits_3; inline;
  9572. function getU3AIS : TBits_2; inline;
  9573. function getw : TBits_32; inline;
  9574. procedure setFSCMIP(thebits : TBits_3); inline;
  9575. procedure setFSCMIS(thebits : TBits_2); inline;
  9576. procedure setI2C3AIP(thebits : TBits_3); inline;
  9577. procedure setI2C3AIS(thebits : TBits_2); inline;
  9578. procedure setI2C5IP(thebits : TBits_3); inline;
  9579. procedure setI2C5IS(thebits : TBits_2); inline;
  9580. procedure setRTCCIP(thebits : TBits_3); inline;
  9581. procedure setRTCCIS(thebits : TBits_2); inline;
  9582. procedure setSPI3AIP(thebits : TBits_3); inline;
  9583. procedure setSPI3AIS(thebits : TBits_2); inline;
  9584. procedure setSPI4IP(thebits : TBits_3); inline;
  9585. procedure setSPI4IS(thebits : TBits_2); inline;
  9586. procedure setU2IP(thebits : TBits_3); inline;
  9587. procedure setU2IS(thebits : TBits_2); inline;
  9588. procedure setU3AIP(thebits : TBits_3); inline;
  9589. procedure setU3AIS(thebits : TBits_2); inline;
  9590. procedure setw(thebits : TBits_32); inline;
  9591. public
  9592. property FSCMIP : TBits_3 read getFSCMIP write setFSCMIP;
  9593. property FSCMIS : TBits_2 read getFSCMIS write setFSCMIS;
  9594. property I2C3AIP : TBits_3 read getI2C3AIP write setI2C3AIP;
  9595. property I2C3AIS : TBits_2 read getI2C3AIS write setI2C3AIS;
  9596. property I2C5IP : TBits_3 read getI2C5IP write setI2C5IP;
  9597. property I2C5IS : TBits_2 read getI2C5IS write setI2C5IS;
  9598. property RTCCIP : TBits_3 read getRTCCIP write setRTCCIP;
  9599. property RTCCIS : TBits_2 read getRTCCIS write setRTCCIS;
  9600. property SPI3AIP : TBits_3 read getSPI3AIP write setSPI3AIP;
  9601. property SPI3AIS : TBits_2 read getSPI3AIS write setSPI3AIS;
  9602. property SPI4IP : TBits_3 read getSPI4IP write setSPI4IP;
  9603. property SPI4IS : TBits_2 read getSPI4IS write setSPI4IS;
  9604. property U2IP : TBits_3 read getU2IP write setU2IP;
  9605. property U2IS : TBits_2 read getU2IS write setU2IS;
  9606. property U3AIP : TBits_3 read getU3AIP write setU3AIP;
  9607. property U3AIS : TBits_2 read getU3AIS write setU3AIS;
  9608. property w : TBits_32 read getw write setw;
  9609. end;
  9610. TINT_IPC9 = record
  9611. private
  9612. function getDMA0IP : TBits_3; inline;
  9613. function getDMA0IS : TBits_2; inline;
  9614. function getDMA1IP : TBits_3; inline;
  9615. function getDMA1IS : TBits_2; inline;
  9616. function getDMA2IP : TBits_3; inline;
  9617. function getDMA2IS : TBits_2; inline;
  9618. function getDMA3IP : TBits_3; inline;
  9619. function getDMA3IS : TBits_2; inline;
  9620. function getw : TBits_32; inline;
  9621. procedure setDMA0IP(thebits : TBits_3); inline;
  9622. procedure setDMA0IS(thebits : TBits_2); inline;
  9623. procedure setDMA1IP(thebits : TBits_3); inline;
  9624. procedure setDMA1IS(thebits : TBits_2); inline;
  9625. procedure setDMA2IP(thebits : TBits_3); inline;
  9626. procedure setDMA2IS(thebits : TBits_2); inline;
  9627. procedure setDMA3IP(thebits : TBits_3); inline;
  9628. procedure setDMA3IS(thebits : TBits_2); inline;
  9629. procedure setw(thebits : TBits_32); inline;
  9630. public
  9631. property DMA0IP : TBits_3 read getDMA0IP write setDMA0IP;
  9632. property DMA0IS : TBits_2 read getDMA0IS write setDMA0IS;
  9633. property DMA1IP : TBits_3 read getDMA1IP write setDMA1IP;
  9634. property DMA1IS : TBits_2 read getDMA1IS write setDMA1IS;
  9635. property DMA2IP : TBits_3 read getDMA2IP write setDMA2IP;
  9636. property DMA2IS : TBits_2 read getDMA2IS write setDMA2IS;
  9637. property DMA3IP : TBits_3 read getDMA3IP write setDMA3IP;
  9638. property DMA3IS : TBits_2 read getDMA3IS write setDMA3IS;
  9639. property w : TBits_32 read getw write setw;
  9640. end;
  9641. TINT_IPC11 = record
  9642. private
  9643. function getCAN1IP : TBits_3; inline;
  9644. function getCAN1IS : TBits_2; inline;
  9645. function getFCEIP : TBits_3; inline;
  9646. function getFCEIS : TBits_2; inline;
  9647. function getUSBIP : TBits_3; inline;
  9648. function getUSBIS : TBits_2; inline;
  9649. function getw : TBits_32; inline;
  9650. procedure setCAN1IP(thebits : TBits_3); inline;
  9651. procedure setCAN1IS(thebits : TBits_2); inline;
  9652. procedure setFCEIP(thebits : TBits_3); inline;
  9653. procedure setFCEIS(thebits : TBits_2); inline;
  9654. procedure setUSBIP(thebits : TBits_3); inline;
  9655. procedure setUSBIS(thebits : TBits_2); inline;
  9656. procedure setw(thebits : TBits_32); inline;
  9657. public
  9658. property CAN1IP : TBits_3 read getCAN1IP write setCAN1IP;
  9659. property CAN1IS : TBits_2 read getCAN1IS write setCAN1IS;
  9660. property FCEIP : TBits_3 read getFCEIP write setFCEIP;
  9661. property FCEIS : TBits_2 read getFCEIS write setFCEIS;
  9662. property USBIP : TBits_3 read getUSBIP write setUSBIP;
  9663. property USBIS : TBits_2 read getUSBIS write setUSBIS;
  9664. property w : TBits_32 read getw write setw;
  9665. end;
  9666. TINT_IPC12 = record
  9667. private
  9668. function getU1BIP : TBits_3; inline;
  9669. function getU1BIS : TBits_2; inline;
  9670. function getU2BIP : TBits_3; inline;
  9671. function getU2BIS : TBits_2; inline;
  9672. function getU3BIP : TBits_3; inline;
  9673. function getU3BIS : TBits_2; inline;
  9674. function getU4IP : TBits_3; inline;
  9675. function getU4IS : TBits_2; inline;
  9676. function getU5IP : TBits_3; inline;
  9677. function getU5IS : TBits_2; inline;
  9678. function getU6IP : TBits_3; inline;
  9679. function getU6IS : TBits_2; inline;
  9680. function getw : TBits_32; inline;
  9681. procedure setU1BIP(thebits : TBits_3); inline;
  9682. procedure setU1BIS(thebits : TBits_2); inline;
  9683. procedure setU2BIP(thebits : TBits_3); inline;
  9684. procedure setU2BIS(thebits : TBits_2); inline;
  9685. procedure setU3BIP(thebits : TBits_3); inline;
  9686. procedure setU3BIS(thebits : TBits_2); inline;
  9687. procedure setU4IP(thebits : TBits_3); inline;
  9688. procedure setU4IS(thebits : TBits_2); inline;
  9689. procedure setU5IP(thebits : TBits_3); inline;
  9690. procedure setU5IS(thebits : TBits_2); inline;
  9691. procedure setU6IP(thebits : TBits_3); inline;
  9692. procedure setU6IS(thebits : TBits_2); inline;
  9693. procedure setw(thebits : TBits_32); inline;
  9694. public
  9695. property U1BIP : TBits_3 read getU1BIP write setU1BIP;
  9696. property U1BIS : TBits_2 read getU1BIS write setU1BIS;
  9697. property U2BIP : TBits_3 read getU2BIP write setU2BIP;
  9698. property U2BIS : TBits_2 read getU2BIS write setU2BIS;
  9699. property U3BIP : TBits_3 read getU3BIP write setU3BIP;
  9700. property U3BIS : TBits_2 read getU3BIS write setU3BIS;
  9701. property U4IP : TBits_3 read getU4IP write setU4IP;
  9702. property U4IS : TBits_2 read getU4IS write setU4IS;
  9703. property U5IP : TBits_3 read getU5IP write setU5IP;
  9704. property U5IS : TBits_2 read getU5IS write setU5IS;
  9705. property U6IP : TBits_3 read getU6IP write setU6IP;
  9706. property U6IS : TBits_2 read getU6IS write setU6IS;
  9707. property w : TBits_32 read getw write setw;
  9708. end;
  9709. type
  9710. TINTRegisters = record
  9711. INTCONbits : TINT_INTCON;
  9712. INTCON : longWord;
  9713. INTCONCLR : longWord;
  9714. INTCONSET : longWord;
  9715. INTCONINV : longWord;
  9716. INTSTAT : longWord;
  9717. IPTMR : longWord;
  9718. IPTMRCLR : longWord;
  9719. IPTMRSET : longWord;
  9720. IPTMRINV : longWord;
  9721. IFS0bits : TINT_IFS0;
  9722. IFS0 : longWord;
  9723. IFS0CLR : longWord;
  9724. IFS0SET : longWord;
  9725. IFS0INV : longWord;
  9726. IFS1bits : TINT_IFS1;
  9727. IFS1 : longWord;
  9728. IFS1CLR : longWord;
  9729. IFS1SET : longWord;
  9730. IFS1INV : longWord;
  9731. IFS2bits : TINT_IFS2;
  9732. IFS2 : longWord;
  9733. IFS2CLR : longWord;
  9734. IFS2SET : longWord;
  9735. IFS2INV : longWord;
  9736. IEC0bits : TINT_IEC0;
  9737. IEC0 : longWord;
  9738. IEC0CLR : longWord;
  9739. IEC0SET : longWord;
  9740. IEC0INV : longWord;
  9741. IEC1bits : TINT_IEC1;
  9742. IEC1 : longWord;
  9743. IEC1CLR : longWord;
  9744. IEC1SET : longWord;
  9745. IEC1INV : longWord;
  9746. IEC2bits : TINT_IEC2;
  9747. IEC2 : longWord;
  9748. IEC2CLR : longWord;
  9749. IEC2SET : longWord;
  9750. IEC2INV : longWord;
  9751. IPC0bits : TINT_IPC0;
  9752. IPC0 : longWord;
  9753. IPC0CLR : longWord;
  9754. IPC0SET : longWord;
  9755. IPC0INV : longWord;
  9756. IPC1bits : TINT_IPC1;
  9757. IPC1 : longWord;
  9758. IPC1CLR : longWord;
  9759. IPC1SET : longWord;
  9760. IPC1INV : longWord;
  9761. IPC2bits : TINT_IPC2;
  9762. IPC2 : longWord;
  9763. IPC2CLR : longWord;
  9764. IPC2SET : longWord;
  9765. IPC2INV : longWord;
  9766. IPC3bits : TINT_IPC3;
  9767. IPC3 : longWord;
  9768. IPC3CLR : longWord;
  9769. IPC3SET : longWord;
  9770. IPC3INV : longWord;
  9771. IPC4bits : TINT_IPC4;
  9772. IPC4 : longWord;
  9773. IPC4CLR : longWord;
  9774. IPC4SET : longWord;
  9775. IPC4INV : longWord;
  9776. IPC5bits : TINT_IPC5;
  9777. IPC5 : longWord;
  9778. IPC5CLR : longWord;
  9779. IPC5SET : longWord;
  9780. IPC5INV : longWord;
  9781. IPC6bits : TINT_IPC6;
  9782. IPC6 : longWord;
  9783. IPC6CLR : longWord;
  9784. IPC6SET : longWord;
  9785. IPC6INV : longWord;
  9786. IPC7bits : TINT_IPC7;
  9787. IPC7 : longWord;
  9788. IPC7CLR : longWord;
  9789. IPC7SET : longWord;
  9790. IPC7INV : longWord;
  9791. IPC8bits : TINT_IPC8;
  9792. IPC8 : longWord;
  9793. IPC8CLR : longWord;
  9794. IPC8SET : longWord;
  9795. IPC8INV : longWord;
  9796. IPC9bits : TINT_IPC9;
  9797. IPC9 : longWord;
  9798. IPC9CLR : longWord;
  9799. IPC9SET : longWord;
  9800. IPC9INV : longWord;
  9801. IPC10 : longWord;
  9802. IPC10CLR : longWord;
  9803. IPC10SET : longWord;
  9804. IPC10INV : longWord;
  9805. IPC11bits : TINT_IPC11;
  9806. IPC11 : longWord;
  9807. IPC11CLR : longWord;
  9808. IPC11SET : longWord;
  9809. IPC11INV : longWord;
  9810. IPC12bits : TINT_IPC12;
  9811. IPC12 : longWord;
  9812. IPC12CLR : longWord;
  9813. IPC12SET : longWord;
  9814. IPC12INV : longWord;
  9815. end;
  9816. TBMX_BMXCON = record
  9817. private
  9818. function getBMXARB : TBits_3; inline;
  9819. function getBMXCHEDMA : TBits_1; inline;
  9820. function getBMXERRDMA : TBits_1; inline;
  9821. function getBMXERRDS : TBits_1; inline;
  9822. function getBMXERRICD : TBits_1; inline;
  9823. function getBMXERRIS : TBits_1; inline;
  9824. function getBMXERRIXI : TBits_1; inline;
  9825. function getBMXWSDRM : TBits_1; inline;
  9826. function getw : TBits_32; inline;
  9827. procedure setBMXARB(thebits : TBits_3); inline;
  9828. procedure setBMXCHEDMA(thebits : TBits_1); inline;
  9829. procedure setBMXERRDMA(thebits : TBits_1); inline;
  9830. procedure setBMXERRDS(thebits : TBits_1); inline;
  9831. procedure setBMXERRICD(thebits : TBits_1); inline;
  9832. procedure setBMXERRIS(thebits : TBits_1); inline;
  9833. procedure setBMXERRIXI(thebits : TBits_1); inline;
  9834. procedure setBMXWSDRM(thebits : TBits_1); inline;
  9835. procedure setw(thebits : TBits_32); inline;
  9836. public
  9837. procedure clearBMXCHEDMA; inline;
  9838. procedure clearBMXERRDMA; inline;
  9839. procedure clearBMXERRDS; inline;
  9840. procedure clearBMXERRICD; inline;
  9841. procedure clearBMXERRIS; inline;
  9842. procedure clearBMXERRIXI; inline;
  9843. procedure clearBMXWSDRM; inline;
  9844. procedure setBMXCHEDMA; inline;
  9845. procedure setBMXERRDMA; inline;
  9846. procedure setBMXERRDS; inline;
  9847. procedure setBMXERRICD; inline;
  9848. procedure setBMXERRIS; inline;
  9849. procedure setBMXERRIXI; inline;
  9850. procedure setBMXWSDRM; inline;
  9851. property BMXARB : TBits_3 read getBMXARB write setBMXARB;
  9852. property BMXCHEDMA : TBits_1 read getBMXCHEDMA write setBMXCHEDMA;
  9853. property BMXERRDMA : TBits_1 read getBMXERRDMA write setBMXERRDMA;
  9854. property BMXERRDS : TBits_1 read getBMXERRDS write setBMXERRDS;
  9855. property BMXERRICD : TBits_1 read getBMXERRICD write setBMXERRICD;
  9856. property BMXERRIS : TBits_1 read getBMXERRIS write setBMXERRIS;
  9857. property BMXERRIXI : TBits_1 read getBMXERRIXI write setBMXERRIXI;
  9858. property BMXWSDRM : TBits_1 read getBMXWSDRM write setBMXWSDRM;
  9859. property w : TBits_32 read getw write setw;
  9860. end;
  9861. type
  9862. TBMXRegisters = record
  9863. BMXCONbits : TBMX_BMXCON;
  9864. BMXCON : longWord;
  9865. BMXCONCLR : longWord;
  9866. BMXCONSET : longWord;
  9867. BMXCONINV : longWord;
  9868. BMXDKPBA : longWord;
  9869. BMXDKPBACLR : longWord;
  9870. BMXDKPBASET : longWord;
  9871. BMXDKPBAINV : longWord;
  9872. BMXDUDBA : longWord;
  9873. BMXDUDBACLR : longWord;
  9874. BMXDUDBASET : longWord;
  9875. BMXDUDBAINV : longWord;
  9876. BMXDUPBA : longWord;
  9877. BMXDUPBACLR : longWord;
  9878. BMXDUPBASET : longWord;
  9879. BMXDUPBAINV : longWord;
  9880. BMXDRMSZ : longWord;
  9881. BMXPUPBA : longWord;
  9882. BMXPUPBACLR : longWord;
  9883. BMXPUPBASET : longWord;
  9884. BMXPUPBAINV : longWord;
  9885. BMXPFMSZ : longWord;
  9886. BMXBOOTSZ : longWord;
  9887. end;
  9888. TDMAC_DMACON = record
  9889. private
  9890. function getDMABUSY : TBits_1; inline;
  9891. function getON : TBits_1; inline;
  9892. function getSUSPEND : TBits_1; inline;
  9893. function getw : TBits_32; inline;
  9894. procedure setDMABUSY(thebits : TBits_1); inline;
  9895. procedure setON(thebits : TBits_1); inline;
  9896. procedure setSUSPEND(thebits : TBits_1); inline;
  9897. procedure setw(thebits : TBits_32); inline;
  9898. public
  9899. procedure clearDMABUSY; inline;
  9900. procedure clearON; inline;
  9901. procedure clearSUSPEND; inline;
  9902. procedure setDMABUSY; inline;
  9903. procedure setON; inline;
  9904. procedure setSUSPEND; inline;
  9905. property DMABUSY : TBits_1 read getDMABUSY write setDMABUSY;
  9906. property ON : TBits_1 read getON write setON;
  9907. property SUSPEND : TBits_1 read getSUSPEND write setSUSPEND;
  9908. property w : TBits_32 read getw write setw;
  9909. end;
  9910. TDMAC_DMASTAT = record
  9911. private
  9912. function getDMACH : TBits_3; inline;
  9913. function getRDWR : TBits_1; inline;
  9914. function getw : TBits_32; inline;
  9915. procedure setDMACH(thebits : TBits_3); inline;
  9916. procedure setRDWR(thebits : TBits_1); inline;
  9917. procedure setw(thebits : TBits_32); inline;
  9918. public
  9919. procedure clearRDWR; inline;
  9920. procedure setRDWR; inline;
  9921. property DMACH : TBits_3 read getDMACH write setDMACH;
  9922. property RDWR : TBits_1 read getRDWR write setRDWR;
  9923. property w : TBits_32 read getw write setw;
  9924. end;
  9925. TDMAC_DCRCCON = record
  9926. private
  9927. function getBITO : TBits_1; inline;
  9928. function getBYTO : TBits_2; inline;
  9929. function getCRCAPP : TBits_1; inline;
  9930. function getCRCCH : TBits_3; inline;
  9931. function getCRCEN : TBits_1; inline;
  9932. function getCRCTYP : TBits_1; inline;
  9933. function getPLEN : TBits_5; inline;
  9934. function getWBO : TBits_1; inline;
  9935. function getw : TBits_32; inline;
  9936. procedure setBITO(thebits : TBits_1); inline;
  9937. procedure setBYTO(thebits : TBits_2); inline;
  9938. procedure setCRCAPP(thebits : TBits_1); inline;
  9939. procedure setCRCCH(thebits : TBits_3); inline;
  9940. procedure setCRCEN(thebits : TBits_1); inline;
  9941. procedure setCRCTYP(thebits : TBits_1); inline;
  9942. procedure setPLEN(thebits : TBits_5); inline;
  9943. procedure setWBO(thebits : TBits_1); inline;
  9944. procedure setw(thebits : TBits_32); inline;
  9945. public
  9946. procedure clearBITO; inline;
  9947. procedure clearCRCAPP; inline;
  9948. procedure clearCRCEN; inline;
  9949. procedure clearCRCTYP; inline;
  9950. procedure clearWBO; inline;
  9951. procedure setBITO; inline;
  9952. procedure setCRCAPP; inline;
  9953. procedure setCRCEN; inline;
  9954. procedure setCRCTYP; inline;
  9955. procedure setWBO; inline;
  9956. property BITO : TBits_1 read getBITO write setBITO;
  9957. property BYTO : TBits_2 read getBYTO write setBYTO;
  9958. property CRCAPP : TBits_1 read getCRCAPP write setCRCAPP;
  9959. property CRCCH : TBits_3 read getCRCCH write setCRCCH;
  9960. property CRCEN : TBits_1 read getCRCEN write setCRCEN;
  9961. property CRCTYP : TBits_1 read getCRCTYP write setCRCTYP;
  9962. property PLEN : TBits_5 read getPLEN write setPLEN;
  9963. property WBO : TBits_1 read getWBO write setWBO;
  9964. property w : TBits_32 read getw write setw;
  9965. end;
  9966. type
  9967. TDMACRegisters = record
  9968. DMACONbits : TDMAC_DMACON;
  9969. DMACON : longWord;
  9970. DMACONCLR : longWord;
  9971. DMACONSET : longWord;
  9972. DMACONINV : longWord;
  9973. DMASTATbits : TDMAC_DMASTAT;
  9974. DMASTAT : longWord;
  9975. DMASTATCLR : longWord;
  9976. DMASTATSET : longWord;
  9977. DMASTATINV : longWord;
  9978. DMAADDR : longWord;
  9979. DMAADDRCLR : longWord;
  9980. DMAADDRSET : longWord;
  9981. DMAADDRINV : longWord;
  9982. DCRCCONbits : TDMAC_DCRCCON;
  9983. DCRCCON : longWord;
  9984. DCRCCONCLR : longWord;
  9985. DCRCCONSET : longWord;
  9986. DCRCCONINV : longWord;
  9987. DCRCDATA : longWord;
  9988. DCRCDATACLR : longWord;
  9989. DCRCDATASET : longWord;
  9990. DCRCDATAINV : longWord;
  9991. DCRCXOR : longWord;
  9992. DCRCXORCLR : longWord;
  9993. DCRCXORSET : longWord;
  9994. DCRCXORINV : longWord;
  9995. end;
  9996. TDMAC0_DCH0CON = record
  9997. private
  9998. function getCHAED : TBits_1; inline;
  9999. function getCHAEN : TBits_1; inline;
  10000. function getCHBUSY : TBits_1; inline;
  10001. function getCHCHN : TBits_1; inline;
  10002. function getCHCHNS : TBits_1; inline;
  10003. function getCHEDET : TBits_1; inline;
  10004. function getCHEN : TBits_1; inline;
  10005. function getCHPRI : TBits_2; inline;
  10006. function getw : TBits_32; inline;
  10007. procedure setCHAED(thebits : TBits_1); inline;
  10008. procedure setCHAEN(thebits : TBits_1); inline;
  10009. procedure setCHBUSY(thebits : TBits_1); inline;
  10010. procedure setCHCHN(thebits : TBits_1); inline;
  10011. procedure setCHCHNS(thebits : TBits_1); inline;
  10012. procedure setCHEDET(thebits : TBits_1); inline;
  10013. procedure setCHEN(thebits : TBits_1); inline;
  10014. procedure setCHPRI(thebits : TBits_2); inline;
  10015. procedure setw(thebits : TBits_32); inline;
  10016. public
  10017. procedure clearCHAED; inline;
  10018. procedure clearCHAEN; inline;
  10019. procedure clearCHBUSY; inline;
  10020. procedure clearCHCHN; inline;
  10021. procedure clearCHCHNS; inline;
  10022. procedure clearCHEDET; inline;
  10023. procedure clearCHEN; inline;
  10024. procedure setCHAED; inline;
  10025. procedure setCHAEN; inline;
  10026. procedure setCHBUSY; inline;
  10027. procedure setCHCHN; inline;
  10028. procedure setCHCHNS; inline;
  10029. procedure setCHEDET; inline;
  10030. procedure setCHEN; inline;
  10031. property CHAED : TBits_1 read getCHAED write setCHAED;
  10032. property CHAEN : TBits_1 read getCHAEN write setCHAEN;
  10033. property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
  10034. property CHCHN : TBits_1 read getCHCHN write setCHCHN;
  10035. property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
  10036. property CHEDET : TBits_1 read getCHEDET write setCHEDET;
  10037. property CHEN : TBits_1 read getCHEN write setCHEN;
  10038. property CHPRI : TBits_2 read getCHPRI write setCHPRI;
  10039. property w : TBits_32 read getw write setw;
  10040. end;
  10041. TDMAC0_DCH0ECON = record
  10042. private
  10043. function getAIRQEN : TBits_1; inline;
  10044. function getCABORT : TBits_1; inline;
  10045. function getCFORCE : TBits_1; inline;
  10046. function getCHAIRQ : TBits_8; inline;
  10047. function getCHSIRQ : TBits_8; inline;
  10048. function getPATEN : TBits_1; inline;
  10049. function getSIRQEN : TBits_1; inline;
  10050. function getw : TBits_32; inline;
  10051. procedure setAIRQEN(thebits : TBits_1); inline;
  10052. procedure setCABORT(thebits : TBits_1); inline;
  10053. procedure setCFORCE(thebits : TBits_1); inline;
  10054. procedure setCHAIRQ(thebits : TBits_8); inline;
  10055. procedure setCHSIRQ(thebits : TBits_8); inline;
  10056. procedure setPATEN(thebits : TBits_1); inline;
  10057. procedure setSIRQEN(thebits : TBits_1); inline;
  10058. procedure setw(thebits : TBits_32); inline;
  10059. public
  10060. procedure clearAIRQEN; inline;
  10061. procedure clearCABORT; inline;
  10062. procedure clearCFORCE; inline;
  10063. procedure clearPATEN; inline;
  10064. procedure clearSIRQEN; inline;
  10065. procedure setAIRQEN; inline;
  10066. procedure setCABORT; inline;
  10067. procedure setCFORCE; inline;
  10068. procedure setPATEN; inline;
  10069. procedure setSIRQEN; inline;
  10070. property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
  10071. property CABORT : TBits_1 read getCABORT write setCABORT;
  10072. property CFORCE : TBits_1 read getCFORCE write setCFORCE;
  10073. property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
  10074. property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
  10075. property PATEN : TBits_1 read getPATEN write setPATEN;
  10076. property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
  10077. property w : TBits_32 read getw write setw;
  10078. end;
  10079. TDMAC0_DCH0INT = record
  10080. private
  10081. function getCHBCIE : TBits_1; inline;
  10082. function getCHBCIF : TBits_1; inline;
  10083. function getCHCCIE : TBits_1; inline;
  10084. function getCHCCIF : TBits_1; inline;
  10085. function getCHDDIE : TBits_1; inline;
  10086. function getCHDDIF : TBits_1; inline;
  10087. function getCHDHIE : TBits_1; inline;
  10088. function getCHDHIF : TBits_1; inline;
  10089. function getCHERIE : TBits_1; inline;
  10090. function getCHERIF : TBits_1; inline;
  10091. function getCHSDIE : TBits_1; inline;
  10092. function getCHSDIF : TBits_1; inline;
  10093. function getCHSHIE : TBits_1; inline;
  10094. function getCHSHIF : TBits_1; inline;
  10095. function getCHTAIE : TBits_1; inline;
  10096. function getCHTAIF : TBits_1; inline;
  10097. function getw : TBits_32; inline;
  10098. procedure setCHBCIE(thebits : TBits_1); inline;
  10099. procedure setCHBCIF(thebits : TBits_1); inline;
  10100. procedure setCHCCIE(thebits : TBits_1); inline;
  10101. procedure setCHCCIF(thebits : TBits_1); inline;
  10102. procedure setCHDDIE(thebits : TBits_1); inline;
  10103. procedure setCHDDIF(thebits : TBits_1); inline;
  10104. procedure setCHDHIE(thebits : TBits_1); inline;
  10105. procedure setCHDHIF(thebits : TBits_1); inline;
  10106. procedure setCHERIE(thebits : TBits_1); inline;
  10107. procedure setCHERIF(thebits : TBits_1); inline;
  10108. procedure setCHSDIE(thebits : TBits_1); inline;
  10109. procedure setCHSDIF(thebits : TBits_1); inline;
  10110. procedure setCHSHIE(thebits : TBits_1); inline;
  10111. procedure setCHSHIF(thebits : TBits_1); inline;
  10112. procedure setCHTAIE(thebits : TBits_1); inline;
  10113. procedure setCHTAIF(thebits : TBits_1); inline;
  10114. procedure setw(thebits : TBits_32); inline;
  10115. public
  10116. procedure clearCHBCIE; inline;
  10117. procedure clearCHBCIF; inline;
  10118. procedure clearCHCCIE; inline;
  10119. procedure clearCHCCIF; inline;
  10120. procedure clearCHDDIE; inline;
  10121. procedure clearCHDDIF; inline;
  10122. procedure clearCHDHIE; inline;
  10123. procedure clearCHDHIF; inline;
  10124. procedure clearCHERIE; inline;
  10125. procedure clearCHERIF; inline;
  10126. procedure clearCHSDIE; inline;
  10127. procedure clearCHSDIF; inline;
  10128. procedure clearCHSHIE; inline;
  10129. procedure clearCHSHIF; inline;
  10130. procedure clearCHTAIE; inline;
  10131. procedure clearCHTAIF; inline;
  10132. procedure setCHBCIE; inline;
  10133. procedure setCHBCIF; inline;
  10134. procedure setCHCCIE; inline;
  10135. procedure setCHCCIF; inline;
  10136. procedure setCHDDIE; inline;
  10137. procedure setCHDDIF; inline;
  10138. procedure setCHDHIE; inline;
  10139. procedure setCHDHIF; inline;
  10140. procedure setCHERIE; inline;
  10141. procedure setCHERIF; inline;
  10142. procedure setCHSDIE; inline;
  10143. procedure setCHSDIF; inline;
  10144. procedure setCHSHIE; inline;
  10145. procedure setCHSHIF; inline;
  10146. procedure setCHTAIE; inline;
  10147. procedure setCHTAIF; inline;
  10148. property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
  10149. property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
  10150. property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
  10151. property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
  10152. property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
  10153. property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
  10154. property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
  10155. property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
  10156. property CHERIE : TBits_1 read getCHERIE write setCHERIE;
  10157. property CHERIF : TBits_1 read getCHERIF write setCHERIF;
  10158. property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
  10159. property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
  10160. property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
  10161. property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
  10162. property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
  10163. property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
  10164. property w : TBits_32 read getw write setw;
  10165. end;
  10166. type
  10167. TDMAC0Registers = record
  10168. DCH0CONbits : TDMAC0_DCH0CON;
  10169. DCH0CON : longWord;
  10170. DCH0CONCLR : longWord;
  10171. DCH0CONSET : longWord;
  10172. DCH0CONINV : longWord;
  10173. DCH0ECONbits : TDMAC0_DCH0ECON;
  10174. DCH0ECON : longWord;
  10175. DCH0ECONCLR : longWord;
  10176. DCH0ECONSET : longWord;
  10177. DCH0ECONINV : longWord;
  10178. DCH0INTbits : TDMAC0_DCH0INT;
  10179. DCH0INT : longWord;
  10180. DCH0INTCLR : longWord;
  10181. DCH0INTSET : longWord;
  10182. DCH0INTINV : longWord;
  10183. DCH0SSA : longWord;
  10184. DCH0SSACLR : longWord;
  10185. DCH0SSASET : longWord;
  10186. DCH0SSAINV : longWord;
  10187. DCH0DSA : longWord;
  10188. DCH0DSACLR : longWord;
  10189. DCH0DSASET : longWord;
  10190. DCH0DSAINV : longWord;
  10191. DCH0SSIZ : longWord;
  10192. DCH0SSIZCLR : longWord;
  10193. DCH0SSIZSET : longWord;
  10194. DCH0SSIZINV : longWord;
  10195. DCH0DSIZ : longWord;
  10196. DCH0DSIZCLR : longWord;
  10197. DCH0DSIZSET : longWord;
  10198. DCH0DSIZINV : longWord;
  10199. DCH0SPTR : longWord;
  10200. DCH0SPTRCLR : longWord;
  10201. DCH0SPTRSET : longWord;
  10202. DCH0SPTRINV : longWord;
  10203. DCH0DPTR : longWord;
  10204. DCH0DPTRCLR : longWord;
  10205. DCH0DPTRSET : longWord;
  10206. DCH0DPTRINV : longWord;
  10207. DCH0CSIZ : longWord;
  10208. DCH0CSIZCLR : longWord;
  10209. DCH0CSIZSET : longWord;
  10210. DCH0CSIZINV : longWord;
  10211. DCH0CPTR : longWord;
  10212. DCH0CPTRCLR : longWord;
  10213. DCH0CPTRSET : longWord;
  10214. DCH0CPTRINV : longWord;
  10215. DCH0DAT : longWord;
  10216. DCH0DATCLR : longWord;
  10217. DCH0DATSET : longWord;
  10218. DCH0DATINV : longWord;
  10219. end;
  10220. TDMAC1_DCH1CON = record
  10221. private
  10222. function getCHAED : TBits_1; inline;
  10223. function getCHAEN : TBits_1; inline;
  10224. function getCHBUSY : TBits_1; inline;
  10225. function getCHCHN : TBits_1; inline;
  10226. function getCHCHNS : TBits_1; inline;
  10227. function getCHEDET : TBits_1; inline;
  10228. function getCHEN : TBits_1; inline;
  10229. function getCHPRI : TBits_2; inline;
  10230. function getw : TBits_32; inline;
  10231. procedure setCHAED(thebits : TBits_1); inline;
  10232. procedure setCHAEN(thebits : TBits_1); inline;
  10233. procedure setCHBUSY(thebits : TBits_1); inline;
  10234. procedure setCHCHN(thebits : TBits_1); inline;
  10235. procedure setCHCHNS(thebits : TBits_1); inline;
  10236. procedure setCHEDET(thebits : TBits_1); inline;
  10237. procedure setCHEN(thebits : TBits_1); inline;
  10238. procedure setCHPRI(thebits : TBits_2); inline;
  10239. procedure setw(thebits : TBits_32); inline;
  10240. public
  10241. procedure clearCHAED; inline;
  10242. procedure clearCHAEN; inline;
  10243. procedure clearCHBUSY; inline;
  10244. procedure clearCHCHN; inline;
  10245. procedure clearCHCHNS; inline;
  10246. procedure clearCHEDET; inline;
  10247. procedure clearCHEN; inline;
  10248. procedure setCHAED; inline;
  10249. procedure setCHAEN; inline;
  10250. procedure setCHBUSY; inline;
  10251. procedure setCHCHN; inline;
  10252. procedure setCHCHNS; inline;
  10253. procedure setCHEDET; inline;
  10254. procedure setCHEN; inline;
  10255. property CHAED : TBits_1 read getCHAED write setCHAED;
  10256. property CHAEN : TBits_1 read getCHAEN write setCHAEN;
  10257. property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
  10258. property CHCHN : TBits_1 read getCHCHN write setCHCHN;
  10259. property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
  10260. property CHEDET : TBits_1 read getCHEDET write setCHEDET;
  10261. property CHEN : TBits_1 read getCHEN write setCHEN;
  10262. property CHPRI : TBits_2 read getCHPRI write setCHPRI;
  10263. property w : TBits_32 read getw write setw;
  10264. end;
  10265. TDMAC1_DCH1ECON = record
  10266. private
  10267. function getAIRQEN : TBits_1; inline;
  10268. function getCABORT : TBits_1; inline;
  10269. function getCFORCE : TBits_1; inline;
  10270. function getCHAIRQ : TBits_8; inline;
  10271. function getCHSIRQ : TBits_8; inline;
  10272. function getPATEN : TBits_1; inline;
  10273. function getSIRQEN : TBits_1; inline;
  10274. function getw : TBits_32; inline;
  10275. procedure setAIRQEN(thebits : TBits_1); inline;
  10276. procedure setCABORT(thebits : TBits_1); inline;
  10277. procedure setCFORCE(thebits : TBits_1); inline;
  10278. procedure setCHAIRQ(thebits : TBits_8); inline;
  10279. procedure setCHSIRQ(thebits : TBits_8); inline;
  10280. procedure setPATEN(thebits : TBits_1); inline;
  10281. procedure setSIRQEN(thebits : TBits_1); inline;
  10282. procedure setw(thebits : TBits_32); inline;
  10283. public
  10284. procedure clearAIRQEN; inline;
  10285. procedure clearCABORT; inline;
  10286. procedure clearCFORCE; inline;
  10287. procedure clearPATEN; inline;
  10288. procedure clearSIRQEN; inline;
  10289. procedure setAIRQEN; inline;
  10290. procedure setCABORT; inline;
  10291. procedure setCFORCE; inline;
  10292. procedure setPATEN; inline;
  10293. procedure setSIRQEN; inline;
  10294. property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
  10295. property CABORT : TBits_1 read getCABORT write setCABORT;
  10296. property CFORCE : TBits_1 read getCFORCE write setCFORCE;
  10297. property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
  10298. property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
  10299. property PATEN : TBits_1 read getPATEN write setPATEN;
  10300. property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
  10301. property w : TBits_32 read getw write setw;
  10302. end;
  10303. TDMAC1_DCH1INT = record
  10304. private
  10305. function getCHBCIE : TBits_1; inline;
  10306. function getCHBCIF : TBits_1; inline;
  10307. function getCHCCIE : TBits_1; inline;
  10308. function getCHCCIF : TBits_1; inline;
  10309. function getCHDDIE : TBits_1; inline;
  10310. function getCHDDIF : TBits_1; inline;
  10311. function getCHDHIE : TBits_1; inline;
  10312. function getCHDHIF : TBits_1; inline;
  10313. function getCHERIE : TBits_1; inline;
  10314. function getCHERIF : TBits_1; inline;
  10315. function getCHSDIE : TBits_1; inline;
  10316. function getCHSDIF : TBits_1; inline;
  10317. function getCHSHIE : TBits_1; inline;
  10318. function getCHSHIF : TBits_1; inline;
  10319. function getCHTAIE : TBits_1; inline;
  10320. function getCHTAIF : TBits_1; inline;
  10321. function getw : TBits_32; inline;
  10322. procedure setCHBCIE(thebits : TBits_1); inline;
  10323. procedure setCHBCIF(thebits : TBits_1); inline;
  10324. procedure setCHCCIE(thebits : TBits_1); inline;
  10325. procedure setCHCCIF(thebits : TBits_1); inline;
  10326. procedure setCHDDIE(thebits : TBits_1); inline;
  10327. procedure setCHDDIF(thebits : TBits_1); inline;
  10328. procedure setCHDHIE(thebits : TBits_1); inline;
  10329. procedure setCHDHIF(thebits : TBits_1); inline;
  10330. procedure setCHERIE(thebits : TBits_1); inline;
  10331. procedure setCHERIF(thebits : TBits_1); inline;
  10332. procedure setCHSDIE(thebits : TBits_1); inline;
  10333. procedure setCHSDIF(thebits : TBits_1); inline;
  10334. procedure setCHSHIE(thebits : TBits_1); inline;
  10335. procedure setCHSHIF(thebits : TBits_1); inline;
  10336. procedure setCHTAIE(thebits : TBits_1); inline;
  10337. procedure setCHTAIF(thebits : TBits_1); inline;
  10338. procedure setw(thebits : TBits_32); inline;
  10339. public
  10340. procedure clearCHBCIE; inline;
  10341. procedure clearCHBCIF; inline;
  10342. procedure clearCHCCIE; inline;
  10343. procedure clearCHCCIF; inline;
  10344. procedure clearCHDDIE; inline;
  10345. procedure clearCHDDIF; inline;
  10346. procedure clearCHDHIE; inline;
  10347. procedure clearCHDHIF; inline;
  10348. procedure clearCHERIE; inline;
  10349. procedure clearCHERIF; inline;
  10350. procedure clearCHSDIE; inline;
  10351. procedure clearCHSDIF; inline;
  10352. procedure clearCHSHIE; inline;
  10353. procedure clearCHSHIF; inline;
  10354. procedure clearCHTAIE; inline;
  10355. procedure clearCHTAIF; inline;
  10356. procedure setCHBCIE; inline;
  10357. procedure setCHBCIF; inline;
  10358. procedure setCHCCIE; inline;
  10359. procedure setCHCCIF; inline;
  10360. procedure setCHDDIE; inline;
  10361. procedure setCHDDIF; inline;
  10362. procedure setCHDHIE; inline;
  10363. procedure setCHDHIF; inline;
  10364. procedure setCHERIE; inline;
  10365. procedure setCHERIF; inline;
  10366. procedure setCHSDIE; inline;
  10367. procedure setCHSDIF; inline;
  10368. procedure setCHSHIE; inline;
  10369. procedure setCHSHIF; inline;
  10370. procedure setCHTAIE; inline;
  10371. procedure setCHTAIF; inline;
  10372. property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
  10373. property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
  10374. property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
  10375. property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
  10376. property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
  10377. property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
  10378. property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
  10379. property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
  10380. property CHERIE : TBits_1 read getCHERIE write setCHERIE;
  10381. property CHERIF : TBits_1 read getCHERIF write setCHERIF;
  10382. property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
  10383. property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
  10384. property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
  10385. property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
  10386. property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
  10387. property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
  10388. property w : TBits_32 read getw write setw;
  10389. end;
  10390. type
  10391. TDMAC1Registers = record
  10392. DCH1CONbits : TDMAC1_DCH1CON;
  10393. DCH1CON : longWord;
  10394. DCH1CONCLR : longWord;
  10395. DCH1CONSET : longWord;
  10396. DCH1CONINV : longWord;
  10397. DCH1ECONbits : TDMAC1_DCH1ECON;
  10398. DCH1ECON : longWord;
  10399. DCH1ECONCLR : longWord;
  10400. DCH1ECONSET : longWord;
  10401. DCH1ECONINV : longWord;
  10402. DCH1INTbits : TDMAC1_DCH1INT;
  10403. DCH1INT : longWord;
  10404. DCH1INTCLR : longWord;
  10405. DCH1INTSET : longWord;
  10406. DCH1INTINV : longWord;
  10407. DCH1SSA : longWord;
  10408. DCH1SSACLR : longWord;
  10409. DCH1SSASET : longWord;
  10410. DCH1SSAINV : longWord;
  10411. DCH1DSA : longWord;
  10412. DCH1DSACLR : longWord;
  10413. DCH1DSASET : longWord;
  10414. DCH1DSAINV : longWord;
  10415. DCH1SSIZ : longWord;
  10416. DCH1SSIZCLR : longWord;
  10417. DCH1SSIZSET : longWord;
  10418. DCH1SSIZINV : longWord;
  10419. DCH1DSIZ : longWord;
  10420. DCH1DSIZCLR : longWord;
  10421. DCH1DSIZSET : longWord;
  10422. DCH1DSIZINV : longWord;
  10423. DCH1SPTR : longWord;
  10424. DCH1SPTRCLR : longWord;
  10425. DCH1SPTRSET : longWord;
  10426. DCH1SPTRINV : longWord;
  10427. DCH1DPTR : longWord;
  10428. DCH1DPTRCLR : longWord;
  10429. DCH1DPTRSET : longWord;
  10430. DCH1DPTRINV : longWord;
  10431. DCH1CSIZ : longWord;
  10432. DCH1CSIZCLR : longWord;
  10433. DCH1CSIZSET : longWord;
  10434. DCH1CSIZINV : longWord;
  10435. DCH1CPTR : longWord;
  10436. DCH1CPTRCLR : longWord;
  10437. DCH1CPTRSET : longWord;
  10438. DCH1CPTRINV : longWord;
  10439. DCH1DAT : longWord;
  10440. DCH1DATCLR : longWord;
  10441. DCH1DATSET : longWord;
  10442. DCH1DATINV : longWord;
  10443. end;
  10444. TDMAC2_DCH2CON = record
  10445. private
  10446. function getCHAED : TBits_1; inline;
  10447. function getCHAEN : TBits_1; inline;
  10448. function getCHBUSY : TBits_1; inline;
  10449. function getCHCHN : TBits_1; inline;
  10450. function getCHCHNS : TBits_1; inline;
  10451. function getCHEDET : TBits_1; inline;
  10452. function getCHEN : TBits_1; inline;
  10453. function getCHPRI : TBits_2; inline;
  10454. function getw : TBits_32; inline;
  10455. procedure setCHAED(thebits : TBits_1); inline;
  10456. procedure setCHAEN(thebits : TBits_1); inline;
  10457. procedure setCHBUSY(thebits : TBits_1); inline;
  10458. procedure setCHCHN(thebits : TBits_1); inline;
  10459. procedure setCHCHNS(thebits : TBits_1); inline;
  10460. procedure setCHEDET(thebits : TBits_1); inline;
  10461. procedure setCHEN(thebits : TBits_1); inline;
  10462. procedure setCHPRI(thebits : TBits_2); inline;
  10463. procedure setw(thebits : TBits_32); inline;
  10464. public
  10465. procedure clearCHAED; inline;
  10466. procedure clearCHAEN; inline;
  10467. procedure clearCHBUSY; inline;
  10468. procedure clearCHCHN; inline;
  10469. procedure clearCHCHNS; inline;
  10470. procedure clearCHEDET; inline;
  10471. procedure clearCHEN; inline;
  10472. procedure setCHAED; inline;
  10473. procedure setCHAEN; inline;
  10474. procedure setCHBUSY; inline;
  10475. procedure setCHCHN; inline;
  10476. procedure setCHCHNS; inline;
  10477. procedure setCHEDET; inline;
  10478. procedure setCHEN; inline;
  10479. property CHAED : TBits_1 read getCHAED write setCHAED;
  10480. property CHAEN : TBits_1 read getCHAEN write setCHAEN;
  10481. property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
  10482. property CHCHN : TBits_1 read getCHCHN write setCHCHN;
  10483. property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
  10484. property CHEDET : TBits_1 read getCHEDET write setCHEDET;
  10485. property CHEN : TBits_1 read getCHEN write setCHEN;
  10486. property CHPRI : TBits_2 read getCHPRI write setCHPRI;
  10487. property w : TBits_32 read getw write setw;
  10488. end;
  10489. TDMAC2_DCH2ECON = record
  10490. private
  10491. function getAIRQEN : TBits_1; inline;
  10492. function getCABORT : TBits_1; inline;
  10493. function getCFORCE : TBits_1; inline;
  10494. function getCHAIRQ : TBits_8; inline;
  10495. function getCHSIRQ : TBits_8; inline;
  10496. function getPATEN : TBits_1; inline;
  10497. function getSIRQEN : TBits_1; inline;
  10498. function getw : TBits_32; inline;
  10499. procedure setAIRQEN(thebits : TBits_1); inline;
  10500. procedure setCABORT(thebits : TBits_1); inline;
  10501. procedure setCFORCE(thebits : TBits_1); inline;
  10502. procedure setCHAIRQ(thebits : TBits_8); inline;
  10503. procedure setCHSIRQ(thebits : TBits_8); inline;
  10504. procedure setPATEN(thebits : TBits_1); inline;
  10505. procedure setSIRQEN(thebits : TBits_1); inline;
  10506. procedure setw(thebits : TBits_32); inline;
  10507. public
  10508. procedure clearAIRQEN; inline;
  10509. procedure clearCABORT; inline;
  10510. procedure clearCFORCE; inline;
  10511. procedure clearPATEN; inline;
  10512. procedure clearSIRQEN; inline;
  10513. procedure setAIRQEN; inline;
  10514. procedure setCABORT; inline;
  10515. procedure setCFORCE; inline;
  10516. procedure setPATEN; inline;
  10517. procedure setSIRQEN; inline;
  10518. property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
  10519. property CABORT : TBits_1 read getCABORT write setCABORT;
  10520. property CFORCE : TBits_1 read getCFORCE write setCFORCE;
  10521. property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
  10522. property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
  10523. property PATEN : TBits_1 read getPATEN write setPATEN;
  10524. property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
  10525. property w : TBits_32 read getw write setw;
  10526. end;
  10527. TDMAC2_DCH2INT = record
  10528. private
  10529. function getCHBCIE : TBits_1; inline;
  10530. function getCHBCIF : TBits_1; inline;
  10531. function getCHCCIE : TBits_1; inline;
  10532. function getCHCCIF : TBits_1; inline;
  10533. function getCHDDIE : TBits_1; inline;
  10534. function getCHDDIF : TBits_1; inline;
  10535. function getCHDHIE : TBits_1; inline;
  10536. function getCHDHIF : TBits_1; inline;
  10537. function getCHERIE : TBits_1; inline;
  10538. function getCHERIF : TBits_1; inline;
  10539. function getCHSDIE : TBits_1; inline;
  10540. function getCHSDIF : TBits_1; inline;
  10541. function getCHSHIE : TBits_1; inline;
  10542. function getCHSHIF : TBits_1; inline;
  10543. function getCHTAIE : TBits_1; inline;
  10544. function getCHTAIF : TBits_1; inline;
  10545. function getw : TBits_32; inline;
  10546. procedure setCHBCIE(thebits : TBits_1); inline;
  10547. procedure setCHBCIF(thebits : TBits_1); inline;
  10548. procedure setCHCCIE(thebits : TBits_1); inline;
  10549. procedure setCHCCIF(thebits : TBits_1); inline;
  10550. procedure setCHDDIE(thebits : TBits_1); inline;
  10551. procedure setCHDDIF(thebits : TBits_1); inline;
  10552. procedure setCHDHIE(thebits : TBits_1); inline;
  10553. procedure setCHDHIF(thebits : TBits_1); inline;
  10554. procedure setCHERIE(thebits : TBits_1); inline;
  10555. procedure setCHERIF(thebits : TBits_1); inline;
  10556. procedure setCHSDIE(thebits : TBits_1); inline;
  10557. procedure setCHSDIF(thebits : TBits_1); inline;
  10558. procedure setCHSHIE(thebits : TBits_1); inline;
  10559. procedure setCHSHIF(thebits : TBits_1); inline;
  10560. procedure setCHTAIE(thebits : TBits_1); inline;
  10561. procedure setCHTAIF(thebits : TBits_1); inline;
  10562. procedure setw(thebits : TBits_32); inline;
  10563. public
  10564. procedure clearCHBCIE; inline;
  10565. procedure clearCHBCIF; inline;
  10566. procedure clearCHCCIE; inline;
  10567. procedure clearCHCCIF; inline;
  10568. procedure clearCHDDIE; inline;
  10569. procedure clearCHDDIF; inline;
  10570. procedure clearCHDHIE; inline;
  10571. procedure clearCHDHIF; inline;
  10572. procedure clearCHERIE; inline;
  10573. procedure clearCHERIF; inline;
  10574. procedure clearCHSDIE; inline;
  10575. procedure clearCHSDIF; inline;
  10576. procedure clearCHSHIE; inline;
  10577. procedure clearCHSHIF; inline;
  10578. procedure clearCHTAIE; inline;
  10579. procedure clearCHTAIF; inline;
  10580. procedure setCHBCIE; inline;
  10581. procedure setCHBCIF; inline;
  10582. procedure setCHCCIE; inline;
  10583. procedure setCHCCIF; inline;
  10584. procedure setCHDDIE; inline;
  10585. procedure setCHDDIF; inline;
  10586. procedure setCHDHIE; inline;
  10587. procedure setCHDHIF; inline;
  10588. procedure setCHERIE; inline;
  10589. procedure setCHERIF; inline;
  10590. procedure setCHSDIE; inline;
  10591. procedure setCHSDIF; inline;
  10592. procedure setCHSHIE; inline;
  10593. procedure setCHSHIF; inline;
  10594. procedure setCHTAIE; inline;
  10595. procedure setCHTAIF; inline;
  10596. property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
  10597. property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
  10598. property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
  10599. property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
  10600. property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
  10601. property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
  10602. property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
  10603. property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
  10604. property CHERIE : TBits_1 read getCHERIE write setCHERIE;
  10605. property CHERIF : TBits_1 read getCHERIF write setCHERIF;
  10606. property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
  10607. property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
  10608. property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
  10609. property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
  10610. property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
  10611. property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
  10612. property w : TBits_32 read getw write setw;
  10613. end;
  10614. type
  10615. TDMAC2Registers = record
  10616. DCH2CONbits : TDMAC2_DCH2CON;
  10617. DCH2CON : longWord;
  10618. DCH2CONCLR : longWord;
  10619. DCH2CONSET : longWord;
  10620. DCH2CONINV : longWord;
  10621. DCH2ECONbits : TDMAC2_DCH2ECON;
  10622. DCH2ECON : longWord;
  10623. DCH2ECONCLR : longWord;
  10624. DCH2ECONSET : longWord;
  10625. DCH2ECONINV : longWord;
  10626. DCH2INTbits : TDMAC2_DCH2INT;
  10627. DCH2INT : longWord;
  10628. DCH2INTCLR : longWord;
  10629. DCH2INTSET : longWord;
  10630. DCH2INTINV : longWord;
  10631. DCH2SSA : longWord;
  10632. DCH2SSACLR : longWord;
  10633. DCH2SSASET : longWord;
  10634. DCH2SSAINV : longWord;
  10635. DCH2DSA : longWord;
  10636. DCH2DSACLR : longWord;
  10637. DCH2DSASET : longWord;
  10638. DCH2DSAINV : longWord;
  10639. DCH2SSIZ : longWord;
  10640. DCH2SSIZCLR : longWord;
  10641. DCH2SSIZSET : longWord;
  10642. DCH2SSIZINV : longWord;
  10643. DCH2DSIZ : longWord;
  10644. DCH2DSIZCLR : longWord;
  10645. DCH2DSIZSET : longWord;
  10646. DCH2DSIZINV : longWord;
  10647. DCH2SPTR : longWord;
  10648. DCH2SPTRCLR : longWord;
  10649. DCH2SPTRSET : longWord;
  10650. DCH2SPTRINV : longWord;
  10651. DCH2DPTR : longWord;
  10652. DCH2DPTRCLR : longWord;
  10653. DCH2DPTRSET : longWord;
  10654. DCH2DPTRINV : longWord;
  10655. DCH2CSIZ : longWord;
  10656. DCH2CSIZCLR : longWord;
  10657. DCH2CSIZSET : longWord;
  10658. DCH2CSIZINV : longWord;
  10659. DCH2CPTR : longWord;
  10660. DCH2CPTRCLR : longWord;
  10661. DCH2CPTRSET : longWord;
  10662. DCH2CPTRINV : longWord;
  10663. DCH2DAT : longWord;
  10664. DCH2DATCLR : longWord;
  10665. DCH2DATSET : longWord;
  10666. DCH2DATINV : longWord;
  10667. end;
  10668. TDMAC3_DCH3CON = record
  10669. private
  10670. function getCHAED : TBits_1; inline;
  10671. function getCHAEN : TBits_1; inline;
  10672. function getCHBUSY : TBits_1; inline;
  10673. function getCHCHN : TBits_1; inline;
  10674. function getCHCHNS : TBits_1; inline;
  10675. function getCHEDET : TBits_1; inline;
  10676. function getCHEN : TBits_1; inline;
  10677. function getCHPRI : TBits_2; inline;
  10678. function getw : TBits_32; inline;
  10679. procedure setCHAED(thebits : TBits_1); inline;
  10680. procedure setCHAEN(thebits : TBits_1); inline;
  10681. procedure setCHBUSY(thebits : TBits_1); inline;
  10682. procedure setCHCHN(thebits : TBits_1); inline;
  10683. procedure setCHCHNS(thebits : TBits_1); inline;
  10684. procedure setCHEDET(thebits : TBits_1); inline;
  10685. procedure setCHEN(thebits : TBits_1); inline;
  10686. procedure setCHPRI(thebits : TBits_2); inline;
  10687. procedure setw(thebits : TBits_32); inline;
  10688. public
  10689. procedure clearCHAED; inline;
  10690. procedure clearCHAEN; inline;
  10691. procedure clearCHBUSY; inline;
  10692. procedure clearCHCHN; inline;
  10693. procedure clearCHCHNS; inline;
  10694. procedure clearCHEDET; inline;
  10695. procedure clearCHEN; inline;
  10696. procedure setCHAED; inline;
  10697. procedure setCHAEN; inline;
  10698. procedure setCHBUSY; inline;
  10699. procedure setCHCHN; inline;
  10700. procedure setCHCHNS; inline;
  10701. procedure setCHEDET; inline;
  10702. procedure setCHEN; inline;
  10703. property CHAED : TBits_1 read getCHAED write setCHAED;
  10704. property CHAEN : TBits_1 read getCHAEN write setCHAEN;
  10705. property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
  10706. property CHCHN : TBits_1 read getCHCHN write setCHCHN;
  10707. property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
  10708. property CHEDET : TBits_1 read getCHEDET write setCHEDET;
  10709. property CHEN : TBits_1 read getCHEN write setCHEN;
  10710. property CHPRI : TBits_2 read getCHPRI write setCHPRI;
  10711. property w : TBits_32 read getw write setw;
  10712. end;
  10713. TDMAC3_DCH3ECON = record
  10714. private
  10715. function getAIRQEN : TBits_1; inline;
  10716. function getCABORT : TBits_1; inline;
  10717. function getCFORCE : TBits_1; inline;
  10718. function getCHAIRQ : TBits_8; inline;
  10719. function getCHSIRQ : TBits_8; inline;
  10720. function getPATEN : TBits_1; inline;
  10721. function getSIRQEN : TBits_1; inline;
  10722. function getw : TBits_32; inline;
  10723. procedure setAIRQEN(thebits : TBits_1); inline;
  10724. procedure setCABORT(thebits : TBits_1); inline;
  10725. procedure setCFORCE(thebits : TBits_1); inline;
  10726. procedure setCHAIRQ(thebits : TBits_8); inline;
  10727. procedure setCHSIRQ(thebits : TBits_8); inline;
  10728. procedure setPATEN(thebits : TBits_1); inline;
  10729. procedure setSIRQEN(thebits : TBits_1); inline;
  10730. procedure setw(thebits : TBits_32); inline;
  10731. public
  10732. procedure clearAIRQEN; inline;
  10733. procedure clearCABORT; inline;
  10734. procedure clearCFORCE; inline;
  10735. procedure clearPATEN; inline;
  10736. procedure clearSIRQEN; inline;
  10737. procedure setAIRQEN; inline;
  10738. procedure setCABORT; inline;
  10739. procedure setCFORCE; inline;
  10740. procedure setPATEN; inline;
  10741. procedure setSIRQEN; inline;
  10742. property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
  10743. property CABORT : TBits_1 read getCABORT write setCABORT;
  10744. property CFORCE : TBits_1 read getCFORCE write setCFORCE;
  10745. property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
  10746. property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
  10747. property PATEN : TBits_1 read getPATEN write setPATEN;
  10748. property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
  10749. property w : TBits_32 read getw write setw;
  10750. end;
  10751. TDMAC3_DCH3INT = record
  10752. private
  10753. function getCHBCIE : TBits_1; inline;
  10754. function getCHBCIF : TBits_1; inline;
  10755. function getCHCCIE : TBits_1; inline;
  10756. function getCHCCIF : TBits_1; inline;
  10757. function getCHDDIE : TBits_1; inline;
  10758. function getCHDDIF : TBits_1; inline;
  10759. function getCHDHIE : TBits_1; inline;
  10760. function getCHDHIF : TBits_1; inline;
  10761. function getCHERIE : TBits_1; inline;
  10762. function getCHERIF : TBits_1; inline;
  10763. function getCHSDIE : TBits_1; inline;
  10764. function getCHSDIF : TBits_1; inline;
  10765. function getCHSHIE : TBits_1; inline;
  10766. function getCHSHIF : TBits_1; inline;
  10767. function getCHTAIE : TBits_1; inline;
  10768. function getCHTAIF : TBits_1; inline;
  10769. function getw : TBits_32; inline;
  10770. procedure setCHBCIE(thebits : TBits_1); inline;
  10771. procedure setCHBCIF(thebits : TBits_1); inline;
  10772. procedure setCHCCIE(thebits : TBits_1); inline;
  10773. procedure setCHCCIF(thebits : TBits_1); inline;
  10774. procedure setCHDDIE(thebits : TBits_1); inline;
  10775. procedure setCHDDIF(thebits : TBits_1); inline;
  10776. procedure setCHDHIE(thebits : TBits_1); inline;
  10777. procedure setCHDHIF(thebits : TBits_1); inline;
  10778. procedure setCHERIE(thebits : TBits_1); inline;
  10779. procedure setCHERIF(thebits : TBits_1); inline;
  10780. procedure setCHSDIE(thebits : TBits_1); inline;
  10781. procedure setCHSDIF(thebits : TBits_1); inline;
  10782. procedure setCHSHIE(thebits : TBits_1); inline;
  10783. procedure setCHSHIF(thebits : TBits_1); inline;
  10784. procedure setCHTAIE(thebits : TBits_1); inline;
  10785. procedure setCHTAIF(thebits : TBits_1); inline;
  10786. procedure setw(thebits : TBits_32); inline;
  10787. public
  10788. procedure clearCHBCIE; inline;
  10789. procedure clearCHBCIF; inline;
  10790. procedure clearCHCCIE; inline;
  10791. procedure clearCHCCIF; inline;
  10792. procedure clearCHDDIE; inline;
  10793. procedure clearCHDDIF; inline;
  10794. procedure clearCHDHIE; inline;
  10795. procedure clearCHDHIF; inline;
  10796. procedure clearCHERIE; inline;
  10797. procedure clearCHERIF; inline;
  10798. procedure clearCHSDIE; inline;
  10799. procedure clearCHSDIF; inline;
  10800. procedure clearCHSHIE; inline;
  10801. procedure clearCHSHIF; inline;
  10802. procedure clearCHTAIE; inline;
  10803. procedure clearCHTAIF; inline;
  10804. procedure setCHBCIE; inline;
  10805. procedure setCHBCIF; inline;
  10806. procedure setCHCCIE; inline;
  10807. procedure setCHCCIF; inline;
  10808. procedure setCHDDIE; inline;
  10809. procedure setCHDDIF; inline;
  10810. procedure setCHDHIE; inline;
  10811. procedure setCHDHIF; inline;
  10812. procedure setCHERIE; inline;
  10813. procedure setCHERIF; inline;
  10814. procedure setCHSDIE; inline;
  10815. procedure setCHSDIF; inline;
  10816. procedure setCHSHIE; inline;
  10817. procedure setCHSHIF; inline;
  10818. procedure setCHTAIE; inline;
  10819. procedure setCHTAIF; inline;
  10820. property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
  10821. property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
  10822. property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
  10823. property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
  10824. property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
  10825. property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
  10826. property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
  10827. property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
  10828. property CHERIE : TBits_1 read getCHERIE write setCHERIE;
  10829. property CHERIF : TBits_1 read getCHERIF write setCHERIF;
  10830. property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
  10831. property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
  10832. property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
  10833. property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
  10834. property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
  10835. property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
  10836. property w : TBits_32 read getw write setw;
  10837. end;
  10838. type
  10839. TDMAC3Registers = record
  10840. DCH3CONbits : TDMAC3_DCH3CON;
  10841. DCH3CON : longWord;
  10842. DCH3CONCLR : longWord;
  10843. DCH3CONSET : longWord;
  10844. DCH3CONINV : longWord;
  10845. DCH3ECONbits : TDMAC3_DCH3ECON;
  10846. DCH3ECON : longWord;
  10847. DCH3ECONCLR : longWord;
  10848. DCH3ECONSET : longWord;
  10849. DCH3ECONINV : longWord;
  10850. DCH3INTbits : TDMAC3_DCH3INT;
  10851. DCH3INT : longWord;
  10852. DCH3INTCLR : longWord;
  10853. DCH3INTSET : longWord;
  10854. DCH3INTINV : longWord;
  10855. DCH3SSA : longWord;
  10856. DCH3SSACLR : longWord;
  10857. DCH3SSASET : longWord;
  10858. DCH3SSAINV : longWord;
  10859. DCH3DSA : longWord;
  10860. DCH3DSACLR : longWord;
  10861. DCH3DSASET : longWord;
  10862. DCH3DSAINV : longWord;
  10863. DCH3SSIZ : longWord;
  10864. DCH3SSIZCLR : longWord;
  10865. DCH3SSIZSET : longWord;
  10866. DCH3SSIZINV : longWord;
  10867. DCH3DSIZ : longWord;
  10868. DCH3DSIZCLR : longWord;
  10869. DCH3DSIZSET : longWord;
  10870. DCH3DSIZINV : longWord;
  10871. DCH3SPTR : longWord;
  10872. DCH3SPTRCLR : longWord;
  10873. DCH3SPTRSET : longWord;
  10874. DCH3SPTRINV : longWord;
  10875. DCH3DPTR : longWord;
  10876. DCH3DPTRCLR : longWord;
  10877. DCH3DPTRSET : longWord;
  10878. DCH3DPTRINV : longWord;
  10879. DCH3CSIZ : longWord;
  10880. DCH3CSIZCLR : longWord;
  10881. DCH3CSIZSET : longWord;
  10882. DCH3CSIZINV : longWord;
  10883. DCH3CPTR : longWord;
  10884. DCH3CPTRCLR : longWord;
  10885. DCH3CPTRSET : longWord;
  10886. DCH3CPTRINV : longWord;
  10887. DCH3DAT : longWord;
  10888. DCH3DATCLR : longWord;
  10889. DCH3DATSET : longWord;
  10890. DCH3DATINV : longWord;
  10891. end;
  10892. TPCACHE_CHECON = record
  10893. private
  10894. function getCHECOH : TBits_1; inline;
  10895. function getDCSZ : TBits_2; inline;
  10896. function getPFMWS : TBits_3; inline;
  10897. function getPREFEN : TBits_2; inline;
  10898. function getw : TBits_32; inline;
  10899. procedure setCHECOH(thebits : TBits_1); inline;
  10900. procedure setDCSZ(thebits : TBits_2); inline;
  10901. procedure setPFMWS(thebits : TBits_3); inline;
  10902. procedure setPREFEN(thebits : TBits_2); inline;
  10903. procedure setw(thebits : TBits_32); inline;
  10904. public
  10905. procedure clearCHECOH; inline;
  10906. procedure setCHECOH; inline;
  10907. property CHECOH : TBits_1 read getCHECOH write setCHECOH;
  10908. property DCSZ : TBits_2 read getDCSZ write setDCSZ;
  10909. property PFMWS : TBits_3 read getPFMWS write setPFMWS;
  10910. property PREFEN : TBits_2 read getPREFEN write setPREFEN;
  10911. property w : TBits_32 read getw write setw;
  10912. end;
  10913. TPCACHE_CHETAG = record
  10914. private
  10915. function getLLOCK : TBits_1; inline;
  10916. function getLTAG : TBits_20; inline;
  10917. function getLTAGBOOT : TBits_1; inline;
  10918. function getLTYPE : TBits_1; inline;
  10919. function getLVALID : TBits_1; inline;
  10920. function getw : TBits_32; inline;
  10921. procedure setLLOCK(thebits : TBits_1); inline;
  10922. procedure setLTAG(thebits : TBits_20); inline;
  10923. procedure setLTAGBOOT(thebits : TBits_1); inline;
  10924. procedure setLTYPE(thebits : TBits_1); inline;
  10925. procedure setLVALID(thebits : TBits_1); inline;
  10926. procedure setw(thebits : TBits_32); inline;
  10927. public
  10928. procedure clearLLOCK; inline;
  10929. procedure clearLTAGBOOT; inline;
  10930. procedure clearLTYPE; inline;
  10931. procedure clearLVALID; inline;
  10932. procedure setLLOCK; inline;
  10933. procedure setLTAGBOOT; inline;
  10934. procedure setLTYPE; inline;
  10935. procedure setLVALID; inline;
  10936. property LLOCK : TBits_1 read getLLOCK write setLLOCK;
  10937. property LTAG : TBits_20 read getLTAG write setLTAG;
  10938. property LTAGBOOT : TBits_1 read getLTAGBOOT write setLTAGBOOT;
  10939. property LTYPE : TBits_1 read getLTYPE write setLTYPE;
  10940. property LVALID : TBits_1 read getLVALID write setLVALID;
  10941. property w : TBits_32 read getw write setw;
  10942. end;
  10943. type
  10944. TPCACHERegisters = record
  10945. CHECONbits : TPCACHE_CHECON;
  10946. CHECON : longWord;
  10947. CHECONCLR : longWord;
  10948. CHECONSET : longWord;
  10949. CHECONINV : longWord;
  10950. CHEACC : longWord;
  10951. CHEACCCLR : longWord;
  10952. CHEACCSET : longWord;
  10953. CHEACCINV : longWord;
  10954. CHETAGbits : TPCACHE_CHETAG;
  10955. CHETAG : longWord;
  10956. CHETAGCLR : longWord;
  10957. CHETAGSET : longWord;
  10958. CHETAGINV : longWord;
  10959. CHEMSK : longWord;
  10960. CHEMSKCLR : longWord;
  10961. CHEMSKSET : longWord;
  10962. CHEMSKINV : longWord;
  10963. CHEW0 : longWord;
  10964. CHEW1 : longWord;
  10965. CHEW2 : longWord;
  10966. CHEW3 : longWord;
  10967. CHELRU : longWord;
  10968. CHEHIT : longWord;
  10969. CHEMIS : longWord;
  10970. CHEPFABT : longWord;
  10971. end;
  10972. TUSB_U1IR = record
  10973. private
  10974. function getATTACHIF : TBits_1; inline;
  10975. function getDETACHIF : TBits_1; inline;
  10976. function getIDLEIF : TBits_1; inline;
  10977. function getRESUMEIF : TBits_1; inline;
  10978. function getSOFIF : TBits_1; inline;
  10979. function getSTALLIF : TBits_1; inline;
  10980. function getTRNIF : TBits_1; inline;
  10981. function getUERRIF : TBits_1; inline;
  10982. function getURSTIF : TBits_1; inline;
  10983. function getURSTIF_DETACHIF : TBits_1; inline;
  10984. procedure setATTACHIF(thebits : TBits_1); inline;
  10985. procedure setDETACHIF(thebits : TBits_1); inline;
  10986. procedure setIDLEIF(thebits : TBits_1); inline;
  10987. procedure setRESUMEIF(thebits : TBits_1); inline;
  10988. procedure setSOFIF(thebits : TBits_1); inline;
  10989. procedure setSTALLIF(thebits : TBits_1); inline;
  10990. procedure setTRNIF(thebits : TBits_1); inline;
  10991. procedure setUERRIF(thebits : TBits_1); inline;
  10992. procedure setURSTIF(thebits : TBits_1); inline;
  10993. procedure setURSTIF_DETACHIF(thebits : TBits_1); inline;
  10994. public
  10995. procedure clearATTACHIF; inline;
  10996. procedure clearDETACHIF; inline;
  10997. procedure clearIDLEIF; inline;
  10998. procedure clearRESUMEIF; inline;
  10999. procedure clearSOFIF; inline;
  11000. procedure clearSTALLIF; inline;
  11001. procedure clearTRNIF; inline;
  11002. procedure clearUERRIF; inline;
  11003. procedure clearURSTIF; inline;
  11004. procedure clearURSTIF_DETACHIF; inline;
  11005. procedure setATTACHIF; inline;
  11006. procedure setDETACHIF; inline;
  11007. procedure setIDLEIF; inline;
  11008. procedure setRESUMEIF; inline;
  11009. procedure setSOFIF; inline;
  11010. procedure setSTALLIF; inline;
  11011. procedure setTRNIF; inline;
  11012. procedure setUERRIF; inline;
  11013. procedure setURSTIF; inline;
  11014. procedure setURSTIF_DETACHIF; inline;
  11015. property ATTACHIF : TBits_1 read getATTACHIF write setATTACHIF;
  11016. property DETACHIF : TBits_1 read getDETACHIF write setDETACHIF;
  11017. property IDLEIF : TBits_1 read getIDLEIF write setIDLEIF;
  11018. property RESUMEIF : TBits_1 read getRESUMEIF write setRESUMEIF;
  11019. property SOFIF : TBits_1 read getSOFIF write setSOFIF;
  11020. property STALLIF : TBits_1 read getSTALLIF write setSTALLIF;
  11021. property TRNIF : TBits_1 read getTRNIF write setTRNIF;
  11022. property UERRIF : TBits_1 read getUERRIF write setUERRIF;
  11023. property URSTIF : TBits_1 read getURSTIF write setURSTIF;
  11024. property URSTIF_DETACHIF : TBits_1 read getURSTIF_DETACHIF write setURSTIF_DETACHIF;
  11025. end;
  11026. TUSB_U1IE = record
  11027. private
  11028. function getATTACHIE : TBits_1; inline;
  11029. function getDETACHIE : TBits_1; inline;
  11030. function getIDLEIE : TBits_1; inline;
  11031. function getRESUMEIE : TBits_1; inline;
  11032. function getSOFIE : TBits_1; inline;
  11033. function getSTALLIE : TBits_1; inline;
  11034. function getTRNIE : TBits_1; inline;
  11035. function getUERRIE : TBits_1; inline;
  11036. function getURSTIE : TBits_1; inline;
  11037. function getURSTIE_DETACHIE : TBits_1; inline;
  11038. procedure setATTACHIE(thebits : TBits_1); inline;
  11039. procedure setDETACHIE(thebits : TBits_1); inline;
  11040. procedure setIDLEIE(thebits : TBits_1); inline;
  11041. procedure setRESUMEIE(thebits : TBits_1); inline;
  11042. procedure setSOFIE(thebits : TBits_1); inline;
  11043. procedure setSTALLIE(thebits : TBits_1); inline;
  11044. procedure setTRNIE(thebits : TBits_1); inline;
  11045. procedure setUERRIE(thebits : TBits_1); inline;
  11046. procedure setURSTIE(thebits : TBits_1); inline;
  11047. procedure setURSTIE_DETACHIE(thebits : TBits_1); inline;
  11048. public
  11049. procedure clearATTACHIE; inline;
  11050. procedure clearDETACHIE; inline;
  11051. procedure clearIDLEIE; inline;
  11052. procedure clearRESUMEIE; inline;
  11053. procedure clearSOFIE; inline;
  11054. procedure clearSTALLIE; inline;
  11055. procedure clearTRNIE; inline;
  11056. procedure clearUERRIE; inline;
  11057. procedure clearURSTIE; inline;
  11058. procedure clearURSTIE_DETACHIE; inline;
  11059. procedure setATTACHIE; inline;
  11060. procedure setDETACHIE; inline;
  11061. procedure setIDLEIE; inline;
  11062. procedure setRESUMEIE; inline;
  11063. procedure setSOFIE; inline;
  11064. procedure setSTALLIE; inline;
  11065. procedure setTRNIE; inline;
  11066. procedure setUERRIE; inline;
  11067. procedure setURSTIE; inline;
  11068. procedure setURSTIE_DETACHIE; inline;
  11069. property ATTACHIE : TBits_1 read getATTACHIE write setATTACHIE;
  11070. property DETACHIE : TBits_1 read getDETACHIE write setDETACHIE;
  11071. property IDLEIE : TBits_1 read getIDLEIE write setIDLEIE;
  11072. property RESUMEIE : TBits_1 read getRESUMEIE write setRESUMEIE;
  11073. property SOFIE : TBits_1 read getSOFIE write setSOFIE;
  11074. property STALLIE : TBits_1 read getSTALLIE write setSTALLIE;
  11075. property TRNIE : TBits_1 read getTRNIE write setTRNIE;
  11076. property UERRIE : TBits_1 read getUERRIE write setUERRIE;
  11077. property URSTIE : TBits_1 read getURSTIE write setURSTIE;
  11078. property URSTIE_DETACHIE : TBits_1 read getURSTIE_DETACHIE write setURSTIE_DETACHIE;
  11079. end;
  11080. TUSB_U1EIR = record
  11081. private
  11082. function getBMXEF : TBits_1; inline;
  11083. function getBTOEF : TBits_1; inline;
  11084. function getBTSEF : TBits_1; inline;
  11085. function getCRC16EF : TBits_1; inline;
  11086. function getCRC5EF : TBits_1; inline;
  11087. function getCRC5EF_EOFEF : TBits_1; inline;
  11088. function getDFN8EF : TBits_1; inline;
  11089. function getDMAEF : TBits_1; inline;
  11090. function getEOFEF : TBits_1; inline;
  11091. function getPIDEF : TBits_1; inline;
  11092. procedure setBMXEF(thebits : TBits_1); inline;
  11093. procedure setBTOEF(thebits : TBits_1); inline;
  11094. procedure setBTSEF(thebits : TBits_1); inline;
  11095. procedure setCRC16EF(thebits : TBits_1); inline;
  11096. procedure setCRC5EF(thebits : TBits_1); inline;
  11097. procedure setCRC5EF_EOFEF(thebits : TBits_1); inline;
  11098. procedure setDFN8EF(thebits : TBits_1); inline;
  11099. procedure setDMAEF(thebits : TBits_1); inline;
  11100. procedure setEOFEF(thebits : TBits_1); inline;
  11101. procedure setPIDEF(thebits : TBits_1); inline;
  11102. public
  11103. procedure clearBMXEF; inline;
  11104. procedure clearBTOEF; inline;
  11105. procedure clearBTSEF; inline;
  11106. procedure clearCRC16EF; inline;
  11107. procedure clearCRC5EF; inline;
  11108. procedure clearCRC5EF_EOFEF; inline;
  11109. procedure clearDFN8EF; inline;
  11110. procedure clearDMAEF; inline;
  11111. procedure clearEOFEF; inline;
  11112. procedure clearPIDEF; inline;
  11113. procedure setBMXEF; inline;
  11114. procedure setBTOEF; inline;
  11115. procedure setBTSEF; inline;
  11116. procedure setCRC16EF; inline;
  11117. procedure setCRC5EF; inline;
  11118. procedure setCRC5EF_EOFEF; inline;
  11119. procedure setDFN8EF; inline;
  11120. procedure setDMAEF; inline;
  11121. procedure setEOFEF; inline;
  11122. procedure setPIDEF; inline;
  11123. property BMXEF : TBits_1 read getBMXEF write setBMXEF;
  11124. property BTOEF : TBits_1 read getBTOEF write setBTOEF;
  11125. property BTSEF : TBits_1 read getBTSEF write setBTSEF;
  11126. property CRC16EF : TBits_1 read getCRC16EF write setCRC16EF;
  11127. property CRC5EF : TBits_1 read getCRC5EF write setCRC5EF;
  11128. property CRC5EF_EOFEF : TBits_1 read getCRC5EF_EOFEF write setCRC5EF_EOFEF;
  11129. property DFN8EF : TBits_1 read getDFN8EF write setDFN8EF;
  11130. property DMAEF : TBits_1 read getDMAEF write setDMAEF;
  11131. property EOFEF : TBits_1 read getEOFEF write setEOFEF;
  11132. property PIDEF : TBits_1 read getPIDEF write setPIDEF;
  11133. end;
  11134. TUSB_U1EIE = record
  11135. private
  11136. function getBMXEE : TBits_1; inline;
  11137. function getBTOEE : TBits_1; inline;
  11138. function getBTSEE : TBits_1; inline;
  11139. function getCRC16EE : TBits_1; inline;
  11140. function getCRC5EE : TBits_1; inline;
  11141. function getCRC5EE_EOFEE : TBits_1; inline;
  11142. function getDFN8EE : TBits_1; inline;
  11143. function getDMAEE : TBits_1; inline;
  11144. function getEOFEE : TBits_1; inline;
  11145. function getPIDEE : TBits_1; inline;
  11146. procedure setBMXEE(thebits : TBits_1); inline;
  11147. procedure setBTOEE(thebits : TBits_1); inline;
  11148. procedure setBTSEE(thebits : TBits_1); inline;
  11149. procedure setCRC16EE(thebits : TBits_1); inline;
  11150. procedure setCRC5EE(thebits : TBits_1); inline;
  11151. procedure setCRC5EE_EOFEE(thebits : TBits_1); inline;
  11152. procedure setDFN8EE(thebits : TBits_1); inline;
  11153. procedure setDMAEE(thebits : TBits_1); inline;
  11154. procedure setEOFEE(thebits : TBits_1); inline;
  11155. procedure setPIDEE(thebits : TBits_1); inline;
  11156. public
  11157. procedure clearBMXEE; inline;
  11158. procedure clearBTOEE; inline;
  11159. procedure clearBTSEE; inline;
  11160. procedure clearCRC16EE; inline;
  11161. procedure clearCRC5EE; inline;
  11162. procedure clearCRC5EE_EOFEE; inline;
  11163. procedure clearDFN8EE; inline;
  11164. procedure clearDMAEE; inline;
  11165. procedure clearEOFEE; inline;
  11166. procedure clearPIDEE; inline;
  11167. procedure setBMXEE; inline;
  11168. procedure setBTOEE; inline;
  11169. procedure setBTSEE; inline;
  11170. procedure setCRC16EE; inline;
  11171. procedure setCRC5EE; inline;
  11172. procedure setCRC5EE_EOFEE; inline;
  11173. procedure setDFN8EE; inline;
  11174. procedure setDMAEE; inline;
  11175. procedure setEOFEE; inline;
  11176. procedure setPIDEE; inline;
  11177. property BMXEE : TBits_1 read getBMXEE write setBMXEE;
  11178. property BTOEE : TBits_1 read getBTOEE write setBTOEE;
  11179. property BTSEE : TBits_1 read getBTSEE write setBTSEE;
  11180. property CRC16EE : TBits_1 read getCRC16EE write setCRC16EE;
  11181. property CRC5EE : TBits_1 read getCRC5EE write setCRC5EE;
  11182. property CRC5EE_EOFEE : TBits_1 read getCRC5EE_EOFEE write setCRC5EE_EOFEE;
  11183. property DFN8EE : TBits_1 read getDFN8EE write setDFN8EE;
  11184. property DMAEE : TBits_1 read getDMAEE write setDMAEE;
  11185. property EOFEE : TBits_1 read getEOFEE write setEOFEE;
  11186. property PIDEE : TBits_1 read getPIDEE write setPIDEE;
  11187. end;
  11188. TUSB_U1STAT = record
  11189. private
  11190. function getDIR : TBits_1; inline;
  11191. function getENDPT : TBits_4; inline;
  11192. function getENDPT0 : TBits_1; inline;
  11193. function getENDPT1 : TBits_1; inline;
  11194. function getENDPT2 : TBits_1; inline;
  11195. function getENDPT3 : TBits_1; inline;
  11196. function getPPBI : TBits_1; inline;
  11197. procedure setDIR(thebits : TBits_1); inline;
  11198. procedure setENDPT(thebits : TBits_4); inline;
  11199. procedure setENDPT0(thebits : TBits_1); inline;
  11200. procedure setENDPT1(thebits : TBits_1); inline;
  11201. procedure setENDPT2(thebits : TBits_1); inline;
  11202. procedure setENDPT3(thebits : TBits_1); inline;
  11203. procedure setPPBI(thebits : TBits_1); inline;
  11204. public
  11205. procedure clearDIR; inline;
  11206. procedure clearENDPT0; inline;
  11207. procedure clearENDPT1; inline;
  11208. procedure clearENDPT2; inline;
  11209. procedure clearENDPT3; inline;
  11210. procedure clearPPBI; inline;
  11211. procedure setDIR; inline;
  11212. procedure setENDPT0; inline;
  11213. procedure setENDPT1; inline;
  11214. procedure setENDPT2; inline;
  11215. procedure setENDPT3; inline;
  11216. procedure setPPBI; inline;
  11217. property DIR : TBits_1 read getDIR write setDIR;
  11218. property ENDPT : TBits_4 read getENDPT write setENDPT;
  11219. property ENDPT0 : TBits_1 read getENDPT0 write setENDPT0;
  11220. property ENDPT1 : TBits_1 read getENDPT1 write setENDPT1;
  11221. property ENDPT2 : TBits_1 read getENDPT2 write setENDPT2;
  11222. property ENDPT3 : TBits_1 read getENDPT3 write setENDPT3;
  11223. property PPBI : TBits_1 read getPPBI write setPPBI;
  11224. end;
  11225. TUSB_U1CON = record
  11226. private
  11227. function getHOSTEN : TBits_1; inline;
  11228. function getJSTATE : TBits_1; inline;
  11229. function getPKTDIS : TBits_1; inline;
  11230. function getPKTDIS_TOKBUSY : TBits_1; inline;
  11231. function getPPBRST : TBits_1; inline;
  11232. function getRESUME : TBits_1; inline;
  11233. function getSE0 : TBits_1; inline;
  11234. function getSOFEN : TBits_1; inline;
  11235. function getTOKBUSY : TBits_1; inline;
  11236. function getUSBEN : TBits_1; inline;
  11237. function getUSBEN_SOFEN : TBits_1; inline;
  11238. function getUSBRST : TBits_1; inline;
  11239. procedure setHOSTEN(thebits : TBits_1); inline;
  11240. procedure setJSTATE(thebits : TBits_1); inline;
  11241. procedure setPKTDIS(thebits : TBits_1); inline;
  11242. procedure setPKTDIS_TOKBUSY(thebits : TBits_1); inline;
  11243. procedure setPPBRST(thebits : TBits_1); inline;
  11244. procedure setRESUME(thebits : TBits_1); inline;
  11245. procedure setSE0(thebits : TBits_1); inline;
  11246. procedure setSOFEN(thebits : TBits_1); inline;
  11247. procedure setTOKBUSY(thebits : TBits_1); inline;
  11248. procedure setUSBEN(thebits : TBits_1); inline;
  11249. procedure setUSBEN_SOFEN(thebits : TBits_1); inline;
  11250. procedure setUSBRST(thebits : TBits_1); inline;
  11251. public
  11252. procedure clearHOSTEN; inline;
  11253. procedure clearJSTATE; inline;
  11254. procedure clearPKTDIS; inline;
  11255. procedure clearPKTDIS_TOKBUSY; inline;
  11256. procedure clearPPBRST; inline;
  11257. procedure clearRESUME; inline;
  11258. procedure clearSE0; inline;
  11259. procedure clearSOFEN; inline;
  11260. procedure clearTOKBUSY; inline;
  11261. procedure clearUSBEN; inline;
  11262. procedure clearUSBEN_SOFEN; inline;
  11263. procedure clearUSBRST; inline;
  11264. procedure setHOSTEN; inline;
  11265. procedure setJSTATE; inline;
  11266. procedure setPKTDIS; inline;
  11267. procedure setPKTDIS_TOKBUSY; inline;
  11268. procedure setPPBRST; inline;
  11269. procedure setRESUME; inline;
  11270. procedure setSE0; inline;
  11271. procedure setSOFEN; inline;
  11272. procedure setTOKBUSY; inline;
  11273. procedure setUSBEN; inline;
  11274. procedure setUSBEN_SOFEN; inline;
  11275. procedure setUSBRST; inline;
  11276. property HOSTEN : TBits_1 read getHOSTEN write setHOSTEN;
  11277. property JSTATE : TBits_1 read getJSTATE write setJSTATE;
  11278. property PKTDIS : TBits_1 read getPKTDIS write setPKTDIS;
  11279. property PKTDIS_TOKBUSY : TBits_1 read getPKTDIS_TOKBUSY write setPKTDIS_TOKBUSY;
  11280. property PPBRST : TBits_1 read getPPBRST write setPPBRST;
  11281. property RESUME : TBits_1 read getRESUME write setRESUME;
  11282. property SE0 : TBits_1 read getSE0 write setSE0;
  11283. property SOFEN : TBits_1 read getSOFEN write setSOFEN;
  11284. property TOKBUSY : TBits_1 read getTOKBUSY write setTOKBUSY;
  11285. property USBEN : TBits_1 read getUSBEN write setUSBEN;
  11286. property USBEN_SOFEN : TBits_1 read getUSBEN_SOFEN write setUSBEN_SOFEN;
  11287. property USBRST : TBits_1 read getUSBRST write setUSBRST;
  11288. end;
  11289. TUSB_U1ADDR = record
  11290. private
  11291. function getDEVADDR : TBits_7; inline;
  11292. function getDEVADDR0 : TBits_1; inline;
  11293. function getDEVADDR1 : TBits_1; inline;
  11294. function getDEVADDR2 : TBits_1; inline;
  11295. function getDEVADDR3 : TBits_1; inline;
  11296. function getDEVADDR4 : TBits_1; inline;
  11297. function getDEVADDR5 : TBits_1; inline;
  11298. function getDEVADDR6 : TBits_1; inline;
  11299. function getLSPDEN : TBits_1; inline;
  11300. procedure setDEVADDR(thebits : TBits_7); inline;
  11301. procedure setDEVADDR0(thebits : TBits_1); inline;
  11302. procedure setDEVADDR1(thebits : TBits_1); inline;
  11303. procedure setDEVADDR2(thebits : TBits_1); inline;
  11304. procedure setDEVADDR3(thebits : TBits_1); inline;
  11305. procedure setDEVADDR4(thebits : TBits_1); inline;
  11306. procedure setDEVADDR5(thebits : TBits_1); inline;
  11307. procedure setDEVADDR6(thebits : TBits_1); inline;
  11308. procedure setLSPDEN(thebits : TBits_1); inline;
  11309. public
  11310. procedure clearDEVADDR0; inline;
  11311. procedure clearDEVADDR1; inline;
  11312. procedure clearDEVADDR2; inline;
  11313. procedure clearDEVADDR3; inline;
  11314. procedure clearDEVADDR4; inline;
  11315. procedure clearDEVADDR5; inline;
  11316. procedure clearDEVADDR6; inline;
  11317. procedure clearLSPDEN; inline;
  11318. procedure setDEVADDR0; inline;
  11319. procedure setDEVADDR1; inline;
  11320. procedure setDEVADDR2; inline;
  11321. procedure setDEVADDR3; inline;
  11322. procedure setDEVADDR4; inline;
  11323. procedure setDEVADDR5; inline;
  11324. procedure setDEVADDR6; inline;
  11325. procedure setLSPDEN; inline;
  11326. property DEVADDR : TBits_7 read getDEVADDR write setDEVADDR;
  11327. property DEVADDR0 : TBits_1 read getDEVADDR0 write setDEVADDR0;
  11328. property DEVADDR1 : TBits_1 read getDEVADDR1 write setDEVADDR1;
  11329. property DEVADDR2 : TBits_1 read getDEVADDR2 write setDEVADDR2;
  11330. property DEVADDR3 : TBits_1 read getDEVADDR3 write setDEVADDR3;
  11331. property DEVADDR4 : TBits_1 read getDEVADDR4 write setDEVADDR4;
  11332. property DEVADDR5 : TBits_1 read getDEVADDR5 write setDEVADDR5;
  11333. property DEVADDR6 : TBits_1 read getDEVADDR6 write setDEVADDR6;
  11334. property LSPDEN : TBits_1 read getLSPDEN write setLSPDEN;
  11335. end;
  11336. TUSB_U1FRML = record
  11337. private
  11338. function getFRM0 : TBits_1; inline;
  11339. function getFRM1 : TBits_1; inline;
  11340. function getFRM2 : TBits_1; inline;
  11341. function getFRM3 : TBits_1; inline;
  11342. function getFRM4 : TBits_1; inline;
  11343. function getFRM5 : TBits_1; inline;
  11344. function getFRM6 : TBits_1; inline;
  11345. function getFRM7 : TBits_1; inline;
  11346. function getFRML : TBits_8; inline;
  11347. procedure setFRM0(thebits : TBits_1); inline;
  11348. procedure setFRM1(thebits : TBits_1); inline;
  11349. procedure setFRM2(thebits : TBits_1); inline;
  11350. procedure setFRM3(thebits : TBits_1); inline;
  11351. procedure setFRM4(thebits : TBits_1); inline;
  11352. procedure setFRM5(thebits : TBits_1); inline;
  11353. procedure setFRM6(thebits : TBits_1); inline;
  11354. procedure setFRM7(thebits : TBits_1); inline;
  11355. procedure setFRML(thebits : TBits_8); inline;
  11356. public
  11357. procedure clearFRM0; inline;
  11358. procedure clearFRM1; inline;
  11359. procedure clearFRM2; inline;
  11360. procedure clearFRM3; inline;
  11361. procedure clearFRM4; inline;
  11362. procedure clearFRM5; inline;
  11363. procedure clearFRM6; inline;
  11364. procedure clearFRM7; inline;
  11365. procedure setFRM0; inline;
  11366. procedure setFRM1; inline;
  11367. procedure setFRM2; inline;
  11368. procedure setFRM3; inline;
  11369. procedure setFRM4; inline;
  11370. procedure setFRM5; inline;
  11371. procedure setFRM6; inline;
  11372. procedure setFRM7; inline;
  11373. property FRM0 : TBits_1 read getFRM0 write setFRM0;
  11374. property FRM1 : TBits_1 read getFRM1 write setFRM1;
  11375. property FRM2 : TBits_1 read getFRM2 write setFRM2;
  11376. property FRM3 : TBits_1 read getFRM3 write setFRM3;
  11377. property FRM4 : TBits_1 read getFRM4 write setFRM4;
  11378. property FRM5 : TBits_1 read getFRM5 write setFRM5;
  11379. property FRM6 : TBits_1 read getFRM6 write setFRM6;
  11380. property FRM7 : TBits_1 read getFRM7 write setFRM7;
  11381. property FRML : TBits_8 read getFRML write setFRML;
  11382. end;
  11383. TUSB_U1FRMH = record
  11384. private
  11385. function getFRM10 : TBits_1; inline;
  11386. function getFRM8 : TBits_1; inline;
  11387. function getFRM9 : TBits_1; inline;
  11388. function getFRMH : TBits_3; inline;
  11389. procedure setFRM10(thebits : TBits_1); inline;
  11390. procedure setFRM8(thebits : TBits_1); inline;
  11391. procedure setFRM9(thebits : TBits_1); inline;
  11392. procedure setFRMH(thebits : TBits_3); inline;
  11393. public
  11394. procedure clearFRM10; inline;
  11395. procedure clearFRM8; inline;
  11396. procedure clearFRM9; inline;
  11397. procedure setFRM10; inline;
  11398. procedure setFRM8; inline;
  11399. procedure setFRM9; inline;
  11400. property FRM10 : TBits_1 read getFRM10 write setFRM10;
  11401. property FRM8 : TBits_1 read getFRM8 write setFRM8;
  11402. property FRM9 : TBits_1 read getFRM9 write setFRM9;
  11403. property FRMH : TBits_3 read getFRMH write setFRMH;
  11404. end;
  11405. TUSB_U1TOK = record
  11406. private
  11407. function getEP : TBits_4; inline;
  11408. function getEP0 : TBits_1; inline;
  11409. function getEP1 : TBits_1; inline;
  11410. function getEP2 : TBits_1; inline;
  11411. function getEP3 : TBits_1; inline;
  11412. function getPID : TBits_4; inline;
  11413. function getPID0 : TBits_1; inline;
  11414. function getPID1 : TBits_1; inline;
  11415. function getPID2 : TBits_1; inline;
  11416. function getPID3 : TBits_1; inline;
  11417. procedure setEP(thebits : TBits_4); inline;
  11418. procedure setEP0(thebits : TBits_1); inline;
  11419. procedure setEP1(thebits : TBits_1); inline;
  11420. procedure setEP2(thebits : TBits_1); inline;
  11421. procedure setEP3(thebits : TBits_1); inline;
  11422. procedure setPID(thebits : TBits_4); inline;
  11423. procedure setPID0(thebits : TBits_1); inline;
  11424. procedure setPID1(thebits : TBits_1); inline;
  11425. procedure setPID2(thebits : TBits_1); inline;
  11426. procedure setPID3(thebits : TBits_1); inline;
  11427. public
  11428. procedure clearEP0; inline;
  11429. procedure clearEP1; inline;
  11430. procedure clearEP2; inline;
  11431. procedure clearEP3; inline;
  11432. procedure clearPID0; inline;
  11433. procedure clearPID1; inline;
  11434. procedure clearPID2; inline;
  11435. procedure clearPID3; inline;
  11436. procedure setEP0; inline;
  11437. procedure setEP1; inline;
  11438. procedure setEP2; inline;
  11439. procedure setEP3; inline;
  11440. procedure setPID0; inline;
  11441. procedure setPID1; inline;
  11442. procedure setPID2; inline;
  11443. procedure setPID3; inline;
  11444. property EP : TBits_4 read getEP write setEP;
  11445. property EP0 : TBits_1 read getEP0 write setEP0;
  11446. property EP1 : TBits_1 read getEP1 write setEP1;
  11447. property EP2 : TBits_1 read getEP2 write setEP2;
  11448. property EP3 : TBits_1 read getEP3 write setEP3;
  11449. property PID : TBits_4 read getPID write setPID;
  11450. property PID0 : TBits_1 read getPID0 write setPID0;
  11451. property PID1 : TBits_1 read getPID1 write setPID1;
  11452. property PID2 : TBits_1 read getPID2 write setPID2;
  11453. property PID3 : TBits_1 read getPID3 write setPID3;
  11454. end;
  11455. type
  11456. TUSBRegisters = record
  11457. U1OTGIR : longWord;
  11458. U1OTGIRCLR : longWord;
  11459. U1OTGIE : longWord;
  11460. U1OTGIECLR : longWord;
  11461. U1OTGIESET : longWord;
  11462. U1OTGIEINV : longWord;
  11463. U1OTGSTAT : longWord;
  11464. U1OTGCON : longWord;
  11465. U1OTGCONCLR : longWord;
  11466. U1OTGCONSET : longWord;
  11467. U1OTGCONINV : longWord;
  11468. U1PWRC : longWord;
  11469. U1PWRCCLR : longWord;
  11470. U1PWRCSET : longWord;
  11471. U1PWRCINV : longWord;
  11472. U1IRbits : TUSB_U1IR;
  11473. U1IR : longWord;
  11474. U1IRCLR : longWord;
  11475. U1IEbits : TUSB_U1IE;
  11476. U1IE : longWord;
  11477. U1IECLR : longWord;
  11478. U1IESET : longWord;
  11479. U1IEINV : longWord;
  11480. U1EIRbits : TUSB_U1EIR;
  11481. U1EIR : longWord;
  11482. U1EIRCLR : longWord;
  11483. U1EIEbits : TUSB_U1EIE;
  11484. U1EIE : longWord;
  11485. U1EIECLR : longWord;
  11486. U1EIESET : longWord;
  11487. U1EIEINV : longWord;
  11488. U1STATbits : TUSB_U1STAT;
  11489. U1STAT : longWord;
  11490. U1CONbits : TUSB_U1CON;
  11491. U1CON : longWord;
  11492. U1CONCLR : longWord;
  11493. U1CONSET : longWord;
  11494. U1CONINV : longWord;
  11495. U1ADDRbits : TUSB_U1ADDR;
  11496. U1ADDR : longWord;
  11497. U1ADDRCLR : longWord;
  11498. U1ADDRSET : longWord;
  11499. U1ADDRINV : longWord;
  11500. U1BDTP1 : longWord;
  11501. U1BDTP1CLR : longWord;
  11502. U1BDTP1SET : longWord;
  11503. U1BDTP1INV : longWord;
  11504. U1FRMLbits : TUSB_U1FRML;
  11505. U1FRML : longWord;
  11506. U1FRMHbits : TUSB_U1FRMH;
  11507. U1FRMH : longWord;
  11508. U1TOKbits : TUSB_U1TOK;
  11509. U1TOK : longWord;
  11510. U1TOKCLR : longWord;
  11511. U1TOKSET : longWord;
  11512. U1TOKINV : longWord;
  11513. U1SOF : longWord;
  11514. U1SOFCLR : longWord;
  11515. U1SOFSET : longWord;
  11516. U1SOFINV : longWord;
  11517. U1BDTP2 : longWord;
  11518. U1BDTP2CLR : longWord;
  11519. U1BDTP2SET : longWord;
  11520. U1BDTP2INV : longWord;
  11521. U1BDTP3 : longWord;
  11522. U1BDTP3CLR : longWord;
  11523. U1BDTP3SET : longWord;
  11524. U1BDTP3INV : longWord;
  11525. U1CNFG1 : longWord;
  11526. U1CNFG1CLR : longWord;
  11527. U1CNFG1SET : longWord;
  11528. U1CNFG1INV : longWord;
  11529. U1EP0 : longWord;
  11530. U1EP0CLR : longWord;
  11531. U1EP0SET : longWord;
  11532. U1EP0INV : longWord;
  11533. U1EP1 : longWord;
  11534. U1EP1CLR : longWord;
  11535. U1EP1SET : longWord;
  11536. U1EP1INV : longWord;
  11537. U1EP2 : longWord;
  11538. U1EP2CLR : longWord;
  11539. U1EP2SET : longWord;
  11540. U1EP2INV : longWord;
  11541. U1EP3 : longWord;
  11542. U1EP3CLR : longWord;
  11543. U1EP3SET : longWord;
  11544. U1EP3INV : longWord;
  11545. U1EP4 : longWord;
  11546. U1EP4CLR : longWord;
  11547. U1EP4SET : longWord;
  11548. U1EP4INV : longWord;
  11549. U1EP5 : longWord;
  11550. U1EP5CLR : longWord;
  11551. U1EP5SET : longWord;
  11552. U1EP5INV : longWord;
  11553. U1EP6 : longWord;
  11554. U1EP6CLR : longWord;
  11555. U1EP6SET : longWord;
  11556. U1EP6INV : longWord;
  11557. U1EP7 : longWord;
  11558. U1EP7CLR : longWord;
  11559. U1EP7SET : longWord;
  11560. U1EP7INV : longWord;
  11561. U1EP8 : longWord;
  11562. U1EP8CLR : longWord;
  11563. U1EP8SET : longWord;
  11564. U1EP8INV : longWord;
  11565. U1EP9 : longWord;
  11566. U1EP9CLR : longWord;
  11567. U1EP9SET : longWord;
  11568. U1EP9INV : longWord;
  11569. U1EP10 : longWord;
  11570. U1EP10CLR : longWord;
  11571. U1EP10SET : longWord;
  11572. U1EP10INV : longWord;
  11573. U1EP11 : longWord;
  11574. U1EP11CLR : longWord;
  11575. U1EP11SET : longWord;
  11576. U1EP11INV : longWord;
  11577. U1EP12 : longWord;
  11578. U1EP12CLR : longWord;
  11579. U1EP12SET : longWord;
  11580. U1EP12INV : longWord;
  11581. U1EP13 : longWord;
  11582. U1EP13CLR : longWord;
  11583. U1EP13SET : longWord;
  11584. U1EP13INV : longWord;
  11585. U1EP14 : longWord;
  11586. U1EP14CLR : longWord;
  11587. U1EP14SET : longWord;
  11588. U1EP14INV : longWord;
  11589. U1EP15 : longWord;
  11590. U1EP15CLR : longWord;
  11591. U1EP15SET : longWord;
  11592. U1EP15INV : longWord;
  11593. end;
  11594. TPORTB_TRISB = record
  11595. private
  11596. function getTRISB0 : TBits_1; inline;
  11597. function getTRISB1 : TBits_1; inline;
  11598. function getTRISB10 : TBits_1; inline;
  11599. function getTRISB11 : TBits_1; inline;
  11600. function getTRISB12 : TBits_1; inline;
  11601. function getTRISB13 : TBits_1; inline;
  11602. function getTRISB14 : TBits_1; inline;
  11603. function getTRISB15 : TBits_1; inline;
  11604. function getTRISB2 : TBits_1; inline;
  11605. function getTRISB3 : TBits_1; inline;
  11606. function getTRISB4 : TBits_1; inline;
  11607. function getTRISB5 : TBits_1; inline;
  11608. function getTRISB6 : TBits_1; inline;
  11609. function getTRISB7 : TBits_1; inline;
  11610. function getTRISB8 : TBits_1; inline;
  11611. function getTRISB9 : TBits_1; inline;
  11612. function getw : TBits_32; inline;
  11613. procedure setTRISB0(thebits : TBits_1); inline;
  11614. procedure setTRISB1(thebits : TBits_1); inline;
  11615. procedure setTRISB10(thebits : TBits_1); inline;
  11616. procedure setTRISB11(thebits : TBits_1); inline;
  11617. procedure setTRISB12(thebits : TBits_1); inline;
  11618. procedure setTRISB13(thebits : TBits_1); inline;
  11619. procedure setTRISB14(thebits : TBits_1); inline;
  11620. procedure setTRISB15(thebits : TBits_1); inline;
  11621. procedure setTRISB2(thebits : TBits_1); inline;
  11622. procedure setTRISB3(thebits : TBits_1); inline;
  11623. procedure setTRISB4(thebits : TBits_1); inline;
  11624. procedure setTRISB5(thebits : TBits_1); inline;
  11625. procedure setTRISB6(thebits : TBits_1); inline;
  11626. procedure setTRISB7(thebits : TBits_1); inline;
  11627. procedure setTRISB8(thebits : TBits_1); inline;
  11628. procedure setTRISB9(thebits : TBits_1); inline;
  11629. procedure setw(thebits : TBits_32); inline;
  11630. public
  11631. procedure clearTRISB0; inline;
  11632. procedure clearTRISB10; inline;
  11633. procedure clearTRISB11; inline;
  11634. procedure clearTRISB12; inline;
  11635. procedure clearTRISB13; inline;
  11636. procedure clearTRISB14; inline;
  11637. procedure clearTRISB15; inline;
  11638. procedure clearTRISB1; inline;
  11639. procedure clearTRISB2; inline;
  11640. procedure clearTRISB3; inline;
  11641. procedure clearTRISB4; inline;
  11642. procedure clearTRISB5; inline;
  11643. procedure clearTRISB6; inline;
  11644. procedure clearTRISB7; inline;
  11645. procedure clearTRISB8; inline;
  11646. procedure clearTRISB9; inline;
  11647. procedure setTRISB0; inline;
  11648. procedure setTRISB10; inline;
  11649. procedure setTRISB11; inline;
  11650. procedure setTRISB12; inline;
  11651. procedure setTRISB13; inline;
  11652. procedure setTRISB14; inline;
  11653. procedure setTRISB15; inline;
  11654. procedure setTRISB1; inline;
  11655. procedure setTRISB2; inline;
  11656. procedure setTRISB3; inline;
  11657. procedure setTRISB4; inline;
  11658. procedure setTRISB5; inline;
  11659. procedure setTRISB6; inline;
  11660. procedure setTRISB7; inline;
  11661. procedure setTRISB8; inline;
  11662. procedure setTRISB9; inline;
  11663. property TRISB0 : TBits_1 read getTRISB0 write setTRISB0;
  11664. property TRISB1 : TBits_1 read getTRISB1 write setTRISB1;
  11665. property TRISB10 : TBits_1 read getTRISB10 write setTRISB10;
  11666. property TRISB11 : TBits_1 read getTRISB11 write setTRISB11;
  11667. property TRISB12 : TBits_1 read getTRISB12 write setTRISB12;
  11668. property TRISB13 : TBits_1 read getTRISB13 write setTRISB13;
  11669. property TRISB14 : TBits_1 read getTRISB14 write setTRISB14;
  11670. property TRISB15 : TBits_1 read getTRISB15 write setTRISB15;
  11671. property TRISB2 : TBits_1 read getTRISB2 write setTRISB2;
  11672. property TRISB3 : TBits_1 read getTRISB3 write setTRISB3;
  11673. property TRISB4 : TBits_1 read getTRISB4 write setTRISB4;
  11674. property TRISB5 : TBits_1 read getTRISB5 write setTRISB5;
  11675. property TRISB6 : TBits_1 read getTRISB6 write setTRISB6;
  11676. property TRISB7 : TBits_1 read getTRISB7 write setTRISB7;
  11677. property TRISB8 : TBits_1 read getTRISB8 write setTRISB8;
  11678. property TRISB9 : TBits_1 read getTRISB9 write setTRISB9;
  11679. property w : TBits_32 read getw write setw;
  11680. end;
  11681. TPORTB_PORTB = record
  11682. private
  11683. function getRB0 : TBits_1; inline;
  11684. function getRB1 : TBits_1; inline;
  11685. function getRB10 : TBits_1; inline;
  11686. function getRB11 : TBits_1; inline;
  11687. function getRB12 : TBits_1; inline;
  11688. function getRB13 : TBits_1; inline;
  11689. function getRB14 : TBits_1; inline;
  11690. function getRB15 : TBits_1; inline;
  11691. function getRB2 : TBits_1; inline;
  11692. function getRB3 : TBits_1; inline;
  11693. function getRB4 : TBits_1; inline;
  11694. function getRB5 : TBits_1; inline;
  11695. function getRB6 : TBits_1; inline;
  11696. function getRB7 : TBits_1; inline;
  11697. function getRB8 : TBits_1; inline;
  11698. function getRB9 : TBits_1; inline;
  11699. function getw : TBits_32; inline;
  11700. procedure setRB0(thebits : TBits_1); inline;
  11701. procedure setRB1(thebits : TBits_1); inline;
  11702. procedure setRB10(thebits : TBits_1); inline;
  11703. procedure setRB11(thebits : TBits_1); inline;
  11704. procedure setRB12(thebits : TBits_1); inline;
  11705. procedure setRB13(thebits : TBits_1); inline;
  11706. procedure setRB14(thebits : TBits_1); inline;
  11707. procedure setRB15(thebits : TBits_1); inline;
  11708. procedure setRB2(thebits : TBits_1); inline;
  11709. procedure setRB3(thebits : TBits_1); inline;
  11710. procedure setRB4(thebits : TBits_1); inline;
  11711. procedure setRB5(thebits : TBits_1); inline;
  11712. procedure setRB6(thebits : TBits_1); inline;
  11713. procedure setRB7(thebits : TBits_1); inline;
  11714. procedure setRB8(thebits : TBits_1); inline;
  11715. procedure setRB9(thebits : TBits_1); inline;
  11716. procedure setw(thebits : TBits_32); inline;
  11717. public
  11718. procedure clearRB0; inline;
  11719. procedure clearRB10; inline;
  11720. procedure clearRB11; inline;
  11721. procedure clearRB12; inline;
  11722. procedure clearRB13; inline;
  11723. procedure clearRB14; inline;
  11724. procedure clearRB15; inline;
  11725. procedure clearRB1; inline;
  11726. procedure clearRB2; inline;
  11727. procedure clearRB3; inline;
  11728. procedure clearRB4; inline;
  11729. procedure clearRB5; inline;
  11730. procedure clearRB6; inline;
  11731. procedure clearRB7; inline;
  11732. procedure clearRB8; inline;
  11733. procedure clearRB9; inline;
  11734. procedure setRB0; inline;
  11735. procedure setRB10; inline;
  11736. procedure setRB11; inline;
  11737. procedure setRB12; inline;
  11738. procedure setRB13; inline;
  11739. procedure setRB14; inline;
  11740. procedure setRB15; inline;
  11741. procedure setRB1; inline;
  11742. procedure setRB2; inline;
  11743. procedure setRB3; inline;
  11744. procedure setRB4; inline;
  11745. procedure setRB5; inline;
  11746. procedure setRB6; inline;
  11747. procedure setRB7; inline;
  11748. procedure setRB8; inline;
  11749. procedure setRB9; inline;
  11750. property RB0 : TBits_1 read getRB0 write setRB0;
  11751. property RB1 : TBits_1 read getRB1 write setRB1;
  11752. property RB10 : TBits_1 read getRB10 write setRB10;
  11753. property RB11 : TBits_1 read getRB11 write setRB11;
  11754. property RB12 : TBits_1 read getRB12 write setRB12;
  11755. property RB13 : TBits_1 read getRB13 write setRB13;
  11756. property RB14 : TBits_1 read getRB14 write setRB14;
  11757. property RB15 : TBits_1 read getRB15 write setRB15;
  11758. property RB2 : TBits_1 read getRB2 write setRB2;
  11759. property RB3 : TBits_1 read getRB3 write setRB3;
  11760. property RB4 : TBits_1 read getRB4 write setRB4;
  11761. property RB5 : TBits_1 read getRB5 write setRB5;
  11762. property RB6 : TBits_1 read getRB6 write setRB6;
  11763. property RB7 : TBits_1 read getRB7 write setRB7;
  11764. property RB8 : TBits_1 read getRB8 write setRB8;
  11765. property RB9 : TBits_1 read getRB9 write setRB9;
  11766. property w : TBits_32 read getw write setw;
  11767. end;
  11768. TPortB_bits=(RB0=0,RB1=1,RB2=2,RB3=3,RB4=4,RB5=5,RB6=6,RB7=7,RB8=8,RB9=9,RB10=10,RB11=11,RB12=12,RB13=13,RB14=14,RB15=15);
  11769. TPortB_bitset = set of TPortB_bits;
  11770. TPORTB_LATB = record
  11771. private
  11772. function getLATB0 : TBits_1; inline;
  11773. function getLATB1 : TBits_1; inline;
  11774. function getLATB10 : TBits_1; inline;
  11775. function getLATB11 : TBits_1; inline;
  11776. function getLATB12 : TBits_1; inline;
  11777. function getLATB13 : TBits_1; inline;
  11778. function getLATB14 : TBits_1; inline;
  11779. function getLATB15 : TBits_1; inline;
  11780. function getLATB2 : TBits_1; inline;
  11781. function getLATB3 : TBits_1; inline;
  11782. function getLATB4 : TBits_1; inline;
  11783. function getLATB5 : TBits_1; inline;
  11784. function getLATB6 : TBits_1; inline;
  11785. function getLATB7 : TBits_1; inline;
  11786. function getLATB8 : TBits_1; inline;
  11787. function getLATB9 : TBits_1; inline;
  11788. function getw : TBits_32; inline;
  11789. procedure setLATB0(thebits : TBits_1); inline;
  11790. procedure setLATB1(thebits : TBits_1); inline;
  11791. procedure setLATB10(thebits : TBits_1); inline;
  11792. procedure setLATB11(thebits : TBits_1); inline;
  11793. procedure setLATB12(thebits : TBits_1); inline;
  11794. procedure setLATB13(thebits : TBits_1); inline;
  11795. procedure setLATB14(thebits : TBits_1); inline;
  11796. procedure setLATB15(thebits : TBits_1); inline;
  11797. procedure setLATB2(thebits : TBits_1); inline;
  11798. procedure setLATB3(thebits : TBits_1); inline;
  11799. procedure setLATB4(thebits : TBits_1); inline;
  11800. procedure setLATB5(thebits : TBits_1); inline;
  11801. procedure setLATB6(thebits : TBits_1); inline;
  11802. procedure setLATB7(thebits : TBits_1); inline;
  11803. procedure setLATB8(thebits : TBits_1); inline;
  11804. procedure setLATB9(thebits : TBits_1); inline;
  11805. procedure setw(thebits : TBits_32); inline;
  11806. public
  11807. procedure clearLATB0; inline;
  11808. procedure clearLATB10; inline;
  11809. procedure clearLATB11; inline;
  11810. procedure clearLATB12; inline;
  11811. procedure clearLATB13; inline;
  11812. procedure clearLATB14; inline;
  11813. procedure clearLATB15; inline;
  11814. procedure clearLATB1; inline;
  11815. procedure clearLATB2; inline;
  11816. procedure clearLATB3; inline;
  11817. procedure clearLATB4; inline;
  11818. procedure clearLATB5; inline;
  11819. procedure clearLATB6; inline;
  11820. procedure clearLATB7; inline;
  11821. procedure clearLATB8; inline;
  11822. procedure clearLATB9; inline;
  11823. procedure setLATB0; inline;
  11824. procedure setLATB10; inline;
  11825. procedure setLATB11; inline;
  11826. procedure setLATB12; inline;
  11827. procedure setLATB13; inline;
  11828. procedure setLATB14; inline;
  11829. procedure setLATB15; inline;
  11830. procedure setLATB1; inline;
  11831. procedure setLATB2; inline;
  11832. procedure setLATB3; inline;
  11833. procedure setLATB4; inline;
  11834. procedure setLATB5; inline;
  11835. procedure setLATB6; inline;
  11836. procedure setLATB7; inline;
  11837. procedure setLATB8; inline;
  11838. procedure setLATB9; inline;
  11839. property LATB0 : TBits_1 read getLATB0 write setLATB0;
  11840. property LATB1 : TBits_1 read getLATB1 write setLATB1;
  11841. property LATB10 : TBits_1 read getLATB10 write setLATB10;
  11842. property LATB11 : TBits_1 read getLATB11 write setLATB11;
  11843. property LATB12 : TBits_1 read getLATB12 write setLATB12;
  11844. property LATB13 : TBits_1 read getLATB13 write setLATB13;
  11845. property LATB14 : TBits_1 read getLATB14 write setLATB14;
  11846. property LATB15 : TBits_1 read getLATB15 write setLATB15;
  11847. property LATB2 : TBits_1 read getLATB2 write setLATB2;
  11848. property LATB3 : TBits_1 read getLATB3 write setLATB3;
  11849. property LATB4 : TBits_1 read getLATB4 write setLATB4;
  11850. property LATB5 : TBits_1 read getLATB5 write setLATB5;
  11851. property LATB6 : TBits_1 read getLATB6 write setLATB6;
  11852. property LATB7 : TBits_1 read getLATB7 write setLATB7;
  11853. property LATB8 : TBits_1 read getLATB8 write setLATB8;
  11854. property LATB9 : TBits_1 read getLATB9 write setLATB9;
  11855. property w : TBits_32 read getw write setw;
  11856. end;
  11857. TPORTB_ODCB = record
  11858. private
  11859. function getODCB0 : TBits_1; inline;
  11860. function getODCB1 : TBits_1; inline;
  11861. function getODCB10 : TBits_1; inline;
  11862. function getODCB11 : TBits_1; inline;
  11863. function getODCB12 : TBits_1; inline;
  11864. function getODCB13 : TBits_1; inline;
  11865. function getODCB14 : TBits_1; inline;
  11866. function getODCB15 : TBits_1; inline;
  11867. function getODCB2 : TBits_1; inline;
  11868. function getODCB3 : TBits_1; inline;
  11869. function getODCB4 : TBits_1; inline;
  11870. function getODCB5 : TBits_1; inline;
  11871. function getODCB6 : TBits_1; inline;
  11872. function getODCB7 : TBits_1; inline;
  11873. function getODCB8 : TBits_1; inline;
  11874. function getODCB9 : TBits_1; inline;
  11875. function getw : TBits_32; inline;
  11876. procedure setODCB0(thebits : TBits_1); inline;
  11877. procedure setODCB1(thebits : TBits_1); inline;
  11878. procedure setODCB10(thebits : TBits_1); inline;
  11879. procedure setODCB11(thebits : TBits_1); inline;
  11880. procedure setODCB12(thebits : TBits_1); inline;
  11881. procedure setODCB13(thebits : TBits_1); inline;
  11882. procedure setODCB14(thebits : TBits_1); inline;
  11883. procedure setODCB15(thebits : TBits_1); inline;
  11884. procedure setODCB2(thebits : TBits_1); inline;
  11885. procedure setODCB3(thebits : TBits_1); inline;
  11886. procedure setODCB4(thebits : TBits_1); inline;
  11887. procedure setODCB5(thebits : TBits_1); inline;
  11888. procedure setODCB6(thebits : TBits_1); inline;
  11889. procedure setODCB7(thebits : TBits_1); inline;
  11890. procedure setODCB8(thebits : TBits_1); inline;
  11891. procedure setODCB9(thebits : TBits_1); inline;
  11892. procedure setw(thebits : TBits_32); inline;
  11893. public
  11894. procedure clearODCB0; inline;
  11895. procedure clearODCB10; inline;
  11896. procedure clearODCB11; inline;
  11897. procedure clearODCB12; inline;
  11898. procedure clearODCB13; inline;
  11899. procedure clearODCB14; inline;
  11900. procedure clearODCB15; inline;
  11901. procedure clearODCB1; inline;
  11902. procedure clearODCB2; inline;
  11903. procedure clearODCB3; inline;
  11904. procedure clearODCB4; inline;
  11905. procedure clearODCB5; inline;
  11906. procedure clearODCB6; inline;
  11907. procedure clearODCB7; inline;
  11908. procedure clearODCB8; inline;
  11909. procedure clearODCB9; inline;
  11910. procedure setODCB0; inline;
  11911. procedure setODCB10; inline;
  11912. procedure setODCB11; inline;
  11913. procedure setODCB12; inline;
  11914. procedure setODCB13; inline;
  11915. procedure setODCB14; inline;
  11916. procedure setODCB15; inline;
  11917. procedure setODCB1; inline;
  11918. procedure setODCB2; inline;
  11919. procedure setODCB3; inline;
  11920. procedure setODCB4; inline;
  11921. procedure setODCB5; inline;
  11922. procedure setODCB6; inline;
  11923. procedure setODCB7; inline;
  11924. procedure setODCB8; inline;
  11925. procedure setODCB9; inline;
  11926. property ODCB0 : TBits_1 read getODCB0 write setODCB0;
  11927. property ODCB1 : TBits_1 read getODCB1 write setODCB1;
  11928. property ODCB10 : TBits_1 read getODCB10 write setODCB10;
  11929. property ODCB11 : TBits_1 read getODCB11 write setODCB11;
  11930. property ODCB12 : TBits_1 read getODCB12 write setODCB12;
  11931. property ODCB13 : TBits_1 read getODCB13 write setODCB13;
  11932. property ODCB14 : TBits_1 read getODCB14 write setODCB14;
  11933. property ODCB15 : TBits_1 read getODCB15 write setODCB15;
  11934. property ODCB2 : TBits_1 read getODCB2 write setODCB2;
  11935. property ODCB3 : TBits_1 read getODCB3 write setODCB3;
  11936. property ODCB4 : TBits_1 read getODCB4 write setODCB4;
  11937. property ODCB5 : TBits_1 read getODCB5 write setODCB5;
  11938. property ODCB6 : TBits_1 read getODCB6 write setODCB6;
  11939. property ODCB7 : TBits_1 read getODCB7 write setODCB7;
  11940. property ODCB8 : TBits_1 read getODCB8 write setODCB8;
  11941. property ODCB9 : TBits_1 read getODCB9 write setODCB9;
  11942. property w : TBits_32 read getw write setw;
  11943. end;
  11944. type
  11945. TPORTBRegisters = record
  11946. TRISBbits : TPORTB_TRISB;
  11947. TRISB : longWord;
  11948. TRISBCLR : longWord;
  11949. TRISBSET : longWord;
  11950. TRISBINV : longWord;
  11951. PORTBbits : TPORTB_PORTB;
  11952. PORTB : longWord;
  11953. PORTBCLR : longWord;
  11954. PORTBSET : longWord;
  11955. PORTBINV : longWord;
  11956. LATBbits : TPORTB_LATB;
  11957. LATB : longWord;
  11958. LATBCLR : longWord;
  11959. LATBSET : longWord;
  11960. LATBINV : longWord;
  11961. ODCBbits : TPORTB_ODCB;
  11962. ODCB : longWord;
  11963. ODCBCLR : longWord;
  11964. ODCBSET : longWord;
  11965. ODCBINV : longWord;
  11966. end;
  11967. TPORTC_TRISC = record
  11968. private
  11969. function getTRISC12 : TBits_1; inline;
  11970. function getTRISC13 : TBits_1; inline;
  11971. function getTRISC14 : TBits_1; inline;
  11972. function getTRISC15 : TBits_1; inline;
  11973. function getw : TBits_32; inline;
  11974. procedure setTRISC12(thebits : TBits_1); inline;
  11975. procedure setTRISC13(thebits : TBits_1); inline;
  11976. procedure setTRISC14(thebits : TBits_1); inline;
  11977. procedure setTRISC15(thebits : TBits_1); inline;
  11978. procedure setw(thebits : TBits_32); inline;
  11979. public
  11980. procedure clearTRISC12; inline;
  11981. procedure clearTRISC13; inline;
  11982. procedure clearTRISC14; inline;
  11983. procedure clearTRISC15; inline;
  11984. procedure setTRISC12; inline;
  11985. procedure setTRISC13; inline;
  11986. procedure setTRISC14; inline;
  11987. procedure setTRISC15; inline;
  11988. property TRISC12 : TBits_1 read getTRISC12 write setTRISC12;
  11989. property TRISC13 : TBits_1 read getTRISC13 write setTRISC13;
  11990. property TRISC14 : TBits_1 read getTRISC14 write setTRISC14;
  11991. property TRISC15 : TBits_1 read getTRISC15 write setTRISC15;
  11992. property w : TBits_32 read getw write setw;
  11993. end;
  11994. TPORTC_PORTC = record
  11995. private
  11996. function getRC12 : TBits_1; inline;
  11997. function getRC13 : TBits_1; inline;
  11998. function getRC14 : TBits_1; inline;
  11999. function getRC15 : TBits_1; inline;
  12000. function getw : TBits_32; inline;
  12001. procedure setRC12(thebits : TBits_1); inline;
  12002. procedure setRC13(thebits : TBits_1); inline;
  12003. procedure setRC14(thebits : TBits_1); inline;
  12004. procedure setRC15(thebits : TBits_1); inline;
  12005. procedure setw(thebits : TBits_32); inline;
  12006. public
  12007. procedure clearRC12; inline;
  12008. procedure clearRC13; inline;
  12009. procedure clearRC14; inline;
  12010. procedure clearRC15; inline;
  12011. procedure setRC12; inline;
  12012. procedure setRC13; inline;
  12013. procedure setRC14; inline;
  12014. procedure setRC15; inline;
  12015. property RC12 : TBits_1 read getRC12 write setRC12;
  12016. property RC13 : TBits_1 read getRC13 write setRC13;
  12017. property RC14 : TBits_1 read getRC14 write setRC14;
  12018. property RC15 : TBits_1 read getRC15 write setRC15;
  12019. property w : TBits_32 read getw write setw;
  12020. end;
  12021. TPortC_bits=(RC12=12,RC13=13,RC14=14,RC15=15);
  12022. TPortC_bitset = set of TPortC_bits;
  12023. TPORTC_LATC = record
  12024. private
  12025. function getLATC12 : TBits_1; inline;
  12026. function getLATC13 : TBits_1; inline;
  12027. function getLATC14 : TBits_1; inline;
  12028. function getLATC15 : TBits_1; inline;
  12029. function getw : TBits_32; inline;
  12030. procedure setLATC12(thebits : TBits_1); inline;
  12031. procedure setLATC13(thebits : TBits_1); inline;
  12032. procedure setLATC14(thebits : TBits_1); inline;
  12033. procedure setLATC15(thebits : TBits_1); inline;
  12034. procedure setw(thebits : TBits_32); inline;
  12035. public
  12036. procedure clearLATC12; inline;
  12037. procedure clearLATC13; inline;
  12038. procedure clearLATC14; inline;
  12039. procedure clearLATC15; inline;
  12040. procedure setLATC12; inline;
  12041. procedure setLATC13; inline;
  12042. procedure setLATC14; inline;
  12043. procedure setLATC15; inline;
  12044. property LATC12 : TBits_1 read getLATC12 write setLATC12;
  12045. property LATC13 : TBits_1 read getLATC13 write setLATC13;
  12046. property LATC14 : TBits_1 read getLATC14 write setLATC14;
  12047. property LATC15 : TBits_1 read getLATC15 write setLATC15;
  12048. property w : TBits_32 read getw write setw;
  12049. end;
  12050. TPORTC_ODCC = record
  12051. private
  12052. function getODCC12 : TBits_1; inline;
  12053. function getODCC13 : TBits_1; inline;
  12054. function getODCC14 : TBits_1; inline;
  12055. function getODCC15 : TBits_1; inline;
  12056. function getw : TBits_32; inline;
  12057. procedure setODCC12(thebits : TBits_1); inline;
  12058. procedure setODCC13(thebits : TBits_1); inline;
  12059. procedure setODCC14(thebits : TBits_1); inline;
  12060. procedure setODCC15(thebits : TBits_1); inline;
  12061. procedure setw(thebits : TBits_32); inline;
  12062. public
  12063. procedure clearODCC12; inline;
  12064. procedure clearODCC13; inline;
  12065. procedure clearODCC14; inline;
  12066. procedure clearODCC15; inline;
  12067. procedure setODCC12; inline;
  12068. procedure setODCC13; inline;
  12069. procedure setODCC14; inline;
  12070. procedure setODCC15; inline;
  12071. property ODCC12 : TBits_1 read getODCC12 write setODCC12;
  12072. property ODCC13 : TBits_1 read getODCC13 write setODCC13;
  12073. property ODCC14 : TBits_1 read getODCC14 write setODCC14;
  12074. property ODCC15 : TBits_1 read getODCC15 write setODCC15;
  12075. property w : TBits_32 read getw write setw;
  12076. end;
  12077. type
  12078. TPORTCRegisters = record
  12079. TRISCbits : TPORTC_TRISC;
  12080. TRISC : longWord;
  12081. TRISCCLR : longWord;
  12082. TRISCSET : longWord;
  12083. TRISCINV : longWord;
  12084. PORTCbits : TPORTC_PORTC;
  12085. PORTC : longWord;
  12086. PORTCCLR : longWord;
  12087. PORTCSET : longWord;
  12088. PORTCINV : longWord;
  12089. LATCbits : TPORTC_LATC;
  12090. LATC : longWord;
  12091. LATCCLR : longWord;
  12092. LATCSET : longWord;
  12093. LATCINV : longWord;
  12094. ODCCbits : TPORTC_ODCC;
  12095. ODCC : longWord;
  12096. ODCCCLR : longWord;
  12097. ODCCSET : longWord;
  12098. ODCCINV : longWord;
  12099. end;
  12100. TPORTD_TRISD = record
  12101. private
  12102. function getTRISD0 : TBits_1; inline;
  12103. function getTRISD1 : TBits_1; inline;
  12104. function getTRISD10 : TBits_1; inline;
  12105. function getTRISD11 : TBits_1; inline;
  12106. function getTRISD2 : TBits_1; inline;
  12107. function getTRISD3 : TBits_1; inline;
  12108. function getTRISD4 : TBits_1; inline;
  12109. function getTRISD5 : TBits_1; inline;
  12110. function getTRISD6 : TBits_1; inline;
  12111. function getTRISD7 : TBits_1; inline;
  12112. function getTRISD8 : TBits_1; inline;
  12113. function getTRISD9 : TBits_1; inline;
  12114. function getw : TBits_32; inline;
  12115. procedure setTRISD0(thebits : TBits_1); inline;
  12116. procedure setTRISD1(thebits : TBits_1); inline;
  12117. procedure setTRISD10(thebits : TBits_1); inline;
  12118. procedure setTRISD11(thebits : TBits_1); inline;
  12119. procedure setTRISD2(thebits : TBits_1); inline;
  12120. procedure setTRISD3(thebits : TBits_1); inline;
  12121. procedure setTRISD4(thebits : TBits_1); inline;
  12122. procedure setTRISD5(thebits : TBits_1); inline;
  12123. procedure setTRISD6(thebits : TBits_1); inline;
  12124. procedure setTRISD7(thebits : TBits_1); inline;
  12125. procedure setTRISD8(thebits : TBits_1); inline;
  12126. procedure setTRISD9(thebits : TBits_1); inline;
  12127. procedure setw(thebits : TBits_32); inline;
  12128. public
  12129. procedure clearTRISD0; inline;
  12130. procedure clearTRISD10; inline;
  12131. procedure clearTRISD11; inline;
  12132. procedure clearTRISD1; inline;
  12133. procedure clearTRISD2; inline;
  12134. procedure clearTRISD3; inline;
  12135. procedure clearTRISD4; inline;
  12136. procedure clearTRISD5; inline;
  12137. procedure clearTRISD6; inline;
  12138. procedure clearTRISD7; inline;
  12139. procedure clearTRISD8; inline;
  12140. procedure clearTRISD9; inline;
  12141. procedure setTRISD0; inline;
  12142. procedure setTRISD10; inline;
  12143. procedure setTRISD11; inline;
  12144. procedure setTRISD1; inline;
  12145. procedure setTRISD2; inline;
  12146. procedure setTRISD3; inline;
  12147. procedure setTRISD4; inline;
  12148. procedure setTRISD5; inline;
  12149. procedure setTRISD6; inline;
  12150. procedure setTRISD7; inline;
  12151. procedure setTRISD8; inline;
  12152. procedure setTRISD9; inline;
  12153. property TRISD0 : TBits_1 read getTRISD0 write setTRISD0;
  12154. property TRISD1 : TBits_1 read getTRISD1 write setTRISD1;
  12155. property TRISD10 : TBits_1 read getTRISD10 write setTRISD10;
  12156. property TRISD11 : TBits_1 read getTRISD11 write setTRISD11;
  12157. property TRISD2 : TBits_1 read getTRISD2 write setTRISD2;
  12158. property TRISD3 : TBits_1 read getTRISD3 write setTRISD3;
  12159. property TRISD4 : TBits_1 read getTRISD4 write setTRISD4;
  12160. property TRISD5 : TBits_1 read getTRISD5 write setTRISD5;
  12161. property TRISD6 : TBits_1 read getTRISD6 write setTRISD6;
  12162. property TRISD7 : TBits_1 read getTRISD7 write setTRISD7;
  12163. property TRISD8 : TBits_1 read getTRISD8 write setTRISD8;
  12164. property TRISD9 : TBits_1 read getTRISD9 write setTRISD9;
  12165. property w : TBits_32 read getw write setw;
  12166. end;
  12167. TPORTD_PORTD = record
  12168. private
  12169. function getRD0 : TBits_1; inline;
  12170. function getRD1 : TBits_1; inline;
  12171. function getRD10 : TBits_1; inline;
  12172. function getRD11 : TBits_1; inline;
  12173. function getRD2 : TBits_1; inline;
  12174. function getRD3 : TBits_1; inline;
  12175. function getRD4 : TBits_1; inline;
  12176. function getRD5 : TBits_1; inline;
  12177. function getRD6 : TBits_1; inline;
  12178. function getRD7 : TBits_1; inline;
  12179. function getRD8 : TBits_1; inline;
  12180. function getRD9 : TBits_1; inline;
  12181. function getw : TBits_32; inline;
  12182. procedure setRD0(thebits : TBits_1); inline;
  12183. procedure setRD1(thebits : TBits_1); inline;
  12184. procedure setRD10(thebits : TBits_1); inline;
  12185. procedure setRD11(thebits : TBits_1); inline;
  12186. procedure setRD2(thebits : TBits_1); inline;
  12187. procedure setRD3(thebits : TBits_1); inline;
  12188. procedure setRD4(thebits : TBits_1); inline;
  12189. procedure setRD5(thebits : TBits_1); inline;
  12190. procedure setRD6(thebits : TBits_1); inline;
  12191. procedure setRD7(thebits : TBits_1); inline;
  12192. procedure setRD8(thebits : TBits_1); inline;
  12193. procedure setRD9(thebits : TBits_1); inline;
  12194. procedure setw(thebits : TBits_32); inline;
  12195. public
  12196. procedure clearRD0; inline;
  12197. procedure clearRD10; inline;
  12198. procedure clearRD11; inline;
  12199. procedure clearRD1; inline;
  12200. procedure clearRD2; inline;
  12201. procedure clearRD3; inline;
  12202. procedure clearRD4; inline;
  12203. procedure clearRD5; inline;
  12204. procedure clearRD6; inline;
  12205. procedure clearRD7; inline;
  12206. procedure clearRD8; inline;
  12207. procedure clearRD9; inline;
  12208. procedure setRD0; inline;
  12209. procedure setRD10; inline;
  12210. procedure setRD11; inline;
  12211. procedure setRD1; inline;
  12212. procedure setRD2; inline;
  12213. procedure setRD3; inline;
  12214. procedure setRD4; inline;
  12215. procedure setRD5; inline;
  12216. procedure setRD6; inline;
  12217. procedure setRD7; inline;
  12218. procedure setRD8; inline;
  12219. procedure setRD9; inline;
  12220. property RD0 : TBits_1 read getRD0 write setRD0;
  12221. property RD1 : TBits_1 read getRD1 write setRD1;
  12222. property RD10 : TBits_1 read getRD10 write setRD10;
  12223. property RD11 : TBits_1 read getRD11 write setRD11;
  12224. property RD2 : TBits_1 read getRD2 write setRD2;
  12225. property RD3 : TBits_1 read getRD3 write setRD3;
  12226. property RD4 : TBits_1 read getRD4 write setRD4;
  12227. property RD5 : TBits_1 read getRD5 write setRD5;
  12228. property RD6 : TBits_1 read getRD6 write setRD6;
  12229. property RD7 : TBits_1 read getRD7 write setRD7;
  12230. property RD8 : TBits_1 read getRD8 write setRD8;
  12231. property RD9 : TBits_1 read getRD9 write setRD9;
  12232. property w : TBits_32 read getw write setw;
  12233. end;
  12234. TPortD_bits=(RD0=0,RD1=1,RD2=2,RD3=3,RD4=4,RD5=5,RD6=6,RD7=7,RD8=8,RD9=9,RD10=10,RD11=11);
  12235. TPortD_bitset = set of TPortD_bits;
  12236. TPORTD_LATD = record
  12237. private
  12238. function getLATD0 : TBits_1; inline;
  12239. function getLATD1 : TBits_1; inline;
  12240. function getLATD10 : TBits_1; inline;
  12241. function getLATD11 : TBits_1; inline;
  12242. function getLATD2 : TBits_1; inline;
  12243. function getLATD3 : TBits_1; inline;
  12244. function getLATD4 : TBits_1; inline;
  12245. function getLATD5 : TBits_1; inline;
  12246. function getLATD6 : TBits_1; inline;
  12247. function getLATD7 : TBits_1; inline;
  12248. function getLATD8 : TBits_1; inline;
  12249. function getLATD9 : TBits_1; inline;
  12250. function getw : TBits_32; inline;
  12251. procedure setLATD0(thebits : TBits_1); inline;
  12252. procedure setLATD1(thebits : TBits_1); inline;
  12253. procedure setLATD10(thebits : TBits_1); inline;
  12254. procedure setLATD11(thebits : TBits_1); inline;
  12255. procedure setLATD2(thebits : TBits_1); inline;
  12256. procedure setLATD3(thebits : TBits_1); inline;
  12257. procedure setLATD4(thebits : TBits_1); inline;
  12258. procedure setLATD5(thebits : TBits_1); inline;
  12259. procedure setLATD6(thebits : TBits_1); inline;
  12260. procedure setLATD7(thebits : TBits_1); inline;
  12261. procedure setLATD8(thebits : TBits_1); inline;
  12262. procedure setLATD9(thebits : TBits_1); inline;
  12263. procedure setw(thebits : TBits_32); inline;
  12264. public
  12265. procedure clearLATD0; inline;
  12266. procedure clearLATD10; inline;
  12267. procedure clearLATD11; inline;
  12268. procedure clearLATD1; inline;
  12269. procedure clearLATD2; inline;
  12270. procedure clearLATD3; inline;
  12271. procedure clearLATD4; inline;
  12272. procedure clearLATD5; inline;
  12273. procedure clearLATD6; inline;
  12274. procedure clearLATD7; inline;
  12275. procedure clearLATD8; inline;
  12276. procedure clearLATD9; inline;
  12277. procedure setLATD0; inline;
  12278. procedure setLATD10; inline;
  12279. procedure setLATD11; inline;
  12280. procedure setLATD1; inline;
  12281. procedure setLATD2; inline;
  12282. procedure setLATD3; inline;
  12283. procedure setLATD4; inline;
  12284. procedure setLATD5; inline;
  12285. procedure setLATD6; inline;
  12286. procedure setLATD7; inline;
  12287. procedure setLATD8; inline;
  12288. procedure setLATD9; inline;
  12289. property LATD0 : TBits_1 read getLATD0 write setLATD0;
  12290. property LATD1 : TBits_1 read getLATD1 write setLATD1;
  12291. property LATD10 : TBits_1 read getLATD10 write setLATD10;
  12292. property LATD11 : TBits_1 read getLATD11 write setLATD11;
  12293. property LATD2 : TBits_1 read getLATD2 write setLATD2;
  12294. property LATD3 : TBits_1 read getLATD3 write setLATD3;
  12295. property LATD4 : TBits_1 read getLATD4 write setLATD4;
  12296. property LATD5 : TBits_1 read getLATD5 write setLATD5;
  12297. property LATD6 : TBits_1 read getLATD6 write setLATD6;
  12298. property LATD7 : TBits_1 read getLATD7 write setLATD7;
  12299. property LATD8 : TBits_1 read getLATD8 write setLATD8;
  12300. property LATD9 : TBits_1 read getLATD9 write setLATD9;
  12301. property w : TBits_32 read getw write setw;
  12302. end;
  12303. TPORTD_ODCD = record
  12304. private
  12305. function getODCD0 : TBits_1; inline;
  12306. function getODCD1 : TBits_1; inline;
  12307. function getODCD10 : TBits_1; inline;
  12308. function getODCD11 : TBits_1; inline;
  12309. function getODCD2 : TBits_1; inline;
  12310. function getODCD3 : TBits_1; inline;
  12311. function getODCD4 : TBits_1; inline;
  12312. function getODCD5 : TBits_1; inline;
  12313. function getODCD6 : TBits_1; inline;
  12314. function getODCD7 : TBits_1; inline;
  12315. function getODCD8 : TBits_1; inline;
  12316. function getODCD9 : TBits_1; inline;
  12317. function getw : TBits_32; inline;
  12318. procedure setODCD0(thebits : TBits_1); inline;
  12319. procedure setODCD1(thebits : TBits_1); inline;
  12320. procedure setODCD10(thebits : TBits_1); inline;
  12321. procedure setODCD11(thebits : TBits_1); inline;
  12322. procedure setODCD2(thebits : TBits_1); inline;
  12323. procedure setODCD3(thebits : TBits_1); inline;
  12324. procedure setODCD4(thebits : TBits_1); inline;
  12325. procedure setODCD5(thebits : TBits_1); inline;
  12326. procedure setODCD6(thebits : TBits_1); inline;
  12327. procedure setODCD7(thebits : TBits_1); inline;
  12328. procedure setODCD8(thebits : TBits_1); inline;
  12329. procedure setODCD9(thebits : TBits_1); inline;
  12330. procedure setw(thebits : TBits_32); inline;
  12331. public
  12332. procedure clearODCD0; inline;
  12333. procedure clearODCD10; inline;
  12334. procedure clearODCD11; inline;
  12335. procedure clearODCD1; inline;
  12336. procedure clearODCD2; inline;
  12337. procedure clearODCD3; inline;
  12338. procedure clearODCD4; inline;
  12339. procedure clearODCD5; inline;
  12340. procedure clearODCD6; inline;
  12341. procedure clearODCD7; inline;
  12342. procedure clearODCD8; inline;
  12343. procedure clearODCD9; inline;
  12344. procedure setODCD0; inline;
  12345. procedure setODCD10; inline;
  12346. procedure setODCD11; inline;
  12347. procedure setODCD1; inline;
  12348. procedure setODCD2; inline;
  12349. procedure setODCD3; inline;
  12350. procedure setODCD4; inline;
  12351. procedure setODCD5; inline;
  12352. procedure setODCD6; inline;
  12353. procedure setODCD7; inline;
  12354. procedure setODCD8; inline;
  12355. procedure setODCD9; inline;
  12356. property ODCD0 : TBits_1 read getODCD0 write setODCD0;
  12357. property ODCD1 : TBits_1 read getODCD1 write setODCD1;
  12358. property ODCD10 : TBits_1 read getODCD10 write setODCD10;
  12359. property ODCD11 : TBits_1 read getODCD11 write setODCD11;
  12360. property ODCD2 : TBits_1 read getODCD2 write setODCD2;
  12361. property ODCD3 : TBits_1 read getODCD3 write setODCD3;
  12362. property ODCD4 : TBits_1 read getODCD4 write setODCD4;
  12363. property ODCD5 : TBits_1 read getODCD5 write setODCD5;
  12364. property ODCD6 : TBits_1 read getODCD6 write setODCD6;
  12365. property ODCD7 : TBits_1 read getODCD7 write setODCD7;
  12366. property ODCD8 : TBits_1 read getODCD8 write setODCD8;
  12367. property ODCD9 : TBits_1 read getODCD9 write setODCD9;
  12368. property w : TBits_32 read getw write setw;
  12369. end;
  12370. type
  12371. TPORTDRegisters = record
  12372. TRISDbits : TPORTD_TRISD;
  12373. TRISD : longWord;
  12374. TRISDCLR : longWord;
  12375. TRISDSET : longWord;
  12376. TRISDINV : longWord;
  12377. PORTDbits : TPORTD_PORTD;
  12378. PORTD : longWord;
  12379. PORTDCLR : longWord;
  12380. PORTDSET : longWord;
  12381. PORTDINV : longWord;
  12382. LATDbits : TPORTD_LATD;
  12383. LATD : longWord;
  12384. LATDCLR : longWord;
  12385. LATDSET : longWord;
  12386. LATDINV : longWord;
  12387. ODCDbits : TPORTD_ODCD;
  12388. ODCD : longWord;
  12389. ODCDCLR : longWord;
  12390. ODCDSET : longWord;
  12391. ODCDINV : longWord;
  12392. end;
  12393. TPORTE_TRISE = record
  12394. private
  12395. function getTRISE0 : TBits_1; inline;
  12396. function getTRISE1 : TBits_1; inline;
  12397. function getTRISE2 : TBits_1; inline;
  12398. function getTRISE3 : TBits_1; inline;
  12399. function getTRISE4 : TBits_1; inline;
  12400. function getTRISE5 : TBits_1; inline;
  12401. function getTRISE6 : TBits_1; inline;
  12402. function getTRISE7 : TBits_1; inline;
  12403. function getw : TBits_32; inline;
  12404. procedure setTRISE0(thebits : TBits_1); inline;
  12405. procedure setTRISE1(thebits : TBits_1); inline;
  12406. procedure setTRISE2(thebits : TBits_1); inline;
  12407. procedure setTRISE3(thebits : TBits_1); inline;
  12408. procedure setTRISE4(thebits : TBits_1); inline;
  12409. procedure setTRISE5(thebits : TBits_1); inline;
  12410. procedure setTRISE6(thebits : TBits_1); inline;
  12411. procedure setTRISE7(thebits : TBits_1); inline;
  12412. procedure setw(thebits : TBits_32); inline;
  12413. public
  12414. procedure clearTRISE0; inline;
  12415. procedure clearTRISE1; inline;
  12416. procedure clearTRISE2; inline;
  12417. procedure clearTRISE3; inline;
  12418. procedure clearTRISE4; inline;
  12419. procedure clearTRISE5; inline;
  12420. procedure clearTRISE6; inline;
  12421. procedure clearTRISE7; inline;
  12422. procedure setTRISE0; inline;
  12423. procedure setTRISE1; inline;
  12424. procedure setTRISE2; inline;
  12425. procedure setTRISE3; inline;
  12426. procedure setTRISE4; inline;
  12427. procedure setTRISE5; inline;
  12428. procedure setTRISE6; inline;
  12429. procedure setTRISE7; inline;
  12430. property TRISE0 : TBits_1 read getTRISE0 write setTRISE0;
  12431. property TRISE1 : TBits_1 read getTRISE1 write setTRISE1;
  12432. property TRISE2 : TBits_1 read getTRISE2 write setTRISE2;
  12433. property TRISE3 : TBits_1 read getTRISE3 write setTRISE3;
  12434. property TRISE4 : TBits_1 read getTRISE4 write setTRISE4;
  12435. property TRISE5 : TBits_1 read getTRISE5 write setTRISE5;
  12436. property TRISE6 : TBits_1 read getTRISE6 write setTRISE6;
  12437. property TRISE7 : TBits_1 read getTRISE7 write setTRISE7;
  12438. property w : TBits_32 read getw write setw;
  12439. end;
  12440. TPORTE_PORTE = record
  12441. private
  12442. function getRE0 : TBits_1; inline;
  12443. function getRE1 : TBits_1; inline;
  12444. function getRE2 : TBits_1; inline;
  12445. function getRE3 : TBits_1; inline;
  12446. function getRE4 : TBits_1; inline;
  12447. function getRE5 : TBits_1; inline;
  12448. function getRE6 : TBits_1; inline;
  12449. function getRE7 : TBits_1; inline;
  12450. function getw : TBits_32; inline;
  12451. procedure setRE0(thebits : TBits_1); inline;
  12452. procedure setRE1(thebits : TBits_1); inline;
  12453. procedure setRE2(thebits : TBits_1); inline;
  12454. procedure setRE3(thebits : TBits_1); inline;
  12455. procedure setRE4(thebits : TBits_1); inline;
  12456. procedure setRE5(thebits : TBits_1); inline;
  12457. procedure setRE6(thebits : TBits_1); inline;
  12458. procedure setRE7(thebits : TBits_1); inline;
  12459. procedure setw(thebits : TBits_32); inline;
  12460. public
  12461. procedure clearRE0; inline;
  12462. procedure clearRE1; inline;
  12463. procedure clearRE2; inline;
  12464. procedure clearRE3; inline;
  12465. procedure clearRE4; inline;
  12466. procedure clearRE5; inline;
  12467. procedure clearRE6; inline;
  12468. procedure clearRE7; inline;
  12469. procedure setRE0; inline;
  12470. procedure setRE1; inline;
  12471. procedure setRE2; inline;
  12472. procedure setRE3; inline;
  12473. procedure setRE4; inline;
  12474. procedure setRE5; inline;
  12475. procedure setRE6; inline;
  12476. procedure setRE7; inline;
  12477. property RE0 : TBits_1 read getRE0 write setRE0;
  12478. property RE1 : TBits_1 read getRE1 write setRE1;
  12479. property RE2 : TBits_1 read getRE2 write setRE2;
  12480. property RE3 : TBits_1 read getRE3 write setRE3;
  12481. property RE4 : TBits_1 read getRE4 write setRE4;
  12482. property RE5 : TBits_1 read getRE5 write setRE5;
  12483. property RE6 : TBits_1 read getRE6 write setRE6;
  12484. property RE7 : TBits_1 read getRE7 write setRE7;
  12485. property w : TBits_32 read getw write setw;
  12486. end;
  12487. TPortE_bits=(RE0=0,RE1=1,RE2=2,RE3=3,RE4=4,RE5=5,RE6=6,RE7=7);
  12488. TPortE_bitset = set of TPortE_bits;
  12489. TPORTE_LATE = record
  12490. private
  12491. function getLATE0 : TBits_1; inline;
  12492. function getLATE1 : TBits_1; inline;
  12493. function getLATE2 : TBits_1; inline;
  12494. function getLATE3 : TBits_1; inline;
  12495. function getLATE4 : TBits_1; inline;
  12496. function getLATE5 : TBits_1; inline;
  12497. function getLATE6 : TBits_1; inline;
  12498. function getLATE7 : TBits_1; inline;
  12499. function getw : TBits_32; inline;
  12500. procedure setLATE0(thebits : TBits_1); inline;
  12501. procedure setLATE1(thebits : TBits_1); inline;
  12502. procedure setLATE2(thebits : TBits_1); inline;
  12503. procedure setLATE3(thebits : TBits_1); inline;
  12504. procedure setLATE4(thebits : TBits_1); inline;
  12505. procedure setLATE5(thebits : TBits_1); inline;
  12506. procedure setLATE6(thebits : TBits_1); inline;
  12507. procedure setLATE7(thebits : TBits_1); inline;
  12508. procedure setw(thebits : TBits_32); inline;
  12509. public
  12510. procedure clearLATE0; inline;
  12511. procedure clearLATE1; inline;
  12512. procedure clearLATE2; inline;
  12513. procedure clearLATE3; inline;
  12514. procedure clearLATE4; inline;
  12515. procedure clearLATE5; inline;
  12516. procedure clearLATE6; inline;
  12517. procedure clearLATE7; inline;
  12518. procedure setLATE0; inline;
  12519. procedure setLATE1; inline;
  12520. procedure setLATE2; inline;
  12521. procedure setLATE3; inline;
  12522. procedure setLATE4; inline;
  12523. procedure setLATE5; inline;
  12524. procedure setLATE6; inline;
  12525. procedure setLATE7; inline;
  12526. property LATE0 : TBits_1 read getLATE0 write setLATE0;
  12527. property LATE1 : TBits_1 read getLATE1 write setLATE1;
  12528. property LATE2 : TBits_1 read getLATE2 write setLATE2;
  12529. property LATE3 : TBits_1 read getLATE3 write setLATE3;
  12530. property LATE4 : TBits_1 read getLATE4 write setLATE4;
  12531. property LATE5 : TBits_1 read getLATE5 write setLATE5;
  12532. property LATE6 : TBits_1 read getLATE6 write setLATE6;
  12533. property LATE7 : TBits_1 read getLATE7 write setLATE7;
  12534. property w : TBits_32 read getw write setw;
  12535. end;
  12536. TPORTE_ODCE = record
  12537. private
  12538. function getODCE0 : TBits_1; inline;
  12539. function getODCE1 : TBits_1; inline;
  12540. function getODCE2 : TBits_1; inline;
  12541. function getODCE3 : TBits_1; inline;
  12542. function getODCE4 : TBits_1; inline;
  12543. function getODCE5 : TBits_1; inline;
  12544. function getODCE6 : TBits_1; inline;
  12545. function getODCE7 : TBits_1; inline;
  12546. function getw : TBits_32; inline;
  12547. procedure setODCE0(thebits : TBits_1); inline;
  12548. procedure setODCE1(thebits : TBits_1); inline;
  12549. procedure setODCE2(thebits : TBits_1); inline;
  12550. procedure setODCE3(thebits : TBits_1); inline;
  12551. procedure setODCE4(thebits : TBits_1); inline;
  12552. procedure setODCE5(thebits : TBits_1); inline;
  12553. procedure setODCE6(thebits : TBits_1); inline;
  12554. procedure setODCE7(thebits : TBits_1); inline;
  12555. procedure setw(thebits : TBits_32); inline;
  12556. public
  12557. procedure clearODCE0; inline;
  12558. procedure clearODCE1; inline;
  12559. procedure clearODCE2; inline;
  12560. procedure clearODCE3; inline;
  12561. procedure clearODCE4; inline;
  12562. procedure clearODCE5; inline;
  12563. procedure clearODCE6; inline;
  12564. procedure clearODCE7; inline;
  12565. procedure setODCE0; inline;
  12566. procedure setODCE1; inline;
  12567. procedure setODCE2; inline;
  12568. procedure setODCE3; inline;
  12569. procedure setODCE4; inline;
  12570. procedure setODCE5; inline;
  12571. procedure setODCE6; inline;
  12572. procedure setODCE7; inline;
  12573. property ODCE0 : TBits_1 read getODCE0 write setODCE0;
  12574. property ODCE1 : TBits_1 read getODCE1 write setODCE1;
  12575. property ODCE2 : TBits_1 read getODCE2 write setODCE2;
  12576. property ODCE3 : TBits_1 read getODCE3 write setODCE3;
  12577. property ODCE4 : TBits_1 read getODCE4 write setODCE4;
  12578. property ODCE5 : TBits_1 read getODCE5 write setODCE5;
  12579. property ODCE6 : TBits_1 read getODCE6 write setODCE6;
  12580. property ODCE7 : TBits_1 read getODCE7 write setODCE7;
  12581. property w : TBits_32 read getw write setw;
  12582. end;
  12583. type
  12584. TPORTERegisters = record
  12585. TRISEbits : TPORTE_TRISE;
  12586. TRISE : longWord;
  12587. TRISECLR : longWord;
  12588. TRISESET : longWord;
  12589. TRISEINV : longWord;
  12590. PORTEbits : TPORTE_PORTE;
  12591. PORTE : longWord;
  12592. PORTECLR : longWord;
  12593. PORTESET : longWord;
  12594. PORTEINV : longWord;
  12595. LATEbits : TPORTE_LATE;
  12596. LATE : longWord;
  12597. LATECLR : longWord;
  12598. LATESET : longWord;
  12599. LATEINV : longWord;
  12600. ODCEbits : TPORTE_ODCE;
  12601. ODCE : longWord;
  12602. ODCECLR : longWord;
  12603. ODCESET : longWord;
  12604. ODCEINV : longWord;
  12605. end;
  12606. TPORTF_TRISF = record
  12607. private
  12608. function getTRISF0 : TBits_1; inline;
  12609. function getTRISF1 : TBits_1; inline;
  12610. function getTRISF2 : TBits_1; inline;
  12611. function getTRISF3 : TBits_1; inline;
  12612. function getTRISF4 : TBits_1; inline;
  12613. function getTRISF5 : TBits_1; inline;
  12614. function getw : TBits_32; inline;
  12615. procedure setTRISF0(thebits : TBits_1); inline;
  12616. procedure setTRISF1(thebits : TBits_1); inline;
  12617. procedure setTRISF2(thebits : TBits_1); inline;
  12618. procedure setTRISF3(thebits : TBits_1); inline;
  12619. procedure setTRISF4(thebits : TBits_1); inline;
  12620. procedure setTRISF5(thebits : TBits_1); inline;
  12621. procedure setw(thebits : TBits_32); inline;
  12622. public
  12623. procedure clearTRISF0; inline;
  12624. procedure clearTRISF1; inline;
  12625. procedure clearTRISF2; inline;
  12626. procedure clearTRISF3; inline;
  12627. procedure clearTRISF4; inline;
  12628. procedure clearTRISF5; inline;
  12629. procedure setTRISF0; inline;
  12630. procedure setTRISF1; inline;
  12631. procedure setTRISF2; inline;
  12632. procedure setTRISF3; inline;
  12633. procedure setTRISF4; inline;
  12634. procedure setTRISF5; inline;
  12635. property TRISF0 : TBits_1 read getTRISF0 write setTRISF0;
  12636. property TRISF1 : TBits_1 read getTRISF1 write setTRISF1;
  12637. property TRISF2 : TBits_1 read getTRISF2 write setTRISF2;
  12638. property TRISF3 : TBits_1 read getTRISF3 write setTRISF3;
  12639. property TRISF4 : TBits_1 read getTRISF4 write setTRISF4;
  12640. property TRISF5 : TBits_1 read getTRISF5 write setTRISF5;
  12641. property w : TBits_32 read getw write setw;
  12642. end;
  12643. TPORTF_PORTF = record
  12644. private
  12645. function getRF0 : TBits_1; inline;
  12646. function getRF1 : TBits_1; inline;
  12647. function getRF2 : TBits_1; inline;
  12648. function getRF3 : TBits_1; inline;
  12649. function getRF4 : TBits_1; inline;
  12650. function getRF5 : TBits_1; inline;
  12651. function getw : TBits_32; inline;
  12652. procedure setRF0(thebits : TBits_1); inline;
  12653. procedure setRF1(thebits : TBits_1); inline;
  12654. procedure setRF2(thebits : TBits_1); inline;
  12655. procedure setRF3(thebits : TBits_1); inline;
  12656. procedure setRF4(thebits : TBits_1); inline;
  12657. procedure setRF5(thebits : TBits_1); inline;
  12658. procedure setw(thebits : TBits_32); inline;
  12659. public
  12660. procedure clearRF0; inline;
  12661. procedure clearRF1; inline;
  12662. procedure clearRF2; inline;
  12663. procedure clearRF3; inline;
  12664. procedure clearRF4; inline;
  12665. procedure clearRF5; inline;
  12666. procedure setRF0; inline;
  12667. procedure setRF1; inline;
  12668. procedure setRF2; inline;
  12669. procedure setRF3; inline;
  12670. procedure setRF4; inline;
  12671. procedure setRF5; inline;
  12672. property RF0 : TBits_1 read getRF0 write setRF0;
  12673. property RF1 : TBits_1 read getRF1 write setRF1;
  12674. property RF2 : TBits_1 read getRF2 write setRF2;
  12675. property RF3 : TBits_1 read getRF3 write setRF3;
  12676. property RF4 : TBits_1 read getRF4 write setRF4;
  12677. property RF5 : TBits_1 read getRF5 write setRF5;
  12678. property w : TBits_32 read getw write setw;
  12679. end;
  12680. TPortF_bits=(RF0=0,RF1=1,RF2=2,RF3=3,RF4=4,RF5=5);
  12681. TPortF_bitset = set of TPortF_bits;
  12682. TPORTF_LATF = record
  12683. private
  12684. function getLATF0 : TBits_1; inline;
  12685. function getLATF1 : TBits_1; inline;
  12686. function getLATF2 : TBits_1; inline;
  12687. function getLATF3 : TBits_1; inline;
  12688. function getLATF4 : TBits_1; inline;
  12689. function getLATF5 : TBits_1; inline;
  12690. function getw : TBits_32; inline;
  12691. procedure setLATF0(thebits : TBits_1); inline;
  12692. procedure setLATF1(thebits : TBits_1); inline;
  12693. procedure setLATF2(thebits : TBits_1); inline;
  12694. procedure setLATF3(thebits : TBits_1); inline;
  12695. procedure setLATF4(thebits : TBits_1); inline;
  12696. procedure setLATF5(thebits : TBits_1); inline;
  12697. procedure setw(thebits : TBits_32); inline;
  12698. public
  12699. procedure clearLATF0; inline;
  12700. procedure clearLATF1; inline;
  12701. procedure clearLATF2; inline;
  12702. procedure clearLATF3; inline;
  12703. procedure clearLATF4; inline;
  12704. procedure clearLATF5; inline;
  12705. procedure setLATF0; inline;
  12706. procedure setLATF1; inline;
  12707. procedure setLATF2; inline;
  12708. procedure setLATF3; inline;
  12709. procedure setLATF4; inline;
  12710. procedure setLATF5; inline;
  12711. property LATF0 : TBits_1 read getLATF0 write setLATF0;
  12712. property LATF1 : TBits_1 read getLATF1 write setLATF1;
  12713. property LATF2 : TBits_1 read getLATF2 write setLATF2;
  12714. property LATF3 : TBits_1 read getLATF3 write setLATF3;
  12715. property LATF4 : TBits_1 read getLATF4 write setLATF4;
  12716. property LATF5 : TBits_1 read getLATF5 write setLATF5;
  12717. property w : TBits_32 read getw write setw;
  12718. end;
  12719. TPORTF_ODCF = record
  12720. private
  12721. function getODCF0 : TBits_1; inline;
  12722. function getODCF1 : TBits_1; inline;
  12723. function getODCF2 : TBits_1; inline;
  12724. function getODCF3 : TBits_1; inline;
  12725. function getODCF4 : TBits_1; inline;
  12726. function getODCF5 : TBits_1; inline;
  12727. function getw : TBits_32; inline;
  12728. procedure setODCF0(thebits : TBits_1); inline;
  12729. procedure setODCF1(thebits : TBits_1); inline;
  12730. procedure setODCF2(thebits : TBits_1); inline;
  12731. procedure setODCF3(thebits : TBits_1); inline;
  12732. procedure setODCF4(thebits : TBits_1); inline;
  12733. procedure setODCF5(thebits : TBits_1); inline;
  12734. procedure setw(thebits : TBits_32); inline;
  12735. public
  12736. procedure clearODCF0; inline;
  12737. procedure clearODCF1; inline;
  12738. procedure clearODCF2; inline;
  12739. procedure clearODCF3; inline;
  12740. procedure clearODCF4; inline;
  12741. procedure clearODCF5; inline;
  12742. procedure setODCF0; inline;
  12743. procedure setODCF1; inline;
  12744. procedure setODCF2; inline;
  12745. procedure setODCF3; inline;
  12746. procedure setODCF4; inline;
  12747. procedure setODCF5; inline;
  12748. property ODCF0 : TBits_1 read getODCF0 write setODCF0;
  12749. property ODCF1 : TBits_1 read getODCF1 write setODCF1;
  12750. property ODCF2 : TBits_1 read getODCF2 write setODCF2;
  12751. property ODCF3 : TBits_1 read getODCF3 write setODCF3;
  12752. property ODCF4 : TBits_1 read getODCF4 write setODCF4;
  12753. property ODCF5 : TBits_1 read getODCF5 write setODCF5;
  12754. property w : TBits_32 read getw write setw;
  12755. end;
  12756. type
  12757. TPORTFRegisters = record
  12758. TRISFbits : TPORTF_TRISF;
  12759. TRISF : longWord;
  12760. TRISFCLR : longWord;
  12761. TRISFSET : longWord;
  12762. TRISFINV : longWord;
  12763. PORTFbits : TPORTF_PORTF;
  12764. PORTF : longWord;
  12765. PORTFCLR : longWord;
  12766. PORTFSET : longWord;
  12767. PORTFINV : longWord;
  12768. LATFbits : TPORTF_LATF;
  12769. LATF : longWord;
  12770. LATFCLR : longWord;
  12771. LATFSET : longWord;
  12772. LATFINV : longWord;
  12773. ODCFbits : TPORTF_ODCF;
  12774. ODCF : longWord;
  12775. ODCFCLR : longWord;
  12776. ODCFSET : longWord;
  12777. ODCFINV : longWord;
  12778. end;
  12779. TPORTG_TRISG = record
  12780. private
  12781. function getTRISG2 : TBits_1; inline;
  12782. function getTRISG3 : TBits_1; inline;
  12783. function getTRISG6 : TBits_1; inline;
  12784. function getTRISG7 : TBits_1; inline;
  12785. function getTRISG8 : TBits_1; inline;
  12786. function getTRISG9 : TBits_1; inline;
  12787. function getw : TBits_32; inline;
  12788. procedure setTRISG2(thebits : TBits_1); inline;
  12789. procedure setTRISG3(thebits : TBits_1); inline;
  12790. procedure setTRISG6(thebits : TBits_1); inline;
  12791. procedure setTRISG7(thebits : TBits_1); inline;
  12792. procedure setTRISG8(thebits : TBits_1); inline;
  12793. procedure setTRISG9(thebits : TBits_1); inline;
  12794. procedure setw(thebits : TBits_32); inline;
  12795. public
  12796. procedure clearTRISG2; inline;
  12797. procedure clearTRISG3; inline;
  12798. procedure clearTRISG6; inline;
  12799. procedure clearTRISG7; inline;
  12800. procedure clearTRISG8; inline;
  12801. procedure clearTRISG9; inline;
  12802. procedure setTRISG2; inline;
  12803. procedure setTRISG3; inline;
  12804. procedure setTRISG6; inline;
  12805. procedure setTRISG7; inline;
  12806. procedure setTRISG8; inline;
  12807. procedure setTRISG9; inline;
  12808. property TRISG2 : TBits_1 read getTRISG2 write setTRISG2;
  12809. property TRISG3 : TBits_1 read getTRISG3 write setTRISG3;
  12810. property TRISG6 : TBits_1 read getTRISG6 write setTRISG6;
  12811. property TRISG7 : TBits_1 read getTRISG7 write setTRISG7;
  12812. property TRISG8 : TBits_1 read getTRISG8 write setTRISG8;
  12813. property TRISG9 : TBits_1 read getTRISG9 write setTRISG9;
  12814. property w : TBits_32 read getw write setw;
  12815. end;
  12816. TPORTG_PORTG = record
  12817. private
  12818. function getRG2 : TBits_1; inline;
  12819. function getRG3 : TBits_1; inline;
  12820. function getRG6 : TBits_1; inline;
  12821. function getRG7 : TBits_1; inline;
  12822. function getRG8 : TBits_1; inline;
  12823. function getRG9 : TBits_1; inline;
  12824. function getw : TBits_32; inline;
  12825. procedure setRG2(thebits : TBits_1); inline;
  12826. procedure setRG3(thebits : TBits_1); inline;
  12827. procedure setRG6(thebits : TBits_1); inline;
  12828. procedure setRG7(thebits : TBits_1); inline;
  12829. procedure setRG8(thebits : TBits_1); inline;
  12830. procedure setRG9(thebits : TBits_1); inline;
  12831. procedure setw(thebits : TBits_32); inline;
  12832. public
  12833. procedure clearRG2; inline;
  12834. procedure clearRG3; inline;
  12835. procedure clearRG6; inline;
  12836. procedure clearRG7; inline;
  12837. procedure clearRG8; inline;
  12838. procedure clearRG9; inline;
  12839. procedure setRG2; inline;
  12840. procedure setRG3; inline;
  12841. procedure setRG6; inline;
  12842. procedure setRG7; inline;
  12843. procedure setRG8; inline;
  12844. procedure setRG9; inline;
  12845. property RG2 : TBits_1 read getRG2 write setRG2;
  12846. property RG3 : TBits_1 read getRG3 write setRG3;
  12847. property RG6 : TBits_1 read getRG6 write setRG6;
  12848. property RG7 : TBits_1 read getRG7 write setRG7;
  12849. property RG8 : TBits_1 read getRG8 write setRG8;
  12850. property RG9 : TBits_1 read getRG9 write setRG9;
  12851. property w : TBits_32 read getw write setw;
  12852. end;
  12853. TPortG_bits=(RG2=2,RG3=3,RG6=6,RG7=7,RG8=8,RG9=9);
  12854. TPortG_bitset = set of TPortG_bits;
  12855. TPORTG_LATG = record
  12856. private
  12857. function getLATG2 : TBits_1; inline;
  12858. function getLATG3 : TBits_1; inline;
  12859. function getLATG6 : TBits_1; inline;
  12860. function getLATG7 : TBits_1; inline;
  12861. function getLATG8 : TBits_1; inline;
  12862. function getLATG9 : TBits_1; inline;
  12863. function getw : TBits_32; inline;
  12864. procedure setLATG2(thebits : TBits_1); inline;
  12865. procedure setLATG3(thebits : TBits_1); inline;
  12866. procedure setLATG6(thebits : TBits_1); inline;
  12867. procedure setLATG7(thebits : TBits_1); inline;
  12868. procedure setLATG8(thebits : TBits_1); inline;
  12869. procedure setLATG9(thebits : TBits_1); inline;
  12870. procedure setw(thebits : TBits_32); inline;
  12871. public
  12872. procedure clearLATG2; inline;
  12873. procedure clearLATG3; inline;
  12874. procedure clearLATG6; inline;
  12875. procedure clearLATG7; inline;
  12876. procedure clearLATG8; inline;
  12877. procedure clearLATG9; inline;
  12878. procedure setLATG2; inline;
  12879. procedure setLATG3; inline;
  12880. procedure setLATG6; inline;
  12881. procedure setLATG7; inline;
  12882. procedure setLATG8; inline;
  12883. procedure setLATG9; inline;
  12884. property LATG2 : TBits_1 read getLATG2 write setLATG2;
  12885. property LATG3 : TBits_1 read getLATG3 write setLATG3;
  12886. property LATG6 : TBits_1 read getLATG6 write setLATG6;
  12887. property LATG7 : TBits_1 read getLATG7 write setLATG7;
  12888. property LATG8 : TBits_1 read getLATG8 write setLATG8;
  12889. property LATG9 : TBits_1 read getLATG9 write setLATG9;
  12890. property w : TBits_32 read getw write setw;
  12891. end;
  12892. TPORTG_ODCG = record
  12893. private
  12894. function getODCG2 : TBits_1; inline;
  12895. function getODCG3 : TBits_1; inline;
  12896. function getODCG6 : TBits_1; inline;
  12897. function getODCG7 : TBits_1; inline;
  12898. function getODCG8 : TBits_1; inline;
  12899. function getODCG9 : TBits_1; inline;
  12900. function getw : TBits_32; inline;
  12901. procedure setODCG2(thebits : TBits_1); inline;
  12902. procedure setODCG3(thebits : TBits_1); inline;
  12903. procedure setODCG6(thebits : TBits_1); inline;
  12904. procedure setODCG7(thebits : TBits_1); inline;
  12905. procedure setODCG8(thebits : TBits_1); inline;
  12906. procedure setODCG9(thebits : TBits_1); inline;
  12907. procedure setw(thebits : TBits_32); inline;
  12908. public
  12909. procedure clearODCG2; inline;
  12910. procedure clearODCG3; inline;
  12911. procedure clearODCG6; inline;
  12912. procedure clearODCG7; inline;
  12913. procedure clearODCG8; inline;
  12914. procedure clearODCG9; inline;
  12915. procedure setODCG2; inline;
  12916. procedure setODCG3; inline;
  12917. procedure setODCG6; inline;
  12918. procedure setODCG7; inline;
  12919. procedure setODCG8; inline;
  12920. procedure setODCG9; inline;
  12921. property ODCG2 : TBits_1 read getODCG2 write setODCG2;
  12922. property ODCG3 : TBits_1 read getODCG3 write setODCG3;
  12923. property ODCG6 : TBits_1 read getODCG6 write setODCG6;
  12924. property ODCG7 : TBits_1 read getODCG7 write setODCG7;
  12925. property ODCG8 : TBits_1 read getODCG8 write setODCG8;
  12926. property ODCG9 : TBits_1 read getODCG9 write setODCG9;
  12927. property w : TBits_32 read getw write setw;
  12928. end;
  12929. TPORTG_CNCON = record
  12930. private
  12931. function getON : TBits_1; inline;
  12932. function getSIDL : TBits_1; inline;
  12933. function getw : TBits_32; inline;
  12934. procedure setON(thebits : TBits_1); inline;
  12935. procedure setSIDL(thebits : TBits_1); inline;
  12936. procedure setw(thebits : TBits_32); inline;
  12937. public
  12938. procedure clearON; inline;
  12939. procedure clearSIDL; inline;
  12940. procedure setON; inline;
  12941. procedure setSIDL; inline;
  12942. property ON : TBits_1 read getON write setON;
  12943. property SIDL : TBits_1 read getSIDL write setSIDL;
  12944. property w : TBits_32 read getw write setw;
  12945. end;
  12946. TPORTG_CNEN = record
  12947. private
  12948. function getCNEN0 : TBits_1; inline;
  12949. function getCNEN1 : TBits_1; inline;
  12950. function getCNEN10 : TBits_1; inline;
  12951. function getCNEN11 : TBits_1; inline;
  12952. function getCNEN12 : TBits_1; inline;
  12953. function getCNEN13 : TBits_1; inline;
  12954. function getCNEN14 : TBits_1; inline;
  12955. function getCNEN15 : TBits_1; inline;
  12956. function getCNEN16 : TBits_1; inline;
  12957. function getCNEN17 : TBits_1; inline;
  12958. function getCNEN18 : TBits_1; inline;
  12959. function getCNEN2 : TBits_1; inline;
  12960. function getCNEN3 : TBits_1; inline;
  12961. function getCNEN4 : TBits_1; inline;
  12962. function getCNEN5 : TBits_1; inline;
  12963. function getCNEN6 : TBits_1; inline;
  12964. function getCNEN7 : TBits_1; inline;
  12965. function getCNEN8 : TBits_1; inline;
  12966. function getCNEN9 : TBits_1; inline;
  12967. function getw : TBits_32; inline;
  12968. procedure setCNEN0(thebits : TBits_1); inline;
  12969. procedure setCNEN1(thebits : TBits_1); inline;
  12970. procedure setCNEN10(thebits : TBits_1); inline;
  12971. procedure setCNEN11(thebits : TBits_1); inline;
  12972. procedure setCNEN12(thebits : TBits_1); inline;
  12973. procedure setCNEN13(thebits : TBits_1); inline;
  12974. procedure setCNEN14(thebits : TBits_1); inline;
  12975. procedure setCNEN15(thebits : TBits_1); inline;
  12976. procedure setCNEN16(thebits : TBits_1); inline;
  12977. procedure setCNEN17(thebits : TBits_1); inline;
  12978. procedure setCNEN18(thebits : TBits_1); inline;
  12979. procedure setCNEN2(thebits : TBits_1); inline;
  12980. procedure setCNEN3(thebits : TBits_1); inline;
  12981. procedure setCNEN4(thebits : TBits_1); inline;
  12982. procedure setCNEN5(thebits : TBits_1); inline;
  12983. procedure setCNEN6(thebits : TBits_1); inline;
  12984. procedure setCNEN7(thebits : TBits_1); inline;
  12985. procedure setCNEN8(thebits : TBits_1); inline;
  12986. procedure setCNEN9(thebits : TBits_1); inline;
  12987. procedure setw(thebits : TBits_32); inline;
  12988. public
  12989. procedure clearCNEN0; inline;
  12990. procedure clearCNEN10; inline;
  12991. procedure clearCNEN11; inline;
  12992. procedure clearCNEN12; inline;
  12993. procedure clearCNEN13; inline;
  12994. procedure clearCNEN14; inline;
  12995. procedure clearCNEN15; inline;
  12996. procedure clearCNEN16; inline;
  12997. procedure clearCNEN17; inline;
  12998. procedure clearCNEN18; inline;
  12999. procedure clearCNEN1; inline;
  13000. procedure clearCNEN2; inline;
  13001. procedure clearCNEN3; inline;
  13002. procedure clearCNEN4; inline;
  13003. procedure clearCNEN5; inline;
  13004. procedure clearCNEN6; inline;
  13005. procedure clearCNEN7; inline;
  13006. procedure clearCNEN8; inline;
  13007. procedure clearCNEN9; inline;
  13008. procedure setCNEN0; inline;
  13009. procedure setCNEN10; inline;
  13010. procedure setCNEN11; inline;
  13011. procedure setCNEN12; inline;
  13012. procedure setCNEN13; inline;
  13013. procedure setCNEN14; inline;
  13014. procedure setCNEN15; inline;
  13015. procedure setCNEN16; inline;
  13016. procedure setCNEN17; inline;
  13017. procedure setCNEN18; inline;
  13018. procedure setCNEN1; inline;
  13019. procedure setCNEN2; inline;
  13020. procedure setCNEN3; inline;
  13021. procedure setCNEN4; inline;
  13022. procedure setCNEN5; inline;
  13023. procedure setCNEN6; inline;
  13024. procedure setCNEN7; inline;
  13025. procedure setCNEN8; inline;
  13026. procedure setCNEN9; inline;
  13027. property CNEN0 : TBits_1 read getCNEN0 write setCNEN0;
  13028. property CNEN1 : TBits_1 read getCNEN1 write setCNEN1;
  13029. property CNEN10 : TBits_1 read getCNEN10 write setCNEN10;
  13030. property CNEN11 : TBits_1 read getCNEN11 write setCNEN11;
  13031. property CNEN12 : TBits_1 read getCNEN12 write setCNEN12;
  13032. property CNEN13 : TBits_1 read getCNEN13 write setCNEN13;
  13033. property CNEN14 : TBits_1 read getCNEN14 write setCNEN14;
  13034. property CNEN15 : TBits_1 read getCNEN15 write setCNEN15;
  13035. property CNEN16 : TBits_1 read getCNEN16 write setCNEN16;
  13036. property CNEN17 : TBits_1 read getCNEN17 write setCNEN17;
  13037. property CNEN18 : TBits_1 read getCNEN18 write setCNEN18;
  13038. property CNEN2 : TBits_1 read getCNEN2 write setCNEN2;
  13039. property CNEN3 : TBits_1 read getCNEN3 write setCNEN3;
  13040. property CNEN4 : TBits_1 read getCNEN4 write setCNEN4;
  13041. property CNEN5 : TBits_1 read getCNEN5 write setCNEN5;
  13042. property CNEN6 : TBits_1 read getCNEN6 write setCNEN6;
  13043. property CNEN7 : TBits_1 read getCNEN7 write setCNEN7;
  13044. property CNEN8 : TBits_1 read getCNEN8 write setCNEN8;
  13045. property CNEN9 : TBits_1 read getCNEN9 write setCNEN9;
  13046. property w : TBits_32 read getw write setw;
  13047. end;
  13048. TPORTG_CNPUE = record
  13049. private
  13050. function getCNPUE0 : TBits_1; inline;
  13051. function getCNPUE1 : TBits_1; inline;
  13052. function getCNPUE10 : TBits_1; inline;
  13053. function getCNPUE11 : TBits_1; inline;
  13054. function getCNPUE12 : TBits_1; inline;
  13055. function getCNPUE13 : TBits_1; inline;
  13056. function getCNPUE14 : TBits_1; inline;
  13057. function getCNPUE15 : TBits_1; inline;
  13058. function getCNPUE16 : TBits_1; inline;
  13059. function getCNPUE17 : TBits_1; inline;
  13060. function getCNPUE18 : TBits_1; inline;
  13061. function getCNPUE2 : TBits_1; inline;
  13062. function getCNPUE3 : TBits_1; inline;
  13063. function getCNPUE4 : TBits_1; inline;
  13064. function getCNPUE5 : TBits_1; inline;
  13065. function getCNPUE6 : TBits_1; inline;
  13066. function getCNPUE7 : TBits_1; inline;
  13067. function getCNPUE8 : TBits_1; inline;
  13068. function getCNPUE9 : TBits_1; inline;
  13069. function getw : TBits_32; inline;
  13070. procedure setCNPUE0(thebits : TBits_1); inline;
  13071. procedure setCNPUE1(thebits : TBits_1); inline;
  13072. procedure setCNPUE10(thebits : TBits_1); inline;
  13073. procedure setCNPUE11(thebits : TBits_1); inline;
  13074. procedure setCNPUE12(thebits : TBits_1); inline;
  13075. procedure setCNPUE13(thebits : TBits_1); inline;
  13076. procedure setCNPUE14(thebits : TBits_1); inline;
  13077. procedure setCNPUE15(thebits : TBits_1); inline;
  13078. procedure setCNPUE16(thebits : TBits_1); inline;
  13079. procedure setCNPUE17(thebits : TBits_1); inline;
  13080. procedure setCNPUE18(thebits : TBits_1); inline;
  13081. procedure setCNPUE2(thebits : TBits_1); inline;
  13082. procedure setCNPUE3(thebits : TBits_1); inline;
  13083. procedure setCNPUE4(thebits : TBits_1); inline;
  13084. procedure setCNPUE5(thebits : TBits_1); inline;
  13085. procedure setCNPUE6(thebits : TBits_1); inline;
  13086. procedure setCNPUE7(thebits : TBits_1); inline;
  13087. procedure setCNPUE8(thebits : TBits_1); inline;
  13088. procedure setCNPUE9(thebits : TBits_1); inline;
  13089. procedure setw(thebits : TBits_32); inline;
  13090. public
  13091. procedure clearCNPUE0; inline;
  13092. procedure clearCNPUE10; inline;
  13093. procedure clearCNPUE11; inline;
  13094. procedure clearCNPUE12; inline;
  13095. procedure clearCNPUE13; inline;
  13096. procedure clearCNPUE14; inline;
  13097. procedure clearCNPUE15; inline;
  13098. procedure clearCNPUE16; inline;
  13099. procedure clearCNPUE17; inline;
  13100. procedure clearCNPUE18; inline;
  13101. procedure clearCNPUE1; inline;
  13102. procedure clearCNPUE2; inline;
  13103. procedure clearCNPUE3; inline;
  13104. procedure clearCNPUE4; inline;
  13105. procedure clearCNPUE5; inline;
  13106. procedure clearCNPUE6; inline;
  13107. procedure clearCNPUE7; inline;
  13108. procedure clearCNPUE8; inline;
  13109. procedure clearCNPUE9; inline;
  13110. procedure setCNPUE0; inline;
  13111. procedure setCNPUE10; inline;
  13112. procedure setCNPUE11; inline;
  13113. procedure setCNPUE12; inline;
  13114. procedure setCNPUE13; inline;
  13115. procedure setCNPUE14; inline;
  13116. procedure setCNPUE15; inline;
  13117. procedure setCNPUE16; inline;
  13118. procedure setCNPUE17; inline;
  13119. procedure setCNPUE18; inline;
  13120. procedure setCNPUE1; inline;
  13121. procedure setCNPUE2; inline;
  13122. procedure setCNPUE3; inline;
  13123. procedure setCNPUE4; inline;
  13124. procedure setCNPUE5; inline;
  13125. procedure setCNPUE6; inline;
  13126. procedure setCNPUE7; inline;
  13127. procedure setCNPUE8; inline;
  13128. procedure setCNPUE9; inline;
  13129. property CNPUE0 : TBits_1 read getCNPUE0 write setCNPUE0;
  13130. property CNPUE1 : TBits_1 read getCNPUE1 write setCNPUE1;
  13131. property CNPUE10 : TBits_1 read getCNPUE10 write setCNPUE10;
  13132. property CNPUE11 : TBits_1 read getCNPUE11 write setCNPUE11;
  13133. property CNPUE12 : TBits_1 read getCNPUE12 write setCNPUE12;
  13134. property CNPUE13 : TBits_1 read getCNPUE13 write setCNPUE13;
  13135. property CNPUE14 : TBits_1 read getCNPUE14 write setCNPUE14;
  13136. property CNPUE15 : TBits_1 read getCNPUE15 write setCNPUE15;
  13137. property CNPUE16 : TBits_1 read getCNPUE16 write setCNPUE16;
  13138. property CNPUE17 : TBits_1 read getCNPUE17 write setCNPUE17;
  13139. property CNPUE18 : TBits_1 read getCNPUE18 write setCNPUE18;
  13140. property CNPUE2 : TBits_1 read getCNPUE2 write setCNPUE2;
  13141. property CNPUE3 : TBits_1 read getCNPUE3 write setCNPUE3;
  13142. property CNPUE4 : TBits_1 read getCNPUE4 write setCNPUE4;
  13143. property CNPUE5 : TBits_1 read getCNPUE5 write setCNPUE5;
  13144. property CNPUE6 : TBits_1 read getCNPUE6 write setCNPUE6;
  13145. property CNPUE7 : TBits_1 read getCNPUE7 write setCNPUE7;
  13146. property CNPUE8 : TBits_1 read getCNPUE8 write setCNPUE8;
  13147. property CNPUE9 : TBits_1 read getCNPUE9 write setCNPUE9;
  13148. property w : TBits_32 read getw write setw;
  13149. end;
  13150. type
  13151. TPORTGRegisters = record
  13152. TRISGbits : TPORTG_TRISG;
  13153. TRISG : longWord;
  13154. TRISGCLR : longWord;
  13155. TRISGSET : longWord;
  13156. TRISGINV : longWord;
  13157. PORTGbits : TPORTG_PORTG;
  13158. PORTG : longWord;
  13159. PORTGCLR : longWord;
  13160. PORTGSET : longWord;
  13161. PORTGINV : longWord;
  13162. LATGbits : TPORTG_LATG;
  13163. LATG : longWord;
  13164. LATGCLR : longWord;
  13165. LATGSET : longWord;
  13166. LATGINV : longWord;
  13167. ODCGbits : TPORTG_ODCG;
  13168. ODCG : longWord;
  13169. ODCGCLR : longWord;
  13170. ODCGSET : longWord;
  13171. ODCGINV : longWord;
  13172. CNCONbits : TPORTG_CNCON;
  13173. CNCON : longWord;
  13174. CNCONCLR : longWord;
  13175. CNCONSET : longWord;
  13176. CNCONINV : longWord;
  13177. CNENbits : TPORTG_CNEN;
  13178. CNEN : longWord;
  13179. CNENCLR : longWord;
  13180. CNENSET : longWord;
  13181. CNENINV : longWord;
  13182. CNPUEbits : TPORTG_CNPUE;
  13183. CNPUE : longWord;
  13184. CNPUECLR : longWord;
  13185. CNPUESET : longWord;
  13186. CNPUEINV : longWord;
  13187. end;
  13188. TCAN1_C1CON = record
  13189. private
  13190. function getABAT : TBits_1; inline;
  13191. function getCANBUSY : TBits_1; inline;
  13192. function getCANCAP : TBits_1; inline;
  13193. function getDNCNT : TBits_5; inline;
  13194. function getON : TBits_1; inline;
  13195. function getOPMOD : TBits_3; inline;
  13196. function getREQOP : TBits_3; inline;
  13197. function getSIDL : TBits_1; inline;
  13198. function getw : TBits_32; inline;
  13199. procedure setABAT(thebits : TBits_1); inline;
  13200. procedure setCANBUSY(thebits : TBits_1); inline;
  13201. procedure setCANCAP(thebits : TBits_1); inline;
  13202. procedure setDNCNT(thebits : TBits_5); inline;
  13203. procedure setON(thebits : TBits_1); inline;
  13204. procedure setOPMOD(thebits : TBits_3); inline;
  13205. procedure setREQOP(thebits : TBits_3); inline;
  13206. procedure setSIDL(thebits : TBits_1); inline;
  13207. procedure setw(thebits : TBits_32); inline;
  13208. public
  13209. procedure clearABAT; inline;
  13210. procedure clearCANBUSY; inline;
  13211. procedure clearCANCAP; inline;
  13212. procedure clearON; inline;
  13213. procedure clearSIDL; inline;
  13214. procedure setABAT; inline;
  13215. procedure setCANBUSY; inline;
  13216. procedure setCANCAP; inline;
  13217. procedure setON; inline;
  13218. procedure setSIDL; inline;
  13219. property ABAT : TBits_1 read getABAT write setABAT;
  13220. property CANBUSY : TBits_1 read getCANBUSY write setCANBUSY;
  13221. property CANCAP : TBits_1 read getCANCAP write setCANCAP;
  13222. property DNCNT : TBits_5 read getDNCNT write setDNCNT;
  13223. property ON : TBits_1 read getON write setON;
  13224. property OPMOD : TBits_3 read getOPMOD write setOPMOD;
  13225. property REQOP : TBits_3 read getREQOP write setREQOP;
  13226. property SIDL : TBits_1 read getSIDL write setSIDL;
  13227. property w : TBits_32 read getw write setw;
  13228. end;
  13229. TCAN1_C1CFG = record
  13230. private
  13231. function getBRP : TBits_6; inline;
  13232. function getPRSEG : TBits_3; inline;
  13233. function getSAM : TBits_1; inline;
  13234. function getSEG1PH : TBits_3; inline;
  13235. function getSEG2PH : TBits_3; inline;
  13236. function getSEG2PHTS : TBits_1; inline;
  13237. function getSJW : TBits_2; inline;
  13238. function getWAKFIL : TBits_1; inline;
  13239. function getw : TBits_32; inline;
  13240. procedure setBRP(thebits : TBits_6); inline;
  13241. procedure setPRSEG(thebits : TBits_3); inline;
  13242. procedure setSAM(thebits : TBits_1); inline;
  13243. procedure setSEG1PH(thebits : TBits_3); inline;
  13244. procedure setSEG2PH(thebits : TBits_3); inline;
  13245. procedure setSEG2PHTS(thebits : TBits_1); inline;
  13246. procedure setSJW(thebits : TBits_2); inline;
  13247. procedure setWAKFIL(thebits : TBits_1); inline;
  13248. procedure setw(thebits : TBits_32); inline;
  13249. public
  13250. procedure clearSAM; inline;
  13251. procedure clearSEG2PHTS; inline;
  13252. procedure clearWAKFIL; inline;
  13253. procedure setSAM; inline;
  13254. procedure setSEG2PHTS; inline;
  13255. procedure setWAKFIL; inline;
  13256. property BRP : TBits_6 read getBRP write setBRP;
  13257. property PRSEG : TBits_3 read getPRSEG write setPRSEG;
  13258. property SAM : TBits_1 read getSAM write setSAM;
  13259. property SEG1PH : TBits_3 read getSEG1PH write setSEG1PH;
  13260. property SEG2PH : TBits_3 read getSEG2PH write setSEG2PH;
  13261. property SEG2PHTS : TBits_1 read getSEG2PHTS write setSEG2PHTS;
  13262. property SJW : TBits_2 read getSJW write setSJW;
  13263. property WAKFIL : TBits_1 read getWAKFIL write setWAKFIL;
  13264. property w : TBits_32 read getw write setw;
  13265. end;
  13266. TCAN1_C1INT = record
  13267. private
  13268. function getCERRIE : TBits_1; inline;
  13269. function getCERRIF : TBits_1; inline;
  13270. function getCTMRIE : TBits_1; inline;
  13271. function getCTMRIF : TBits_1; inline;
  13272. function getIVRIE : TBits_1; inline;
  13273. function getIVRIF : TBits_1; inline;
  13274. function getMODIE : TBits_1; inline;
  13275. function getMODIF : TBits_1; inline;
  13276. function getRBIE : TBits_1; inline;
  13277. function getRBIF : TBits_1; inline;
  13278. function getRBOVIE : TBits_1; inline;
  13279. function getRBOVIF : TBits_1; inline;
  13280. function getSERRIE : TBits_1; inline;
  13281. function getSERRIF : TBits_1; inline;
  13282. function getTBIE : TBits_1; inline;
  13283. function getTBIF : TBits_1; inline;
  13284. function getWAKIE : TBits_1; inline;
  13285. function getWAKIF : TBits_1; inline;
  13286. function getw : TBits_32; inline;
  13287. procedure setCERRIE(thebits : TBits_1); inline;
  13288. procedure setCERRIF(thebits : TBits_1); inline;
  13289. procedure setCTMRIE(thebits : TBits_1); inline;
  13290. procedure setCTMRIF(thebits : TBits_1); inline;
  13291. procedure setIVRIE(thebits : TBits_1); inline;
  13292. procedure setIVRIF(thebits : TBits_1); inline;
  13293. procedure setMODIE(thebits : TBits_1); inline;
  13294. procedure setMODIF(thebits : TBits_1); inline;
  13295. procedure setRBIE(thebits : TBits_1); inline;
  13296. procedure setRBIF(thebits : TBits_1); inline;
  13297. procedure setRBOVIE(thebits : TBits_1); inline;
  13298. procedure setRBOVIF(thebits : TBits_1); inline;
  13299. procedure setSERRIE(thebits : TBits_1); inline;
  13300. procedure setSERRIF(thebits : TBits_1); inline;
  13301. procedure setTBIE(thebits : TBits_1); inline;
  13302. procedure setTBIF(thebits : TBits_1); inline;
  13303. procedure setWAKIE(thebits : TBits_1); inline;
  13304. procedure setWAKIF(thebits : TBits_1); inline;
  13305. procedure setw(thebits : TBits_32); inline;
  13306. public
  13307. procedure clearCERRIE; inline;
  13308. procedure clearCERRIF; inline;
  13309. procedure clearCTMRIE; inline;
  13310. procedure clearCTMRIF; inline;
  13311. procedure clearIVRIE; inline;
  13312. procedure clearIVRIF; inline;
  13313. procedure clearMODIE; inline;
  13314. procedure clearMODIF; inline;
  13315. procedure clearRBIE; inline;
  13316. procedure clearRBIF; inline;
  13317. procedure clearRBOVIE; inline;
  13318. procedure clearRBOVIF; inline;
  13319. procedure clearSERRIE; inline;
  13320. procedure clearSERRIF; inline;
  13321. procedure clearTBIE; inline;
  13322. procedure clearTBIF; inline;
  13323. procedure clearWAKIE; inline;
  13324. procedure clearWAKIF; inline;
  13325. procedure setCERRIE; inline;
  13326. procedure setCERRIF; inline;
  13327. procedure setCTMRIE; inline;
  13328. procedure setCTMRIF; inline;
  13329. procedure setIVRIE; inline;
  13330. procedure setIVRIF; inline;
  13331. procedure setMODIE; inline;
  13332. procedure setMODIF; inline;
  13333. procedure setRBIE; inline;
  13334. procedure setRBIF; inline;
  13335. procedure setRBOVIE; inline;
  13336. procedure setRBOVIF; inline;
  13337. procedure setSERRIE; inline;
  13338. procedure setSERRIF; inline;
  13339. procedure setTBIE; inline;
  13340. procedure setTBIF; inline;
  13341. procedure setWAKIE; inline;
  13342. procedure setWAKIF; inline;
  13343. property CERRIE : TBits_1 read getCERRIE write setCERRIE;
  13344. property CERRIF : TBits_1 read getCERRIF write setCERRIF;
  13345. property CTMRIE : TBits_1 read getCTMRIE write setCTMRIE;
  13346. property CTMRIF : TBits_1 read getCTMRIF write setCTMRIF;
  13347. property IVRIE : TBits_1 read getIVRIE write setIVRIE;
  13348. property IVRIF : TBits_1 read getIVRIF write setIVRIF;
  13349. property MODIE : TBits_1 read getMODIE write setMODIE;
  13350. property MODIF : TBits_1 read getMODIF write setMODIF;
  13351. property RBIE : TBits_1 read getRBIE write setRBIE;
  13352. property RBIF : TBits_1 read getRBIF write setRBIF;
  13353. property RBOVIE : TBits_1 read getRBOVIE write setRBOVIE;
  13354. property RBOVIF : TBits_1 read getRBOVIF write setRBOVIF;
  13355. property SERRIE : TBits_1 read getSERRIE write setSERRIE;
  13356. property SERRIF : TBits_1 read getSERRIF write setSERRIF;
  13357. property TBIE : TBits_1 read getTBIE write setTBIE;
  13358. property TBIF : TBits_1 read getTBIF write setTBIF;
  13359. property WAKIE : TBits_1 read getWAKIE write setWAKIE;
  13360. property WAKIF : TBits_1 read getWAKIF write setWAKIF;
  13361. property w : TBits_32 read getw write setw;
  13362. end;
  13363. TCAN1_C1VEC = record
  13364. private
  13365. function getFILHIT : TBits_5; inline;
  13366. function getICODE : TBits_7; inline;
  13367. function getw : TBits_32; inline;
  13368. procedure setFILHIT(thebits : TBits_5); inline;
  13369. procedure setICODE(thebits : TBits_7); inline;
  13370. procedure setw(thebits : TBits_32); inline;
  13371. public
  13372. property FILHIT : TBits_5 read getFILHIT write setFILHIT;
  13373. property ICODE : TBits_7 read getICODE write setICODE;
  13374. property w : TBits_32 read getw write setw;
  13375. end;
  13376. TCAN1_C1TREC = record
  13377. private
  13378. function getEWARN : TBits_1; inline;
  13379. function getRERRCNT : TBits_8; inline;
  13380. function getRXBP : TBits_1; inline;
  13381. function getRXWARN : TBits_1; inline;
  13382. function getTERRCNT : TBits_8; inline;
  13383. function getTXBO : TBits_1; inline;
  13384. function getTXBP : TBits_1; inline;
  13385. function getTXWARN : TBits_1; inline;
  13386. function getw : TBits_32; inline;
  13387. procedure setEWARN(thebits : TBits_1); inline;
  13388. procedure setRERRCNT(thebits : TBits_8); inline;
  13389. procedure setRXBP(thebits : TBits_1); inline;
  13390. procedure setRXWARN(thebits : TBits_1); inline;
  13391. procedure setTERRCNT(thebits : TBits_8); inline;
  13392. procedure setTXBO(thebits : TBits_1); inline;
  13393. procedure setTXBP(thebits : TBits_1); inline;
  13394. procedure setTXWARN(thebits : TBits_1); inline;
  13395. procedure setw(thebits : TBits_32); inline;
  13396. public
  13397. procedure clearEWARN; inline;
  13398. procedure clearRXBP; inline;
  13399. procedure clearRXWARN; inline;
  13400. procedure clearTXBO; inline;
  13401. procedure clearTXBP; inline;
  13402. procedure clearTXWARN; inline;
  13403. procedure setEWARN; inline;
  13404. procedure setRXBP; inline;
  13405. procedure setRXWARN; inline;
  13406. procedure setTXBO; inline;
  13407. procedure setTXBP; inline;
  13408. procedure setTXWARN; inline;
  13409. property EWARN : TBits_1 read getEWARN write setEWARN;
  13410. property RERRCNT : TBits_8 read getRERRCNT write setRERRCNT;
  13411. property RXBP : TBits_1 read getRXBP write setRXBP;
  13412. property RXWARN : TBits_1 read getRXWARN write setRXWARN;
  13413. property TERRCNT : TBits_8 read getTERRCNT write setTERRCNT;
  13414. property TXBO : TBits_1 read getTXBO write setTXBO;
  13415. property TXBP : TBits_1 read getTXBP write setTXBP;
  13416. property TXWARN : TBits_1 read getTXWARN write setTXWARN;
  13417. property w : TBits_32 read getw write setw;
  13418. end;
  13419. TCAN1_C1FSTAT = record
  13420. private
  13421. function getFIFOIP : TBits_32; inline;
  13422. function getFIFOIP0 : TBits_1; inline;
  13423. function getFIFOIP1 : TBits_1; inline;
  13424. function getFIFOIP10 : TBits_1; inline;
  13425. function getFIFOIP11 : TBits_1; inline;
  13426. function getFIFOIP12 : TBits_1; inline;
  13427. function getFIFOIP13 : TBits_1; inline;
  13428. function getFIFOIP14 : TBits_1; inline;
  13429. function getFIFOIP15 : TBits_1; inline;
  13430. function getFIFOIP16 : TBits_1; inline;
  13431. function getFIFOIP17 : TBits_1; inline;
  13432. function getFIFOIP18 : TBits_1; inline;
  13433. function getFIFOIP19 : TBits_1; inline;
  13434. function getFIFOIP2 : TBits_1; inline;
  13435. function getFIFOIP20 : TBits_1; inline;
  13436. function getFIFOIP21 : TBits_1; inline;
  13437. function getFIFOIP22 : TBits_1; inline;
  13438. function getFIFOIP23 : TBits_1; inline;
  13439. function getFIFOIP24 : TBits_1; inline;
  13440. function getFIFOIP25 : TBits_1; inline;
  13441. function getFIFOIP26 : TBits_1; inline;
  13442. function getFIFOIP27 : TBits_1; inline;
  13443. function getFIFOIP28 : TBits_1; inline;
  13444. function getFIFOIP29 : TBits_1; inline;
  13445. function getFIFOIP3 : TBits_1; inline;
  13446. function getFIFOIP30 : TBits_1; inline;
  13447. function getFIFOIP31 : TBits_1; inline;
  13448. function getFIFOIP4 : TBits_1; inline;
  13449. function getFIFOIP5 : TBits_1; inline;
  13450. function getFIFOIP6 : TBits_1; inline;
  13451. function getFIFOIP7 : TBits_1; inline;
  13452. function getFIFOIP8 : TBits_1; inline;
  13453. function getFIFOIP9 : TBits_1; inline;
  13454. function getw : TBits_32; inline;
  13455. procedure setFIFOIP(thebits : TBits_32); inline;
  13456. procedure setFIFOIP0(thebits : TBits_1); inline;
  13457. procedure setFIFOIP1(thebits : TBits_1); inline;
  13458. procedure setFIFOIP10(thebits : TBits_1); inline;
  13459. procedure setFIFOIP11(thebits : TBits_1); inline;
  13460. procedure setFIFOIP12(thebits : TBits_1); inline;
  13461. procedure setFIFOIP13(thebits : TBits_1); inline;
  13462. procedure setFIFOIP14(thebits : TBits_1); inline;
  13463. procedure setFIFOIP15(thebits : TBits_1); inline;
  13464. procedure setFIFOIP16(thebits : TBits_1); inline;
  13465. procedure setFIFOIP17(thebits : TBits_1); inline;
  13466. procedure setFIFOIP18(thebits : TBits_1); inline;
  13467. procedure setFIFOIP19(thebits : TBits_1); inline;
  13468. procedure setFIFOIP2(thebits : TBits_1); inline;
  13469. procedure setFIFOIP20(thebits : TBits_1); inline;
  13470. procedure setFIFOIP21(thebits : TBits_1); inline;
  13471. procedure setFIFOIP22(thebits : TBits_1); inline;
  13472. procedure setFIFOIP23(thebits : TBits_1); inline;
  13473. procedure setFIFOIP24(thebits : TBits_1); inline;
  13474. procedure setFIFOIP25(thebits : TBits_1); inline;
  13475. procedure setFIFOIP26(thebits : TBits_1); inline;
  13476. procedure setFIFOIP27(thebits : TBits_1); inline;
  13477. procedure setFIFOIP28(thebits : TBits_1); inline;
  13478. procedure setFIFOIP29(thebits : TBits_1); inline;
  13479. procedure setFIFOIP3(thebits : TBits_1); inline;
  13480. procedure setFIFOIP30(thebits : TBits_1); inline;
  13481. procedure setFIFOIP31(thebits : TBits_1); inline;
  13482. procedure setFIFOIP4(thebits : TBits_1); inline;
  13483. procedure setFIFOIP5(thebits : TBits_1); inline;
  13484. procedure setFIFOIP6(thebits : TBits_1); inline;
  13485. procedure setFIFOIP7(thebits : TBits_1); inline;
  13486. procedure setFIFOIP8(thebits : TBits_1); inline;
  13487. procedure setFIFOIP9(thebits : TBits_1); inline;
  13488. procedure setw(thebits : TBits_32); inline;
  13489. public
  13490. procedure clearFIFOIP0; inline;
  13491. procedure clearFIFOIP10; inline;
  13492. procedure clearFIFOIP11; inline;
  13493. procedure clearFIFOIP12; inline;
  13494. procedure clearFIFOIP13; inline;
  13495. procedure clearFIFOIP14; inline;
  13496. procedure clearFIFOIP15; inline;
  13497. procedure clearFIFOIP16; inline;
  13498. procedure clearFIFOIP17; inline;
  13499. procedure clearFIFOIP18; inline;
  13500. procedure clearFIFOIP19; inline;
  13501. procedure clearFIFOIP1; inline;
  13502. procedure clearFIFOIP20; inline;
  13503. procedure clearFIFOIP21; inline;
  13504. procedure clearFIFOIP22; inline;
  13505. procedure clearFIFOIP23; inline;
  13506. procedure clearFIFOIP24; inline;
  13507. procedure clearFIFOIP25; inline;
  13508. procedure clearFIFOIP26; inline;
  13509. procedure clearFIFOIP27; inline;
  13510. procedure clearFIFOIP28; inline;
  13511. procedure clearFIFOIP29; inline;
  13512. procedure clearFIFOIP2; inline;
  13513. procedure clearFIFOIP30; inline;
  13514. procedure clearFIFOIP31; inline;
  13515. procedure clearFIFOIP3; inline;
  13516. procedure clearFIFOIP4; inline;
  13517. procedure clearFIFOIP5; inline;
  13518. procedure clearFIFOIP6; inline;
  13519. procedure clearFIFOIP7; inline;
  13520. procedure clearFIFOIP8; inline;
  13521. procedure clearFIFOIP9; inline;
  13522. procedure setFIFOIP0; inline;
  13523. procedure setFIFOIP10; inline;
  13524. procedure setFIFOIP11; inline;
  13525. procedure setFIFOIP12; inline;
  13526. procedure setFIFOIP13; inline;
  13527. procedure setFIFOIP14; inline;
  13528. procedure setFIFOIP15; inline;
  13529. procedure setFIFOIP16; inline;
  13530. procedure setFIFOIP17; inline;
  13531. procedure setFIFOIP18; inline;
  13532. procedure setFIFOIP19; inline;
  13533. procedure setFIFOIP1; inline;
  13534. procedure setFIFOIP20; inline;
  13535. procedure setFIFOIP21; inline;
  13536. procedure setFIFOIP22; inline;
  13537. procedure setFIFOIP23; inline;
  13538. procedure setFIFOIP24; inline;
  13539. procedure setFIFOIP25; inline;
  13540. procedure setFIFOIP26; inline;
  13541. procedure setFIFOIP27; inline;
  13542. procedure setFIFOIP28; inline;
  13543. procedure setFIFOIP29; inline;
  13544. procedure setFIFOIP2; inline;
  13545. procedure setFIFOIP30; inline;
  13546. procedure setFIFOIP31; inline;
  13547. procedure setFIFOIP3; inline;
  13548. procedure setFIFOIP4; inline;
  13549. procedure setFIFOIP5; inline;
  13550. procedure setFIFOIP6; inline;
  13551. procedure setFIFOIP7; inline;
  13552. procedure setFIFOIP8; inline;
  13553. procedure setFIFOIP9; inline;
  13554. property FIFOIP : TBits_32 read getFIFOIP write setFIFOIP;
  13555. property FIFOIP0 : TBits_1 read getFIFOIP0 write setFIFOIP0;
  13556. property FIFOIP1 : TBits_1 read getFIFOIP1 write setFIFOIP1;
  13557. property FIFOIP10 : TBits_1 read getFIFOIP10 write setFIFOIP10;
  13558. property FIFOIP11 : TBits_1 read getFIFOIP11 write setFIFOIP11;
  13559. property FIFOIP12 : TBits_1 read getFIFOIP12 write setFIFOIP12;
  13560. property FIFOIP13 : TBits_1 read getFIFOIP13 write setFIFOIP13;
  13561. property FIFOIP14 : TBits_1 read getFIFOIP14 write setFIFOIP14;
  13562. property FIFOIP15 : TBits_1 read getFIFOIP15 write setFIFOIP15;
  13563. property FIFOIP16 : TBits_1 read getFIFOIP16 write setFIFOIP16;
  13564. property FIFOIP17 : TBits_1 read getFIFOIP17 write setFIFOIP17;
  13565. property FIFOIP18 : TBits_1 read getFIFOIP18 write setFIFOIP18;
  13566. property FIFOIP19 : TBits_1 read getFIFOIP19 write setFIFOIP19;
  13567. property FIFOIP2 : TBits_1 read getFIFOIP2 write setFIFOIP2;
  13568. property FIFOIP20 : TBits_1 read getFIFOIP20 write setFIFOIP20;
  13569. property FIFOIP21 : TBits_1 read getFIFOIP21 write setFIFOIP21;
  13570. property FIFOIP22 : TBits_1 read getFIFOIP22 write setFIFOIP22;
  13571. property FIFOIP23 : TBits_1 read getFIFOIP23 write setFIFOIP23;
  13572. property FIFOIP24 : TBits_1 read getFIFOIP24 write setFIFOIP24;
  13573. property FIFOIP25 : TBits_1 read getFIFOIP25 write setFIFOIP25;
  13574. property FIFOIP26 : TBits_1 read getFIFOIP26 write setFIFOIP26;
  13575. property FIFOIP27 : TBits_1 read getFIFOIP27 write setFIFOIP27;
  13576. property FIFOIP28 : TBits_1 read getFIFOIP28 write setFIFOIP28;
  13577. property FIFOIP29 : TBits_1 read getFIFOIP29 write setFIFOIP29;
  13578. property FIFOIP3 : TBits_1 read getFIFOIP3 write setFIFOIP3;
  13579. property FIFOIP30 : TBits_1 read getFIFOIP30 write setFIFOIP30;
  13580. property FIFOIP31 : TBits_1 read getFIFOIP31 write setFIFOIP31;
  13581. property FIFOIP4 : TBits_1 read getFIFOIP4 write setFIFOIP4;
  13582. property FIFOIP5 : TBits_1 read getFIFOIP5 write setFIFOIP5;
  13583. property FIFOIP6 : TBits_1 read getFIFOIP6 write setFIFOIP6;
  13584. property FIFOIP7 : TBits_1 read getFIFOIP7 write setFIFOIP7;
  13585. property FIFOIP8 : TBits_1 read getFIFOIP8 write setFIFOIP8;
  13586. property FIFOIP9 : TBits_1 read getFIFOIP9 write setFIFOIP9;
  13587. property w : TBits_32 read getw write setw;
  13588. end;
  13589. TCAN1_C1RXOVF = record
  13590. private
  13591. function getRXOVF : TBits_32; inline;
  13592. function getRXOVF0 : TBits_1; inline;
  13593. function getRXOVF1 : TBits_1; inline;
  13594. function getRXOVF10 : TBits_1; inline;
  13595. function getRXOVF11 : TBits_1; inline;
  13596. function getRXOVF12 : TBits_1; inline;
  13597. function getRXOVF13 : TBits_1; inline;
  13598. function getRXOVF14 : TBits_1; inline;
  13599. function getRXOVF15 : TBits_1; inline;
  13600. function getRXOVF16 : TBits_1; inline;
  13601. function getRXOVF17 : TBits_1; inline;
  13602. function getRXOVF18 : TBits_1; inline;
  13603. function getRXOVF19 : TBits_1; inline;
  13604. function getRXOVF2 : TBits_1; inline;
  13605. function getRXOVF20 : TBits_1; inline;
  13606. function getRXOVF21 : TBits_1; inline;
  13607. function getRXOVF22 : TBits_1; inline;
  13608. function getRXOVF23 : TBits_1; inline;
  13609. function getRXOVF24 : TBits_1; inline;
  13610. function getRXOVF25 : TBits_1; inline;
  13611. function getRXOVF26 : TBits_1; inline;
  13612. function getRXOVF27 : TBits_1; inline;
  13613. function getRXOVF28 : TBits_1; inline;
  13614. function getRXOVF29 : TBits_1; inline;
  13615. function getRXOVF3 : TBits_1; inline;
  13616. function getRXOVF30 : TBits_1; inline;
  13617. function getRXOVF31 : TBits_1; inline;
  13618. function getRXOVF4 : TBits_1; inline;
  13619. function getRXOVF5 : TBits_1; inline;
  13620. function getRXOVF6 : TBits_1; inline;
  13621. function getRXOVF7 : TBits_1; inline;
  13622. function getRXOVF8 : TBits_1; inline;
  13623. function getRXOVF9 : TBits_1; inline;
  13624. function getw : TBits_32; inline;
  13625. procedure setRXOVF(thebits : TBits_32); inline;
  13626. procedure setRXOVF0(thebits : TBits_1); inline;
  13627. procedure setRXOVF1(thebits : TBits_1); inline;
  13628. procedure setRXOVF10(thebits : TBits_1); inline;
  13629. procedure setRXOVF11(thebits : TBits_1); inline;
  13630. procedure setRXOVF12(thebits : TBits_1); inline;
  13631. procedure setRXOVF13(thebits : TBits_1); inline;
  13632. procedure setRXOVF14(thebits : TBits_1); inline;
  13633. procedure setRXOVF15(thebits : TBits_1); inline;
  13634. procedure setRXOVF16(thebits : TBits_1); inline;
  13635. procedure setRXOVF17(thebits : TBits_1); inline;
  13636. procedure setRXOVF18(thebits : TBits_1); inline;
  13637. procedure setRXOVF19(thebits : TBits_1); inline;
  13638. procedure setRXOVF2(thebits : TBits_1); inline;
  13639. procedure setRXOVF20(thebits : TBits_1); inline;
  13640. procedure setRXOVF21(thebits : TBits_1); inline;
  13641. procedure setRXOVF22(thebits : TBits_1); inline;
  13642. procedure setRXOVF23(thebits : TBits_1); inline;
  13643. procedure setRXOVF24(thebits : TBits_1); inline;
  13644. procedure setRXOVF25(thebits : TBits_1); inline;
  13645. procedure setRXOVF26(thebits : TBits_1); inline;
  13646. procedure setRXOVF27(thebits : TBits_1); inline;
  13647. procedure setRXOVF28(thebits : TBits_1); inline;
  13648. procedure setRXOVF29(thebits : TBits_1); inline;
  13649. procedure setRXOVF3(thebits : TBits_1); inline;
  13650. procedure setRXOVF30(thebits : TBits_1); inline;
  13651. procedure setRXOVF31(thebits : TBits_1); inline;
  13652. procedure setRXOVF4(thebits : TBits_1); inline;
  13653. procedure setRXOVF5(thebits : TBits_1); inline;
  13654. procedure setRXOVF6(thebits : TBits_1); inline;
  13655. procedure setRXOVF7(thebits : TBits_1); inline;
  13656. procedure setRXOVF8(thebits : TBits_1); inline;
  13657. procedure setRXOVF9(thebits : TBits_1); inline;
  13658. procedure setw(thebits : TBits_32); inline;
  13659. public
  13660. procedure clearRXOVF0; inline;
  13661. procedure clearRXOVF10; inline;
  13662. procedure clearRXOVF11; inline;
  13663. procedure clearRXOVF12; inline;
  13664. procedure clearRXOVF13; inline;
  13665. procedure clearRXOVF14; inline;
  13666. procedure clearRXOVF15; inline;
  13667. procedure clearRXOVF16; inline;
  13668. procedure clearRXOVF17; inline;
  13669. procedure clearRXOVF18; inline;
  13670. procedure clearRXOVF19; inline;
  13671. procedure clearRXOVF1; inline;
  13672. procedure clearRXOVF20; inline;
  13673. procedure clearRXOVF21; inline;
  13674. procedure clearRXOVF22; inline;
  13675. procedure clearRXOVF23; inline;
  13676. procedure clearRXOVF24; inline;
  13677. procedure clearRXOVF25; inline;
  13678. procedure clearRXOVF26; inline;
  13679. procedure clearRXOVF27; inline;
  13680. procedure clearRXOVF28; inline;
  13681. procedure clearRXOVF29; inline;
  13682. procedure clearRXOVF2; inline;
  13683. procedure clearRXOVF30; inline;
  13684. procedure clearRXOVF31; inline;
  13685. procedure clearRXOVF3; inline;
  13686. procedure clearRXOVF4; inline;
  13687. procedure clearRXOVF5; inline;
  13688. procedure clearRXOVF6; inline;
  13689. procedure clearRXOVF7; inline;
  13690. procedure clearRXOVF8; inline;
  13691. procedure clearRXOVF9; inline;
  13692. procedure setRXOVF0; inline;
  13693. procedure setRXOVF10; inline;
  13694. procedure setRXOVF11; inline;
  13695. procedure setRXOVF12; inline;
  13696. procedure setRXOVF13; inline;
  13697. procedure setRXOVF14; inline;
  13698. procedure setRXOVF15; inline;
  13699. procedure setRXOVF16; inline;
  13700. procedure setRXOVF17; inline;
  13701. procedure setRXOVF18; inline;
  13702. procedure setRXOVF19; inline;
  13703. procedure setRXOVF1; inline;
  13704. procedure setRXOVF20; inline;
  13705. procedure setRXOVF21; inline;
  13706. procedure setRXOVF22; inline;
  13707. procedure setRXOVF23; inline;
  13708. procedure setRXOVF24; inline;
  13709. procedure setRXOVF25; inline;
  13710. procedure setRXOVF26; inline;
  13711. procedure setRXOVF27; inline;
  13712. procedure setRXOVF28; inline;
  13713. procedure setRXOVF29; inline;
  13714. procedure setRXOVF2; inline;
  13715. procedure setRXOVF30; inline;
  13716. procedure setRXOVF31; inline;
  13717. procedure setRXOVF3; inline;
  13718. procedure setRXOVF4; inline;
  13719. procedure setRXOVF5; inline;
  13720. procedure setRXOVF6; inline;
  13721. procedure setRXOVF7; inline;
  13722. procedure setRXOVF8; inline;
  13723. procedure setRXOVF9; inline;
  13724. property RXOVF : TBits_32 read getRXOVF write setRXOVF;
  13725. property RXOVF0 : TBits_1 read getRXOVF0 write setRXOVF0;
  13726. property RXOVF1 : TBits_1 read getRXOVF1 write setRXOVF1;
  13727. property RXOVF10 : TBits_1 read getRXOVF10 write setRXOVF10;
  13728. property RXOVF11 : TBits_1 read getRXOVF11 write setRXOVF11;
  13729. property RXOVF12 : TBits_1 read getRXOVF12 write setRXOVF12;
  13730. property RXOVF13 : TBits_1 read getRXOVF13 write setRXOVF13;
  13731. property RXOVF14 : TBits_1 read getRXOVF14 write setRXOVF14;
  13732. property RXOVF15 : TBits_1 read getRXOVF15 write setRXOVF15;
  13733. property RXOVF16 : TBits_1 read getRXOVF16 write setRXOVF16;
  13734. property RXOVF17 : TBits_1 read getRXOVF17 write setRXOVF17;
  13735. property RXOVF18 : TBits_1 read getRXOVF18 write setRXOVF18;
  13736. property RXOVF19 : TBits_1 read getRXOVF19 write setRXOVF19;
  13737. property RXOVF2 : TBits_1 read getRXOVF2 write setRXOVF2;
  13738. property RXOVF20 : TBits_1 read getRXOVF20 write setRXOVF20;
  13739. property RXOVF21 : TBits_1 read getRXOVF21 write setRXOVF21;
  13740. property RXOVF22 : TBits_1 read getRXOVF22 write setRXOVF22;
  13741. property RXOVF23 : TBits_1 read getRXOVF23 write setRXOVF23;
  13742. property RXOVF24 : TBits_1 read getRXOVF24 write setRXOVF24;
  13743. property RXOVF25 : TBits_1 read getRXOVF25 write setRXOVF25;
  13744. property RXOVF26 : TBits_1 read getRXOVF26 write setRXOVF26;
  13745. property RXOVF27 : TBits_1 read getRXOVF27 write setRXOVF27;
  13746. property RXOVF28 : TBits_1 read getRXOVF28 write setRXOVF28;
  13747. property RXOVF29 : TBits_1 read getRXOVF29 write setRXOVF29;
  13748. property RXOVF3 : TBits_1 read getRXOVF3 write setRXOVF3;
  13749. property RXOVF30 : TBits_1 read getRXOVF30 write setRXOVF30;
  13750. property RXOVF31 : TBits_1 read getRXOVF31 write setRXOVF31;
  13751. property RXOVF4 : TBits_1 read getRXOVF4 write setRXOVF4;
  13752. property RXOVF5 : TBits_1 read getRXOVF5 write setRXOVF5;
  13753. property RXOVF6 : TBits_1 read getRXOVF6 write setRXOVF6;
  13754. property RXOVF7 : TBits_1 read getRXOVF7 write setRXOVF7;
  13755. property RXOVF8 : TBits_1 read getRXOVF8 write setRXOVF8;
  13756. property RXOVF9 : TBits_1 read getRXOVF9 write setRXOVF9;
  13757. property w : TBits_32 read getw write setw;
  13758. end;
  13759. TCAN1_C1TMR = record
  13760. private
  13761. function getCANTS : TBits_16; inline;
  13762. function getCANTSPRE : TBits_16; inline;
  13763. function getw : TBits_32; inline;
  13764. procedure setCANTS(thebits : TBits_16); inline;
  13765. procedure setCANTSPRE(thebits : TBits_16); inline;
  13766. procedure setw(thebits : TBits_32); inline;
  13767. public
  13768. property CANTS : TBits_16 read getCANTS write setCANTS;
  13769. property CANTSPRE : TBits_16 read getCANTSPRE write setCANTSPRE;
  13770. property w : TBits_32 read getw write setw;
  13771. end;
  13772. TCAN1_C1RXM0 = record
  13773. private
  13774. function getEID : TBits_18; inline;
  13775. function getMIDE : TBits_1; inline;
  13776. function getSID : TBits_11; inline;
  13777. function getw : TBits_32; inline;
  13778. procedure setEID(thebits : TBits_18); inline;
  13779. procedure setMIDE(thebits : TBits_1); inline;
  13780. procedure setSID(thebits : TBits_11); inline;
  13781. procedure setw(thebits : TBits_32); inline;
  13782. public
  13783. procedure clearMIDE; inline;
  13784. procedure setMIDE; inline;
  13785. property EID : TBits_18 read getEID write setEID;
  13786. property MIDE : TBits_1 read getMIDE write setMIDE;
  13787. property SID : TBits_11 read getSID write setSID;
  13788. property w : TBits_32 read getw write setw;
  13789. end;
  13790. TCAN1_C1RXM1 = record
  13791. private
  13792. function getEID : TBits_18; inline;
  13793. function getMIDE : TBits_1; inline;
  13794. function getSID : TBits_11; inline;
  13795. function getw : TBits_32; inline;
  13796. procedure setEID(thebits : TBits_18); inline;
  13797. procedure setMIDE(thebits : TBits_1); inline;
  13798. procedure setSID(thebits : TBits_11); inline;
  13799. procedure setw(thebits : TBits_32); inline;
  13800. public
  13801. procedure clearMIDE; inline;
  13802. procedure setMIDE; inline;
  13803. property EID : TBits_18 read getEID write setEID;
  13804. property MIDE : TBits_1 read getMIDE write setMIDE;
  13805. property SID : TBits_11 read getSID write setSID;
  13806. property w : TBits_32 read getw write setw;
  13807. end;
  13808. TCAN1_C1RXM2 = record
  13809. private
  13810. function getEID : TBits_18; inline;
  13811. function getMIDE : TBits_1; inline;
  13812. function getSID : TBits_11; inline;
  13813. function getw : TBits_32; inline;
  13814. procedure setEID(thebits : TBits_18); inline;
  13815. procedure setMIDE(thebits : TBits_1); inline;
  13816. procedure setSID(thebits : TBits_11); inline;
  13817. procedure setw(thebits : TBits_32); inline;
  13818. public
  13819. procedure clearMIDE; inline;
  13820. procedure setMIDE; inline;
  13821. property EID : TBits_18 read getEID write setEID;
  13822. property MIDE : TBits_1 read getMIDE write setMIDE;
  13823. property SID : TBits_11 read getSID write setSID;
  13824. property w : TBits_32 read getw write setw;
  13825. end;
  13826. TCAN1_C1RXM3 = record
  13827. private
  13828. function getEID : TBits_18; inline;
  13829. function getMIDE : TBits_1; inline;
  13830. function getSID : TBits_11; inline;
  13831. function getw : TBits_32; inline;
  13832. procedure setEID(thebits : TBits_18); inline;
  13833. procedure setMIDE(thebits : TBits_1); inline;
  13834. procedure setSID(thebits : TBits_11); inline;
  13835. procedure setw(thebits : TBits_32); inline;
  13836. public
  13837. procedure clearMIDE; inline;
  13838. procedure setMIDE; inline;
  13839. property EID : TBits_18 read getEID write setEID;
  13840. property MIDE : TBits_1 read getMIDE write setMIDE;
  13841. property SID : TBits_11 read getSID write setSID;
  13842. property w : TBits_32 read getw write setw;
  13843. end;
  13844. TCAN1_C1FLTCON0 = record
  13845. private
  13846. function getFLTEN0 : TBits_1; inline;
  13847. function getFLTEN1 : TBits_1; inline;
  13848. function getFLTEN2 : TBits_1; inline;
  13849. function getFLTEN3 : TBits_1; inline;
  13850. function getFSEL0 : TBits_5; inline;
  13851. function getFSEL1 : TBits_5; inline;
  13852. function getFSEL2 : TBits_5; inline;
  13853. function getFSEL3 : TBits_5; inline;
  13854. function getMSEL0 : TBits_2; inline;
  13855. function getMSEL1 : TBits_2; inline;
  13856. function getMSEL2 : TBits_2; inline;
  13857. function getMSEL3 : TBits_2; inline;
  13858. function getw : TBits_32; inline;
  13859. procedure setFLTEN0(thebits : TBits_1); inline;
  13860. procedure setFLTEN1(thebits : TBits_1); inline;
  13861. procedure setFLTEN2(thebits : TBits_1); inline;
  13862. procedure setFLTEN3(thebits : TBits_1); inline;
  13863. procedure setFSEL0(thebits : TBits_5); inline;
  13864. procedure setFSEL1(thebits : TBits_5); inline;
  13865. procedure setFSEL2(thebits : TBits_5); inline;
  13866. procedure setFSEL3(thebits : TBits_5); inline;
  13867. procedure setMSEL0(thebits : TBits_2); inline;
  13868. procedure setMSEL1(thebits : TBits_2); inline;
  13869. procedure setMSEL2(thebits : TBits_2); inline;
  13870. procedure setMSEL3(thebits : TBits_2); inline;
  13871. procedure setw(thebits : TBits_32); inline;
  13872. public
  13873. procedure clearFLTEN0; inline;
  13874. procedure clearFLTEN1; inline;
  13875. procedure clearFLTEN2; inline;
  13876. procedure clearFLTEN3; inline;
  13877. procedure setFLTEN0; inline;
  13878. procedure setFLTEN1; inline;
  13879. procedure setFLTEN2; inline;
  13880. procedure setFLTEN3; inline;
  13881. property FLTEN0 : TBits_1 read getFLTEN0 write setFLTEN0;
  13882. property FLTEN1 : TBits_1 read getFLTEN1 write setFLTEN1;
  13883. property FLTEN2 : TBits_1 read getFLTEN2 write setFLTEN2;
  13884. property FLTEN3 : TBits_1 read getFLTEN3 write setFLTEN3;
  13885. property FSEL0 : TBits_5 read getFSEL0 write setFSEL0;
  13886. property FSEL1 : TBits_5 read getFSEL1 write setFSEL1;
  13887. property FSEL2 : TBits_5 read getFSEL2 write setFSEL2;
  13888. property FSEL3 : TBits_5 read getFSEL3 write setFSEL3;
  13889. property MSEL0 : TBits_2 read getMSEL0 write setMSEL0;
  13890. property MSEL1 : TBits_2 read getMSEL1 write setMSEL1;
  13891. property MSEL2 : TBits_2 read getMSEL2 write setMSEL2;
  13892. property MSEL3 : TBits_2 read getMSEL3 write setMSEL3;
  13893. property w : TBits_32 read getw write setw;
  13894. end;
  13895. TCAN1_C1FLTCON1 = record
  13896. private
  13897. function getFLTEN4 : TBits_1; inline;
  13898. function getFLTEN5 : TBits_1; inline;
  13899. function getFLTEN6 : TBits_1; inline;
  13900. function getFLTEN7 : TBits_1; inline;
  13901. function getFSEL4 : TBits_5; inline;
  13902. function getFSEL5 : TBits_5; inline;
  13903. function getFSEL6 : TBits_5; inline;
  13904. function getFSEL7 : TBits_5; inline;
  13905. function getMSEL4 : TBits_2; inline;
  13906. function getMSEL5 : TBits_2; inline;
  13907. function getMSEL6 : TBits_2; inline;
  13908. function getMSEL7 : TBits_2; inline;
  13909. function getw : TBits_32; inline;
  13910. procedure setFLTEN4(thebits : TBits_1); inline;
  13911. procedure setFLTEN5(thebits : TBits_1); inline;
  13912. procedure setFLTEN6(thebits : TBits_1); inline;
  13913. procedure setFLTEN7(thebits : TBits_1); inline;
  13914. procedure setFSEL4(thebits : TBits_5); inline;
  13915. procedure setFSEL5(thebits : TBits_5); inline;
  13916. procedure setFSEL6(thebits : TBits_5); inline;
  13917. procedure setFSEL7(thebits : TBits_5); inline;
  13918. procedure setMSEL4(thebits : TBits_2); inline;
  13919. procedure setMSEL5(thebits : TBits_2); inline;
  13920. procedure setMSEL6(thebits : TBits_2); inline;
  13921. procedure setMSEL7(thebits : TBits_2); inline;
  13922. procedure setw(thebits : TBits_32); inline;
  13923. public
  13924. procedure clearFLTEN4; inline;
  13925. procedure clearFLTEN5; inline;
  13926. procedure clearFLTEN6; inline;
  13927. procedure clearFLTEN7; inline;
  13928. procedure setFLTEN4; inline;
  13929. procedure setFLTEN5; inline;
  13930. procedure setFLTEN6; inline;
  13931. procedure setFLTEN7; inline;
  13932. property FLTEN4 : TBits_1 read getFLTEN4 write setFLTEN4;
  13933. property FLTEN5 : TBits_1 read getFLTEN5 write setFLTEN5;
  13934. property FLTEN6 : TBits_1 read getFLTEN6 write setFLTEN6;
  13935. property FLTEN7 : TBits_1 read getFLTEN7 write setFLTEN7;
  13936. property FSEL4 : TBits_5 read getFSEL4 write setFSEL4;
  13937. property FSEL5 : TBits_5 read getFSEL5 write setFSEL5;
  13938. property FSEL6 : TBits_5 read getFSEL6 write setFSEL6;
  13939. property FSEL7 : TBits_5 read getFSEL7 write setFSEL7;
  13940. property MSEL4 : TBits_2 read getMSEL4 write setMSEL4;
  13941. property MSEL5 : TBits_2 read getMSEL5 write setMSEL5;
  13942. property MSEL6 : TBits_2 read getMSEL6 write setMSEL6;
  13943. property MSEL7 : TBits_2 read getMSEL7 write setMSEL7;
  13944. property w : TBits_32 read getw write setw;
  13945. end;
  13946. TCAN1_C1FLTCON2 = record
  13947. private
  13948. function getFLTEN10 : TBits_1; inline;
  13949. function getFLTEN11 : TBits_1; inline;
  13950. function getFLTEN8 : TBits_1; inline;
  13951. function getFLTEN9 : TBits_1; inline;
  13952. function getFSEL10 : TBits_5; inline;
  13953. function getFSEL11 : TBits_5; inline;
  13954. function getFSEL8 : TBits_5; inline;
  13955. function getFSEL9 : TBits_5; inline;
  13956. function getMSEL10 : TBits_2; inline;
  13957. function getMSEL11 : TBits_2; inline;
  13958. function getMSEL8 : TBits_2; inline;
  13959. function getMSEL9 : TBits_2; inline;
  13960. function getw : TBits_32; inline;
  13961. procedure setFLTEN10(thebits : TBits_1); inline;
  13962. procedure setFLTEN11(thebits : TBits_1); inline;
  13963. procedure setFLTEN8(thebits : TBits_1); inline;
  13964. procedure setFLTEN9(thebits : TBits_1); inline;
  13965. procedure setFSEL10(thebits : TBits_5); inline;
  13966. procedure setFSEL11(thebits : TBits_5); inline;
  13967. procedure setFSEL8(thebits : TBits_5); inline;
  13968. procedure setFSEL9(thebits : TBits_5); inline;
  13969. procedure setMSEL10(thebits : TBits_2); inline;
  13970. procedure setMSEL11(thebits : TBits_2); inline;
  13971. procedure setMSEL8(thebits : TBits_2); inline;
  13972. procedure setMSEL9(thebits : TBits_2); inline;
  13973. procedure setw(thebits : TBits_32); inline;
  13974. public
  13975. procedure clearFLTEN10; inline;
  13976. procedure clearFLTEN11; inline;
  13977. procedure clearFLTEN8; inline;
  13978. procedure clearFLTEN9; inline;
  13979. procedure setFLTEN10; inline;
  13980. procedure setFLTEN11; inline;
  13981. procedure setFLTEN8; inline;
  13982. procedure setFLTEN9; inline;
  13983. property FLTEN10 : TBits_1 read getFLTEN10 write setFLTEN10;
  13984. property FLTEN11 : TBits_1 read getFLTEN11 write setFLTEN11;
  13985. property FLTEN8 : TBits_1 read getFLTEN8 write setFLTEN8;
  13986. property FLTEN9 : TBits_1 read getFLTEN9 write setFLTEN9;
  13987. property FSEL10 : TBits_5 read getFSEL10 write setFSEL10;
  13988. property FSEL11 : TBits_5 read getFSEL11 write setFSEL11;
  13989. property FSEL8 : TBits_5 read getFSEL8 write setFSEL8;
  13990. property FSEL9 : TBits_5 read getFSEL9 write setFSEL9;
  13991. property MSEL10 : TBits_2 read getMSEL10 write setMSEL10;
  13992. property MSEL11 : TBits_2 read getMSEL11 write setMSEL11;
  13993. property MSEL8 : TBits_2 read getMSEL8 write setMSEL8;
  13994. property MSEL9 : TBits_2 read getMSEL9 write setMSEL9;
  13995. property w : TBits_32 read getw write setw;
  13996. end;
  13997. TCAN1_C1FLTCON3 = record
  13998. private
  13999. function getFLTEN12 : TBits_1; inline;
  14000. function getFLTEN13 : TBits_1; inline;
  14001. function getFLTEN14 : TBits_1; inline;
  14002. function getFLTEN15 : TBits_1; inline;
  14003. function getFSEL12 : TBits_5; inline;
  14004. function getFSEL13 : TBits_5; inline;
  14005. function getFSEL14 : TBits_5; inline;
  14006. function getFSEL15 : TBits_5; inline;
  14007. function getMSEL12 : TBits_2; inline;
  14008. function getMSEL13 : TBits_2; inline;
  14009. function getMSEL14 : TBits_2; inline;
  14010. function getMSEL15 : TBits_2; inline;
  14011. function getw : TBits_32; inline;
  14012. procedure setFLTEN12(thebits : TBits_1); inline;
  14013. procedure setFLTEN13(thebits : TBits_1); inline;
  14014. procedure setFLTEN14(thebits : TBits_1); inline;
  14015. procedure setFLTEN15(thebits : TBits_1); inline;
  14016. procedure setFSEL12(thebits : TBits_5); inline;
  14017. procedure setFSEL13(thebits : TBits_5); inline;
  14018. procedure setFSEL14(thebits : TBits_5); inline;
  14019. procedure setFSEL15(thebits : TBits_5); inline;
  14020. procedure setMSEL12(thebits : TBits_2); inline;
  14021. procedure setMSEL13(thebits : TBits_2); inline;
  14022. procedure setMSEL14(thebits : TBits_2); inline;
  14023. procedure setMSEL15(thebits : TBits_2); inline;
  14024. procedure setw(thebits : TBits_32); inline;
  14025. public
  14026. procedure clearFLTEN12; inline;
  14027. procedure clearFLTEN13; inline;
  14028. procedure clearFLTEN14; inline;
  14029. procedure clearFLTEN15; inline;
  14030. procedure setFLTEN12; inline;
  14031. procedure setFLTEN13; inline;
  14032. procedure setFLTEN14; inline;
  14033. procedure setFLTEN15; inline;
  14034. property FLTEN12 : TBits_1 read getFLTEN12 write setFLTEN12;
  14035. property FLTEN13 : TBits_1 read getFLTEN13 write setFLTEN13;
  14036. property FLTEN14 : TBits_1 read getFLTEN14 write setFLTEN14;
  14037. property FLTEN15 : TBits_1 read getFLTEN15 write setFLTEN15;
  14038. property FSEL12 : TBits_5 read getFSEL12 write setFSEL12;
  14039. property FSEL13 : TBits_5 read getFSEL13 write setFSEL13;
  14040. property FSEL14 : TBits_5 read getFSEL14 write setFSEL14;
  14041. property FSEL15 : TBits_5 read getFSEL15 write setFSEL15;
  14042. property MSEL12 : TBits_2 read getMSEL12 write setMSEL12;
  14043. property MSEL13 : TBits_2 read getMSEL13 write setMSEL13;
  14044. property MSEL14 : TBits_2 read getMSEL14 write setMSEL14;
  14045. property MSEL15 : TBits_2 read getMSEL15 write setMSEL15;
  14046. property w : TBits_32 read getw write setw;
  14047. end;
  14048. TCAN1_C1FLTCON4 = record
  14049. private
  14050. function getFLTEN16 : TBits_1; inline;
  14051. function getFLTEN17 : TBits_1; inline;
  14052. function getFLTEN18 : TBits_1; inline;
  14053. function getFLTEN19 : TBits_1; inline;
  14054. function getFSEL16 : TBits_5; inline;
  14055. function getFSEL17 : TBits_5; inline;
  14056. function getFSEL18 : TBits_5; inline;
  14057. function getFSEL19 : TBits_5; inline;
  14058. function getMSEL16 : TBits_2; inline;
  14059. function getMSEL17 : TBits_2; inline;
  14060. function getMSEL18 : TBits_2; inline;
  14061. function getMSEL19 : TBits_2; inline;
  14062. function getw : TBits_32; inline;
  14063. procedure setFLTEN16(thebits : TBits_1); inline;
  14064. procedure setFLTEN17(thebits : TBits_1); inline;
  14065. procedure setFLTEN18(thebits : TBits_1); inline;
  14066. procedure setFLTEN19(thebits : TBits_1); inline;
  14067. procedure setFSEL16(thebits : TBits_5); inline;
  14068. procedure setFSEL17(thebits : TBits_5); inline;
  14069. procedure setFSEL18(thebits : TBits_5); inline;
  14070. procedure setFSEL19(thebits : TBits_5); inline;
  14071. procedure setMSEL16(thebits : TBits_2); inline;
  14072. procedure setMSEL17(thebits : TBits_2); inline;
  14073. procedure setMSEL18(thebits : TBits_2); inline;
  14074. procedure setMSEL19(thebits : TBits_2); inline;
  14075. procedure setw(thebits : TBits_32); inline;
  14076. public
  14077. procedure clearFLTEN16; inline;
  14078. procedure clearFLTEN17; inline;
  14079. procedure clearFLTEN18; inline;
  14080. procedure clearFLTEN19; inline;
  14081. procedure setFLTEN16; inline;
  14082. procedure setFLTEN17; inline;
  14083. procedure setFLTEN18; inline;
  14084. procedure setFLTEN19; inline;
  14085. property FLTEN16 : TBits_1 read getFLTEN16 write setFLTEN16;
  14086. property FLTEN17 : TBits_1 read getFLTEN17 write setFLTEN17;
  14087. property FLTEN18 : TBits_1 read getFLTEN18 write setFLTEN18;
  14088. property FLTEN19 : TBits_1 read getFLTEN19 write setFLTEN19;
  14089. property FSEL16 : TBits_5 read getFSEL16 write setFSEL16;
  14090. property FSEL17 : TBits_5 read getFSEL17 write setFSEL17;
  14091. property FSEL18 : TBits_5 read getFSEL18 write setFSEL18;
  14092. property FSEL19 : TBits_5 read getFSEL19 write setFSEL19;
  14093. property MSEL16 : TBits_2 read getMSEL16 write setMSEL16;
  14094. property MSEL17 : TBits_2 read getMSEL17 write setMSEL17;
  14095. property MSEL18 : TBits_2 read getMSEL18 write setMSEL18;
  14096. property MSEL19 : TBits_2 read getMSEL19 write setMSEL19;
  14097. property w : TBits_32 read getw write setw;
  14098. end;
  14099. TCAN1_C1FLTCON5 = record
  14100. private
  14101. function getFLTEN20 : TBits_1; inline;
  14102. function getFLTEN21 : TBits_1; inline;
  14103. function getFLTEN22 : TBits_1; inline;
  14104. function getFLTEN23 : TBits_1; inline;
  14105. function getFSEL20 : TBits_5; inline;
  14106. function getFSEL21 : TBits_5; inline;
  14107. function getFSEL22 : TBits_5; inline;
  14108. function getFSEL23 : TBits_5; inline;
  14109. function getMSEL20 : TBits_2; inline;
  14110. function getMSEL21 : TBits_2; inline;
  14111. function getMSEL22 : TBits_2; inline;
  14112. function getMSEL23 : TBits_2; inline;
  14113. function getw : TBits_32; inline;
  14114. procedure setFLTEN20(thebits : TBits_1); inline;
  14115. procedure setFLTEN21(thebits : TBits_1); inline;
  14116. procedure setFLTEN22(thebits : TBits_1); inline;
  14117. procedure setFLTEN23(thebits : TBits_1); inline;
  14118. procedure setFSEL20(thebits : TBits_5); inline;
  14119. procedure setFSEL21(thebits : TBits_5); inline;
  14120. procedure setFSEL22(thebits : TBits_5); inline;
  14121. procedure setFSEL23(thebits : TBits_5); inline;
  14122. procedure setMSEL20(thebits : TBits_2); inline;
  14123. procedure setMSEL21(thebits : TBits_2); inline;
  14124. procedure setMSEL22(thebits : TBits_2); inline;
  14125. procedure setMSEL23(thebits : TBits_2); inline;
  14126. procedure setw(thebits : TBits_32); inline;
  14127. public
  14128. procedure clearFLTEN20; inline;
  14129. procedure clearFLTEN21; inline;
  14130. procedure clearFLTEN22; inline;
  14131. procedure clearFLTEN23; inline;
  14132. procedure setFLTEN20; inline;
  14133. procedure setFLTEN21; inline;
  14134. procedure setFLTEN22; inline;
  14135. procedure setFLTEN23; inline;
  14136. property FLTEN20 : TBits_1 read getFLTEN20 write setFLTEN20;
  14137. property FLTEN21 : TBits_1 read getFLTEN21 write setFLTEN21;
  14138. property FLTEN22 : TBits_1 read getFLTEN22 write setFLTEN22;
  14139. property FLTEN23 : TBits_1 read getFLTEN23 write setFLTEN23;
  14140. property FSEL20 : TBits_5 read getFSEL20 write setFSEL20;
  14141. property FSEL21 : TBits_5 read getFSEL21 write setFSEL21;
  14142. property FSEL22 : TBits_5 read getFSEL22 write setFSEL22;
  14143. property FSEL23 : TBits_5 read getFSEL23 write setFSEL23;
  14144. property MSEL20 : TBits_2 read getMSEL20 write setMSEL20;
  14145. property MSEL21 : TBits_2 read getMSEL21 write setMSEL21;
  14146. property MSEL22 : TBits_2 read getMSEL22 write setMSEL22;
  14147. property MSEL23 : TBits_2 read getMSEL23 write setMSEL23;
  14148. property w : TBits_32 read getw write setw;
  14149. end;
  14150. TCAN1_C1FLTCON6 = record
  14151. private
  14152. function getFLTEN24 : TBits_1; inline;
  14153. function getFLTEN25 : TBits_1; inline;
  14154. function getFLTEN26 : TBits_1; inline;
  14155. function getFLTEN27 : TBits_1; inline;
  14156. function getFSEL24 : TBits_5; inline;
  14157. function getFSEL25 : TBits_5; inline;
  14158. function getFSEL26 : TBits_5; inline;
  14159. function getFSEL27 : TBits_5; inline;
  14160. function getMSEL24 : TBits_2; inline;
  14161. function getMSEL25 : TBits_2; inline;
  14162. function getMSEL26 : TBits_2; inline;
  14163. function getMSEL27 : TBits_2; inline;
  14164. function getw : TBits_32; inline;
  14165. procedure setFLTEN24(thebits : TBits_1); inline;
  14166. procedure setFLTEN25(thebits : TBits_1); inline;
  14167. procedure setFLTEN26(thebits : TBits_1); inline;
  14168. procedure setFLTEN27(thebits : TBits_1); inline;
  14169. procedure setFSEL24(thebits : TBits_5); inline;
  14170. procedure setFSEL25(thebits : TBits_5); inline;
  14171. procedure setFSEL26(thebits : TBits_5); inline;
  14172. procedure setFSEL27(thebits : TBits_5); inline;
  14173. procedure setMSEL24(thebits : TBits_2); inline;
  14174. procedure setMSEL25(thebits : TBits_2); inline;
  14175. procedure setMSEL26(thebits : TBits_2); inline;
  14176. procedure setMSEL27(thebits : TBits_2); inline;
  14177. procedure setw(thebits : TBits_32); inline;
  14178. public
  14179. procedure clearFLTEN24; inline;
  14180. procedure clearFLTEN25; inline;
  14181. procedure clearFLTEN26; inline;
  14182. procedure clearFLTEN27; inline;
  14183. procedure setFLTEN24; inline;
  14184. procedure setFLTEN25; inline;
  14185. procedure setFLTEN26; inline;
  14186. procedure setFLTEN27; inline;
  14187. property FLTEN24 : TBits_1 read getFLTEN24 write setFLTEN24;
  14188. property FLTEN25 : TBits_1 read getFLTEN25 write setFLTEN25;
  14189. property FLTEN26 : TBits_1 read getFLTEN26 write setFLTEN26;
  14190. property FLTEN27 : TBits_1 read getFLTEN27 write setFLTEN27;
  14191. property FSEL24 : TBits_5 read getFSEL24 write setFSEL24;
  14192. property FSEL25 : TBits_5 read getFSEL25 write setFSEL25;
  14193. property FSEL26 : TBits_5 read getFSEL26 write setFSEL26;
  14194. property FSEL27 : TBits_5 read getFSEL27 write setFSEL27;
  14195. property MSEL24 : TBits_2 read getMSEL24 write setMSEL24;
  14196. property MSEL25 : TBits_2 read getMSEL25 write setMSEL25;
  14197. property MSEL26 : TBits_2 read getMSEL26 write setMSEL26;
  14198. property MSEL27 : TBits_2 read getMSEL27 write setMSEL27;
  14199. property w : TBits_32 read getw write setw;
  14200. end;
  14201. TCAN1_C1FLTCON7 = record
  14202. private
  14203. function getFLTEN28 : TBits_1; inline;
  14204. function getFLTEN29 : TBits_1; inline;
  14205. function getFLTEN30 : TBits_1; inline;
  14206. function getFLTEN31 : TBits_1; inline;
  14207. function getFSEL28 : TBits_5; inline;
  14208. function getFSEL29 : TBits_5; inline;
  14209. function getFSEL30 : TBits_5; inline;
  14210. function getFSEL31 : TBits_5; inline;
  14211. function getMSEL28 : TBits_2; inline;
  14212. function getMSEL29 : TBits_2; inline;
  14213. function getMSEL30 : TBits_2; inline;
  14214. function getMSEL31 : TBits_2; inline;
  14215. function getw : TBits_32; inline;
  14216. procedure setFLTEN28(thebits : TBits_1); inline;
  14217. procedure setFLTEN29(thebits : TBits_1); inline;
  14218. procedure setFLTEN30(thebits : TBits_1); inline;
  14219. procedure setFLTEN31(thebits : TBits_1); inline;
  14220. procedure setFSEL28(thebits : TBits_5); inline;
  14221. procedure setFSEL29(thebits : TBits_5); inline;
  14222. procedure setFSEL30(thebits : TBits_5); inline;
  14223. procedure setFSEL31(thebits : TBits_5); inline;
  14224. procedure setMSEL28(thebits : TBits_2); inline;
  14225. procedure setMSEL29(thebits : TBits_2); inline;
  14226. procedure setMSEL30(thebits : TBits_2); inline;
  14227. procedure setMSEL31(thebits : TBits_2); inline;
  14228. procedure setw(thebits : TBits_32); inline;
  14229. public
  14230. procedure clearFLTEN28; inline;
  14231. procedure clearFLTEN29; inline;
  14232. procedure clearFLTEN30; inline;
  14233. procedure clearFLTEN31; inline;
  14234. procedure setFLTEN28; inline;
  14235. procedure setFLTEN29; inline;
  14236. procedure setFLTEN30; inline;
  14237. procedure setFLTEN31; inline;
  14238. property FLTEN28 : TBits_1 read getFLTEN28 write setFLTEN28;
  14239. property FLTEN29 : TBits_1 read getFLTEN29 write setFLTEN29;
  14240. property FLTEN30 : TBits_1 read getFLTEN30 write setFLTEN30;
  14241. property FLTEN31 : TBits_1 read getFLTEN31 write setFLTEN31;
  14242. property FSEL28 : TBits_5 read getFSEL28 write setFSEL28;
  14243. property FSEL29 : TBits_5 read getFSEL29 write setFSEL29;
  14244. property FSEL30 : TBits_5 read getFSEL30 write setFSEL30;
  14245. property FSEL31 : TBits_5 read getFSEL31 write setFSEL31;
  14246. property MSEL28 : TBits_2 read getMSEL28 write setMSEL28;
  14247. property MSEL29 : TBits_2 read getMSEL29 write setMSEL29;
  14248. property MSEL30 : TBits_2 read getMSEL30 write setMSEL30;
  14249. property MSEL31 : TBits_2 read getMSEL31 write setMSEL31;
  14250. property w : TBits_32 read getw write setw;
  14251. end;
  14252. TCAN1_C1RXF0 = record
  14253. private
  14254. function getEID : TBits_18; inline;
  14255. function getEXID : TBits_1; inline;
  14256. function getSID : TBits_11; inline;
  14257. function getw : TBits_32; inline;
  14258. procedure setEID(thebits : TBits_18); inline;
  14259. procedure setEXID(thebits : TBits_1); inline;
  14260. procedure setSID(thebits : TBits_11); inline;
  14261. procedure setw(thebits : TBits_32); inline;
  14262. public
  14263. procedure clearEXID; inline;
  14264. procedure setEXID; inline;
  14265. property EID : TBits_18 read getEID write setEID;
  14266. property EXID : TBits_1 read getEXID write setEXID;
  14267. property SID : TBits_11 read getSID write setSID;
  14268. property w : TBits_32 read getw write setw;
  14269. end;
  14270. TCAN1_C1RXF1 = record
  14271. private
  14272. function getEID : TBits_18; inline;
  14273. function getEXID : TBits_1; inline;
  14274. function getSID : TBits_11; inline;
  14275. function getw : TBits_32; inline;
  14276. procedure setEID(thebits : TBits_18); inline;
  14277. procedure setEXID(thebits : TBits_1); inline;
  14278. procedure setSID(thebits : TBits_11); inline;
  14279. procedure setw(thebits : TBits_32); inline;
  14280. public
  14281. procedure clearEXID; inline;
  14282. procedure setEXID; inline;
  14283. property EID : TBits_18 read getEID write setEID;
  14284. property EXID : TBits_1 read getEXID write setEXID;
  14285. property SID : TBits_11 read getSID write setSID;
  14286. property w : TBits_32 read getw write setw;
  14287. end;
  14288. TCAN1_C1RXF2 = record
  14289. private
  14290. function getEID : TBits_18; inline;
  14291. function getEXID : TBits_1; inline;
  14292. function getSID : TBits_11; inline;
  14293. function getw : TBits_32; inline;
  14294. procedure setEID(thebits : TBits_18); inline;
  14295. procedure setEXID(thebits : TBits_1); inline;
  14296. procedure setSID(thebits : TBits_11); inline;
  14297. procedure setw(thebits : TBits_32); inline;
  14298. public
  14299. procedure clearEXID; inline;
  14300. procedure setEXID; inline;
  14301. property EID : TBits_18 read getEID write setEID;
  14302. property EXID : TBits_1 read getEXID write setEXID;
  14303. property SID : TBits_11 read getSID write setSID;
  14304. property w : TBits_32 read getw write setw;
  14305. end;
  14306. TCAN1_C1RXF3 = record
  14307. private
  14308. function getEID : TBits_18; inline;
  14309. function getEXID : TBits_1; inline;
  14310. function getSID : TBits_11; inline;
  14311. function getw : TBits_32; inline;
  14312. procedure setEID(thebits : TBits_18); inline;
  14313. procedure setEXID(thebits : TBits_1); inline;
  14314. procedure setSID(thebits : TBits_11); inline;
  14315. procedure setw(thebits : TBits_32); inline;
  14316. public
  14317. procedure clearEXID; inline;
  14318. procedure setEXID; inline;
  14319. property EID : TBits_18 read getEID write setEID;
  14320. property EXID : TBits_1 read getEXID write setEXID;
  14321. property SID : TBits_11 read getSID write setSID;
  14322. property w : TBits_32 read getw write setw;
  14323. end;
  14324. TCAN1_C1RXF4 = record
  14325. private
  14326. function getEID : TBits_18; inline;
  14327. function getEXID : TBits_1; inline;
  14328. function getSID : TBits_11; inline;
  14329. function getw : TBits_32; inline;
  14330. procedure setEID(thebits : TBits_18); inline;
  14331. procedure setEXID(thebits : TBits_1); inline;
  14332. procedure setSID(thebits : TBits_11); inline;
  14333. procedure setw(thebits : TBits_32); inline;
  14334. public
  14335. procedure clearEXID; inline;
  14336. procedure setEXID; inline;
  14337. property EID : TBits_18 read getEID write setEID;
  14338. property EXID : TBits_1 read getEXID write setEXID;
  14339. property SID : TBits_11 read getSID write setSID;
  14340. property w : TBits_32 read getw write setw;
  14341. end;
  14342. TCAN1_C1RXF5 = record
  14343. private
  14344. function getEID : TBits_18; inline;
  14345. function getEXID : TBits_1; inline;
  14346. function getSID : TBits_11; inline;
  14347. function getw : TBits_32; inline;
  14348. procedure setEID(thebits : TBits_18); inline;
  14349. procedure setEXID(thebits : TBits_1); inline;
  14350. procedure setSID(thebits : TBits_11); inline;
  14351. procedure setw(thebits : TBits_32); inline;
  14352. public
  14353. procedure clearEXID; inline;
  14354. procedure setEXID; inline;
  14355. property EID : TBits_18 read getEID write setEID;
  14356. property EXID : TBits_1 read getEXID write setEXID;
  14357. property SID : TBits_11 read getSID write setSID;
  14358. property w : TBits_32 read getw write setw;
  14359. end;
  14360. TCAN1_C1RXF6 = record
  14361. private
  14362. function getEID : TBits_18; inline;
  14363. function getEXID : TBits_1; inline;
  14364. function getSID : TBits_11; inline;
  14365. function getw : TBits_32; inline;
  14366. procedure setEID(thebits : TBits_18); inline;
  14367. procedure setEXID(thebits : TBits_1); inline;
  14368. procedure setSID(thebits : TBits_11); inline;
  14369. procedure setw(thebits : TBits_32); inline;
  14370. public
  14371. procedure clearEXID; inline;
  14372. procedure setEXID; inline;
  14373. property EID : TBits_18 read getEID write setEID;
  14374. property EXID : TBits_1 read getEXID write setEXID;
  14375. property SID : TBits_11 read getSID write setSID;
  14376. property w : TBits_32 read getw write setw;
  14377. end;
  14378. TCAN1_C1RXF7 = record
  14379. private
  14380. function getEID : TBits_18; inline;
  14381. function getEXID : TBits_1; inline;
  14382. function getSID : TBits_11; inline;
  14383. function getw : TBits_32; inline;
  14384. procedure setEID(thebits : TBits_18); inline;
  14385. procedure setEXID(thebits : TBits_1); inline;
  14386. procedure setSID(thebits : TBits_11); inline;
  14387. procedure setw(thebits : TBits_32); inline;
  14388. public
  14389. procedure clearEXID; inline;
  14390. procedure setEXID; inline;
  14391. property EID : TBits_18 read getEID write setEID;
  14392. property EXID : TBits_1 read getEXID write setEXID;
  14393. property SID : TBits_11 read getSID write setSID;
  14394. property w : TBits_32 read getw write setw;
  14395. end;
  14396. TCAN1_C1RXF8 = record
  14397. private
  14398. function getEID : TBits_18; inline;
  14399. function getEXID : TBits_1; inline;
  14400. function getSID : TBits_11; inline;
  14401. function getw : TBits_32; inline;
  14402. procedure setEID(thebits : TBits_18); inline;
  14403. procedure setEXID(thebits : TBits_1); inline;
  14404. procedure setSID(thebits : TBits_11); inline;
  14405. procedure setw(thebits : TBits_32); inline;
  14406. public
  14407. procedure clearEXID; inline;
  14408. procedure setEXID; inline;
  14409. property EID : TBits_18 read getEID write setEID;
  14410. property EXID : TBits_1 read getEXID write setEXID;
  14411. property SID : TBits_11 read getSID write setSID;
  14412. property w : TBits_32 read getw write setw;
  14413. end;
  14414. TCAN1_C1RXF9 = record
  14415. private
  14416. function getEID : TBits_18; inline;
  14417. function getEXID : TBits_1; inline;
  14418. function getSID : TBits_11; inline;
  14419. function getw : TBits_32; inline;
  14420. procedure setEID(thebits : TBits_18); inline;
  14421. procedure setEXID(thebits : TBits_1); inline;
  14422. procedure setSID(thebits : TBits_11); inline;
  14423. procedure setw(thebits : TBits_32); inline;
  14424. public
  14425. procedure clearEXID; inline;
  14426. procedure setEXID; inline;
  14427. property EID : TBits_18 read getEID write setEID;
  14428. property EXID : TBits_1 read getEXID write setEXID;
  14429. property SID : TBits_11 read getSID write setSID;
  14430. property w : TBits_32 read getw write setw;
  14431. end;
  14432. TCAN1_C1RXF10 = record
  14433. private
  14434. function getEID : TBits_18; inline;
  14435. function getEXID : TBits_1; inline;
  14436. function getSID : TBits_11; inline;
  14437. function getw : TBits_32; inline;
  14438. procedure setEID(thebits : TBits_18); inline;
  14439. procedure setEXID(thebits : TBits_1); inline;
  14440. procedure setSID(thebits : TBits_11); inline;
  14441. procedure setw(thebits : TBits_32); inline;
  14442. public
  14443. procedure clearEXID; inline;
  14444. procedure setEXID; inline;
  14445. property EID : TBits_18 read getEID write setEID;
  14446. property EXID : TBits_1 read getEXID write setEXID;
  14447. property SID : TBits_11 read getSID write setSID;
  14448. property w : TBits_32 read getw write setw;
  14449. end;
  14450. TCAN1_C1RXF11 = record
  14451. private
  14452. function getEID : TBits_18; inline;
  14453. function getEXID : TBits_1; inline;
  14454. function getSID : TBits_11; inline;
  14455. function getw : TBits_32; inline;
  14456. procedure setEID(thebits : TBits_18); inline;
  14457. procedure setEXID(thebits : TBits_1); inline;
  14458. procedure setSID(thebits : TBits_11); inline;
  14459. procedure setw(thebits : TBits_32); inline;
  14460. public
  14461. procedure clearEXID; inline;
  14462. procedure setEXID; inline;
  14463. property EID : TBits_18 read getEID write setEID;
  14464. property EXID : TBits_1 read getEXID write setEXID;
  14465. property SID : TBits_11 read getSID write setSID;
  14466. property w : TBits_32 read getw write setw;
  14467. end;
  14468. TCAN1_C1RXF12 = record
  14469. private
  14470. function getEID : TBits_18; inline;
  14471. function getEXID : TBits_1; inline;
  14472. function getSID : TBits_11; inline;
  14473. function getw : TBits_32; inline;
  14474. procedure setEID(thebits : TBits_18); inline;
  14475. procedure setEXID(thebits : TBits_1); inline;
  14476. procedure setSID(thebits : TBits_11); inline;
  14477. procedure setw(thebits : TBits_32); inline;
  14478. public
  14479. procedure clearEXID; inline;
  14480. procedure setEXID; inline;
  14481. property EID : TBits_18 read getEID write setEID;
  14482. property EXID : TBits_1 read getEXID write setEXID;
  14483. property SID : TBits_11 read getSID write setSID;
  14484. property w : TBits_32 read getw write setw;
  14485. end;
  14486. TCAN1_C1RXF13 = record
  14487. private
  14488. function getEID : TBits_18; inline;
  14489. function getEXID : TBits_1; inline;
  14490. function getSID : TBits_11; inline;
  14491. function getw : TBits_32; inline;
  14492. procedure setEID(thebits : TBits_18); inline;
  14493. procedure setEXID(thebits : TBits_1); inline;
  14494. procedure setSID(thebits : TBits_11); inline;
  14495. procedure setw(thebits : TBits_32); inline;
  14496. public
  14497. procedure clearEXID; inline;
  14498. procedure setEXID; inline;
  14499. property EID : TBits_18 read getEID write setEID;
  14500. property EXID : TBits_1 read getEXID write setEXID;
  14501. property SID : TBits_11 read getSID write setSID;
  14502. property w : TBits_32 read getw write setw;
  14503. end;
  14504. TCAN1_C1RXF14 = record
  14505. private
  14506. function getEID : TBits_18; inline;
  14507. function getEXID : TBits_1; inline;
  14508. function getSID : TBits_11; inline;
  14509. function getw : TBits_32; inline;
  14510. procedure setEID(thebits : TBits_18); inline;
  14511. procedure setEXID(thebits : TBits_1); inline;
  14512. procedure setSID(thebits : TBits_11); inline;
  14513. procedure setw(thebits : TBits_32); inline;
  14514. public
  14515. procedure clearEXID; inline;
  14516. procedure setEXID; inline;
  14517. property EID : TBits_18 read getEID write setEID;
  14518. property EXID : TBits_1 read getEXID write setEXID;
  14519. property SID : TBits_11 read getSID write setSID;
  14520. property w : TBits_32 read getw write setw;
  14521. end;
  14522. TCAN1_C1RXF15 = record
  14523. private
  14524. function getEID : TBits_18; inline;
  14525. function getEXID : TBits_1; inline;
  14526. function getSID : TBits_11; inline;
  14527. function getw : TBits_32; inline;
  14528. procedure setEID(thebits : TBits_18); inline;
  14529. procedure setEXID(thebits : TBits_1); inline;
  14530. procedure setSID(thebits : TBits_11); inline;
  14531. procedure setw(thebits : TBits_32); inline;
  14532. public
  14533. procedure clearEXID; inline;
  14534. procedure setEXID; inline;
  14535. property EID : TBits_18 read getEID write setEID;
  14536. property EXID : TBits_1 read getEXID write setEXID;
  14537. property SID : TBits_11 read getSID write setSID;
  14538. property w : TBits_32 read getw write setw;
  14539. end;
  14540. TCAN1_C1RXF16 = record
  14541. private
  14542. function getEID : TBits_18; inline;
  14543. function getEXID : TBits_1; inline;
  14544. function getSID : TBits_11; inline;
  14545. function getw : TBits_32; inline;
  14546. procedure setEID(thebits : TBits_18); inline;
  14547. procedure setEXID(thebits : TBits_1); inline;
  14548. procedure setSID(thebits : TBits_11); inline;
  14549. procedure setw(thebits : TBits_32); inline;
  14550. public
  14551. procedure clearEXID; inline;
  14552. procedure setEXID; inline;
  14553. property EID : TBits_18 read getEID write setEID;
  14554. property EXID : TBits_1 read getEXID write setEXID;
  14555. property SID : TBits_11 read getSID write setSID;
  14556. property w : TBits_32 read getw write setw;
  14557. end;
  14558. TCAN1_C1RXF17 = record
  14559. private
  14560. function getEID : TBits_18; inline;
  14561. function getEXID : TBits_1; inline;
  14562. function getSID : TBits_11; inline;
  14563. function getw : TBits_32; inline;
  14564. procedure setEID(thebits : TBits_18); inline;
  14565. procedure setEXID(thebits : TBits_1); inline;
  14566. procedure setSID(thebits : TBits_11); inline;
  14567. procedure setw(thebits : TBits_32); inline;
  14568. public
  14569. procedure clearEXID; inline;
  14570. procedure setEXID; inline;
  14571. property EID : TBits_18 read getEID write setEID;
  14572. property EXID : TBits_1 read getEXID write setEXID;
  14573. property SID : TBits_11 read getSID write setSID;
  14574. property w : TBits_32 read getw write setw;
  14575. end;
  14576. TCAN1_C1RXF18 = record
  14577. private
  14578. function getEID : TBits_18; inline;
  14579. function getEXID : TBits_1; inline;
  14580. function getSID : TBits_11; inline;
  14581. function getw : TBits_32; inline;
  14582. procedure setEID(thebits : TBits_18); inline;
  14583. procedure setEXID(thebits : TBits_1); inline;
  14584. procedure setSID(thebits : TBits_11); inline;
  14585. procedure setw(thebits : TBits_32); inline;
  14586. public
  14587. procedure clearEXID; inline;
  14588. procedure setEXID; inline;
  14589. property EID : TBits_18 read getEID write setEID;
  14590. property EXID : TBits_1 read getEXID write setEXID;
  14591. property SID : TBits_11 read getSID write setSID;
  14592. property w : TBits_32 read getw write setw;
  14593. end;
  14594. TCAN1_C1RXF19 = record
  14595. private
  14596. function getEID : TBits_18; inline;
  14597. function getEXID : TBits_1; inline;
  14598. function getSID : TBits_11; inline;
  14599. function getw : TBits_32; inline;
  14600. procedure setEID(thebits : TBits_18); inline;
  14601. procedure setEXID(thebits : TBits_1); inline;
  14602. procedure setSID(thebits : TBits_11); inline;
  14603. procedure setw(thebits : TBits_32); inline;
  14604. public
  14605. procedure clearEXID; inline;
  14606. procedure setEXID; inline;
  14607. property EID : TBits_18 read getEID write setEID;
  14608. property EXID : TBits_1 read getEXID write setEXID;
  14609. property SID : TBits_11 read getSID write setSID;
  14610. property w : TBits_32 read getw write setw;
  14611. end;
  14612. TCAN1_C1RXF20 = record
  14613. private
  14614. function getEID : TBits_18; inline;
  14615. function getEXID : TBits_1; inline;
  14616. function getSID : TBits_11; inline;
  14617. function getw : TBits_32; inline;
  14618. procedure setEID(thebits : TBits_18); inline;
  14619. procedure setEXID(thebits : TBits_1); inline;
  14620. procedure setSID(thebits : TBits_11); inline;
  14621. procedure setw(thebits : TBits_32); inline;
  14622. public
  14623. procedure clearEXID; inline;
  14624. procedure setEXID; inline;
  14625. property EID : TBits_18 read getEID write setEID;
  14626. property EXID : TBits_1 read getEXID write setEXID;
  14627. property SID : TBits_11 read getSID write setSID;
  14628. property w : TBits_32 read getw write setw;
  14629. end;
  14630. TCAN1_C1RXF21 = record
  14631. private
  14632. function getEID : TBits_18; inline;
  14633. function getEXID : TBits_1; inline;
  14634. function getSID : TBits_11; inline;
  14635. function getw : TBits_32; inline;
  14636. procedure setEID(thebits : TBits_18); inline;
  14637. procedure setEXID(thebits : TBits_1); inline;
  14638. procedure setSID(thebits : TBits_11); inline;
  14639. procedure setw(thebits : TBits_32); inline;
  14640. public
  14641. procedure clearEXID; inline;
  14642. procedure setEXID; inline;
  14643. property EID : TBits_18 read getEID write setEID;
  14644. property EXID : TBits_1 read getEXID write setEXID;
  14645. property SID : TBits_11 read getSID write setSID;
  14646. property w : TBits_32 read getw write setw;
  14647. end;
  14648. TCAN1_C1RXF22 = record
  14649. private
  14650. function getEID : TBits_18; inline;
  14651. function getEXID : TBits_1; inline;
  14652. function getSID : TBits_11; inline;
  14653. function getw : TBits_32; inline;
  14654. procedure setEID(thebits : TBits_18); inline;
  14655. procedure setEXID(thebits : TBits_1); inline;
  14656. procedure setSID(thebits : TBits_11); inline;
  14657. procedure setw(thebits : TBits_32); inline;
  14658. public
  14659. procedure clearEXID; inline;
  14660. procedure setEXID; inline;
  14661. property EID : TBits_18 read getEID write setEID;
  14662. property EXID : TBits_1 read getEXID write setEXID;
  14663. property SID : TBits_11 read getSID write setSID;
  14664. property w : TBits_32 read getw write setw;
  14665. end;
  14666. TCAN1_C1RXF23 = record
  14667. private
  14668. function getEID : TBits_18; inline;
  14669. function getEXID : TBits_1; inline;
  14670. function getSID : TBits_11; inline;
  14671. function getw : TBits_32; inline;
  14672. procedure setEID(thebits : TBits_18); inline;
  14673. procedure setEXID(thebits : TBits_1); inline;
  14674. procedure setSID(thebits : TBits_11); inline;
  14675. procedure setw(thebits : TBits_32); inline;
  14676. public
  14677. procedure clearEXID; inline;
  14678. procedure setEXID; inline;
  14679. property EID : TBits_18 read getEID write setEID;
  14680. property EXID : TBits_1 read getEXID write setEXID;
  14681. property SID : TBits_11 read getSID write setSID;
  14682. property w : TBits_32 read getw write setw;
  14683. end;
  14684. TCAN1_C1RXF24 = record
  14685. private
  14686. function getEID : TBits_18; inline;
  14687. function getEXID : TBits_1; inline;
  14688. function getSID : TBits_11; inline;
  14689. function getw : TBits_32; inline;
  14690. procedure setEID(thebits : TBits_18); inline;
  14691. procedure setEXID(thebits : TBits_1); inline;
  14692. procedure setSID(thebits : TBits_11); inline;
  14693. procedure setw(thebits : TBits_32); inline;
  14694. public
  14695. procedure clearEXID; inline;
  14696. procedure setEXID; inline;
  14697. property EID : TBits_18 read getEID write setEID;
  14698. property EXID : TBits_1 read getEXID write setEXID;
  14699. property SID : TBits_11 read getSID write setSID;
  14700. property w : TBits_32 read getw write setw;
  14701. end;
  14702. TCAN1_C1RXF25 = record
  14703. private
  14704. function getEID : TBits_18; inline;
  14705. function getEXID : TBits_1; inline;
  14706. function getSID : TBits_11; inline;
  14707. function getw : TBits_32; inline;
  14708. procedure setEID(thebits : TBits_18); inline;
  14709. procedure setEXID(thebits : TBits_1); inline;
  14710. procedure setSID(thebits : TBits_11); inline;
  14711. procedure setw(thebits : TBits_32); inline;
  14712. public
  14713. procedure clearEXID; inline;
  14714. procedure setEXID; inline;
  14715. property EID : TBits_18 read getEID write setEID;
  14716. property EXID : TBits_1 read getEXID write setEXID;
  14717. property SID : TBits_11 read getSID write setSID;
  14718. property w : TBits_32 read getw write setw;
  14719. end;
  14720. TCAN1_C1RXF26 = record
  14721. private
  14722. function getEID : TBits_18; inline;
  14723. function getEXID : TBits_1; inline;
  14724. function getSID : TBits_11; inline;
  14725. function getw : TBits_32; inline;
  14726. procedure setEID(thebits : TBits_18); inline;
  14727. procedure setEXID(thebits : TBits_1); inline;
  14728. procedure setSID(thebits : TBits_11); inline;
  14729. procedure setw(thebits : TBits_32); inline;
  14730. public
  14731. procedure clearEXID; inline;
  14732. procedure setEXID; inline;
  14733. property EID : TBits_18 read getEID write setEID;
  14734. property EXID : TBits_1 read getEXID write setEXID;
  14735. property SID : TBits_11 read getSID write setSID;
  14736. property w : TBits_32 read getw write setw;
  14737. end;
  14738. TCAN1_C1RXF27 = record
  14739. private
  14740. function getEID : TBits_18; inline;
  14741. function getEXID : TBits_1; inline;
  14742. function getSID : TBits_11; inline;
  14743. function getw : TBits_32; inline;
  14744. procedure setEID(thebits : TBits_18); inline;
  14745. procedure setEXID(thebits : TBits_1); inline;
  14746. procedure setSID(thebits : TBits_11); inline;
  14747. procedure setw(thebits : TBits_32); inline;
  14748. public
  14749. procedure clearEXID; inline;
  14750. procedure setEXID; inline;
  14751. property EID : TBits_18 read getEID write setEID;
  14752. property EXID : TBits_1 read getEXID write setEXID;
  14753. property SID : TBits_11 read getSID write setSID;
  14754. property w : TBits_32 read getw write setw;
  14755. end;
  14756. TCAN1_C1RXF28 = record
  14757. private
  14758. function getEID : TBits_18; inline;
  14759. function getEXID : TBits_1; inline;
  14760. function getSID : TBits_11; inline;
  14761. function getw : TBits_32; inline;
  14762. procedure setEID(thebits : TBits_18); inline;
  14763. procedure setEXID(thebits : TBits_1); inline;
  14764. procedure setSID(thebits : TBits_11); inline;
  14765. procedure setw(thebits : TBits_32); inline;
  14766. public
  14767. procedure clearEXID; inline;
  14768. procedure setEXID; inline;
  14769. property EID : TBits_18 read getEID write setEID;
  14770. property EXID : TBits_1 read getEXID write setEXID;
  14771. property SID : TBits_11 read getSID write setSID;
  14772. property w : TBits_32 read getw write setw;
  14773. end;
  14774. TCAN1_C1RXF29 = record
  14775. private
  14776. function getEID : TBits_18; inline;
  14777. function getEXID : TBits_1; inline;
  14778. function getSID : TBits_11; inline;
  14779. function getw : TBits_32; inline;
  14780. procedure setEID(thebits : TBits_18); inline;
  14781. procedure setEXID(thebits : TBits_1); inline;
  14782. procedure setSID(thebits : TBits_11); inline;
  14783. procedure setw(thebits : TBits_32); inline;
  14784. public
  14785. procedure clearEXID; inline;
  14786. procedure setEXID; inline;
  14787. property EID : TBits_18 read getEID write setEID;
  14788. property EXID : TBits_1 read getEXID write setEXID;
  14789. property SID : TBits_11 read getSID write setSID;
  14790. property w : TBits_32 read getw write setw;
  14791. end;
  14792. TCAN1_C1RXF30 = record
  14793. private
  14794. function getEID : TBits_18; inline;
  14795. function getEXID : TBits_1; inline;
  14796. function getSID : TBits_11; inline;
  14797. function getw : TBits_32; inline;
  14798. procedure setEID(thebits : TBits_18); inline;
  14799. procedure setEXID(thebits : TBits_1); inline;
  14800. procedure setSID(thebits : TBits_11); inline;
  14801. procedure setw(thebits : TBits_32); inline;
  14802. public
  14803. procedure clearEXID; inline;
  14804. procedure setEXID; inline;
  14805. property EID : TBits_18 read getEID write setEID;
  14806. property EXID : TBits_1 read getEXID write setEXID;
  14807. property SID : TBits_11 read getSID write setSID;
  14808. property w : TBits_32 read getw write setw;
  14809. end;
  14810. TCAN1_C1RXF31 = record
  14811. private
  14812. function getEID : TBits_18; inline;
  14813. function getEXID : TBits_1; inline;
  14814. function getSID : TBits_11; inline;
  14815. function getw : TBits_32; inline;
  14816. procedure setEID(thebits : TBits_18); inline;
  14817. procedure setEXID(thebits : TBits_1); inline;
  14818. procedure setSID(thebits : TBits_11); inline;
  14819. procedure setw(thebits : TBits_32); inline;
  14820. public
  14821. procedure clearEXID; inline;
  14822. procedure setEXID; inline;
  14823. property EID : TBits_18 read getEID write setEID;
  14824. property EXID : TBits_1 read getEXID write setEXID;
  14825. property SID : TBits_11 read getSID write setSID;
  14826. property w : TBits_32 read getw write setw;
  14827. end;
  14828. TCAN1_C1FIFOCON0 = record
  14829. private
  14830. function getDONLY : TBits_1; inline;
  14831. function getFRESET : TBits_1; inline;
  14832. function getFSIZE : TBits_5; inline;
  14833. function getRTREN : TBits_1; inline;
  14834. function getTXABAT : TBits_1; inline;
  14835. function getTXEN : TBits_1; inline;
  14836. function getTXERR : TBits_1; inline;
  14837. function getTXLARB : TBits_1; inline;
  14838. function getTXPRI : TBits_2; inline;
  14839. function getTXREQ : TBits_1; inline;
  14840. function getUINC : TBits_1; inline;
  14841. function getw : TBits_32; inline;
  14842. procedure setDONLY(thebits : TBits_1); inline;
  14843. procedure setFRESET(thebits : TBits_1); inline;
  14844. procedure setFSIZE(thebits : TBits_5); inline;
  14845. procedure setRTREN(thebits : TBits_1); inline;
  14846. procedure setTXABAT(thebits : TBits_1); inline;
  14847. procedure setTXEN(thebits : TBits_1); inline;
  14848. procedure setTXERR(thebits : TBits_1); inline;
  14849. procedure setTXLARB(thebits : TBits_1); inline;
  14850. procedure setTXPRI(thebits : TBits_2); inline;
  14851. procedure setTXREQ(thebits : TBits_1); inline;
  14852. procedure setUINC(thebits : TBits_1); inline;
  14853. procedure setw(thebits : TBits_32); inline;
  14854. public
  14855. procedure clearDONLY; inline;
  14856. procedure clearFRESET; inline;
  14857. procedure clearRTREN; inline;
  14858. procedure clearTXABAT; inline;
  14859. procedure clearTXEN; inline;
  14860. procedure clearTXERR; inline;
  14861. procedure clearTXLARB; inline;
  14862. procedure clearTXREQ; inline;
  14863. procedure clearUINC; inline;
  14864. procedure setDONLY; inline;
  14865. procedure setFRESET; inline;
  14866. procedure setRTREN; inline;
  14867. procedure setTXABAT; inline;
  14868. procedure setTXEN; inline;
  14869. procedure setTXERR; inline;
  14870. procedure setTXLARB; inline;
  14871. procedure setTXREQ; inline;
  14872. procedure setUINC; inline;
  14873. property DONLY : TBits_1 read getDONLY write setDONLY;
  14874. property FRESET : TBits_1 read getFRESET write setFRESET;
  14875. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  14876. property RTREN : TBits_1 read getRTREN write setRTREN;
  14877. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  14878. property TXEN : TBits_1 read getTXEN write setTXEN;
  14879. property TXERR : TBits_1 read getTXERR write setTXERR;
  14880. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  14881. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  14882. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  14883. property UINC : TBits_1 read getUINC write setUINC;
  14884. property w : TBits_32 read getw write setw;
  14885. end;
  14886. TCAN1_C1FIFOINT0 = record
  14887. private
  14888. function getRXFULLIE : TBits_1; inline;
  14889. function getRXFULLIF : TBits_1; inline;
  14890. function getRXHALFIE : TBits_1; inline;
  14891. function getRXHALFIF : TBits_1; inline;
  14892. function getRXNEMPTYIE : TBits_1; inline;
  14893. function getRXNEMPTYIF : TBits_1; inline;
  14894. function getRXOVFLIE : TBits_1; inline;
  14895. function getRXOVFLIF : TBits_1; inline;
  14896. function getTXEMPTYIE : TBits_1; inline;
  14897. function getTXEMPTYIF : TBits_1; inline;
  14898. function getTXHALFIE : TBits_1; inline;
  14899. function getTXHALFIF : TBits_1; inline;
  14900. function getTXNFULLIE : TBits_1; inline;
  14901. function getTXNFULLIF : TBits_1; inline;
  14902. function getw : TBits_32; inline;
  14903. procedure setRXFULLIE(thebits : TBits_1); inline;
  14904. procedure setRXFULLIF(thebits : TBits_1); inline;
  14905. procedure setRXHALFIE(thebits : TBits_1); inline;
  14906. procedure setRXHALFIF(thebits : TBits_1); inline;
  14907. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  14908. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  14909. procedure setRXOVFLIE(thebits : TBits_1); inline;
  14910. procedure setRXOVFLIF(thebits : TBits_1); inline;
  14911. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  14912. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  14913. procedure setTXHALFIE(thebits : TBits_1); inline;
  14914. procedure setTXHALFIF(thebits : TBits_1); inline;
  14915. procedure setTXNFULLIE(thebits : TBits_1); inline;
  14916. procedure setTXNFULLIF(thebits : TBits_1); inline;
  14917. procedure setw(thebits : TBits_32); inline;
  14918. public
  14919. procedure clearRXFULLIE; inline;
  14920. procedure clearRXFULLIF; inline;
  14921. procedure clearRXHALFIE; inline;
  14922. procedure clearRXHALFIF; inline;
  14923. procedure clearRXNEMPTYIE; inline;
  14924. procedure clearRXNEMPTYIF; inline;
  14925. procedure clearRXOVFLIE; inline;
  14926. procedure clearRXOVFLIF; inline;
  14927. procedure clearTXEMPTYIE; inline;
  14928. procedure clearTXEMPTYIF; inline;
  14929. procedure clearTXHALFIE; inline;
  14930. procedure clearTXHALFIF; inline;
  14931. procedure clearTXNFULLIE; inline;
  14932. procedure clearTXNFULLIF; inline;
  14933. procedure setRXFULLIE; inline;
  14934. procedure setRXFULLIF; inline;
  14935. procedure setRXHALFIE; inline;
  14936. procedure setRXHALFIF; inline;
  14937. procedure setRXNEMPTYIE; inline;
  14938. procedure setRXNEMPTYIF; inline;
  14939. procedure setRXOVFLIE; inline;
  14940. procedure setRXOVFLIF; inline;
  14941. procedure setTXEMPTYIE; inline;
  14942. procedure setTXEMPTYIF; inline;
  14943. procedure setTXHALFIE; inline;
  14944. procedure setTXHALFIF; inline;
  14945. procedure setTXNFULLIE; inline;
  14946. procedure setTXNFULLIF; inline;
  14947. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  14948. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  14949. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  14950. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  14951. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  14952. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  14953. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  14954. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  14955. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  14956. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  14957. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  14958. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  14959. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  14960. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  14961. property w : TBits_32 read getw write setw;
  14962. end;
  14963. TCAN1_C1FIFOCI0 = record
  14964. private
  14965. function getCFIFOCI : TBits_5; inline;
  14966. function getw : TBits_32; inline;
  14967. procedure setCFIFOCI(thebits : TBits_5); inline;
  14968. procedure setw(thebits : TBits_32); inline;
  14969. public
  14970. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  14971. property w : TBits_32 read getw write setw;
  14972. end;
  14973. TCAN1_C1FIFOCON1 = record
  14974. private
  14975. function getDONLY : TBits_1; inline;
  14976. function getFRESET : TBits_1; inline;
  14977. function getFSIZE : TBits_5; inline;
  14978. function getRTREN : TBits_1; inline;
  14979. function getTXABAT : TBits_1; inline;
  14980. function getTXEN : TBits_1; inline;
  14981. function getTXERR : TBits_1; inline;
  14982. function getTXLARB : TBits_1; inline;
  14983. function getTXPRI : TBits_2; inline;
  14984. function getTXREQ : TBits_1; inline;
  14985. function getUINC : TBits_1; inline;
  14986. function getw : TBits_32; inline;
  14987. procedure setDONLY(thebits : TBits_1); inline;
  14988. procedure setFRESET(thebits : TBits_1); inline;
  14989. procedure setFSIZE(thebits : TBits_5); inline;
  14990. procedure setRTREN(thebits : TBits_1); inline;
  14991. procedure setTXABAT(thebits : TBits_1); inline;
  14992. procedure setTXEN(thebits : TBits_1); inline;
  14993. procedure setTXERR(thebits : TBits_1); inline;
  14994. procedure setTXLARB(thebits : TBits_1); inline;
  14995. procedure setTXPRI(thebits : TBits_2); inline;
  14996. procedure setTXREQ(thebits : TBits_1); inline;
  14997. procedure setUINC(thebits : TBits_1); inline;
  14998. procedure setw(thebits : TBits_32); inline;
  14999. public
  15000. procedure clearDONLY; inline;
  15001. procedure clearFRESET; inline;
  15002. procedure clearRTREN; inline;
  15003. procedure clearTXABAT; inline;
  15004. procedure clearTXEN; inline;
  15005. procedure clearTXERR; inline;
  15006. procedure clearTXLARB; inline;
  15007. procedure clearTXREQ; inline;
  15008. procedure clearUINC; inline;
  15009. procedure setDONLY; inline;
  15010. procedure setFRESET; inline;
  15011. procedure setRTREN; inline;
  15012. procedure setTXABAT; inline;
  15013. procedure setTXEN; inline;
  15014. procedure setTXERR; inline;
  15015. procedure setTXLARB; inline;
  15016. procedure setTXREQ; inline;
  15017. procedure setUINC; inline;
  15018. property DONLY : TBits_1 read getDONLY write setDONLY;
  15019. property FRESET : TBits_1 read getFRESET write setFRESET;
  15020. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  15021. property RTREN : TBits_1 read getRTREN write setRTREN;
  15022. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  15023. property TXEN : TBits_1 read getTXEN write setTXEN;
  15024. property TXERR : TBits_1 read getTXERR write setTXERR;
  15025. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  15026. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  15027. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  15028. property UINC : TBits_1 read getUINC write setUINC;
  15029. property w : TBits_32 read getw write setw;
  15030. end;
  15031. TCAN1_C1FIFOINT1 = record
  15032. private
  15033. function getRXFULLIE : TBits_1; inline;
  15034. function getRXFULLIF : TBits_1; inline;
  15035. function getRXHALFIE : TBits_1; inline;
  15036. function getRXHALFIF : TBits_1; inline;
  15037. function getRXNEMPTYIE : TBits_1; inline;
  15038. function getRXNEMPTYIF : TBits_1; inline;
  15039. function getRXOVFLIE : TBits_1; inline;
  15040. function getRXOVFLIF : TBits_1; inline;
  15041. function getTXEMPTYIE : TBits_1; inline;
  15042. function getTXEMPTYIF : TBits_1; inline;
  15043. function getTXHALFIE : TBits_1; inline;
  15044. function getTXHALFIF : TBits_1; inline;
  15045. function getTXNFULLIE : TBits_1; inline;
  15046. function getTXNFULLIF : TBits_1; inline;
  15047. function getw : TBits_32; inline;
  15048. procedure setRXFULLIE(thebits : TBits_1); inline;
  15049. procedure setRXFULLIF(thebits : TBits_1); inline;
  15050. procedure setRXHALFIE(thebits : TBits_1); inline;
  15051. procedure setRXHALFIF(thebits : TBits_1); inline;
  15052. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  15053. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  15054. procedure setRXOVFLIE(thebits : TBits_1); inline;
  15055. procedure setRXOVFLIF(thebits : TBits_1); inline;
  15056. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  15057. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  15058. procedure setTXHALFIE(thebits : TBits_1); inline;
  15059. procedure setTXHALFIF(thebits : TBits_1); inline;
  15060. procedure setTXNFULLIE(thebits : TBits_1); inline;
  15061. procedure setTXNFULLIF(thebits : TBits_1); inline;
  15062. procedure setw(thebits : TBits_32); inline;
  15063. public
  15064. procedure clearRXFULLIE; inline;
  15065. procedure clearRXFULLIF; inline;
  15066. procedure clearRXHALFIE; inline;
  15067. procedure clearRXHALFIF; inline;
  15068. procedure clearRXNEMPTYIE; inline;
  15069. procedure clearRXNEMPTYIF; inline;
  15070. procedure clearRXOVFLIE; inline;
  15071. procedure clearRXOVFLIF; inline;
  15072. procedure clearTXEMPTYIE; inline;
  15073. procedure clearTXEMPTYIF; inline;
  15074. procedure clearTXHALFIE; inline;
  15075. procedure clearTXHALFIF; inline;
  15076. procedure clearTXNFULLIE; inline;
  15077. procedure clearTXNFULLIF; inline;
  15078. procedure setRXFULLIE; inline;
  15079. procedure setRXFULLIF; inline;
  15080. procedure setRXHALFIE; inline;
  15081. procedure setRXHALFIF; inline;
  15082. procedure setRXNEMPTYIE; inline;
  15083. procedure setRXNEMPTYIF; inline;
  15084. procedure setRXOVFLIE; inline;
  15085. procedure setRXOVFLIF; inline;
  15086. procedure setTXEMPTYIE; inline;
  15087. procedure setTXEMPTYIF; inline;
  15088. procedure setTXHALFIE; inline;
  15089. procedure setTXHALFIF; inline;
  15090. procedure setTXNFULLIE; inline;
  15091. procedure setTXNFULLIF; inline;
  15092. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  15093. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  15094. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  15095. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  15096. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  15097. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  15098. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  15099. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  15100. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  15101. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  15102. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  15103. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  15104. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  15105. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  15106. property w : TBits_32 read getw write setw;
  15107. end;
  15108. TCAN1_C1FIFOCI1 = record
  15109. private
  15110. function getCFIFOCI : TBits_5; inline;
  15111. function getw : TBits_32; inline;
  15112. procedure setCFIFOCI(thebits : TBits_5); inline;
  15113. procedure setw(thebits : TBits_32); inline;
  15114. public
  15115. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  15116. property w : TBits_32 read getw write setw;
  15117. end;
  15118. TCAN1_C1FIFOCON2 = record
  15119. private
  15120. function getDONLY : TBits_1; inline;
  15121. function getFRESET : TBits_1; inline;
  15122. function getFSIZE : TBits_5; inline;
  15123. function getRTREN : TBits_1; inline;
  15124. function getTXABAT : TBits_1; inline;
  15125. function getTXEN : TBits_1; inline;
  15126. function getTXERR : TBits_1; inline;
  15127. function getTXLARB : TBits_1; inline;
  15128. function getTXPRI : TBits_2; inline;
  15129. function getTXREQ : TBits_1; inline;
  15130. function getUINC : TBits_1; inline;
  15131. function getw : TBits_32; inline;
  15132. procedure setDONLY(thebits : TBits_1); inline;
  15133. procedure setFRESET(thebits : TBits_1); inline;
  15134. procedure setFSIZE(thebits : TBits_5); inline;
  15135. procedure setRTREN(thebits : TBits_1); inline;
  15136. procedure setTXABAT(thebits : TBits_1); inline;
  15137. procedure setTXEN(thebits : TBits_1); inline;
  15138. procedure setTXERR(thebits : TBits_1); inline;
  15139. procedure setTXLARB(thebits : TBits_1); inline;
  15140. procedure setTXPRI(thebits : TBits_2); inline;
  15141. procedure setTXREQ(thebits : TBits_1); inline;
  15142. procedure setUINC(thebits : TBits_1); inline;
  15143. procedure setw(thebits : TBits_32); inline;
  15144. public
  15145. procedure clearDONLY; inline;
  15146. procedure clearFRESET; inline;
  15147. procedure clearRTREN; inline;
  15148. procedure clearTXABAT; inline;
  15149. procedure clearTXEN; inline;
  15150. procedure clearTXERR; inline;
  15151. procedure clearTXLARB; inline;
  15152. procedure clearTXREQ; inline;
  15153. procedure clearUINC; inline;
  15154. procedure setDONLY; inline;
  15155. procedure setFRESET; inline;
  15156. procedure setRTREN; inline;
  15157. procedure setTXABAT; inline;
  15158. procedure setTXEN; inline;
  15159. procedure setTXERR; inline;
  15160. procedure setTXLARB; inline;
  15161. procedure setTXREQ; inline;
  15162. procedure setUINC; inline;
  15163. property DONLY : TBits_1 read getDONLY write setDONLY;
  15164. property FRESET : TBits_1 read getFRESET write setFRESET;
  15165. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  15166. property RTREN : TBits_1 read getRTREN write setRTREN;
  15167. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  15168. property TXEN : TBits_1 read getTXEN write setTXEN;
  15169. property TXERR : TBits_1 read getTXERR write setTXERR;
  15170. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  15171. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  15172. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  15173. property UINC : TBits_1 read getUINC write setUINC;
  15174. property w : TBits_32 read getw write setw;
  15175. end;
  15176. TCAN1_C1FIFOINT2 = record
  15177. private
  15178. function getRXFULLIE : TBits_1; inline;
  15179. function getRXFULLIF : TBits_1; inline;
  15180. function getRXHALFIE : TBits_1; inline;
  15181. function getRXHALFIF : TBits_1; inline;
  15182. function getRXNEMPTYIE : TBits_1; inline;
  15183. function getRXNEMPTYIF : TBits_1; inline;
  15184. function getRXOVFLIE : TBits_1; inline;
  15185. function getRXOVFLIF : TBits_1; inline;
  15186. function getTXEMPTYIE : TBits_1; inline;
  15187. function getTXEMPTYIF : TBits_1; inline;
  15188. function getTXHALFIE : TBits_1; inline;
  15189. function getTXHALFIF : TBits_1; inline;
  15190. function getTXNFULLIE : TBits_1; inline;
  15191. function getTXNFULLIF : TBits_1; inline;
  15192. function getw : TBits_32; inline;
  15193. procedure setRXFULLIE(thebits : TBits_1); inline;
  15194. procedure setRXFULLIF(thebits : TBits_1); inline;
  15195. procedure setRXHALFIE(thebits : TBits_1); inline;
  15196. procedure setRXHALFIF(thebits : TBits_1); inline;
  15197. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  15198. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  15199. procedure setRXOVFLIE(thebits : TBits_1); inline;
  15200. procedure setRXOVFLIF(thebits : TBits_1); inline;
  15201. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  15202. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  15203. procedure setTXHALFIE(thebits : TBits_1); inline;
  15204. procedure setTXHALFIF(thebits : TBits_1); inline;
  15205. procedure setTXNFULLIE(thebits : TBits_1); inline;
  15206. procedure setTXNFULLIF(thebits : TBits_1); inline;
  15207. procedure setw(thebits : TBits_32); inline;
  15208. public
  15209. procedure clearRXFULLIE; inline;
  15210. procedure clearRXFULLIF; inline;
  15211. procedure clearRXHALFIE; inline;
  15212. procedure clearRXHALFIF; inline;
  15213. procedure clearRXNEMPTYIE; inline;
  15214. procedure clearRXNEMPTYIF; inline;
  15215. procedure clearRXOVFLIE; inline;
  15216. procedure clearRXOVFLIF; inline;
  15217. procedure clearTXEMPTYIE; inline;
  15218. procedure clearTXEMPTYIF; inline;
  15219. procedure clearTXHALFIE; inline;
  15220. procedure clearTXHALFIF; inline;
  15221. procedure clearTXNFULLIE; inline;
  15222. procedure clearTXNFULLIF; inline;
  15223. procedure setRXFULLIE; inline;
  15224. procedure setRXFULLIF; inline;
  15225. procedure setRXHALFIE; inline;
  15226. procedure setRXHALFIF; inline;
  15227. procedure setRXNEMPTYIE; inline;
  15228. procedure setRXNEMPTYIF; inline;
  15229. procedure setRXOVFLIE; inline;
  15230. procedure setRXOVFLIF; inline;
  15231. procedure setTXEMPTYIE; inline;
  15232. procedure setTXEMPTYIF; inline;
  15233. procedure setTXHALFIE; inline;
  15234. procedure setTXHALFIF; inline;
  15235. procedure setTXNFULLIE; inline;
  15236. procedure setTXNFULLIF; inline;
  15237. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  15238. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  15239. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  15240. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  15241. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  15242. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  15243. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  15244. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  15245. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  15246. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  15247. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  15248. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  15249. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  15250. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  15251. property w : TBits_32 read getw write setw;
  15252. end;
  15253. TCAN1_C1FIFOCI2 = record
  15254. private
  15255. function getCFIFOCI : TBits_5; inline;
  15256. function getw : TBits_32; inline;
  15257. procedure setCFIFOCI(thebits : TBits_5); inline;
  15258. procedure setw(thebits : TBits_32); inline;
  15259. public
  15260. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  15261. property w : TBits_32 read getw write setw;
  15262. end;
  15263. TCAN1_C1FIFOCON3 = record
  15264. private
  15265. function getDONLY : TBits_1; inline;
  15266. function getFRESET : TBits_1; inline;
  15267. function getFSIZE : TBits_5; inline;
  15268. function getRTREN : TBits_1; inline;
  15269. function getTXABAT : TBits_1; inline;
  15270. function getTXEN : TBits_1; inline;
  15271. function getTXERR : TBits_1; inline;
  15272. function getTXLARB : TBits_1; inline;
  15273. function getTXPRI : TBits_2; inline;
  15274. function getTXREQ : TBits_1; inline;
  15275. function getUINC : TBits_1; inline;
  15276. function getw : TBits_32; inline;
  15277. procedure setDONLY(thebits : TBits_1); inline;
  15278. procedure setFRESET(thebits : TBits_1); inline;
  15279. procedure setFSIZE(thebits : TBits_5); inline;
  15280. procedure setRTREN(thebits : TBits_1); inline;
  15281. procedure setTXABAT(thebits : TBits_1); inline;
  15282. procedure setTXEN(thebits : TBits_1); inline;
  15283. procedure setTXERR(thebits : TBits_1); inline;
  15284. procedure setTXLARB(thebits : TBits_1); inline;
  15285. procedure setTXPRI(thebits : TBits_2); inline;
  15286. procedure setTXREQ(thebits : TBits_1); inline;
  15287. procedure setUINC(thebits : TBits_1); inline;
  15288. procedure setw(thebits : TBits_32); inline;
  15289. public
  15290. procedure clearDONLY; inline;
  15291. procedure clearFRESET; inline;
  15292. procedure clearRTREN; inline;
  15293. procedure clearTXABAT; inline;
  15294. procedure clearTXEN; inline;
  15295. procedure clearTXERR; inline;
  15296. procedure clearTXLARB; inline;
  15297. procedure clearTXREQ; inline;
  15298. procedure clearUINC; inline;
  15299. procedure setDONLY; inline;
  15300. procedure setFRESET; inline;
  15301. procedure setRTREN; inline;
  15302. procedure setTXABAT; inline;
  15303. procedure setTXEN; inline;
  15304. procedure setTXERR; inline;
  15305. procedure setTXLARB; inline;
  15306. procedure setTXREQ; inline;
  15307. procedure setUINC; inline;
  15308. property DONLY : TBits_1 read getDONLY write setDONLY;
  15309. property FRESET : TBits_1 read getFRESET write setFRESET;
  15310. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  15311. property RTREN : TBits_1 read getRTREN write setRTREN;
  15312. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  15313. property TXEN : TBits_1 read getTXEN write setTXEN;
  15314. property TXERR : TBits_1 read getTXERR write setTXERR;
  15315. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  15316. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  15317. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  15318. property UINC : TBits_1 read getUINC write setUINC;
  15319. property w : TBits_32 read getw write setw;
  15320. end;
  15321. TCAN1_C1FIFOINT3 = record
  15322. private
  15323. function getRXFULLIE : TBits_1; inline;
  15324. function getRXFULLIF : TBits_1; inline;
  15325. function getRXHALFIE : TBits_1; inline;
  15326. function getRXHALFIF : TBits_1; inline;
  15327. function getRXNEMPTYIE : TBits_1; inline;
  15328. function getRXNEMPTYIF : TBits_1; inline;
  15329. function getRXOVFLIE : TBits_1; inline;
  15330. function getRXOVFLIF : TBits_1; inline;
  15331. function getTXEMPTYIE : TBits_1; inline;
  15332. function getTXEMPTYIF : TBits_1; inline;
  15333. function getTXHALFIE : TBits_1; inline;
  15334. function getTXHALFIF : TBits_1; inline;
  15335. function getTXNFULLIE : TBits_1; inline;
  15336. function getTXNFULLIF : TBits_1; inline;
  15337. function getw : TBits_32; inline;
  15338. procedure setRXFULLIE(thebits : TBits_1); inline;
  15339. procedure setRXFULLIF(thebits : TBits_1); inline;
  15340. procedure setRXHALFIE(thebits : TBits_1); inline;
  15341. procedure setRXHALFIF(thebits : TBits_1); inline;
  15342. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  15343. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  15344. procedure setRXOVFLIE(thebits : TBits_1); inline;
  15345. procedure setRXOVFLIF(thebits : TBits_1); inline;
  15346. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  15347. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  15348. procedure setTXHALFIE(thebits : TBits_1); inline;
  15349. procedure setTXHALFIF(thebits : TBits_1); inline;
  15350. procedure setTXNFULLIE(thebits : TBits_1); inline;
  15351. procedure setTXNFULLIF(thebits : TBits_1); inline;
  15352. procedure setw(thebits : TBits_32); inline;
  15353. public
  15354. procedure clearRXFULLIE; inline;
  15355. procedure clearRXFULLIF; inline;
  15356. procedure clearRXHALFIE; inline;
  15357. procedure clearRXHALFIF; inline;
  15358. procedure clearRXNEMPTYIE; inline;
  15359. procedure clearRXNEMPTYIF; inline;
  15360. procedure clearRXOVFLIE; inline;
  15361. procedure clearRXOVFLIF; inline;
  15362. procedure clearTXEMPTYIE; inline;
  15363. procedure clearTXEMPTYIF; inline;
  15364. procedure clearTXHALFIE; inline;
  15365. procedure clearTXHALFIF; inline;
  15366. procedure clearTXNFULLIE; inline;
  15367. procedure clearTXNFULLIF; inline;
  15368. procedure setRXFULLIE; inline;
  15369. procedure setRXFULLIF; inline;
  15370. procedure setRXHALFIE; inline;
  15371. procedure setRXHALFIF; inline;
  15372. procedure setRXNEMPTYIE; inline;
  15373. procedure setRXNEMPTYIF; inline;
  15374. procedure setRXOVFLIE; inline;
  15375. procedure setRXOVFLIF; inline;
  15376. procedure setTXEMPTYIE; inline;
  15377. procedure setTXEMPTYIF; inline;
  15378. procedure setTXHALFIE; inline;
  15379. procedure setTXHALFIF; inline;
  15380. procedure setTXNFULLIE; inline;
  15381. procedure setTXNFULLIF; inline;
  15382. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  15383. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  15384. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  15385. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  15386. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  15387. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  15388. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  15389. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  15390. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  15391. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  15392. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  15393. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  15394. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  15395. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  15396. property w : TBits_32 read getw write setw;
  15397. end;
  15398. TCAN1_C1FIFOCI3 = record
  15399. private
  15400. function getCFIFOCI : TBits_5; inline;
  15401. function getw : TBits_32; inline;
  15402. procedure setCFIFOCI(thebits : TBits_5); inline;
  15403. procedure setw(thebits : TBits_32); inline;
  15404. public
  15405. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  15406. property w : TBits_32 read getw write setw;
  15407. end;
  15408. TCAN1_C1FIFOCON4 = record
  15409. private
  15410. function getDONLY : TBits_1; inline;
  15411. function getFRESET : TBits_1; inline;
  15412. function getFSIZE : TBits_5; inline;
  15413. function getRTREN : TBits_1; inline;
  15414. function getTXABAT : TBits_1; inline;
  15415. function getTXEN : TBits_1; inline;
  15416. function getTXERR : TBits_1; inline;
  15417. function getTXLARB : TBits_1; inline;
  15418. function getTXPRI : TBits_2; inline;
  15419. function getTXREQ : TBits_1; inline;
  15420. function getUINC : TBits_1; inline;
  15421. function getw : TBits_32; inline;
  15422. procedure setDONLY(thebits : TBits_1); inline;
  15423. procedure setFRESET(thebits : TBits_1); inline;
  15424. procedure setFSIZE(thebits : TBits_5); inline;
  15425. procedure setRTREN(thebits : TBits_1); inline;
  15426. procedure setTXABAT(thebits : TBits_1); inline;
  15427. procedure setTXEN(thebits : TBits_1); inline;
  15428. procedure setTXERR(thebits : TBits_1); inline;
  15429. procedure setTXLARB(thebits : TBits_1); inline;
  15430. procedure setTXPRI(thebits : TBits_2); inline;
  15431. procedure setTXREQ(thebits : TBits_1); inline;
  15432. procedure setUINC(thebits : TBits_1); inline;
  15433. procedure setw(thebits : TBits_32); inline;
  15434. public
  15435. procedure clearDONLY; inline;
  15436. procedure clearFRESET; inline;
  15437. procedure clearRTREN; inline;
  15438. procedure clearTXABAT; inline;
  15439. procedure clearTXEN; inline;
  15440. procedure clearTXERR; inline;
  15441. procedure clearTXLARB; inline;
  15442. procedure clearTXREQ; inline;
  15443. procedure clearUINC; inline;
  15444. procedure setDONLY; inline;
  15445. procedure setFRESET; inline;
  15446. procedure setRTREN; inline;
  15447. procedure setTXABAT; inline;
  15448. procedure setTXEN; inline;
  15449. procedure setTXERR; inline;
  15450. procedure setTXLARB; inline;
  15451. procedure setTXREQ; inline;
  15452. procedure setUINC; inline;
  15453. property DONLY : TBits_1 read getDONLY write setDONLY;
  15454. property FRESET : TBits_1 read getFRESET write setFRESET;
  15455. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  15456. property RTREN : TBits_1 read getRTREN write setRTREN;
  15457. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  15458. property TXEN : TBits_1 read getTXEN write setTXEN;
  15459. property TXERR : TBits_1 read getTXERR write setTXERR;
  15460. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  15461. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  15462. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  15463. property UINC : TBits_1 read getUINC write setUINC;
  15464. property w : TBits_32 read getw write setw;
  15465. end;
  15466. TCAN1_C1FIFOINT4 = record
  15467. private
  15468. function getRXFULLIE : TBits_1; inline;
  15469. function getRXFULLIF : TBits_1; inline;
  15470. function getRXHALFIE : TBits_1; inline;
  15471. function getRXHALFIF : TBits_1; inline;
  15472. function getRXNEMPTYIE : TBits_1; inline;
  15473. function getRXNEMPTYIF : TBits_1; inline;
  15474. function getRXOVFLIE : TBits_1; inline;
  15475. function getRXOVFLIF : TBits_1; inline;
  15476. function getTXEMPTYIE : TBits_1; inline;
  15477. function getTXEMPTYIF : TBits_1; inline;
  15478. function getTXHALFIE : TBits_1; inline;
  15479. function getTXHALFIF : TBits_1; inline;
  15480. function getTXNFULLIE : TBits_1; inline;
  15481. function getTXNFULLIF : TBits_1; inline;
  15482. function getw : TBits_32; inline;
  15483. procedure setRXFULLIE(thebits : TBits_1); inline;
  15484. procedure setRXFULLIF(thebits : TBits_1); inline;
  15485. procedure setRXHALFIE(thebits : TBits_1); inline;
  15486. procedure setRXHALFIF(thebits : TBits_1); inline;
  15487. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  15488. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  15489. procedure setRXOVFLIE(thebits : TBits_1); inline;
  15490. procedure setRXOVFLIF(thebits : TBits_1); inline;
  15491. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  15492. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  15493. procedure setTXHALFIE(thebits : TBits_1); inline;
  15494. procedure setTXHALFIF(thebits : TBits_1); inline;
  15495. procedure setTXNFULLIE(thebits : TBits_1); inline;
  15496. procedure setTXNFULLIF(thebits : TBits_1); inline;
  15497. procedure setw(thebits : TBits_32); inline;
  15498. public
  15499. procedure clearRXFULLIE; inline;
  15500. procedure clearRXFULLIF; inline;
  15501. procedure clearRXHALFIE; inline;
  15502. procedure clearRXHALFIF; inline;
  15503. procedure clearRXNEMPTYIE; inline;
  15504. procedure clearRXNEMPTYIF; inline;
  15505. procedure clearRXOVFLIE; inline;
  15506. procedure clearRXOVFLIF; inline;
  15507. procedure clearTXEMPTYIE; inline;
  15508. procedure clearTXEMPTYIF; inline;
  15509. procedure clearTXHALFIE; inline;
  15510. procedure clearTXHALFIF; inline;
  15511. procedure clearTXNFULLIE; inline;
  15512. procedure clearTXNFULLIF; inline;
  15513. procedure setRXFULLIE; inline;
  15514. procedure setRXFULLIF; inline;
  15515. procedure setRXHALFIE; inline;
  15516. procedure setRXHALFIF; inline;
  15517. procedure setRXNEMPTYIE; inline;
  15518. procedure setRXNEMPTYIF; inline;
  15519. procedure setRXOVFLIE; inline;
  15520. procedure setRXOVFLIF; inline;
  15521. procedure setTXEMPTYIE; inline;
  15522. procedure setTXEMPTYIF; inline;
  15523. procedure setTXHALFIE; inline;
  15524. procedure setTXHALFIF; inline;
  15525. procedure setTXNFULLIE; inline;
  15526. procedure setTXNFULLIF; inline;
  15527. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  15528. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  15529. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  15530. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  15531. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  15532. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  15533. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  15534. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  15535. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  15536. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  15537. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  15538. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  15539. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  15540. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  15541. property w : TBits_32 read getw write setw;
  15542. end;
  15543. TCAN1_C1FIFOCI4 = record
  15544. private
  15545. function getCFIFOCI : TBits_5; inline;
  15546. function getw : TBits_32; inline;
  15547. procedure setCFIFOCI(thebits : TBits_5); inline;
  15548. procedure setw(thebits : TBits_32); inline;
  15549. public
  15550. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  15551. property w : TBits_32 read getw write setw;
  15552. end;
  15553. TCAN1_C1FIFOCON5 = record
  15554. private
  15555. function getDONLY : TBits_1; inline;
  15556. function getFRESET : TBits_1; inline;
  15557. function getFSIZE : TBits_5; inline;
  15558. function getRTREN : TBits_1; inline;
  15559. function getTXABAT : TBits_1; inline;
  15560. function getTXEN : TBits_1; inline;
  15561. function getTXERR : TBits_1; inline;
  15562. function getTXLARB : TBits_1; inline;
  15563. function getTXPRI : TBits_2; inline;
  15564. function getTXREQ : TBits_1; inline;
  15565. function getUINC : TBits_1; inline;
  15566. function getw : TBits_32; inline;
  15567. procedure setDONLY(thebits : TBits_1); inline;
  15568. procedure setFRESET(thebits : TBits_1); inline;
  15569. procedure setFSIZE(thebits : TBits_5); inline;
  15570. procedure setRTREN(thebits : TBits_1); inline;
  15571. procedure setTXABAT(thebits : TBits_1); inline;
  15572. procedure setTXEN(thebits : TBits_1); inline;
  15573. procedure setTXERR(thebits : TBits_1); inline;
  15574. procedure setTXLARB(thebits : TBits_1); inline;
  15575. procedure setTXPRI(thebits : TBits_2); inline;
  15576. procedure setTXREQ(thebits : TBits_1); inline;
  15577. procedure setUINC(thebits : TBits_1); inline;
  15578. procedure setw(thebits : TBits_32); inline;
  15579. public
  15580. procedure clearDONLY; inline;
  15581. procedure clearFRESET; inline;
  15582. procedure clearRTREN; inline;
  15583. procedure clearTXABAT; inline;
  15584. procedure clearTXEN; inline;
  15585. procedure clearTXERR; inline;
  15586. procedure clearTXLARB; inline;
  15587. procedure clearTXREQ; inline;
  15588. procedure clearUINC; inline;
  15589. procedure setDONLY; inline;
  15590. procedure setFRESET; inline;
  15591. procedure setRTREN; inline;
  15592. procedure setTXABAT; inline;
  15593. procedure setTXEN; inline;
  15594. procedure setTXERR; inline;
  15595. procedure setTXLARB; inline;
  15596. procedure setTXREQ; inline;
  15597. procedure setUINC; inline;
  15598. property DONLY : TBits_1 read getDONLY write setDONLY;
  15599. property FRESET : TBits_1 read getFRESET write setFRESET;
  15600. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  15601. property RTREN : TBits_1 read getRTREN write setRTREN;
  15602. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  15603. property TXEN : TBits_1 read getTXEN write setTXEN;
  15604. property TXERR : TBits_1 read getTXERR write setTXERR;
  15605. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  15606. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  15607. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  15608. property UINC : TBits_1 read getUINC write setUINC;
  15609. property w : TBits_32 read getw write setw;
  15610. end;
  15611. TCAN1_C1FIFOINT5 = record
  15612. private
  15613. function getRXFULLIE : TBits_1; inline;
  15614. function getRXFULLIF : TBits_1; inline;
  15615. function getRXHALFIE : TBits_1; inline;
  15616. function getRXHALFIF : TBits_1; inline;
  15617. function getRXNEMPTYIE : TBits_1; inline;
  15618. function getRXNEMPTYIF : TBits_1; inline;
  15619. function getRXOVFLIE : TBits_1; inline;
  15620. function getRXOVFLIF : TBits_1; inline;
  15621. function getTXEMPTYIE : TBits_1; inline;
  15622. function getTXEMPTYIF : TBits_1; inline;
  15623. function getTXHALFIE : TBits_1; inline;
  15624. function getTXHALFIF : TBits_1; inline;
  15625. function getTXNFULLIE : TBits_1; inline;
  15626. function getTXNFULLIF : TBits_1; inline;
  15627. function getw : TBits_32; inline;
  15628. procedure setRXFULLIE(thebits : TBits_1); inline;
  15629. procedure setRXFULLIF(thebits : TBits_1); inline;
  15630. procedure setRXHALFIE(thebits : TBits_1); inline;
  15631. procedure setRXHALFIF(thebits : TBits_1); inline;
  15632. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  15633. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  15634. procedure setRXOVFLIE(thebits : TBits_1); inline;
  15635. procedure setRXOVFLIF(thebits : TBits_1); inline;
  15636. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  15637. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  15638. procedure setTXHALFIE(thebits : TBits_1); inline;
  15639. procedure setTXHALFIF(thebits : TBits_1); inline;
  15640. procedure setTXNFULLIE(thebits : TBits_1); inline;
  15641. procedure setTXNFULLIF(thebits : TBits_1); inline;
  15642. procedure setw(thebits : TBits_32); inline;
  15643. public
  15644. procedure clearRXFULLIE; inline;
  15645. procedure clearRXFULLIF; inline;
  15646. procedure clearRXHALFIE; inline;
  15647. procedure clearRXHALFIF; inline;
  15648. procedure clearRXNEMPTYIE; inline;
  15649. procedure clearRXNEMPTYIF; inline;
  15650. procedure clearRXOVFLIE; inline;
  15651. procedure clearRXOVFLIF; inline;
  15652. procedure clearTXEMPTYIE; inline;
  15653. procedure clearTXEMPTYIF; inline;
  15654. procedure clearTXHALFIE; inline;
  15655. procedure clearTXHALFIF; inline;
  15656. procedure clearTXNFULLIE; inline;
  15657. procedure clearTXNFULLIF; inline;
  15658. procedure setRXFULLIE; inline;
  15659. procedure setRXFULLIF; inline;
  15660. procedure setRXHALFIE; inline;
  15661. procedure setRXHALFIF; inline;
  15662. procedure setRXNEMPTYIE; inline;
  15663. procedure setRXNEMPTYIF; inline;
  15664. procedure setRXOVFLIE; inline;
  15665. procedure setRXOVFLIF; inline;
  15666. procedure setTXEMPTYIE; inline;
  15667. procedure setTXEMPTYIF; inline;
  15668. procedure setTXHALFIE; inline;
  15669. procedure setTXHALFIF; inline;
  15670. procedure setTXNFULLIE; inline;
  15671. procedure setTXNFULLIF; inline;
  15672. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  15673. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  15674. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  15675. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  15676. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  15677. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  15678. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  15679. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  15680. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  15681. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  15682. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  15683. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  15684. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  15685. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  15686. property w : TBits_32 read getw write setw;
  15687. end;
  15688. TCAN1_C1FIFOCI5 = record
  15689. private
  15690. function getCFIFOCI : TBits_5; inline;
  15691. function getw : TBits_32; inline;
  15692. procedure setCFIFOCI(thebits : TBits_5); inline;
  15693. procedure setw(thebits : TBits_32); inline;
  15694. public
  15695. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  15696. property w : TBits_32 read getw write setw;
  15697. end;
  15698. TCAN1_C1FIFOCON6 = record
  15699. private
  15700. function getDONLY : TBits_1; inline;
  15701. function getFRESET : TBits_1; inline;
  15702. function getFSIZE : TBits_5; inline;
  15703. function getRTREN : TBits_1; inline;
  15704. function getTXABAT : TBits_1; inline;
  15705. function getTXEN : TBits_1; inline;
  15706. function getTXERR : TBits_1; inline;
  15707. function getTXLARB : TBits_1; inline;
  15708. function getTXPRI : TBits_2; inline;
  15709. function getTXREQ : TBits_1; inline;
  15710. function getUINC : TBits_1; inline;
  15711. function getw : TBits_32; inline;
  15712. procedure setDONLY(thebits : TBits_1); inline;
  15713. procedure setFRESET(thebits : TBits_1); inline;
  15714. procedure setFSIZE(thebits : TBits_5); inline;
  15715. procedure setRTREN(thebits : TBits_1); inline;
  15716. procedure setTXABAT(thebits : TBits_1); inline;
  15717. procedure setTXEN(thebits : TBits_1); inline;
  15718. procedure setTXERR(thebits : TBits_1); inline;
  15719. procedure setTXLARB(thebits : TBits_1); inline;
  15720. procedure setTXPRI(thebits : TBits_2); inline;
  15721. procedure setTXREQ(thebits : TBits_1); inline;
  15722. procedure setUINC(thebits : TBits_1); inline;
  15723. procedure setw(thebits : TBits_32); inline;
  15724. public
  15725. procedure clearDONLY; inline;
  15726. procedure clearFRESET; inline;
  15727. procedure clearRTREN; inline;
  15728. procedure clearTXABAT; inline;
  15729. procedure clearTXEN; inline;
  15730. procedure clearTXERR; inline;
  15731. procedure clearTXLARB; inline;
  15732. procedure clearTXREQ; inline;
  15733. procedure clearUINC; inline;
  15734. procedure setDONLY; inline;
  15735. procedure setFRESET; inline;
  15736. procedure setRTREN; inline;
  15737. procedure setTXABAT; inline;
  15738. procedure setTXEN; inline;
  15739. procedure setTXERR; inline;
  15740. procedure setTXLARB; inline;
  15741. procedure setTXREQ; inline;
  15742. procedure setUINC; inline;
  15743. property DONLY : TBits_1 read getDONLY write setDONLY;
  15744. property FRESET : TBits_1 read getFRESET write setFRESET;
  15745. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  15746. property RTREN : TBits_1 read getRTREN write setRTREN;
  15747. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  15748. property TXEN : TBits_1 read getTXEN write setTXEN;
  15749. property TXERR : TBits_1 read getTXERR write setTXERR;
  15750. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  15751. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  15752. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  15753. property UINC : TBits_1 read getUINC write setUINC;
  15754. property w : TBits_32 read getw write setw;
  15755. end;
  15756. TCAN1_C1FIFOINT6 = record
  15757. private
  15758. function getRXFULLIE : TBits_1; inline;
  15759. function getRXFULLIF : TBits_1; inline;
  15760. function getRXHALFIE : TBits_1; inline;
  15761. function getRXHALFIF : TBits_1; inline;
  15762. function getRXNEMPTYIE : TBits_1; inline;
  15763. function getRXNEMPTYIF : TBits_1; inline;
  15764. function getRXOVFLIE : TBits_1; inline;
  15765. function getRXOVFLIF : TBits_1; inline;
  15766. function getTXEMPTYIE : TBits_1; inline;
  15767. function getTXEMPTYIF : TBits_1; inline;
  15768. function getTXHALFIE : TBits_1; inline;
  15769. function getTXHALFIF : TBits_1; inline;
  15770. function getTXNFULLIE : TBits_1; inline;
  15771. function getTXNFULLIF : TBits_1; inline;
  15772. function getw : TBits_32; inline;
  15773. procedure setRXFULLIE(thebits : TBits_1); inline;
  15774. procedure setRXFULLIF(thebits : TBits_1); inline;
  15775. procedure setRXHALFIE(thebits : TBits_1); inline;
  15776. procedure setRXHALFIF(thebits : TBits_1); inline;
  15777. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  15778. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  15779. procedure setRXOVFLIE(thebits : TBits_1); inline;
  15780. procedure setRXOVFLIF(thebits : TBits_1); inline;
  15781. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  15782. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  15783. procedure setTXHALFIE(thebits : TBits_1); inline;
  15784. procedure setTXHALFIF(thebits : TBits_1); inline;
  15785. procedure setTXNFULLIE(thebits : TBits_1); inline;
  15786. procedure setTXNFULLIF(thebits : TBits_1); inline;
  15787. procedure setw(thebits : TBits_32); inline;
  15788. public
  15789. procedure clearRXFULLIE; inline;
  15790. procedure clearRXFULLIF; inline;
  15791. procedure clearRXHALFIE; inline;
  15792. procedure clearRXHALFIF; inline;
  15793. procedure clearRXNEMPTYIE; inline;
  15794. procedure clearRXNEMPTYIF; inline;
  15795. procedure clearRXOVFLIE; inline;
  15796. procedure clearRXOVFLIF; inline;
  15797. procedure clearTXEMPTYIE; inline;
  15798. procedure clearTXEMPTYIF; inline;
  15799. procedure clearTXHALFIE; inline;
  15800. procedure clearTXHALFIF; inline;
  15801. procedure clearTXNFULLIE; inline;
  15802. procedure clearTXNFULLIF; inline;
  15803. procedure setRXFULLIE; inline;
  15804. procedure setRXFULLIF; inline;
  15805. procedure setRXHALFIE; inline;
  15806. procedure setRXHALFIF; inline;
  15807. procedure setRXNEMPTYIE; inline;
  15808. procedure setRXNEMPTYIF; inline;
  15809. procedure setRXOVFLIE; inline;
  15810. procedure setRXOVFLIF; inline;
  15811. procedure setTXEMPTYIE; inline;
  15812. procedure setTXEMPTYIF; inline;
  15813. procedure setTXHALFIE; inline;
  15814. procedure setTXHALFIF; inline;
  15815. procedure setTXNFULLIE; inline;
  15816. procedure setTXNFULLIF; inline;
  15817. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  15818. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  15819. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  15820. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  15821. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  15822. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  15823. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  15824. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  15825. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  15826. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  15827. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  15828. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  15829. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  15830. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  15831. property w : TBits_32 read getw write setw;
  15832. end;
  15833. TCAN1_C1FIFOCI6 = record
  15834. private
  15835. function getCFIFOCI : TBits_5; inline;
  15836. function getw : TBits_32; inline;
  15837. procedure setCFIFOCI(thebits : TBits_5); inline;
  15838. procedure setw(thebits : TBits_32); inline;
  15839. public
  15840. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  15841. property w : TBits_32 read getw write setw;
  15842. end;
  15843. TCAN1_C1FIFOCON7 = record
  15844. private
  15845. function getDONLY : TBits_1; inline;
  15846. function getFRESET : TBits_1; inline;
  15847. function getFSIZE : TBits_5; inline;
  15848. function getRTREN : TBits_1; inline;
  15849. function getTXABAT : TBits_1; inline;
  15850. function getTXEN : TBits_1; inline;
  15851. function getTXERR : TBits_1; inline;
  15852. function getTXLARB : TBits_1; inline;
  15853. function getTXPRI : TBits_2; inline;
  15854. function getTXREQ : TBits_1; inline;
  15855. function getUINC : TBits_1; inline;
  15856. function getw : TBits_32; inline;
  15857. procedure setDONLY(thebits : TBits_1); inline;
  15858. procedure setFRESET(thebits : TBits_1); inline;
  15859. procedure setFSIZE(thebits : TBits_5); inline;
  15860. procedure setRTREN(thebits : TBits_1); inline;
  15861. procedure setTXABAT(thebits : TBits_1); inline;
  15862. procedure setTXEN(thebits : TBits_1); inline;
  15863. procedure setTXERR(thebits : TBits_1); inline;
  15864. procedure setTXLARB(thebits : TBits_1); inline;
  15865. procedure setTXPRI(thebits : TBits_2); inline;
  15866. procedure setTXREQ(thebits : TBits_1); inline;
  15867. procedure setUINC(thebits : TBits_1); inline;
  15868. procedure setw(thebits : TBits_32); inline;
  15869. public
  15870. procedure clearDONLY; inline;
  15871. procedure clearFRESET; inline;
  15872. procedure clearRTREN; inline;
  15873. procedure clearTXABAT; inline;
  15874. procedure clearTXEN; inline;
  15875. procedure clearTXERR; inline;
  15876. procedure clearTXLARB; inline;
  15877. procedure clearTXREQ; inline;
  15878. procedure clearUINC; inline;
  15879. procedure setDONLY; inline;
  15880. procedure setFRESET; inline;
  15881. procedure setRTREN; inline;
  15882. procedure setTXABAT; inline;
  15883. procedure setTXEN; inline;
  15884. procedure setTXERR; inline;
  15885. procedure setTXLARB; inline;
  15886. procedure setTXREQ; inline;
  15887. procedure setUINC; inline;
  15888. property DONLY : TBits_1 read getDONLY write setDONLY;
  15889. property FRESET : TBits_1 read getFRESET write setFRESET;
  15890. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  15891. property RTREN : TBits_1 read getRTREN write setRTREN;
  15892. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  15893. property TXEN : TBits_1 read getTXEN write setTXEN;
  15894. property TXERR : TBits_1 read getTXERR write setTXERR;
  15895. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  15896. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  15897. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  15898. property UINC : TBits_1 read getUINC write setUINC;
  15899. property w : TBits_32 read getw write setw;
  15900. end;
  15901. TCAN1_C1FIFOINT7 = record
  15902. private
  15903. function getRXFULLIE : TBits_1; inline;
  15904. function getRXFULLIF : TBits_1; inline;
  15905. function getRXHALFIE : TBits_1; inline;
  15906. function getRXHALFIF : TBits_1; inline;
  15907. function getRXNEMPTYIE : TBits_1; inline;
  15908. function getRXNEMPTYIF : TBits_1; inline;
  15909. function getRXOVFLIE : TBits_1; inline;
  15910. function getRXOVFLIF : TBits_1; inline;
  15911. function getTXEMPTYIE : TBits_1; inline;
  15912. function getTXEMPTYIF : TBits_1; inline;
  15913. function getTXHALFIE : TBits_1; inline;
  15914. function getTXHALFIF : TBits_1; inline;
  15915. function getTXNFULLIE : TBits_1; inline;
  15916. function getTXNFULLIF : TBits_1; inline;
  15917. function getw : TBits_32; inline;
  15918. procedure setRXFULLIE(thebits : TBits_1); inline;
  15919. procedure setRXFULLIF(thebits : TBits_1); inline;
  15920. procedure setRXHALFIE(thebits : TBits_1); inline;
  15921. procedure setRXHALFIF(thebits : TBits_1); inline;
  15922. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  15923. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  15924. procedure setRXOVFLIE(thebits : TBits_1); inline;
  15925. procedure setRXOVFLIF(thebits : TBits_1); inline;
  15926. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  15927. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  15928. procedure setTXHALFIE(thebits : TBits_1); inline;
  15929. procedure setTXHALFIF(thebits : TBits_1); inline;
  15930. procedure setTXNFULLIE(thebits : TBits_1); inline;
  15931. procedure setTXNFULLIF(thebits : TBits_1); inline;
  15932. procedure setw(thebits : TBits_32); inline;
  15933. public
  15934. procedure clearRXFULLIE; inline;
  15935. procedure clearRXFULLIF; inline;
  15936. procedure clearRXHALFIE; inline;
  15937. procedure clearRXHALFIF; inline;
  15938. procedure clearRXNEMPTYIE; inline;
  15939. procedure clearRXNEMPTYIF; inline;
  15940. procedure clearRXOVFLIE; inline;
  15941. procedure clearRXOVFLIF; inline;
  15942. procedure clearTXEMPTYIE; inline;
  15943. procedure clearTXEMPTYIF; inline;
  15944. procedure clearTXHALFIE; inline;
  15945. procedure clearTXHALFIF; inline;
  15946. procedure clearTXNFULLIE; inline;
  15947. procedure clearTXNFULLIF; inline;
  15948. procedure setRXFULLIE; inline;
  15949. procedure setRXFULLIF; inline;
  15950. procedure setRXHALFIE; inline;
  15951. procedure setRXHALFIF; inline;
  15952. procedure setRXNEMPTYIE; inline;
  15953. procedure setRXNEMPTYIF; inline;
  15954. procedure setRXOVFLIE; inline;
  15955. procedure setRXOVFLIF; inline;
  15956. procedure setTXEMPTYIE; inline;
  15957. procedure setTXEMPTYIF; inline;
  15958. procedure setTXHALFIE; inline;
  15959. procedure setTXHALFIF; inline;
  15960. procedure setTXNFULLIE; inline;
  15961. procedure setTXNFULLIF; inline;
  15962. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  15963. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  15964. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  15965. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  15966. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  15967. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  15968. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  15969. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  15970. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  15971. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  15972. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  15973. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  15974. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  15975. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  15976. property w : TBits_32 read getw write setw;
  15977. end;
  15978. TCAN1_C1FIFOCI7 = record
  15979. private
  15980. function getCFIFOCI : TBits_5; inline;
  15981. function getw : TBits_32; inline;
  15982. procedure setCFIFOCI(thebits : TBits_5); inline;
  15983. procedure setw(thebits : TBits_32); inline;
  15984. public
  15985. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  15986. property w : TBits_32 read getw write setw;
  15987. end;
  15988. TCAN1_C1FIFOCON8 = record
  15989. private
  15990. function getDONLY : TBits_1; inline;
  15991. function getFRESET : TBits_1; inline;
  15992. function getFSIZE : TBits_5; inline;
  15993. function getRTREN : TBits_1; inline;
  15994. function getTXABAT : TBits_1; inline;
  15995. function getTXEN : TBits_1; inline;
  15996. function getTXERR : TBits_1; inline;
  15997. function getTXLARB : TBits_1; inline;
  15998. function getTXPRI : TBits_2; inline;
  15999. function getTXREQ : TBits_1; inline;
  16000. function getUINC : TBits_1; inline;
  16001. function getw : TBits_32; inline;
  16002. procedure setDONLY(thebits : TBits_1); inline;
  16003. procedure setFRESET(thebits : TBits_1); inline;
  16004. procedure setFSIZE(thebits : TBits_5); inline;
  16005. procedure setRTREN(thebits : TBits_1); inline;
  16006. procedure setTXABAT(thebits : TBits_1); inline;
  16007. procedure setTXEN(thebits : TBits_1); inline;
  16008. procedure setTXERR(thebits : TBits_1); inline;
  16009. procedure setTXLARB(thebits : TBits_1); inline;
  16010. procedure setTXPRI(thebits : TBits_2); inline;
  16011. procedure setTXREQ(thebits : TBits_1); inline;
  16012. procedure setUINC(thebits : TBits_1); inline;
  16013. procedure setw(thebits : TBits_32); inline;
  16014. public
  16015. procedure clearDONLY; inline;
  16016. procedure clearFRESET; inline;
  16017. procedure clearRTREN; inline;
  16018. procedure clearTXABAT; inline;
  16019. procedure clearTXEN; inline;
  16020. procedure clearTXERR; inline;
  16021. procedure clearTXLARB; inline;
  16022. procedure clearTXREQ; inline;
  16023. procedure clearUINC; inline;
  16024. procedure setDONLY; inline;
  16025. procedure setFRESET; inline;
  16026. procedure setRTREN; inline;
  16027. procedure setTXABAT; inline;
  16028. procedure setTXEN; inline;
  16029. procedure setTXERR; inline;
  16030. procedure setTXLARB; inline;
  16031. procedure setTXREQ; inline;
  16032. procedure setUINC; inline;
  16033. property DONLY : TBits_1 read getDONLY write setDONLY;
  16034. property FRESET : TBits_1 read getFRESET write setFRESET;
  16035. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  16036. property RTREN : TBits_1 read getRTREN write setRTREN;
  16037. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  16038. property TXEN : TBits_1 read getTXEN write setTXEN;
  16039. property TXERR : TBits_1 read getTXERR write setTXERR;
  16040. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  16041. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  16042. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  16043. property UINC : TBits_1 read getUINC write setUINC;
  16044. property w : TBits_32 read getw write setw;
  16045. end;
  16046. TCAN1_C1FIFOINT8 = record
  16047. private
  16048. function getRXFULLIE : TBits_1; inline;
  16049. function getRXFULLIF : TBits_1; inline;
  16050. function getRXHALFIE : TBits_1; inline;
  16051. function getRXHALFIF : TBits_1; inline;
  16052. function getRXNEMPTYIE : TBits_1; inline;
  16053. function getRXNEMPTYIF : TBits_1; inline;
  16054. function getRXOVFLIE : TBits_1; inline;
  16055. function getRXOVFLIF : TBits_1; inline;
  16056. function getTXEMPTYIE : TBits_1; inline;
  16057. function getTXEMPTYIF : TBits_1; inline;
  16058. function getTXHALFIE : TBits_1; inline;
  16059. function getTXHALFIF : TBits_1; inline;
  16060. function getTXNFULLIE : TBits_1; inline;
  16061. function getTXNFULLIF : TBits_1; inline;
  16062. function getw : TBits_32; inline;
  16063. procedure setRXFULLIE(thebits : TBits_1); inline;
  16064. procedure setRXFULLIF(thebits : TBits_1); inline;
  16065. procedure setRXHALFIE(thebits : TBits_1); inline;
  16066. procedure setRXHALFIF(thebits : TBits_1); inline;
  16067. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  16068. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  16069. procedure setRXOVFLIE(thebits : TBits_1); inline;
  16070. procedure setRXOVFLIF(thebits : TBits_1); inline;
  16071. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  16072. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  16073. procedure setTXHALFIE(thebits : TBits_1); inline;
  16074. procedure setTXHALFIF(thebits : TBits_1); inline;
  16075. procedure setTXNFULLIE(thebits : TBits_1); inline;
  16076. procedure setTXNFULLIF(thebits : TBits_1); inline;
  16077. procedure setw(thebits : TBits_32); inline;
  16078. public
  16079. procedure clearRXFULLIE; inline;
  16080. procedure clearRXFULLIF; inline;
  16081. procedure clearRXHALFIE; inline;
  16082. procedure clearRXHALFIF; inline;
  16083. procedure clearRXNEMPTYIE; inline;
  16084. procedure clearRXNEMPTYIF; inline;
  16085. procedure clearRXOVFLIE; inline;
  16086. procedure clearRXOVFLIF; inline;
  16087. procedure clearTXEMPTYIE; inline;
  16088. procedure clearTXEMPTYIF; inline;
  16089. procedure clearTXHALFIE; inline;
  16090. procedure clearTXHALFIF; inline;
  16091. procedure clearTXNFULLIE; inline;
  16092. procedure clearTXNFULLIF; inline;
  16093. procedure setRXFULLIE; inline;
  16094. procedure setRXFULLIF; inline;
  16095. procedure setRXHALFIE; inline;
  16096. procedure setRXHALFIF; inline;
  16097. procedure setRXNEMPTYIE; inline;
  16098. procedure setRXNEMPTYIF; inline;
  16099. procedure setRXOVFLIE; inline;
  16100. procedure setRXOVFLIF; inline;
  16101. procedure setTXEMPTYIE; inline;
  16102. procedure setTXEMPTYIF; inline;
  16103. procedure setTXHALFIE; inline;
  16104. procedure setTXHALFIF; inline;
  16105. procedure setTXNFULLIE; inline;
  16106. procedure setTXNFULLIF; inline;
  16107. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  16108. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  16109. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  16110. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  16111. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  16112. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  16113. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  16114. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  16115. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  16116. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  16117. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  16118. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  16119. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  16120. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  16121. property w : TBits_32 read getw write setw;
  16122. end;
  16123. TCAN1_C1FIFOCI8 = record
  16124. private
  16125. function getCFIFOCI : TBits_5; inline;
  16126. function getw : TBits_32; inline;
  16127. procedure setCFIFOCI(thebits : TBits_5); inline;
  16128. procedure setw(thebits : TBits_32); inline;
  16129. public
  16130. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  16131. property w : TBits_32 read getw write setw;
  16132. end;
  16133. TCAN1_C1FIFOCON9 = record
  16134. private
  16135. function getDONLY : TBits_1; inline;
  16136. function getFRESET : TBits_1; inline;
  16137. function getFSIZE : TBits_5; inline;
  16138. function getRTREN : TBits_1; inline;
  16139. function getTXABAT : TBits_1; inline;
  16140. function getTXEN : TBits_1; inline;
  16141. function getTXERR : TBits_1; inline;
  16142. function getTXLARB : TBits_1; inline;
  16143. function getTXPRI : TBits_2; inline;
  16144. function getTXREQ : TBits_1; inline;
  16145. function getUINC : TBits_1; inline;
  16146. function getw : TBits_32; inline;
  16147. procedure setDONLY(thebits : TBits_1); inline;
  16148. procedure setFRESET(thebits : TBits_1); inline;
  16149. procedure setFSIZE(thebits : TBits_5); inline;
  16150. procedure setRTREN(thebits : TBits_1); inline;
  16151. procedure setTXABAT(thebits : TBits_1); inline;
  16152. procedure setTXEN(thebits : TBits_1); inline;
  16153. procedure setTXERR(thebits : TBits_1); inline;
  16154. procedure setTXLARB(thebits : TBits_1); inline;
  16155. procedure setTXPRI(thebits : TBits_2); inline;
  16156. procedure setTXREQ(thebits : TBits_1); inline;
  16157. procedure setUINC(thebits : TBits_1); inline;
  16158. procedure setw(thebits : TBits_32); inline;
  16159. public
  16160. procedure clearDONLY; inline;
  16161. procedure clearFRESET; inline;
  16162. procedure clearRTREN; inline;
  16163. procedure clearTXABAT; inline;
  16164. procedure clearTXEN; inline;
  16165. procedure clearTXERR; inline;
  16166. procedure clearTXLARB; inline;
  16167. procedure clearTXREQ; inline;
  16168. procedure clearUINC; inline;
  16169. procedure setDONLY; inline;
  16170. procedure setFRESET; inline;
  16171. procedure setRTREN; inline;
  16172. procedure setTXABAT; inline;
  16173. procedure setTXEN; inline;
  16174. procedure setTXERR; inline;
  16175. procedure setTXLARB; inline;
  16176. procedure setTXREQ; inline;
  16177. procedure setUINC; inline;
  16178. property DONLY : TBits_1 read getDONLY write setDONLY;
  16179. property FRESET : TBits_1 read getFRESET write setFRESET;
  16180. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  16181. property RTREN : TBits_1 read getRTREN write setRTREN;
  16182. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  16183. property TXEN : TBits_1 read getTXEN write setTXEN;
  16184. property TXERR : TBits_1 read getTXERR write setTXERR;
  16185. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  16186. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  16187. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  16188. property UINC : TBits_1 read getUINC write setUINC;
  16189. property w : TBits_32 read getw write setw;
  16190. end;
  16191. TCAN1_C1FIFOINT9 = record
  16192. private
  16193. function getRXFULLIE : TBits_1; inline;
  16194. function getRXFULLIF : TBits_1; inline;
  16195. function getRXHALFIE : TBits_1; inline;
  16196. function getRXHALFIF : TBits_1; inline;
  16197. function getRXNEMPTYIE : TBits_1; inline;
  16198. function getRXNEMPTYIF : TBits_1; inline;
  16199. function getRXOVFLIE : TBits_1; inline;
  16200. function getRXOVFLIF : TBits_1; inline;
  16201. function getTXEMPTYIE : TBits_1; inline;
  16202. function getTXEMPTYIF : TBits_1; inline;
  16203. function getTXHALFIE : TBits_1; inline;
  16204. function getTXHALFIF : TBits_1; inline;
  16205. function getTXNFULLIE : TBits_1; inline;
  16206. function getTXNFULLIF : TBits_1; inline;
  16207. function getw : TBits_32; inline;
  16208. procedure setRXFULLIE(thebits : TBits_1); inline;
  16209. procedure setRXFULLIF(thebits : TBits_1); inline;
  16210. procedure setRXHALFIE(thebits : TBits_1); inline;
  16211. procedure setRXHALFIF(thebits : TBits_1); inline;
  16212. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  16213. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  16214. procedure setRXOVFLIE(thebits : TBits_1); inline;
  16215. procedure setRXOVFLIF(thebits : TBits_1); inline;
  16216. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  16217. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  16218. procedure setTXHALFIE(thebits : TBits_1); inline;
  16219. procedure setTXHALFIF(thebits : TBits_1); inline;
  16220. procedure setTXNFULLIE(thebits : TBits_1); inline;
  16221. procedure setTXNFULLIF(thebits : TBits_1); inline;
  16222. procedure setw(thebits : TBits_32); inline;
  16223. public
  16224. procedure clearRXFULLIE; inline;
  16225. procedure clearRXFULLIF; inline;
  16226. procedure clearRXHALFIE; inline;
  16227. procedure clearRXHALFIF; inline;
  16228. procedure clearRXNEMPTYIE; inline;
  16229. procedure clearRXNEMPTYIF; inline;
  16230. procedure clearRXOVFLIE; inline;
  16231. procedure clearRXOVFLIF; inline;
  16232. procedure clearTXEMPTYIE; inline;
  16233. procedure clearTXEMPTYIF; inline;
  16234. procedure clearTXHALFIE; inline;
  16235. procedure clearTXHALFIF; inline;
  16236. procedure clearTXNFULLIE; inline;
  16237. procedure clearTXNFULLIF; inline;
  16238. procedure setRXFULLIE; inline;
  16239. procedure setRXFULLIF; inline;
  16240. procedure setRXHALFIE; inline;
  16241. procedure setRXHALFIF; inline;
  16242. procedure setRXNEMPTYIE; inline;
  16243. procedure setRXNEMPTYIF; inline;
  16244. procedure setRXOVFLIE; inline;
  16245. procedure setRXOVFLIF; inline;
  16246. procedure setTXEMPTYIE; inline;
  16247. procedure setTXEMPTYIF; inline;
  16248. procedure setTXHALFIE; inline;
  16249. procedure setTXHALFIF; inline;
  16250. procedure setTXNFULLIE; inline;
  16251. procedure setTXNFULLIF; inline;
  16252. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  16253. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  16254. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  16255. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  16256. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  16257. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  16258. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  16259. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  16260. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  16261. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  16262. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  16263. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  16264. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  16265. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  16266. property w : TBits_32 read getw write setw;
  16267. end;
  16268. TCAN1_C1FIFOCI9 = record
  16269. private
  16270. function getCFIFOCI : TBits_5; inline;
  16271. function getw : TBits_32; inline;
  16272. procedure setCFIFOCI(thebits : TBits_5); inline;
  16273. procedure setw(thebits : TBits_32); inline;
  16274. public
  16275. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  16276. property w : TBits_32 read getw write setw;
  16277. end;
  16278. TCAN1_C1FIFOCON10 = record
  16279. private
  16280. function getDONLY : TBits_1; inline;
  16281. function getFRESET : TBits_1; inline;
  16282. function getFSIZE : TBits_5; inline;
  16283. function getRTREN : TBits_1; inline;
  16284. function getTXABAT : TBits_1; inline;
  16285. function getTXEN : TBits_1; inline;
  16286. function getTXERR : TBits_1; inline;
  16287. function getTXLARB : TBits_1; inline;
  16288. function getTXPRI : TBits_2; inline;
  16289. function getTXREQ : TBits_1; inline;
  16290. function getUINC : TBits_1; inline;
  16291. function getw : TBits_32; inline;
  16292. procedure setDONLY(thebits : TBits_1); inline;
  16293. procedure setFRESET(thebits : TBits_1); inline;
  16294. procedure setFSIZE(thebits : TBits_5); inline;
  16295. procedure setRTREN(thebits : TBits_1); inline;
  16296. procedure setTXABAT(thebits : TBits_1); inline;
  16297. procedure setTXEN(thebits : TBits_1); inline;
  16298. procedure setTXERR(thebits : TBits_1); inline;
  16299. procedure setTXLARB(thebits : TBits_1); inline;
  16300. procedure setTXPRI(thebits : TBits_2); inline;
  16301. procedure setTXREQ(thebits : TBits_1); inline;
  16302. procedure setUINC(thebits : TBits_1); inline;
  16303. procedure setw(thebits : TBits_32); inline;
  16304. public
  16305. procedure clearDONLY; inline;
  16306. procedure clearFRESET; inline;
  16307. procedure clearRTREN; inline;
  16308. procedure clearTXABAT; inline;
  16309. procedure clearTXEN; inline;
  16310. procedure clearTXERR; inline;
  16311. procedure clearTXLARB; inline;
  16312. procedure clearTXREQ; inline;
  16313. procedure clearUINC; inline;
  16314. procedure setDONLY; inline;
  16315. procedure setFRESET; inline;
  16316. procedure setRTREN; inline;
  16317. procedure setTXABAT; inline;
  16318. procedure setTXEN; inline;
  16319. procedure setTXERR; inline;
  16320. procedure setTXLARB; inline;
  16321. procedure setTXREQ; inline;
  16322. procedure setUINC; inline;
  16323. property DONLY : TBits_1 read getDONLY write setDONLY;
  16324. property FRESET : TBits_1 read getFRESET write setFRESET;
  16325. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  16326. property RTREN : TBits_1 read getRTREN write setRTREN;
  16327. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  16328. property TXEN : TBits_1 read getTXEN write setTXEN;
  16329. property TXERR : TBits_1 read getTXERR write setTXERR;
  16330. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  16331. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  16332. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  16333. property UINC : TBits_1 read getUINC write setUINC;
  16334. property w : TBits_32 read getw write setw;
  16335. end;
  16336. TCAN1_C1FIFOINT10 = record
  16337. private
  16338. function getRXFULLIE : TBits_1; inline;
  16339. function getRXFULLIF : TBits_1; inline;
  16340. function getRXHALFIE : TBits_1; inline;
  16341. function getRXHALFIF : TBits_1; inline;
  16342. function getRXNEMPTYIE : TBits_1; inline;
  16343. function getRXNEMPTYIF : TBits_1; inline;
  16344. function getRXOVFLIE : TBits_1; inline;
  16345. function getRXOVFLIF : TBits_1; inline;
  16346. function getTXEMPTYIE : TBits_1; inline;
  16347. function getTXEMPTYIF : TBits_1; inline;
  16348. function getTXHALFIE : TBits_1; inline;
  16349. function getTXHALFIF : TBits_1; inline;
  16350. function getTXNFULLIE : TBits_1; inline;
  16351. function getTXNFULLIF : TBits_1; inline;
  16352. function getw : TBits_32; inline;
  16353. procedure setRXFULLIE(thebits : TBits_1); inline;
  16354. procedure setRXFULLIF(thebits : TBits_1); inline;
  16355. procedure setRXHALFIE(thebits : TBits_1); inline;
  16356. procedure setRXHALFIF(thebits : TBits_1); inline;
  16357. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  16358. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  16359. procedure setRXOVFLIE(thebits : TBits_1); inline;
  16360. procedure setRXOVFLIF(thebits : TBits_1); inline;
  16361. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  16362. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  16363. procedure setTXHALFIE(thebits : TBits_1); inline;
  16364. procedure setTXHALFIF(thebits : TBits_1); inline;
  16365. procedure setTXNFULLIE(thebits : TBits_1); inline;
  16366. procedure setTXNFULLIF(thebits : TBits_1); inline;
  16367. procedure setw(thebits : TBits_32); inline;
  16368. public
  16369. procedure clearRXFULLIE; inline;
  16370. procedure clearRXFULLIF; inline;
  16371. procedure clearRXHALFIE; inline;
  16372. procedure clearRXHALFIF; inline;
  16373. procedure clearRXNEMPTYIE; inline;
  16374. procedure clearRXNEMPTYIF; inline;
  16375. procedure clearRXOVFLIE; inline;
  16376. procedure clearRXOVFLIF; inline;
  16377. procedure clearTXEMPTYIE; inline;
  16378. procedure clearTXEMPTYIF; inline;
  16379. procedure clearTXHALFIE; inline;
  16380. procedure clearTXHALFIF; inline;
  16381. procedure clearTXNFULLIE; inline;
  16382. procedure clearTXNFULLIF; inline;
  16383. procedure setRXFULLIE; inline;
  16384. procedure setRXFULLIF; inline;
  16385. procedure setRXHALFIE; inline;
  16386. procedure setRXHALFIF; inline;
  16387. procedure setRXNEMPTYIE; inline;
  16388. procedure setRXNEMPTYIF; inline;
  16389. procedure setRXOVFLIE; inline;
  16390. procedure setRXOVFLIF; inline;
  16391. procedure setTXEMPTYIE; inline;
  16392. procedure setTXEMPTYIF; inline;
  16393. procedure setTXHALFIE; inline;
  16394. procedure setTXHALFIF; inline;
  16395. procedure setTXNFULLIE; inline;
  16396. procedure setTXNFULLIF; inline;
  16397. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  16398. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  16399. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  16400. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  16401. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  16402. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  16403. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  16404. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  16405. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  16406. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  16407. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  16408. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  16409. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  16410. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  16411. property w : TBits_32 read getw write setw;
  16412. end;
  16413. TCAN1_C1FIFOCI10 = record
  16414. private
  16415. function getCFIFOCI : TBits_5; inline;
  16416. function getw : TBits_32; inline;
  16417. procedure setCFIFOCI(thebits : TBits_5); inline;
  16418. procedure setw(thebits : TBits_32); inline;
  16419. public
  16420. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  16421. property w : TBits_32 read getw write setw;
  16422. end;
  16423. TCAN1_C1FIFOCON11 = record
  16424. private
  16425. function getDONLY : TBits_1; inline;
  16426. function getFRESET : TBits_1; inline;
  16427. function getFSIZE : TBits_5; inline;
  16428. function getRTREN : TBits_1; inline;
  16429. function getTXABAT : TBits_1; inline;
  16430. function getTXEN : TBits_1; inline;
  16431. function getTXERR : TBits_1; inline;
  16432. function getTXLARB : TBits_1; inline;
  16433. function getTXPRI : TBits_2; inline;
  16434. function getTXREQ : TBits_1; inline;
  16435. function getUINC : TBits_1; inline;
  16436. function getw : TBits_32; inline;
  16437. procedure setDONLY(thebits : TBits_1); inline;
  16438. procedure setFRESET(thebits : TBits_1); inline;
  16439. procedure setFSIZE(thebits : TBits_5); inline;
  16440. procedure setRTREN(thebits : TBits_1); inline;
  16441. procedure setTXABAT(thebits : TBits_1); inline;
  16442. procedure setTXEN(thebits : TBits_1); inline;
  16443. procedure setTXERR(thebits : TBits_1); inline;
  16444. procedure setTXLARB(thebits : TBits_1); inline;
  16445. procedure setTXPRI(thebits : TBits_2); inline;
  16446. procedure setTXREQ(thebits : TBits_1); inline;
  16447. procedure setUINC(thebits : TBits_1); inline;
  16448. procedure setw(thebits : TBits_32); inline;
  16449. public
  16450. procedure clearDONLY; inline;
  16451. procedure clearFRESET; inline;
  16452. procedure clearRTREN; inline;
  16453. procedure clearTXABAT; inline;
  16454. procedure clearTXEN; inline;
  16455. procedure clearTXERR; inline;
  16456. procedure clearTXLARB; inline;
  16457. procedure clearTXREQ; inline;
  16458. procedure clearUINC; inline;
  16459. procedure setDONLY; inline;
  16460. procedure setFRESET; inline;
  16461. procedure setRTREN; inline;
  16462. procedure setTXABAT; inline;
  16463. procedure setTXEN; inline;
  16464. procedure setTXERR; inline;
  16465. procedure setTXLARB; inline;
  16466. procedure setTXREQ; inline;
  16467. procedure setUINC; inline;
  16468. property DONLY : TBits_1 read getDONLY write setDONLY;
  16469. property FRESET : TBits_1 read getFRESET write setFRESET;
  16470. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  16471. property RTREN : TBits_1 read getRTREN write setRTREN;
  16472. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  16473. property TXEN : TBits_1 read getTXEN write setTXEN;
  16474. property TXERR : TBits_1 read getTXERR write setTXERR;
  16475. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  16476. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  16477. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  16478. property UINC : TBits_1 read getUINC write setUINC;
  16479. property w : TBits_32 read getw write setw;
  16480. end;
  16481. TCAN1_C1FIFOINT11 = record
  16482. private
  16483. function getRXFULLIE : TBits_1; inline;
  16484. function getRXFULLIF : TBits_1; inline;
  16485. function getRXHALFIE : TBits_1; inline;
  16486. function getRXHALFIF : TBits_1; inline;
  16487. function getRXNEMPTYIE : TBits_1; inline;
  16488. function getRXNEMPTYIF : TBits_1; inline;
  16489. function getRXOVFLIE : TBits_1; inline;
  16490. function getRXOVFLIF : TBits_1; inline;
  16491. function getTXEMPTYIE : TBits_1; inline;
  16492. function getTXEMPTYIF : TBits_1; inline;
  16493. function getTXHALFIE : TBits_1; inline;
  16494. function getTXHALFIF : TBits_1; inline;
  16495. function getTXNFULLIE : TBits_1; inline;
  16496. function getTXNFULLIF : TBits_1; inline;
  16497. function getw : TBits_32; inline;
  16498. procedure setRXFULLIE(thebits : TBits_1); inline;
  16499. procedure setRXFULLIF(thebits : TBits_1); inline;
  16500. procedure setRXHALFIE(thebits : TBits_1); inline;
  16501. procedure setRXHALFIF(thebits : TBits_1); inline;
  16502. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  16503. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  16504. procedure setRXOVFLIE(thebits : TBits_1); inline;
  16505. procedure setRXOVFLIF(thebits : TBits_1); inline;
  16506. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  16507. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  16508. procedure setTXHALFIE(thebits : TBits_1); inline;
  16509. procedure setTXHALFIF(thebits : TBits_1); inline;
  16510. procedure setTXNFULLIE(thebits : TBits_1); inline;
  16511. procedure setTXNFULLIF(thebits : TBits_1); inline;
  16512. procedure setw(thebits : TBits_32); inline;
  16513. public
  16514. procedure clearRXFULLIE; inline;
  16515. procedure clearRXFULLIF; inline;
  16516. procedure clearRXHALFIE; inline;
  16517. procedure clearRXHALFIF; inline;
  16518. procedure clearRXNEMPTYIE; inline;
  16519. procedure clearRXNEMPTYIF; inline;
  16520. procedure clearRXOVFLIE; inline;
  16521. procedure clearRXOVFLIF; inline;
  16522. procedure clearTXEMPTYIE; inline;
  16523. procedure clearTXEMPTYIF; inline;
  16524. procedure clearTXHALFIE; inline;
  16525. procedure clearTXHALFIF; inline;
  16526. procedure clearTXNFULLIE; inline;
  16527. procedure clearTXNFULLIF; inline;
  16528. procedure setRXFULLIE; inline;
  16529. procedure setRXFULLIF; inline;
  16530. procedure setRXHALFIE; inline;
  16531. procedure setRXHALFIF; inline;
  16532. procedure setRXNEMPTYIE; inline;
  16533. procedure setRXNEMPTYIF; inline;
  16534. procedure setRXOVFLIE; inline;
  16535. procedure setRXOVFLIF; inline;
  16536. procedure setTXEMPTYIE; inline;
  16537. procedure setTXEMPTYIF; inline;
  16538. procedure setTXHALFIE; inline;
  16539. procedure setTXHALFIF; inline;
  16540. procedure setTXNFULLIE; inline;
  16541. procedure setTXNFULLIF; inline;
  16542. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  16543. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  16544. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  16545. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  16546. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  16547. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  16548. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  16549. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  16550. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  16551. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  16552. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  16553. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  16554. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  16555. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  16556. property w : TBits_32 read getw write setw;
  16557. end;
  16558. TCAN1_C1FIFOCI11 = record
  16559. private
  16560. function getCFIFOCI : TBits_5; inline;
  16561. function getw : TBits_32; inline;
  16562. procedure setCFIFOCI(thebits : TBits_5); inline;
  16563. procedure setw(thebits : TBits_32); inline;
  16564. public
  16565. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  16566. property w : TBits_32 read getw write setw;
  16567. end;
  16568. TCAN1_C1FIFOCON12 = record
  16569. private
  16570. function getDONLY : TBits_1; inline;
  16571. function getFRESET : TBits_1; inline;
  16572. function getFSIZE : TBits_5; inline;
  16573. function getRTREN : TBits_1; inline;
  16574. function getTXABAT : TBits_1; inline;
  16575. function getTXEN : TBits_1; inline;
  16576. function getTXERR : TBits_1; inline;
  16577. function getTXLARB : TBits_1; inline;
  16578. function getTXPRI : TBits_2; inline;
  16579. function getTXREQ : TBits_1; inline;
  16580. function getUINC : TBits_1; inline;
  16581. function getw : TBits_32; inline;
  16582. procedure setDONLY(thebits : TBits_1); inline;
  16583. procedure setFRESET(thebits : TBits_1); inline;
  16584. procedure setFSIZE(thebits : TBits_5); inline;
  16585. procedure setRTREN(thebits : TBits_1); inline;
  16586. procedure setTXABAT(thebits : TBits_1); inline;
  16587. procedure setTXEN(thebits : TBits_1); inline;
  16588. procedure setTXERR(thebits : TBits_1); inline;
  16589. procedure setTXLARB(thebits : TBits_1); inline;
  16590. procedure setTXPRI(thebits : TBits_2); inline;
  16591. procedure setTXREQ(thebits : TBits_1); inline;
  16592. procedure setUINC(thebits : TBits_1); inline;
  16593. procedure setw(thebits : TBits_32); inline;
  16594. public
  16595. procedure clearDONLY; inline;
  16596. procedure clearFRESET; inline;
  16597. procedure clearRTREN; inline;
  16598. procedure clearTXABAT; inline;
  16599. procedure clearTXEN; inline;
  16600. procedure clearTXERR; inline;
  16601. procedure clearTXLARB; inline;
  16602. procedure clearTXREQ; inline;
  16603. procedure clearUINC; inline;
  16604. procedure setDONLY; inline;
  16605. procedure setFRESET; inline;
  16606. procedure setRTREN; inline;
  16607. procedure setTXABAT; inline;
  16608. procedure setTXEN; inline;
  16609. procedure setTXERR; inline;
  16610. procedure setTXLARB; inline;
  16611. procedure setTXREQ; inline;
  16612. procedure setUINC; inline;
  16613. property DONLY : TBits_1 read getDONLY write setDONLY;
  16614. property FRESET : TBits_1 read getFRESET write setFRESET;
  16615. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  16616. property RTREN : TBits_1 read getRTREN write setRTREN;
  16617. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  16618. property TXEN : TBits_1 read getTXEN write setTXEN;
  16619. property TXERR : TBits_1 read getTXERR write setTXERR;
  16620. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  16621. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  16622. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  16623. property UINC : TBits_1 read getUINC write setUINC;
  16624. property w : TBits_32 read getw write setw;
  16625. end;
  16626. TCAN1_C1FIFOINT12 = record
  16627. private
  16628. function getRXFULLIE : TBits_1; inline;
  16629. function getRXFULLIF : TBits_1; inline;
  16630. function getRXHALFIE : TBits_1; inline;
  16631. function getRXHALFIF : TBits_1; inline;
  16632. function getRXNEMPTYIE : TBits_1; inline;
  16633. function getRXNEMPTYIF : TBits_1; inline;
  16634. function getRXOVFLIE : TBits_1; inline;
  16635. function getRXOVFLIF : TBits_1; inline;
  16636. function getTXEMPTYIE : TBits_1; inline;
  16637. function getTXEMPTYIF : TBits_1; inline;
  16638. function getTXHALFIE : TBits_1; inline;
  16639. function getTXHALFIF : TBits_1; inline;
  16640. function getTXNFULLIE : TBits_1; inline;
  16641. function getTXNFULLIF : TBits_1; inline;
  16642. function getw : TBits_32; inline;
  16643. procedure setRXFULLIE(thebits : TBits_1); inline;
  16644. procedure setRXFULLIF(thebits : TBits_1); inline;
  16645. procedure setRXHALFIE(thebits : TBits_1); inline;
  16646. procedure setRXHALFIF(thebits : TBits_1); inline;
  16647. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  16648. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  16649. procedure setRXOVFLIE(thebits : TBits_1); inline;
  16650. procedure setRXOVFLIF(thebits : TBits_1); inline;
  16651. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  16652. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  16653. procedure setTXHALFIE(thebits : TBits_1); inline;
  16654. procedure setTXHALFIF(thebits : TBits_1); inline;
  16655. procedure setTXNFULLIE(thebits : TBits_1); inline;
  16656. procedure setTXNFULLIF(thebits : TBits_1); inline;
  16657. procedure setw(thebits : TBits_32); inline;
  16658. public
  16659. procedure clearRXFULLIE; inline;
  16660. procedure clearRXFULLIF; inline;
  16661. procedure clearRXHALFIE; inline;
  16662. procedure clearRXHALFIF; inline;
  16663. procedure clearRXNEMPTYIE; inline;
  16664. procedure clearRXNEMPTYIF; inline;
  16665. procedure clearRXOVFLIE; inline;
  16666. procedure clearRXOVFLIF; inline;
  16667. procedure clearTXEMPTYIE; inline;
  16668. procedure clearTXEMPTYIF; inline;
  16669. procedure clearTXHALFIE; inline;
  16670. procedure clearTXHALFIF; inline;
  16671. procedure clearTXNFULLIE; inline;
  16672. procedure clearTXNFULLIF; inline;
  16673. procedure setRXFULLIE; inline;
  16674. procedure setRXFULLIF; inline;
  16675. procedure setRXHALFIE; inline;
  16676. procedure setRXHALFIF; inline;
  16677. procedure setRXNEMPTYIE; inline;
  16678. procedure setRXNEMPTYIF; inline;
  16679. procedure setRXOVFLIE; inline;
  16680. procedure setRXOVFLIF; inline;
  16681. procedure setTXEMPTYIE; inline;
  16682. procedure setTXEMPTYIF; inline;
  16683. procedure setTXHALFIE; inline;
  16684. procedure setTXHALFIF; inline;
  16685. procedure setTXNFULLIE; inline;
  16686. procedure setTXNFULLIF; inline;
  16687. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  16688. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  16689. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  16690. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  16691. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  16692. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  16693. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  16694. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  16695. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  16696. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  16697. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  16698. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  16699. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  16700. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  16701. property w : TBits_32 read getw write setw;
  16702. end;
  16703. TCAN1_C1FIFOCI12 = record
  16704. private
  16705. function getCFIFOCI : TBits_5; inline;
  16706. function getw : TBits_32; inline;
  16707. procedure setCFIFOCI(thebits : TBits_5); inline;
  16708. procedure setw(thebits : TBits_32); inline;
  16709. public
  16710. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  16711. property w : TBits_32 read getw write setw;
  16712. end;
  16713. TCAN1_C1FIFOCON13 = record
  16714. private
  16715. function getDONLY : TBits_1; inline;
  16716. function getFRESET : TBits_1; inline;
  16717. function getFSIZE : TBits_5; inline;
  16718. function getRTREN : TBits_1; inline;
  16719. function getTXABAT : TBits_1; inline;
  16720. function getTXEN : TBits_1; inline;
  16721. function getTXERR : TBits_1; inline;
  16722. function getTXLARB : TBits_1; inline;
  16723. function getTXPRI : TBits_2; inline;
  16724. function getTXREQ : TBits_1; inline;
  16725. function getUINC : TBits_1; inline;
  16726. function getw : TBits_32; inline;
  16727. procedure setDONLY(thebits : TBits_1); inline;
  16728. procedure setFRESET(thebits : TBits_1); inline;
  16729. procedure setFSIZE(thebits : TBits_5); inline;
  16730. procedure setRTREN(thebits : TBits_1); inline;
  16731. procedure setTXABAT(thebits : TBits_1); inline;
  16732. procedure setTXEN(thebits : TBits_1); inline;
  16733. procedure setTXERR(thebits : TBits_1); inline;
  16734. procedure setTXLARB(thebits : TBits_1); inline;
  16735. procedure setTXPRI(thebits : TBits_2); inline;
  16736. procedure setTXREQ(thebits : TBits_1); inline;
  16737. procedure setUINC(thebits : TBits_1); inline;
  16738. procedure setw(thebits : TBits_32); inline;
  16739. public
  16740. procedure clearDONLY; inline;
  16741. procedure clearFRESET; inline;
  16742. procedure clearRTREN; inline;
  16743. procedure clearTXABAT; inline;
  16744. procedure clearTXEN; inline;
  16745. procedure clearTXERR; inline;
  16746. procedure clearTXLARB; inline;
  16747. procedure clearTXREQ; inline;
  16748. procedure clearUINC; inline;
  16749. procedure setDONLY; inline;
  16750. procedure setFRESET; inline;
  16751. procedure setRTREN; inline;
  16752. procedure setTXABAT; inline;
  16753. procedure setTXEN; inline;
  16754. procedure setTXERR; inline;
  16755. procedure setTXLARB; inline;
  16756. procedure setTXREQ; inline;
  16757. procedure setUINC; inline;
  16758. property DONLY : TBits_1 read getDONLY write setDONLY;
  16759. property FRESET : TBits_1 read getFRESET write setFRESET;
  16760. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  16761. property RTREN : TBits_1 read getRTREN write setRTREN;
  16762. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  16763. property TXEN : TBits_1 read getTXEN write setTXEN;
  16764. property TXERR : TBits_1 read getTXERR write setTXERR;
  16765. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  16766. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  16767. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  16768. property UINC : TBits_1 read getUINC write setUINC;
  16769. property w : TBits_32 read getw write setw;
  16770. end;
  16771. TCAN1_C1FIFOINT13 = record
  16772. private
  16773. function getRXFULLIE : TBits_1; inline;
  16774. function getRXFULLIF : TBits_1; inline;
  16775. function getRXHALFIE : TBits_1; inline;
  16776. function getRXHALFIF : TBits_1; inline;
  16777. function getRXNEMPTYIE : TBits_1; inline;
  16778. function getRXNEMPTYIF : TBits_1; inline;
  16779. function getRXOVFLIE : TBits_1; inline;
  16780. function getRXOVFLIF : TBits_1; inline;
  16781. function getTXEMPTYIE : TBits_1; inline;
  16782. function getTXEMPTYIF : TBits_1; inline;
  16783. function getTXHALFIE : TBits_1; inline;
  16784. function getTXHALFIF : TBits_1; inline;
  16785. function getTXNFULLIE : TBits_1; inline;
  16786. function getTXNFULLIF : TBits_1; inline;
  16787. function getw : TBits_32; inline;
  16788. procedure setRXFULLIE(thebits : TBits_1); inline;
  16789. procedure setRXFULLIF(thebits : TBits_1); inline;
  16790. procedure setRXHALFIE(thebits : TBits_1); inline;
  16791. procedure setRXHALFIF(thebits : TBits_1); inline;
  16792. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  16793. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  16794. procedure setRXOVFLIE(thebits : TBits_1); inline;
  16795. procedure setRXOVFLIF(thebits : TBits_1); inline;
  16796. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  16797. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  16798. procedure setTXHALFIE(thebits : TBits_1); inline;
  16799. procedure setTXHALFIF(thebits : TBits_1); inline;
  16800. procedure setTXNFULLIE(thebits : TBits_1); inline;
  16801. procedure setTXNFULLIF(thebits : TBits_1); inline;
  16802. procedure setw(thebits : TBits_32); inline;
  16803. public
  16804. procedure clearRXFULLIE; inline;
  16805. procedure clearRXFULLIF; inline;
  16806. procedure clearRXHALFIE; inline;
  16807. procedure clearRXHALFIF; inline;
  16808. procedure clearRXNEMPTYIE; inline;
  16809. procedure clearRXNEMPTYIF; inline;
  16810. procedure clearRXOVFLIE; inline;
  16811. procedure clearRXOVFLIF; inline;
  16812. procedure clearTXEMPTYIE; inline;
  16813. procedure clearTXEMPTYIF; inline;
  16814. procedure clearTXHALFIE; inline;
  16815. procedure clearTXHALFIF; inline;
  16816. procedure clearTXNFULLIE; inline;
  16817. procedure clearTXNFULLIF; inline;
  16818. procedure setRXFULLIE; inline;
  16819. procedure setRXFULLIF; inline;
  16820. procedure setRXHALFIE; inline;
  16821. procedure setRXHALFIF; inline;
  16822. procedure setRXNEMPTYIE; inline;
  16823. procedure setRXNEMPTYIF; inline;
  16824. procedure setRXOVFLIE; inline;
  16825. procedure setRXOVFLIF; inline;
  16826. procedure setTXEMPTYIE; inline;
  16827. procedure setTXEMPTYIF; inline;
  16828. procedure setTXHALFIE; inline;
  16829. procedure setTXHALFIF; inline;
  16830. procedure setTXNFULLIE; inline;
  16831. procedure setTXNFULLIF; inline;
  16832. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  16833. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  16834. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  16835. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  16836. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  16837. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  16838. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  16839. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  16840. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  16841. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  16842. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  16843. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  16844. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  16845. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  16846. property w : TBits_32 read getw write setw;
  16847. end;
  16848. TCAN1_C1FIFOCI13 = record
  16849. private
  16850. function getCFIFOCI : TBits_5; inline;
  16851. function getw : TBits_32; inline;
  16852. procedure setCFIFOCI(thebits : TBits_5); inline;
  16853. procedure setw(thebits : TBits_32); inline;
  16854. public
  16855. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  16856. property w : TBits_32 read getw write setw;
  16857. end;
  16858. TCAN1_C1FIFOCON14 = record
  16859. private
  16860. function getDONLY : TBits_1; inline;
  16861. function getFRESET : TBits_1; inline;
  16862. function getFSIZE : TBits_5; inline;
  16863. function getRTREN : TBits_1; inline;
  16864. function getTXABAT : TBits_1; inline;
  16865. function getTXEN : TBits_1; inline;
  16866. function getTXERR : TBits_1; inline;
  16867. function getTXLARB : TBits_1; inline;
  16868. function getTXPRI : TBits_2; inline;
  16869. function getTXREQ : TBits_1; inline;
  16870. function getUINC : TBits_1; inline;
  16871. function getw : TBits_32; inline;
  16872. procedure setDONLY(thebits : TBits_1); inline;
  16873. procedure setFRESET(thebits : TBits_1); inline;
  16874. procedure setFSIZE(thebits : TBits_5); inline;
  16875. procedure setRTREN(thebits : TBits_1); inline;
  16876. procedure setTXABAT(thebits : TBits_1); inline;
  16877. procedure setTXEN(thebits : TBits_1); inline;
  16878. procedure setTXERR(thebits : TBits_1); inline;
  16879. procedure setTXLARB(thebits : TBits_1); inline;
  16880. procedure setTXPRI(thebits : TBits_2); inline;
  16881. procedure setTXREQ(thebits : TBits_1); inline;
  16882. procedure setUINC(thebits : TBits_1); inline;
  16883. procedure setw(thebits : TBits_32); inline;
  16884. public
  16885. procedure clearDONLY; inline;
  16886. procedure clearFRESET; inline;
  16887. procedure clearRTREN; inline;
  16888. procedure clearTXABAT; inline;
  16889. procedure clearTXEN; inline;
  16890. procedure clearTXERR; inline;
  16891. procedure clearTXLARB; inline;
  16892. procedure clearTXREQ; inline;
  16893. procedure clearUINC; inline;
  16894. procedure setDONLY; inline;
  16895. procedure setFRESET; inline;
  16896. procedure setRTREN; inline;
  16897. procedure setTXABAT; inline;
  16898. procedure setTXEN; inline;
  16899. procedure setTXERR; inline;
  16900. procedure setTXLARB; inline;
  16901. procedure setTXREQ; inline;
  16902. procedure setUINC; inline;
  16903. property DONLY : TBits_1 read getDONLY write setDONLY;
  16904. property FRESET : TBits_1 read getFRESET write setFRESET;
  16905. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  16906. property RTREN : TBits_1 read getRTREN write setRTREN;
  16907. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  16908. property TXEN : TBits_1 read getTXEN write setTXEN;
  16909. property TXERR : TBits_1 read getTXERR write setTXERR;
  16910. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  16911. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  16912. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  16913. property UINC : TBits_1 read getUINC write setUINC;
  16914. property w : TBits_32 read getw write setw;
  16915. end;
  16916. TCAN1_C1FIFOINT14 = record
  16917. private
  16918. function getRXFULLIE : TBits_1; inline;
  16919. function getRXFULLIF : TBits_1; inline;
  16920. function getRXHALFIE : TBits_1; inline;
  16921. function getRXHALFIF : TBits_1; inline;
  16922. function getRXNEMPTYIE : TBits_1; inline;
  16923. function getRXNEMPTYIF : TBits_1; inline;
  16924. function getRXOVFLIE : TBits_1; inline;
  16925. function getRXOVFLIF : TBits_1; inline;
  16926. function getTXEMPTYIE : TBits_1; inline;
  16927. function getTXEMPTYIF : TBits_1; inline;
  16928. function getTXHALFIE : TBits_1; inline;
  16929. function getTXHALFIF : TBits_1; inline;
  16930. function getTXNFULLIE : TBits_1; inline;
  16931. function getTXNFULLIF : TBits_1; inline;
  16932. function getw : TBits_32; inline;
  16933. procedure setRXFULLIE(thebits : TBits_1); inline;
  16934. procedure setRXFULLIF(thebits : TBits_1); inline;
  16935. procedure setRXHALFIE(thebits : TBits_1); inline;
  16936. procedure setRXHALFIF(thebits : TBits_1); inline;
  16937. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  16938. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  16939. procedure setRXOVFLIE(thebits : TBits_1); inline;
  16940. procedure setRXOVFLIF(thebits : TBits_1); inline;
  16941. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  16942. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  16943. procedure setTXHALFIE(thebits : TBits_1); inline;
  16944. procedure setTXHALFIF(thebits : TBits_1); inline;
  16945. procedure setTXNFULLIE(thebits : TBits_1); inline;
  16946. procedure setTXNFULLIF(thebits : TBits_1); inline;
  16947. procedure setw(thebits : TBits_32); inline;
  16948. public
  16949. procedure clearRXFULLIE; inline;
  16950. procedure clearRXFULLIF; inline;
  16951. procedure clearRXHALFIE; inline;
  16952. procedure clearRXHALFIF; inline;
  16953. procedure clearRXNEMPTYIE; inline;
  16954. procedure clearRXNEMPTYIF; inline;
  16955. procedure clearRXOVFLIE; inline;
  16956. procedure clearRXOVFLIF; inline;
  16957. procedure clearTXEMPTYIE; inline;
  16958. procedure clearTXEMPTYIF; inline;
  16959. procedure clearTXHALFIE; inline;
  16960. procedure clearTXHALFIF; inline;
  16961. procedure clearTXNFULLIE; inline;
  16962. procedure clearTXNFULLIF; inline;
  16963. procedure setRXFULLIE; inline;
  16964. procedure setRXFULLIF; inline;
  16965. procedure setRXHALFIE; inline;
  16966. procedure setRXHALFIF; inline;
  16967. procedure setRXNEMPTYIE; inline;
  16968. procedure setRXNEMPTYIF; inline;
  16969. procedure setRXOVFLIE; inline;
  16970. procedure setRXOVFLIF; inline;
  16971. procedure setTXEMPTYIE; inline;
  16972. procedure setTXEMPTYIF; inline;
  16973. procedure setTXHALFIE; inline;
  16974. procedure setTXHALFIF; inline;
  16975. procedure setTXNFULLIE; inline;
  16976. procedure setTXNFULLIF; inline;
  16977. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  16978. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  16979. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  16980. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  16981. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  16982. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  16983. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  16984. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  16985. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  16986. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  16987. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  16988. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  16989. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  16990. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  16991. property w : TBits_32 read getw write setw;
  16992. end;
  16993. TCAN1_C1FIFOCI14 = record
  16994. private
  16995. function getCFIFOCI : TBits_5; inline;
  16996. function getw : TBits_32; inline;
  16997. procedure setCFIFOCI(thebits : TBits_5); inline;
  16998. procedure setw(thebits : TBits_32); inline;
  16999. public
  17000. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  17001. property w : TBits_32 read getw write setw;
  17002. end;
  17003. TCAN1_C1FIFOCON15 = record
  17004. private
  17005. function getDONLY : TBits_1; inline;
  17006. function getFRESET : TBits_1; inline;
  17007. function getFSIZE : TBits_5; inline;
  17008. function getRTREN : TBits_1; inline;
  17009. function getTXABAT : TBits_1; inline;
  17010. function getTXEN : TBits_1; inline;
  17011. function getTXERR : TBits_1; inline;
  17012. function getTXLARB : TBits_1; inline;
  17013. function getTXPRI : TBits_2; inline;
  17014. function getTXREQ : TBits_1; inline;
  17015. function getUINC : TBits_1; inline;
  17016. function getw : TBits_32; inline;
  17017. procedure setDONLY(thebits : TBits_1); inline;
  17018. procedure setFRESET(thebits : TBits_1); inline;
  17019. procedure setFSIZE(thebits : TBits_5); inline;
  17020. procedure setRTREN(thebits : TBits_1); inline;
  17021. procedure setTXABAT(thebits : TBits_1); inline;
  17022. procedure setTXEN(thebits : TBits_1); inline;
  17023. procedure setTXERR(thebits : TBits_1); inline;
  17024. procedure setTXLARB(thebits : TBits_1); inline;
  17025. procedure setTXPRI(thebits : TBits_2); inline;
  17026. procedure setTXREQ(thebits : TBits_1); inline;
  17027. procedure setUINC(thebits : TBits_1); inline;
  17028. procedure setw(thebits : TBits_32); inline;
  17029. public
  17030. procedure clearDONLY; inline;
  17031. procedure clearFRESET; inline;
  17032. procedure clearRTREN; inline;
  17033. procedure clearTXABAT; inline;
  17034. procedure clearTXEN; inline;
  17035. procedure clearTXERR; inline;
  17036. procedure clearTXLARB; inline;
  17037. procedure clearTXREQ; inline;
  17038. procedure clearUINC; inline;
  17039. procedure setDONLY; inline;
  17040. procedure setFRESET; inline;
  17041. procedure setRTREN; inline;
  17042. procedure setTXABAT; inline;
  17043. procedure setTXEN; inline;
  17044. procedure setTXERR; inline;
  17045. procedure setTXLARB; inline;
  17046. procedure setTXREQ; inline;
  17047. procedure setUINC; inline;
  17048. property DONLY : TBits_1 read getDONLY write setDONLY;
  17049. property FRESET : TBits_1 read getFRESET write setFRESET;
  17050. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  17051. property RTREN : TBits_1 read getRTREN write setRTREN;
  17052. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  17053. property TXEN : TBits_1 read getTXEN write setTXEN;
  17054. property TXERR : TBits_1 read getTXERR write setTXERR;
  17055. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  17056. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  17057. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  17058. property UINC : TBits_1 read getUINC write setUINC;
  17059. property w : TBits_32 read getw write setw;
  17060. end;
  17061. TCAN1_C1FIFOINT15 = record
  17062. private
  17063. function getRXFULLIE : TBits_1; inline;
  17064. function getRXFULLIF : TBits_1; inline;
  17065. function getRXHALFIE : TBits_1; inline;
  17066. function getRXHALFIF : TBits_1; inline;
  17067. function getRXNEMPTYIE : TBits_1; inline;
  17068. function getRXNEMPTYIF : TBits_1; inline;
  17069. function getRXOVFLIE : TBits_1; inline;
  17070. function getRXOVFLIF : TBits_1; inline;
  17071. function getTXEMPTYIE : TBits_1; inline;
  17072. function getTXEMPTYIF : TBits_1; inline;
  17073. function getTXHALFIE : TBits_1; inline;
  17074. function getTXHALFIF : TBits_1; inline;
  17075. function getTXNFULLIE : TBits_1; inline;
  17076. function getTXNFULLIF : TBits_1; inline;
  17077. function getw : TBits_32; inline;
  17078. procedure setRXFULLIE(thebits : TBits_1); inline;
  17079. procedure setRXFULLIF(thebits : TBits_1); inline;
  17080. procedure setRXHALFIE(thebits : TBits_1); inline;
  17081. procedure setRXHALFIF(thebits : TBits_1); inline;
  17082. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  17083. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  17084. procedure setRXOVFLIE(thebits : TBits_1); inline;
  17085. procedure setRXOVFLIF(thebits : TBits_1); inline;
  17086. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  17087. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  17088. procedure setTXHALFIE(thebits : TBits_1); inline;
  17089. procedure setTXHALFIF(thebits : TBits_1); inline;
  17090. procedure setTXNFULLIE(thebits : TBits_1); inline;
  17091. procedure setTXNFULLIF(thebits : TBits_1); inline;
  17092. procedure setw(thebits : TBits_32); inline;
  17093. public
  17094. procedure clearRXFULLIE; inline;
  17095. procedure clearRXFULLIF; inline;
  17096. procedure clearRXHALFIE; inline;
  17097. procedure clearRXHALFIF; inline;
  17098. procedure clearRXNEMPTYIE; inline;
  17099. procedure clearRXNEMPTYIF; inline;
  17100. procedure clearRXOVFLIE; inline;
  17101. procedure clearRXOVFLIF; inline;
  17102. procedure clearTXEMPTYIE; inline;
  17103. procedure clearTXEMPTYIF; inline;
  17104. procedure clearTXHALFIE; inline;
  17105. procedure clearTXHALFIF; inline;
  17106. procedure clearTXNFULLIE; inline;
  17107. procedure clearTXNFULLIF; inline;
  17108. procedure setRXFULLIE; inline;
  17109. procedure setRXFULLIF; inline;
  17110. procedure setRXHALFIE; inline;
  17111. procedure setRXHALFIF; inline;
  17112. procedure setRXNEMPTYIE; inline;
  17113. procedure setRXNEMPTYIF; inline;
  17114. procedure setRXOVFLIE; inline;
  17115. procedure setRXOVFLIF; inline;
  17116. procedure setTXEMPTYIE; inline;
  17117. procedure setTXEMPTYIF; inline;
  17118. procedure setTXHALFIE; inline;
  17119. procedure setTXHALFIF; inline;
  17120. procedure setTXNFULLIE; inline;
  17121. procedure setTXNFULLIF; inline;
  17122. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  17123. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  17124. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  17125. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  17126. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  17127. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  17128. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  17129. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  17130. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  17131. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  17132. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  17133. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  17134. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  17135. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  17136. property w : TBits_32 read getw write setw;
  17137. end;
  17138. TCAN1_C1FIFOCI15 = record
  17139. private
  17140. function getCFIFOCI : TBits_5; inline;
  17141. function getw : TBits_32; inline;
  17142. procedure setCFIFOCI(thebits : TBits_5); inline;
  17143. procedure setw(thebits : TBits_32); inline;
  17144. public
  17145. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  17146. property w : TBits_32 read getw write setw;
  17147. end;
  17148. TCAN1_C1FIFOCON16 = record
  17149. private
  17150. function getDONLY : TBits_1; inline;
  17151. function getFRESET : TBits_1; inline;
  17152. function getFSIZE : TBits_5; inline;
  17153. function getRTREN : TBits_1; inline;
  17154. function getTXABAT : TBits_1; inline;
  17155. function getTXEN : TBits_1; inline;
  17156. function getTXERR : TBits_1; inline;
  17157. function getTXLARB : TBits_1; inline;
  17158. function getTXPRI : TBits_2; inline;
  17159. function getTXREQ : TBits_1; inline;
  17160. function getUINC : TBits_1; inline;
  17161. function getw : TBits_32; inline;
  17162. procedure setDONLY(thebits : TBits_1); inline;
  17163. procedure setFRESET(thebits : TBits_1); inline;
  17164. procedure setFSIZE(thebits : TBits_5); inline;
  17165. procedure setRTREN(thebits : TBits_1); inline;
  17166. procedure setTXABAT(thebits : TBits_1); inline;
  17167. procedure setTXEN(thebits : TBits_1); inline;
  17168. procedure setTXERR(thebits : TBits_1); inline;
  17169. procedure setTXLARB(thebits : TBits_1); inline;
  17170. procedure setTXPRI(thebits : TBits_2); inline;
  17171. procedure setTXREQ(thebits : TBits_1); inline;
  17172. procedure setUINC(thebits : TBits_1); inline;
  17173. procedure setw(thebits : TBits_32); inline;
  17174. public
  17175. procedure clearDONLY; inline;
  17176. procedure clearFRESET; inline;
  17177. procedure clearRTREN; inline;
  17178. procedure clearTXABAT; inline;
  17179. procedure clearTXEN; inline;
  17180. procedure clearTXERR; inline;
  17181. procedure clearTXLARB; inline;
  17182. procedure clearTXREQ; inline;
  17183. procedure clearUINC; inline;
  17184. procedure setDONLY; inline;
  17185. procedure setFRESET; inline;
  17186. procedure setRTREN; inline;
  17187. procedure setTXABAT; inline;
  17188. procedure setTXEN; inline;
  17189. procedure setTXERR; inline;
  17190. procedure setTXLARB; inline;
  17191. procedure setTXREQ; inline;
  17192. procedure setUINC; inline;
  17193. property DONLY : TBits_1 read getDONLY write setDONLY;
  17194. property FRESET : TBits_1 read getFRESET write setFRESET;
  17195. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  17196. property RTREN : TBits_1 read getRTREN write setRTREN;
  17197. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  17198. property TXEN : TBits_1 read getTXEN write setTXEN;
  17199. property TXERR : TBits_1 read getTXERR write setTXERR;
  17200. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  17201. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  17202. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  17203. property UINC : TBits_1 read getUINC write setUINC;
  17204. property w : TBits_32 read getw write setw;
  17205. end;
  17206. TCAN1_C1FIFOINT16 = record
  17207. private
  17208. function getRXFULLIE : TBits_1; inline;
  17209. function getRXFULLIF : TBits_1; inline;
  17210. function getRXHALFIE : TBits_1; inline;
  17211. function getRXHALFIF : TBits_1; inline;
  17212. function getRXNEMPTYIE : TBits_1; inline;
  17213. function getRXNEMPTYIF : TBits_1; inline;
  17214. function getRXOVFLIE : TBits_1; inline;
  17215. function getRXOVFLIF : TBits_1; inline;
  17216. function getTXEMPTYIE : TBits_1; inline;
  17217. function getTXEMPTYIF : TBits_1; inline;
  17218. function getTXHALFIE : TBits_1; inline;
  17219. function getTXHALFIF : TBits_1; inline;
  17220. function getTXNFULLIE : TBits_1; inline;
  17221. function getTXNFULLIF : TBits_1; inline;
  17222. function getw : TBits_32; inline;
  17223. procedure setRXFULLIE(thebits : TBits_1); inline;
  17224. procedure setRXFULLIF(thebits : TBits_1); inline;
  17225. procedure setRXHALFIE(thebits : TBits_1); inline;
  17226. procedure setRXHALFIF(thebits : TBits_1); inline;
  17227. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  17228. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  17229. procedure setRXOVFLIE(thebits : TBits_1); inline;
  17230. procedure setRXOVFLIF(thebits : TBits_1); inline;
  17231. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  17232. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  17233. procedure setTXHALFIE(thebits : TBits_1); inline;
  17234. procedure setTXHALFIF(thebits : TBits_1); inline;
  17235. procedure setTXNFULLIE(thebits : TBits_1); inline;
  17236. procedure setTXNFULLIF(thebits : TBits_1); inline;
  17237. procedure setw(thebits : TBits_32); inline;
  17238. public
  17239. procedure clearRXFULLIE; inline;
  17240. procedure clearRXFULLIF; inline;
  17241. procedure clearRXHALFIE; inline;
  17242. procedure clearRXHALFIF; inline;
  17243. procedure clearRXNEMPTYIE; inline;
  17244. procedure clearRXNEMPTYIF; inline;
  17245. procedure clearRXOVFLIE; inline;
  17246. procedure clearRXOVFLIF; inline;
  17247. procedure clearTXEMPTYIE; inline;
  17248. procedure clearTXEMPTYIF; inline;
  17249. procedure clearTXHALFIE; inline;
  17250. procedure clearTXHALFIF; inline;
  17251. procedure clearTXNFULLIE; inline;
  17252. procedure clearTXNFULLIF; inline;
  17253. procedure setRXFULLIE; inline;
  17254. procedure setRXFULLIF; inline;
  17255. procedure setRXHALFIE; inline;
  17256. procedure setRXHALFIF; inline;
  17257. procedure setRXNEMPTYIE; inline;
  17258. procedure setRXNEMPTYIF; inline;
  17259. procedure setRXOVFLIE; inline;
  17260. procedure setRXOVFLIF; inline;
  17261. procedure setTXEMPTYIE; inline;
  17262. procedure setTXEMPTYIF; inline;
  17263. procedure setTXHALFIE; inline;
  17264. procedure setTXHALFIF; inline;
  17265. procedure setTXNFULLIE; inline;
  17266. procedure setTXNFULLIF; inline;
  17267. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  17268. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  17269. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  17270. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  17271. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  17272. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  17273. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  17274. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  17275. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  17276. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  17277. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  17278. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  17279. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  17280. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  17281. property w : TBits_32 read getw write setw;
  17282. end;
  17283. TCAN1_C1FIFOCI16 = record
  17284. private
  17285. function getCFIFOCI : TBits_5; inline;
  17286. function getw : TBits_32; inline;
  17287. procedure setCFIFOCI(thebits : TBits_5); inline;
  17288. procedure setw(thebits : TBits_32); inline;
  17289. public
  17290. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  17291. property w : TBits_32 read getw write setw;
  17292. end;
  17293. TCAN1_C1FIFOCON17 = record
  17294. private
  17295. function getDONLY : TBits_1; inline;
  17296. function getFRESET : TBits_1; inline;
  17297. function getFSIZE : TBits_5; inline;
  17298. function getRTREN : TBits_1; inline;
  17299. function getTXABAT : TBits_1; inline;
  17300. function getTXEN : TBits_1; inline;
  17301. function getTXERR : TBits_1; inline;
  17302. function getTXLARB : TBits_1; inline;
  17303. function getTXPRI : TBits_2; inline;
  17304. function getTXREQ : TBits_1; inline;
  17305. function getUINC : TBits_1; inline;
  17306. function getw : TBits_32; inline;
  17307. procedure setDONLY(thebits : TBits_1); inline;
  17308. procedure setFRESET(thebits : TBits_1); inline;
  17309. procedure setFSIZE(thebits : TBits_5); inline;
  17310. procedure setRTREN(thebits : TBits_1); inline;
  17311. procedure setTXABAT(thebits : TBits_1); inline;
  17312. procedure setTXEN(thebits : TBits_1); inline;
  17313. procedure setTXERR(thebits : TBits_1); inline;
  17314. procedure setTXLARB(thebits : TBits_1); inline;
  17315. procedure setTXPRI(thebits : TBits_2); inline;
  17316. procedure setTXREQ(thebits : TBits_1); inline;
  17317. procedure setUINC(thebits : TBits_1); inline;
  17318. procedure setw(thebits : TBits_32); inline;
  17319. public
  17320. procedure clearDONLY; inline;
  17321. procedure clearFRESET; inline;
  17322. procedure clearRTREN; inline;
  17323. procedure clearTXABAT; inline;
  17324. procedure clearTXEN; inline;
  17325. procedure clearTXERR; inline;
  17326. procedure clearTXLARB; inline;
  17327. procedure clearTXREQ; inline;
  17328. procedure clearUINC; inline;
  17329. procedure setDONLY; inline;
  17330. procedure setFRESET; inline;
  17331. procedure setRTREN; inline;
  17332. procedure setTXABAT; inline;
  17333. procedure setTXEN; inline;
  17334. procedure setTXERR; inline;
  17335. procedure setTXLARB; inline;
  17336. procedure setTXREQ; inline;
  17337. procedure setUINC; inline;
  17338. property DONLY : TBits_1 read getDONLY write setDONLY;
  17339. property FRESET : TBits_1 read getFRESET write setFRESET;
  17340. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  17341. property RTREN : TBits_1 read getRTREN write setRTREN;
  17342. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  17343. property TXEN : TBits_1 read getTXEN write setTXEN;
  17344. property TXERR : TBits_1 read getTXERR write setTXERR;
  17345. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  17346. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  17347. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  17348. property UINC : TBits_1 read getUINC write setUINC;
  17349. property w : TBits_32 read getw write setw;
  17350. end;
  17351. TCAN1_C1FIFOINT17 = record
  17352. private
  17353. function getRXFULLIE : TBits_1; inline;
  17354. function getRXFULLIF : TBits_1; inline;
  17355. function getRXHALFIE : TBits_1; inline;
  17356. function getRXHALFIF : TBits_1; inline;
  17357. function getRXNEMPTYIE : TBits_1; inline;
  17358. function getRXNEMPTYIF : TBits_1; inline;
  17359. function getRXOVFLIE : TBits_1; inline;
  17360. function getRXOVFLIF : TBits_1; inline;
  17361. function getTXEMPTYIE : TBits_1; inline;
  17362. function getTXEMPTYIF : TBits_1; inline;
  17363. function getTXHALFIE : TBits_1; inline;
  17364. function getTXHALFIF : TBits_1; inline;
  17365. function getTXNFULLIE : TBits_1; inline;
  17366. function getTXNFULLIF : TBits_1; inline;
  17367. function getw : TBits_32; inline;
  17368. procedure setRXFULLIE(thebits : TBits_1); inline;
  17369. procedure setRXFULLIF(thebits : TBits_1); inline;
  17370. procedure setRXHALFIE(thebits : TBits_1); inline;
  17371. procedure setRXHALFIF(thebits : TBits_1); inline;
  17372. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  17373. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  17374. procedure setRXOVFLIE(thebits : TBits_1); inline;
  17375. procedure setRXOVFLIF(thebits : TBits_1); inline;
  17376. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  17377. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  17378. procedure setTXHALFIE(thebits : TBits_1); inline;
  17379. procedure setTXHALFIF(thebits : TBits_1); inline;
  17380. procedure setTXNFULLIE(thebits : TBits_1); inline;
  17381. procedure setTXNFULLIF(thebits : TBits_1); inline;
  17382. procedure setw(thebits : TBits_32); inline;
  17383. public
  17384. procedure clearRXFULLIE; inline;
  17385. procedure clearRXFULLIF; inline;
  17386. procedure clearRXHALFIE; inline;
  17387. procedure clearRXHALFIF; inline;
  17388. procedure clearRXNEMPTYIE; inline;
  17389. procedure clearRXNEMPTYIF; inline;
  17390. procedure clearRXOVFLIE; inline;
  17391. procedure clearRXOVFLIF; inline;
  17392. procedure clearTXEMPTYIE; inline;
  17393. procedure clearTXEMPTYIF; inline;
  17394. procedure clearTXHALFIE; inline;
  17395. procedure clearTXHALFIF; inline;
  17396. procedure clearTXNFULLIE; inline;
  17397. procedure clearTXNFULLIF; inline;
  17398. procedure setRXFULLIE; inline;
  17399. procedure setRXFULLIF; inline;
  17400. procedure setRXHALFIE; inline;
  17401. procedure setRXHALFIF; inline;
  17402. procedure setRXNEMPTYIE; inline;
  17403. procedure setRXNEMPTYIF; inline;
  17404. procedure setRXOVFLIE; inline;
  17405. procedure setRXOVFLIF; inline;
  17406. procedure setTXEMPTYIE; inline;
  17407. procedure setTXEMPTYIF; inline;
  17408. procedure setTXHALFIE; inline;
  17409. procedure setTXHALFIF; inline;
  17410. procedure setTXNFULLIE; inline;
  17411. procedure setTXNFULLIF; inline;
  17412. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  17413. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  17414. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  17415. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  17416. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  17417. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  17418. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  17419. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  17420. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  17421. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  17422. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  17423. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  17424. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  17425. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  17426. property w : TBits_32 read getw write setw;
  17427. end;
  17428. TCAN1_C1FIFOCI17 = record
  17429. private
  17430. function getCFIFOCI : TBits_5; inline;
  17431. function getw : TBits_32; inline;
  17432. procedure setCFIFOCI(thebits : TBits_5); inline;
  17433. procedure setw(thebits : TBits_32); inline;
  17434. public
  17435. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  17436. property w : TBits_32 read getw write setw;
  17437. end;
  17438. TCAN1_C1FIFOCON18 = record
  17439. private
  17440. function getDONLY : TBits_1; inline;
  17441. function getFRESET : TBits_1; inline;
  17442. function getFSIZE : TBits_5; inline;
  17443. function getRTREN : TBits_1; inline;
  17444. function getTXABAT : TBits_1; inline;
  17445. function getTXEN : TBits_1; inline;
  17446. function getTXERR : TBits_1; inline;
  17447. function getTXLARB : TBits_1; inline;
  17448. function getTXPRI : TBits_2; inline;
  17449. function getTXREQ : TBits_1; inline;
  17450. function getUINC : TBits_1; inline;
  17451. function getw : TBits_32; inline;
  17452. procedure setDONLY(thebits : TBits_1); inline;
  17453. procedure setFRESET(thebits : TBits_1); inline;
  17454. procedure setFSIZE(thebits : TBits_5); inline;
  17455. procedure setRTREN(thebits : TBits_1); inline;
  17456. procedure setTXABAT(thebits : TBits_1); inline;
  17457. procedure setTXEN(thebits : TBits_1); inline;
  17458. procedure setTXERR(thebits : TBits_1); inline;
  17459. procedure setTXLARB(thebits : TBits_1); inline;
  17460. procedure setTXPRI(thebits : TBits_2); inline;
  17461. procedure setTXREQ(thebits : TBits_1); inline;
  17462. procedure setUINC(thebits : TBits_1); inline;
  17463. procedure setw(thebits : TBits_32); inline;
  17464. public
  17465. procedure clearDONLY; inline;
  17466. procedure clearFRESET; inline;
  17467. procedure clearRTREN; inline;
  17468. procedure clearTXABAT; inline;
  17469. procedure clearTXEN; inline;
  17470. procedure clearTXERR; inline;
  17471. procedure clearTXLARB; inline;
  17472. procedure clearTXREQ; inline;
  17473. procedure clearUINC; inline;
  17474. procedure setDONLY; inline;
  17475. procedure setFRESET; inline;
  17476. procedure setRTREN; inline;
  17477. procedure setTXABAT; inline;
  17478. procedure setTXEN; inline;
  17479. procedure setTXERR; inline;
  17480. procedure setTXLARB; inline;
  17481. procedure setTXREQ; inline;
  17482. procedure setUINC; inline;
  17483. property DONLY : TBits_1 read getDONLY write setDONLY;
  17484. property FRESET : TBits_1 read getFRESET write setFRESET;
  17485. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  17486. property RTREN : TBits_1 read getRTREN write setRTREN;
  17487. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  17488. property TXEN : TBits_1 read getTXEN write setTXEN;
  17489. property TXERR : TBits_1 read getTXERR write setTXERR;
  17490. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  17491. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  17492. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  17493. property UINC : TBits_1 read getUINC write setUINC;
  17494. property w : TBits_32 read getw write setw;
  17495. end;
  17496. TCAN1_C1FIFOINT18 = record
  17497. private
  17498. function getRXFULLIE : TBits_1; inline;
  17499. function getRXFULLIF : TBits_1; inline;
  17500. function getRXHALFIE : TBits_1; inline;
  17501. function getRXHALFIF : TBits_1; inline;
  17502. function getRXNEMPTYIE : TBits_1; inline;
  17503. function getRXNEMPTYIF : TBits_1; inline;
  17504. function getRXOVFLIE : TBits_1; inline;
  17505. function getRXOVFLIF : TBits_1; inline;
  17506. function getTXEMPTYIE : TBits_1; inline;
  17507. function getTXEMPTYIF : TBits_1; inline;
  17508. function getTXHALFIE : TBits_1; inline;
  17509. function getTXHALFIF : TBits_1; inline;
  17510. function getTXNFULLIE : TBits_1; inline;
  17511. function getTXNFULLIF : TBits_1; inline;
  17512. function getw : TBits_32; inline;
  17513. procedure setRXFULLIE(thebits : TBits_1); inline;
  17514. procedure setRXFULLIF(thebits : TBits_1); inline;
  17515. procedure setRXHALFIE(thebits : TBits_1); inline;
  17516. procedure setRXHALFIF(thebits : TBits_1); inline;
  17517. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  17518. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  17519. procedure setRXOVFLIE(thebits : TBits_1); inline;
  17520. procedure setRXOVFLIF(thebits : TBits_1); inline;
  17521. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  17522. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  17523. procedure setTXHALFIE(thebits : TBits_1); inline;
  17524. procedure setTXHALFIF(thebits : TBits_1); inline;
  17525. procedure setTXNFULLIE(thebits : TBits_1); inline;
  17526. procedure setTXNFULLIF(thebits : TBits_1); inline;
  17527. procedure setw(thebits : TBits_32); inline;
  17528. public
  17529. procedure clearRXFULLIE; inline;
  17530. procedure clearRXFULLIF; inline;
  17531. procedure clearRXHALFIE; inline;
  17532. procedure clearRXHALFIF; inline;
  17533. procedure clearRXNEMPTYIE; inline;
  17534. procedure clearRXNEMPTYIF; inline;
  17535. procedure clearRXOVFLIE; inline;
  17536. procedure clearRXOVFLIF; inline;
  17537. procedure clearTXEMPTYIE; inline;
  17538. procedure clearTXEMPTYIF; inline;
  17539. procedure clearTXHALFIE; inline;
  17540. procedure clearTXHALFIF; inline;
  17541. procedure clearTXNFULLIE; inline;
  17542. procedure clearTXNFULLIF; inline;
  17543. procedure setRXFULLIE; inline;
  17544. procedure setRXFULLIF; inline;
  17545. procedure setRXHALFIE; inline;
  17546. procedure setRXHALFIF; inline;
  17547. procedure setRXNEMPTYIE; inline;
  17548. procedure setRXNEMPTYIF; inline;
  17549. procedure setRXOVFLIE; inline;
  17550. procedure setRXOVFLIF; inline;
  17551. procedure setTXEMPTYIE; inline;
  17552. procedure setTXEMPTYIF; inline;
  17553. procedure setTXHALFIE; inline;
  17554. procedure setTXHALFIF; inline;
  17555. procedure setTXNFULLIE; inline;
  17556. procedure setTXNFULLIF; inline;
  17557. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  17558. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  17559. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  17560. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  17561. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  17562. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  17563. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  17564. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  17565. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  17566. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  17567. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  17568. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  17569. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  17570. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  17571. property w : TBits_32 read getw write setw;
  17572. end;
  17573. TCAN1_C1FIFOCI18 = record
  17574. private
  17575. function getCFIFOCI : TBits_5; inline;
  17576. function getw : TBits_32; inline;
  17577. procedure setCFIFOCI(thebits : TBits_5); inline;
  17578. procedure setw(thebits : TBits_32); inline;
  17579. public
  17580. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  17581. property w : TBits_32 read getw write setw;
  17582. end;
  17583. TCAN1_C1FIFOCON19 = record
  17584. private
  17585. function getDONLY : TBits_1; inline;
  17586. function getFRESET : TBits_1; inline;
  17587. function getFSIZE : TBits_5; inline;
  17588. function getRTREN : TBits_1; inline;
  17589. function getTXABAT : TBits_1; inline;
  17590. function getTXEN : TBits_1; inline;
  17591. function getTXERR : TBits_1; inline;
  17592. function getTXLARB : TBits_1; inline;
  17593. function getTXPRI : TBits_2; inline;
  17594. function getTXREQ : TBits_1; inline;
  17595. function getUINC : TBits_1; inline;
  17596. function getw : TBits_32; inline;
  17597. procedure setDONLY(thebits : TBits_1); inline;
  17598. procedure setFRESET(thebits : TBits_1); inline;
  17599. procedure setFSIZE(thebits : TBits_5); inline;
  17600. procedure setRTREN(thebits : TBits_1); inline;
  17601. procedure setTXABAT(thebits : TBits_1); inline;
  17602. procedure setTXEN(thebits : TBits_1); inline;
  17603. procedure setTXERR(thebits : TBits_1); inline;
  17604. procedure setTXLARB(thebits : TBits_1); inline;
  17605. procedure setTXPRI(thebits : TBits_2); inline;
  17606. procedure setTXREQ(thebits : TBits_1); inline;
  17607. procedure setUINC(thebits : TBits_1); inline;
  17608. procedure setw(thebits : TBits_32); inline;
  17609. public
  17610. procedure clearDONLY; inline;
  17611. procedure clearFRESET; inline;
  17612. procedure clearRTREN; inline;
  17613. procedure clearTXABAT; inline;
  17614. procedure clearTXEN; inline;
  17615. procedure clearTXERR; inline;
  17616. procedure clearTXLARB; inline;
  17617. procedure clearTXREQ; inline;
  17618. procedure clearUINC; inline;
  17619. procedure setDONLY; inline;
  17620. procedure setFRESET; inline;
  17621. procedure setRTREN; inline;
  17622. procedure setTXABAT; inline;
  17623. procedure setTXEN; inline;
  17624. procedure setTXERR; inline;
  17625. procedure setTXLARB; inline;
  17626. procedure setTXREQ; inline;
  17627. procedure setUINC; inline;
  17628. property DONLY : TBits_1 read getDONLY write setDONLY;
  17629. property FRESET : TBits_1 read getFRESET write setFRESET;
  17630. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  17631. property RTREN : TBits_1 read getRTREN write setRTREN;
  17632. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  17633. property TXEN : TBits_1 read getTXEN write setTXEN;
  17634. property TXERR : TBits_1 read getTXERR write setTXERR;
  17635. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  17636. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  17637. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  17638. property UINC : TBits_1 read getUINC write setUINC;
  17639. property w : TBits_32 read getw write setw;
  17640. end;
  17641. TCAN1_C1FIFOINT19 = record
  17642. private
  17643. function getRXFULLIE : TBits_1; inline;
  17644. function getRXFULLIF : TBits_1; inline;
  17645. function getRXHALFIE : TBits_1; inline;
  17646. function getRXHALFIF : TBits_1; inline;
  17647. function getRXNEMPTYIE : TBits_1; inline;
  17648. function getRXNEMPTYIF : TBits_1; inline;
  17649. function getRXOVFLIE : TBits_1; inline;
  17650. function getRXOVFLIF : TBits_1; inline;
  17651. function getTXEMPTYIE : TBits_1; inline;
  17652. function getTXEMPTYIF : TBits_1; inline;
  17653. function getTXHALFIE : TBits_1; inline;
  17654. function getTXHALFIF : TBits_1; inline;
  17655. function getTXNFULLIE : TBits_1; inline;
  17656. function getTXNFULLIF : TBits_1; inline;
  17657. function getw : TBits_32; inline;
  17658. procedure setRXFULLIE(thebits : TBits_1); inline;
  17659. procedure setRXFULLIF(thebits : TBits_1); inline;
  17660. procedure setRXHALFIE(thebits : TBits_1); inline;
  17661. procedure setRXHALFIF(thebits : TBits_1); inline;
  17662. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  17663. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  17664. procedure setRXOVFLIE(thebits : TBits_1); inline;
  17665. procedure setRXOVFLIF(thebits : TBits_1); inline;
  17666. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  17667. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  17668. procedure setTXHALFIE(thebits : TBits_1); inline;
  17669. procedure setTXHALFIF(thebits : TBits_1); inline;
  17670. procedure setTXNFULLIE(thebits : TBits_1); inline;
  17671. procedure setTXNFULLIF(thebits : TBits_1); inline;
  17672. procedure setw(thebits : TBits_32); inline;
  17673. public
  17674. procedure clearRXFULLIE; inline;
  17675. procedure clearRXFULLIF; inline;
  17676. procedure clearRXHALFIE; inline;
  17677. procedure clearRXHALFIF; inline;
  17678. procedure clearRXNEMPTYIE; inline;
  17679. procedure clearRXNEMPTYIF; inline;
  17680. procedure clearRXOVFLIE; inline;
  17681. procedure clearRXOVFLIF; inline;
  17682. procedure clearTXEMPTYIE; inline;
  17683. procedure clearTXEMPTYIF; inline;
  17684. procedure clearTXHALFIE; inline;
  17685. procedure clearTXHALFIF; inline;
  17686. procedure clearTXNFULLIE; inline;
  17687. procedure clearTXNFULLIF; inline;
  17688. procedure setRXFULLIE; inline;
  17689. procedure setRXFULLIF; inline;
  17690. procedure setRXHALFIE; inline;
  17691. procedure setRXHALFIF; inline;
  17692. procedure setRXNEMPTYIE; inline;
  17693. procedure setRXNEMPTYIF; inline;
  17694. procedure setRXOVFLIE; inline;
  17695. procedure setRXOVFLIF; inline;
  17696. procedure setTXEMPTYIE; inline;
  17697. procedure setTXEMPTYIF; inline;
  17698. procedure setTXHALFIE; inline;
  17699. procedure setTXHALFIF; inline;
  17700. procedure setTXNFULLIE; inline;
  17701. procedure setTXNFULLIF; inline;
  17702. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  17703. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  17704. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  17705. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  17706. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  17707. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  17708. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  17709. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  17710. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  17711. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  17712. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  17713. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  17714. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  17715. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  17716. property w : TBits_32 read getw write setw;
  17717. end;
  17718. TCAN1_C1FIFOCI19 = record
  17719. private
  17720. function getCFIFOCI : TBits_5; inline;
  17721. function getw : TBits_32; inline;
  17722. procedure setCFIFOCI(thebits : TBits_5); inline;
  17723. procedure setw(thebits : TBits_32); inline;
  17724. public
  17725. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  17726. property w : TBits_32 read getw write setw;
  17727. end;
  17728. TCAN1_C1FIFOCON20 = record
  17729. private
  17730. function getDONLY : TBits_1; inline;
  17731. function getFRESET : TBits_1; inline;
  17732. function getFSIZE : TBits_5; inline;
  17733. function getRTREN : TBits_1; inline;
  17734. function getTXABAT : TBits_1; inline;
  17735. function getTXEN : TBits_1; inline;
  17736. function getTXERR : TBits_1; inline;
  17737. function getTXLARB : TBits_1; inline;
  17738. function getTXPRI : TBits_2; inline;
  17739. function getTXREQ : TBits_1; inline;
  17740. function getUINC : TBits_1; inline;
  17741. function getw : TBits_32; inline;
  17742. procedure setDONLY(thebits : TBits_1); inline;
  17743. procedure setFRESET(thebits : TBits_1); inline;
  17744. procedure setFSIZE(thebits : TBits_5); inline;
  17745. procedure setRTREN(thebits : TBits_1); inline;
  17746. procedure setTXABAT(thebits : TBits_1); inline;
  17747. procedure setTXEN(thebits : TBits_1); inline;
  17748. procedure setTXERR(thebits : TBits_1); inline;
  17749. procedure setTXLARB(thebits : TBits_1); inline;
  17750. procedure setTXPRI(thebits : TBits_2); inline;
  17751. procedure setTXREQ(thebits : TBits_1); inline;
  17752. procedure setUINC(thebits : TBits_1); inline;
  17753. procedure setw(thebits : TBits_32); inline;
  17754. public
  17755. procedure clearDONLY; inline;
  17756. procedure clearFRESET; inline;
  17757. procedure clearRTREN; inline;
  17758. procedure clearTXABAT; inline;
  17759. procedure clearTXEN; inline;
  17760. procedure clearTXERR; inline;
  17761. procedure clearTXLARB; inline;
  17762. procedure clearTXREQ; inline;
  17763. procedure clearUINC; inline;
  17764. procedure setDONLY; inline;
  17765. procedure setFRESET; inline;
  17766. procedure setRTREN; inline;
  17767. procedure setTXABAT; inline;
  17768. procedure setTXEN; inline;
  17769. procedure setTXERR; inline;
  17770. procedure setTXLARB; inline;
  17771. procedure setTXREQ; inline;
  17772. procedure setUINC; inline;
  17773. property DONLY : TBits_1 read getDONLY write setDONLY;
  17774. property FRESET : TBits_1 read getFRESET write setFRESET;
  17775. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  17776. property RTREN : TBits_1 read getRTREN write setRTREN;
  17777. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  17778. property TXEN : TBits_1 read getTXEN write setTXEN;
  17779. property TXERR : TBits_1 read getTXERR write setTXERR;
  17780. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  17781. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  17782. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  17783. property UINC : TBits_1 read getUINC write setUINC;
  17784. property w : TBits_32 read getw write setw;
  17785. end;
  17786. TCAN1_C1FIFOINT20 = record
  17787. private
  17788. function getRXFULLIE : TBits_1; inline;
  17789. function getRXFULLIF : TBits_1; inline;
  17790. function getRXHALFIE : TBits_1; inline;
  17791. function getRXHALFIF : TBits_1; inline;
  17792. function getRXNEMPTYIE : TBits_1; inline;
  17793. function getRXNEMPTYIF : TBits_1; inline;
  17794. function getRXOVFLIE : TBits_1; inline;
  17795. function getRXOVFLIF : TBits_1; inline;
  17796. function getTXEMPTYIE : TBits_1; inline;
  17797. function getTXEMPTYIF : TBits_1; inline;
  17798. function getTXHALFIE : TBits_1; inline;
  17799. function getTXHALFIF : TBits_1; inline;
  17800. function getTXNFULLIE : TBits_1; inline;
  17801. function getTXNFULLIF : TBits_1; inline;
  17802. function getw : TBits_32; inline;
  17803. procedure setRXFULLIE(thebits : TBits_1); inline;
  17804. procedure setRXFULLIF(thebits : TBits_1); inline;
  17805. procedure setRXHALFIE(thebits : TBits_1); inline;
  17806. procedure setRXHALFIF(thebits : TBits_1); inline;
  17807. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  17808. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  17809. procedure setRXOVFLIE(thebits : TBits_1); inline;
  17810. procedure setRXOVFLIF(thebits : TBits_1); inline;
  17811. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  17812. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  17813. procedure setTXHALFIE(thebits : TBits_1); inline;
  17814. procedure setTXHALFIF(thebits : TBits_1); inline;
  17815. procedure setTXNFULLIE(thebits : TBits_1); inline;
  17816. procedure setTXNFULLIF(thebits : TBits_1); inline;
  17817. procedure setw(thebits : TBits_32); inline;
  17818. public
  17819. procedure clearRXFULLIE; inline;
  17820. procedure clearRXFULLIF; inline;
  17821. procedure clearRXHALFIE; inline;
  17822. procedure clearRXHALFIF; inline;
  17823. procedure clearRXNEMPTYIE; inline;
  17824. procedure clearRXNEMPTYIF; inline;
  17825. procedure clearRXOVFLIE; inline;
  17826. procedure clearRXOVFLIF; inline;
  17827. procedure clearTXEMPTYIE; inline;
  17828. procedure clearTXEMPTYIF; inline;
  17829. procedure clearTXHALFIE; inline;
  17830. procedure clearTXHALFIF; inline;
  17831. procedure clearTXNFULLIE; inline;
  17832. procedure clearTXNFULLIF; inline;
  17833. procedure setRXFULLIE; inline;
  17834. procedure setRXFULLIF; inline;
  17835. procedure setRXHALFIE; inline;
  17836. procedure setRXHALFIF; inline;
  17837. procedure setRXNEMPTYIE; inline;
  17838. procedure setRXNEMPTYIF; inline;
  17839. procedure setRXOVFLIE; inline;
  17840. procedure setRXOVFLIF; inline;
  17841. procedure setTXEMPTYIE; inline;
  17842. procedure setTXEMPTYIF; inline;
  17843. procedure setTXHALFIE; inline;
  17844. procedure setTXHALFIF; inline;
  17845. procedure setTXNFULLIE; inline;
  17846. procedure setTXNFULLIF; inline;
  17847. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  17848. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  17849. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  17850. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  17851. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  17852. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  17853. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  17854. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  17855. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  17856. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  17857. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  17858. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  17859. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  17860. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  17861. property w : TBits_32 read getw write setw;
  17862. end;
  17863. TCAN1_C1FIFOCI20 = record
  17864. private
  17865. function getCFIFOCI : TBits_5; inline;
  17866. function getw : TBits_32; inline;
  17867. procedure setCFIFOCI(thebits : TBits_5); inline;
  17868. procedure setw(thebits : TBits_32); inline;
  17869. public
  17870. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  17871. property w : TBits_32 read getw write setw;
  17872. end;
  17873. TCAN1_C1FIFOCON21 = record
  17874. private
  17875. function getDONLY : TBits_1; inline;
  17876. function getFRESET : TBits_1; inline;
  17877. function getFSIZE : TBits_5; inline;
  17878. function getRTREN : TBits_1; inline;
  17879. function getTXABAT : TBits_1; inline;
  17880. function getTXEN : TBits_1; inline;
  17881. function getTXERR : TBits_1; inline;
  17882. function getTXLARB : TBits_1; inline;
  17883. function getTXPRI : TBits_2; inline;
  17884. function getTXREQ : TBits_1; inline;
  17885. function getUINC : TBits_1; inline;
  17886. function getw : TBits_32; inline;
  17887. procedure setDONLY(thebits : TBits_1); inline;
  17888. procedure setFRESET(thebits : TBits_1); inline;
  17889. procedure setFSIZE(thebits : TBits_5); inline;
  17890. procedure setRTREN(thebits : TBits_1); inline;
  17891. procedure setTXABAT(thebits : TBits_1); inline;
  17892. procedure setTXEN(thebits : TBits_1); inline;
  17893. procedure setTXERR(thebits : TBits_1); inline;
  17894. procedure setTXLARB(thebits : TBits_1); inline;
  17895. procedure setTXPRI(thebits : TBits_2); inline;
  17896. procedure setTXREQ(thebits : TBits_1); inline;
  17897. procedure setUINC(thebits : TBits_1); inline;
  17898. procedure setw(thebits : TBits_32); inline;
  17899. public
  17900. procedure clearDONLY; inline;
  17901. procedure clearFRESET; inline;
  17902. procedure clearRTREN; inline;
  17903. procedure clearTXABAT; inline;
  17904. procedure clearTXEN; inline;
  17905. procedure clearTXERR; inline;
  17906. procedure clearTXLARB; inline;
  17907. procedure clearTXREQ; inline;
  17908. procedure clearUINC; inline;
  17909. procedure setDONLY; inline;
  17910. procedure setFRESET; inline;
  17911. procedure setRTREN; inline;
  17912. procedure setTXABAT; inline;
  17913. procedure setTXEN; inline;
  17914. procedure setTXERR; inline;
  17915. procedure setTXLARB; inline;
  17916. procedure setTXREQ; inline;
  17917. procedure setUINC; inline;
  17918. property DONLY : TBits_1 read getDONLY write setDONLY;
  17919. property FRESET : TBits_1 read getFRESET write setFRESET;
  17920. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  17921. property RTREN : TBits_1 read getRTREN write setRTREN;
  17922. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  17923. property TXEN : TBits_1 read getTXEN write setTXEN;
  17924. property TXERR : TBits_1 read getTXERR write setTXERR;
  17925. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  17926. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  17927. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  17928. property UINC : TBits_1 read getUINC write setUINC;
  17929. property w : TBits_32 read getw write setw;
  17930. end;
  17931. TCAN1_C1FIFOINT21 = record
  17932. private
  17933. function getRXFULLIE : TBits_1; inline;
  17934. function getRXFULLIF : TBits_1; inline;
  17935. function getRXHALFIE : TBits_1; inline;
  17936. function getRXHALFIF : TBits_1; inline;
  17937. function getRXNEMPTYIE : TBits_1; inline;
  17938. function getRXNEMPTYIF : TBits_1; inline;
  17939. function getRXOVFLIE : TBits_1; inline;
  17940. function getRXOVFLIF : TBits_1; inline;
  17941. function getTXEMPTYIE : TBits_1; inline;
  17942. function getTXEMPTYIF : TBits_1; inline;
  17943. function getTXHALFIE : TBits_1; inline;
  17944. function getTXHALFIF : TBits_1; inline;
  17945. function getTXNFULLIE : TBits_1; inline;
  17946. function getTXNFULLIF : TBits_1; inline;
  17947. function getw : TBits_32; inline;
  17948. procedure setRXFULLIE(thebits : TBits_1); inline;
  17949. procedure setRXFULLIF(thebits : TBits_1); inline;
  17950. procedure setRXHALFIE(thebits : TBits_1); inline;
  17951. procedure setRXHALFIF(thebits : TBits_1); inline;
  17952. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  17953. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  17954. procedure setRXOVFLIE(thebits : TBits_1); inline;
  17955. procedure setRXOVFLIF(thebits : TBits_1); inline;
  17956. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  17957. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  17958. procedure setTXHALFIE(thebits : TBits_1); inline;
  17959. procedure setTXHALFIF(thebits : TBits_1); inline;
  17960. procedure setTXNFULLIE(thebits : TBits_1); inline;
  17961. procedure setTXNFULLIF(thebits : TBits_1); inline;
  17962. procedure setw(thebits : TBits_32); inline;
  17963. public
  17964. procedure clearRXFULLIE; inline;
  17965. procedure clearRXFULLIF; inline;
  17966. procedure clearRXHALFIE; inline;
  17967. procedure clearRXHALFIF; inline;
  17968. procedure clearRXNEMPTYIE; inline;
  17969. procedure clearRXNEMPTYIF; inline;
  17970. procedure clearRXOVFLIE; inline;
  17971. procedure clearRXOVFLIF; inline;
  17972. procedure clearTXEMPTYIE; inline;
  17973. procedure clearTXEMPTYIF; inline;
  17974. procedure clearTXHALFIE; inline;
  17975. procedure clearTXHALFIF; inline;
  17976. procedure clearTXNFULLIE; inline;
  17977. procedure clearTXNFULLIF; inline;
  17978. procedure setRXFULLIE; inline;
  17979. procedure setRXFULLIF; inline;
  17980. procedure setRXHALFIE; inline;
  17981. procedure setRXHALFIF; inline;
  17982. procedure setRXNEMPTYIE; inline;
  17983. procedure setRXNEMPTYIF; inline;
  17984. procedure setRXOVFLIE; inline;
  17985. procedure setRXOVFLIF; inline;
  17986. procedure setTXEMPTYIE; inline;
  17987. procedure setTXEMPTYIF; inline;
  17988. procedure setTXHALFIE; inline;
  17989. procedure setTXHALFIF; inline;
  17990. procedure setTXNFULLIE; inline;
  17991. procedure setTXNFULLIF; inline;
  17992. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  17993. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  17994. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  17995. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  17996. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  17997. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  17998. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  17999. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  18000. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  18001. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  18002. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  18003. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  18004. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  18005. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  18006. property w : TBits_32 read getw write setw;
  18007. end;
  18008. TCAN1_C1FIFOCI21 = record
  18009. private
  18010. function getCFIFOCI : TBits_5; inline;
  18011. function getw : TBits_32; inline;
  18012. procedure setCFIFOCI(thebits : TBits_5); inline;
  18013. procedure setw(thebits : TBits_32); inline;
  18014. public
  18015. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  18016. property w : TBits_32 read getw write setw;
  18017. end;
  18018. TCAN1_C1FIFOCON22 = record
  18019. private
  18020. function getDONLY : TBits_1; inline;
  18021. function getFRESET : TBits_1; inline;
  18022. function getFSIZE : TBits_5; inline;
  18023. function getRTREN : TBits_1; inline;
  18024. function getTXABAT : TBits_1; inline;
  18025. function getTXEN : TBits_1; inline;
  18026. function getTXERR : TBits_1; inline;
  18027. function getTXLARB : TBits_1; inline;
  18028. function getTXPRI : TBits_2; inline;
  18029. function getTXREQ : TBits_1; inline;
  18030. function getUINC : TBits_1; inline;
  18031. function getw : TBits_32; inline;
  18032. procedure setDONLY(thebits : TBits_1); inline;
  18033. procedure setFRESET(thebits : TBits_1); inline;
  18034. procedure setFSIZE(thebits : TBits_5); inline;
  18035. procedure setRTREN(thebits : TBits_1); inline;
  18036. procedure setTXABAT(thebits : TBits_1); inline;
  18037. procedure setTXEN(thebits : TBits_1); inline;
  18038. procedure setTXERR(thebits : TBits_1); inline;
  18039. procedure setTXLARB(thebits : TBits_1); inline;
  18040. procedure setTXPRI(thebits : TBits_2); inline;
  18041. procedure setTXREQ(thebits : TBits_1); inline;
  18042. procedure setUINC(thebits : TBits_1); inline;
  18043. procedure setw(thebits : TBits_32); inline;
  18044. public
  18045. procedure clearDONLY; inline;
  18046. procedure clearFRESET; inline;
  18047. procedure clearRTREN; inline;
  18048. procedure clearTXABAT; inline;
  18049. procedure clearTXEN; inline;
  18050. procedure clearTXERR; inline;
  18051. procedure clearTXLARB; inline;
  18052. procedure clearTXREQ; inline;
  18053. procedure clearUINC; inline;
  18054. procedure setDONLY; inline;
  18055. procedure setFRESET; inline;
  18056. procedure setRTREN; inline;
  18057. procedure setTXABAT; inline;
  18058. procedure setTXEN; inline;
  18059. procedure setTXERR; inline;
  18060. procedure setTXLARB; inline;
  18061. procedure setTXREQ; inline;
  18062. procedure setUINC; inline;
  18063. property DONLY : TBits_1 read getDONLY write setDONLY;
  18064. property FRESET : TBits_1 read getFRESET write setFRESET;
  18065. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  18066. property RTREN : TBits_1 read getRTREN write setRTREN;
  18067. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  18068. property TXEN : TBits_1 read getTXEN write setTXEN;
  18069. property TXERR : TBits_1 read getTXERR write setTXERR;
  18070. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  18071. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  18072. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  18073. property UINC : TBits_1 read getUINC write setUINC;
  18074. property w : TBits_32 read getw write setw;
  18075. end;
  18076. TCAN1_C1FIFOINT22 = record
  18077. private
  18078. function getRXFULLIE : TBits_1; inline;
  18079. function getRXFULLIF : TBits_1; inline;
  18080. function getRXHALFIE : TBits_1; inline;
  18081. function getRXHALFIF : TBits_1; inline;
  18082. function getRXNEMPTYIE : TBits_1; inline;
  18083. function getRXNEMPTYIF : TBits_1; inline;
  18084. function getRXOVFLIE : TBits_1; inline;
  18085. function getRXOVFLIF : TBits_1; inline;
  18086. function getTXEMPTYIE : TBits_1; inline;
  18087. function getTXEMPTYIF : TBits_1; inline;
  18088. function getTXHALFIE : TBits_1; inline;
  18089. function getTXHALFIF : TBits_1; inline;
  18090. function getTXNFULLIE : TBits_1; inline;
  18091. function getTXNFULLIF : TBits_1; inline;
  18092. function getw : TBits_32; inline;
  18093. procedure setRXFULLIE(thebits : TBits_1); inline;
  18094. procedure setRXFULLIF(thebits : TBits_1); inline;
  18095. procedure setRXHALFIE(thebits : TBits_1); inline;
  18096. procedure setRXHALFIF(thebits : TBits_1); inline;
  18097. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  18098. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  18099. procedure setRXOVFLIE(thebits : TBits_1); inline;
  18100. procedure setRXOVFLIF(thebits : TBits_1); inline;
  18101. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  18102. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  18103. procedure setTXHALFIE(thebits : TBits_1); inline;
  18104. procedure setTXHALFIF(thebits : TBits_1); inline;
  18105. procedure setTXNFULLIE(thebits : TBits_1); inline;
  18106. procedure setTXNFULLIF(thebits : TBits_1); inline;
  18107. procedure setw(thebits : TBits_32); inline;
  18108. public
  18109. procedure clearRXFULLIE; inline;
  18110. procedure clearRXFULLIF; inline;
  18111. procedure clearRXHALFIE; inline;
  18112. procedure clearRXHALFIF; inline;
  18113. procedure clearRXNEMPTYIE; inline;
  18114. procedure clearRXNEMPTYIF; inline;
  18115. procedure clearRXOVFLIE; inline;
  18116. procedure clearRXOVFLIF; inline;
  18117. procedure clearTXEMPTYIE; inline;
  18118. procedure clearTXEMPTYIF; inline;
  18119. procedure clearTXHALFIE; inline;
  18120. procedure clearTXHALFIF; inline;
  18121. procedure clearTXNFULLIE; inline;
  18122. procedure clearTXNFULLIF; inline;
  18123. procedure setRXFULLIE; inline;
  18124. procedure setRXFULLIF; inline;
  18125. procedure setRXHALFIE; inline;
  18126. procedure setRXHALFIF; inline;
  18127. procedure setRXNEMPTYIE; inline;
  18128. procedure setRXNEMPTYIF; inline;
  18129. procedure setRXOVFLIE; inline;
  18130. procedure setRXOVFLIF; inline;
  18131. procedure setTXEMPTYIE; inline;
  18132. procedure setTXEMPTYIF; inline;
  18133. procedure setTXHALFIE; inline;
  18134. procedure setTXHALFIF; inline;
  18135. procedure setTXNFULLIE; inline;
  18136. procedure setTXNFULLIF; inline;
  18137. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  18138. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  18139. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  18140. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  18141. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  18142. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  18143. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  18144. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  18145. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  18146. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  18147. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  18148. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  18149. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  18150. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  18151. property w : TBits_32 read getw write setw;
  18152. end;
  18153. TCAN1_C1FIFOCI22 = record
  18154. private
  18155. function getCFIFOCI : TBits_5; inline;
  18156. function getw : TBits_32; inline;
  18157. procedure setCFIFOCI(thebits : TBits_5); inline;
  18158. procedure setw(thebits : TBits_32); inline;
  18159. public
  18160. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  18161. property w : TBits_32 read getw write setw;
  18162. end;
  18163. TCAN1_C1FIFOCON23 = record
  18164. private
  18165. function getDONLY : TBits_1; inline;
  18166. function getFRESET : TBits_1; inline;
  18167. function getFSIZE : TBits_5; inline;
  18168. function getRTREN : TBits_1; inline;
  18169. function getTXABAT : TBits_1; inline;
  18170. function getTXEN : TBits_1; inline;
  18171. function getTXERR : TBits_1; inline;
  18172. function getTXLARB : TBits_1; inline;
  18173. function getTXPRI : TBits_2; inline;
  18174. function getTXREQ : TBits_1; inline;
  18175. function getUINC : TBits_1; inline;
  18176. function getw : TBits_32; inline;
  18177. procedure setDONLY(thebits : TBits_1); inline;
  18178. procedure setFRESET(thebits : TBits_1); inline;
  18179. procedure setFSIZE(thebits : TBits_5); inline;
  18180. procedure setRTREN(thebits : TBits_1); inline;
  18181. procedure setTXABAT(thebits : TBits_1); inline;
  18182. procedure setTXEN(thebits : TBits_1); inline;
  18183. procedure setTXERR(thebits : TBits_1); inline;
  18184. procedure setTXLARB(thebits : TBits_1); inline;
  18185. procedure setTXPRI(thebits : TBits_2); inline;
  18186. procedure setTXREQ(thebits : TBits_1); inline;
  18187. procedure setUINC(thebits : TBits_1); inline;
  18188. procedure setw(thebits : TBits_32); inline;
  18189. public
  18190. procedure clearDONLY; inline;
  18191. procedure clearFRESET; inline;
  18192. procedure clearRTREN; inline;
  18193. procedure clearTXABAT; inline;
  18194. procedure clearTXEN; inline;
  18195. procedure clearTXERR; inline;
  18196. procedure clearTXLARB; inline;
  18197. procedure clearTXREQ; inline;
  18198. procedure clearUINC; inline;
  18199. procedure setDONLY; inline;
  18200. procedure setFRESET; inline;
  18201. procedure setRTREN; inline;
  18202. procedure setTXABAT; inline;
  18203. procedure setTXEN; inline;
  18204. procedure setTXERR; inline;
  18205. procedure setTXLARB; inline;
  18206. procedure setTXREQ; inline;
  18207. procedure setUINC; inline;
  18208. property DONLY : TBits_1 read getDONLY write setDONLY;
  18209. property FRESET : TBits_1 read getFRESET write setFRESET;
  18210. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  18211. property RTREN : TBits_1 read getRTREN write setRTREN;
  18212. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  18213. property TXEN : TBits_1 read getTXEN write setTXEN;
  18214. property TXERR : TBits_1 read getTXERR write setTXERR;
  18215. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  18216. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  18217. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  18218. property UINC : TBits_1 read getUINC write setUINC;
  18219. property w : TBits_32 read getw write setw;
  18220. end;
  18221. TCAN1_C1FIFOINT23 = record
  18222. private
  18223. function getRXFULLIE : TBits_1; inline;
  18224. function getRXFULLIF : TBits_1; inline;
  18225. function getRXHALFIE : TBits_1; inline;
  18226. function getRXHALFIF : TBits_1; inline;
  18227. function getRXNEMPTYIE : TBits_1; inline;
  18228. function getRXNEMPTYIF : TBits_1; inline;
  18229. function getRXOVFLIE : TBits_1; inline;
  18230. function getRXOVFLIF : TBits_1; inline;
  18231. function getTXEMPTYIE : TBits_1; inline;
  18232. function getTXEMPTYIF : TBits_1; inline;
  18233. function getTXHALFIE : TBits_1; inline;
  18234. function getTXHALFIF : TBits_1; inline;
  18235. function getTXNFULLIE : TBits_1; inline;
  18236. function getTXNFULLIF : TBits_1; inline;
  18237. function getw : TBits_32; inline;
  18238. procedure setRXFULLIE(thebits : TBits_1); inline;
  18239. procedure setRXFULLIF(thebits : TBits_1); inline;
  18240. procedure setRXHALFIE(thebits : TBits_1); inline;
  18241. procedure setRXHALFIF(thebits : TBits_1); inline;
  18242. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  18243. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  18244. procedure setRXOVFLIE(thebits : TBits_1); inline;
  18245. procedure setRXOVFLIF(thebits : TBits_1); inline;
  18246. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  18247. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  18248. procedure setTXHALFIE(thebits : TBits_1); inline;
  18249. procedure setTXHALFIF(thebits : TBits_1); inline;
  18250. procedure setTXNFULLIE(thebits : TBits_1); inline;
  18251. procedure setTXNFULLIF(thebits : TBits_1); inline;
  18252. procedure setw(thebits : TBits_32); inline;
  18253. public
  18254. procedure clearRXFULLIE; inline;
  18255. procedure clearRXFULLIF; inline;
  18256. procedure clearRXHALFIE; inline;
  18257. procedure clearRXHALFIF; inline;
  18258. procedure clearRXNEMPTYIE; inline;
  18259. procedure clearRXNEMPTYIF; inline;
  18260. procedure clearRXOVFLIE; inline;
  18261. procedure clearRXOVFLIF; inline;
  18262. procedure clearTXEMPTYIE; inline;
  18263. procedure clearTXEMPTYIF; inline;
  18264. procedure clearTXHALFIE; inline;
  18265. procedure clearTXHALFIF; inline;
  18266. procedure clearTXNFULLIE; inline;
  18267. procedure clearTXNFULLIF; inline;
  18268. procedure setRXFULLIE; inline;
  18269. procedure setRXFULLIF; inline;
  18270. procedure setRXHALFIE; inline;
  18271. procedure setRXHALFIF; inline;
  18272. procedure setRXNEMPTYIE; inline;
  18273. procedure setRXNEMPTYIF; inline;
  18274. procedure setRXOVFLIE; inline;
  18275. procedure setRXOVFLIF; inline;
  18276. procedure setTXEMPTYIE; inline;
  18277. procedure setTXEMPTYIF; inline;
  18278. procedure setTXHALFIE; inline;
  18279. procedure setTXHALFIF; inline;
  18280. procedure setTXNFULLIE; inline;
  18281. procedure setTXNFULLIF; inline;
  18282. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  18283. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  18284. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  18285. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  18286. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  18287. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  18288. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  18289. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  18290. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  18291. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  18292. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  18293. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  18294. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  18295. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  18296. property w : TBits_32 read getw write setw;
  18297. end;
  18298. TCAN1_C1FIFOCI23 = record
  18299. private
  18300. function getCFIFOCI : TBits_5; inline;
  18301. function getw : TBits_32; inline;
  18302. procedure setCFIFOCI(thebits : TBits_5); inline;
  18303. procedure setw(thebits : TBits_32); inline;
  18304. public
  18305. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  18306. property w : TBits_32 read getw write setw;
  18307. end;
  18308. TCAN1_C1FIFOCON24 = record
  18309. private
  18310. function getDONLY : TBits_1; inline;
  18311. function getFRESET : TBits_1; inline;
  18312. function getFSIZE : TBits_5; inline;
  18313. function getRTREN : TBits_1; inline;
  18314. function getTXABAT : TBits_1; inline;
  18315. function getTXEN : TBits_1; inline;
  18316. function getTXERR : TBits_1; inline;
  18317. function getTXLARB : TBits_1; inline;
  18318. function getTXPRI : TBits_2; inline;
  18319. function getTXREQ : TBits_1; inline;
  18320. function getUINC : TBits_1; inline;
  18321. function getw : TBits_32; inline;
  18322. procedure setDONLY(thebits : TBits_1); inline;
  18323. procedure setFRESET(thebits : TBits_1); inline;
  18324. procedure setFSIZE(thebits : TBits_5); inline;
  18325. procedure setRTREN(thebits : TBits_1); inline;
  18326. procedure setTXABAT(thebits : TBits_1); inline;
  18327. procedure setTXEN(thebits : TBits_1); inline;
  18328. procedure setTXERR(thebits : TBits_1); inline;
  18329. procedure setTXLARB(thebits : TBits_1); inline;
  18330. procedure setTXPRI(thebits : TBits_2); inline;
  18331. procedure setTXREQ(thebits : TBits_1); inline;
  18332. procedure setUINC(thebits : TBits_1); inline;
  18333. procedure setw(thebits : TBits_32); inline;
  18334. public
  18335. procedure clearDONLY; inline;
  18336. procedure clearFRESET; inline;
  18337. procedure clearRTREN; inline;
  18338. procedure clearTXABAT; inline;
  18339. procedure clearTXEN; inline;
  18340. procedure clearTXERR; inline;
  18341. procedure clearTXLARB; inline;
  18342. procedure clearTXREQ; inline;
  18343. procedure clearUINC; inline;
  18344. procedure setDONLY; inline;
  18345. procedure setFRESET; inline;
  18346. procedure setRTREN; inline;
  18347. procedure setTXABAT; inline;
  18348. procedure setTXEN; inline;
  18349. procedure setTXERR; inline;
  18350. procedure setTXLARB; inline;
  18351. procedure setTXREQ; inline;
  18352. procedure setUINC; inline;
  18353. property DONLY : TBits_1 read getDONLY write setDONLY;
  18354. property FRESET : TBits_1 read getFRESET write setFRESET;
  18355. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  18356. property RTREN : TBits_1 read getRTREN write setRTREN;
  18357. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  18358. property TXEN : TBits_1 read getTXEN write setTXEN;
  18359. property TXERR : TBits_1 read getTXERR write setTXERR;
  18360. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  18361. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  18362. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  18363. property UINC : TBits_1 read getUINC write setUINC;
  18364. property w : TBits_32 read getw write setw;
  18365. end;
  18366. TCAN1_C1FIFOINT24 = record
  18367. private
  18368. function getRXFULLIE : TBits_1; inline;
  18369. function getRXFULLIF : TBits_1; inline;
  18370. function getRXHALFIE : TBits_1; inline;
  18371. function getRXHALFIF : TBits_1; inline;
  18372. function getRXNEMPTYIE : TBits_1; inline;
  18373. function getRXNEMPTYIF : TBits_1; inline;
  18374. function getRXOVFLIE : TBits_1; inline;
  18375. function getRXOVFLIF : TBits_1; inline;
  18376. function getTXEMPTYIE : TBits_1; inline;
  18377. function getTXEMPTYIF : TBits_1; inline;
  18378. function getTXHALFIE : TBits_1; inline;
  18379. function getTXHALFIF : TBits_1; inline;
  18380. function getTXNFULLIE : TBits_1; inline;
  18381. function getTXNFULLIF : TBits_1; inline;
  18382. function getw : TBits_32; inline;
  18383. procedure setRXFULLIE(thebits : TBits_1); inline;
  18384. procedure setRXFULLIF(thebits : TBits_1); inline;
  18385. procedure setRXHALFIE(thebits : TBits_1); inline;
  18386. procedure setRXHALFIF(thebits : TBits_1); inline;
  18387. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  18388. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  18389. procedure setRXOVFLIE(thebits : TBits_1); inline;
  18390. procedure setRXOVFLIF(thebits : TBits_1); inline;
  18391. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  18392. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  18393. procedure setTXHALFIE(thebits : TBits_1); inline;
  18394. procedure setTXHALFIF(thebits : TBits_1); inline;
  18395. procedure setTXNFULLIE(thebits : TBits_1); inline;
  18396. procedure setTXNFULLIF(thebits : TBits_1); inline;
  18397. procedure setw(thebits : TBits_32); inline;
  18398. public
  18399. procedure clearRXFULLIE; inline;
  18400. procedure clearRXFULLIF; inline;
  18401. procedure clearRXHALFIE; inline;
  18402. procedure clearRXHALFIF; inline;
  18403. procedure clearRXNEMPTYIE; inline;
  18404. procedure clearRXNEMPTYIF; inline;
  18405. procedure clearRXOVFLIE; inline;
  18406. procedure clearRXOVFLIF; inline;
  18407. procedure clearTXEMPTYIE; inline;
  18408. procedure clearTXEMPTYIF; inline;
  18409. procedure clearTXHALFIE; inline;
  18410. procedure clearTXHALFIF; inline;
  18411. procedure clearTXNFULLIE; inline;
  18412. procedure clearTXNFULLIF; inline;
  18413. procedure setRXFULLIE; inline;
  18414. procedure setRXFULLIF; inline;
  18415. procedure setRXHALFIE; inline;
  18416. procedure setRXHALFIF; inline;
  18417. procedure setRXNEMPTYIE; inline;
  18418. procedure setRXNEMPTYIF; inline;
  18419. procedure setRXOVFLIE; inline;
  18420. procedure setRXOVFLIF; inline;
  18421. procedure setTXEMPTYIE; inline;
  18422. procedure setTXEMPTYIF; inline;
  18423. procedure setTXHALFIE; inline;
  18424. procedure setTXHALFIF; inline;
  18425. procedure setTXNFULLIE; inline;
  18426. procedure setTXNFULLIF; inline;
  18427. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  18428. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  18429. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  18430. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  18431. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  18432. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  18433. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  18434. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  18435. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  18436. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  18437. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  18438. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  18439. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  18440. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  18441. property w : TBits_32 read getw write setw;
  18442. end;
  18443. TCAN1_C1FIFOCI24 = record
  18444. private
  18445. function getCFIFOCI : TBits_5; inline;
  18446. function getw : TBits_32; inline;
  18447. procedure setCFIFOCI(thebits : TBits_5); inline;
  18448. procedure setw(thebits : TBits_32); inline;
  18449. public
  18450. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  18451. property w : TBits_32 read getw write setw;
  18452. end;
  18453. TCAN1_C1FIFOCON25 = record
  18454. private
  18455. function getDONLY : TBits_1; inline;
  18456. function getFRESET : TBits_1; inline;
  18457. function getFSIZE : TBits_5; inline;
  18458. function getRTREN : TBits_1; inline;
  18459. function getTXABAT : TBits_1; inline;
  18460. function getTXEN : TBits_1; inline;
  18461. function getTXERR : TBits_1; inline;
  18462. function getTXLARB : TBits_1; inline;
  18463. function getTXPRI : TBits_2; inline;
  18464. function getTXREQ : TBits_1; inline;
  18465. function getUINC : TBits_1; inline;
  18466. function getw : TBits_32; inline;
  18467. procedure setDONLY(thebits : TBits_1); inline;
  18468. procedure setFRESET(thebits : TBits_1); inline;
  18469. procedure setFSIZE(thebits : TBits_5); inline;
  18470. procedure setRTREN(thebits : TBits_1); inline;
  18471. procedure setTXABAT(thebits : TBits_1); inline;
  18472. procedure setTXEN(thebits : TBits_1); inline;
  18473. procedure setTXERR(thebits : TBits_1); inline;
  18474. procedure setTXLARB(thebits : TBits_1); inline;
  18475. procedure setTXPRI(thebits : TBits_2); inline;
  18476. procedure setTXREQ(thebits : TBits_1); inline;
  18477. procedure setUINC(thebits : TBits_1); inline;
  18478. procedure setw(thebits : TBits_32); inline;
  18479. public
  18480. procedure clearDONLY; inline;
  18481. procedure clearFRESET; inline;
  18482. procedure clearRTREN; inline;
  18483. procedure clearTXABAT; inline;
  18484. procedure clearTXEN; inline;
  18485. procedure clearTXERR; inline;
  18486. procedure clearTXLARB; inline;
  18487. procedure clearTXREQ; inline;
  18488. procedure clearUINC; inline;
  18489. procedure setDONLY; inline;
  18490. procedure setFRESET; inline;
  18491. procedure setRTREN; inline;
  18492. procedure setTXABAT; inline;
  18493. procedure setTXEN; inline;
  18494. procedure setTXERR; inline;
  18495. procedure setTXLARB; inline;
  18496. procedure setTXREQ; inline;
  18497. procedure setUINC; inline;
  18498. property DONLY : TBits_1 read getDONLY write setDONLY;
  18499. property FRESET : TBits_1 read getFRESET write setFRESET;
  18500. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  18501. property RTREN : TBits_1 read getRTREN write setRTREN;
  18502. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  18503. property TXEN : TBits_1 read getTXEN write setTXEN;
  18504. property TXERR : TBits_1 read getTXERR write setTXERR;
  18505. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  18506. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  18507. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  18508. property UINC : TBits_1 read getUINC write setUINC;
  18509. property w : TBits_32 read getw write setw;
  18510. end;
  18511. TCAN1_C1FIFOINT25 = record
  18512. private
  18513. function getRXFULLIE : TBits_1; inline;
  18514. function getRXFULLIF : TBits_1; inline;
  18515. function getRXHALFIE : TBits_1; inline;
  18516. function getRXHALFIF : TBits_1; inline;
  18517. function getRXNEMPTYIE : TBits_1; inline;
  18518. function getRXNEMPTYIF : TBits_1; inline;
  18519. function getRXOVFLIE : TBits_1; inline;
  18520. function getRXOVFLIF : TBits_1; inline;
  18521. function getTXEMPTYIE : TBits_1; inline;
  18522. function getTXEMPTYIF : TBits_1; inline;
  18523. function getTXHALFIE : TBits_1; inline;
  18524. function getTXHALFIF : TBits_1; inline;
  18525. function getTXNFULLIE : TBits_1; inline;
  18526. function getTXNFULLIF : TBits_1; inline;
  18527. function getw : TBits_32; inline;
  18528. procedure setRXFULLIE(thebits : TBits_1); inline;
  18529. procedure setRXFULLIF(thebits : TBits_1); inline;
  18530. procedure setRXHALFIE(thebits : TBits_1); inline;
  18531. procedure setRXHALFIF(thebits : TBits_1); inline;
  18532. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  18533. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  18534. procedure setRXOVFLIE(thebits : TBits_1); inline;
  18535. procedure setRXOVFLIF(thebits : TBits_1); inline;
  18536. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  18537. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  18538. procedure setTXHALFIE(thebits : TBits_1); inline;
  18539. procedure setTXHALFIF(thebits : TBits_1); inline;
  18540. procedure setTXNFULLIE(thebits : TBits_1); inline;
  18541. procedure setTXNFULLIF(thebits : TBits_1); inline;
  18542. procedure setw(thebits : TBits_32); inline;
  18543. public
  18544. procedure clearRXFULLIE; inline;
  18545. procedure clearRXFULLIF; inline;
  18546. procedure clearRXHALFIE; inline;
  18547. procedure clearRXHALFIF; inline;
  18548. procedure clearRXNEMPTYIE; inline;
  18549. procedure clearRXNEMPTYIF; inline;
  18550. procedure clearRXOVFLIE; inline;
  18551. procedure clearRXOVFLIF; inline;
  18552. procedure clearTXEMPTYIE; inline;
  18553. procedure clearTXEMPTYIF; inline;
  18554. procedure clearTXHALFIE; inline;
  18555. procedure clearTXHALFIF; inline;
  18556. procedure clearTXNFULLIE; inline;
  18557. procedure clearTXNFULLIF; inline;
  18558. procedure setRXFULLIE; inline;
  18559. procedure setRXFULLIF; inline;
  18560. procedure setRXHALFIE; inline;
  18561. procedure setRXHALFIF; inline;
  18562. procedure setRXNEMPTYIE; inline;
  18563. procedure setRXNEMPTYIF; inline;
  18564. procedure setRXOVFLIE; inline;
  18565. procedure setRXOVFLIF; inline;
  18566. procedure setTXEMPTYIE; inline;
  18567. procedure setTXEMPTYIF; inline;
  18568. procedure setTXHALFIE; inline;
  18569. procedure setTXHALFIF; inline;
  18570. procedure setTXNFULLIE; inline;
  18571. procedure setTXNFULLIF; inline;
  18572. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  18573. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  18574. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  18575. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  18576. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  18577. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  18578. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  18579. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  18580. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  18581. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  18582. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  18583. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  18584. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  18585. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  18586. property w : TBits_32 read getw write setw;
  18587. end;
  18588. TCAN1_C1FIFOCI25 = record
  18589. private
  18590. function getCFIFOCI : TBits_5; inline;
  18591. function getw : TBits_32; inline;
  18592. procedure setCFIFOCI(thebits : TBits_5); inline;
  18593. procedure setw(thebits : TBits_32); inline;
  18594. public
  18595. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  18596. property w : TBits_32 read getw write setw;
  18597. end;
  18598. TCAN1_C1FIFOCON26 = record
  18599. private
  18600. function getDONLY : TBits_1; inline;
  18601. function getFRESET : TBits_1; inline;
  18602. function getFSIZE : TBits_5; inline;
  18603. function getRTREN : TBits_1; inline;
  18604. function getTXABAT : TBits_1; inline;
  18605. function getTXEN : TBits_1; inline;
  18606. function getTXERR : TBits_1; inline;
  18607. function getTXLARB : TBits_1; inline;
  18608. function getTXPRI : TBits_2; inline;
  18609. function getTXREQ : TBits_1; inline;
  18610. function getUINC : TBits_1; inline;
  18611. function getw : TBits_32; inline;
  18612. procedure setDONLY(thebits : TBits_1); inline;
  18613. procedure setFRESET(thebits : TBits_1); inline;
  18614. procedure setFSIZE(thebits : TBits_5); inline;
  18615. procedure setRTREN(thebits : TBits_1); inline;
  18616. procedure setTXABAT(thebits : TBits_1); inline;
  18617. procedure setTXEN(thebits : TBits_1); inline;
  18618. procedure setTXERR(thebits : TBits_1); inline;
  18619. procedure setTXLARB(thebits : TBits_1); inline;
  18620. procedure setTXPRI(thebits : TBits_2); inline;
  18621. procedure setTXREQ(thebits : TBits_1); inline;
  18622. procedure setUINC(thebits : TBits_1); inline;
  18623. procedure setw(thebits : TBits_32); inline;
  18624. public
  18625. procedure clearDONLY; inline;
  18626. procedure clearFRESET; inline;
  18627. procedure clearRTREN; inline;
  18628. procedure clearTXABAT; inline;
  18629. procedure clearTXEN; inline;
  18630. procedure clearTXERR; inline;
  18631. procedure clearTXLARB; inline;
  18632. procedure clearTXREQ; inline;
  18633. procedure clearUINC; inline;
  18634. procedure setDONLY; inline;
  18635. procedure setFRESET; inline;
  18636. procedure setRTREN; inline;
  18637. procedure setTXABAT; inline;
  18638. procedure setTXEN; inline;
  18639. procedure setTXERR; inline;
  18640. procedure setTXLARB; inline;
  18641. procedure setTXREQ; inline;
  18642. procedure setUINC; inline;
  18643. property DONLY : TBits_1 read getDONLY write setDONLY;
  18644. property FRESET : TBits_1 read getFRESET write setFRESET;
  18645. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  18646. property RTREN : TBits_1 read getRTREN write setRTREN;
  18647. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  18648. property TXEN : TBits_1 read getTXEN write setTXEN;
  18649. property TXERR : TBits_1 read getTXERR write setTXERR;
  18650. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  18651. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  18652. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  18653. property UINC : TBits_1 read getUINC write setUINC;
  18654. property w : TBits_32 read getw write setw;
  18655. end;
  18656. TCAN1_C1FIFOINT26 = record
  18657. private
  18658. function getRXFULLIE : TBits_1; inline;
  18659. function getRXFULLIF : TBits_1; inline;
  18660. function getRXHALFIE : TBits_1; inline;
  18661. function getRXHALFIF : TBits_1; inline;
  18662. function getRXNEMPTYIE : TBits_1; inline;
  18663. function getRXNEMPTYIF : TBits_1; inline;
  18664. function getRXOVFLIE : TBits_1; inline;
  18665. function getRXOVFLIF : TBits_1; inline;
  18666. function getTXEMPTYIE : TBits_1; inline;
  18667. function getTXEMPTYIF : TBits_1; inline;
  18668. function getTXHALFIE : TBits_1; inline;
  18669. function getTXHALFIF : TBits_1; inline;
  18670. function getTXNFULLIE : TBits_1; inline;
  18671. function getTXNFULLIF : TBits_1; inline;
  18672. function getw : TBits_32; inline;
  18673. procedure setRXFULLIE(thebits : TBits_1); inline;
  18674. procedure setRXFULLIF(thebits : TBits_1); inline;
  18675. procedure setRXHALFIE(thebits : TBits_1); inline;
  18676. procedure setRXHALFIF(thebits : TBits_1); inline;
  18677. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  18678. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  18679. procedure setRXOVFLIE(thebits : TBits_1); inline;
  18680. procedure setRXOVFLIF(thebits : TBits_1); inline;
  18681. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  18682. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  18683. procedure setTXHALFIE(thebits : TBits_1); inline;
  18684. procedure setTXHALFIF(thebits : TBits_1); inline;
  18685. procedure setTXNFULLIE(thebits : TBits_1); inline;
  18686. procedure setTXNFULLIF(thebits : TBits_1); inline;
  18687. procedure setw(thebits : TBits_32); inline;
  18688. public
  18689. procedure clearRXFULLIE; inline;
  18690. procedure clearRXFULLIF; inline;
  18691. procedure clearRXHALFIE; inline;
  18692. procedure clearRXHALFIF; inline;
  18693. procedure clearRXNEMPTYIE; inline;
  18694. procedure clearRXNEMPTYIF; inline;
  18695. procedure clearRXOVFLIE; inline;
  18696. procedure clearRXOVFLIF; inline;
  18697. procedure clearTXEMPTYIE; inline;
  18698. procedure clearTXEMPTYIF; inline;
  18699. procedure clearTXHALFIE; inline;
  18700. procedure clearTXHALFIF; inline;
  18701. procedure clearTXNFULLIE; inline;
  18702. procedure clearTXNFULLIF; inline;
  18703. procedure setRXFULLIE; inline;
  18704. procedure setRXFULLIF; inline;
  18705. procedure setRXHALFIE; inline;
  18706. procedure setRXHALFIF; inline;
  18707. procedure setRXNEMPTYIE; inline;
  18708. procedure setRXNEMPTYIF; inline;
  18709. procedure setRXOVFLIE; inline;
  18710. procedure setRXOVFLIF; inline;
  18711. procedure setTXEMPTYIE; inline;
  18712. procedure setTXEMPTYIF; inline;
  18713. procedure setTXHALFIE; inline;
  18714. procedure setTXHALFIF; inline;
  18715. procedure setTXNFULLIE; inline;
  18716. procedure setTXNFULLIF; inline;
  18717. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  18718. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  18719. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  18720. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  18721. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  18722. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  18723. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  18724. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  18725. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  18726. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  18727. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  18728. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  18729. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  18730. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  18731. property w : TBits_32 read getw write setw;
  18732. end;
  18733. TCAN1_C1FIFOCI26 = record
  18734. private
  18735. function getCFIFOCI : TBits_5; inline;
  18736. function getw : TBits_32; inline;
  18737. procedure setCFIFOCI(thebits : TBits_5); inline;
  18738. procedure setw(thebits : TBits_32); inline;
  18739. public
  18740. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  18741. property w : TBits_32 read getw write setw;
  18742. end;
  18743. TCAN1_C1FIFOCON27 = record
  18744. private
  18745. function getDONLY : TBits_1; inline;
  18746. function getFRESET : TBits_1; inline;
  18747. function getFSIZE : TBits_5; inline;
  18748. function getRTREN : TBits_1; inline;
  18749. function getTXABAT : TBits_1; inline;
  18750. function getTXEN : TBits_1; inline;
  18751. function getTXERR : TBits_1; inline;
  18752. function getTXLARB : TBits_1; inline;
  18753. function getTXPRI : TBits_2; inline;
  18754. function getTXREQ : TBits_1; inline;
  18755. function getUINC : TBits_1; inline;
  18756. function getw : TBits_32; inline;
  18757. procedure setDONLY(thebits : TBits_1); inline;
  18758. procedure setFRESET(thebits : TBits_1); inline;
  18759. procedure setFSIZE(thebits : TBits_5); inline;
  18760. procedure setRTREN(thebits : TBits_1); inline;
  18761. procedure setTXABAT(thebits : TBits_1); inline;
  18762. procedure setTXEN(thebits : TBits_1); inline;
  18763. procedure setTXERR(thebits : TBits_1); inline;
  18764. procedure setTXLARB(thebits : TBits_1); inline;
  18765. procedure setTXPRI(thebits : TBits_2); inline;
  18766. procedure setTXREQ(thebits : TBits_1); inline;
  18767. procedure setUINC(thebits : TBits_1); inline;
  18768. procedure setw(thebits : TBits_32); inline;
  18769. public
  18770. procedure clearDONLY; inline;
  18771. procedure clearFRESET; inline;
  18772. procedure clearRTREN; inline;
  18773. procedure clearTXABAT; inline;
  18774. procedure clearTXEN; inline;
  18775. procedure clearTXERR; inline;
  18776. procedure clearTXLARB; inline;
  18777. procedure clearTXREQ; inline;
  18778. procedure clearUINC; inline;
  18779. procedure setDONLY; inline;
  18780. procedure setFRESET; inline;
  18781. procedure setRTREN; inline;
  18782. procedure setTXABAT; inline;
  18783. procedure setTXEN; inline;
  18784. procedure setTXERR; inline;
  18785. procedure setTXLARB; inline;
  18786. procedure setTXREQ; inline;
  18787. procedure setUINC; inline;
  18788. property DONLY : TBits_1 read getDONLY write setDONLY;
  18789. property FRESET : TBits_1 read getFRESET write setFRESET;
  18790. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  18791. property RTREN : TBits_1 read getRTREN write setRTREN;
  18792. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  18793. property TXEN : TBits_1 read getTXEN write setTXEN;
  18794. property TXERR : TBits_1 read getTXERR write setTXERR;
  18795. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  18796. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  18797. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  18798. property UINC : TBits_1 read getUINC write setUINC;
  18799. property w : TBits_32 read getw write setw;
  18800. end;
  18801. TCAN1_C1FIFOINT27 = record
  18802. private
  18803. function getRXFULLIE : TBits_1; inline;
  18804. function getRXFULLIF : TBits_1; inline;
  18805. function getRXHALFIE : TBits_1; inline;
  18806. function getRXHALFIF : TBits_1; inline;
  18807. function getRXNEMPTYIE : TBits_1; inline;
  18808. function getRXNEMPTYIF : TBits_1; inline;
  18809. function getRXOVFLIE : TBits_1; inline;
  18810. function getRXOVFLIF : TBits_1; inline;
  18811. function getTXEMPTYIE : TBits_1; inline;
  18812. function getTXEMPTYIF : TBits_1; inline;
  18813. function getTXHALFIE : TBits_1; inline;
  18814. function getTXHALFIF : TBits_1; inline;
  18815. function getTXNFULLIE : TBits_1; inline;
  18816. function getTXNFULLIF : TBits_1; inline;
  18817. function getw : TBits_32; inline;
  18818. procedure setRXFULLIE(thebits : TBits_1); inline;
  18819. procedure setRXFULLIF(thebits : TBits_1); inline;
  18820. procedure setRXHALFIE(thebits : TBits_1); inline;
  18821. procedure setRXHALFIF(thebits : TBits_1); inline;
  18822. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  18823. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  18824. procedure setRXOVFLIE(thebits : TBits_1); inline;
  18825. procedure setRXOVFLIF(thebits : TBits_1); inline;
  18826. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  18827. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  18828. procedure setTXHALFIE(thebits : TBits_1); inline;
  18829. procedure setTXHALFIF(thebits : TBits_1); inline;
  18830. procedure setTXNFULLIE(thebits : TBits_1); inline;
  18831. procedure setTXNFULLIF(thebits : TBits_1); inline;
  18832. procedure setw(thebits : TBits_32); inline;
  18833. public
  18834. procedure clearRXFULLIE; inline;
  18835. procedure clearRXFULLIF; inline;
  18836. procedure clearRXHALFIE; inline;
  18837. procedure clearRXHALFIF; inline;
  18838. procedure clearRXNEMPTYIE; inline;
  18839. procedure clearRXNEMPTYIF; inline;
  18840. procedure clearRXOVFLIE; inline;
  18841. procedure clearRXOVFLIF; inline;
  18842. procedure clearTXEMPTYIE; inline;
  18843. procedure clearTXEMPTYIF; inline;
  18844. procedure clearTXHALFIE; inline;
  18845. procedure clearTXHALFIF; inline;
  18846. procedure clearTXNFULLIE; inline;
  18847. procedure clearTXNFULLIF; inline;
  18848. procedure setRXFULLIE; inline;
  18849. procedure setRXFULLIF; inline;
  18850. procedure setRXHALFIE; inline;
  18851. procedure setRXHALFIF; inline;
  18852. procedure setRXNEMPTYIE; inline;
  18853. procedure setRXNEMPTYIF; inline;
  18854. procedure setRXOVFLIE; inline;
  18855. procedure setRXOVFLIF; inline;
  18856. procedure setTXEMPTYIE; inline;
  18857. procedure setTXEMPTYIF; inline;
  18858. procedure setTXHALFIE; inline;
  18859. procedure setTXHALFIF; inline;
  18860. procedure setTXNFULLIE; inline;
  18861. procedure setTXNFULLIF; inline;
  18862. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  18863. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  18864. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  18865. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  18866. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  18867. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  18868. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  18869. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  18870. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  18871. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  18872. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  18873. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  18874. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  18875. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  18876. property w : TBits_32 read getw write setw;
  18877. end;
  18878. TCAN1_C1FIFOCI27 = record
  18879. private
  18880. function getCFIFOCI : TBits_5; inline;
  18881. function getw : TBits_32; inline;
  18882. procedure setCFIFOCI(thebits : TBits_5); inline;
  18883. procedure setw(thebits : TBits_32); inline;
  18884. public
  18885. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  18886. property w : TBits_32 read getw write setw;
  18887. end;
  18888. TCAN1_C1FIFOCON28 = record
  18889. private
  18890. function getDONLY : TBits_1; inline;
  18891. function getFRESET : TBits_1; inline;
  18892. function getFSIZE : TBits_5; inline;
  18893. function getRTREN : TBits_1; inline;
  18894. function getTXABAT : TBits_1; inline;
  18895. function getTXEN : TBits_1; inline;
  18896. function getTXERR : TBits_1; inline;
  18897. function getTXLARB : TBits_1; inline;
  18898. function getTXPRI : TBits_2; inline;
  18899. function getTXREQ : TBits_1; inline;
  18900. function getUINC : TBits_1; inline;
  18901. function getw : TBits_32; inline;
  18902. procedure setDONLY(thebits : TBits_1); inline;
  18903. procedure setFRESET(thebits : TBits_1); inline;
  18904. procedure setFSIZE(thebits : TBits_5); inline;
  18905. procedure setRTREN(thebits : TBits_1); inline;
  18906. procedure setTXABAT(thebits : TBits_1); inline;
  18907. procedure setTXEN(thebits : TBits_1); inline;
  18908. procedure setTXERR(thebits : TBits_1); inline;
  18909. procedure setTXLARB(thebits : TBits_1); inline;
  18910. procedure setTXPRI(thebits : TBits_2); inline;
  18911. procedure setTXREQ(thebits : TBits_1); inline;
  18912. procedure setUINC(thebits : TBits_1); inline;
  18913. procedure setw(thebits : TBits_32); inline;
  18914. public
  18915. procedure clearDONLY; inline;
  18916. procedure clearFRESET; inline;
  18917. procedure clearRTREN; inline;
  18918. procedure clearTXABAT; inline;
  18919. procedure clearTXEN; inline;
  18920. procedure clearTXERR; inline;
  18921. procedure clearTXLARB; inline;
  18922. procedure clearTXREQ; inline;
  18923. procedure clearUINC; inline;
  18924. procedure setDONLY; inline;
  18925. procedure setFRESET; inline;
  18926. procedure setRTREN; inline;
  18927. procedure setTXABAT; inline;
  18928. procedure setTXEN; inline;
  18929. procedure setTXERR; inline;
  18930. procedure setTXLARB; inline;
  18931. procedure setTXREQ; inline;
  18932. procedure setUINC; inline;
  18933. property DONLY : TBits_1 read getDONLY write setDONLY;
  18934. property FRESET : TBits_1 read getFRESET write setFRESET;
  18935. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  18936. property RTREN : TBits_1 read getRTREN write setRTREN;
  18937. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  18938. property TXEN : TBits_1 read getTXEN write setTXEN;
  18939. property TXERR : TBits_1 read getTXERR write setTXERR;
  18940. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  18941. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  18942. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  18943. property UINC : TBits_1 read getUINC write setUINC;
  18944. property w : TBits_32 read getw write setw;
  18945. end;
  18946. TCAN1_C1FIFOINT28 = record
  18947. private
  18948. function getRXFULLIE : TBits_1; inline;
  18949. function getRXFULLIF : TBits_1; inline;
  18950. function getRXHALFIE : TBits_1; inline;
  18951. function getRXHALFIF : TBits_1; inline;
  18952. function getRXNEMPTYIE : TBits_1; inline;
  18953. function getRXNEMPTYIF : TBits_1; inline;
  18954. function getRXOVFLIE : TBits_1; inline;
  18955. function getRXOVFLIF : TBits_1; inline;
  18956. function getTXEMPTYIE : TBits_1; inline;
  18957. function getTXEMPTYIF : TBits_1; inline;
  18958. function getTXHALFIE : TBits_1; inline;
  18959. function getTXHALFIF : TBits_1; inline;
  18960. function getTXNFULLIE : TBits_1; inline;
  18961. function getTXNFULLIF : TBits_1; inline;
  18962. function getw : TBits_32; inline;
  18963. procedure setRXFULLIE(thebits : TBits_1); inline;
  18964. procedure setRXFULLIF(thebits : TBits_1); inline;
  18965. procedure setRXHALFIE(thebits : TBits_1); inline;
  18966. procedure setRXHALFIF(thebits : TBits_1); inline;
  18967. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  18968. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  18969. procedure setRXOVFLIE(thebits : TBits_1); inline;
  18970. procedure setRXOVFLIF(thebits : TBits_1); inline;
  18971. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  18972. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  18973. procedure setTXHALFIE(thebits : TBits_1); inline;
  18974. procedure setTXHALFIF(thebits : TBits_1); inline;
  18975. procedure setTXNFULLIE(thebits : TBits_1); inline;
  18976. procedure setTXNFULLIF(thebits : TBits_1); inline;
  18977. procedure setw(thebits : TBits_32); inline;
  18978. public
  18979. procedure clearRXFULLIE; inline;
  18980. procedure clearRXFULLIF; inline;
  18981. procedure clearRXHALFIE; inline;
  18982. procedure clearRXHALFIF; inline;
  18983. procedure clearRXNEMPTYIE; inline;
  18984. procedure clearRXNEMPTYIF; inline;
  18985. procedure clearRXOVFLIE; inline;
  18986. procedure clearRXOVFLIF; inline;
  18987. procedure clearTXEMPTYIE; inline;
  18988. procedure clearTXEMPTYIF; inline;
  18989. procedure clearTXHALFIE; inline;
  18990. procedure clearTXHALFIF; inline;
  18991. procedure clearTXNFULLIE; inline;
  18992. procedure clearTXNFULLIF; inline;
  18993. procedure setRXFULLIE; inline;
  18994. procedure setRXFULLIF; inline;
  18995. procedure setRXHALFIE; inline;
  18996. procedure setRXHALFIF; inline;
  18997. procedure setRXNEMPTYIE; inline;
  18998. procedure setRXNEMPTYIF; inline;
  18999. procedure setRXOVFLIE; inline;
  19000. procedure setRXOVFLIF; inline;
  19001. procedure setTXEMPTYIE; inline;
  19002. procedure setTXEMPTYIF; inline;
  19003. procedure setTXHALFIE; inline;
  19004. procedure setTXHALFIF; inline;
  19005. procedure setTXNFULLIE; inline;
  19006. procedure setTXNFULLIF; inline;
  19007. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  19008. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  19009. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  19010. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  19011. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  19012. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  19013. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  19014. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  19015. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  19016. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  19017. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  19018. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  19019. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  19020. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  19021. property w : TBits_32 read getw write setw;
  19022. end;
  19023. TCAN1_C1FIFOCI28 = record
  19024. private
  19025. function getCFIFOCI : TBits_5; inline;
  19026. function getw : TBits_32; inline;
  19027. procedure setCFIFOCI(thebits : TBits_5); inline;
  19028. procedure setw(thebits : TBits_32); inline;
  19029. public
  19030. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  19031. property w : TBits_32 read getw write setw;
  19032. end;
  19033. TCAN1_C1FIFOCON29 = record
  19034. private
  19035. function getDONLY : TBits_1; inline;
  19036. function getFRESET : TBits_1; inline;
  19037. function getFSIZE : TBits_5; inline;
  19038. function getRTREN : TBits_1; inline;
  19039. function getTXABAT : TBits_1; inline;
  19040. function getTXEN : TBits_1; inline;
  19041. function getTXERR : TBits_1; inline;
  19042. function getTXLARB : TBits_1; inline;
  19043. function getTXPRI : TBits_2; inline;
  19044. function getTXREQ : TBits_1; inline;
  19045. function getUINC : TBits_1; inline;
  19046. function getw : TBits_32; inline;
  19047. procedure setDONLY(thebits : TBits_1); inline;
  19048. procedure setFRESET(thebits : TBits_1); inline;
  19049. procedure setFSIZE(thebits : TBits_5); inline;
  19050. procedure setRTREN(thebits : TBits_1); inline;
  19051. procedure setTXABAT(thebits : TBits_1); inline;
  19052. procedure setTXEN(thebits : TBits_1); inline;
  19053. procedure setTXERR(thebits : TBits_1); inline;
  19054. procedure setTXLARB(thebits : TBits_1); inline;
  19055. procedure setTXPRI(thebits : TBits_2); inline;
  19056. procedure setTXREQ(thebits : TBits_1); inline;
  19057. procedure setUINC(thebits : TBits_1); inline;
  19058. procedure setw(thebits : TBits_32); inline;
  19059. public
  19060. procedure clearDONLY; inline;
  19061. procedure clearFRESET; inline;
  19062. procedure clearRTREN; inline;
  19063. procedure clearTXABAT; inline;
  19064. procedure clearTXEN; inline;
  19065. procedure clearTXERR; inline;
  19066. procedure clearTXLARB; inline;
  19067. procedure clearTXREQ; inline;
  19068. procedure clearUINC; inline;
  19069. procedure setDONLY; inline;
  19070. procedure setFRESET; inline;
  19071. procedure setRTREN; inline;
  19072. procedure setTXABAT; inline;
  19073. procedure setTXEN; inline;
  19074. procedure setTXERR; inline;
  19075. procedure setTXLARB; inline;
  19076. procedure setTXREQ; inline;
  19077. procedure setUINC; inline;
  19078. property DONLY : TBits_1 read getDONLY write setDONLY;
  19079. property FRESET : TBits_1 read getFRESET write setFRESET;
  19080. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  19081. property RTREN : TBits_1 read getRTREN write setRTREN;
  19082. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  19083. property TXEN : TBits_1 read getTXEN write setTXEN;
  19084. property TXERR : TBits_1 read getTXERR write setTXERR;
  19085. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  19086. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  19087. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  19088. property UINC : TBits_1 read getUINC write setUINC;
  19089. property w : TBits_32 read getw write setw;
  19090. end;
  19091. TCAN1_C1FIFOINT29 = record
  19092. private
  19093. function getRXFULLIE : TBits_1; inline;
  19094. function getRXFULLIF : TBits_1; inline;
  19095. function getRXHALFIE : TBits_1; inline;
  19096. function getRXHALFIF : TBits_1; inline;
  19097. function getRXNEMPTYIE : TBits_1; inline;
  19098. function getRXNEMPTYIF : TBits_1; inline;
  19099. function getRXOVFLIE : TBits_1; inline;
  19100. function getRXOVFLIF : TBits_1; inline;
  19101. function getTXEMPTYIE : TBits_1; inline;
  19102. function getTXEMPTYIF : TBits_1; inline;
  19103. function getTXHALFIE : TBits_1; inline;
  19104. function getTXHALFIF : TBits_1; inline;
  19105. function getTXNFULLIE : TBits_1; inline;
  19106. function getTXNFULLIF : TBits_1; inline;
  19107. function getw : TBits_32; inline;
  19108. procedure setRXFULLIE(thebits : TBits_1); inline;
  19109. procedure setRXFULLIF(thebits : TBits_1); inline;
  19110. procedure setRXHALFIE(thebits : TBits_1); inline;
  19111. procedure setRXHALFIF(thebits : TBits_1); inline;
  19112. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  19113. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  19114. procedure setRXOVFLIE(thebits : TBits_1); inline;
  19115. procedure setRXOVFLIF(thebits : TBits_1); inline;
  19116. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  19117. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  19118. procedure setTXHALFIE(thebits : TBits_1); inline;
  19119. procedure setTXHALFIF(thebits : TBits_1); inline;
  19120. procedure setTXNFULLIE(thebits : TBits_1); inline;
  19121. procedure setTXNFULLIF(thebits : TBits_1); inline;
  19122. procedure setw(thebits : TBits_32); inline;
  19123. public
  19124. procedure clearRXFULLIE; inline;
  19125. procedure clearRXFULLIF; inline;
  19126. procedure clearRXHALFIE; inline;
  19127. procedure clearRXHALFIF; inline;
  19128. procedure clearRXNEMPTYIE; inline;
  19129. procedure clearRXNEMPTYIF; inline;
  19130. procedure clearRXOVFLIE; inline;
  19131. procedure clearRXOVFLIF; inline;
  19132. procedure clearTXEMPTYIE; inline;
  19133. procedure clearTXEMPTYIF; inline;
  19134. procedure clearTXHALFIE; inline;
  19135. procedure clearTXHALFIF; inline;
  19136. procedure clearTXNFULLIE; inline;
  19137. procedure clearTXNFULLIF; inline;
  19138. procedure setRXFULLIE; inline;
  19139. procedure setRXFULLIF; inline;
  19140. procedure setRXHALFIE; inline;
  19141. procedure setRXHALFIF; inline;
  19142. procedure setRXNEMPTYIE; inline;
  19143. procedure setRXNEMPTYIF; inline;
  19144. procedure setRXOVFLIE; inline;
  19145. procedure setRXOVFLIF; inline;
  19146. procedure setTXEMPTYIE; inline;
  19147. procedure setTXEMPTYIF; inline;
  19148. procedure setTXHALFIE; inline;
  19149. procedure setTXHALFIF; inline;
  19150. procedure setTXNFULLIE; inline;
  19151. procedure setTXNFULLIF; inline;
  19152. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  19153. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  19154. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  19155. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  19156. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  19157. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  19158. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  19159. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  19160. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  19161. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  19162. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  19163. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  19164. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  19165. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  19166. property w : TBits_32 read getw write setw;
  19167. end;
  19168. TCAN1_C1FIFOCI29 = record
  19169. private
  19170. function getCFIFOCI : TBits_5; inline;
  19171. function getw : TBits_32; inline;
  19172. procedure setCFIFOCI(thebits : TBits_5); inline;
  19173. procedure setw(thebits : TBits_32); inline;
  19174. public
  19175. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  19176. property w : TBits_32 read getw write setw;
  19177. end;
  19178. TCAN1_C1FIFOCON30 = record
  19179. private
  19180. function getDONLY : TBits_1; inline;
  19181. function getFRESET : TBits_1; inline;
  19182. function getFSIZE : TBits_5; inline;
  19183. function getRTREN : TBits_1; inline;
  19184. function getTXABAT : TBits_1; inline;
  19185. function getTXEN : TBits_1; inline;
  19186. function getTXERR : TBits_1; inline;
  19187. function getTXLARB : TBits_1; inline;
  19188. function getTXPRI : TBits_2; inline;
  19189. function getTXREQ : TBits_1; inline;
  19190. function getUINC : TBits_1; inline;
  19191. function getw : TBits_32; inline;
  19192. procedure setDONLY(thebits : TBits_1); inline;
  19193. procedure setFRESET(thebits : TBits_1); inline;
  19194. procedure setFSIZE(thebits : TBits_5); inline;
  19195. procedure setRTREN(thebits : TBits_1); inline;
  19196. procedure setTXABAT(thebits : TBits_1); inline;
  19197. procedure setTXEN(thebits : TBits_1); inline;
  19198. procedure setTXERR(thebits : TBits_1); inline;
  19199. procedure setTXLARB(thebits : TBits_1); inline;
  19200. procedure setTXPRI(thebits : TBits_2); inline;
  19201. procedure setTXREQ(thebits : TBits_1); inline;
  19202. procedure setUINC(thebits : TBits_1); inline;
  19203. procedure setw(thebits : TBits_32); inline;
  19204. public
  19205. procedure clearDONLY; inline;
  19206. procedure clearFRESET; inline;
  19207. procedure clearRTREN; inline;
  19208. procedure clearTXABAT; inline;
  19209. procedure clearTXEN; inline;
  19210. procedure clearTXERR; inline;
  19211. procedure clearTXLARB; inline;
  19212. procedure clearTXREQ; inline;
  19213. procedure clearUINC; inline;
  19214. procedure setDONLY; inline;
  19215. procedure setFRESET; inline;
  19216. procedure setRTREN; inline;
  19217. procedure setTXABAT; inline;
  19218. procedure setTXEN; inline;
  19219. procedure setTXERR; inline;
  19220. procedure setTXLARB; inline;
  19221. procedure setTXREQ; inline;
  19222. procedure setUINC; inline;
  19223. property DONLY : TBits_1 read getDONLY write setDONLY;
  19224. property FRESET : TBits_1 read getFRESET write setFRESET;
  19225. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  19226. property RTREN : TBits_1 read getRTREN write setRTREN;
  19227. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  19228. property TXEN : TBits_1 read getTXEN write setTXEN;
  19229. property TXERR : TBits_1 read getTXERR write setTXERR;
  19230. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  19231. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  19232. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  19233. property UINC : TBits_1 read getUINC write setUINC;
  19234. property w : TBits_32 read getw write setw;
  19235. end;
  19236. TCAN1_C1FIFOINT30 = record
  19237. private
  19238. function getRXFULLIE : TBits_1; inline;
  19239. function getRXFULLIF : TBits_1; inline;
  19240. function getRXHALFIE : TBits_1; inline;
  19241. function getRXHALFIF : TBits_1; inline;
  19242. function getRXNEMPTYIE : TBits_1; inline;
  19243. function getRXNEMPTYIF : TBits_1; inline;
  19244. function getRXOVFLIE : TBits_1; inline;
  19245. function getRXOVFLIF : TBits_1; inline;
  19246. function getTXEMPTYIE : TBits_1; inline;
  19247. function getTXEMPTYIF : TBits_1; inline;
  19248. function getTXHALFIE : TBits_1; inline;
  19249. function getTXHALFIF : TBits_1; inline;
  19250. function getTXNFULLIE : TBits_1; inline;
  19251. function getTXNFULLIF : TBits_1; inline;
  19252. function getw : TBits_32; inline;
  19253. procedure setRXFULLIE(thebits : TBits_1); inline;
  19254. procedure setRXFULLIF(thebits : TBits_1); inline;
  19255. procedure setRXHALFIE(thebits : TBits_1); inline;
  19256. procedure setRXHALFIF(thebits : TBits_1); inline;
  19257. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  19258. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  19259. procedure setRXOVFLIE(thebits : TBits_1); inline;
  19260. procedure setRXOVFLIF(thebits : TBits_1); inline;
  19261. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  19262. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  19263. procedure setTXHALFIE(thebits : TBits_1); inline;
  19264. procedure setTXHALFIF(thebits : TBits_1); inline;
  19265. procedure setTXNFULLIE(thebits : TBits_1); inline;
  19266. procedure setTXNFULLIF(thebits : TBits_1); inline;
  19267. procedure setw(thebits : TBits_32); inline;
  19268. public
  19269. procedure clearRXFULLIE; inline;
  19270. procedure clearRXFULLIF; inline;
  19271. procedure clearRXHALFIE; inline;
  19272. procedure clearRXHALFIF; inline;
  19273. procedure clearRXNEMPTYIE; inline;
  19274. procedure clearRXNEMPTYIF; inline;
  19275. procedure clearRXOVFLIE; inline;
  19276. procedure clearRXOVFLIF; inline;
  19277. procedure clearTXEMPTYIE; inline;
  19278. procedure clearTXEMPTYIF; inline;
  19279. procedure clearTXHALFIE; inline;
  19280. procedure clearTXHALFIF; inline;
  19281. procedure clearTXNFULLIE; inline;
  19282. procedure clearTXNFULLIF; inline;
  19283. procedure setRXFULLIE; inline;
  19284. procedure setRXFULLIF; inline;
  19285. procedure setRXHALFIE; inline;
  19286. procedure setRXHALFIF; inline;
  19287. procedure setRXNEMPTYIE; inline;
  19288. procedure setRXNEMPTYIF; inline;
  19289. procedure setRXOVFLIE; inline;
  19290. procedure setRXOVFLIF; inline;
  19291. procedure setTXEMPTYIE; inline;
  19292. procedure setTXEMPTYIF; inline;
  19293. procedure setTXHALFIE; inline;
  19294. procedure setTXHALFIF; inline;
  19295. procedure setTXNFULLIE; inline;
  19296. procedure setTXNFULLIF; inline;
  19297. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  19298. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  19299. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  19300. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  19301. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  19302. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  19303. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  19304. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  19305. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  19306. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  19307. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  19308. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  19309. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  19310. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  19311. property w : TBits_32 read getw write setw;
  19312. end;
  19313. TCAN1_C1FIFOCI30 = record
  19314. private
  19315. function getCFIFOCI : TBits_5; inline;
  19316. function getw : TBits_32; inline;
  19317. procedure setCFIFOCI(thebits : TBits_5); inline;
  19318. procedure setw(thebits : TBits_32); inline;
  19319. public
  19320. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  19321. property w : TBits_32 read getw write setw;
  19322. end;
  19323. TCAN1_C1FIFOCON31 = record
  19324. private
  19325. function getDONLY : TBits_1; inline;
  19326. function getFRESET : TBits_1; inline;
  19327. function getFSIZE : TBits_5; inline;
  19328. function getRTREN : TBits_1; inline;
  19329. function getTXABAT : TBits_1; inline;
  19330. function getTXEN : TBits_1; inline;
  19331. function getTXERR : TBits_1; inline;
  19332. function getTXLARB : TBits_1; inline;
  19333. function getTXPRI : TBits_2; inline;
  19334. function getTXREQ : TBits_1; inline;
  19335. function getUINC : TBits_1; inline;
  19336. function getw : TBits_32; inline;
  19337. procedure setDONLY(thebits : TBits_1); inline;
  19338. procedure setFRESET(thebits : TBits_1); inline;
  19339. procedure setFSIZE(thebits : TBits_5); inline;
  19340. procedure setRTREN(thebits : TBits_1); inline;
  19341. procedure setTXABAT(thebits : TBits_1); inline;
  19342. procedure setTXEN(thebits : TBits_1); inline;
  19343. procedure setTXERR(thebits : TBits_1); inline;
  19344. procedure setTXLARB(thebits : TBits_1); inline;
  19345. procedure setTXPRI(thebits : TBits_2); inline;
  19346. procedure setTXREQ(thebits : TBits_1); inline;
  19347. procedure setUINC(thebits : TBits_1); inline;
  19348. procedure setw(thebits : TBits_32); inline;
  19349. public
  19350. procedure clearDONLY; inline;
  19351. procedure clearFRESET; inline;
  19352. procedure clearRTREN; inline;
  19353. procedure clearTXABAT; inline;
  19354. procedure clearTXEN; inline;
  19355. procedure clearTXERR; inline;
  19356. procedure clearTXLARB; inline;
  19357. procedure clearTXREQ; inline;
  19358. procedure clearUINC; inline;
  19359. procedure setDONLY; inline;
  19360. procedure setFRESET; inline;
  19361. procedure setRTREN; inline;
  19362. procedure setTXABAT; inline;
  19363. procedure setTXEN; inline;
  19364. procedure setTXERR; inline;
  19365. procedure setTXLARB; inline;
  19366. procedure setTXREQ; inline;
  19367. procedure setUINC; inline;
  19368. property DONLY : TBits_1 read getDONLY write setDONLY;
  19369. property FRESET : TBits_1 read getFRESET write setFRESET;
  19370. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  19371. property RTREN : TBits_1 read getRTREN write setRTREN;
  19372. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  19373. property TXEN : TBits_1 read getTXEN write setTXEN;
  19374. property TXERR : TBits_1 read getTXERR write setTXERR;
  19375. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  19376. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  19377. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  19378. property UINC : TBits_1 read getUINC write setUINC;
  19379. property w : TBits_32 read getw write setw;
  19380. end;
  19381. TCAN1_C1FIFOINT31 = record
  19382. private
  19383. function getRXFULLIE : TBits_1; inline;
  19384. function getRXFULLIF : TBits_1; inline;
  19385. function getRXHALFIE : TBits_1; inline;
  19386. function getRXHALFIF : TBits_1; inline;
  19387. function getRXNEMPTYIE : TBits_1; inline;
  19388. function getRXNEMPTYIF : TBits_1; inline;
  19389. function getRXOVFLIE : TBits_1; inline;
  19390. function getRXOVFLIF : TBits_1; inline;
  19391. function getTXEMPTYIE : TBits_1; inline;
  19392. function getTXEMPTYIF : TBits_1; inline;
  19393. function getTXHALFIE : TBits_1; inline;
  19394. function getTXHALFIF : TBits_1; inline;
  19395. function getTXNFULLIE : TBits_1; inline;
  19396. function getTXNFULLIF : TBits_1; inline;
  19397. function getw : TBits_32; inline;
  19398. procedure setRXFULLIE(thebits : TBits_1); inline;
  19399. procedure setRXFULLIF(thebits : TBits_1); inline;
  19400. procedure setRXHALFIE(thebits : TBits_1); inline;
  19401. procedure setRXHALFIF(thebits : TBits_1); inline;
  19402. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  19403. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  19404. procedure setRXOVFLIE(thebits : TBits_1); inline;
  19405. procedure setRXOVFLIF(thebits : TBits_1); inline;
  19406. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  19407. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  19408. procedure setTXHALFIE(thebits : TBits_1); inline;
  19409. procedure setTXHALFIF(thebits : TBits_1); inline;
  19410. procedure setTXNFULLIE(thebits : TBits_1); inline;
  19411. procedure setTXNFULLIF(thebits : TBits_1); inline;
  19412. procedure setw(thebits : TBits_32); inline;
  19413. public
  19414. procedure clearRXFULLIE; inline;
  19415. procedure clearRXFULLIF; inline;
  19416. procedure clearRXHALFIE; inline;
  19417. procedure clearRXHALFIF; inline;
  19418. procedure clearRXNEMPTYIE; inline;
  19419. procedure clearRXNEMPTYIF; inline;
  19420. procedure clearRXOVFLIE; inline;
  19421. procedure clearRXOVFLIF; inline;
  19422. procedure clearTXEMPTYIE; inline;
  19423. procedure clearTXEMPTYIF; inline;
  19424. procedure clearTXHALFIE; inline;
  19425. procedure clearTXHALFIF; inline;
  19426. procedure clearTXNFULLIE; inline;
  19427. procedure clearTXNFULLIF; inline;
  19428. procedure setRXFULLIE; inline;
  19429. procedure setRXFULLIF; inline;
  19430. procedure setRXHALFIE; inline;
  19431. procedure setRXHALFIF; inline;
  19432. procedure setRXNEMPTYIE; inline;
  19433. procedure setRXNEMPTYIF; inline;
  19434. procedure setRXOVFLIE; inline;
  19435. procedure setRXOVFLIF; inline;
  19436. procedure setTXEMPTYIE; inline;
  19437. procedure setTXEMPTYIF; inline;
  19438. procedure setTXHALFIE; inline;
  19439. procedure setTXHALFIF; inline;
  19440. procedure setTXNFULLIE; inline;
  19441. procedure setTXNFULLIF; inline;
  19442. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  19443. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  19444. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  19445. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  19446. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  19447. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  19448. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  19449. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  19450. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  19451. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  19452. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  19453. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  19454. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  19455. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  19456. property w : TBits_32 read getw write setw;
  19457. end;
  19458. TCAN1_C1FIFOCI31 = record
  19459. private
  19460. function getCFIFOCI : TBits_5; inline;
  19461. function getw : TBits_32; inline;
  19462. procedure setCFIFOCI(thebits : TBits_5); inline;
  19463. procedure setw(thebits : TBits_32); inline;
  19464. public
  19465. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  19466. property w : TBits_32 read getw write setw;
  19467. end;
  19468. type
  19469. TCAN1Registers = record
  19470. C1CONbits : TCAN1_C1CON;
  19471. C1CON : longWord;
  19472. C1CONCLR : longWord;
  19473. C1CONSET : longWord;
  19474. C1CONINV : longWord;
  19475. C1CFGbits : TCAN1_C1CFG;
  19476. C1CFG : longWord;
  19477. C1CFGCLR : longWord;
  19478. C1CFGSET : longWord;
  19479. C1CFGINV : longWord;
  19480. C1INTbits : TCAN1_C1INT;
  19481. C1INT : longWord;
  19482. C1INTCLR : longWord;
  19483. C1INTSET : longWord;
  19484. C1INTINV : longWord;
  19485. C1VECbits : TCAN1_C1VEC;
  19486. C1VEC : longWord;
  19487. C1VECCLR : longWord;
  19488. C1VECSET : longWord;
  19489. C1VECINV : longWord;
  19490. C1TRECbits : TCAN1_C1TREC;
  19491. C1TREC : longWord;
  19492. C1TRECCLR : longWord;
  19493. C1TRECSET : longWord;
  19494. C1TRECINV : longWord;
  19495. C1FSTATbits : TCAN1_C1FSTAT;
  19496. C1FSTAT : longWord;
  19497. C1FSTATCLR : longWord;
  19498. C1FSTATSET : longWord;
  19499. C1FSTATINV : longWord;
  19500. C1RXOVFbits : TCAN1_C1RXOVF;
  19501. C1RXOVF : longWord;
  19502. C1RXOVFCLR : longWord;
  19503. C1RXOVFSET : longWord;
  19504. C1RXOVFINV : longWord;
  19505. C1TMRbits : TCAN1_C1TMR;
  19506. C1TMR : longWord;
  19507. C1TMRCLR : longWord;
  19508. C1TMRSET : longWord;
  19509. C1TMRINV : longWord;
  19510. C1RXM0bits : TCAN1_C1RXM0;
  19511. C1RXM0 : longWord;
  19512. C1RXM0CLR : longWord;
  19513. C1RXM0SET : longWord;
  19514. C1RXM0INV : longWord;
  19515. C1RXM1bits : TCAN1_C1RXM1;
  19516. C1RXM1 : longWord;
  19517. C1RXM1CLR : longWord;
  19518. C1RXM1SET : longWord;
  19519. C1RXM1INV : longWord;
  19520. C1RXM2bits : TCAN1_C1RXM2;
  19521. C1RXM2 : longWord;
  19522. C1RXM2CLR : longWord;
  19523. C1RXM2SET : longWord;
  19524. C1RXM2INV : longWord;
  19525. C1RXM3bits : TCAN1_C1RXM3;
  19526. C1RXM3 : longWord;
  19527. C1RXM3CLR : longWord;
  19528. C1RXM3SET : longWord;
  19529. C1RXM3INV : longWord;
  19530. C1FLTCON0bits : TCAN1_C1FLTCON0;
  19531. C1FLTCON0 : longWord;
  19532. C1FLTCON0CLR : longWord;
  19533. C1FLTCON0SET : longWord;
  19534. C1FLTCON0INV : longWord;
  19535. C1FLTCON1bits : TCAN1_C1FLTCON1;
  19536. C1FLTCON1 : longWord;
  19537. C1FLTCON1CLR : longWord;
  19538. C1FLTCON1SET : longWord;
  19539. C1FLTCON1INV : longWord;
  19540. C1FLTCON2bits : TCAN1_C1FLTCON2;
  19541. C1FLTCON2 : longWord;
  19542. C1FLTCON2CLR : longWord;
  19543. C1FLTCON2SET : longWord;
  19544. C1FLTCON2INV : longWord;
  19545. C1FLTCON3bits : TCAN1_C1FLTCON3;
  19546. C1FLTCON3 : longWord;
  19547. C1FLTCON3CLR : longWord;
  19548. C1FLTCON3SET : longWord;
  19549. C1FLTCON3INV : longWord;
  19550. C1FLTCON4bits : TCAN1_C1FLTCON4;
  19551. C1FLTCON4 : longWord;
  19552. C1FLTCON4CLR : longWord;
  19553. C1FLTCON4SET : longWord;
  19554. C1FLTCON4INV : longWord;
  19555. C1FLTCON5bits : TCAN1_C1FLTCON5;
  19556. C1FLTCON5 : longWord;
  19557. C1FLTCON5CLR : longWord;
  19558. C1FLTCON5SET : longWord;
  19559. C1FLTCON5INV : longWord;
  19560. C1FLTCON6bits : TCAN1_C1FLTCON6;
  19561. C1FLTCON6 : longWord;
  19562. C1FLTCON6CLR : longWord;
  19563. C1FLTCON6SET : longWord;
  19564. C1FLTCON6INV : longWord;
  19565. C1FLTCON7bits : TCAN1_C1FLTCON7;
  19566. C1FLTCON7 : longWord;
  19567. C1FLTCON7CLR : longWord;
  19568. C1FLTCON7SET : longWord;
  19569. C1FLTCON7INV : longWord;
  19570. C1RXF0bits : TCAN1_C1RXF0;
  19571. C1RXF0 : longWord;
  19572. C1RXF0CLR : longWord;
  19573. C1RXF0SET : longWord;
  19574. C1RXF0INV : longWord;
  19575. C1RXF1bits : TCAN1_C1RXF1;
  19576. C1RXF1 : longWord;
  19577. C1RXF1CLR : longWord;
  19578. C1RXF1SET : longWord;
  19579. C1RXF1INV : longWord;
  19580. C1RXF2bits : TCAN1_C1RXF2;
  19581. C1RXF2 : longWord;
  19582. C1RXF2CLR : longWord;
  19583. C1RXF2SET : longWord;
  19584. C1RXF2INV : longWord;
  19585. C1RXF3bits : TCAN1_C1RXF3;
  19586. C1RXF3 : longWord;
  19587. C1RXF3CLR : longWord;
  19588. C1RXF3SET : longWord;
  19589. C1RXF3INV : longWord;
  19590. C1RXF4bits : TCAN1_C1RXF4;
  19591. C1RXF4 : longWord;
  19592. C1RXF4CLR : longWord;
  19593. C1RXF4SET : longWord;
  19594. C1RXF4INV : longWord;
  19595. C1RXF5bits : TCAN1_C1RXF5;
  19596. C1RXF5 : longWord;
  19597. C1RXF5CLR : longWord;
  19598. C1RXF5SET : longWord;
  19599. C1RXF5INV : longWord;
  19600. C1RXF6bits : TCAN1_C1RXF6;
  19601. C1RXF6 : longWord;
  19602. C1RXF6CLR : longWord;
  19603. C1RXF6SET : longWord;
  19604. C1RXF6INV : longWord;
  19605. C1RXF7bits : TCAN1_C1RXF7;
  19606. C1RXF7 : longWord;
  19607. C1RXF7CLR : longWord;
  19608. C1RXF7SET : longWord;
  19609. C1RXF7INV : longWord;
  19610. C1RXF8bits : TCAN1_C1RXF8;
  19611. C1RXF8 : longWord;
  19612. C1RXF8CLR : longWord;
  19613. C1RXF8SET : longWord;
  19614. C1RXF8INV : longWord;
  19615. C1RXF9bits : TCAN1_C1RXF9;
  19616. C1RXF9 : longWord;
  19617. C1RXF9CLR : longWord;
  19618. C1RXF9SET : longWord;
  19619. C1RXF9INV : longWord;
  19620. C1RXF10bits : TCAN1_C1RXF10;
  19621. C1RXF10 : longWord;
  19622. C1RXF10CLR : longWord;
  19623. C1RXF10SET : longWord;
  19624. C1RXF10INV : longWord;
  19625. C1RXF11bits : TCAN1_C1RXF11;
  19626. C1RXF11 : longWord;
  19627. C1RXF11CLR : longWord;
  19628. C1RXF11SET : longWord;
  19629. C1RXF11INV : longWord;
  19630. C1RXF12bits : TCAN1_C1RXF12;
  19631. C1RXF12 : longWord;
  19632. C1RXF12CLR : longWord;
  19633. C1RXF12SET : longWord;
  19634. C1RXF12INV : longWord;
  19635. C1RXF13bits : TCAN1_C1RXF13;
  19636. C1RXF13 : longWord;
  19637. C1RXF13CLR : longWord;
  19638. C1RXF13SET : longWord;
  19639. C1RXF13INV : longWord;
  19640. C1RXF14bits : TCAN1_C1RXF14;
  19641. C1RXF14 : longWord;
  19642. C1RXF14CLR : longWord;
  19643. C1RXF14SET : longWord;
  19644. C1RXF14INV : longWord;
  19645. C1RXF15bits : TCAN1_C1RXF15;
  19646. C1RXF15 : longWord;
  19647. C1RXF15CLR : longWord;
  19648. C1RXF15SET : longWord;
  19649. C1RXF15INV : longWord;
  19650. C1RXF16bits : TCAN1_C1RXF16;
  19651. C1RXF16 : longWord;
  19652. C1RXF16CLR : longWord;
  19653. C1RXF16SET : longWord;
  19654. C1RXF16INV : longWord;
  19655. C1RXF17bits : TCAN1_C1RXF17;
  19656. C1RXF17 : longWord;
  19657. C1RXF17CLR : longWord;
  19658. C1RXF17SET : longWord;
  19659. C1RXF17INV : longWord;
  19660. C1RXF18bits : TCAN1_C1RXF18;
  19661. C1RXF18 : longWord;
  19662. C1RXF18CLR : longWord;
  19663. C1RXF18SET : longWord;
  19664. C1RXF18INV : longWord;
  19665. C1RXF19bits : TCAN1_C1RXF19;
  19666. C1RXF19 : longWord;
  19667. C1RXF19CLR : longWord;
  19668. C1RXF19SET : longWord;
  19669. C1RXF19INV : longWord;
  19670. C1RXF20bits : TCAN1_C1RXF20;
  19671. C1RXF20 : longWord;
  19672. C1RXF20CLR : longWord;
  19673. C1RXF20SET : longWord;
  19674. C1RXF20INV : longWord;
  19675. C1RXF21bits : TCAN1_C1RXF21;
  19676. C1RXF21 : longWord;
  19677. C1RXF21CLR : longWord;
  19678. C1RXF21SET : longWord;
  19679. C1RXF21INV : longWord;
  19680. C1RXF22bits : TCAN1_C1RXF22;
  19681. C1RXF22 : longWord;
  19682. C1RXF22CLR : longWord;
  19683. C1RXF22SET : longWord;
  19684. C1RXF22INV : longWord;
  19685. C1RXF23bits : TCAN1_C1RXF23;
  19686. C1RXF23 : longWord;
  19687. C1RXF23CLR : longWord;
  19688. C1RXF23SET : longWord;
  19689. C1RXF23INV : longWord;
  19690. C1RXF24bits : TCAN1_C1RXF24;
  19691. C1RXF24 : longWord;
  19692. C1RXF24CLR : longWord;
  19693. C1RXF24SET : longWord;
  19694. C1RXF24INV : longWord;
  19695. C1RXF25bits : TCAN1_C1RXF25;
  19696. C1RXF25 : longWord;
  19697. C1RXF25CLR : longWord;
  19698. C1RXF25SET : longWord;
  19699. C1RXF25INV : longWord;
  19700. C1RXF26bits : TCAN1_C1RXF26;
  19701. C1RXF26 : longWord;
  19702. C1RXF26CLR : longWord;
  19703. C1RXF26SET : longWord;
  19704. C1RXF26INV : longWord;
  19705. C1RXF27bits : TCAN1_C1RXF27;
  19706. C1RXF27 : longWord;
  19707. C1RXF27CLR : longWord;
  19708. C1RXF27SET : longWord;
  19709. C1RXF27INV : longWord;
  19710. C1RXF28bits : TCAN1_C1RXF28;
  19711. C1RXF28 : longWord;
  19712. C1RXF28CLR : longWord;
  19713. C1RXF28SET : longWord;
  19714. C1RXF28INV : longWord;
  19715. C1RXF29bits : TCAN1_C1RXF29;
  19716. C1RXF29 : longWord;
  19717. C1RXF29CLR : longWord;
  19718. C1RXF29SET : longWord;
  19719. C1RXF29INV : longWord;
  19720. C1RXF30bits : TCAN1_C1RXF30;
  19721. C1RXF30 : longWord;
  19722. C1RXF30CLR : longWord;
  19723. C1RXF30SET : longWord;
  19724. C1RXF30INV : longWord;
  19725. C1RXF31bits : TCAN1_C1RXF31;
  19726. C1RXF31 : longWord;
  19727. C1RXF31CLR : longWord;
  19728. C1RXF31SET : longWord;
  19729. C1RXF31INV : longWord;
  19730. C1FIFOBA : longWord;
  19731. C1FIFOBACLR : longWord;
  19732. C1FIFOBASET : longWord;
  19733. C1FIFOBAINV : longWord;
  19734. C1FIFOCON0bits : TCAN1_C1FIFOCON0;
  19735. C1FIFOCON0 : longWord;
  19736. C1FIFOCON0CLR : longWord;
  19737. C1FIFOCON0SET : longWord;
  19738. C1FIFOCON0INV : longWord;
  19739. C1FIFOINT0bits : TCAN1_C1FIFOINT0;
  19740. C1FIFOINT0 : longWord;
  19741. C1FIFOINT0CLR : longWord;
  19742. C1FIFOINT0SET : longWord;
  19743. C1FIFOINT0INV : longWord;
  19744. C1FIFOUA0 : longWord;
  19745. C1FIFOUA0CLR : longWord;
  19746. C1FIFOUA0SET : longWord;
  19747. C1FIFOUA0INV : longWord;
  19748. C1FIFOCI0bits : TCAN1_C1FIFOCI0;
  19749. C1FIFOCI0 : longWord;
  19750. C1FIFOCI0CLR : longWord;
  19751. C1FIFOCI0SET : longWord;
  19752. C1FIFOCI0INV : longWord;
  19753. C1FIFOCON1bits : TCAN1_C1FIFOCON1;
  19754. C1FIFOCON1 : longWord;
  19755. C1FIFOCON1CLR : longWord;
  19756. C1FIFOCON1SET : longWord;
  19757. C1FIFOCON1INV : longWord;
  19758. C1FIFOINT1bits : TCAN1_C1FIFOINT1;
  19759. C1FIFOINT1 : longWord;
  19760. C1FIFOINT1CLR : longWord;
  19761. C1FIFOINT1SET : longWord;
  19762. C1FIFOINT1INV : longWord;
  19763. C1FIFOUA1 : longWord;
  19764. C1FIFOUA1CLR : longWord;
  19765. C1FIFOUA1SET : longWord;
  19766. C1FIFOUA1INV : longWord;
  19767. C1FIFOCI1bits : TCAN1_C1FIFOCI1;
  19768. C1FIFOCI1 : longWord;
  19769. C1FIFOCI1CLR : longWord;
  19770. C1FIFOCI1SET : longWord;
  19771. C1FIFOCI1INV : longWord;
  19772. C1FIFOCON2bits : TCAN1_C1FIFOCON2;
  19773. C1FIFOCON2 : longWord;
  19774. C1FIFOCON2CLR : longWord;
  19775. C1FIFOCON2SET : longWord;
  19776. C1FIFOCON2INV : longWord;
  19777. C1FIFOINT2bits : TCAN1_C1FIFOINT2;
  19778. C1FIFOINT2 : longWord;
  19779. C1FIFOINT2CLR : longWord;
  19780. C1FIFOINT2SET : longWord;
  19781. C1FIFOINT2INV : longWord;
  19782. C1FIFOUA2 : longWord;
  19783. C1FIFOUA2CLR : longWord;
  19784. C1FIFOUA2SET : longWord;
  19785. C1FIFOUA2INV : longWord;
  19786. C1FIFOCI2bits : TCAN1_C1FIFOCI2;
  19787. C1FIFOCI2 : longWord;
  19788. C1FIFOCI2CLR : longWord;
  19789. C1FIFOCI2SET : longWord;
  19790. C1FIFOCI2INV : longWord;
  19791. C1FIFOCON3bits : TCAN1_C1FIFOCON3;
  19792. C1FIFOCON3 : longWord;
  19793. C1FIFOCON3CLR : longWord;
  19794. C1FIFOCON3SET : longWord;
  19795. C1FIFOCON3INV : longWord;
  19796. C1FIFOINT3bits : TCAN1_C1FIFOINT3;
  19797. C1FIFOINT3 : longWord;
  19798. C1FIFOINT3CLR : longWord;
  19799. C1FIFOINT3SET : longWord;
  19800. C1FIFOINT3INV : longWord;
  19801. C1FIFOUA3 : longWord;
  19802. C1FIFOUA3CLR : longWord;
  19803. C1FIFOUA3SET : longWord;
  19804. C1FIFOUA3INV : longWord;
  19805. C1FIFOCI3bits : TCAN1_C1FIFOCI3;
  19806. C1FIFOCI3 : longWord;
  19807. C1FIFOCI3CLR : longWord;
  19808. C1FIFOCI3SET : longWord;
  19809. C1FIFOCI3INV : longWord;
  19810. C1FIFOCON4bits : TCAN1_C1FIFOCON4;
  19811. C1FIFOCON4 : longWord;
  19812. C1FIFOCON4CLR : longWord;
  19813. C1FIFOCON4SET : longWord;
  19814. C1FIFOCON4INV : longWord;
  19815. C1FIFOINT4bits : TCAN1_C1FIFOINT4;
  19816. C1FIFOINT4 : longWord;
  19817. C1FIFOINT4CLR : longWord;
  19818. C1FIFOINT4SET : longWord;
  19819. C1FIFOINT4INV : longWord;
  19820. C1FIFOUA4 : longWord;
  19821. C1FIFOUA4CLR : longWord;
  19822. C1FIFOUA4SET : longWord;
  19823. C1FIFOUA4INV : longWord;
  19824. C1FIFOCI4bits : TCAN1_C1FIFOCI4;
  19825. C1FIFOCI4 : longWord;
  19826. C1FIFOCI4CLR : longWord;
  19827. C1FIFOCI4SET : longWord;
  19828. C1FIFOCI4INV : longWord;
  19829. C1FIFOCON5bits : TCAN1_C1FIFOCON5;
  19830. C1FIFOCON5 : longWord;
  19831. C1FIFOCON5CLR : longWord;
  19832. C1FIFOCON5SET : longWord;
  19833. C1FIFOCON5INV : longWord;
  19834. C1FIFOINT5bits : TCAN1_C1FIFOINT5;
  19835. C1FIFOINT5 : longWord;
  19836. C1FIFOINT5CLR : longWord;
  19837. C1FIFOINT5SET : longWord;
  19838. C1FIFOINT5INV : longWord;
  19839. C1FIFOUA5 : longWord;
  19840. C1FIFOUA5CLR : longWord;
  19841. C1FIFOUA5SET : longWord;
  19842. C1FIFOUA5INV : longWord;
  19843. C1FIFOCI5bits : TCAN1_C1FIFOCI5;
  19844. C1FIFOCI5 : longWord;
  19845. C1FIFOCI5CLR : longWord;
  19846. C1FIFOCI5SET : longWord;
  19847. C1FIFOCI5INV : longWord;
  19848. C1FIFOCON6bits : TCAN1_C1FIFOCON6;
  19849. C1FIFOCON6 : longWord;
  19850. C1FIFOCON6CLR : longWord;
  19851. C1FIFOCON6SET : longWord;
  19852. C1FIFOCON6INV : longWord;
  19853. C1FIFOINT6bits : TCAN1_C1FIFOINT6;
  19854. C1FIFOINT6 : longWord;
  19855. C1FIFOINT6CLR : longWord;
  19856. C1FIFOINT6SET : longWord;
  19857. C1FIFOINT6INV : longWord;
  19858. C1FIFOUA6 : longWord;
  19859. C1FIFOUA6CLR : longWord;
  19860. C1FIFOUA6SET : longWord;
  19861. C1FIFOUA6INV : longWord;
  19862. C1FIFOCI6bits : TCAN1_C1FIFOCI6;
  19863. C1FIFOCI6 : longWord;
  19864. C1FIFOCI6CLR : longWord;
  19865. C1FIFOCI6SET : longWord;
  19866. C1FIFOCI6INV : longWord;
  19867. C1FIFOCON7bits : TCAN1_C1FIFOCON7;
  19868. C1FIFOCON7 : longWord;
  19869. C1FIFOCON7CLR : longWord;
  19870. C1FIFOCON7SET : longWord;
  19871. C1FIFOCON7INV : longWord;
  19872. C1FIFOINT7bits : TCAN1_C1FIFOINT7;
  19873. C1FIFOINT7 : longWord;
  19874. C1FIFOINT7CLR : longWord;
  19875. C1FIFOINT7SET : longWord;
  19876. C1FIFOINT7INV : longWord;
  19877. C1FIFOUA7 : longWord;
  19878. C1FIFOUA7CLR : longWord;
  19879. C1FIFOUA7SET : longWord;
  19880. C1FIFOUA7INV : longWord;
  19881. C1FIFOCI7bits : TCAN1_C1FIFOCI7;
  19882. C1FIFOCI7 : longWord;
  19883. C1FIFOCI7CLR : longWord;
  19884. C1FIFOCI7SET : longWord;
  19885. C1FIFOCI7INV : longWord;
  19886. C1FIFOCON8bits : TCAN1_C1FIFOCON8;
  19887. C1FIFOCON8 : longWord;
  19888. C1FIFOCON8CLR : longWord;
  19889. C1FIFOCON8SET : longWord;
  19890. C1FIFOCON8INV : longWord;
  19891. C1FIFOINT8bits : TCAN1_C1FIFOINT8;
  19892. C1FIFOINT8 : longWord;
  19893. C1FIFOINT8CLR : longWord;
  19894. C1FIFOINT8SET : longWord;
  19895. C1FIFOINT8INV : longWord;
  19896. C1FIFOUA8 : longWord;
  19897. C1FIFOUA8CLR : longWord;
  19898. C1FIFOUA8SET : longWord;
  19899. C1FIFOUA8INV : longWord;
  19900. C1FIFOCI8bits : TCAN1_C1FIFOCI8;
  19901. C1FIFOCI8 : longWord;
  19902. C1FIFOCI8CLR : longWord;
  19903. C1FIFOCI8SET : longWord;
  19904. C1FIFOCI8INV : longWord;
  19905. C1FIFOCON9bits : TCAN1_C1FIFOCON9;
  19906. C1FIFOCON9 : longWord;
  19907. C1FIFOCON9CLR : longWord;
  19908. C1FIFOCON9SET : longWord;
  19909. C1FIFOCON9INV : longWord;
  19910. C1FIFOINT9bits : TCAN1_C1FIFOINT9;
  19911. C1FIFOINT9 : longWord;
  19912. C1FIFOINT9CLR : longWord;
  19913. C1FIFOINT9SET : longWord;
  19914. C1FIFOINT9INV : longWord;
  19915. C1FIFOUA9 : longWord;
  19916. C1FIFOUA9CLR : longWord;
  19917. C1FIFOUA9SET : longWord;
  19918. C1FIFOUA9INV : longWord;
  19919. C1FIFOCI9bits : TCAN1_C1FIFOCI9;
  19920. C1FIFOCI9 : longWord;
  19921. C1FIFOCI9CLR : longWord;
  19922. C1FIFOCI9SET : longWord;
  19923. C1FIFOCI9INV : longWord;
  19924. C1FIFOCON10bits : TCAN1_C1FIFOCON10;
  19925. C1FIFOCON10 : longWord;
  19926. C1FIFOCON10CLR : longWord;
  19927. C1FIFOCON10SET : longWord;
  19928. C1FIFOCON10INV : longWord;
  19929. C1FIFOINT10bits : TCAN1_C1FIFOINT10;
  19930. C1FIFOINT10 : longWord;
  19931. C1FIFOINT10CLR : longWord;
  19932. C1FIFOINT10SET : longWord;
  19933. C1FIFOINT10INV : longWord;
  19934. C1FIFOUA10 : longWord;
  19935. C1FIFOUA10CLR : longWord;
  19936. C1FIFOUA10SET : longWord;
  19937. C1FIFOUA10INV : longWord;
  19938. C1FIFOCI10bits : TCAN1_C1FIFOCI10;
  19939. C1FIFOCI10 : longWord;
  19940. C1FIFOCI10CLR : longWord;
  19941. C1FIFOCI10SET : longWord;
  19942. C1FIFOCI10INV : longWord;
  19943. C1FIFOCON11bits : TCAN1_C1FIFOCON11;
  19944. C1FIFOCON11 : longWord;
  19945. C1FIFOCON11CLR : longWord;
  19946. C1FIFOCON11SET : longWord;
  19947. C1FIFOCON11INV : longWord;
  19948. C1FIFOINT11bits : TCAN1_C1FIFOINT11;
  19949. C1FIFOINT11 : longWord;
  19950. C1FIFOINT11CLR : longWord;
  19951. C1FIFOINT11SET : longWord;
  19952. C1FIFOINT11INV : longWord;
  19953. C1FIFOUA11 : longWord;
  19954. C1FIFOUA11CLR : longWord;
  19955. C1FIFOUA11SET : longWord;
  19956. C1FIFOUA11INV : longWord;
  19957. C1FIFOCI11bits : TCAN1_C1FIFOCI11;
  19958. C1FIFOCI11 : longWord;
  19959. C1FIFOCI11CLR : longWord;
  19960. C1FIFOCI11SET : longWord;
  19961. C1FIFOCI11INV : longWord;
  19962. C1FIFOCON12bits : TCAN1_C1FIFOCON12;
  19963. C1FIFOCON12 : longWord;
  19964. C1FIFOCON12CLR : longWord;
  19965. C1FIFOCON12SET : longWord;
  19966. C1FIFOCON12INV : longWord;
  19967. C1FIFOINT12bits : TCAN1_C1FIFOINT12;
  19968. C1FIFOINT12 : longWord;
  19969. C1FIFOINT12CLR : longWord;
  19970. C1FIFOINT12SET : longWord;
  19971. C1FIFOINT12INV : longWord;
  19972. C1FIFOUA12 : longWord;
  19973. C1FIFOUA12CLR : longWord;
  19974. C1FIFOUA12SET : longWord;
  19975. C1FIFOUA12INV : longWord;
  19976. C1FIFOCI12bits : TCAN1_C1FIFOCI12;
  19977. C1FIFOCI12 : longWord;
  19978. C1FIFOCI12CLR : longWord;
  19979. C1FIFOCI12SET : longWord;
  19980. C1FIFOCI12INV : longWord;
  19981. C1FIFOCON13bits : TCAN1_C1FIFOCON13;
  19982. C1FIFOCON13 : longWord;
  19983. C1FIFOCON13CLR : longWord;
  19984. C1FIFOCON13SET : longWord;
  19985. C1FIFOCON13INV : longWord;
  19986. C1FIFOINT13bits : TCAN1_C1FIFOINT13;
  19987. C1FIFOINT13 : longWord;
  19988. C1FIFOINT13CLR : longWord;
  19989. C1FIFOINT13SET : longWord;
  19990. C1FIFOINT13INV : longWord;
  19991. C1FIFOUA13 : longWord;
  19992. C1FIFOUA13CLR : longWord;
  19993. C1FIFOUA13SET : longWord;
  19994. C1FIFOUA13INV : longWord;
  19995. C1FIFOCI13bits : TCAN1_C1FIFOCI13;
  19996. C1FIFOCI13 : longWord;
  19997. C1FIFOCI13CLR : longWord;
  19998. C1FIFOCI13SET : longWord;
  19999. C1FIFOCI13INV : longWord;
  20000. C1FIFOCON14bits : TCAN1_C1FIFOCON14;
  20001. C1FIFOCON14 : longWord;
  20002. C1FIFOCON14CLR : longWord;
  20003. C1FIFOCON14SET : longWord;
  20004. C1FIFOCON14INV : longWord;
  20005. C1FIFOINT14bits : TCAN1_C1FIFOINT14;
  20006. C1FIFOINT14 : longWord;
  20007. C1FIFOINT14CLR : longWord;
  20008. C1FIFOINT14SET : longWord;
  20009. C1FIFOINT14INV : longWord;
  20010. C1FIFOUA14 : longWord;
  20011. C1FIFOUA14CLR : longWord;
  20012. C1FIFOUA14SET : longWord;
  20013. C1FIFOUA14INV : longWord;
  20014. C1FIFOCI14bits : TCAN1_C1FIFOCI14;
  20015. C1FIFOCI14 : longWord;
  20016. C1FIFOCI14CLR : longWord;
  20017. C1FIFOCI14SET : longWord;
  20018. C1FIFOCI14INV : longWord;
  20019. C1FIFOCON15bits : TCAN1_C1FIFOCON15;
  20020. C1FIFOCON15 : longWord;
  20021. C1FIFOCON15CLR : longWord;
  20022. C1FIFOCON15SET : longWord;
  20023. C1FIFOCON15INV : longWord;
  20024. C1FIFOINT15bits : TCAN1_C1FIFOINT15;
  20025. C1FIFOINT15 : longWord;
  20026. C1FIFOINT15CLR : longWord;
  20027. C1FIFOINT15SET : longWord;
  20028. C1FIFOINT15INV : longWord;
  20029. C1FIFOUA15 : longWord;
  20030. C1FIFOUA15CLR : longWord;
  20031. C1FIFOUA15SET : longWord;
  20032. C1FIFOUA15INV : longWord;
  20033. C1FIFOCI15bits : TCAN1_C1FIFOCI15;
  20034. C1FIFOCI15 : longWord;
  20035. C1FIFOCI15CLR : longWord;
  20036. C1FIFOCI15SET : longWord;
  20037. C1FIFOCI15INV : longWord;
  20038. C1FIFOCON16bits : TCAN1_C1FIFOCON16;
  20039. C1FIFOCON16 : longWord;
  20040. C1FIFOCON16CLR : longWord;
  20041. C1FIFOCON16SET : longWord;
  20042. C1FIFOCON16INV : longWord;
  20043. C1FIFOINT16bits : TCAN1_C1FIFOINT16;
  20044. C1FIFOINT16 : longWord;
  20045. C1FIFOINT16CLR : longWord;
  20046. C1FIFOINT16SET : longWord;
  20047. C1FIFOINT16INV : longWord;
  20048. C1FIFOUA16 : longWord;
  20049. C1FIFOUA16CLR : longWord;
  20050. C1FIFOUA16SET : longWord;
  20051. C1FIFOUA16INV : longWord;
  20052. C1FIFOCI16bits : TCAN1_C1FIFOCI16;
  20053. C1FIFOCI16 : longWord;
  20054. C1FIFOCI16CLR : longWord;
  20055. C1FIFOCI16SET : longWord;
  20056. C1FIFOCI16INV : longWord;
  20057. C1FIFOCON17bits : TCAN1_C1FIFOCON17;
  20058. C1FIFOCON17 : longWord;
  20059. C1FIFOCON17CLR : longWord;
  20060. C1FIFOCON17SET : longWord;
  20061. C1FIFOCON17INV : longWord;
  20062. C1FIFOINT17bits : TCAN1_C1FIFOINT17;
  20063. C1FIFOINT17 : longWord;
  20064. C1FIFOINT17CLR : longWord;
  20065. C1FIFOINT17SET : longWord;
  20066. C1FIFOINT17INV : longWord;
  20067. C1FIFOUA17 : longWord;
  20068. C1FIFOUA17CLR : longWord;
  20069. C1FIFOUA17SET : longWord;
  20070. C1FIFOUA17INV : longWord;
  20071. C1FIFOCI17bits : TCAN1_C1FIFOCI17;
  20072. C1FIFOCI17 : longWord;
  20073. C1FIFOCI17CLR : longWord;
  20074. C1FIFOCI17SET : longWord;
  20075. C1FIFOCI17INV : longWord;
  20076. C1FIFOCON18bits : TCAN1_C1FIFOCON18;
  20077. C1FIFOCON18 : longWord;
  20078. C1FIFOCON18CLR : longWord;
  20079. C1FIFOCON18SET : longWord;
  20080. C1FIFOCON18INV : longWord;
  20081. C1FIFOINT18bits : TCAN1_C1FIFOINT18;
  20082. C1FIFOINT18 : longWord;
  20083. C1FIFOINT18CLR : longWord;
  20084. C1FIFOINT18SET : longWord;
  20085. C1FIFOINT18INV : longWord;
  20086. C1FIFOUA18 : longWord;
  20087. C1FIFOUA18CLR : longWord;
  20088. C1FIFOUA18SET : longWord;
  20089. C1FIFOUA18INV : longWord;
  20090. C1FIFOCI18bits : TCAN1_C1FIFOCI18;
  20091. C1FIFOCI18 : longWord;
  20092. C1FIFOCI18CLR : longWord;
  20093. C1FIFOCI18SET : longWord;
  20094. C1FIFOCI18INV : longWord;
  20095. C1FIFOCON19bits : TCAN1_C1FIFOCON19;
  20096. C1FIFOCON19 : longWord;
  20097. C1FIFOCON19CLR : longWord;
  20098. C1FIFOCON19SET : longWord;
  20099. C1FIFOCON19INV : longWord;
  20100. C1FIFOINT19bits : TCAN1_C1FIFOINT19;
  20101. C1FIFOINT19 : longWord;
  20102. C1FIFOINT19CLR : longWord;
  20103. C1FIFOINT19SET : longWord;
  20104. C1FIFOINT19INV : longWord;
  20105. C1FIFOUA19 : longWord;
  20106. C1FIFOUA19CLR : longWord;
  20107. C1FIFOUA19SET : longWord;
  20108. C1FIFOUA19INV : longWord;
  20109. C1FIFOCI19bits : TCAN1_C1FIFOCI19;
  20110. C1FIFOCI19 : longWord;
  20111. C1FIFOCI19CLR : longWord;
  20112. C1FIFOCI19SET : longWord;
  20113. C1FIFOCI19INV : longWord;
  20114. C1FIFOCON20bits : TCAN1_C1FIFOCON20;
  20115. C1FIFOCON20 : longWord;
  20116. C1FIFOCON20CLR : longWord;
  20117. C1FIFOCON20SET : longWord;
  20118. C1FIFOCON20INV : longWord;
  20119. C1FIFOINT20bits : TCAN1_C1FIFOINT20;
  20120. C1FIFOINT20 : longWord;
  20121. C1FIFOINT20CLR : longWord;
  20122. C1FIFOINT20SET : longWord;
  20123. C1FIFOINT20INV : longWord;
  20124. C1FIFOUA20 : longWord;
  20125. C1FIFOUA20CLR : longWord;
  20126. C1FIFOUA20SET : longWord;
  20127. C1FIFOUA20INV : longWord;
  20128. C1FIFOCI20bits : TCAN1_C1FIFOCI20;
  20129. C1FIFOCI20 : longWord;
  20130. C1FIFOCI20CLR : longWord;
  20131. C1FIFOCI20SET : longWord;
  20132. C1FIFOCI20INV : longWord;
  20133. C1FIFOCON21bits : TCAN1_C1FIFOCON21;
  20134. C1FIFOCON21 : longWord;
  20135. C1FIFOCON21CLR : longWord;
  20136. C1FIFOCON21SET : longWord;
  20137. C1FIFOCON21INV : longWord;
  20138. C1FIFOINT21bits : TCAN1_C1FIFOINT21;
  20139. C1FIFOINT21 : longWord;
  20140. C1FIFOINT21CLR : longWord;
  20141. C1FIFOINT21SET : longWord;
  20142. C1FIFOINT21INV : longWord;
  20143. C1FIFOUA21 : longWord;
  20144. C1FIFOUA21CLR : longWord;
  20145. C1FIFOUA21SET : longWord;
  20146. C1FIFOUA21INV : longWord;
  20147. C1FIFOCI21bits : TCAN1_C1FIFOCI21;
  20148. C1FIFOCI21 : longWord;
  20149. C1FIFOCI21CLR : longWord;
  20150. C1FIFOCI21SET : longWord;
  20151. C1FIFOCI21INV : longWord;
  20152. C1FIFOCON22bits : TCAN1_C1FIFOCON22;
  20153. C1FIFOCON22 : longWord;
  20154. C1FIFOCON22CLR : longWord;
  20155. C1FIFOCON22SET : longWord;
  20156. C1FIFOCON22INV : longWord;
  20157. C1FIFOINT22bits : TCAN1_C1FIFOINT22;
  20158. C1FIFOINT22 : longWord;
  20159. C1FIFOINT22CLR : longWord;
  20160. C1FIFOINT22SET : longWord;
  20161. C1FIFOINT22INV : longWord;
  20162. C1FIFOUA22 : longWord;
  20163. C1FIFOUA22CLR : longWord;
  20164. C1FIFOUA22SET : longWord;
  20165. C1FIFOUA22INV : longWord;
  20166. C1FIFOCI22bits : TCAN1_C1FIFOCI22;
  20167. C1FIFOCI22 : longWord;
  20168. C1FIFOCI22CLR : longWord;
  20169. C1FIFOCI22SET : longWord;
  20170. C1FIFOCI22INV : longWord;
  20171. C1FIFOCON23bits : TCAN1_C1FIFOCON23;
  20172. C1FIFOCON23 : longWord;
  20173. C1FIFOCON23CLR : longWord;
  20174. C1FIFOCON23SET : longWord;
  20175. C1FIFOCON23INV : longWord;
  20176. C1FIFOINT23bits : TCAN1_C1FIFOINT23;
  20177. C1FIFOINT23 : longWord;
  20178. C1FIFOINT23CLR : longWord;
  20179. C1FIFOINT23SET : longWord;
  20180. C1FIFOINT23INV : longWord;
  20181. C1FIFOUA23 : longWord;
  20182. C1FIFOUA23CLR : longWord;
  20183. C1FIFOUA23SET : longWord;
  20184. C1FIFOUA23INV : longWord;
  20185. C1FIFOCI23bits : TCAN1_C1FIFOCI23;
  20186. C1FIFOCI23 : longWord;
  20187. C1FIFOCI23CLR : longWord;
  20188. C1FIFOCI23SET : longWord;
  20189. C1FIFOCI23INV : longWord;
  20190. C1FIFOCON24bits : TCAN1_C1FIFOCON24;
  20191. C1FIFOCON24 : longWord;
  20192. C1FIFOCON24CLR : longWord;
  20193. C1FIFOCON24SET : longWord;
  20194. C1FIFOCON24INV : longWord;
  20195. C1FIFOINT24bits : TCAN1_C1FIFOINT24;
  20196. C1FIFOINT24 : longWord;
  20197. C1FIFOINT24CLR : longWord;
  20198. C1FIFOINT24SET : longWord;
  20199. C1FIFOINT24INV : longWord;
  20200. C1FIFOUA24 : longWord;
  20201. C1FIFOUA24CLR : longWord;
  20202. C1FIFOUA24SET : longWord;
  20203. C1FIFOUA24INV : longWord;
  20204. C1FIFOCI24bits : TCAN1_C1FIFOCI24;
  20205. C1FIFOCI24 : longWord;
  20206. C1FIFOCI24CLR : longWord;
  20207. C1FIFOCI24SET : longWord;
  20208. C1FIFOCI24INV : longWord;
  20209. C1FIFOCON25bits : TCAN1_C1FIFOCON25;
  20210. C1FIFOCON25 : longWord;
  20211. C1FIFOCON25CLR : longWord;
  20212. C1FIFOCON25SET : longWord;
  20213. C1FIFOCON25INV : longWord;
  20214. C1FIFOINT25bits : TCAN1_C1FIFOINT25;
  20215. C1FIFOINT25 : longWord;
  20216. C1FIFOINT25CLR : longWord;
  20217. C1FIFOINT25SET : longWord;
  20218. C1FIFOINT25INV : longWord;
  20219. C1FIFOUA25 : longWord;
  20220. C1FIFOUA25CLR : longWord;
  20221. C1FIFOUA25SET : longWord;
  20222. C1FIFOUA25INV : longWord;
  20223. C1FIFOCI25bits : TCAN1_C1FIFOCI25;
  20224. C1FIFOCI25 : longWord;
  20225. C1FIFOCI25CLR : longWord;
  20226. C1FIFOCI25SET : longWord;
  20227. C1FIFOCI25INV : longWord;
  20228. C1FIFOCON26bits : TCAN1_C1FIFOCON26;
  20229. C1FIFOCON26 : longWord;
  20230. C1FIFOCON26CLR : longWord;
  20231. C1FIFOCON26SET : longWord;
  20232. C1FIFOCON26INV : longWord;
  20233. C1FIFOINT26bits : TCAN1_C1FIFOINT26;
  20234. C1FIFOINT26 : longWord;
  20235. C1FIFOINT26CLR : longWord;
  20236. C1FIFOINT26SET : longWord;
  20237. C1FIFOINT26INV : longWord;
  20238. C1FIFOUA26 : longWord;
  20239. C1FIFOUA26CLR : longWord;
  20240. C1FIFOUA26SET : longWord;
  20241. C1FIFOUA26INV : longWord;
  20242. C1FIFOCI26bits : TCAN1_C1FIFOCI26;
  20243. C1FIFOCI26 : longWord;
  20244. C1FIFOCI26CLR : longWord;
  20245. C1FIFOCI26SET : longWord;
  20246. C1FIFOCI26INV : longWord;
  20247. C1FIFOCON27bits : TCAN1_C1FIFOCON27;
  20248. C1FIFOCON27 : longWord;
  20249. C1FIFOCON27CLR : longWord;
  20250. C1FIFOCON27SET : longWord;
  20251. C1FIFOCON27INV : longWord;
  20252. C1FIFOINT27bits : TCAN1_C1FIFOINT27;
  20253. C1FIFOINT27 : longWord;
  20254. C1FIFOINT27CLR : longWord;
  20255. C1FIFOINT27SET : longWord;
  20256. C1FIFOINT27INV : longWord;
  20257. C1FIFOUA27 : longWord;
  20258. C1FIFOUA27CLR : longWord;
  20259. C1FIFOUA27SET : longWord;
  20260. C1FIFOUA27INV : longWord;
  20261. C1FIFOCI27bits : TCAN1_C1FIFOCI27;
  20262. C1FIFOCI27 : longWord;
  20263. C1FIFOCI27CLR : longWord;
  20264. C1FIFOCI27SET : longWord;
  20265. C1FIFOCI27INV : longWord;
  20266. C1FIFOCON28bits : TCAN1_C1FIFOCON28;
  20267. C1FIFOCON28 : longWord;
  20268. C1FIFOCON28CLR : longWord;
  20269. C1FIFOCON28SET : longWord;
  20270. C1FIFOCON28INV : longWord;
  20271. C1FIFOINT28bits : TCAN1_C1FIFOINT28;
  20272. C1FIFOINT28 : longWord;
  20273. C1FIFOINT28CLR : longWord;
  20274. C1FIFOINT28SET : longWord;
  20275. C1FIFOINT28INV : longWord;
  20276. C1FIFOUA28 : longWord;
  20277. C1FIFOUA28CLR : longWord;
  20278. C1FIFOUA28SET : longWord;
  20279. C1FIFOUA28INV : longWord;
  20280. C1FIFOCI28bits : TCAN1_C1FIFOCI28;
  20281. C1FIFOCI28 : longWord;
  20282. C1FIFOCI28CLR : longWord;
  20283. C1FIFOCI28SET : longWord;
  20284. C1FIFOCI28INV : longWord;
  20285. C1FIFOCON29bits : TCAN1_C1FIFOCON29;
  20286. C1FIFOCON29 : longWord;
  20287. C1FIFOCON29CLR : longWord;
  20288. C1FIFOCON29SET : longWord;
  20289. C1FIFOCON29INV : longWord;
  20290. C1FIFOINT29bits : TCAN1_C1FIFOINT29;
  20291. C1FIFOINT29 : longWord;
  20292. C1FIFOINT29CLR : longWord;
  20293. C1FIFOINT29SET : longWord;
  20294. C1FIFOINT29INV : longWord;
  20295. C1FIFOUA29 : longWord;
  20296. C1FIFOUA29CLR : longWord;
  20297. C1FIFOUA29SET : longWord;
  20298. C1FIFOUA29INV : longWord;
  20299. C1FIFOCI29bits : TCAN1_C1FIFOCI29;
  20300. C1FIFOCI29 : longWord;
  20301. C1FIFOCI29CLR : longWord;
  20302. C1FIFOCI29SET : longWord;
  20303. C1FIFOCI29INV : longWord;
  20304. C1FIFOCON30bits : TCAN1_C1FIFOCON30;
  20305. C1FIFOCON30 : longWord;
  20306. C1FIFOCON30CLR : longWord;
  20307. C1FIFOCON30SET : longWord;
  20308. C1FIFOCON30INV : longWord;
  20309. C1FIFOINT30bits : TCAN1_C1FIFOINT30;
  20310. C1FIFOINT30 : longWord;
  20311. C1FIFOINT30CLR : longWord;
  20312. C1FIFOINT30SET : longWord;
  20313. C1FIFOINT30INV : longWord;
  20314. C1FIFOUA30 : longWord;
  20315. C1FIFOUA30CLR : longWord;
  20316. C1FIFOUA30SET : longWord;
  20317. C1FIFOUA30INV : longWord;
  20318. C1FIFOCI30bits : TCAN1_C1FIFOCI30;
  20319. C1FIFOCI30 : longWord;
  20320. C1FIFOCI30CLR : longWord;
  20321. C1FIFOCI30SET : longWord;
  20322. C1FIFOCI30INV : longWord;
  20323. C1FIFOCON31bits : TCAN1_C1FIFOCON31;
  20324. C1FIFOCON31 : longWord;
  20325. C1FIFOCON31CLR : longWord;
  20326. C1FIFOCON31SET : longWord;
  20327. C1FIFOCON31INV : longWord;
  20328. C1FIFOINT31bits : TCAN1_C1FIFOINT31;
  20329. C1FIFOINT31 : longWord;
  20330. C1FIFOINT31CLR : longWord;
  20331. C1FIFOINT31SET : longWord;
  20332. C1FIFOINT31INV : longWord;
  20333. C1FIFOUA31 : longWord;
  20334. C1FIFOUA31CLR : longWord;
  20335. C1FIFOUA31SET : longWord;
  20336. C1FIFOUA31INV : longWord;
  20337. C1FIFOCI31bits : TCAN1_C1FIFOCI31;
  20338. C1FIFOCI31 : longWord;
  20339. C1FIFOCI31CLR : longWord;
  20340. C1FIFOCI31SET : longWord;
  20341. C1FIFOCI31INV : longWord;
  20342. end;
  20343. TDEVCFG_DEVCFG3 = record
  20344. private
  20345. function getFCANIO : TBits_1; inline;
  20346. function getFSRSSEL : TBits_3; inline;
  20347. function getFUSBIDIO : TBits_1; inline;
  20348. function getFVBUSONIO : TBits_1; inline;
  20349. function getUSERID : TBits_16; inline;
  20350. function getw : TBits_32; inline;
  20351. procedure setFCANIO(thebits : TBits_1); inline;
  20352. procedure setFSRSSEL(thebits : TBits_3); inline;
  20353. procedure setFUSBIDIO(thebits : TBits_1); inline;
  20354. procedure setFVBUSONIO(thebits : TBits_1); inline;
  20355. procedure setUSERID(thebits : TBits_16); inline;
  20356. procedure setw(thebits : TBits_32); inline;
  20357. public
  20358. procedure clearFCANIO; inline;
  20359. procedure clearFUSBIDIO; inline;
  20360. procedure clearFVBUSONIO; inline;
  20361. procedure setFCANIO; inline;
  20362. procedure setFUSBIDIO; inline;
  20363. procedure setFVBUSONIO; inline;
  20364. property FCANIO : TBits_1 read getFCANIO write setFCANIO;
  20365. property FSRSSEL : TBits_3 read getFSRSSEL write setFSRSSEL;
  20366. property FUSBIDIO : TBits_1 read getFUSBIDIO write setFUSBIDIO;
  20367. property FVBUSONIO : TBits_1 read getFVBUSONIO write setFVBUSONIO;
  20368. property USERID : TBits_16 read getUSERID write setUSERID;
  20369. property w : TBits_32 read getw write setw;
  20370. end;
  20371. TDEVCFG_DEVCFG2 = record
  20372. private
  20373. function getFPLLIDIV : TBits_3; inline;
  20374. function getFPLLMUL : TBits_3; inline;
  20375. function getFPLLODIV : TBits_3; inline;
  20376. function getUPLLEN : TBits_1; inline;
  20377. function getUPLLIDIV : TBits_3; inline;
  20378. function getw : TBits_32; inline;
  20379. procedure setFPLLIDIV(thebits : TBits_3); inline;
  20380. procedure setFPLLMUL(thebits : TBits_3); inline;
  20381. procedure setFPLLODIV(thebits : TBits_3); inline;
  20382. procedure setUPLLEN(thebits : TBits_1); inline;
  20383. procedure setUPLLIDIV(thebits : TBits_3); inline;
  20384. procedure setw(thebits : TBits_32); inline;
  20385. public
  20386. procedure clearUPLLEN; inline;
  20387. procedure setUPLLEN; inline;
  20388. property FPLLIDIV : TBits_3 read getFPLLIDIV write setFPLLIDIV;
  20389. property FPLLMUL : TBits_3 read getFPLLMUL write setFPLLMUL;
  20390. property FPLLODIV : TBits_3 read getFPLLODIV write setFPLLODIV;
  20391. property UPLLEN : TBits_1 read getUPLLEN write setUPLLEN;
  20392. property UPLLIDIV : TBits_3 read getUPLLIDIV write setUPLLIDIV;
  20393. property w : TBits_32 read getw write setw;
  20394. end;
  20395. TDEVCFG_DEVCFG1 = record
  20396. private
  20397. function getFCKSM : TBits_2; inline;
  20398. function getFNOSC : TBits_3; inline;
  20399. function getFPBDIV : TBits_2; inline;
  20400. function getFSOSCEN : TBits_1; inline;
  20401. function getFWDTEN : TBits_1; inline;
  20402. function getIESO : TBits_1; inline;
  20403. function getOSCIOFNC : TBits_1; inline;
  20404. function getPOSCMOD : TBits_2; inline;
  20405. function getWDTPS : TBits_5; inline;
  20406. function getw : TBits_32; inline;
  20407. procedure setFCKSM(thebits : TBits_2); inline;
  20408. procedure setFNOSC(thebits : TBits_3); inline;
  20409. procedure setFPBDIV(thebits : TBits_2); inline;
  20410. procedure setFSOSCEN(thebits : TBits_1); inline;
  20411. procedure setFWDTEN(thebits : TBits_1); inline;
  20412. procedure setIESO(thebits : TBits_1); inline;
  20413. procedure setOSCIOFNC(thebits : TBits_1); inline;
  20414. procedure setPOSCMOD(thebits : TBits_2); inline;
  20415. procedure setWDTPS(thebits : TBits_5); inline;
  20416. procedure setw(thebits : TBits_32); inline;
  20417. public
  20418. procedure clearFSOSCEN; inline;
  20419. procedure clearFWDTEN; inline;
  20420. procedure clearIESO; inline;
  20421. procedure clearOSCIOFNC; inline;
  20422. procedure setFSOSCEN; inline;
  20423. procedure setFWDTEN; inline;
  20424. procedure setIESO; inline;
  20425. procedure setOSCIOFNC; inline;
  20426. property FCKSM : TBits_2 read getFCKSM write setFCKSM;
  20427. property FNOSC : TBits_3 read getFNOSC write setFNOSC;
  20428. property FPBDIV : TBits_2 read getFPBDIV write setFPBDIV;
  20429. property FSOSCEN : TBits_1 read getFSOSCEN write setFSOSCEN;
  20430. property FWDTEN : TBits_1 read getFWDTEN write setFWDTEN;
  20431. property IESO : TBits_1 read getIESO write setIESO;
  20432. property OSCIOFNC : TBits_1 read getOSCIOFNC write setOSCIOFNC;
  20433. property POSCMOD : TBits_2 read getPOSCMOD write setPOSCMOD;
  20434. property WDTPS : TBits_5 read getWDTPS write setWDTPS;
  20435. property w : TBits_32 read getw write setw;
  20436. end;
  20437. TDEVCFG_DEVCFG0 = record
  20438. private
  20439. function getBWP : TBits_1; inline;
  20440. function getCP : TBits_1; inline;
  20441. function getDEBUG : TBits_2; inline;
  20442. function getFDEBUG : TBits_2; inline;
  20443. function getICESEL : TBits_1; inline;
  20444. function getPWP : TBits_8; inline;
  20445. function getw : TBits_32; inline;
  20446. procedure setBWP(thebits : TBits_1); inline;
  20447. procedure setCP(thebits : TBits_1); inline;
  20448. procedure setDEBUG(thebits : TBits_2); inline;
  20449. procedure setFDEBUG(thebits : TBits_2); inline;
  20450. procedure setICESEL(thebits : TBits_1); inline;
  20451. procedure setPWP(thebits : TBits_8); inline;
  20452. procedure setw(thebits : TBits_32); inline;
  20453. public
  20454. procedure clearBWP; inline;
  20455. procedure clearCP; inline;
  20456. procedure clearICESEL; inline;
  20457. procedure setBWP; inline;
  20458. procedure setCP; inline;
  20459. procedure setICESEL; inline;
  20460. property BWP : TBits_1 read getBWP write setBWP;
  20461. property CP : TBits_1 read getCP write setCP;
  20462. property DEBUG : TBits_2 read getDEBUG write setDEBUG;
  20463. property FDEBUG : TBits_2 read getFDEBUG write setFDEBUG;
  20464. property ICESEL : TBits_1 read getICESEL write setICESEL;
  20465. property PWP : TBits_8 read getPWP write setPWP;
  20466. property w : TBits_32 read getw write setw;
  20467. end;
  20468. const
  20469. _CORE_TIMER_IRQ = 0;
  20470. _CORE_SOFTWARE_0_IRQ = 1;
  20471. _CORE_SOFTWARE_1_IRQ = 2;
  20472. _EXTERNAL_0_IRQ = 3;
  20473. _TIMER_1_IRQ = 4;
  20474. _INPUT_CAPTURE_1_IRQ = 5;
  20475. _OUTPUT_COMPARE_1_IRQ = 6;
  20476. _EXTERNAL_1_IRQ = 7;
  20477. _TIMER_2_IRQ = 8;
  20478. _INPUT_CAPTURE_2_IRQ = 9;
  20479. _OUTPUT_COMPARE_2_IRQ = 10;
  20480. _EXTERNAL_2_IRQ = 11;
  20481. _TIMER_3_IRQ = 12;
  20482. _INPUT_CAPTURE_3_IRQ = 13;
  20483. _OUTPUT_COMPARE_3_IRQ = 14;
  20484. _EXTERNAL_3_IRQ = 15;
  20485. _TIMER_4_IRQ = 16;
  20486. _INPUT_CAPTURE_4_IRQ = 17;
  20487. _OUTPUT_COMPARE_4_IRQ = 18;
  20488. _EXTERNAL_4_IRQ = 19;
  20489. _TIMER_5_IRQ = 20;
  20490. _INPUT_CAPTURE_5_IRQ = 21;
  20491. _OUTPUT_COMPARE_5_IRQ = 22;
  20492. _I2C1A_ERR_IRQ = 26;
  20493. _I2C3_BUS_IRQ = 26;
  20494. _SPI1A_ERR_IRQ = 26;
  20495. _SPI3_ERR_IRQ = 26;
  20496. _UART1A_ERR_IRQ = 26;
  20497. _UART1_ERR_IRQ = 26;
  20498. _I2C1A_RX_IRQ = 27;
  20499. _I2C3_SLAVE_IRQ = 27;
  20500. _SPI1A_RX_IRQ = 27;
  20501. _SPI3_RX_IRQ = 27;
  20502. _UART1A_RX_IRQ = 27;
  20503. _UART1_RX_IRQ = 27;
  20504. _I2C1A_TX_IRQ = 28;
  20505. _I2C3_MASTER_IRQ = 28;
  20506. _SPI1A_TX_IRQ = 28;
  20507. _SPI3_TX_IRQ = 28;
  20508. _UART1A_TX_IRQ = 28;
  20509. _UART1_TX_IRQ = 28;
  20510. _I2C1_BUS_IRQ = 29;
  20511. _I2C1_SLAVE_IRQ = 30;
  20512. _I2C1_MASTER_IRQ = 31;
  20513. _CHANGE_NOTICE_IRQ = 32;
  20514. _ADC_IRQ = 33;
  20515. _PMP_IRQ = 34;
  20516. _COMPARATOR_1_IRQ = 35;
  20517. _COMPARATOR_2_IRQ = 36;
  20518. _I2C2A_ERR_IRQ = 37;
  20519. _I2C4_BUS_IRQ = 37;
  20520. _SPI2_ERR_IRQ = 37;
  20521. _SPI2A_ERR_IRQ = 37;
  20522. _UART2A_ERR_IRQ = 37;
  20523. _UART3_ERR_IRQ = 37;
  20524. _I2C2A_RX_IRQ = 38;
  20525. _I2C4_SLAVE_IRQ = 38;
  20526. _SPI2_RX_IRQ = 38;
  20527. _SPI2A_RX_IRQ = 38;
  20528. _UART2A_RX_IRQ = 38;
  20529. _UART3_RX_IRQ = 38;
  20530. _I2C2A_TX_IRQ = 39;
  20531. _I2C4_MASTER_IRQ = 39;
  20532. _SPI2A_TX_IRQ = 39;
  20533. _SPI2_TX_IRQ = 39;
  20534. _UART2A_TX_IRQ = 39;
  20535. _UART3_TX_IRQ = 39;
  20536. _I2C3A_ERR_IRQ = 40;
  20537. _I2C5_BUS_IRQ = 40;
  20538. _SPI3A_ERR_IRQ = 40;
  20539. _SPI4_ERR_IRQ = 40;
  20540. _UART2_ERR_IRQ = 40;
  20541. _UART3A_ERR_IRQ = 40;
  20542. _I2C3A_RX_IRQ = 41;
  20543. _I2C5_SLAVE_IRQ = 41;
  20544. _SPI3A_RX_IRQ = 41;
  20545. _SPI4_RX_IRQ = 41;
  20546. _UART2_RX_IRQ = 41;
  20547. _UART3A_RX_IRQ = 41;
  20548. _I2C3A_TX_IRQ = 42;
  20549. _I2C5_MASTER_IRQ = 42;
  20550. _SPI3A_TX_IRQ = 42;
  20551. _SPI4_TX_IRQ = 42;
  20552. _UART2_TX_IRQ = 42;
  20553. _UART3A_TX_IRQ = 42;
  20554. _FAIL_SAFE_MONITOR_IRQ = 46;
  20555. _RTCC_IRQ = 47;
  20556. _DMA0_IRQ = 48;
  20557. _DMA1_IRQ = 49;
  20558. _DMA2_IRQ = 50;
  20559. _DMA3_IRQ = 51;
  20560. _FLASH_CONTROL_IRQ = 56;
  20561. _USB_IRQ = 57;
  20562. _CAN1_IRQ = 58;
  20563. _INPUT_CAPTURE_ERROR_1_IRQ = 61;
  20564. _INPUT_CAPTURE_ERROR_2_IRQ = 62;
  20565. _INPUT_CAPTURE_ERROR_3_IRQ = 63;
  20566. _INPUT_CAPTURE_ERROR_4_IRQ = 64;
  20567. _INPUT_CAPTURE_ERROR_5_IRQ = 65;
  20568. _PMP_ERROR_IRQ = 66;
  20569. _UART1B_ERR_IRQ = 67;
  20570. _UART4_ERR_IRQ = 67;
  20571. _UART1B_RX_IRQ = 68;
  20572. _UART4_RX_IRQ = 68;
  20573. _UART1B_TX_IRQ = 69;
  20574. _UART4_TX_IRQ = 69;
  20575. _UART2B_ERR_IRQ = 70;
  20576. _UART6_ERR_IRQ = 70;
  20577. _UART2B_RX_IRQ = 71;
  20578. _UART6_RX_IRQ = 71;
  20579. _UART2B_TX_IRQ = 72;
  20580. _UART6_TX_IRQ = 72;
  20581. _UART3B_ERR_IRQ = 73;
  20582. _UART5_ERR_IRQ = 73;
  20583. _UART3B_RX_IRQ = 74;
  20584. _UART5_RX_IRQ = 74;
  20585. _UART3B_TX_IRQ = 75;
  20586. _UART5_TX_IRQ = 75;
  20587. const
  20588. ADC10_BASE_ADDRESS = $BF809000;
  20589. var
  20590. ADC10 : TADC10Registers absolute ADC10_BASE_ADDRESS;
  20591. const
  20592. BMX_BASE_ADDRESS = $BF882000;
  20593. var
  20594. BMX : TBMXRegisters absolute BMX_BASE_ADDRESS;
  20595. const
  20596. CAN1_BASE_ADDRESS = $BF88B000;
  20597. var
  20598. CAN1 : TCAN1Registers absolute CAN1_BASE_ADDRESS;
  20599. const
  20600. CFG_BASE_ADDRESS = $BF80F200;
  20601. var
  20602. CFG : TCFGRegisters absolute CFG_BASE_ADDRESS;
  20603. const
  20604. CMP_BASE_ADDRESS = $BF80A000;
  20605. var
  20606. CMP : TCMPRegisters absolute CMP_BASE_ADDRESS;
  20607. const
  20608. CVR_BASE_ADDRESS = $BF809800;
  20609. var
  20610. CVR : TCVRRegisters absolute CVR_BASE_ADDRESS;
  20611. const
  20612. DMAC_BASE_ADDRESS = $BF883000;
  20613. var
  20614. DMAC : TDMACRegisters absolute DMAC_BASE_ADDRESS;
  20615. const
  20616. DMAC0_BASE_ADDRESS = $BF883060;
  20617. var
  20618. DMAC0 : TDMAC0Registers absolute DMAC0_BASE_ADDRESS;
  20619. const
  20620. DMAC1_BASE_ADDRESS = $BF883120;
  20621. var
  20622. DMAC1 : TDMAC1Registers absolute DMAC1_BASE_ADDRESS;
  20623. const
  20624. DMAC2_BASE_ADDRESS = $BF8831E0;
  20625. var
  20626. DMAC2 : TDMAC2Registers absolute DMAC2_BASE_ADDRESS;
  20627. const
  20628. DMAC3_BASE_ADDRESS = $BF8832A0;
  20629. var
  20630. DMAC3 : TDMAC3Registers absolute DMAC3_BASE_ADDRESS;
  20631. const
  20632. I2C1_BASE_ADDRESS = $BF805300;
  20633. var
  20634. I2C1 : TI2C1Registers absolute I2C1_BASE_ADDRESS;
  20635. const
  20636. I2C1A_BASE_ADDRESS = $BF805000;
  20637. var
  20638. I2C1A : TI2C1ARegisters absolute I2C1A_BASE_ADDRESS;
  20639. const
  20640. I2C2A_BASE_ADDRESS = $BF805100;
  20641. var
  20642. I2C2A : TI2C2ARegisters absolute I2C2A_BASE_ADDRESS;
  20643. const
  20644. I2C5_BASE_ADDRESS = $BF805200;
  20645. var
  20646. I2C5 : TI2C5Registers absolute I2C5_BASE_ADDRESS;
  20647. const
  20648. ICAP1_BASE_ADDRESS = $BF802000;
  20649. var
  20650. ICAP1 : TICAP1Registers absolute ICAP1_BASE_ADDRESS;
  20651. const
  20652. ICAP2_BASE_ADDRESS = $BF802200;
  20653. var
  20654. ICAP2 : TICAP2Registers absolute ICAP2_BASE_ADDRESS;
  20655. const
  20656. ICAP3_BASE_ADDRESS = $BF802400;
  20657. var
  20658. ICAP3 : TICAP3Registers absolute ICAP3_BASE_ADDRESS;
  20659. const
  20660. ICAP4_BASE_ADDRESS = $BF802600;
  20661. var
  20662. ICAP4 : TICAP4Registers absolute ICAP4_BASE_ADDRESS;
  20663. const
  20664. ICAP5_BASE_ADDRESS = $BF802800;
  20665. var
  20666. ICAP5 : TICAP5Registers absolute ICAP5_BASE_ADDRESS;
  20667. const
  20668. INT_BASE_ADDRESS = $BF881000;
  20669. var
  20670. INT : TINTRegisters absolute INT_BASE_ADDRESS;
  20671. const
  20672. NVM_BASE_ADDRESS = $BF80F400;
  20673. var
  20674. NVM : TNVMRegisters absolute NVM_BASE_ADDRESS;
  20675. const
  20676. OCMP1_BASE_ADDRESS = $BF803000;
  20677. var
  20678. OCMP1 : TOCMP1Registers absolute OCMP1_BASE_ADDRESS;
  20679. const
  20680. OCMP2_BASE_ADDRESS = $BF803200;
  20681. var
  20682. OCMP2 : TOCMP2Registers absolute OCMP2_BASE_ADDRESS;
  20683. const
  20684. OCMP3_BASE_ADDRESS = $BF803400;
  20685. var
  20686. OCMP3 : TOCMP3Registers absolute OCMP3_BASE_ADDRESS;
  20687. const
  20688. OCMP4_BASE_ADDRESS = $BF803600;
  20689. var
  20690. OCMP4 : TOCMP4Registers absolute OCMP4_BASE_ADDRESS;
  20691. const
  20692. OCMP5_BASE_ADDRESS = $BF803800;
  20693. var
  20694. OCMP5 : TOCMP5Registers absolute OCMP5_BASE_ADDRESS;
  20695. const
  20696. OSC_BASE_ADDRESS = $BF80F000;
  20697. var
  20698. OSC : TOSCRegisters absolute OSC_BASE_ADDRESS;
  20699. const
  20700. PCACHE_BASE_ADDRESS = $BF884000;
  20701. var
  20702. PCACHE : TPCACHERegisters absolute PCACHE_BASE_ADDRESS;
  20703. const
  20704. PMP_BASE_ADDRESS = $BF807000;
  20705. var
  20706. PMP : TPMPRegisters absolute PMP_BASE_ADDRESS;
  20707. const
  20708. PORTB_BASE_ADDRESS = $BF886040;
  20709. var
  20710. PORTB : TPORTBRegisters absolute PORTB_BASE_ADDRESS;
  20711. const
  20712. PORTC_BASE_ADDRESS = $BF886080;
  20713. var
  20714. PORTC : TPORTCRegisters absolute PORTC_BASE_ADDRESS;
  20715. const
  20716. PORTD_BASE_ADDRESS = $BF8860C0;
  20717. var
  20718. PORTD : TPORTDRegisters absolute PORTD_BASE_ADDRESS;
  20719. const
  20720. PORTE_BASE_ADDRESS = $BF886100;
  20721. var
  20722. PORTE : TPORTERegisters absolute PORTE_BASE_ADDRESS;
  20723. const
  20724. PORTF_BASE_ADDRESS = $BF886140;
  20725. var
  20726. PORTF : TPORTFRegisters absolute PORTF_BASE_ADDRESS;
  20727. const
  20728. PORTG_BASE_ADDRESS = $BF886180;
  20729. var
  20730. PORTG : TPORTGRegisters absolute PORTG_BASE_ADDRESS;
  20731. const
  20732. RCON_BASE_ADDRESS = $BF80F600;
  20733. var
  20734. RCON : TRCONRegisters absolute RCON_BASE_ADDRESS;
  20735. const
  20736. RTCC_BASE_ADDRESS = $BF800200;
  20737. var
  20738. RTCC : TRTCCRegisters absolute RTCC_BASE_ADDRESS;
  20739. const
  20740. SPI2A_BASE_ADDRESS = $BF805A00;
  20741. var
  20742. SPI2A : TSPI2ARegisters absolute SPI2A_BASE_ADDRESS;
  20743. const
  20744. SPI3_BASE_ADDRESS = $BF805800;
  20745. var
  20746. SPI3 : TSPI3Registers absolute SPI3_BASE_ADDRESS;
  20747. const
  20748. SPI3A_BASE_ADDRESS = $BF805C00;
  20749. var
  20750. SPI3A : TSPI3ARegisters absolute SPI3A_BASE_ADDRESS;
  20751. const
  20752. TMR1_BASE_ADDRESS = $BF800600;
  20753. var
  20754. TMR1 : TTMR1Registers absolute TMR1_BASE_ADDRESS;
  20755. const
  20756. TMR2_BASE_ADDRESS = $BF800800;
  20757. var
  20758. TMR2 : TTMR2Registers absolute TMR2_BASE_ADDRESS;
  20759. const
  20760. TMR3_BASE_ADDRESS = $BF800A00;
  20761. var
  20762. TMR3 : TTMR3Registers absolute TMR3_BASE_ADDRESS;
  20763. const
  20764. TMR4_BASE_ADDRESS = $BF800C00;
  20765. var
  20766. TMR4 : TTMR4Registers absolute TMR4_BASE_ADDRESS;
  20767. const
  20768. TMR5_BASE_ADDRESS = $BF800E00;
  20769. var
  20770. TMR5 : TTMR5Registers absolute TMR5_BASE_ADDRESS;
  20771. const
  20772. UART1A_BASE_ADDRESS = $BF806000;
  20773. var
  20774. UART1A : TUART1ARegisters absolute UART1A_BASE_ADDRESS;
  20775. const
  20776. UART2_BASE_ADDRESS = $BF806800;
  20777. var
  20778. UART2 : TUART2Registers absolute UART2_BASE_ADDRESS;
  20779. const
  20780. UART2A_BASE_ADDRESS = $BF806400;
  20781. var
  20782. UART2A : TUART2ARegisters absolute UART2A_BASE_ADDRESS;
  20783. const
  20784. UART4_BASE_ADDRESS = $BF806200;
  20785. var
  20786. UART4 : TUART4Registers absolute UART4_BASE_ADDRESS;
  20787. const
  20788. UART5_BASE_ADDRESS = $BF806A00;
  20789. var
  20790. UART5 : TUART5Registers absolute UART5_BASE_ADDRESS;
  20791. const
  20792. UART6_BASE_ADDRESS = $BF806600;
  20793. var
  20794. UART6 : TUART6Registers absolute UART6_BASE_ADDRESS;
  20795. const
  20796. USB_BASE_ADDRESS = $BF885040;
  20797. var
  20798. USB : TUSBRegisters absolute USB_BASE_ADDRESS;
  20799. const
  20800. WDT_BASE_ADDRESS = $BF800000;
  20801. var
  20802. WDT : TWDTRegisters absolute WDT_BASE_ADDRESS;
  20803. const
  20804. _APPI_BASE_ADDRESS = $BF880190;
  20805. var
  20806. _APPI : T_APPIRegisters absolute _APPI_BASE_ADDRESS;
  20807. const
  20808. _APPO_BASE_ADDRESS = $BF880180;
  20809. var
  20810. _APPO : T_APPORegisters absolute _APPO_BASE_ADDRESS;
  20811. const
  20812. _DDPSTAT_BASE_ADDRESS = $BF880140;
  20813. var
  20814. _DDPSTAT : T_DDPSTATRegisters absolute _DDPSTAT_BASE_ADDRESS;
  20815. const
  20816. _STRO_BASE_ADDRESS = $BF880170;
  20817. var
  20818. _STRO : T_STRORegisters absolute _STRO_BASE_ADDRESS;
  20819. implementation
  20820. type
  20821. TDefRegMap = record
  20822. val : longWord;
  20823. clr : longWord;
  20824. &set : longWord;
  20825. inv : longWord;
  20826. end;
  20827. pTDefRegMap = ^TDefRegMap;
  20828. procedure TWDT_WDTCON.setWDTCLR; inline;
  20829. begin
  20830. pTDefRegMap(@Self)^.&set := $00000001;
  20831. end;
  20832. procedure TWDT_WDTCON.clearWDTCLR; inline;
  20833. begin
  20834. pTDefRegMap(@Self)^.clr := $00000001;
  20835. end;
  20836. procedure TWDT_WDTCON.setWDTCLR(thebits : TBits_1); inline;
  20837. begin
  20838. if thebits = 0 then
  20839. pTDefRegMap(@Self)^.clr := $00000001
  20840. else
  20841. pTDefRegMap(@Self)^.&set := $00000001;
  20842. end;
  20843. function TWDT_WDTCON.getWDTCLR : TBits_1; inline;
  20844. begin
  20845. getWDTCLR := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  20846. end;
  20847. procedure TWDT_WDTCON.setSWDTPS(thebits : TBits_5); inline;
  20848. begin
  20849. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF83 or ( thebits shl 2 );
  20850. end;
  20851. function TWDT_WDTCON.getSWDTPS : TBits_5; inline;
  20852. begin
  20853. getSWDTPS := (pTDefRegMap(@Self)^.val and $0000007C) shr 2;
  20854. end;
  20855. procedure TWDT_WDTCON.setON; inline;
  20856. begin
  20857. pTDefRegMap(@Self)^.&set := $00008000;
  20858. end;
  20859. procedure TWDT_WDTCON.clearON; inline;
  20860. begin
  20861. pTDefRegMap(@Self)^.clr := $00008000;
  20862. end;
  20863. procedure TWDT_WDTCON.setON(thebits : TBits_1); inline;
  20864. begin
  20865. if thebits = 0 then
  20866. pTDefRegMap(@Self)^.clr := $00008000
  20867. else
  20868. pTDefRegMap(@Self)^.&set := $00008000;
  20869. end;
  20870. function TWDT_WDTCON.getON : TBits_1; inline;
  20871. begin
  20872. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  20873. end;
  20874. procedure TWDT_WDTCON.setSWDTPS0; inline;
  20875. begin
  20876. pTDefRegMap(@Self)^.&set := $00000004;
  20877. end;
  20878. procedure TWDT_WDTCON.clearSWDTPS0; inline;
  20879. begin
  20880. pTDefRegMap(@Self)^.clr := $00000004;
  20881. end;
  20882. procedure TWDT_WDTCON.setSWDTPS0(thebits : TBits_1); inline;
  20883. begin
  20884. if thebits = 0 then
  20885. pTDefRegMap(@Self)^.clr := $00000004
  20886. else
  20887. pTDefRegMap(@Self)^.&set := $00000004;
  20888. end;
  20889. function TWDT_WDTCON.getSWDTPS0 : TBits_1; inline;
  20890. begin
  20891. getSWDTPS0 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  20892. end;
  20893. procedure TWDT_WDTCON.setSWDTPS1; inline;
  20894. begin
  20895. pTDefRegMap(@Self)^.&set := $00000008;
  20896. end;
  20897. procedure TWDT_WDTCON.clearSWDTPS1; inline;
  20898. begin
  20899. pTDefRegMap(@Self)^.clr := $00000008;
  20900. end;
  20901. procedure TWDT_WDTCON.setSWDTPS1(thebits : TBits_1); inline;
  20902. begin
  20903. if thebits = 0 then
  20904. pTDefRegMap(@Self)^.clr := $00000008
  20905. else
  20906. pTDefRegMap(@Self)^.&set := $00000008;
  20907. end;
  20908. function TWDT_WDTCON.getSWDTPS1 : TBits_1; inline;
  20909. begin
  20910. getSWDTPS1 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  20911. end;
  20912. procedure TWDT_WDTCON.setSWDTPS2; inline;
  20913. begin
  20914. pTDefRegMap(@Self)^.&set := $00000010;
  20915. end;
  20916. procedure TWDT_WDTCON.clearSWDTPS2; inline;
  20917. begin
  20918. pTDefRegMap(@Self)^.clr := $00000010;
  20919. end;
  20920. procedure TWDT_WDTCON.setSWDTPS2(thebits : TBits_1); inline;
  20921. begin
  20922. if thebits = 0 then
  20923. pTDefRegMap(@Self)^.clr := $00000010
  20924. else
  20925. pTDefRegMap(@Self)^.&set := $00000010;
  20926. end;
  20927. function TWDT_WDTCON.getSWDTPS2 : TBits_1; inline;
  20928. begin
  20929. getSWDTPS2 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  20930. end;
  20931. procedure TWDT_WDTCON.setSWDTPS3; inline;
  20932. begin
  20933. pTDefRegMap(@Self)^.&set := $00000020;
  20934. end;
  20935. procedure TWDT_WDTCON.clearSWDTPS3; inline;
  20936. begin
  20937. pTDefRegMap(@Self)^.clr := $00000020;
  20938. end;
  20939. procedure TWDT_WDTCON.setSWDTPS3(thebits : TBits_1); inline;
  20940. begin
  20941. if thebits = 0 then
  20942. pTDefRegMap(@Self)^.clr := $00000020
  20943. else
  20944. pTDefRegMap(@Self)^.&set := $00000020;
  20945. end;
  20946. function TWDT_WDTCON.getSWDTPS3 : TBits_1; inline;
  20947. begin
  20948. getSWDTPS3 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  20949. end;
  20950. procedure TWDT_WDTCON.setSWDTPS4; inline;
  20951. begin
  20952. pTDefRegMap(@Self)^.&set := $00000040;
  20953. end;
  20954. procedure TWDT_WDTCON.clearSWDTPS4; inline;
  20955. begin
  20956. pTDefRegMap(@Self)^.clr := $00000040;
  20957. end;
  20958. procedure TWDT_WDTCON.setSWDTPS4(thebits : TBits_1); inline;
  20959. begin
  20960. if thebits = 0 then
  20961. pTDefRegMap(@Self)^.clr := $00000040
  20962. else
  20963. pTDefRegMap(@Self)^.&set := $00000040;
  20964. end;
  20965. function TWDT_WDTCON.getSWDTPS4 : TBits_1; inline;
  20966. begin
  20967. getSWDTPS4 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  20968. end;
  20969. procedure TWDT_WDTCON.setWDTPSTA(thebits : TBits_5); inline;
  20970. begin
  20971. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF83 or ( thebits shl 2 );
  20972. end;
  20973. function TWDT_WDTCON.getWDTPSTA : TBits_5; inline;
  20974. begin
  20975. getWDTPSTA := (pTDefRegMap(@Self)^.val and $0000007C) shr 2;
  20976. end;
  20977. procedure TWDT_WDTCON.setWDTPS(thebits : TBits_5); inline;
  20978. begin
  20979. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF83 or ( thebits shl 2 );
  20980. end;
  20981. function TWDT_WDTCON.getWDTPS : TBits_5; inline;
  20982. begin
  20983. getWDTPS := (pTDefRegMap(@Self)^.val and $0000007C) shr 2;
  20984. end;
  20985. procedure TWDT_WDTCON.setw(thebits : TBits_32); inline;
  20986. begin
  20987. pTDefRegMap(@Self)^.val := thebits;
  20988. end;
  20989. function TWDT_WDTCON.getw : TBits_32; inline;
  20990. begin
  20991. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  20992. end;
  20993. procedure TRTCC_RTCCON.setRTCOE; inline;
  20994. begin
  20995. pTDefRegMap(@Self)^.&set := $00000001;
  20996. end;
  20997. procedure TRTCC_RTCCON.clearRTCOE; inline;
  20998. begin
  20999. pTDefRegMap(@Self)^.clr := $00000001;
  21000. end;
  21001. procedure TRTCC_RTCCON.setRTCOE(thebits : TBits_1); inline;
  21002. begin
  21003. if thebits = 0 then
  21004. pTDefRegMap(@Self)^.clr := $00000001
  21005. else
  21006. pTDefRegMap(@Self)^.&set := $00000001;
  21007. end;
  21008. function TRTCC_RTCCON.getRTCOE : TBits_1; inline;
  21009. begin
  21010. getRTCOE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  21011. end;
  21012. procedure TRTCC_RTCCON.setHALFSEC; inline;
  21013. begin
  21014. pTDefRegMap(@Self)^.&set := $00000002;
  21015. end;
  21016. procedure TRTCC_RTCCON.clearHALFSEC; inline;
  21017. begin
  21018. pTDefRegMap(@Self)^.clr := $00000002;
  21019. end;
  21020. procedure TRTCC_RTCCON.setHALFSEC(thebits : TBits_1); inline;
  21021. begin
  21022. if thebits = 0 then
  21023. pTDefRegMap(@Self)^.clr := $00000002
  21024. else
  21025. pTDefRegMap(@Self)^.&set := $00000002;
  21026. end;
  21027. function TRTCC_RTCCON.getHALFSEC : TBits_1; inline;
  21028. begin
  21029. getHALFSEC := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  21030. end;
  21031. procedure TRTCC_RTCCON.setRTCSYNC; inline;
  21032. begin
  21033. pTDefRegMap(@Self)^.&set := $00000004;
  21034. end;
  21035. procedure TRTCC_RTCCON.clearRTCSYNC; inline;
  21036. begin
  21037. pTDefRegMap(@Self)^.clr := $00000004;
  21038. end;
  21039. procedure TRTCC_RTCCON.setRTCSYNC(thebits : TBits_1); inline;
  21040. begin
  21041. if thebits = 0 then
  21042. pTDefRegMap(@Self)^.clr := $00000004
  21043. else
  21044. pTDefRegMap(@Self)^.&set := $00000004;
  21045. end;
  21046. function TRTCC_RTCCON.getRTCSYNC : TBits_1; inline;
  21047. begin
  21048. getRTCSYNC := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  21049. end;
  21050. procedure TRTCC_RTCCON.setRTCWREN; inline;
  21051. begin
  21052. pTDefRegMap(@Self)^.&set := $00000008;
  21053. end;
  21054. procedure TRTCC_RTCCON.clearRTCWREN; inline;
  21055. begin
  21056. pTDefRegMap(@Self)^.clr := $00000008;
  21057. end;
  21058. procedure TRTCC_RTCCON.setRTCWREN(thebits : TBits_1); inline;
  21059. begin
  21060. if thebits = 0 then
  21061. pTDefRegMap(@Self)^.clr := $00000008
  21062. else
  21063. pTDefRegMap(@Self)^.&set := $00000008;
  21064. end;
  21065. function TRTCC_RTCCON.getRTCWREN : TBits_1; inline;
  21066. begin
  21067. getRTCWREN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  21068. end;
  21069. procedure TRTCC_RTCCON.setRTCCLKON; inline;
  21070. begin
  21071. pTDefRegMap(@Self)^.&set := $00000040;
  21072. end;
  21073. procedure TRTCC_RTCCON.clearRTCCLKON; inline;
  21074. begin
  21075. pTDefRegMap(@Self)^.clr := $00000040;
  21076. end;
  21077. procedure TRTCC_RTCCON.setRTCCLKON(thebits : TBits_1); inline;
  21078. begin
  21079. if thebits = 0 then
  21080. pTDefRegMap(@Self)^.clr := $00000040
  21081. else
  21082. pTDefRegMap(@Self)^.&set := $00000040;
  21083. end;
  21084. function TRTCC_RTCCON.getRTCCLKON : TBits_1; inline;
  21085. begin
  21086. getRTCCLKON := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  21087. end;
  21088. procedure TRTCC_RTCCON.setRTSECSEL; inline;
  21089. begin
  21090. pTDefRegMap(@Self)^.&set := $00000080;
  21091. end;
  21092. procedure TRTCC_RTCCON.clearRTSECSEL; inline;
  21093. begin
  21094. pTDefRegMap(@Self)^.clr := $00000080;
  21095. end;
  21096. procedure TRTCC_RTCCON.setRTSECSEL(thebits : TBits_1); inline;
  21097. begin
  21098. if thebits = 0 then
  21099. pTDefRegMap(@Self)^.clr := $00000080
  21100. else
  21101. pTDefRegMap(@Self)^.&set := $00000080;
  21102. end;
  21103. function TRTCC_RTCCON.getRTSECSEL : TBits_1; inline;
  21104. begin
  21105. getRTSECSEL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  21106. end;
  21107. procedure TRTCC_RTCCON.setSIDL; inline;
  21108. begin
  21109. pTDefRegMap(@Self)^.&set := $00002000;
  21110. end;
  21111. procedure TRTCC_RTCCON.clearSIDL; inline;
  21112. begin
  21113. pTDefRegMap(@Self)^.clr := $00002000;
  21114. end;
  21115. procedure TRTCC_RTCCON.setSIDL(thebits : TBits_1); inline;
  21116. begin
  21117. if thebits = 0 then
  21118. pTDefRegMap(@Self)^.clr := $00002000
  21119. else
  21120. pTDefRegMap(@Self)^.&set := $00002000;
  21121. end;
  21122. function TRTCC_RTCCON.getSIDL : TBits_1; inline;
  21123. begin
  21124. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  21125. end;
  21126. procedure TRTCC_RTCCON.setON; inline;
  21127. begin
  21128. pTDefRegMap(@Self)^.&set := $00008000;
  21129. end;
  21130. procedure TRTCC_RTCCON.clearON; inline;
  21131. begin
  21132. pTDefRegMap(@Self)^.clr := $00008000;
  21133. end;
  21134. procedure TRTCC_RTCCON.setON(thebits : TBits_1); inline;
  21135. begin
  21136. if thebits = 0 then
  21137. pTDefRegMap(@Self)^.clr := $00008000
  21138. else
  21139. pTDefRegMap(@Self)^.&set := $00008000;
  21140. end;
  21141. function TRTCC_RTCCON.getON : TBits_1; inline;
  21142. begin
  21143. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  21144. end;
  21145. procedure TRTCC_RTCCON.setCAL(thebits : TBits_10); inline;
  21146. begin
  21147. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FC00FFFF or ( thebits shl 16 );
  21148. end;
  21149. function TRTCC_RTCCON.getCAL : TBits_10; inline;
  21150. begin
  21151. getCAL := (pTDefRegMap(@Self)^.val and $03FF0000) shr 16;
  21152. end;
  21153. procedure TRTCC_RTCCON.setw(thebits : TBits_32); inline;
  21154. begin
  21155. pTDefRegMap(@Self)^.val := thebits;
  21156. end;
  21157. function TRTCC_RTCCON.getw : TBits_32; inline;
  21158. begin
  21159. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  21160. end;
  21161. procedure TRTCC_RTCALRM.setARPT(thebits : TBits_8); inline;
  21162. begin
  21163. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  21164. end;
  21165. function TRTCC_RTCALRM.getARPT : TBits_8; inline;
  21166. begin
  21167. getARPT := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  21168. end;
  21169. procedure TRTCC_RTCALRM.setAMASK(thebits : TBits_4); inline;
  21170. begin
  21171. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
  21172. end;
  21173. function TRTCC_RTCALRM.getAMASK : TBits_4; inline;
  21174. begin
  21175. getAMASK := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
  21176. end;
  21177. procedure TRTCC_RTCALRM.setALRMSYNC; inline;
  21178. begin
  21179. pTDefRegMap(@Self)^.&set := $00001000;
  21180. end;
  21181. procedure TRTCC_RTCALRM.clearALRMSYNC; inline;
  21182. begin
  21183. pTDefRegMap(@Self)^.clr := $00001000;
  21184. end;
  21185. procedure TRTCC_RTCALRM.setALRMSYNC(thebits : TBits_1); inline;
  21186. begin
  21187. if thebits = 0 then
  21188. pTDefRegMap(@Self)^.clr := $00001000
  21189. else
  21190. pTDefRegMap(@Self)^.&set := $00001000;
  21191. end;
  21192. function TRTCC_RTCALRM.getALRMSYNC : TBits_1; inline;
  21193. begin
  21194. getALRMSYNC := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  21195. end;
  21196. procedure TRTCC_RTCALRM.setPIV; inline;
  21197. begin
  21198. pTDefRegMap(@Self)^.&set := $00002000;
  21199. end;
  21200. procedure TRTCC_RTCALRM.clearPIV; inline;
  21201. begin
  21202. pTDefRegMap(@Self)^.clr := $00002000;
  21203. end;
  21204. procedure TRTCC_RTCALRM.setPIV(thebits : TBits_1); inline;
  21205. begin
  21206. if thebits = 0 then
  21207. pTDefRegMap(@Self)^.clr := $00002000
  21208. else
  21209. pTDefRegMap(@Self)^.&set := $00002000;
  21210. end;
  21211. function TRTCC_RTCALRM.getPIV : TBits_1; inline;
  21212. begin
  21213. getPIV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  21214. end;
  21215. procedure TRTCC_RTCALRM.setCHIME; inline;
  21216. begin
  21217. pTDefRegMap(@Self)^.&set := $00004000;
  21218. end;
  21219. procedure TRTCC_RTCALRM.clearCHIME; inline;
  21220. begin
  21221. pTDefRegMap(@Self)^.clr := $00004000;
  21222. end;
  21223. procedure TRTCC_RTCALRM.setCHIME(thebits : TBits_1); inline;
  21224. begin
  21225. if thebits = 0 then
  21226. pTDefRegMap(@Self)^.clr := $00004000
  21227. else
  21228. pTDefRegMap(@Self)^.&set := $00004000;
  21229. end;
  21230. function TRTCC_RTCALRM.getCHIME : TBits_1; inline;
  21231. begin
  21232. getCHIME := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  21233. end;
  21234. procedure TRTCC_RTCALRM.setALRMEN; inline;
  21235. begin
  21236. pTDefRegMap(@Self)^.&set := $00008000;
  21237. end;
  21238. procedure TRTCC_RTCALRM.clearALRMEN; inline;
  21239. begin
  21240. pTDefRegMap(@Self)^.clr := $00008000;
  21241. end;
  21242. procedure TRTCC_RTCALRM.setALRMEN(thebits : TBits_1); inline;
  21243. begin
  21244. if thebits = 0 then
  21245. pTDefRegMap(@Self)^.clr := $00008000
  21246. else
  21247. pTDefRegMap(@Self)^.&set := $00008000;
  21248. end;
  21249. function TRTCC_RTCALRM.getALRMEN : TBits_1; inline;
  21250. begin
  21251. getALRMEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  21252. end;
  21253. procedure TRTCC_RTCALRM.setw(thebits : TBits_32); inline;
  21254. begin
  21255. pTDefRegMap(@Self)^.val := thebits;
  21256. end;
  21257. function TRTCC_RTCALRM.getw : TBits_32; inline;
  21258. begin
  21259. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  21260. end;
  21261. procedure TRTCC_RTCTIME.setSEC01(thebits : TBits_4); inline;
  21262. begin
  21263. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
  21264. end;
  21265. function TRTCC_RTCTIME.getSEC01 : TBits_4; inline;
  21266. begin
  21267. getSEC01 := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
  21268. end;
  21269. procedure TRTCC_RTCTIME.setSEC10(thebits : TBits_4); inline;
  21270. begin
  21271. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0FFF or ( thebits shl 12 );
  21272. end;
  21273. function TRTCC_RTCTIME.getSEC10 : TBits_4; inline;
  21274. begin
  21275. getSEC10 := (pTDefRegMap(@Self)^.val and $0000F000) shr 12;
  21276. end;
  21277. procedure TRTCC_RTCTIME.setMIN01(thebits : TBits_4); inline;
  21278. begin
  21279. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF0FFFF or ( thebits shl 16 );
  21280. end;
  21281. function TRTCC_RTCTIME.getMIN01 : TBits_4; inline;
  21282. begin
  21283. getMIN01 := (pTDefRegMap(@Self)^.val and $000F0000) shr 16;
  21284. end;
  21285. procedure TRTCC_RTCTIME.setMIN10(thebits : TBits_4); inline;
  21286. begin
  21287. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF0FFFFF or ( thebits shl 20 );
  21288. end;
  21289. function TRTCC_RTCTIME.getMIN10 : TBits_4; inline;
  21290. begin
  21291. getMIN10 := (pTDefRegMap(@Self)^.val and $00F00000) shr 20;
  21292. end;
  21293. procedure TRTCC_RTCTIME.setHR01(thebits : TBits_4); inline;
  21294. begin
  21295. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F0FFFFFF or ( thebits shl 24 );
  21296. end;
  21297. function TRTCC_RTCTIME.getHR01 : TBits_4; inline;
  21298. begin
  21299. getHR01 := (pTDefRegMap(@Self)^.val and $0F000000) shr 24;
  21300. end;
  21301. procedure TRTCC_RTCTIME.setHR10(thebits : TBits_4); inline;
  21302. begin
  21303. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $0FFFFFFF or ( thebits shl 28 );
  21304. end;
  21305. function TRTCC_RTCTIME.getHR10 : TBits_4; inline;
  21306. begin
  21307. getHR10 := (pTDefRegMap(@Self)^.val and $F0000000) shr 28;
  21308. end;
  21309. procedure TRTCC_RTCTIME.setw(thebits : TBits_32); inline;
  21310. begin
  21311. pTDefRegMap(@Self)^.val := thebits;
  21312. end;
  21313. function TRTCC_RTCTIME.getw : TBits_32; inline;
  21314. begin
  21315. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  21316. end;
  21317. procedure TRTCC_RTCDATE.setWDAY01(thebits : TBits_4); inline;
  21318. begin
  21319. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  21320. end;
  21321. function TRTCC_RTCDATE.getWDAY01 : TBits_4; inline;
  21322. begin
  21323. getWDAY01 := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  21324. end;
  21325. procedure TRTCC_RTCDATE.setDAY01(thebits : TBits_4); inline;
  21326. begin
  21327. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
  21328. end;
  21329. function TRTCC_RTCDATE.getDAY01 : TBits_4; inline;
  21330. begin
  21331. getDAY01 := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
  21332. end;
  21333. procedure TRTCC_RTCDATE.setDAY10(thebits : TBits_4); inline;
  21334. begin
  21335. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0FFF or ( thebits shl 12 );
  21336. end;
  21337. function TRTCC_RTCDATE.getDAY10 : TBits_4; inline;
  21338. begin
  21339. getDAY10 := (pTDefRegMap(@Self)^.val and $0000F000) shr 12;
  21340. end;
  21341. procedure TRTCC_RTCDATE.setMONTH01(thebits : TBits_4); inline;
  21342. begin
  21343. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF0FFFF or ( thebits shl 16 );
  21344. end;
  21345. function TRTCC_RTCDATE.getMONTH01 : TBits_4; inline;
  21346. begin
  21347. getMONTH01 := (pTDefRegMap(@Self)^.val and $000F0000) shr 16;
  21348. end;
  21349. procedure TRTCC_RTCDATE.setMONTH10(thebits : TBits_4); inline;
  21350. begin
  21351. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF0FFFFF or ( thebits shl 20 );
  21352. end;
  21353. function TRTCC_RTCDATE.getMONTH10 : TBits_4; inline;
  21354. begin
  21355. getMONTH10 := (pTDefRegMap(@Self)^.val and $00F00000) shr 20;
  21356. end;
  21357. procedure TRTCC_RTCDATE.setYEAR01(thebits : TBits_4); inline;
  21358. begin
  21359. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F0FFFFFF or ( thebits shl 24 );
  21360. end;
  21361. function TRTCC_RTCDATE.getYEAR01 : TBits_4; inline;
  21362. begin
  21363. getYEAR01 := (pTDefRegMap(@Self)^.val and $0F000000) shr 24;
  21364. end;
  21365. procedure TRTCC_RTCDATE.setYEAR10(thebits : TBits_4); inline;
  21366. begin
  21367. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $0FFFFFFF or ( thebits shl 28 );
  21368. end;
  21369. function TRTCC_RTCDATE.getYEAR10 : TBits_4; inline;
  21370. begin
  21371. getYEAR10 := (pTDefRegMap(@Self)^.val and $F0000000) shr 28;
  21372. end;
  21373. procedure TRTCC_RTCDATE.setw(thebits : TBits_32); inline;
  21374. begin
  21375. pTDefRegMap(@Self)^.val := thebits;
  21376. end;
  21377. function TRTCC_RTCDATE.getw : TBits_32; inline;
  21378. begin
  21379. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  21380. end;
  21381. procedure TRTCC_ALRMTIME.setSEC01(thebits : TBits_4); inline;
  21382. begin
  21383. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
  21384. end;
  21385. function TRTCC_ALRMTIME.getSEC01 : TBits_4; inline;
  21386. begin
  21387. getSEC01 := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
  21388. end;
  21389. procedure TRTCC_ALRMTIME.setSEC10(thebits : TBits_4); inline;
  21390. begin
  21391. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0FFF or ( thebits shl 12 );
  21392. end;
  21393. function TRTCC_ALRMTIME.getSEC10 : TBits_4; inline;
  21394. begin
  21395. getSEC10 := (pTDefRegMap(@Self)^.val and $0000F000) shr 12;
  21396. end;
  21397. procedure TRTCC_ALRMTIME.setMIN01(thebits : TBits_4); inline;
  21398. begin
  21399. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF0FFFF or ( thebits shl 16 );
  21400. end;
  21401. function TRTCC_ALRMTIME.getMIN01 : TBits_4; inline;
  21402. begin
  21403. getMIN01 := (pTDefRegMap(@Self)^.val and $000F0000) shr 16;
  21404. end;
  21405. procedure TRTCC_ALRMTIME.setMIN10(thebits : TBits_4); inline;
  21406. begin
  21407. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF0FFFFF or ( thebits shl 20 );
  21408. end;
  21409. function TRTCC_ALRMTIME.getMIN10 : TBits_4; inline;
  21410. begin
  21411. getMIN10 := (pTDefRegMap(@Self)^.val and $00F00000) shr 20;
  21412. end;
  21413. procedure TRTCC_ALRMTIME.setHR01(thebits : TBits_4); inline;
  21414. begin
  21415. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F0FFFFFF or ( thebits shl 24 );
  21416. end;
  21417. function TRTCC_ALRMTIME.getHR01 : TBits_4; inline;
  21418. begin
  21419. getHR01 := (pTDefRegMap(@Self)^.val and $0F000000) shr 24;
  21420. end;
  21421. procedure TRTCC_ALRMTIME.setHR10(thebits : TBits_4); inline;
  21422. begin
  21423. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $0FFFFFFF or ( thebits shl 28 );
  21424. end;
  21425. function TRTCC_ALRMTIME.getHR10 : TBits_4; inline;
  21426. begin
  21427. getHR10 := (pTDefRegMap(@Self)^.val and $F0000000) shr 28;
  21428. end;
  21429. procedure TRTCC_ALRMTIME.setw(thebits : TBits_32); inline;
  21430. begin
  21431. pTDefRegMap(@Self)^.val := thebits;
  21432. end;
  21433. function TRTCC_ALRMTIME.getw : TBits_32; inline;
  21434. begin
  21435. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  21436. end;
  21437. procedure TRTCC_ALRMDATE.setWDAY01(thebits : TBits_4); inline;
  21438. begin
  21439. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  21440. end;
  21441. function TRTCC_ALRMDATE.getWDAY01 : TBits_4; inline;
  21442. begin
  21443. getWDAY01 := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  21444. end;
  21445. procedure TRTCC_ALRMDATE.setDAY01(thebits : TBits_4); inline;
  21446. begin
  21447. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
  21448. end;
  21449. function TRTCC_ALRMDATE.getDAY01 : TBits_4; inline;
  21450. begin
  21451. getDAY01 := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
  21452. end;
  21453. procedure TRTCC_ALRMDATE.setDAY10(thebits : TBits_4); inline;
  21454. begin
  21455. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0FFF or ( thebits shl 12 );
  21456. end;
  21457. function TRTCC_ALRMDATE.getDAY10 : TBits_4; inline;
  21458. begin
  21459. getDAY10 := (pTDefRegMap(@Self)^.val and $0000F000) shr 12;
  21460. end;
  21461. procedure TRTCC_ALRMDATE.setMONTH01(thebits : TBits_4); inline;
  21462. begin
  21463. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF0FFFF or ( thebits shl 16 );
  21464. end;
  21465. function TRTCC_ALRMDATE.getMONTH01 : TBits_4; inline;
  21466. begin
  21467. getMONTH01 := (pTDefRegMap(@Self)^.val and $000F0000) shr 16;
  21468. end;
  21469. procedure TRTCC_ALRMDATE.setMONTH10(thebits : TBits_4); inline;
  21470. begin
  21471. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF0FFFFF or ( thebits shl 20 );
  21472. end;
  21473. function TRTCC_ALRMDATE.getMONTH10 : TBits_4; inline;
  21474. begin
  21475. getMONTH10 := (pTDefRegMap(@Self)^.val and $00F00000) shr 20;
  21476. end;
  21477. procedure TRTCC_ALRMDATE.setw(thebits : TBits_32); inline;
  21478. begin
  21479. pTDefRegMap(@Self)^.val := thebits;
  21480. end;
  21481. function TRTCC_ALRMDATE.getw : TBits_32; inline;
  21482. begin
  21483. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  21484. end;
  21485. procedure TTMR1_T1CON.setTCS; inline;
  21486. begin
  21487. pTDefRegMap(@Self)^.&set := $00000002;
  21488. end;
  21489. procedure TTMR1_T1CON.clearTCS; inline;
  21490. begin
  21491. pTDefRegMap(@Self)^.clr := $00000002;
  21492. end;
  21493. procedure TTMR1_T1CON.setTCS(thebits : TBits_1); inline;
  21494. begin
  21495. if thebits = 0 then
  21496. pTDefRegMap(@Self)^.clr := $00000002
  21497. else
  21498. pTDefRegMap(@Self)^.&set := $00000002;
  21499. end;
  21500. function TTMR1_T1CON.getTCS : TBits_1; inline;
  21501. begin
  21502. getTCS := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  21503. end;
  21504. procedure TTMR1_T1CON.setTSYNC; inline;
  21505. begin
  21506. pTDefRegMap(@Self)^.&set := $00000004;
  21507. end;
  21508. procedure TTMR1_T1CON.clearTSYNC; inline;
  21509. begin
  21510. pTDefRegMap(@Self)^.clr := $00000004;
  21511. end;
  21512. procedure TTMR1_T1CON.setTSYNC(thebits : TBits_1); inline;
  21513. begin
  21514. if thebits = 0 then
  21515. pTDefRegMap(@Self)^.clr := $00000004
  21516. else
  21517. pTDefRegMap(@Self)^.&set := $00000004;
  21518. end;
  21519. function TTMR1_T1CON.getTSYNC : TBits_1; inline;
  21520. begin
  21521. getTSYNC := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  21522. end;
  21523. procedure TTMR1_T1CON.setTCKPS(thebits : TBits_2); inline;
  21524. begin
  21525. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFCF or ( thebits shl 4 );
  21526. end;
  21527. function TTMR1_T1CON.getTCKPS : TBits_2; inline;
  21528. begin
  21529. getTCKPS := (pTDefRegMap(@Self)^.val and $00000030) shr 4;
  21530. end;
  21531. procedure TTMR1_T1CON.setTGATE; inline;
  21532. begin
  21533. pTDefRegMap(@Self)^.&set := $00000080;
  21534. end;
  21535. procedure TTMR1_T1CON.clearTGATE; inline;
  21536. begin
  21537. pTDefRegMap(@Self)^.clr := $00000080;
  21538. end;
  21539. procedure TTMR1_T1CON.setTGATE(thebits : TBits_1); inline;
  21540. begin
  21541. if thebits = 0 then
  21542. pTDefRegMap(@Self)^.clr := $00000080
  21543. else
  21544. pTDefRegMap(@Self)^.&set := $00000080;
  21545. end;
  21546. function TTMR1_T1CON.getTGATE : TBits_1; inline;
  21547. begin
  21548. getTGATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  21549. end;
  21550. procedure TTMR1_T1CON.setTWIP; inline;
  21551. begin
  21552. pTDefRegMap(@Self)^.&set := $00000800;
  21553. end;
  21554. procedure TTMR1_T1CON.clearTWIP; inline;
  21555. begin
  21556. pTDefRegMap(@Self)^.clr := $00000800;
  21557. end;
  21558. procedure TTMR1_T1CON.setTWIP(thebits : TBits_1); inline;
  21559. begin
  21560. if thebits = 0 then
  21561. pTDefRegMap(@Self)^.clr := $00000800
  21562. else
  21563. pTDefRegMap(@Self)^.&set := $00000800;
  21564. end;
  21565. function TTMR1_T1CON.getTWIP : TBits_1; inline;
  21566. begin
  21567. getTWIP := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  21568. end;
  21569. procedure TTMR1_T1CON.setTWDIS; inline;
  21570. begin
  21571. pTDefRegMap(@Self)^.&set := $00001000;
  21572. end;
  21573. procedure TTMR1_T1CON.clearTWDIS; inline;
  21574. begin
  21575. pTDefRegMap(@Self)^.clr := $00001000;
  21576. end;
  21577. procedure TTMR1_T1CON.setTWDIS(thebits : TBits_1); inline;
  21578. begin
  21579. if thebits = 0 then
  21580. pTDefRegMap(@Self)^.clr := $00001000
  21581. else
  21582. pTDefRegMap(@Self)^.&set := $00001000;
  21583. end;
  21584. function TTMR1_T1CON.getTWDIS : TBits_1; inline;
  21585. begin
  21586. getTWDIS := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  21587. end;
  21588. procedure TTMR1_T1CON.setSIDL; inline;
  21589. begin
  21590. pTDefRegMap(@Self)^.&set := $00002000;
  21591. end;
  21592. procedure TTMR1_T1CON.clearSIDL; inline;
  21593. begin
  21594. pTDefRegMap(@Self)^.clr := $00002000;
  21595. end;
  21596. procedure TTMR1_T1CON.setSIDL(thebits : TBits_1); inline;
  21597. begin
  21598. if thebits = 0 then
  21599. pTDefRegMap(@Self)^.clr := $00002000
  21600. else
  21601. pTDefRegMap(@Self)^.&set := $00002000;
  21602. end;
  21603. function TTMR1_T1CON.getSIDL : TBits_1; inline;
  21604. begin
  21605. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  21606. end;
  21607. procedure TTMR1_T1CON.setON; inline;
  21608. begin
  21609. pTDefRegMap(@Self)^.&set := $00008000;
  21610. end;
  21611. procedure TTMR1_T1CON.clearON; inline;
  21612. begin
  21613. pTDefRegMap(@Self)^.clr := $00008000;
  21614. end;
  21615. procedure TTMR1_T1CON.setON(thebits : TBits_1); inline;
  21616. begin
  21617. if thebits = 0 then
  21618. pTDefRegMap(@Self)^.clr := $00008000
  21619. else
  21620. pTDefRegMap(@Self)^.&set := $00008000;
  21621. end;
  21622. function TTMR1_T1CON.getON : TBits_1; inline;
  21623. begin
  21624. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  21625. end;
  21626. procedure TTMR1_T1CON.setTCKPS0; inline;
  21627. begin
  21628. pTDefRegMap(@Self)^.&set := $00000010;
  21629. end;
  21630. procedure TTMR1_T1CON.clearTCKPS0; inline;
  21631. begin
  21632. pTDefRegMap(@Self)^.clr := $00000010;
  21633. end;
  21634. procedure TTMR1_T1CON.setTCKPS0(thebits : TBits_1); inline;
  21635. begin
  21636. if thebits = 0 then
  21637. pTDefRegMap(@Self)^.clr := $00000010
  21638. else
  21639. pTDefRegMap(@Self)^.&set := $00000010;
  21640. end;
  21641. function TTMR1_T1CON.getTCKPS0 : TBits_1; inline;
  21642. begin
  21643. getTCKPS0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  21644. end;
  21645. procedure TTMR1_T1CON.setTCKPS1; inline;
  21646. begin
  21647. pTDefRegMap(@Self)^.&set := $00000020;
  21648. end;
  21649. procedure TTMR1_T1CON.clearTCKPS1; inline;
  21650. begin
  21651. pTDefRegMap(@Self)^.clr := $00000020;
  21652. end;
  21653. procedure TTMR1_T1CON.setTCKPS1(thebits : TBits_1); inline;
  21654. begin
  21655. if thebits = 0 then
  21656. pTDefRegMap(@Self)^.clr := $00000020
  21657. else
  21658. pTDefRegMap(@Self)^.&set := $00000020;
  21659. end;
  21660. function TTMR1_T1CON.getTCKPS1 : TBits_1; inline;
  21661. begin
  21662. getTCKPS1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  21663. end;
  21664. procedure TTMR1_T1CON.setTSIDL; inline;
  21665. begin
  21666. pTDefRegMap(@Self)^.&set := $00002000;
  21667. end;
  21668. procedure TTMR1_T1CON.clearTSIDL; inline;
  21669. begin
  21670. pTDefRegMap(@Self)^.clr := $00002000;
  21671. end;
  21672. procedure TTMR1_T1CON.setTSIDL(thebits : TBits_1); inline;
  21673. begin
  21674. if thebits = 0 then
  21675. pTDefRegMap(@Self)^.clr := $00002000
  21676. else
  21677. pTDefRegMap(@Self)^.&set := $00002000;
  21678. end;
  21679. function TTMR1_T1CON.getTSIDL : TBits_1; inline;
  21680. begin
  21681. getTSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  21682. end;
  21683. procedure TTMR1_T1CON.setTON; inline;
  21684. begin
  21685. pTDefRegMap(@Self)^.&set := $00008000;
  21686. end;
  21687. procedure TTMR1_T1CON.clearTON; inline;
  21688. begin
  21689. pTDefRegMap(@Self)^.clr := $00008000;
  21690. end;
  21691. procedure TTMR1_T1CON.setTON(thebits : TBits_1); inline;
  21692. begin
  21693. if thebits = 0 then
  21694. pTDefRegMap(@Self)^.clr := $00008000
  21695. else
  21696. pTDefRegMap(@Self)^.&set := $00008000;
  21697. end;
  21698. function TTMR1_T1CON.getTON : TBits_1; inline;
  21699. begin
  21700. getTON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  21701. end;
  21702. procedure TTMR1_T1CON.setw(thebits : TBits_32); inline;
  21703. begin
  21704. pTDefRegMap(@Self)^.val := thebits;
  21705. end;
  21706. function TTMR1_T1CON.getw : TBits_32; inline;
  21707. begin
  21708. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  21709. end;
  21710. procedure TTMR2_T2CON.setT32; inline;
  21711. begin
  21712. pTDefRegMap(@Self)^.&set := $00000008;
  21713. end;
  21714. procedure TTMR2_T2CON.clearT32; inline;
  21715. begin
  21716. pTDefRegMap(@Self)^.clr := $00000008;
  21717. end;
  21718. procedure TTMR2_T2CON.setT32(thebits : TBits_1); inline;
  21719. begin
  21720. if thebits = 0 then
  21721. pTDefRegMap(@Self)^.clr := $00000008
  21722. else
  21723. pTDefRegMap(@Self)^.&set := $00000008;
  21724. end;
  21725. function TTMR2_T2CON.getT32 : TBits_1; inline;
  21726. begin
  21727. getT32 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  21728. end;
  21729. procedure TTMR2_T2CON.setTCKPS(thebits : TBits_3); inline;
  21730. begin
  21731. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF8F or ( thebits shl 4 );
  21732. end;
  21733. function TTMR2_T2CON.getTCKPS : TBits_3; inline;
  21734. begin
  21735. getTCKPS := (pTDefRegMap(@Self)^.val and $00000070) shr 4;
  21736. end;
  21737. procedure TTMR2_T2CON.setTGATE; inline;
  21738. begin
  21739. pTDefRegMap(@Self)^.&set := $00000080;
  21740. end;
  21741. procedure TTMR2_T2CON.clearTGATE; inline;
  21742. begin
  21743. pTDefRegMap(@Self)^.clr := $00000080;
  21744. end;
  21745. procedure TTMR2_T2CON.setTGATE(thebits : TBits_1); inline;
  21746. begin
  21747. if thebits = 0 then
  21748. pTDefRegMap(@Self)^.clr := $00000080
  21749. else
  21750. pTDefRegMap(@Self)^.&set := $00000080;
  21751. end;
  21752. function TTMR2_T2CON.getTGATE : TBits_1; inline;
  21753. begin
  21754. getTGATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  21755. end;
  21756. procedure TTMR2_T2CON.setSIDL; inline;
  21757. begin
  21758. pTDefRegMap(@Self)^.&set := $00002000;
  21759. end;
  21760. procedure TTMR2_T2CON.clearSIDL; inline;
  21761. begin
  21762. pTDefRegMap(@Self)^.clr := $00002000;
  21763. end;
  21764. procedure TTMR2_T2CON.setSIDL(thebits : TBits_1); inline;
  21765. begin
  21766. if thebits = 0 then
  21767. pTDefRegMap(@Self)^.clr := $00002000
  21768. else
  21769. pTDefRegMap(@Self)^.&set := $00002000;
  21770. end;
  21771. function TTMR2_T2CON.getSIDL : TBits_1; inline;
  21772. begin
  21773. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  21774. end;
  21775. procedure TTMR2_T2CON.setON; inline;
  21776. begin
  21777. pTDefRegMap(@Self)^.&set := $00008000;
  21778. end;
  21779. procedure TTMR2_T2CON.clearON; inline;
  21780. begin
  21781. pTDefRegMap(@Self)^.clr := $00008000;
  21782. end;
  21783. procedure TTMR2_T2CON.setON(thebits : TBits_1); inline;
  21784. begin
  21785. if thebits = 0 then
  21786. pTDefRegMap(@Self)^.clr := $00008000
  21787. else
  21788. pTDefRegMap(@Self)^.&set := $00008000;
  21789. end;
  21790. function TTMR2_T2CON.getON : TBits_1; inline;
  21791. begin
  21792. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  21793. end;
  21794. procedure TTMR2_T2CON.setTCKPS0; inline;
  21795. begin
  21796. pTDefRegMap(@Self)^.&set := $00000010;
  21797. end;
  21798. procedure TTMR2_T2CON.clearTCKPS0; inline;
  21799. begin
  21800. pTDefRegMap(@Self)^.clr := $00000010;
  21801. end;
  21802. procedure TTMR2_T2CON.setTCKPS0(thebits : TBits_1); inline;
  21803. begin
  21804. if thebits = 0 then
  21805. pTDefRegMap(@Self)^.clr := $00000010
  21806. else
  21807. pTDefRegMap(@Self)^.&set := $00000010;
  21808. end;
  21809. function TTMR2_T2CON.getTCKPS0 : TBits_1; inline;
  21810. begin
  21811. getTCKPS0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  21812. end;
  21813. procedure TTMR2_T2CON.setTCKPS1; inline;
  21814. begin
  21815. pTDefRegMap(@Self)^.&set := $00000020;
  21816. end;
  21817. procedure TTMR2_T2CON.clearTCKPS1; inline;
  21818. begin
  21819. pTDefRegMap(@Self)^.clr := $00000020;
  21820. end;
  21821. procedure TTMR2_T2CON.setTCKPS1(thebits : TBits_1); inline;
  21822. begin
  21823. if thebits = 0 then
  21824. pTDefRegMap(@Self)^.clr := $00000020
  21825. else
  21826. pTDefRegMap(@Self)^.&set := $00000020;
  21827. end;
  21828. function TTMR2_T2CON.getTCKPS1 : TBits_1; inline;
  21829. begin
  21830. getTCKPS1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  21831. end;
  21832. procedure TTMR2_T2CON.setTCKPS2; inline;
  21833. begin
  21834. pTDefRegMap(@Self)^.&set := $00000040;
  21835. end;
  21836. procedure TTMR2_T2CON.clearTCKPS2; inline;
  21837. begin
  21838. pTDefRegMap(@Self)^.clr := $00000040;
  21839. end;
  21840. procedure TTMR2_T2CON.setTCKPS2(thebits : TBits_1); inline;
  21841. begin
  21842. if thebits = 0 then
  21843. pTDefRegMap(@Self)^.clr := $00000040
  21844. else
  21845. pTDefRegMap(@Self)^.&set := $00000040;
  21846. end;
  21847. function TTMR2_T2CON.getTCKPS2 : TBits_1; inline;
  21848. begin
  21849. getTCKPS2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  21850. end;
  21851. procedure TTMR2_T2CON.setTSIDL; inline;
  21852. begin
  21853. pTDefRegMap(@Self)^.&set := $00002000;
  21854. end;
  21855. procedure TTMR2_T2CON.clearTSIDL; inline;
  21856. begin
  21857. pTDefRegMap(@Self)^.clr := $00002000;
  21858. end;
  21859. procedure TTMR2_T2CON.setTSIDL(thebits : TBits_1); inline;
  21860. begin
  21861. if thebits = 0 then
  21862. pTDefRegMap(@Self)^.clr := $00002000
  21863. else
  21864. pTDefRegMap(@Self)^.&set := $00002000;
  21865. end;
  21866. function TTMR2_T2CON.getTSIDL : TBits_1; inline;
  21867. begin
  21868. getTSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  21869. end;
  21870. procedure TTMR2_T2CON.setTON; inline;
  21871. begin
  21872. pTDefRegMap(@Self)^.&set := $00008000;
  21873. end;
  21874. procedure TTMR2_T2CON.clearTON; inline;
  21875. begin
  21876. pTDefRegMap(@Self)^.clr := $00008000;
  21877. end;
  21878. procedure TTMR2_T2CON.setTON(thebits : TBits_1); inline;
  21879. begin
  21880. if thebits = 0 then
  21881. pTDefRegMap(@Self)^.clr := $00008000
  21882. else
  21883. pTDefRegMap(@Self)^.&set := $00008000;
  21884. end;
  21885. function TTMR2_T2CON.getTON : TBits_1; inline;
  21886. begin
  21887. getTON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  21888. end;
  21889. procedure TTMR2_T2CON.setw(thebits : TBits_32); inline;
  21890. begin
  21891. pTDefRegMap(@Self)^.val := thebits;
  21892. end;
  21893. function TTMR2_T2CON.getw : TBits_32; inline;
  21894. begin
  21895. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  21896. end;
  21897. procedure TTMR3_T3CON.setTCKPS(thebits : TBits_3); inline;
  21898. begin
  21899. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF8F or ( thebits shl 4 );
  21900. end;
  21901. function TTMR3_T3CON.getTCKPS : TBits_3; inline;
  21902. begin
  21903. getTCKPS := (pTDefRegMap(@Self)^.val and $00000070) shr 4;
  21904. end;
  21905. procedure TTMR3_T3CON.setTGATE; inline;
  21906. begin
  21907. pTDefRegMap(@Self)^.&set := $00000080;
  21908. end;
  21909. procedure TTMR3_T3CON.clearTGATE; inline;
  21910. begin
  21911. pTDefRegMap(@Self)^.clr := $00000080;
  21912. end;
  21913. procedure TTMR3_T3CON.setTGATE(thebits : TBits_1); inline;
  21914. begin
  21915. if thebits = 0 then
  21916. pTDefRegMap(@Self)^.clr := $00000080
  21917. else
  21918. pTDefRegMap(@Self)^.&set := $00000080;
  21919. end;
  21920. function TTMR3_T3CON.getTGATE : TBits_1; inline;
  21921. begin
  21922. getTGATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  21923. end;
  21924. procedure TTMR3_T3CON.setSIDL; inline;
  21925. begin
  21926. pTDefRegMap(@Self)^.&set := $00002000;
  21927. end;
  21928. procedure TTMR3_T3CON.clearSIDL; inline;
  21929. begin
  21930. pTDefRegMap(@Self)^.clr := $00002000;
  21931. end;
  21932. procedure TTMR3_T3CON.setSIDL(thebits : TBits_1); inline;
  21933. begin
  21934. if thebits = 0 then
  21935. pTDefRegMap(@Self)^.clr := $00002000
  21936. else
  21937. pTDefRegMap(@Self)^.&set := $00002000;
  21938. end;
  21939. function TTMR3_T3CON.getSIDL : TBits_1; inline;
  21940. begin
  21941. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  21942. end;
  21943. procedure TTMR3_T3CON.setON; inline;
  21944. begin
  21945. pTDefRegMap(@Self)^.&set := $00008000;
  21946. end;
  21947. procedure TTMR3_T3CON.clearON; inline;
  21948. begin
  21949. pTDefRegMap(@Self)^.clr := $00008000;
  21950. end;
  21951. procedure TTMR3_T3CON.setON(thebits : TBits_1); inline;
  21952. begin
  21953. if thebits = 0 then
  21954. pTDefRegMap(@Self)^.clr := $00008000
  21955. else
  21956. pTDefRegMap(@Self)^.&set := $00008000;
  21957. end;
  21958. function TTMR3_T3CON.getON : TBits_1; inline;
  21959. begin
  21960. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  21961. end;
  21962. procedure TTMR3_T3CON.setTCKPS0; inline;
  21963. begin
  21964. pTDefRegMap(@Self)^.&set := $00000010;
  21965. end;
  21966. procedure TTMR3_T3CON.clearTCKPS0; inline;
  21967. begin
  21968. pTDefRegMap(@Self)^.clr := $00000010;
  21969. end;
  21970. procedure TTMR3_T3CON.setTCKPS0(thebits : TBits_1); inline;
  21971. begin
  21972. if thebits = 0 then
  21973. pTDefRegMap(@Self)^.clr := $00000010
  21974. else
  21975. pTDefRegMap(@Self)^.&set := $00000010;
  21976. end;
  21977. function TTMR3_T3CON.getTCKPS0 : TBits_1; inline;
  21978. begin
  21979. getTCKPS0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  21980. end;
  21981. procedure TTMR3_T3CON.setTCKPS1; inline;
  21982. begin
  21983. pTDefRegMap(@Self)^.&set := $00000020;
  21984. end;
  21985. procedure TTMR3_T3CON.clearTCKPS1; inline;
  21986. begin
  21987. pTDefRegMap(@Self)^.clr := $00000020;
  21988. end;
  21989. procedure TTMR3_T3CON.setTCKPS1(thebits : TBits_1); inline;
  21990. begin
  21991. if thebits = 0 then
  21992. pTDefRegMap(@Self)^.clr := $00000020
  21993. else
  21994. pTDefRegMap(@Self)^.&set := $00000020;
  21995. end;
  21996. function TTMR3_T3CON.getTCKPS1 : TBits_1; inline;
  21997. begin
  21998. getTCKPS1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  21999. end;
  22000. procedure TTMR3_T3CON.setTCKPS2; inline;
  22001. begin
  22002. pTDefRegMap(@Self)^.&set := $00000040;
  22003. end;
  22004. procedure TTMR3_T3CON.clearTCKPS2; inline;
  22005. begin
  22006. pTDefRegMap(@Self)^.clr := $00000040;
  22007. end;
  22008. procedure TTMR3_T3CON.setTCKPS2(thebits : TBits_1); inline;
  22009. begin
  22010. if thebits = 0 then
  22011. pTDefRegMap(@Self)^.clr := $00000040
  22012. else
  22013. pTDefRegMap(@Self)^.&set := $00000040;
  22014. end;
  22015. function TTMR3_T3CON.getTCKPS2 : TBits_1; inline;
  22016. begin
  22017. getTCKPS2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  22018. end;
  22019. procedure TTMR3_T3CON.setTSIDL; inline;
  22020. begin
  22021. pTDefRegMap(@Self)^.&set := $00002000;
  22022. end;
  22023. procedure TTMR3_T3CON.clearTSIDL; inline;
  22024. begin
  22025. pTDefRegMap(@Self)^.clr := $00002000;
  22026. end;
  22027. procedure TTMR3_T3CON.setTSIDL(thebits : TBits_1); inline;
  22028. begin
  22029. if thebits = 0 then
  22030. pTDefRegMap(@Self)^.clr := $00002000
  22031. else
  22032. pTDefRegMap(@Self)^.&set := $00002000;
  22033. end;
  22034. function TTMR3_T3CON.getTSIDL : TBits_1; inline;
  22035. begin
  22036. getTSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  22037. end;
  22038. procedure TTMR3_T3CON.setTON; inline;
  22039. begin
  22040. pTDefRegMap(@Self)^.&set := $00008000;
  22041. end;
  22042. procedure TTMR3_T3CON.clearTON; inline;
  22043. begin
  22044. pTDefRegMap(@Self)^.clr := $00008000;
  22045. end;
  22046. procedure TTMR3_T3CON.setTON(thebits : TBits_1); inline;
  22047. begin
  22048. if thebits = 0 then
  22049. pTDefRegMap(@Self)^.clr := $00008000
  22050. else
  22051. pTDefRegMap(@Self)^.&set := $00008000;
  22052. end;
  22053. function TTMR3_T3CON.getTON : TBits_1; inline;
  22054. begin
  22055. getTON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  22056. end;
  22057. procedure TTMR3_T3CON.setw(thebits : TBits_32); inline;
  22058. begin
  22059. pTDefRegMap(@Self)^.val := thebits;
  22060. end;
  22061. function TTMR3_T3CON.getw : TBits_32; inline;
  22062. begin
  22063. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  22064. end;
  22065. procedure TTMR4_T4CON.setT32; inline;
  22066. begin
  22067. pTDefRegMap(@Self)^.&set := $00000008;
  22068. end;
  22069. procedure TTMR4_T4CON.clearT32; inline;
  22070. begin
  22071. pTDefRegMap(@Self)^.clr := $00000008;
  22072. end;
  22073. procedure TTMR4_T4CON.setT32(thebits : TBits_1); inline;
  22074. begin
  22075. if thebits = 0 then
  22076. pTDefRegMap(@Self)^.clr := $00000008
  22077. else
  22078. pTDefRegMap(@Self)^.&set := $00000008;
  22079. end;
  22080. function TTMR4_T4CON.getT32 : TBits_1; inline;
  22081. begin
  22082. getT32 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  22083. end;
  22084. procedure TTMR4_T4CON.setTCKPS(thebits : TBits_3); inline;
  22085. begin
  22086. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF8F or ( thebits shl 4 );
  22087. end;
  22088. function TTMR4_T4CON.getTCKPS : TBits_3; inline;
  22089. begin
  22090. getTCKPS := (pTDefRegMap(@Self)^.val and $00000070) shr 4;
  22091. end;
  22092. procedure TTMR4_T4CON.setTGATE; inline;
  22093. begin
  22094. pTDefRegMap(@Self)^.&set := $00000080;
  22095. end;
  22096. procedure TTMR4_T4CON.clearTGATE; inline;
  22097. begin
  22098. pTDefRegMap(@Self)^.clr := $00000080;
  22099. end;
  22100. procedure TTMR4_T4CON.setTGATE(thebits : TBits_1); inline;
  22101. begin
  22102. if thebits = 0 then
  22103. pTDefRegMap(@Self)^.clr := $00000080
  22104. else
  22105. pTDefRegMap(@Self)^.&set := $00000080;
  22106. end;
  22107. function TTMR4_T4CON.getTGATE : TBits_1; inline;
  22108. begin
  22109. getTGATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  22110. end;
  22111. procedure TTMR4_T4CON.setSIDL; inline;
  22112. begin
  22113. pTDefRegMap(@Self)^.&set := $00002000;
  22114. end;
  22115. procedure TTMR4_T4CON.clearSIDL; inline;
  22116. begin
  22117. pTDefRegMap(@Self)^.clr := $00002000;
  22118. end;
  22119. procedure TTMR4_T4CON.setSIDL(thebits : TBits_1); inline;
  22120. begin
  22121. if thebits = 0 then
  22122. pTDefRegMap(@Self)^.clr := $00002000
  22123. else
  22124. pTDefRegMap(@Self)^.&set := $00002000;
  22125. end;
  22126. function TTMR4_T4CON.getSIDL : TBits_1; inline;
  22127. begin
  22128. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  22129. end;
  22130. procedure TTMR4_T4CON.setON; inline;
  22131. begin
  22132. pTDefRegMap(@Self)^.&set := $00008000;
  22133. end;
  22134. procedure TTMR4_T4CON.clearON; inline;
  22135. begin
  22136. pTDefRegMap(@Self)^.clr := $00008000;
  22137. end;
  22138. procedure TTMR4_T4CON.setON(thebits : TBits_1); inline;
  22139. begin
  22140. if thebits = 0 then
  22141. pTDefRegMap(@Self)^.clr := $00008000
  22142. else
  22143. pTDefRegMap(@Self)^.&set := $00008000;
  22144. end;
  22145. function TTMR4_T4CON.getON : TBits_1; inline;
  22146. begin
  22147. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  22148. end;
  22149. procedure TTMR4_T4CON.setTCKPS0; inline;
  22150. begin
  22151. pTDefRegMap(@Self)^.&set := $00000010;
  22152. end;
  22153. procedure TTMR4_T4CON.clearTCKPS0; inline;
  22154. begin
  22155. pTDefRegMap(@Self)^.clr := $00000010;
  22156. end;
  22157. procedure TTMR4_T4CON.setTCKPS0(thebits : TBits_1); inline;
  22158. begin
  22159. if thebits = 0 then
  22160. pTDefRegMap(@Self)^.clr := $00000010
  22161. else
  22162. pTDefRegMap(@Self)^.&set := $00000010;
  22163. end;
  22164. function TTMR4_T4CON.getTCKPS0 : TBits_1; inline;
  22165. begin
  22166. getTCKPS0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  22167. end;
  22168. procedure TTMR4_T4CON.setTCKPS1; inline;
  22169. begin
  22170. pTDefRegMap(@Self)^.&set := $00000020;
  22171. end;
  22172. procedure TTMR4_T4CON.clearTCKPS1; inline;
  22173. begin
  22174. pTDefRegMap(@Self)^.clr := $00000020;
  22175. end;
  22176. procedure TTMR4_T4CON.setTCKPS1(thebits : TBits_1); inline;
  22177. begin
  22178. if thebits = 0 then
  22179. pTDefRegMap(@Self)^.clr := $00000020
  22180. else
  22181. pTDefRegMap(@Self)^.&set := $00000020;
  22182. end;
  22183. function TTMR4_T4CON.getTCKPS1 : TBits_1; inline;
  22184. begin
  22185. getTCKPS1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  22186. end;
  22187. procedure TTMR4_T4CON.setTCKPS2; inline;
  22188. begin
  22189. pTDefRegMap(@Self)^.&set := $00000040;
  22190. end;
  22191. procedure TTMR4_T4CON.clearTCKPS2; inline;
  22192. begin
  22193. pTDefRegMap(@Self)^.clr := $00000040;
  22194. end;
  22195. procedure TTMR4_T4CON.setTCKPS2(thebits : TBits_1); inline;
  22196. begin
  22197. if thebits = 0 then
  22198. pTDefRegMap(@Self)^.clr := $00000040
  22199. else
  22200. pTDefRegMap(@Self)^.&set := $00000040;
  22201. end;
  22202. function TTMR4_T4CON.getTCKPS2 : TBits_1; inline;
  22203. begin
  22204. getTCKPS2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  22205. end;
  22206. procedure TTMR4_T4CON.setTSIDL; inline;
  22207. begin
  22208. pTDefRegMap(@Self)^.&set := $00002000;
  22209. end;
  22210. procedure TTMR4_T4CON.clearTSIDL; inline;
  22211. begin
  22212. pTDefRegMap(@Self)^.clr := $00002000;
  22213. end;
  22214. procedure TTMR4_T4CON.setTSIDL(thebits : TBits_1); inline;
  22215. begin
  22216. if thebits = 0 then
  22217. pTDefRegMap(@Self)^.clr := $00002000
  22218. else
  22219. pTDefRegMap(@Self)^.&set := $00002000;
  22220. end;
  22221. function TTMR4_T4CON.getTSIDL : TBits_1; inline;
  22222. begin
  22223. getTSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  22224. end;
  22225. procedure TTMR4_T4CON.setTON; inline;
  22226. begin
  22227. pTDefRegMap(@Self)^.&set := $00008000;
  22228. end;
  22229. procedure TTMR4_T4CON.clearTON; inline;
  22230. begin
  22231. pTDefRegMap(@Self)^.clr := $00008000;
  22232. end;
  22233. procedure TTMR4_T4CON.setTON(thebits : TBits_1); inline;
  22234. begin
  22235. if thebits = 0 then
  22236. pTDefRegMap(@Self)^.clr := $00008000
  22237. else
  22238. pTDefRegMap(@Self)^.&set := $00008000;
  22239. end;
  22240. function TTMR4_T4CON.getTON : TBits_1; inline;
  22241. begin
  22242. getTON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  22243. end;
  22244. procedure TTMR4_T4CON.setw(thebits : TBits_32); inline;
  22245. begin
  22246. pTDefRegMap(@Self)^.val := thebits;
  22247. end;
  22248. function TTMR4_T4CON.getw : TBits_32; inline;
  22249. begin
  22250. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  22251. end;
  22252. procedure TTMR5_T5CON.setTCKPS(thebits : TBits_3); inline;
  22253. begin
  22254. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF8F or ( thebits shl 4 );
  22255. end;
  22256. function TTMR5_T5CON.getTCKPS : TBits_3; inline;
  22257. begin
  22258. getTCKPS := (pTDefRegMap(@Self)^.val and $00000070) shr 4;
  22259. end;
  22260. procedure TTMR5_T5CON.setTGATE; inline;
  22261. begin
  22262. pTDefRegMap(@Self)^.&set := $00000080;
  22263. end;
  22264. procedure TTMR5_T5CON.clearTGATE; inline;
  22265. begin
  22266. pTDefRegMap(@Self)^.clr := $00000080;
  22267. end;
  22268. procedure TTMR5_T5CON.setTGATE(thebits : TBits_1); inline;
  22269. begin
  22270. if thebits = 0 then
  22271. pTDefRegMap(@Self)^.clr := $00000080
  22272. else
  22273. pTDefRegMap(@Self)^.&set := $00000080;
  22274. end;
  22275. function TTMR5_T5CON.getTGATE : TBits_1; inline;
  22276. begin
  22277. getTGATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  22278. end;
  22279. procedure TTMR5_T5CON.setSIDL; inline;
  22280. begin
  22281. pTDefRegMap(@Self)^.&set := $00002000;
  22282. end;
  22283. procedure TTMR5_T5CON.clearSIDL; inline;
  22284. begin
  22285. pTDefRegMap(@Self)^.clr := $00002000;
  22286. end;
  22287. procedure TTMR5_T5CON.setSIDL(thebits : TBits_1); inline;
  22288. begin
  22289. if thebits = 0 then
  22290. pTDefRegMap(@Self)^.clr := $00002000
  22291. else
  22292. pTDefRegMap(@Self)^.&set := $00002000;
  22293. end;
  22294. function TTMR5_T5CON.getSIDL : TBits_1; inline;
  22295. begin
  22296. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  22297. end;
  22298. procedure TTMR5_T5CON.setON; inline;
  22299. begin
  22300. pTDefRegMap(@Self)^.&set := $00008000;
  22301. end;
  22302. procedure TTMR5_T5CON.clearON; inline;
  22303. begin
  22304. pTDefRegMap(@Self)^.clr := $00008000;
  22305. end;
  22306. procedure TTMR5_T5CON.setON(thebits : TBits_1); inline;
  22307. begin
  22308. if thebits = 0 then
  22309. pTDefRegMap(@Self)^.clr := $00008000
  22310. else
  22311. pTDefRegMap(@Self)^.&set := $00008000;
  22312. end;
  22313. function TTMR5_T5CON.getON : TBits_1; inline;
  22314. begin
  22315. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  22316. end;
  22317. procedure TTMR5_T5CON.setTCKPS0; inline;
  22318. begin
  22319. pTDefRegMap(@Self)^.&set := $00000010;
  22320. end;
  22321. procedure TTMR5_T5CON.clearTCKPS0; inline;
  22322. begin
  22323. pTDefRegMap(@Self)^.clr := $00000010;
  22324. end;
  22325. procedure TTMR5_T5CON.setTCKPS0(thebits : TBits_1); inline;
  22326. begin
  22327. if thebits = 0 then
  22328. pTDefRegMap(@Self)^.clr := $00000010
  22329. else
  22330. pTDefRegMap(@Self)^.&set := $00000010;
  22331. end;
  22332. function TTMR5_T5CON.getTCKPS0 : TBits_1; inline;
  22333. begin
  22334. getTCKPS0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  22335. end;
  22336. procedure TTMR5_T5CON.setTCKPS1; inline;
  22337. begin
  22338. pTDefRegMap(@Self)^.&set := $00000020;
  22339. end;
  22340. procedure TTMR5_T5CON.clearTCKPS1; inline;
  22341. begin
  22342. pTDefRegMap(@Self)^.clr := $00000020;
  22343. end;
  22344. procedure TTMR5_T5CON.setTCKPS1(thebits : TBits_1); inline;
  22345. begin
  22346. if thebits = 0 then
  22347. pTDefRegMap(@Self)^.clr := $00000020
  22348. else
  22349. pTDefRegMap(@Self)^.&set := $00000020;
  22350. end;
  22351. function TTMR5_T5CON.getTCKPS1 : TBits_1; inline;
  22352. begin
  22353. getTCKPS1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  22354. end;
  22355. procedure TTMR5_T5CON.setTCKPS2; inline;
  22356. begin
  22357. pTDefRegMap(@Self)^.&set := $00000040;
  22358. end;
  22359. procedure TTMR5_T5CON.clearTCKPS2; inline;
  22360. begin
  22361. pTDefRegMap(@Self)^.clr := $00000040;
  22362. end;
  22363. procedure TTMR5_T5CON.setTCKPS2(thebits : TBits_1); inline;
  22364. begin
  22365. if thebits = 0 then
  22366. pTDefRegMap(@Self)^.clr := $00000040
  22367. else
  22368. pTDefRegMap(@Self)^.&set := $00000040;
  22369. end;
  22370. function TTMR5_T5CON.getTCKPS2 : TBits_1; inline;
  22371. begin
  22372. getTCKPS2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  22373. end;
  22374. procedure TTMR5_T5CON.setTSIDL; inline;
  22375. begin
  22376. pTDefRegMap(@Self)^.&set := $00002000;
  22377. end;
  22378. procedure TTMR5_T5CON.clearTSIDL; inline;
  22379. begin
  22380. pTDefRegMap(@Self)^.clr := $00002000;
  22381. end;
  22382. procedure TTMR5_T5CON.setTSIDL(thebits : TBits_1); inline;
  22383. begin
  22384. if thebits = 0 then
  22385. pTDefRegMap(@Self)^.clr := $00002000
  22386. else
  22387. pTDefRegMap(@Self)^.&set := $00002000;
  22388. end;
  22389. function TTMR5_T5CON.getTSIDL : TBits_1; inline;
  22390. begin
  22391. getTSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  22392. end;
  22393. procedure TTMR5_T5CON.setTON; inline;
  22394. begin
  22395. pTDefRegMap(@Self)^.&set := $00008000;
  22396. end;
  22397. procedure TTMR5_T5CON.clearTON; inline;
  22398. begin
  22399. pTDefRegMap(@Self)^.clr := $00008000;
  22400. end;
  22401. procedure TTMR5_T5CON.setTON(thebits : TBits_1); inline;
  22402. begin
  22403. if thebits = 0 then
  22404. pTDefRegMap(@Self)^.clr := $00008000
  22405. else
  22406. pTDefRegMap(@Self)^.&set := $00008000;
  22407. end;
  22408. function TTMR5_T5CON.getTON : TBits_1; inline;
  22409. begin
  22410. getTON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  22411. end;
  22412. procedure TTMR5_T5CON.setw(thebits : TBits_32); inline;
  22413. begin
  22414. pTDefRegMap(@Self)^.val := thebits;
  22415. end;
  22416. function TTMR5_T5CON.getw : TBits_32; inline;
  22417. begin
  22418. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  22419. end;
  22420. procedure TICAP1_IC1CON.setICM(thebits : TBits_3); inline;
  22421. begin
  22422. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  22423. end;
  22424. function TICAP1_IC1CON.getICM : TBits_3; inline;
  22425. begin
  22426. getICM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  22427. end;
  22428. procedure TICAP1_IC1CON.setICBNE; inline;
  22429. begin
  22430. pTDefRegMap(@Self)^.&set := $00000008;
  22431. end;
  22432. procedure TICAP1_IC1CON.clearICBNE; inline;
  22433. begin
  22434. pTDefRegMap(@Self)^.clr := $00000008;
  22435. end;
  22436. procedure TICAP1_IC1CON.setICBNE(thebits : TBits_1); inline;
  22437. begin
  22438. if thebits = 0 then
  22439. pTDefRegMap(@Self)^.clr := $00000008
  22440. else
  22441. pTDefRegMap(@Self)^.&set := $00000008;
  22442. end;
  22443. function TICAP1_IC1CON.getICBNE : TBits_1; inline;
  22444. begin
  22445. getICBNE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  22446. end;
  22447. procedure TICAP1_IC1CON.setICOV; inline;
  22448. begin
  22449. pTDefRegMap(@Self)^.&set := $00000010;
  22450. end;
  22451. procedure TICAP1_IC1CON.clearICOV; inline;
  22452. begin
  22453. pTDefRegMap(@Self)^.clr := $00000010;
  22454. end;
  22455. procedure TICAP1_IC1CON.setICOV(thebits : TBits_1); inline;
  22456. begin
  22457. if thebits = 0 then
  22458. pTDefRegMap(@Self)^.clr := $00000010
  22459. else
  22460. pTDefRegMap(@Self)^.&set := $00000010;
  22461. end;
  22462. function TICAP1_IC1CON.getICOV : TBits_1; inline;
  22463. begin
  22464. getICOV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  22465. end;
  22466. procedure TICAP1_IC1CON.setICI(thebits : TBits_2); inline;
  22467. begin
  22468. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  22469. end;
  22470. function TICAP1_IC1CON.getICI : TBits_2; inline;
  22471. begin
  22472. getICI := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  22473. end;
  22474. procedure TICAP1_IC1CON.setICTMR; inline;
  22475. begin
  22476. pTDefRegMap(@Self)^.&set := $00000080;
  22477. end;
  22478. procedure TICAP1_IC1CON.clearICTMR; inline;
  22479. begin
  22480. pTDefRegMap(@Self)^.clr := $00000080;
  22481. end;
  22482. procedure TICAP1_IC1CON.setICTMR(thebits : TBits_1); inline;
  22483. begin
  22484. if thebits = 0 then
  22485. pTDefRegMap(@Self)^.clr := $00000080
  22486. else
  22487. pTDefRegMap(@Self)^.&set := $00000080;
  22488. end;
  22489. function TICAP1_IC1CON.getICTMR : TBits_1; inline;
  22490. begin
  22491. getICTMR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  22492. end;
  22493. procedure TICAP1_IC1CON.setC32; inline;
  22494. begin
  22495. pTDefRegMap(@Self)^.&set := $00000100;
  22496. end;
  22497. procedure TICAP1_IC1CON.clearC32; inline;
  22498. begin
  22499. pTDefRegMap(@Self)^.clr := $00000100;
  22500. end;
  22501. procedure TICAP1_IC1CON.setC32(thebits : TBits_1); inline;
  22502. begin
  22503. if thebits = 0 then
  22504. pTDefRegMap(@Self)^.clr := $00000100
  22505. else
  22506. pTDefRegMap(@Self)^.&set := $00000100;
  22507. end;
  22508. function TICAP1_IC1CON.getC32 : TBits_1; inline;
  22509. begin
  22510. getC32 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  22511. end;
  22512. procedure TICAP1_IC1CON.setFEDGE; inline;
  22513. begin
  22514. pTDefRegMap(@Self)^.&set := $00000200;
  22515. end;
  22516. procedure TICAP1_IC1CON.clearFEDGE; inline;
  22517. begin
  22518. pTDefRegMap(@Self)^.clr := $00000200;
  22519. end;
  22520. procedure TICAP1_IC1CON.setFEDGE(thebits : TBits_1); inline;
  22521. begin
  22522. if thebits = 0 then
  22523. pTDefRegMap(@Self)^.clr := $00000200
  22524. else
  22525. pTDefRegMap(@Self)^.&set := $00000200;
  22526. end;
  22527. function TICAP1_IC1CON.getFEDGE : TBits_1; inline;
  22528. begin
  22529. getFEDGE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  22530. end;
  22531. procedure TICAP1_IC1CON.setSIDL; inline;
  22532. begin
  22533. pTDefRegMap(@Self)^.&set := $00002000;
  22534. end;
  22535. procedure TICAP1_IC1CON.clearSIDL; inline;
  22536. begin
  22537. pTDefRegMap(@Self)^.clr := $00002000;
  22538. end;
  22539. procedure TICAP1_IC1CON.setSIDL(thebits : TBits_1); inline;
  22540. begin
  22541. if thebits = 0 then
  22542. pTDefRegMap(@Self)^.clr := $00002000
  22543. else
  22544. pTDefRegMap(@Self)^.&set := $00002000;
  22545. end;
  22546. function TICAP1_IC1CON.getSIDL : TBits_1; inline;
  22547. begin
  22548. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  22549. end;
  22550. procedure TICAP1_IC1CON.setON; inline;
  22551. begin
  22552. pTDefRegMap(@Self)^.&set := $00008000;
  22553. end;
  22554. procedure TICAP1_IC1CON.clearON; inline;
  22555. begin
  22556. pTDefRegMap(@Self)^.clr := $00008000;
  22557. end;
  22558. procedure TICAP1_IC1CON.setON(thebits : TBits_1); inline;
  22559. begin
  22560. if thebits = 0 then
  22561. pTDefRegMap(@Self)^.clr := $00008000
  22562. else
  22563. pTDefRegMap(@Self)^.&set := $00008000;
  22564. end;
  22565. function TICAP1_IC1CON.getON : TBits_1; inline;
  22566. begin
  22567. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  22568. end;
  22569. procedure TICAP1_IC1CON.setICM0; inline;
  22570. begin
  22571. pTDefRegMap(@Self)^.&set := $00000001;
  22572. end;
  22573. procedure TICAP1_IC1CON.clearICM0; inline;
  22574. begin
  22575. pTDefRegMap(@Self)^.clr := $00000001;
  22576. end;
  22577. procedure TICAP1_IC1CON.setICM0(thebits : TBits_1); inline;
  22578. begin
  22579. if thebits = 0 then
  22580. pTDefRegMap(@Self)^.clr := $00000001
  22581. else
  22582. pTDefRegMap(@Self)^.&set := $00000001;
  22583. end;
  22584. function TICAP1_IC1CON.getICM0 : TBits_1; inline;
  22585. begin
  22586. getICM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  22587. end;
  22588. procedure TICAP1_IC1CON.setICM1; inline;
  22589. begin
  22590. pTDefRegMap(@Self)^.&set := $00000002;
  22591. end;
  22592. procedure TICAP1_IC1CON.clearICM1; inline;
  22593. begin
  22594. pTDefRegMap(@Self)^.clr := $00000002;
  22595. end;
  22596. procedure TICAP1_IC1CON.setICM1(thebits : TBits_1); inline;
  22597. begin
  22598. if thebits = 0 then
  22599. pTDefRegMap(@Self)^.clr := $00000002
  22600. else
  22601. pTDefRegMap(@Self)^.&set := $00000002;
  22602. end;
  22603. function TICAP1_IC1CON.getICM1 : TBits_1; inline;
  22604. begin
  22605. getICM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  22606. end;
  22607. procedure TICAP1_IC1CON.setICM2; inline;
  22608. begin
  22609. pTDefRegMap(@Self)^.&set := $00000004;
  22610. end;
  22611. procedure TICAP1_IC1CON.clearICM2; inline;
  22612. begin
  22613. pTDefRegMap(@Self)^.clr := $00000004;
  22614. end;
  22615. procedure TICAP1_IC1CON.setICM2(thebits : TBits_1); inline;
  22616. begin
  22617. if thebits = 0 then
  22618. pTDefRegMap(@Self)^.clr := $00000004
  22619. else
  22620. pTDefRegMap(@Self)^.&set := $00000004;
  22621. end;
  22622. function TICAP1_IC1CON.getICM2 : TBits_1; inline;
  22623. begin
  22624. getICM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  22625. end;
  22626. procedure TICAP1_IC1CON.setICI0; inline;
  22627. begin
  22628. pTDefRegMap(@Self)^.&set := $00000020;
  22629. end;
  22630. procedure TICAP1_IC1CON.clearICI0; inline;
  22631. begin
  22632. pTDefRegMap(@Self)^.clr := $00000020;
  22633. end;
  22634. procedure TICAP1_IC1CON.setICI0(thebits : TBits_1); inline;
  22635. begin
  22636. if thebits = 0 then
  22637. pTDefRegMap(@Self)^.clr := $00000020
  22638. else
  22639. pTDefRegMap(@Self)^.&set := $00000020;
  22640. end;
  22641. function TICAP1_IC1CON.getICI0 : TBits_1; inline;
  22642. begin
  22643. getICI0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  22644. end;
  22645. procedure TICAP1_IC1CON.setICI1; inline;
  22646. begin
  22647. pTDefRegMap(@Self)^.&set := $00000040;
  22648. end;
  22649. procedure TICAP1_IC1CON.clearICI1; inline;
  22650. begin
  22651. pTDefRegMap(@Self)^.clr := $00000040;
  22652. end;
  22653. procedure TICAP1_IC1CON.setICI1(thebits : TBits_1); inline;
  22654. begin
  22655. if thebits = 0 then
  22656. pTDefRegMap(@Self)^.clr := $00000040
  22657. else
  22658. pTDefRegMap(@Self)^.&set := $00000040;
  22659. end;
  22660. function TICAP1_IC1CON.getICI1 : TBits_1; inline;
  22661. begin
  22662. getICI1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  22663. end;
  22664. procedure TICAP1_IC1CON.setICSIDL; inline;
  22665. begin
  22666. pTDefRegMap(@Self)^.&set := $00002000;
  22667. end;
  22668. procedure TICAP1_IC1CON.clearICSIDL; inline;
  22669. begin
  22670. pTDefRegMap(@Self)^.clr := $00002000;
  22671. end;
  22672. procedure TICAP1_IC1CON.setICSIDL(thebits : TBits_1); inline;
  22673. begin
  22674. if thebits = 0 then
  22675. pTDefRegMap(@Self)^.clr := $00002000
  22676. else
  22677. pTDefRegMap(@Self)^.&set := $00002000;
  22678. end;
  22679. function TICAP1_IC1CON.getICSIDL : TBits_1; inline;
  22680. begin
  22681. getICSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  22682. end;
  22683. procedure TICAP1_IC1CON.setw(thebits : TBits_32); inline;
  22684. begin
  22685. pTDefRegMap(@Self)^.val := thebits;
  22686. end;
  22687. function TICAP1_IC1CON.getw : TBits_32; inline;
  22688. begin
  22689. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  22690. end;
  22691. procedure TICAP2_IC2CON.setICM(thebits : TBits_3); inline;
  22692. begin
  22693. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  22694. end;
  22695. function TICAP2_IC2CON.getICM : TBits_3; inline;
  22696. begin
  22697. getICM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  22698. end;
  22699. procedure TICAP2_IC2CON.setICBNE; inline;
  22700. begin
  22701. pTDefRegMap(@Self)^.&set := $00000008;
  22702. end;
  22703. procedure TICAP2_IC2CON.clearICBNE; inline;
  22704. begin
  22705. pTDefRegMap(@Self)^.clr := $00000008;
  22706. end;
  22707. procedure TICAP2_IC2CON.setICBNE(thebits : TBits_1); inline;
  22708. begin
  22709. if thebits = 0 then
  22710. pTDefRegMap(@Self)^.clr := $00000008
  22711. else
  22712. pTDefRegMap(@Self)^.&set := $00000008;
  22713. end;
  22714. function TICAP2_IC2CON.getICBNE : TBits_1; inline;
  22715. begin
  22716. getICBNE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  22717. end;
  22718. procedure TICAP2_IC2CON.setICOV; inline;
  22719. begin
  22720. pTDefRegMap(@Self)^.&set := $00000010;
  22721. end;
  22722. procedure TICAP2_IC2CON.clearICOV; inline;
  22723. begin
  22724. pTDefRegMap(@Self)^.clr := $00000010;
  22725. end;
  22726. procedure TICAP2_IC2CON.setICOV(thebits : TBits_1); inline;
  22727. begin
  22728. if thebits = 0 then
  22729. pTDefRegMap(@Self)^.clr := $00000010
  22730. else
  22731. pTDefRegMap(@Self)^.&set := $00000010;
  22732. end;
  22733. function TICAP2_IC2CON.getICOV : TBits_1; inline;
  22734. begin
  22735. getICOV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  22736. end;
  22737. procedure TICAP2_IC2CON.setICI(thebits : TBits_2); inline;
  22738. begin
  22739. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  22740. end;
  22741. function TICAP2_IC2CON.getICI : TBits_2; inline;
  22742. begin
  22743. getICI := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  22744. end;
  22745. procedure TICAP2_IC2CON.setICTMR; inline;
  22746. begin
  22747. pTDefRegMap(@Self)^.&set := $00000080;
  22748. end;
  22749. procedure TICAP2_IC2CON.clearICTMR; inline;
  22750. begin
  22751. pTDefRegMap(@Self)^.clr := $00000080;
  22752. end;
  22753. procedure TICAP2_IC2CON.setICTMR(thebits : TBits_1); inline;
  22754. begin
  22755. if thebits = 0 then
  22756. pTDefRegMap(@Self)^.clr := $00000080
  22757. else
  22758. pTDefRegMap(@Self)^.&set := $00000080;
  22759. end;
  22760. function TICAP2_IC2CON.getICTMR : TBits_1; inline;
  22761. begin
  22762. getICTMR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  22763. end;
  22764. procedure TICAP2_IC2CON.setC32; inline;
  22765. begin
  22766. pTDefRegMap(@Self)^.&set := $00000100;
  22767. end;
  22768. procedure TICAP2_IC2CON.clearC32; inline;
  22769. begin
  22770. pTDefRegMap(@Self)^.clr := $00000100;
  22771. end;
  22772. procedure TICAP2_IC2CON.setC32(thebits : TBits_1); inline;
  22773. begin
  22774. if thebits = 0 then
  22775. pTDefRegMap(@Self)^.clr := $00000100
  22776. else
  22777. pTDefRegMap(@Self)^.&set := $00000100;
  22778. end;
  22779. function TICAP2_IC2CON.getC32 : TBits_1; inline;
  22780. begin
  22781. getC32 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  22782. end;
  22783. procedure TICAP2_IC2CON.setFEDGE; inline;
  22784. begin
  22785. pTDefRegMap(@Self)^.&set := $00000200;
  22786. end;
  22787. procedure TICAP2_IC2CON.clearFEDGE; inline;
  22788. begin
  22789. pTDefRegMap(@Self)^.clr := $00000200;
  22790. end;
  22791. procedure TICAP2_IC2CON.setFEDGE(thebits : TBits_1); inline;
  22792. begin
  22793. if thebits = 0 then
  22794. pTDefRegMap(@Self)^.clr := $00000200
  22795. else
  22796. pTDefRegMap(@Self)^.&set := $00000200;
  22797. end;
  22798. function TICAP2_IC2CON.getFEDGE : TBits_1; inline;
  22799. begin
  22800. getFEDGE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  22801. end;
  22802. procedure TICAP2_IC2CON.setSIDL; inline;
  22803. begin
  22804. pTDefRegMap(@Self)^.&set := $00002000;
  22805. end;
  22806. procedure TICAP2_IC2CON.clearSIDL; inline;
  22807. begin
  22808. pTDefRegMap(@Self)^.clr := $00002000;
  22809. end;
  22810. procedure TICAP2_IC2CON.setSIDL(thebits : TBits_1); inline;
  22811. begin
  22812. if thebits = 0 then
  22813. pTDefRegMap(@Self)^.clr := $00002000
  22814. else
  22815. pTDefRegMap(@Self)^.&set := $00002000;
  22816. end;
  22817. function TICAP2_IC2CON.getSIDL : TBits_1; inline;
  22818. begin
  22819. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  22820. end;
  22821. procedure TICAP2_IC2CON.setON; inline;
  22822. begin
  22823. pTDefRegMap(@Self)^.&set := $00008000;
  22824. end;
  22825. procedure TICAP2_IC2CON.clearON; inline;
  22826. begin
  22827. pTDefRegMap(@Self)^.clr := $00008000;
  22828. end;
  22829. procedure TICAP2_IC2CON.setON(thebits : TBits_1); inline;
  22830. begin
  22831. if thebits = 0 then
  22832. pTDefRegMap(@Self)^.clr := $00008000
  22833. else
  22834. pTDefRegMap(@Self)^.&set := $00008000;
  22835. end;
  22836. function TICAP2_IC2CON.getON : TBits_1; inline;
  22837. begin
  22838. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  22839. end;
  22840. procedure TICAP2_IC2CON.setICM0; inline;
  22841. begin
  22842. pTDefRegMap(@Self)^.&set := $00000001;
  22843. end;
  22844. procedure TICAP2_IC2CON.clearICM0; inline;
  22845. begin
  22846. pTDefRegMap(@Self)^.clr := $00000001;
  22847. end;
  22848. procedure TICAP2_IC2CON.setICM0(thebits : TBits_1); inline;
  22849. begin
  22850. if thebits = 0 then
  22851. pTDefRegMap(@Self)^.clr := $00000001
  22852. else
  22853. pTDefRegMap(@Self)^.&set := $00000001;
  22854. end;
  22855. function TICAP2_IC2CON.getICM0 : TBits_1; inline;
  22856. begin
  22857. getICM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  22858. end;
  22859. procedure TICAP2_IC2CON.setICM1; inline;
  22860. begin
  22861. pTDefRegMap(@Self)^.&set := $00000002;
  22862. end;
  22863. procedure TICAP2_IC2CON.clearICM1; inline;
  22864. begin
  22865. pTDefRegMap(@Self)^.clr := $00000002;
  22866. end;
  22867. procedure TICAP2_IC2CON.setICM1(thebits : TBits_1); inline;
  22868. begin
  22869. if thebits = 0 then
  22870. pTDefRegMap(@Self)^.clr := $00000002
  22871. else
  22872. pTDefRegMap(@Self)^.&set := $00000002;
  22873. end;
  22874. function TICAP2_IC2CON.getICM1 : TBits_1; inline;
  22875. begin
  22876. getICM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  22877. end;
  22878. procedure TICAP2_IC2CON.setICM2; inline;
  22879. begin
  22880. pTDefRegMap(@Self)^.&set := $00000004;
  22881. end;
  22882. procedure TICAP2_IC2CON.clearICM2; inline;
  22883. begin
  22884. pTDefRegMap(@Self)^.clr := $00000004;
  22885. end;
  22886. procedure TICAP2_IC2CON.setICM2(thebits : TBits_1); inline;
  22887. begin
  22888. if thebits = 0 then
  22889. pTDefRegMap(@Self)^.clr := $00000004
  22890. else
  22891. pTDefRegMap(@Self)^.&set := $00000004;
  22892. end;
  22893. function TICAP2_IC2CON.getICM2 : TBits_1; inline;
  22894. begin
  22895. getICM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  22896. end;
  22897. procedure TICAP2_IC2CON.setICI0; inline;
  22898. begin
  22899. pTDefRegMap(@Self)^.&set := $00000020;
  22900. end;
  22901. procedure TICAP2_IC2CON.clearICI0; inline;
  22902. begin
  22903. pTDefRegMap(@Self)^.clr := $00000020;
  22904. end;
  22905. procedure TICAP2_IC2CON.setICI0(thebits : TBits_1); inline;
  22906. begin
  22907. if thebits = 0 then
  22908. pTDefRegMap(@Self)^.clr := $00000020
  22909. else
  22910. pTDefRegMap(@Self)^.&set := $00000020;
  22911. end;
  22912. function TICAP2_IC2CON.getICI0 : TBits_1; inline;
  22913. begin
  22914. getICI0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  22915. end;
  22916. procedure TICAP2_IC2CON.setICI1; inline;
  22917. begin
  22918. pTDefRegMap(@Self)^.&set := $00000040;
  22919. end;
  22920. procedure TICAP2_IC2CON.clearICI1; inline;
  22921. begin
  22922. pTDefRegMap(@Self)^.clr := $00000040;
  22923. end;
  22924. procedure TICAP2_IC2CON.setICI1(thebits : TBits_1); inline;
  22925. begin
  22926. if thebits = 0 then
  22927. pTDefRegMap(@Self)^.clr := $00000040
  22928. else
  22929. pTDefRegMap(@Self)^.&set := $00000040;
  22930. end;
  22931. function TICAP2_IC2CON.getICI1 : TBits_1; inline;
  22932. begin
  22933. getICI1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  22934. end;
  22935. procedure TICAP2_IC2CON.setICSIDL; inline;
  22936. begin
  22937. pTDefRegMap(@Self)^.&set := $00002000;
  22938. end;
  22939. procedure TICAP2_IC2CON.clearICSIDL; inline;
  22940. begin
  22941. pTDefRegMap(@Self)^.clr := $00002000;
  22942. end;
  22943. procedure TICAP2_IC2CON.setICSIDL(thebits : TBits_1); inline;
  22944. begin
  22945. if thebits = 0 then
  22946. pTDefRegMap(@Self)^.clr := $00002000
  22947. else
  22948. pTDefRegMap(@Self)^.&set := $00002000;
  22949. end;
  22950. function TICAP2_IC2CON.getICSIDL : TBits_1; inline;
  22951. begin
  22952. getICSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  22953. end;
  22954. procedure TICAP2_IC2CON.setw(thebits : TBits_32); inline;
  22955. begin
  22956. pTDefRegMap(@Self)^.val := thebits;
  22957. end;
  22958. function TICAP2_IC2CON.getw : TBits_32; inline;
  22959. begin
  22960. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  22961. end;
  22962. procedure TICAP3_IC3CON.setICM(thebits : TBits_3); inline;
  22963. begin
  22964. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  22965. end;
  22966. function TICAP3_IC3CON.getICM : TBits_3; inline;
  22967. begin
  22968. getICM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  22969. end;
  22970. procedure TICAP3_IC3CON.setICBNE; inline;
  22971. begin
  22972. pTDefRegMap(@Self)^.&set := $00000008;
  22973. end;
  22974. procedure TICAP3_IC3CON.clearICBNE; inline;
  22975. begin
  22976. pTDefRegMap(@Self)^.clr := $00000008;
  22977. end;
  22978. procedure TICAP3_IC3CON.setICBNE(thebits : TBits_1); inline;
  22979. begin
  22980. if thebits = 0 then
  22981. pTDefRegMap(@Self)^.clr := $00000008
  22982. else
  22983. pTDefRegMap(@Self)^.&set := $00000008;
  22984. end;
  22985. function TICAP3_IC3CON.getICBNE : TBits_1; inline;
  22986. begin
  22987. getICBNE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  22988. end;
  22989. procedure TICAP3_IC3CON.setICOV; inline;
  22990. begin
  22991. pTDefRegMap(@Self)^.&set := $00000010;
  22992. end;
  22993. procedure TICAP3_IC3CON.clearICOV; inline;
  22994. begin
  22995. pTDefRegMap(@Self)^.clr := $00000010;
  22996. end;
  22997. procedure TICAP3_IC3CON.setICOV(thebits : TBits_1); inline;
  22998. begin
  22999. if thebits = 0 then
  23000. pTDefRegMap(@Self)^.clr := $00000010
  23001. else
  23002. pTDefRegMap(@Self)^.&set := $00000010;
  23003. end;
  23004. function TICAP3_IC3CON.getICOV : TBits_1; inline;
  23005. begin
  23006. getICOV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  23007. end;
  23008. procedure TICAP3_IC3CON.setICI(thebits : TBits_2); inline;
  23009. begin
  23010. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  23011. end;
  23012. function TICAP3_IC3CON.getICI : TBits_2; inline;
  23013. begin
  23014. getICI := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  23015. end;
  23016. procedure TICAP3_IC3CON.setICTMR; inline;
  23017. begin
  23018. pTDefRegMap(@Self)^.&set := $00000080;
  23019. end;
  23020. procedure TICAP3_IC3CON.clearICTMR; inline;
  23021. begin
  23022. pTDefRegMap(@Self)^.clr := $00000080;
  23023. end;
  23024. procedure TICAP3_IC3CON.setICTMR(thebits : TBits_1); inline;
  23025. begin
  23026. if thebits = 0 then
  23027. pTDefRegMap(@Self)^.clr := $00000080
  23028. else
  23029. pTDefRegMap(@Self)^.&set := $00000080;
  23030. end;
  23031. function TICAP3_IC3CON.getICTMR : TBits_1; inline;
  23032. begin
  23033. getICTMR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  23034. end;
  23035. procedure TICAP3_IC3CON.setC32; inline;
  23036. begin
  23037. pTDefRegMap(@Self)^.&set := $00000100;
  23038. end;
  23039. procedure TICAP3_IC3CON.clearC32; inline;
  23040. begin
  23041. pTDefRegMap(@Self)^.clr := $00000100;
  23042. end;
  23043. procedure TICAP3_IC3CON.setC32(thebits : TBits_1); inline;
  23044. begin
  23045. if thebits = 0 then
  23046. pTDefRegMap(@Self)^.clr := $00000100
  23047. else
  23048. pTDefRegMap(@Self)^.&set := $00000100;
  23049. end;
  23050. function TICAP3_IC3CON.getC32 : TBits_1; inline;
  23051. begin
  23052. getC32 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  23053. end;
  23054. procedure TICAP3_IC3CON.setFEDGE; inline;
  23055. begin
  23056. pTDefRegMap(@Self)^.&set := $00000200;
  23057. end;
  23058. procedure TICAP3_IC3CON.clearFEDGE; inline;
  23059. begin
  23060. pTDefRegMap(@Self)^.clr := $00000200;
  23061. end;
  23062. procedure TICAP3_IC3CON.setFEDGE(thebits : TBits_1); inline;
  23063. begin
  23064. if thebits = 0 then
  23065. pTDefRegMap(@Self)^.clr := $00000200
  23066. else
  23067. pTDefRegMap(@Self)^.&set := $00000200;
  23068. end;
  23069. function TICAP3_IC3CON.getFEDGE : TBits_1; inline;
  23070. begin
  23071. getFEDGE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  23072. end;
  23073. procedure TICAP3_IC3CON.setSIDL; inline;
  23074. begin
  23075. pTDefRegMap(@Self)^.&set := $00002000;
  23076. end;
  23077. procedure TICAP3_IC3CON.clearSIDL; inline;
  23078. begin
  23079. pTDefRegMap(@Self)^.clr := $00002000;
  23080. end;
  23081. procedure TICAP3_IC3CON.setSIDL(thebits : TBits_1); inline;
  23082. begin
  23083. if thebits = 0 then
  23084. pTDefRegMap(@Self)^.clr := $00002000
  23085. else
  23086. pTDefRegMap(@Self)^.&set := $00002000;
  23087. end;
  23088. function TICAP3_IC3CON.getSIDL : TBits_1; inline;
  23089. begin
  23090. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  23091. end;
  23092. procedure TICAP3_IC3CON.setON; inline;
  23093. begin
  23094. pTDefRegMap(@Self)^.&set := $00008000;
  23095. end;
  23096. procedure TICAP3_IC3CON.clearON; inline;
  23097. begin
  23098. pTDefRegMap(@Self)^.clr := $00008000;
  23099. end;
  23100. procedure TICAP3_IC3CON.setON(thebits : TBits_1); inline;
  23101. begin
  23102. if thebits = 0 then
  23103. pTDefRegMap(@Self)^.clr := $00008000
  23104. else
  23105. pTDefRegMap(@Self)^.&set := $00008000;
  23106. end;
  23107. function TICAP3_IC3CON.getON : TBits_1; inline;
  23108. begin
  23109. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  23110. end;
  23111. procedure TICAP3_IC3CON.setICM0; inline;
  23112. begin
  23113. pTDefRegMap(@Self)^.&set := $00000001;
  23114. end;
  23115. procedure TICAP3_IC3CON.clearICM0; inline;
  23116. begin
  23117. pTDefRegMap(@Self)^.clr := $00000001;
  23118. end;
  23119. procedure TICAP3_IC3CON.setICM0(thebits : TBits_1); inline;
  23120. begin
  23121. if thebits = 0 then
  23122. pTDefRegMap(@Self)^.clr := $00000001
  23123. else
  23124. pTDefRegMap(@Self)^.&set := $00000001;
  23125. end;
  23126. function TICAP3_IC3CON.getICM0 : TBits_1; inline;
  23127. begin
  23128. getICM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  23129. end;
  23130. procedure TICAP3_IC3CON.setICM1; inline;
  23131. begin
  23132. pTDefRegMap(@Self)^.&set := $00000002;
  23133. end;
  23134. procedure TICAP3_IC3CON.clearICM1; inline;
  23135. begin
  23136. pTDefRegMap(@Self)^.clr := $00000002;
  23137. end;
  23138. procedure TICAP3_IC3CON.setICM1(thebits : TBits_1); inline;
  23139. begin
  23140. if thebits = 0 then
  23141. pTDefRegMap(@Self)^.clr := $00000002
  23142. else
  23143. pTDefRegMap(@Self)^.&set := $00000002;
  23144. end;
  23145. function TICAP3_IC3CON.getICM1 : TBits_1; inline;
  23146. begin
  23147. getICM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  23148. end;
  23149. procedure TICAP3_IC3CON.setICM2; inline;
  23150. begin
  23151. pTDefRegMap(@Self)^.&set := $00000004;
  23152. end;
  23153. procedure TICAP3_IC3CON.clearICM2; inline;
  23154. begin
  23155. pTDefRegMap(@Self)^.clr := $00000004;
  23156. end;
  23157. procedure TICAP3_IC3CON.setICM2(thebits : TBits_1); inline;
  23158. begin
  23159. if thebits = 0 then
  23160. pTDefRegMap(@Self)^.clr := $00000004
  23161. else
  23162. pTDefRegMap(@Self)^.&set := $00000004;
  23163. end;
  23164. function TICAP3_IC3CON.getICM2 : TBits_1; inline;
  23165. begin
  23166. getICM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  23167. end;
  23168. procedure TICAP3_IC3CON.setICI0; inline;
  23169. begin
  23170. pTDefRegMap(@Self)^.&set := $00000020;
  23171. end;
  23172. procedure TICAP3_IC3CON.clearICI0; inline;
  23173. begin
  23174. pTDefRegMap(@Self)^.clr := $00000020;
  23175. end;
  23176. procedure TICAP3_IC3CON.setICI0(thebits : TBits_1); inline;
  23177. begin
  23178. if thebits = 0 then
  23179. pTDefRegMap(@Self)^.clr := $00000020
  23180. else
  23181. pTDefRegMap(@Self)^.&set := $00000020;
  23182. end;
  23183. function TICAP3_IC3CON.getICI0 : TBits_1; inline;
  23184. begin
  23185. getICI0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  23186. end;
  23187. procedure TICAP3_IC3CON.setICI1; inline;
  23188. begin
  23189. pTDefRegMap(@Self)^.&set := $00000040;
  23190. end;
  23191. procedure TICAP3_IC3CON.clearICI1; inline;
  23192. begin
  23193. pTDefRegMap(@Self)^.clr := $00000040;
  23194. end;
  23195. procedure TICAP3_IC3CON.setICI1(thebits : TBits_1); inline;
  23196. begin
  23197. if thebits = 0 then
  23198. pTDefRegMap(@Self)^.clr := $00000040
  23199. else
  23200. pTDefRegMap(@Self)^.&set := $00000040;
  23201. end;
  23202. function TICAP3_IC3CON.getICI1 : TBits_1; inline;
  23203. begin
  23204. getICI1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  23205. end;
  23206. procedure TICAP3_IC3CON.setICSIDL; inline;
  23207. begin
  23208. pTDefRegMap(@Self)^.&set := $00002000;
  23209. end;
  23210. procedure TICAP3_IC3CON.clearICSIDL; inline;
  23211. begin
  23212. pTDefRegMap(@Self)^.clr := $00002000;
  23213. end;
  23214. procedure TICAP3_IC3CON.setICSIDL(thebits : TBits_1); inline;
  23215. begin
  23216. if thebits = 0 then
  23217. pTDefRegMap(@Self)^.clr := $00002000
  23218. else
  23219. pTDefRegMap(@Self)^.&set := $00002000;
  23220. end;
  23221. function TICAP3_IC3CON.getICSIDL : TBits_1; inline;
  23222. begin
  23223. getICSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  23224. end;
  23225. procedure TICAP3_IC3CON.setw(thebits : TBits_32); inline;
  23226. begin
  23227. pTDefRegMap(@Self)^.val := thebits;
  23228. end;
  23229. function TICAP3_IC3CON.getw : TBits_32; inline;
  23230. begin
  23231. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  23232. end;
  23233. procedure TICAP4_IC4CON.setICM(thebits : TBits_3); inline;
  23234. begin
  23235. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  23236. end;
  23237. function TICAP4_IC4CON.getICM : TBits_3; inline;
  23238. begin
  23239. getICM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  23240. end;
  23241. procedure TICAP4_IC4CON.setICBNE; inline;
  23242. begin
  23243. pTDefRegMap(@Self)^.&set := $00000008;
  23244. end;
  23245. procedure TICAP4_IC4CON.clearICBNE; inline;
  23246. begin
  23247. pTDefRegMap(@Self)^.clr := $00000008;
  23248. end;
  23249. procedure TICAP4_IC4CON.setICBNE(thebits : TBits_1); inline;
  23250. begin
  23251. if thebits = 0 then
  23252. pTDefRegMap(@Self)^.clr := $00000008
  23253. else
  23254. pTDefRegMap(@Self)^.&set := $00000008;
  23255. end;
  23256. function TICAP4_IC4CON.getICBNE : TBits_1; inline;
  23257. begin
  23258. getICBNE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  23259. end;
  23260. procedure TICAP4_IC4CON.setICOV; inline;
  23261. begin
  23262. pTDefRegMap(@Self)^.&set := $00000010;
  23263. end;
  23264. procedure TICAP4_IC4CON.clearICOV; inline;
  23265. begin
  23266. pTDefRegMap(@Self)^.clr := $00000010;
  23267. end;
  23268. procedure TICAP4_IC4CON.setICOV(thebits : TBits_1); inline;
  23269. begin
  23270. if thebits = 0 then
  23271. pTDefRegMap(@Self)^.clr := $00000010
  23272. else
  23273. pTDefRegMap(@Self)^.&set := $00000010;
  23274. end;
  23275. function TICAP4_IC4CON.getICOV : TBits_1; inline;
  23276. begin
  23277. getICOV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  23278. end;
  23279. procedure TICAP4_IC4CON.setICI(thebits : TBits_2); inline;
  23280. begin
  23281. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  23282. end;
  23283. function TICAP4_IC4CON.getICI : TBits_2; inline;
  23284. begin
  23285. getICI := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  23286. end;
  23287. procedure TICAP4_IC4CON.setICTMR; inline;
  23288. begin
  23289. pTDefRegMap(@Self)^.&set := $00000080;
  23290. end;
  23291. procedure TICAP4_IC4CON.clearICTMR; inline;
  23292. begin
  23293. pTDefRegMap(@Self)^.clr := $00000080;
  23294. end;
  23295. procedure TICAP4_IC4CON.setICTMR(thebits : TBits_1); inline;
  23296. begin
  23297. if thebits = 0 then
  23298. pTDefRegMap(@Self)^.clr := $00000080
  23299. else
  23300. pTDefRegMap(@Self)^.&set := $00000080;
  23301. end;
  23302. function TICAP4_IC4CON.getICTMR : TBits_1; inline;
  23303. begin
  23304. getICTMR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  23305. end;
  23306. procedure TICAP4_IC4CON.setC32; inline;
  23307. begin
  23308. pTDefRegMap(@Self)^.&set := $00000100;
  23309. end;
  23310. procedure TICAP4_IC4CON.clearC32; inline;
  23311. begin
  23312. pTDefRegMap(@Self)^.clr := $00000100;
  23313. end;
  23314. procedure TICAP4_IC4CON.setC32(thebits : TBits_1); inline;
  23315. begin
  23316. if thebits = 0 then
  23317. pTDefRegMap(@Self)^.clr := $00000100
  23318. else
  23319. pTDefRegMap(@Self)^.&set := $00000100;
  23320. end;
  23321. function TICAP4_IC4CON.getC32 : TBits_1; inline;
  23322. begin
  23323. getC32 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  23324. end;
  23325. procedure TICAP4_IC4CON.setFEDGE; inline;
  23326. begin
  23327. pTDefRegMap(@Self)^.&set := $00000200;
  23328. end;
  23329. procedure TICAP4_IC4CON.clearFEDGE; inline;
  23330. begin
  23331. pTDefRegMap(@Self)^.clr := $00000200;
  23332. end;
  23333. procedure TICAP4_IC4CON.setFEDGE(thebits : TBits_1); inline;
  23334. begin
  23335. if thebits = 0 then
  23336. pTDefRegMap(@Self)^.clr := $00000200
  23337. else
  23338. pTDefRegMap(@Self)^.&set := $00000200;
  23339. end;
  23340. function TICAP4_IC4CON.getFEDGE : TBits_1; inline;
  23341. begin
  23342. getFEDGE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  23343. end;
  23344. procedure TICAP4_IC4CON.setSIDL; inline;
  23345. begin
  23346. pTDefRegMap(@Self)^.&set := $00002000;
  23347. end;
  23348. procedure TICAP4_IC4CON.clearSIDL; inline;
  23349. begin
  23350. pTDefRegMap(@Self)^.clr := $00002000;
  23351. end;
  23352. procedure TICAP4_IC4CON.setSIDL(thebits : TBits_1); inline;
  23353. begin
  23354. if thebits = 0 then
  23355. pTDefRegMap(@Self)^.clr := $00002000
  23356. else
  23357. pTDefRegMap(@Self)^.&set := $00002000;
  23358. end;
  23359. function TICAP4_IC4CON.getSIDL : TBits_1; inline;
  23360. begin
  23361. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  23362. end;
  23363. procedure TICAP4_IC4CON.setON; inline;
  23364. begin
  23365. pTDefRegMap(@Self)^.&set := $00008000;
  23366. end;
  23367. procedure TICAP4_IC4CON.clearON; inline;
  23368. begin
  23369. pTDefRegMap(@Self)^.clr := $00008000;
  23370. end;
  23371. procedure TICAP4_IC4CON.setON(thebits : TBits_1); inline;
  23372. begin
  23373. if thebits = 0 then
  23374. pTDefRegMap(@Self)^.clr := $00008000
  23375. else
  23376. pTDefRegMap(@Self)^.&set := $00008000;
  23377. end;
  23378. function TICAP4_IC4CON.getON : TBits_1; inline;
  23379. begin
  23380. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  23381. end;
  23382. procedure TICAP4_IC4CON.setICM0; inline;
  23383. begin
  23384. pTDefRegMap(@Self)^.&set := $00000001;
  23385. end;
  23386. procedure TICAP4_IC4CON.clearICM0; inline;
  23387. begin
  23388. pTDefRegMap(@Self)^.clr := $00000001;
  23389. end;
  23390. procedure TICAP4_IC4CON.setICM0(thebits : TBits_1); inline;
  23391. begin
  23392. if thebits = 0 then
  23393. pTDefRegMap(@Self)^.clr := $00000001
  23394. else
  23395. pTDefRegMap(@Self)^.&set := $00000001;
  23396. end;
  23397. function TICAP4_IC4CON.getICM0 : TBits_1; inline;
  23398. begin
  23399. getICM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  23400. end;
  23401. procedure TICAP4_IC4CON.setICM1; inline;
  23402. begin
  23403. pTDefRegMap(@Self)^.&set := $00000002;
  23404. end;
  23405. procedure TICAP4_IC4CON.clearICM1; inline;
  23406. begin
  23407. pTDefRegMap(@Self)^.clr := $00000002;
  23408. end;
  23409. procedure TICAP4_IC4CON.setICM1(thebits : TBits_1); inline;
  23410. begin
  23411. if thebits = 0 then
  23412. pTDefRegMap(@Self)^.clr := $00000002
  23413. else
  23414. pTDefRegMap(@Self)^.&set := $00000002;
  23415. end;
  23416. function TICAP4_IC4CON.getICM1 : TBits_1; inline;
  23417. begin
  23418. getICM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  23419. end;
  23420. procedure TICAP4_IC4CON.setICM2; inline;
  23421. begin
  23422. pTDefRegMap(@Self)^.&set := $00000004;
  23423. end;
  23424. procedure TICAP4_IC4CON.clearICM2; inline;
  23425. begin
  23426. pTDefRegMap(@Self)^.clr := $00000004;
  23427. end;
  23428. procedure TICAP4_IC4CON.setICM2(thebits : TBits_1); inline;
  23429. begin
  23430. if thebits = 0 then
  23431. pTDefRegMap(@Self)^.clr := $00000004
  23432. else
  23433. pTDefRegMap(@Self)^.&set := $00000004;
  23434. end;
  23435. function TICAP4_IC4CON.getICM2 : TBits_1; inline;
  23436. begin
  23437. getICM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  23438. end;
  23439. procedure TICAP4_IC4CON.setICI0; inline;
  23440. begin
  23441. pTDefRegMap(@Self)^.&set := $00000020;
  23442. end;
  23443. procedure TICAP4_IC4CON.clearICI0; inline;
  23444. begin
  23445. pTDefRegMap(@Self)^.clr := $00000020;
  23446. end;
  23447. procedure TICAP4_IC4CON.setICI0(thebits : TBits_1); inline;
  23448. begin
  23449. if thebits = 0 then
  23450. pTDefRegMap(@Self)^.clr := $00000020
  23451. else
  23452. pTDefRegMap(@Self)^.&set := $00000020;
  23453. end;
  23454. function TICAP4_IC4CON.getICI0 : TBits_1; inline;
  23455. begin
  23456. getICI0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  23457. end;
  23458. procedure TICAP4_IC4CON.setICI1; inline;
  23459. begin
  23460. pTDefRegMap(@Self)^.&set := $00000040;
  23461. end;
  23462. procedure TICAP4_IC4CON.clearICI1; inline;
  23463. begin
  23464. pTDefRegMap(@Self)^.clr := $00000040;
  23465. end;
  23466. procedure TICAP4_IC4CON.setICI1(thebits : TBits_1); inline;
  23467. begin
  23468. if thebits = 0 then
  23469. pTDefRegMap(@Self)^.clr := $00000040
  23470. else
  23471. pTDefRegMap(@Self)^.&set := $00000040;
  23472. end;
  23473. function TICAP4_IC4CON.getICI1 : TBits_1; inline;
  23474. begin
  23475. getICI1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  23476. end;
  23477. procedure TICAP4_IC4CON.setICSIDL; inline;
  23478. begin
  23479. pTDefRegMap(@Self)^.&set := $00002000;
  23480. end;
  23481. procedure TICAP4_IC4CON.clearICSIDL; inline;
  23482. begin
  23483. pTDefRegMap(@Self)^.clr := $00002000;
  23484. end;
  23485. procedure TICAP4_IC4CON.setICSIDL(thebits : TBits_1); inline;
  23486. begin
  23487. if thebits = 0 then
  23488. pTDefRegMap(@Self)^.clr := $00002000
  23489. else
  23490. pTDefRegMap(@Self)^.&set := $00002000;
  23491. end;
  23492. function TICAP4_IC4CON.getICSIDL : TBits_1; inline;
  23493. begin
  23494. getICSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  23495. end;
  23496. procedure TICAP4_IC4CON.setw(thebits : TBits_32); inline;
  23497. begin
  23498. pTDefRegMap(@Self)^.val := thebits;
  23499. end;
  23500. function TICAP4_IC4CON.getw : TBits_32; inline;
  23501. begin
  23502. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  23503. end;
  23504. procedure TICAP5_IC5CON.setICM(thebits : TBits_3); inline;
  23505. begin
  23506. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  23507. end;
  23508. function TICAP5_IC5CON.getICM : TBits_3; inline;
  23509. begin
  23510. getICM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  23511. end;
  23512. procedure TICAP5_IC5CON.setICBNE; inline;
  23513. begin
  23514. pTDefRegMap(@Self)^.&set := $00000008;
  23515. end;
  23516. procedure TICAP5_IC5CON.clearICBNE; inline;
  23517. begin
  23518. pTDefRegMap(@Self)^.clr := $00000008;
  23519. end;
  23520. procedure TICAP5_IC5CON.setICBNE(thebits : TBits_1); inline;
  23521. begin
  23522. if thebits = 0 then
  23523. pTDefRegMap(@Self)^.clr := $00000008
  23524. else
  23525. pTDefRegMap(@Self)^.&set := $00000008;
  23526. end;
  23527. function TICAP5_IC5CON.getICBNE : TBits_1; inline;
  23528. begin
  23529. getICBNE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  23530. end;
  23531. procedure TICAP5_IC5CON.setICOV; inline;
  23532. begin
  23533. pTDefRegMap(@Self)^.&set := $00000010;
  23534. end;
  23535. procedure TICAP5_IC5CON.clearICOV; inline;
  23536. begin
  23537. pTDefRegMap(@Self)^.clr := $00000010;
  23538. end;
  23539. procedure TICAP5_IC5CON.setICOV(thebits : TBits_1); inline;
  23540. begin
  23541. if thebits = 0 then
  23542. pTDefRegMap(@Self)^.clr := $00000010
  23543. else
  23544. pTDefRegMap(@Self)^.&set := $00000010;
  23545. end;
  23546. function TICAP5_IC5CON.getICOV : TBits_1; inline;
  23547. begin
  23548. getICOV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  23549. end;
  23550. procedure TICAP5_IC5CON.setICI(thebits : TBits_2); inline;
  23551. begin
  23552. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  23553. end;
  23554. function TICAP5_IC5CON.getICI : TBits_2; inline;
  23555. begin
  23556. getICI := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  23557. end;
  23558. procedure TICAP5_IC5CON.setICTMR; inline;
  23559. begin
  23560. pTDefRegMap(@Self)^.&set := $00000080;
  23561. end;
  23562. procedure TICAP5_IC5CON.clearICTMR; inline;
  23563. begin
  23564. pTDefRegMap(@Self)^.clr := $00000080;
  23565. end;
  23566. procedure TICAP5_IC5CON.setICTMR(thebits : TBits_1); inline;
  23567. begin
  23568. if thebits = 0 then
  23569. pTDefRegMap(@Self)^.clr := $00000080
  23570. else
  23571. pTDefRegMap(@Self)^.&set := $00000080;
  23572. end;
  23573. function TICAP5_IC5CON.getICTMR : TBits_1; inline;
  23574. begin
  23575. getICTMR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  23576. end;
  23577. procedure TICAP5_IC5CON.setC32; inline;
  23578. begin
  23579. pTDefRegMap(@Self)^.&set := $00000100;
  23580. end;
  23581. procedure TICAP5_IC5CON.clearC32; inline;
  23582. begin
  23583. pTDefRegMap(@Self)^.clr := $00000100;
  23584. end;
  23585. procedure TICAP5_IC5CON.setC32(thebits : TBits_1); inline;
  23586. begin
  23587. if thebits = 0 then
  23588. pTDefRegMap(@Self)^.clr := $00000100
  23589. else
  23590. pTDefRegMap(@Self)^.&set := $00000100;
  23591. end;
  23592. function TICAP5_IC5CON.getC32 : TBits_1; inline;
  23593. begin
  23594. getC32 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  23595. end;
  23596. procedure TICAP5_IC5CON.setFEDGE; inline;
  23597. begin
  23598. pTDefRegMap(@Self)^.&set := $00000200;
  23599. end;
  23600. procedure TICAP5_IC5CON.clearFEDGE; inline;
  23601. begin
  23602. pTDefRegMap(@Self)^.clr := $00000200;
  23603. end;
  23604. procedure TICAP5_IC5CON.setFEDGE(thebits : TBits_1); inline;
  23605. begin
  23606. if thebits = 0 then
  23607. pTDefRegMap(@Self)^.clr := $00000200
  23608. else
  23609. pTDefRegMap(@Self)^.&set := $00000200;
  23610. end;
  23611. function TICAP5_IC5CON.getFEDGE : TBits_1; inline;
  23612. begin
  23613. getFEDGE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  23614. end;
  23615. procedure TICAP5_IC5CON.setSIDL; inline;
  23616. begin
  23617. pTDefRegMap(@Self)^.&set := $00002000;
  23618. end;
  23619. procedure TICAP5_IC5CON.clearSIDL; inline;
  23620. begin
  23621. pTDefRegMap(@Self)^.clr := $00002000;
  23622. end;
  23623. procedure TICAP5_IC5CON.setSIDL(thebits : TBits_1); inline;
  23624. begin
  23625. if thebits = 0 then
  23626. pTDefRegMap(@Self)^.clr := $00002000
  23627. else
  23628. pTDefRegMap(@Self)^.&set := $00002000;
  23629. end;
  23630. function TICAP5_IC5CON.getSIDL : TBits_1; inline;
  23631. begin
  23632. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  23633. end;
  23634. procedure TICAP5_IC5CON.setON; inline;
  23635. begin
  23636. pTDefRegMap(@Self)^.&set := $00008000;
  23637. end;
  23638. procedure TICAP5_IC5CON.clearON; inline;
  23639. begin
  23640. pTDefRegMap(@Self)^.clr := $00008000;
  23641. end;
  23642. procedure TICAP5_IC5CON.setON(thebits : TBits_1); inline;
  23643. begin
  23644. if thebits = 0 then
  23645. pTDefRegMap(@Self)^.clr := $00008000
  23646. else
  23647. pTDefRegMap(@Self)^.&set := $00008000;
  23648. end;
  23649. function TICAP5_IC5CON.getON : TBits_1; inline;
  23650. begin
  23651. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  23652. end;
  23653. procedure TICAP5_IC5CON.setICM0; inline;
  23654. begin
  23655. pTDefRegMap(@Self)^.&set := $00000001;
  23656. end;
  23657. procedure TICAP5_IC5CON.clearICM0; inline;
  23658. begin
  23659. pTDefRegMap(@Self)^.clr := $00000001;
  23660. end;
  23661. procedure TICAP5_IC5CON.setICM0(thebits : TBits_1); inline;
  23662. begin
  23663. if thebits = 0 then
  23664. pTDefRegMap(@Self)^.clr := $00000001
  23665. else
  23666. pTDefRegMap(@Self)^.&set := $00000001;
  23667. end;
  23668. function TICAP5_IC5CON.getICM0 : TBits_1; inline;
  23669. begin
  23670. getICM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  23671. end;
  23672. procedure TICAP5_IC5CON.setICM1; inline;
  23673. begin
  23674. pTDefRegMap(@Self)^.&set := $00000002;
  23675. end;
  23676. procedure TICAP5_IC5CON.clearICM1; inline;
  23677. begin
  23678. pTDefRegMap(@Self)^.clr := $00000002;
  23679. end;
  23680. procedure TICAP5_IC5CON.setICM1(thebits : TBits_1); inline;
  23681. begin
  23682. if thebits = 0 then
  23683. pTDefRegMap(@Self)^.clr := $00000002
  23684. else
  23685. pTDefRegMap(@Self)^.&set := $00000002;
  23686. end;
  23687. function TICAP5_IC5CON.getICM1 : TBits_1; inline;
  23688. begin
  23689. getICM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  23690. end;
  23691. procedure TICAP5_IC5CON.setICM2; inline;
  23692. begin
  23693. pTDefRegMap(@Self)^.&set := $00000004;
  23694. end;
  23695. procedure TICAP5_IC5CON.clearICM2; inline;
  23696. begin
  23697. pTDefRegMap(@Self)^.clr := $00000004;
  23698. end;
  23699. procedure TICAP5_IC5CON.setICM2(thebits : TBits_1); inline;
  23700. begin
  23701. if thebits = 0 then
  23702. pTDefRegMap(@Self)^.clr := $00000004
  23703. else
  23704. pTDefRegMap(@Self)^.&set := $00000004;
  23705. end;
  23706. function TICAP5_IC5CON.getICM2 : TBits_1; inline;
  23707. begin
  23708. getICM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  23709. end;
  23710. procedure TICAP5_IC5CON.setICI0; inline;
  23711. begin
  23712. pTDefRegMap(@Self)^.&set := $00000020;
  23713. end;
  23714. procedure TICAP5_IC5CON.clearICI0; inline;
  23715. begin
  23716. pTDefRegMap(@Self)^.clr := $00000020;
  23717. end;
  23718. procedure TICAP5_IC5CON.setICI0(thebits : TBits_1); inline;
  23719. begin
  23720. if thebits = 0 then
  23721. pTDefRegMap(@Self)^.clr := $00000020
  23722. else
  23723. pTDefRegMap(@Self)^.&set := $00000020;
  23724. end;
  23725. function TICAP5_IC5CON.getICI0 : TBits_1; inline;
  23726. begin
  23727. getICI0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  23728. end;
  23729. procedure TICAP5_IC5CON.setICI1; inline;
  23730. begin
  23731. pTDefRegMap(@Self)^.&set := $00000040;
  23732. end;
  23733. procedure TICAP5_IC5CON.clearICI1; inline;
  23734. begin
  23735. pTDefRegMap(@Self)^.clr := $00000040;
  23736. end;
  23737. procedure TICAP5_IC5CON.setICI1(thebits : TBits_1); inline;
  23738. begin
  23739. if thebits = 0 then
  23740. pTDefRegMap(@Self)^.clr := $00000040
  23741. else
  23742. pTDefRegMap(@Self)^.&set := $00000040;
  23743. end;
  23744. function TICAP5_IC5CON.getICI1 : TBits_1; inline;
  23745. begin
  23746. getICI1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  23747. end;
  23748. procedure TICAP5_IC5CON.setICSIDL; inline;
  23749. begin
  23750. pTDefRegMap(@Self)^.&set := $00002000;
  23751. end;
  23752. procedure TICAP5_IC5CON.clearICSIDL; inline;
  23753. begin
  23754. pTDefRegMap(@Self)^.clr := $00002000;
  23755. end;
  23756. procedure TICAP5_IC5CON.setICSIDL(thebits : TBits_1); inline;
  23757. begin
  23758. if thebits = 0 then
  23759. pTDefRegMap(@Self)^.clr := $00002000
  23760. else
  23761. pTDefRegMap(@Self)^.&set := $00002000;
  23762. end;
  23763. function TICAP5_IC5CON.getICSIDL : TBits_1; inline;
  23764. begin
  23765. getICSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  23766. end;
  23767. procedure TICAP5_IC5CON.setw(thebits : TBits_32); inline;
  23768. begin
  23769. pTDefRegMap(@Self)^.val := thebits;
  23770. end;
  23771. function TICAP5_IC5CON.getw : TBits_32; inline;
  23772. begin
  23773. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  23774. end;
  23775. procedure TOCMP1_OC1CON.setOCM(thebits : TBits_3); inline;
  23776. begin
  23777. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  23778. end;
  23779. function TOCMP1_OC1CON.getOCM : TBits_3; inline;
  23780. begin
  23781. getOCM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  23782. end;
  23783. procedure TOCMP1_OC1CON.setOCTSEL; inline;
  23784. begin
  23785. pTDefRegMap(@Self)^.&set := $00000008;
  23786. end;
  23787. procedure TOCMP1_OC1CON.clearOCTSEL; inline;
  23788. begin
  23789. pTDefRegMap(@Self)^.clr := $00000008;
  23790. end;
  23791. procedure TOCMP1_OC1CON.setOCTSEL(thebits : TBits_1); inline;
  23792. begin
  23793. if thebits = 0 then
  23794. pTDefRegMap(@Self)^.clr := $00000008
  23795. else
  23796. pTDefRegMap(@Self)^.&set := $00000008;
  23797. end;
  23798. function TOCMP1_OC1CON.getOCTSEL : TBits_1; inline;
  23799. begin
  23800. getOCTSEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  23801. end;
  23802. procedure TOCMP1_OC1CON.setOCFLT; inline;
  23803. begin
  23804. pTDefRegMap(@Self)^.&set := $00000010;
  23805. end;
  23806. procedure TOCMP1_OC1CON.clearOCFLT; inline;
  23807. begin
  23808. pTDefRegMap(@Self)^.clr := $00000010;
  23809. end;
  23810. procedure TOCMP1_OC1CON.setOCFLT(thebits : TBits_1); inline;
  23811. begin
  23812. if thebits = 0 then
  23813. pTDefRegMap(@Self)^.clr := $00000010
  23814. else
  23815. pTDefRegMap(@Self)^.&set := $00000010;
  23816. end;
  23817. function TOCMP1_OC1CON.getOCFLT : TBits_1; inline;
  23818. begin
  23819. getOCFLT := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  23820. end;
  23821. procedure TOCMP1_OC1CON.setOC32; inline;
  23822. begin
  23823. pTDefRegMap(@Self)^.&set := $00000020;
  23824. end;
  23825. procedure TOCMP1_OC1CON.clearOC32; inline;
  23826. begin
  23827. pTDefRegMap(@Self)^.clr := $00000020;
  23828. end;
  23829. procedure TOCMP1_OC1CON.setOC32(thebits : TBits_1); inline;
  23830. begin
  23831. if thebits = 0 then
  23832. pTDefRegMap(@Self)^.clr := $00000020
  23833. else
  23834. pTDefRegMap(@Self)^.&set := $00000020;
  23835. end;
  23836. function TOCMP1_OC1CON.getOC32 : TBits_1; inline;
  23837. begin
  23838. getOC32 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  23839. end;
  23840. procedure TOCMP1_OC1CON.setSIDL; inline;
  23841. begin
  23842. pTDefRegMap(@Self)^.&set := $00002000;
  23843. end;
  23844. procedure TOCMP1_OC1CON.clearSIDL; inline;
  23845. begin
  23846. pTDefRegMap(@Self)^.clr := $00002000;
  23847. end;
  23848. procedure TOCMP1_OC1CON.setSIDL(thebits : TBits_1); inline;
  23849. begin
  23850. if thebits = 0 then
  23851. pTDefRegMap(@Self)^.clr := $00002000
  23852. else
  23853. pTDefRegMap(@Self)^.&set := $00002000;
  23854. end;
  23855. function TOCMP1_OC1CON.getSIDL : TBits_1; inline;
  23856. begin
  23857. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  23858. end;
  23859. procedure TOCMP1_OC1CON.setON; inline;
  23860. begin
  23861. pTDefRegMap(@Self)^.&set := $00008000;
  23862. end;
  23863. procedure TOCMP1_OC1CON.clearON; inline;
  23864. begin
  23865. pTDefRegMap(@Self)^.clr := $00008000;
  23866. end;
  23867. procedure TOCMP1_OC1CON.setON(thebits : TBits_1); inline;
  23868. begin
  23869. if thebits = 0 then
  23870. pTDefRegMap(@Self)^.clr := $00008000
  23871. else
  23872. pTDefRegMap(@Self)^.&set := $00008000;
  23873. end;
  23874. function TOCMP1_OC1CON.getON : TBits_1; inline;
  23875. begin
  23876. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  23877. end;
  23878. procedure TOCMP1_OC1CON.setOCM0; inline;
  23879. begin
  23880. pTDefRegMap(@Self)^.&set := $00000001;
  23881. end;
  23882. procedure TOCMP1_OC1CON.clearOCM0; inline;
  23883. begin
  23884. pTDefRegMap(@Self)^.clr := $00000001;
  23885. end;
  23886. procedure TOCMP1_OC1CON.setOCM0(thebits : TBits_1); inline;
  23887. begin
  23888. if thebits = 0 then
  23889. pTDefRegMap(@Self)^.clr := $00000001
  23890. else
  23891. pTDefRegMap(@Self)^.&set := $00000001;
  23892. end;
  23893. function TOCMP1_OC1CON.getOCM0 : TBits_1; inline;
  23894. begin
  23895. getOCM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  23896. end;
  23897. procedure TOCMP1_OC1CON.setOCM1; inline;
  23898. begin
  23899. pTDefRegMap(@Self)^.&set := $00000002;
  23900. end;
  23901. procedure TOCMP1_OC1CON.clearOCM1; inline;
  23902. begin
  23903. pTDefRegMap(@Self)^.clr := $00000002;
  23904. end;
  23905. procedure TOCMP1_OC1CON.setOCM1(thebits : TBits_1); inline;
  23906. begin
  23907. if thebits = 0 then
  23908. pTDefRegMap(@Self)^.clr := $00000002
  23909. else
  23910. pTDefRegMap(@Self)^.&set := $00000002;
  23911. end;
  23912. function TOCMP1_OC1CON.getOCM1 : TBits_1; inline;
  23913. begin
  23914. getOCM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  23915. end;
  23916. procedure TOCMP1_OC1CON.setOCM2; inline;
  23917. begin
  23918. pTDefRegMap(@Self)^.&set := $00000004;
  23919. end;
  23920. procedure TOCMP1_OC1CON.clearOCM2; inline;
  23921. begin
  23922. pTDefRegMap(@Self)^.clr := $00000004;
  23923. end;
  23924. procedure TOCMP1_OC1CON.setOCM2(thebits : TBits_1); inline;
  23925. begin
  23926. if thebits = 0 then
  23927. pTDefRegMap(@Self)^.clr := $00000004
  23928. else
  23929. pTDefRegMap(@Self)^.&set := $00000004;
  23930. end;
  23931. function TOCMP1_OC1CON.getOCM2 : TBits_1; inline;
  23932. begin
  23933. getOCM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  23934. end;
  23935. procedure TOCMP1_OC1CON.setOCSIDL; inline;
  23936. begin
  23937. pTDefRegMap(@Self)^.&set := $00002000;
  23938. end;
  23939. procedure TOCMP1_OC1CON.clearOCSIDL; inline;
  23940. begin
  23941. pTDefRegMap(@Self)^.clr := $00002000;
  23942. end;
  23943. procedure TOCMP1_OC1CON.setOCSIDL(thebits : TBits_1); inline;
  23944. begin
  23945. if thebits = 0 then
  23946. pTDefRegMap(@Self)^.clr := $00002000
  23947. else
  23948. pTDefRegMap(@Self)^.&set := $00002000;
  23949. end;
  23950. function TOCMP1_OC1CON.getOCSIDL : TBits_1; inline;
  23951. begin
  23952. getOCSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  23953. end;
  23954. procedure TOCMP1_OC1CON.setw(thebits : TBits_32); inline;
  23955. begin
  23956. pTDefRegMap(@Self)^.val := thebits;
  23957. end;
  23958. function TOCMP1_OC1CON.getw : TBits_32; inline;
  23959. begin
  23960. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  23961. end;
  23962. procedure TOCMP2_OC2CON.setOCM(thebits : TBits_3); inline;
  23963. begin
  23964. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  23965. end;
  23966. function TOCMP2_OC2CON.getOCM : TBits_3; inline;
  23967. begin
  23968. getOCM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  23969. end;
  23970. procedure TOCMP2_OC2CON.setOCTSEL; inline;
  23971. begin
  23972. pTDefRegMap(@Self)^.&set := $00000008;
  23973. end;
  23974. procedure TOCMP2_OC2CON.clearOCTSEL; inline;
  23975. begin
  23976. pTDefRegMap(@Self)^.clr := $00000008;
  23977. end;
  23978. procedure TOCMP2_OC2CON.setOCTSEL(thebits : TBits_1); inline;
  23979. begin
  23980. if thebits = 0 then
  23981. pTDefRegMap(@Self)^.clr := $00000008
  23982. else
  23983. pTDefRegMap(@Self)^.&set := $00000008;
  23984. end;
  23985. function TOCMP2_OC2CON.getOCTSEL : TBits_1; inline;
  23986. begin
  23987. getOCTSEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  23988. end;
  23989. procedure TOCMP2_OC2CON.setOCFLT; inline;
  23990. begin
  23991. pTDefRegMap(@Self)^.&set := $00000010;
  23992. end;
  23993. procedure TOCMP2_OC2CON.clearOCFLT; inline;
  23994. begin
  23995. pTDefRegMap(@Self)^.clr := $00000010;
  23996. end;
  23997. procedure TOCMP2_OC2CON.setOCFLT(thebits : TBits_1); inline;
  23998. begin
  23999. if thebits = 0 then
  24000. pTDefRegMap(@Self)^.clr := $00000010
  24001. else
  24002. pTDefRegMap(@Self)^.&set := $00000010;
  24003. end;
  24004. function TOCMP2_OC2CON.getOCFLT : TBits_1; inline;
  24005. begin
  24006. getOCFLT := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  24007. end;
  24008. procedure TOCMP2_OC2CON.setOC32; inline;
  24009. begin
  24010. pTDefRegMap(@Self)^.&set := $00000020;
  24011. end;
  24012. procedure TOCMP2_OC2CON.clearOC32; inline;
  24013. begin
  24014. pTDefRegMap(@Self)^.clr := $00000020;
  24015. end;
  24016. procedure TOCMP2_OC2CON.setOC32(thebits : TBits_1); inline;
  24017. begin
  24018. if thebits = 0 then
  24019. pTDefRegMap(@Self)^.clr := $00000020
  24020. else
  24021. pTDefRegMap(@Self)^.&set := $00000020;
  24022. end;
  24023. function TOCMP2_OC2CON.getOC32 : TBits_1; inline;
  24024. begin
  24025. getOC32 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  24026. end;
  24027. procedure TOCMP2_OC2CON.setSIDL; inline;
  24028. begin
  24029. pTDefRegMap(@Self)^.&set := $00002000;
  24030. end;
  24031. procedure TOCMP2_OC2CON.clearSIDL; inline;
  24032. begin
  24033. pTDefRegMap(@Self)^.clr := $00002000;
  24034. end;
  24035. procedure TOCMP2_OC2CON.setSIDL(thebits : TBits_1); inline;
  24036. begin
  24037. if thebits = 0 then
  24038. pTDefRegMap(@Self)^.clr := $00002000
  24039. else
  24040. pTDefRegMap(@Self)^.&set := $00002000;
  24041. end;
  24042. function TOCMP2_OC2CON.getSIDL : TBits_1; inline;
  24043. begin
  24044. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  24045. end;
  24046. procedure TOCMP2_OC2CON.setON; inline;
  24047. begin
  24048. pTDefRegMap(@Self)^.&set := $00008000;
  24049. end;
  24050. procedure TOCMP2_OC2CON.clearON; inline;
  24051. begin
  24052. pTDefRegMap(@Self)^.clr := $00008000;
  24053. end;
  24054. procedure TOCMP2_OC2CON.setON(thebits : TBits_1); inline;
  24055. begin
  24056. if thebits = 0 then
  24057. pTDefRegMap(@Self)^.clr := $00008000
  24058. else
  24059. pTDefRegMap(@Self)^.&set := $00008000;
  24060. end;
  24061. function TOCMP2_OC2CON.getON : TBits_1; inline;
  24062. begin
  24063. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  24064. end;
  24065. procedure TOCMP2_OC2CON.setOCM0; inline;
  24066. begin
  24067. pTDefRegMap(@Self)^.&set := $00000001;
  24068. end;
  24069. procedure TOCMP2_OC2CON.clearOCM0; inline;
  24070. begin
  24071. pTDefRegMap(@Self)^.clr := $00000001;
  24072. end;
  24073. procedure TOCMP2_OC2CON.setOCM0(thebits : TBits_1); inline;
  24074. begin
  24075. if thebits = 0 then
  24076. pTDefRegMap(@Self)^.clr := $00000001
  24077. else
  24078. pTDefRegMap(@Self)^.&set := $00000001;
  24079. end;
  24080. function TOCMP2_OC2CON.getOCM0 : TBits_1; inline;
  24081. begin
  24082. getOCM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  24083. end;
  24084. procedure TOCMP2_OC2CON.setOCM1; inline;
  24085. begin
  24086. pTDefRegMap(@Self)^.&set := $00000002;
  24087. end;
  24088. procedure TOCMP2_OC2CON.clearOCM1; inline;
  24089. begin
  24090. pTDefRegMap(@Self)^.clr := $00000002;
  24091. end;
  24092. procedure TOCMP2_OC2CON.setOCM1(thebits : TBits_1); inline;
  24093. begin
  24094. if thebits = 0 then
  24095. pTDefRegMap(@Self)^.clr := $00000002
  24096. else
  24097. pTDefRegMap(@Self)^.&set := $00000002;
  24098. end;
  24099. function TOCMP2_OC2CON.getOCM1 : TBits_1; inline;
  24100. begin
  24101. getOCM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  24102. end;
  24103. procedure TOCMP2_OC2CON.setOCM2; inline;
  24104. begin
  24105. pTDefRegMap(@Self)^.&set := $00000004;
  24106. end;
  24107. procedure TOCMP2_OC2CON.clearOCM2; inline;
  24108. begin
  24109. pTDefRegMap(@Self)^.clr := $00000004;
  24110. end;
  24111. procedure TOCMP2_OC2CON.setOCM2(thebits : TBits_1); inline;
  24112. begin
  24113. if thebits = 0 then
  24114. pTDefRegMap(@Self)^.clr := $00000004
  24115. else
  24116. pTDefRegMap(@Self)^.&set := $00000004;
  24117. end;
  24118. function TOCMP2_OC2CON.getOCM2 : TBits_1; inline;
  24119. begin
  24120. getOCM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  24121. end;
  24122. procedure TOCMP2_OC2CON.setOCSIDL; inline;
  24123. begin
  24124. pTDefRegMap(@Self)^.&set := $00002000;
  24125. end;
  24126. procedure TOCMP2_OC2CON.clearOCSIDL; inline;
  24127. begin
  24128. pTDefRegMap(@Self)^.clr := $00002000;
  24129. end;
  24130. procedure TOCMP2_OC2CON.setOCSIDL(thebits : TBits_1); inline;
  24131. begin
  24132. if thebits = 0 then
  24133. pTDefRegMap(@Self)^.clr := $00002000
  24134. else
  24135. pTDefRegMap(@Self)^.&set := $00002000;
  24136. end;
  24137. function TOCMP2_OC2CON.getOCSIDL : TBits_1; inline;
  24138. begin
  24139. getOCSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  24140. end;
  24141. procedure TOCMP2_OC2CON.setw(thebits : TBits_32); inline;
  24142. begin
  24143. pTDefRegMap(@Self)^.val := thebits;
  24144. end;
  24145. function TOCMP2_OC2CON.getw : TBits_32; inline;
  24146. begin
  24147. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  24148. end;
  24149. procedure TOCMP3_OC3CON.setOCM(thebits : TBits_3); inline;
  24150. begin
  24151. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  24152. end;
  24153. function TOCMP3_OC3CON.getOCM : TBits_3; inline;
  24154. begin
  24155. getOCM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  24156. end;
  24157. procedure TOCMP3_OC3CON.setOCTSEL; inline;
  24158. begin
  24159. pTDefRegMap(@Self)^.&set := $00000008;
  24160. end;
  24161. procedure TOCMP3_OC3CON.clearOCTSEL; inline;
  24162. begin
  24163. pTDefRegMap(@Self)^.clr := $00000008;
  24164. end;
  24165. procedure TOCMP3_OC3CON.setOCTSEL(thebits : TBits_1); inline;
  24166. begin
  24167. if thebits = 0 then
  24168. pTDefRegMap(@Self)^.clr := $00000008
  24169. else
  24170. pTDefRegMap(@Self)^.&set := $00000008;
  24171. end;
  24172. function TOCMP3_OC3CON.getOCTSEL : TBits_1; inline;
  24173. begin
  24174. getOCTSEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  24175. end;
  24176. procedure TOCMP3_OC3CON.setOCFLT; inline;
  24177. begin
  24178. pTDefRegMap(@Self)^.&set := $00000010;
  24179. end;
  24180. procedure TOCMP3_OC3CON.clearOCFLT; inline;
  24181. begin
  24182. pTDefRegMap(@Self)^.clr := $00000010;
  24183. end;
  24184. procedure TOCMP3_OC3CON.setOCFLT(thebits : TBits_1); inline;
  24185. begin
  24186. if thebits = 0 then
  24187. pTDefRegMap(@Self)^.clr := $00000010
  24188. else
  24189. pTDefRegMap(@Self)^.&set := $00000010;
  24190. end;
  24191. function TOCMP3_OC3CON.getOCFLT : TBits_1; inline;
  24192. begin
  24193. getOCFLT := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  24194. end;
  24195. procedure TOCMP3_OC3CON.setOC32; inline;
  24196. begin
  24197. pTDefRegMap(@Self)^.&set := $00000020;
  24198. end;
  24199. procedure TOCMP3_OC3CON.clearOC32; inline;
  24200. begin
  24201. pTDefRegMap(@Self)^.clr := $00000020;
  24202. end;
  24203. procedure TOCMP3_OC3CON.setOC32(thebits : TBits_1); inline;
  24204. begin
  24205. if thebits = 0 then
  24206. pTDefRegMap(@Self)^.clr := $00000020
  24207. else
  24208. pTDefRegMap(@Self)^.&set := $00000020;
  24209. end;
  24210. function TOCMP3_OC3CON.getOC32 : TBits_1; inline;
  24211. begin
  24212. getOC32 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  24213. end;
  24214. procedure TOCMP3_OC3CON.setSIDL; inline;
  24215. begin
  24216. pTDefRegMap(@Self)^.&set := $00002000;
  24217. end;
  24218. procedure TOCMP3_OC3CON.clearSIDL; inline;
  24219. begin
  24220. pTDefRegMap(@Self)^.clr := $00002000;
  24221. end;
  24222. procedure TOCMP3_OC3CON.setSIDL(thebits : TBits_1); inline;
  24223. begin
  24224. if thebits = 0 then
  24225. pTDefRegMap(@Self)^.clr := $00002000
  24226. else
  24227. pTDefRegMap(@Self)^.&set := $00002000;
  24228. end;
  24229. function TOCMP3_OC3CON.getSIDL : TBits_1; inline;
  24230. begin
  24231. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  24232. end;
  24233. procedure TOCMP3_OC3CON.setON; inline;
  24234. begin
  24235. pTDefRegMap(@Self)^.&set := $00008000;
  24236. end;
  24237. procedure TOCMP3_OC3CON.clearON; inline;
  24238. begin
  24239. pTDefRegMap(@Self)^.clr := $00008000;
  24240. end;
  24241. procedure TOCMP3_OC3CON.setON(thebits : TBits_1); inline;
  24242. begin
  24243. if thebits = 0 then
  24244. pTDefRegMap(@Self)^.clr := $00008000
  24245. else
  24246. pTDefRegMap(@Self)^.&set := $00008000;
  24247. end;
  24248. function TOCMP3_OC3CON.getON : TBits_1; inline;
  24249. begin
  24250. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  24251. end;
  24252. procedure TOCMP3_OC3CON.setOCM0; inline;
  24253. begin
  24254. pTDefRegMap(@Self)^.&set := $00000001;
  24255. end;
  24256. procedure TOCMP3_OC3CON.clearOCM0; inline;
  24257. begin
  24258. pTDefRegMap(@Self)^.clr := $00000001;
  24259. end;
  24260. procedure TOCMP3_OC3CON.setOCM0(thebits : TBits_1); inline;
  24261. begin
  24262. if thebits = 0 then
  24263. pTDefRegMap(@Self)^.clr := $00000001
  24264. else
  24265. pTDefRegMap(@Self)^.&set := $00000001;
  24266. end;
  24267. function TOCMP3_OC3CON.getOCM0 : TBits_1; inline;
  24268. begin
  24269. getOCM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  24270. end;
  24271. procedure TOCMP3_OC3CON.setOCM1; inline;
  24272. begin
  24273. pTDefRegMap(@Self)^.&set := $00000002;
  24274. end;
  24275. procedure TOCMP3_OC3CON.clearOCM1; inline;
  24276. begin
  24277. pTDefRegMap(@Self)^.clr := $00000002;
  24278. end;
  24279. procedure TOCMP3_OC3CON.setOCM1(thebits : TBits_1); inline;
  24280. begin
  24281. if thebits = 0 then
  24282. pTDefRegMap(@Self)^.clr := $00000002
  24283. else
  24284. pTDefRegMap(@Self)^.&set := $00000002;
  24285. end;
  24286. function TOCMP3_OC3CON.getOCM1 : TBits_1; inline;
  24287. begin
  24288. getOCM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  24289. end;
  24290. procedure TOCMP3_OC3CON.setOCM2; inline;
  24291. begin
  24292. pTDefRegMap(@Self)^.&set := $00000004;
  24293. end;
  24294. procedure TOCMP3_OC3CON.clearOCM2; inline;
  24295. begin
  24296. pTDefRegMap(@Self)^.clr := $00000004;
  24297. end;
  24298. procedure TOCMP3_OC3CON.setOCM2(thebits : TBits_1); inline;
  24299. begin
  24300. if thebits = 0 then
  24301. pTDefRegMap(@Self)^.clr := $00000004
  24302. else
  24303. pTDefRegMap(@Self)^.&set := $00000004;
  24304. end;
  24305. function TOCMP3_OC3CON.getOCM2 : TBits_1; inline;
  24306. begin
  24307. getOCM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  24308. end;
  24309. procedure TOCMP3_OC3CON.setOCSIDL; inline;
  24310. begin
  24311. pTDefRegMap(@Self)^.&set := $00002000;
  24312. end;
  24313. procedure TOCMP3_OC3CON.clearOCSIDL; inline;
  24314. begin
  24315. pTDefRegMap(@Self)^.clr := $00002000;
  24316. end;
  24317. procedure TOCMP3_OC3CON.setOCSIDL(thebits : TBits_1); inline;
  24318. begin
  24319. if thebits = 0 then
  24320. pTDefRegMap(@Self)^.clr := $00002000
  24321. else
  24322. pTDefRegMap(@Self)^.&set := $00002000;
  24323. end;
  24324. function TOCMP3_OC3CON.getOCSIDL : TBits_1; inline;
  24325. begin
  24326. getOCSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  24327. end;
  24328. procedure TOCMP3_OC3CON.setw(thebits : TBits_32); inline;
  24329. begin
  24330. pTDefRegMap(@Self)^.val := thebits;
  24331. end;
  24332. function TOCMP3_OC3CON.getw : TBits_32; inline;
  24333. begin
  24334. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  24335. end;
  24336. procedure TOCMP4_OC4CON.setOCM(thebits : TBits_3); inline;
  24337. begin
  24338. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  24339. end;
  24340. function TOCMP4_OC4CON.getOCM : TBits_3; inline;
  24341. begin
  24342. getOCM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  24343. end;
  24344. procedure TOCMP4_OC4CON.setOCTSEL; inline;
  24345. begin
  24346. pTDefRegMap(@Self)^.&set := $00000008;
  24347. end;
  24348. procedure TOCMP4_OC4CON.clearOCTSEL; inline;
  24349. begin
  24350. pTDefRegMap(@Self)^.clr := $00000008;
  24351. end;
  24352. procedure TOCMP4_OC4CON.setOCTSEL(thebits : TBits_1); inline;
  24353. begin
  24354. if thebits = 0 then
  24355. pTDefRegMap(@Self)^.clr := $00000008
  24356. else
  24357. pTDefRegMap(@Self)^.&set := $00000008;
  24358. end;
  24359. function TOCMP4_OC4CON.getOCTSEL : TBits_1; inline;
  24360. begin
  24361. getOCTSEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  24362. end;
  24363. procedure TOCMP4_OC4CON.setOCFLT; inline;
  24364. begin
  24365. pTDefRegMap(@Self)^.&set := $00000010;
  24366. end;
  24367. procedure TOCMP4_OC4CON.clearOCFLT; inline;
  24368. begin
  24369. pTDefRegMap(@Self)^.clr := $00000010;
  24370. end;
  24371. procedure TOCMP4_OC4CON.setOCFLT(thebits : TBits_1); inline;
  24372. begin
  24373. if thebits = 0 then
  24374. pTDefRegMap(@Self)^.clr := $00000010
  24375. else
  24376. pTDefRegMap(@Self)^.&set := $00000010;
  24377. end;
  24378. function TOCMP4_OC4CON.getOCFLT : TBits_1; inline;
  24379. begin
  24380. getOCFLT := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  24381. end;
  24382. procedure TOCMP4_OC4CON.setOC32; inline;
  24383. begin
  24384. pTDefRegMap(@Self)^.&set := $00000020;
  24385. end;
  24386. procedure TOCMP4_OC4CON.clearOC32; inline;
  24387. begin
  24388. pTDefRegMap(@Self)^.clr := $00000020;
  24389. end;
  24390. procedure TOCMP4_OC4CON.setOC32(thebits : TBits_1); inline;
  24391. begin
  24392. if thebits = 0 then
  24393. pTDefRegMap(@Self)^.clr := $00000020
  24394. else
  24395. pTDefRegMap(@Self)^.&set := $00000020;
  24396. end;
  24397. function TOCMP4_OC4CON.getOC32 : TBits_1; inline;
  24398. begin
  24399. getOC32 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  24400. end;
  24401. procedure TOCMP4_OC4CON.setSIDL; inline;
  24402. begin
  24403. pTDefRegMap(@Self)^.&set := $00002000;
  24404. end;
  24405. procedure TOCMP4_OC4CON.clearSIDL; inline;
  24406. begin
  24407. pTDefRegMap(@Self)^.clr := $00002000;
  24408. end;
  24409. procedure TOCMP4_OC4CON.setSIDL(thebits : TBits_1); inline;
  24410. begin
  24411. if thebits = 0 then
  24412. pTDefRegMap(@Self)^.clr := $00002000
  24413. else
  24414. pTDefRegMap(@Self)^.&set := $00002000;
  24415. end;
  24416. function TOCMP4_OC4CON.getSIDL : TBits_1; inline;
  24417. begin
  24418. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  24419. end;
  24420. procedure TOCMP4_OC4CON.setON; inline;
  24421. begin
  24422. pTDefRegMap(@Self)^.&set := $00008000;
  24423. end;
  24424. procedure TOCMP4_OC4CON.clearON; inline;
  24425. begin
  24426. pTDefRegMap(@Self)^.clr := $00008000;
  24427. end;
  24428. procedure TOCMP4_OC4CON.setON(thebits : TBits_1); inline;
  24429. begin
  24430. if thebits = 0 then
  24431. pTDefRegMap(@Self)^.clr := $00008000
  24432. else
  24433. pTDefRegMap(@Self)^.&set := $00008000;
  24434. end;
  24435. function TOCMP4_OC4CON.getON : TBits_1; inline;
  24436. begin
  24437. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  24438. end;
  24439. procedure TOCMP4_OC4CON.setOCM0; inline;
  24440. begin
  24441. pTDefRegMap(@Self)^.&set := $00000001;
  24442. end;
  24443. procedure TOCMP4_OC4CON.clearOCM0; inline;
  24444. begin
  24445. pTDefRegMap(@Self)^.clr := $00000001;
  24446. end;
  24447. procedure TOCMP4_OC4CON.setOCM0(thebits : TBits_1); inline;
  24448. begin
  24449. if thebits = 0 then
  24450. pTDefRegMap(@Self)^.clr := $00000001
  24451. else
  24452. pTDefRegMap(@Self)^.&set := $00000001;
  24453. end;
  24454. function TOCMP4_OC4CON.getOCM0 : TBits_1; inline;
  24455. begin
  24456. getOCM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  24457. end;
  24458. procedure TOCMP4_OC4CON.setOCM1; inline;
  24459. begin
  24460. pTDefRegMap(@Self)^.&set := $00000002;
  24461. end;
  24462. procedure TOCMP4_OC4CON.clearOCM1; inline;
  24463. begin
  24464. pTDefRegMap(@Self)^.clr := $00000002;
  24465. end;
  24466. procedure TOCMP4_OC4CON.setOCM1(thebits : TBits_1); inline;
  24467. begin
  24468. if thebits = 0 then
  24469. pTDefRegMap(@Self)^.clr := $00000002
  24470. else
  24471. pTDefRegMap(@Self)^.&set := $00000002;
  24472. end;
  24473. function TOCMP4_OC4CON.getOCM1 : TBits_1; inline;
  24474. begin
  24475. getOCM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  24476. end;
  24477. procedure TOCMP4_OC4CON.setOCM2; inline;
  24478. begin
  24479. pTDefRegMap(@Self)^.&set := $00000004;
  24480. end;
  24481. procedure TOCMP4_OC4CON.clearOCM2; inline;
  24482. begin
  24483. pTDefRegMap(@Self)^.clr := $00000004;
  24484. end;
  24485. procedure TOCMP4_OC4CON.setOCM2(thebits : TBits_1); inline;
  24486. begin
  24487. if thebits = 0 then
  24488. pTDefRegMap(@Self)^.clr := $00000004
  24489. else
  24490. pTDefRegMap(@Self)^.&set := $00000004;
  24491. end;
  24492. function TOCMP4_OC4CON.getOCM2 : TBits_1; inline;
  24493. begin
  24494. getOCM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  24495. end;
  24496. procedure TOCMP4_OC4CON.setOCSIDL; inline;
  24497. begin
  24498. pTDefRegMap(@Self)^.&set := $00002000;
  24499. end;
  24500. procedure TOCMP4_OC4CON.clearOCSIDL; inline;
  24501. begin
  24502. pTDefRegMap(@Self)^.clr := $00002000;
  24503. end;
  24504. procedure TOCMP4_OC4CON.setOCSIDL(thebits : TBits_1); inline;
  24505. begin
  24506. if thebits = 0 then
  24507. pTDefRegMap(@Self)^.clr := $00002000
  24508. else
  24509. pTDefRegMap(@Self)^.&set := $00002000;
  24510. end;
  24511. function TOCMP4_OC4CON.getOCSIDL : TBits_1; inline;
  24512. begin
  24513. getOCSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  24514. end;
  24515. procedure TOCMP4_OC4CON.setw(thebits : TBits_32); inline;
  24516. begin
  24517. pTDefRegMap(@Self)^.val := thebits;
  24518. end;
  24519. function TOCMP4_OC4CON.getw : TBits_32; inline;
  24520. begin
  24521. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  24522. end;
  24523. procedure TOCMP5_OC5CON.setOCM(thebits : TBits_3); inline;
  24524. begin
  24525. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  24526. end;
  24527. function TOCMP5_OC5CON.getOCM : TBits_3; inline;
  24528. begin
  24529. getOCM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  24530. end;
  24531. procedure TOCMP5_OC5CON.setOCTSEL; inline;
  24532. begin
  24533. pTDefRegMap(@Self)^.&set := $00000008;
  24534. end;
  24535. procedure TOCMP5_OC5CON.clearOCTSEL; inline;
  24536. begin
  24537. pTDefRegMap(@Self)^.clr := $00000008;
  24538. end;
  24539. procedure TOCMP5_OC5CON.setOCTSEL(thebits : TBits_1); inline;
  24540. begin
  24541. if thebits = 0 then
  24542. pTDefRegMap(@Self)^.clr := $00000008
  24543. else
  24544. pTDefRegMap(@Self)^.&set := $00000008;
  24545. end;
  24546. function TOCMP5_OC5CON.getOCTSEL : TBits_1; inline;
  24547. begin
  24548. getOCTSEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  24549. end;
  24550. procedure TOCMP5_OC5CON.setOCFLT; inline;
  24551. begin
  24552. pTDefRegMap(@Self)^.&set := $00000010;
  24553. end;
  24554. procedure TOCMP5_OC5CON.clearOCFLT; inline;
  24555. begin
  24556. pTDefRegMap(@Self)^.clr := $00000010;
  24557. end;
  24558. procedure TOCMP5_OC5CON.setOCFLT(thebits : TBits_1); inline;
  24559. begin
  24560. if thebits = 0 then
  24561. pTDefRegMap(@Self)^.clr := $00000010
  24562. else
  24563. pTDefRegMap(@Self)^.&set := $00000010;
  24564. end;
  24565. function TOCMP5_OC5CON.getOCFLT : TBits_1; inline;
  24566. begin
  24567. getOCFLT := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  24568. end;
  24569. procedure TOCMP5_OC5CON.setOC32; inline;
  24570. begin
  24571. pTDefRegMap(@Self)^.&set := $00000020;
  24572. end;
  24573. procedure TOCMP5_OC5CON.clearOC32; inline;
  24574. begin
  24575. pTDefRegMap(@Self)^.clr := $00000020;
  24576. end;
  24577. procedure TOCMP5_OC5CON.setOC32(thebits : TBits_1); inline;
  24578. begin
  24579. if thebits = 0 then
  24580. pTDefRegMap(@Self)^.clr := $00000020
  24581. else
  24582. pTDefRegMap(@Self)^.&set := $00000020;
  24583. end;
  24584. function TOCMP5_OC5CON.getOC32 : TBits_1; inline;
  24585. begin
  24586. getOC32 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  24587. end;
  24588. procedure TOCMP5_OC5CON.setSIDL; inline;
  24589. begin
  24590. pTDefRegMap(@Self)^.&set := $00002000;
  24591. end;
  24592. procedure TOCMP5_OC5CON.clearSIDL; inline;
  24593. begin
  24594. pTDefRegMap(@Self)^.clr := $00002000;
  24595. end;
  24596. procedure TOCMP5_OC5CON.setSIDL(thebits : TBits_1); inline;
  24597. begin
  24598. if thebits = 0 then
  24599. pTDefRegMap(@Self)^.clr := $00002000
  24600. else
  24601. pTDefRegMap(@Self)^.&set := $00002000;
  24602. end;
  24603. function TOCMP5_OC5CON.getSIDL : TBits_1; inline;
  24604. begin
  24605. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  24606. end;
  24607. procedure TOCMP5_OC5CON.setON; inline;
  24608. begin
  24609. pTDefRegMap(@Self)^.&set := $00008000;
  24610. end;
  24611. procedure TOCMP5_OC5CON.clearON; inline;
  24612. begin
  24613. pTDefRegMap(@Self)^.clr := $00008000;
  24614. end;
  24615. procedure TOCMP5_OC5CON.setON(thebits : TBits_1); inline;
  24616. begin
  24617. if thebits = 0 then
  24618. pTDefRegMap(@Self)^.clr := $00008000
  24619. else
  24620. pTDefRegMap(@Self)^.&set := $00008000;
  24621. end;
  24622. function TOCMP5_OC5CON.getON : TBits_1; inline;
  24623. begin
  24624. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  24625. end;
  24626. procedure TOCMP5_OC5CON.setOCM0; inline;
  24627. begin
  24628. pTDefRegMap(@Self)^.&set := $00000001;
  24629. end;
  24630. procedure TOCMP5_OC5CON.clearOCM0; inline;
  24631. begin
  24632. pTDefRegMap(@Self)^.clr := $00000001;
  24633. end;
  24634. procedure TOCMP5_OC5CON.setOCM0(thebits : TBits_1); inline;
  24635. begin
  24636. if thebits = 0 then
  24637. pTDefRegMap(@Self)^.clr := $00000001
  24638. else
  24639. pTDefRegMap(@Self)^.&set := $00000001;
  24640. end;
  24641. function TOCMP5_OC5CON.getOCM0 : TBits_1; inline;
  24642. begin
  24643. getOCM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  24644. end;
  24645. procedure TOCMP5_OC5CON.setOCM1; inline;
  24646. begin
  24647. pTDefRegMap(@Self)^.&set := $00000002;
  24648. end;
  24649. procedure TOCMP5_OC5CON.clearOCM1; inline;
  24650. begin
  24651. pTDefRegMap(@Self)^.clr := $00000002;
  24652. end;
  24653. procedure TOCMP5_OC5CON.setOCM1(thebits : TBits_1); inline;
  24654. begin
  24655. if thebits = 0 then
  24656. pTDefRegMap(@Self)^.clr := $00000002
  24657. else
  24658. pTDefRegMap(@Self)^.&set := $00000002;
  24659. end;
  24660. function TOCMP5_OC5CON.getOCM1 : TBits_1; inline;
  24661. begin
  24662. getOCM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  24663. end;
  24664. procedure TOCMP5_OC5CON.setOCM2; inline;
  24665. begin
  24666. pTDefRegMap(@Self)^.&set := $00000004;
  24667. end;
  24668. procedure TOCMP5_OC5CON.clearOCM2; inline;
  24669. begin
  24670. pTDefRegMap(@Self)^.clr := $00000004;
  24671. end;
  24672. procedure TOCMP5_OC5CON.setOCM2(thebits : TBits_1); inline;
  24673. begin
  24674. if thebits = 0 then
  24675. pTDefRegMap(@Self)^.clr := $00000004
  24676. else
  24677. pTDefRegMap(@Self)^.&set := $00000004;
  24678. end;
  24679. function TOCMP5_OC5CON.getOCM2 : TBits_1; inline;
  24680. begin
  24681. getOCM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  24682. end;
  24683. procedure TOCMP5_OC5CON.setOCSIDL; inline;
  24684. begin
  24685. pTDefRegMap(@Self)^.&set := $00002000;
  24686. end;
  24687. procedure TOCMP5_OC5CON.clearOCSIDL; inline;
  24688. begin
  24689. pTDefRegMap(@Self)^.clr := $00002000;
  24690. end;
  24691. procedure TOCMP5_OC5CON.setOCSIDL(thebits : TBits_1); inline;
  24692. begin
  24693. if thebits = 0 then
  24694. pTDefRegMap(@Self)^.clr := $00002000
  24695. else
  24696. pTDefRegMap(@Self)^.&set := $00002000;
  24697. end;
  24698. function TOCMP5_OC5CON.getOCSIDL : TBits_1; inline;
  24699. begin
  24700. getOCSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  24701. end;
  24702. procedure TOCMP5_OC5CON.setw(thebits : TBits_32); inline;
  24703. begin
  24704. pTDefRegMap(@Self)^.val := thebits;
  24705. end;
  24706. function TOCMP5_OC5CON.getw : TBits_32; inline;
  24707. begin
  24708. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  24709. end;
  24710. procedure TI2C1A_I2C1ACON.setSEN; inline;
  24711. begin
  24712. pTDefRegMap(@Self)^.&set := $00000001;
  24713. end;
  24714. procedure TI2C1A_I2C1ACON.clearSEN; inline;
  24715. begin
  24716. pTDefRegMap(@Self)^.clr := $00000001;
  24717. end;
  24718. procedure TI2C1A_I2C1ACON.setSEN(thebits : TBits_1); inline;
  24719. begin
  24720. if thebits = 0 then
  24721. pTDefRegMap(@Self)^.clr := $00000001
  24722. else
  24723. pTDefRegMap(@Self)^.&set := $00000001;
  24724. end;
  24725. function TI2C1A_I2C1ACON.getSEN : TBits_1; inline;
  24726. begin
  24727. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  24728. end;
  24729. procedure TI2C1A_I2C1ACON.setRSEN; inline;
  24730. begin
  24731. pTDefRegMap(@Self)^.&set := $00000002;
  24732. end;
  24733. procedure TI2C1A_I2C1ACON.clearRSEN; inline;
  24734. begin
  24735. pTDefRegMap(@Self)^.clr := $00000002;
  24736. end;
  24737. procedure TI2C1A_I2C1ACON.setRSEN(thebits : TBits_1); inline;
  24738. begin
  24739. if thebits = 0 then
  24740. pTDefRegMap(@Self)^.clr := $00000002
  24741. else
  24742. pTDefRegMap(@Self)^.&set := $00000002;
  24743. end;
  24744. function TI2C1A_I2C1ACON.getRSEN : TBits_1; inline;
  24745. begin
  24746. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  24747. end;
  24748. procedure TI2C1A_I2C1ACON.setPEN; inline;
  24749. begin
  24750. pTDefRegMap(@Self)^.&set := $00000004;
  24751. end;
  24752. procedure TI2C1A_I2C1ACON.clearPEN; inline;
  24753. begin
  24754. pTDefRegMap(@Self)^.clr := $00000004;
  24755. end;
  24756. procedure TI2C1A_I2C1ACON.setPEN(thebits : TBits_1); inline;
  24757. begin
  24758. if thebits = 0 then
  24759. pTDefRegMap(@Self)^.clr := $00000004
  24760. else
  24761. pTDefRegMap(@Self)^.&set := $00000004;
  24762. end;
  24763. function TI2C1A_I2C1ACON.getPEN : TBits_1; inline;
  24764. begin
  24765. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  24766. end;
  24767. procedure TI2C1A_I2C1ACON.setRCEN; inline;
  24768. begin
  24769. pTDefRegMap(@Self)^.&set := $00000008;
  24770. end;
  24771. procedure TI2C1A_I2C1ACON.clearRCEN; inline;
  24772. begin
  24773. pTDefRegMap(@Self)^.clr := $00000008;
  24774. end;
  24775. procedure TI2C1A_I2C1ACON.setRCEN(thebits : TBits_1); inline;
  24776. begin
  24777. if thebits = 0 then
  24778. pTDefRegMap(@Self)^.clr := $00000008
  24779. else
  24780. pTDefRegMap(@Self)^.&set := $00000008;
  24781. end;
  24782. function TI2C1A_I2C1ACON.getRCEN : TBits_1; inline;
  24783. begin
  24784. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  24785. end;
  24786. procedure TI2C1A_I2C1ACON.setACKEN; inline;
  24787. begin
  24788. pTDefRegMap(@Self)^.&set := $00000010;
  24789. end;
  24790. procedure TI2C1A_I2C1ACON.clearACKEN; inline;
  24791. begin
  24792. pTDefRegMap(@Self)^.clr := $00000010;
  24793. end;
  24794. procedure TI2C1A_I2C1ACON.setACKEN(thebits : TBits_1); inline;
  24795. begin
  24796. if thebits = 0 then
  24797. pTDefRegMap(@Self)^.clr := $00000010
  24798. else
  24799. pTDefRegMap(@Self)^.&set := $00000010;
  24800. end;
  24801. function TI2C1A_I2C1ACON.getACKEN : TBits_1; inline;
  24802. begin
  24803. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  24804. end;
  24805. procedure TI2C1A_I2C1ACON.setACKDT; inline;
  24806. begin
  24807. pTDefRegMap(@Self)^.&set := $00000020;
  24808. end;
  24809. procedure TI2C1A_I2C1ACON.clearACKDT; inline;
  24810. begin
  24811. pTDefRegMap(@Self)^.clr := $00000020;
  24812. end;
  24813. procedure TI2C1A_I2C1ACON.setACKDT(thebits : TBits_1); inline;
  24814. begin
  24815. if thebits = 0 then
  24816. pTDefRegMap(@Self)^.clr := $00000020
  24817. else
  24818. pTDefRegMap(@Self)^.&set := $00000020;
  24819. end;
  24820. function TI2C1A_I2C1ACON.getACKDT : TBits_1; inline;
  24821. begin
  24822. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  24823. end;
  24824. procedure TI2C1A_I2C1ACON.setSTREN; inline;
  24825. begin
  24826. pTDefRegMap(@Self)^.&set := $00000040;
  24827. end;
  24828. procedure TI2C1A_I2C1ACON.clearSTREN; inline;
  24829. begin
  24830. pTDefRegMap(@Self)^.clr := $00000040;
  24831. end;
  24832. procedure TI2C1A_I2C1ACON.setSTREN(thebits : TBits_1); inline;
  24833. begin
  24834. if thebits = 0 then
  24835. pTDefRegMap(@Self)^.clr := $00000040
  24836. else
  24837. pTDefRegMap(@Self)^.&set := $00000040;
  24838. end;
  24839. function TI2C1A_I2C1ACON.getSTREN : TBits_1; inline;
  24840. begin
  24841. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  24842. end;
  24843. procedure TI2C1A_I2C1ACON.setGCEN; inline;
  24844. begin
  24845. pTDefRegMap(@Self)^.&set := $00000080;
  24846. end;
  24847. procedure TI2C1A_I2C1ACON.clearGCEN; inline;
  24848. begin
  24849. pTDefRegMap(@Self)^.clr := $00000080;
  24850. end;
  24851. procedure TI2C1A_I2C1ACON.setGCEN(thebits : TBits_1); inline;
  24852. begin
  24853. if thebits = 0 then
  24854. pTDefRegMap(@Self)^.clr := $00000080
  24855. else
  24856. pTDefRegMap(@Self)^.&set := $00000080;
  24857. end;
  24858. function TI2C1A_I2C1ACON.getGCEN : TBits_1; inline;
  24859. begin
  24860. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  24861. end;
  24862. procedure TI2C1A_I2C1ACON.setSMEN; inline;
  24863. begin
  24864. pTDefRegMap(@Self)^.&set := $00000100;
  24865. end;
  24866. procedure TI2C1A_I2C1ACON.clearSMEN; inline;
  24867. begin
  24868. pTDefRegMap(@Self)^.clr := $00000100;
  24869. end;
  24870. procedure TI2C1A_I2C1ACON.setSMEN(thebits : TBits_1); inline;
  24871. begin
  24872. if thebits = 0 then
  24873. pTDefRegMap(@Self)^.clr := $00000100
  24874. else
  24875. pTDefRegMap(@Self)^.&set := $00000100;
  24876. end;
  24877. function TI2C1A_I2C1ACON.getSMEN : TBits_1; inline;
  24878. begin
  24879. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  24880. end;
  24881. procedure TI2C1A_I2C1ACON.setDISSLW; inline;
  24882. begin
  24883. pTDefRegMap(@Self)^.&set := $00000200;
  24884. end;
  24885. procedure TI2C1A_I2C1ACON.clearDISSLW; inline;
  24886. begin
  24887. pTDefRegMap(@Self)^.clr := $00000200;
  24888. end;
  24889. procedure TI2C1A_I2C1ACON.setDISSLW(thebits : TBits_1); inline;
  24890. begin
  24891. if thebits = 0 then
  24892. pTDefRegMap(@Self)^.clr := $00000200
  24893. else
  24894. pTDefRegMap(@Self)^.&set := $00000200;
  24895. end;
  24896. function TI2C1A_I2C1ACON.getDISSLW : TBits_1; inline;
  24897. begin
  24898. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  24899. end;
  24900. procedure TI2C1A_I2C1ACON.setA10M; inline;
  24901. begin
  24902. pTDefRegMap(@Self)^.&set := $00000400;
  24903. end;
  24904. procedure TI2C1A_I2C1ACON.clearA10M; inline;
  24905. begin
  24906. pTDefRegMap(@Self)^.clr := $00000400;
  24907. end;
  24908. procedure TI2C1A_I2C1ACON.setA10M(thebits : TBits_1); inline;
  24909. begin
  24910. if thebits = 0 then
  24911. pTDefRegMap(@Self)^.clr := $00000400
  24912. else
  24913. pTDefRegMap(@Self)^.&set := $00000400;
  24914. end;
  24915. function TI2C1A_I2C1ACON.getA10M : TBits_1; inline;
  24916. begin
  24917. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  24918. end;
  24919. procedure TI2C1A_I2C1ACON.setSTRICT; inline;
  24920. begin
  24921. pTDefRegMap(@Self)^.&set := $00000800;
  24922. end;
  24923. procedure TI2C1A_I2C1ACON.clearSTRICT; inline;
  24924. begin
  24925. pTDefRegMap(@Self)^.clr := $00000800;
  24926. end;
  24927. procedure TI2C1A_I2C1ACON.setSTRICT(thebits : TBits_1); inline;
  24928. begin
  24929. if thebits = 0 then
  24930. pTDefRegMap(@Self)^.clr := $00000800
  24931. else
  24932. pTDefRegMap(@Self)^.&set := $00000800;
  24933. end;
  24934. function TI2C1A_I2C1ACON.getSTRICT : TBits_1; inline;
  24935. begin
  24936. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  24937. end;
  24938. procedure TI2C1A_I2C1ACON.setSCLREL; inline;
  24939. begin
  24940. pTDefRegMap(@Self)^.&set := $00001000;
  24941. end;
  24942. procedure TI2C1A_I2C1ACON.clearSCLREL; inline;
  24943. begin
  24944. pTDefRegMap(@Self)^.clr := $00001000;
  24945. end;
  24946. procedure TI2C1A_I2C1ACON.setSCLREL(thebits : TBits_1); inline;
  24947. begin
  24948. if thebits = 0 then
  24949. pTDefRegMap(@Self)^.clr := $00001000
  24950. else
  24951. pTDefRegMap(@Self)^.&set := $00001000;
  24952. end;
  24953. function TI2C1A_I2C1ACON.getSCLREL : TBits_1; inline;
  24954. begin
  24955. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  24956. end;
  24957. procedure TI2C1A_I2C1ACON.setSIDL; inline;
  24958. begin
  24959. pTDefRegMap(@Self)^.&set := $00002000;
  24960. end;
  24961. procedure TI2C1A_I2C1ACON.clearSIDL; inline;
  24962. begin
  24963. pTDefRegMap(@Self)^.clr := $00002000;
  24964. end;
  24965. procedure TI2C1A_I2C1ACON.setSIDL(thebits : TBits_1); inline;
  24966. begin
  24967. if thebits = 0 then
  24968. pTDefRegMap(@Self)^.clr := $00002000
  24969. else
  24970. pTDefRegMap(@Self)^.&set := $00002000;
  24971. end;
  24972. function TI2C1A_I2C1ACON.getSIDL : TBits_1; inline;
  24973. begin
  24974. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  24975. end;
  24976. procedure TI2C1A_I2C1ACON.setON; inline;
  24977. begin
  24978. pTDefRegMap(@Self)^.&set := $00008000;
  24979. end;
  24980. procedure TI2C1A_I2C1ACON.clearON; inline;
  24981. begin
  24982. pTDefRegMap(@Self)^.clr := $00008000;
  24983. end;
  24984. procedure TI2C1A_I2C1ACON.setON(thebits : TBits_1); inline;
  24985. begin
  24986. if thebits = 0 then
  24987. pTDefRegMap(@Self)^.clr := $00008000
  24988. else
  24989. pTDefRegMap(@Self)^.&set := $00008000;
  24990. end;
  24991. function TI2C1A_I2C1ACON.getON : TBits_1; inline;
  24992. begin
  24993. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  24994. end;
  24995. procedure TI2C1A_I2C1ACON.setIPMIEN; inline;
  24996. begin
  24997. pTDefRegMap(@Self)^.&set := $00000800;
  24998. end;
  24999. procedure TI2C1A_I2C1ACON.clearIPMIEN; inline;
  25000. begin
  25001. pTDefRegMap(@Self)^.clr := $00000800;
  25002. end;
  25003. procedure TI2C1A_I2C1ACON.setIPMIEN(thebits : TBits_1); inline;
  25004. begin
  25005. if thebits = 0 then
  25006. pTDefRegMap(@Self)^.clr := $00000800
  25007. else
  25008. pTDefRegMap(@Self)^.&set := $00000800;
  25009. end;
  25010. function TI2C1A_I2C1ACON.getIPMIEN : TBits_1; inline;
  25011. begin
  25012. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  25013. end;
  25014. procedure TI2C1A_I2C1ACON.setI2CSIDL; inline;
  25015. begin
  25016. pTDefRegMap(@Self)^.&set := $00002000;
  25017. end;
  25018. procedure TI2C1A_I2C1ACON.clearI2CSIDL; inline;
  25019. begin
  25020. pTDefRegMap(@Self)^.clr := $00002000;
  25021. end;
  25022. procedure TI2C1A_I2C1ACON.setI2CSIDL(thebits : TBits_1); inline;
  25023. begin
  25024. if thebits = 0 then
  25025. pTDefRegMap(@Self)^.clr := $00002000
  25026. else
  25027. pTDefRegMap(@Self)^.&set := $00002000;
  25028. end;
  25029. function TI2C1A_I2C1ACON.getI2CSIDL : TBits_1; inline;
  25030. begin
  25031. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  25032. end;
  25033. procedure TI2C1A_I2C1ACON.setI2CEN; inline;
  25034. begin
  25035. pTDefRegMap(@Self)^.&set := $00008000;
  25036. end;
  25037. procedure TI2C1A_I2C1ACON.clearI2CEN; inline;
  25038. begin
  25039. pTDefRegMap(@Self)^.clr := $00008000;
  25040. end;
  25041. procedure TI2C1A_I2C1ACON.setI2CEN(thebits : TBits_1); inline;
  25042. begin
  25043. if thebits = 0 then
  25044. pTDefRegMap(@Self)^.clr := $00008000
  25045. else
  25046. pTDefRegMap(@Self)^.&set := $00008000;
  25047. end;
  25048. function TI2C1A_I2C1ACON.getI2CEN : TBits_1; inline;
  25049. begin
  25050. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  25051. end;
  25052. procedure TI2C1A_I2C1ACON.setw(thebits : TBits_32); inline;
  25053. begin
  25054. pTDefRegMap(@Self)^.val := thebits;
  25055. end;
  25056. function TI2C1A_I2C1ACON.getw : TBits_32; inline;
  25057. begin
  25058. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  25059. end;
  25060. procedure TI2C1A_I2C3CON.setSEN; inline;
  25061. begin
  25062. pTDefRegMap(@Self)^.&set := $00000001;
  25063. end;
  25064. procedure TI2C1A_I2C3CON.clearSEN; inline;
  25065. begin
  25066. pTDefRegMap(@Self)^.clr := $00000001;
  25067. end;
  25068. procedure TI2C1A_I2C3CON.setSEN(thebits : TBits_1); inline;
  25069. begin
  25070. if thebits = 0 then
  25071. pTDefRegMap(@Self)^.clr := $00000001
  25072. else
  25073. pTDefRegMap(@Self)^.&set := $00000001;
  25074. end;
  25075. function TI2C1A_I2C3CON.getSEN : TBits_1; inline;
  25076. begin
  25077. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  25078. end;
  25079. procedure TI2C1A_I2C3CON.setRSEN; inline;
  25080. begin
  25081. pTDefRegMap(@Self)^.&set := $00000002;
  25082. end;
  25083. procedure TI2C1A_I2C3CON.clearRSEN; inline;
  25084. begin
  25085. pTDefRegMap(@Self)^.clr := $00000002;
  25086. end;
  25087. procedure TI2C1A_I2C3CON.setRSEN(thebits : TBits_1); inline;
  25088. begin
  25089. if thebits = 0 then
  25090. pTDefRegMap(@Self)^.clr := $00000002
  25091. else
  25092. pTDefRegMap(@Self)^.&set := $00000002;
  25093. end;
  25094. function TI2C1A_I2C3CON.getRSEN : TBits_1; inline;
  25095. begin
  25096. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  25097. end;
  25098. procedure TI2C1A_I2C3CON.setPEN; inline;
  25099. begin
  25100. pTDefRegMap(@Self)^.&set := $00000004;
  25101. end;
  25102. procedure TI2C1A_I2C3CON.clearPEN; inline;
  25103. begin
  25104. pTDefRegMap(@Self)^.clr := $00000004;
  25105. end;
  25106. procedure TI2C1A_I2C3CON.setPEN(thebits : TBits_1); inline;
  25107. begin
  25108. if thebits = 0 then
  25109. pTDefRegMap(@Self)^.clr := $00000004
  25110. else
  25111. pTDefRegMap(@Self)^.&set := $00000004;
  25112. end;
  25113. function TI2C1A_I2C3CON.getPEN : TBits_1; inline;
  25114. begin
  25115. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  25116. end;
  25117. procedure TI2C1A_I2C3CON.setRCEN; inline;
  25118. begin
  25119. pTDefRegMap(@Self)^.&set := $00000008;
  25120. end;
  25121. procedure TI2C1A_I2C3CON.clearRCEN; inline;
  25122. begin
  25123. pTDefRegMap(@Self)^.clr := $00000008;
  25124. end;
  25125. procedure TI2C1A_I2C3CON.setRCEN(thebits : TBits_1); inline;
  25126. begin
  25127. if thebits = 0 then
  25128. pTDefRegMap(@Self)^.clr := $00000008
  25129. else
  25130. pTDefRegMap(@Self)^.&set := $00000008;
  25131. end;
  25132. function TI2C1A_I2C3CON.getRCEN : TBits_1; inline;
  25133. begin
  25134. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  25135. end;
  25136. procedure TI2C1A_I2C3CON.setACKEN; inline;
  25137. begin
  25138. pTDefRegMap(@Self)^.&set := $00000010;
  25139. end;
  25140. procedure TI2C1A_I2C3CON.clearACKEN; inline;
  25141. begin
  25142. pTDefRegMap(@Self)^.clr := $00000010;
  25143. end;
  25144. procedure TI2C1A_I2C3CON.setACKEN(thebits : TBits_1); inline;
  25145. begin
  25146. if thebits = 0 then
  25147. pTDefRegMap(@Self)^.clr := $00000010
  25148. else
  25149. pTDefRegMap(@Self)^.&set := $00000010;
  25150. end;
  25151. function TI2C1A_I2C3CON.getACKEN : TBits_1; inline;
  25152. begin
  25153. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  25154. end;
  25155. procedure TI2C1A_I2C3CON.setACKDT; inline;
  25156. begin
  25157. pTDefRegMap(@Self)^.&set := $00000020;
  25158. end;
  25159. procedure TI2C1A_I2C3CON.clearACKDT; inline;
  25160. begin
  25161. pTDefRegMap(@Self)^.clr := $00000020;
  25162. end;
  25163. procedure TI2C1A_I2C3CON.setACKDT(thebits : TBits_1); inline;
  25164. begin
  25165. if thebits = 0 then
  25166. pTDefRegMap(@Self)^.clr := $00000020
  25167. else
  25168. pTDefRegMap(@Self)^.&set := $00000020;
  25169. end;
  25170. function TI2C1A_I2C3CON.getACKDT : TBits_1; inline;
  25171. begin
  25172. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  25173. end;
  25174. procedure TI2C1A_I2C3CON.setSTREN; inline;
  25175. begin
  25176. pTDefRegMap(@Self)^.&set := $00000040;
  25177. end;
  25178. procedure TI2C1A_I2C3CON.clearSTREN; inline;
  25179. begin
  25180. pTDefRegMap(@Self)^.clr := $00000040;
  25181. end;
  25182. procedure TI2C1A_I2C3CON.setSTREN(thebits : TBits_1); inline;
  25183. begin
  25184. if thebits = 0 then
  25185. pTDefRegMap(@Self)^.clr := $00000040
  25186. else
  25187. pTDefRegMap(@Self)^.&set := $00000040;
  25188. end;
  25189. function TI2C1A_I2C3CON.getSTREN : TBits_1; inline;
  25190. begin
  25191. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  25192. end;
  25193. procedure TI2C1A_I2C3CON.setGCEN; inline;
  25194. begin
  25195. pTDefRegMap(@Self)^.&set := $00000080;
  25196. end;
  25197. procedure TI2C1A_I2C3CON.clearGCEN; inline;
  25198. begin
  25199. pTDefRegMap(@Self)^.clr := $00000080;
  25200. end;
  25201. procedure TI2C1A_I2C3CON.setGCEN(thebits : TBits_1); inline;
  25202. begin
  25203. if thebits = 0 then
  25204. pTDefRegMap(@Self)^.clr := $00000080
  25205. else
  25206. pTDefRegMap(@Self)^.&set := $00000080;
  25207. end;
  25208. function TI2C1A_I2C3CON.getGCEN : TBits_1; inline;
  25209. begin
  25210. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  25211. end;
  25212. procedure TI2C1A_I2C3CON.setSMEN; inline;
  25213. begin
  25214. pTDefRegMap(@Self)^.&set := $00000100;
  25215. end;
  25216. procedure TI2C1A_I2C3CON.clearSMEN; inline;
  25217. begin
  25218. pTDefRegMap(@Self)^.clr := $00000100;
  25219. end;
  25220. procedure TI2C1A_I2C3CON.setSMEN(thebits : TBits_1); inline;
  25221. begin
  25222. if thebits = 0 then
  25223. pTDefRegMap(@Self)^.clr := $00000100
  25224. else
  25225. pTDefRegMap(@Self)^.&set := $00000100;
  25226. end;
  25227. function TI2C1A_I2C3CON.getSMEN : TBits_1; inline;
  25228. begin
  25229. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  25230. end;
  25231. procedure TI2C1A_I2C3CON.setDISSLW; inline;
  25232. begin
  25233. pTDefRegMap(@Self)^.&set := $00000200;
  25234. end;
  25235. procedure TI2C1A_I2C3CON.clearDISSLW; inline;
  25236. begin
  25237. pTDefRegMap(@Self)^.clr := $00000200;
  25238. end;
  25239. procedure TI2C1A_I2C3CON.setDISSLW(thebits : TBits_1); inline;
  25240. begin
  25241. if thebits = 0 then
  25242. pTDefRegMap(@Self)^.clr := $00000200
  25243. else
  25244. pTDefRegMap(@Self)^.&set := $00000200;
  25245. end;
  25246. function TI2C1A_I2C3CON.getDISSLW : TBits_1; inline;
  25247. begin
  25248. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  25249. end;
  25250. procedure TI2C1A_I2C3CON.setA10M; inline;
  25251. begin
  25252. pTDefRegMap(@Self)^.&set := $00000400;
  25253. end;
  25254. procedure TI2C1A_I2C3CON.clearA10M; inline;
  25255. begin
  25256. pTDefRegMap(@Self)^.clr := $00000400;
  25257. end;
  25258. procedure TI2C1A_I2C3CON.setA10M(thebits : TBits_1); inline;
  25259. begin
  25260. if thebits = 0 then
  25261. pTDefRegMap(@Self)^.clr := $00000400
  25262. else
  25263. pTDefRegMap(@Self)^.&set := $00000400;
  25264. end;
  25265. function TI2C1A_I2C3CON.getA10M : TBits_1; inline;
  25266. begin
  25267. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  25268. end;
  25269. procedure TI2C1A_I2C3CON.setSTRICT; inline;
  25270. begin
  25271. pTDefRegMap(@Self)^.&set := $00000800;
  25272. end;
  25273. procedure TI2C1A_I2C3CON.clearSTRICT; inline;
  25274. begin
  25275. pTDefRegMap(@Self)^.clr := $00000800;
  25276. end;
  25277. procedure TI2C1A_I2C3CON.setSTRICT(thebits : TBits_1); inline;
  25278. begin
  25279. if thebits = 0 then
  25280. pTDefRegMap(@Self)^.clr := $00000800
  25281. else
  25282. pTDefRegMap(@Self)^.&set := $00000800;
  25283. end;
  25284. function TI2C1A_I2C3CON.getSTRICT : TBits_1; inline;
  25285. begin
  25286. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  25287. end;
  25288. procedure TI2C1A_I2C3CON.setSCLREL; inline;
  25289. begin
  25290. pTDefRegMap(@Self)^.&set := $00001000;
  25291. end;
  25292. procedure TI2C1A_I2C3CON.clearSCLREL; inline;
  25293. begin
  25294. pTDefRegMap(@Self)^.clr := $00001000;
  25295. end;
  25296. procedure TI2C1A_I2C3CON.setSCLREL(thebits : TBits_1); inline;
  25297. begin
  25298. if thebits = 0 then
  25299. pTDefRegMap(@Self)^.clr := $00001000
  25300. else
  25301. pTDefRegMap(@Self)^.&set := $00001000;
  25302. end;
  25303. function TI2C1A_I2C3CON.getSCLREL : TBits_1; inline;
  25304. begin
  25305. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  25306. end;
  25307. procedure TI2C1A_I2C3CON.setSIDL; inline;
  25308. begin
  25309. pTDefRegMap(@Self)^.&set := $00002000;
  25310. end;
  25311. procedure TI2C1A_I2C3CON.clearSIDL; inline;
  25312. begin
  25313. pTDefRegMap(@Self)^.clr := $00002000;
  25314. end;
  25315. procedure TI2C1A_I2C3CON.setSIDL(thebits : TBits_1); inline;
  25316. begin
  25317. if thebits = 0 then
  25318. pTDefRegMap(@Self)^.clr := $00002000
  25319. else
  25320. pTDefRegMap(@Self)^.&set := $00002000;
  25321. end;
  25322. function TI2C1A_I2C3CON.getSIDL : TBits_1; inline;
  25323. begin
  25324. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  25325. end;
  25326. procedure TI2C1A_I2C3CON.setON; inline;
  25327. begin
  25328. pTDefRegMap(@Self)^.&set := $00008000;
  25329. end;
  25330. procedure TI2C1A_I2C3CON.clearON; inline;
  25331. begin
  25332. pTDefRegMap(@Self)^.clr := $00008000;
  25333. end;
  25334. procedure TI2C1A_I2C3CON.setON(thebits : TBits_1); inline;
  25335. begin
  25336. if thebits = 0 then
  25337. pTDefRegMap(@Self)^.clr := $00008000
  25338. else
  25339. pTDefRegMap(@Self)^.&set := $00008000;
  25340. end;
  25341. function TI2C1A_I2C3CON.getON : TBits_1; inline;
  25342. begin
  25343. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  25344. end;
  25345. procedure TI2C1A_I2C3CON.setIPMIEN; inline;
  25346. begin
  25347. pTDefRegMap(@Self)^.&set := $00000800;
  25348. end;
  25349. procedure TI2C1A_I2C3CON.clearIPMIEN; inline;
  25350. begin
  25351. pTDefRegMap(@Self)^.clr := $00000800;
  25352. end;
  25353. procedure TI2C1A_I2C3CON.setIPMIEN(thebits : TBits_1); inline;
  25354. begin
  25355. if thebits = 0 then
  25356. pTDefRegMap(@Self)^.clr := $00000800
  25357. else
  25358. pTDefRegMap(@Self)^.&set := $00000800;
  25359. end;
  25360. function TI2C1A_I2C3CON.getIPMIEN : TBits_1; inline;
  25361. begin
  25362. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  25363. end;
  25364. procedure TI2C1A_I2C3CON.setI2CSIDL; inline;
  25365. begin
  25366. pTDefRegMap(@Self)^.&set := $00002000;
  25367. end;
  25368. procedure TI2C1A_I2C3CON.clearI2CSIDL; inline;
  25369. begin
  25370. pTDefRegMap(@Self)^.clr := $00002000;
  25371. end;
  25372. procedure TI2C1A_I2C3CON.setI2CSIDL(thebits : TBits_1); inline;
  25373. begin
  25374. if thebits = 0 then
  25375. pTDefRegMap(@Self)^.clr := $00002000
  25376. else
  25377. pTDefRegMap(@Self)^.&set := $00002000;
  25378. end;
  25379. function TI2C1A_I2C3CON.getI2CSIDL : TBits_1; inline;
  25380. begin
  25381. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  25382. end;
  25383. procedure TI2C1A_I2C3CON.setI2CEN; inline;
  25384. begin
  25385. pTDefRegMap(@Self)^.&set := $00008000;
  25386. end;
  25387. procedure TI2C1A_I2C3CON.clearI2CEN; inline;
  25388. begin
  25389. pTDefRegMap(@Self)^.clr := $00008000;
  25390. end;
  25391. procedure TI2C1A_I2C3CON.setI2CEN(thebits : TBits_1); inline;
  25392. begin
  25393. if thebits = 0 then
  25394. pTDefRegMap(@Self)^.clr := $00008000
  25395. else
  25396. pTDefRegMap(@Self)^.&set := $00008000;
  25397. end;
  25398. function TI2C1A_I2C3CON.getI2CEN : TBits_1; inline;
  25399. begin
  25400. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  25401. end;
  25402. procedure TI2C1A_I2C3CON.setw(thebits : TBits_32); inline;
  25403. begin
  25404. pTDefRegMap(@Self)^.val := thebits;
  25405. end;
  25406. function TI2C1A_I2C3CON.getw : TBits_32; inline;
  25407. begin
  25408. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  25409. end;
  25410. procedure TI2C1A_I2C1ASTAT.setTBF; inline;
  25411. begin
  25412. pTDefRegMap(@Self)^.&set := $00000001;
  25413. end;
  25414. procedure TI2C1A_I2C1ASTAT.clearTBF; inline;
  25415. begin
  25416. pTDefRegMap(@Self)^.clr := $00000001;
  25417. end;
  25418. procedure TI2C1A_I2C1ASTAT.setTBF(thebits : TBits_1); inline;
  25419. begin
  25420. if thebits = 0 then
  25421. pTDefRegMap(@Self)^.clr := $00000001
  25422. else
  25423. pTDefRegMap(@Self)^.&set := $00000001;
  25424. end;
  25425. function TI2C1A_I2C1ASTAT.getTBF : TBits_1; inline;
  25426. begin
  25427. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  25428. end;
  25429. procedure TI2C1A_I2C1ASTAT.setRBF; inline;
  25430. begin
  25431. pTDefRegMap(@Self)^.&set := $00000002;
  25432. end;
  25433. procedure TI2C1A_I2C1ASTAT.clearRBF; inline;
  25434. begin
  25435. pTDefRegMap(@Self)^.clr := $00000002;
  25436. end;
  25437. procedure TI2C1A_I2C1ASTAT.setRBF(thebits : TBits_1); inline;
  25438. begin
  25439. if thebits = 0 then
  25440. pTDefRegMap(@Self)^.clr := $00000002
  25441. else
  25442. pTDefRegMap(@Self)^.&set := $00000002;
  25443. end;
  25444. function TI2C1A_I2C1ASTAT.getRBF : TBits_1; inline;
  25445. begin
  25446. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  25447. end;
  25448. procedure TI2C1A_I2C1ASTAT.setR_W; inline;
  25449. begin
  25450. pTDefRegMap(@Self)^.&set := $00000004;
  25451. end;
  25452. procedure TI2C1A_I2C1ASTAT.clearR_W; inline;
  25453. begin
  25454. pTDefRegMap(@Self)^.clr := $00000004;
  25455. end;
  25456. procedure TI2C1A_I2C1ASTAT.setR_W(thebits : TBits_1); inline;
  25457. begin
  25458. if thebits = 0 then
  25459. pTDefRegMap(@Self)^.clr := $00000004
  25460. else
  25461. pTDefRegMap(@Self)^.&set := $00000004;
  25462. end;
  25463. function TI2C1A_I2C1ASTAT.getR_W : TBits_1; inline;
  25464. begin
  25465. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  25466. end;
  25467. procedure TI2C1A_I2C1ASTAT.setS; inline;
  25468. begin
  25469. pTDefRegMap(@Self)^.&set := $00000008;
  25470. end;
  25471. procedure TI2C1A_I2C1ASTAT.clearS; inline;
  25472. begin
  25473. pTDefRegMap(@Self)^.clr := $00000008;
  25474. end;
  25475. procedure TI2C1A_I2C1ASTAT.setS(thebits : TBits_1); inline;
  25476. begin
  25477. if thebits = 0 then
  25478. pTDefRegMap(@Self)^.clr := $00000008
  25479. else
  25480. pTDefRegMap(@Self)^.&set := $00000008;
  25481. end;
  25482. function TI2C1A_I2C1ASTAT.getS : TBits_1; inline;
  25483. begin
  25484. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  25485. end;
  25486. procedure TI2C1A_I2C1ASTAT.setP; inline;
  25487. begin
  25488. pTDefRegMap(@Self)^.&set := $00000010;
  25489. end;
  25490. procedure TI2C1A_I2C1ASTAT.clearP; inline;
  25491. begin
  25492. pTDefRegMap(@Self)^.clr := $00000010;
  25493. end;
  25494. procedure TI2C1A_I2C1ASTAT.setP(thebits : TBits_1); inline;
  25495. begin
  25496. if thebits = 0 then
  25497. pTDefRegMap(@Self)^.clr := $00000010
  25498. else
  25499. pTDefRegMap(@Self)^.&set := $00000010;
  25500. end;
  25501. function TI2C1A_I2C1ASTAT.getP : TBits_1; inline;
  25502. begin
  25503. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  25504. end;
  25505. procedure TI2C1A_I2C1ASTAT.setD_A; inline;
  25506. begin
  25507. pTDefRegMap(@Self)^.&set := $00000020;
  25508. end;
  25509. procedure TI2C1A_I2C1ASTAT.clearD_A; inline;
  25510. begin
  25511. pTDefRegMap(@Self)^.clr := $00000020;
  25512. end;
  25513. procedure TI2C1A_I2C1ASTAT.setD_A(thebits : TBits_1); inline;
  25514. begin
  25515. if thebits = 0 then
  25516. pTDefRegMap(@Self)^.clr := $00000020
  25517. else
  25518. pTDefRegMap(@Self)^.&set := $00000020;
  25519. end;
  25520. function TI2C1A_I2C1ASTAT.getD_A : TBits_1; inline;
  25521. begin
  25522. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  25523. end;
  25524. procedure TI2C1A_I2C1ASTAT.setI2COV; inline;
  25525. begin
  25526. pTDefRegMap(@Self)^.&set := $00000040;
  25527. end;
  25528. procedure TI2C1A_I2C1ASTAT.clearI2COV; inline;
  25529. begin
  25530. pTDefRegMap(@Self)^.clr := $00000040;
  25531. end;
  25532. procedure TI2C1A_I2C1ASTAT.setI2COV(thebits : TBits_1); inline;
  25533. begin
  25534. if thebits = 0 then
  25535. pTDefRegMap(@Self)^.clr := $00000040
  25536. else
  25537. pTDefRegMap(@Self)^.&set := $00000040;
  25538. end;
  25539. function TI2C1A_I2C1ASTAT.getI2COV : TBits_1; inline;
  25540. begin
  25541. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  25542. end;
  25543. procedure TI2C1A_I2C1ASTAT.setIWCOL; inline;
  25544. begin
  25545. pTDefRegMap(@Self)^.&set := $00000080;
  25546. end;
  25547. procedure TI2C1A_I2C1ASTAT.clearIWCOL; inline;
  25548. begin
  25549. pTDefRegMap(@Self)^.clr := $00000080;
  25550. end;
  25551. procedure TI2C1A_I2C1ASTAT.setIWCOL(thebits : TBits_1); inline;
  25552. begin
  25553. if thebits = 0 then
  25554. pTDefRegMap(@Self)^.clr := $00000080
  25555. else
  25556. pTDefRegMap(@Self)^.&set := $00000080;
  25557. end;
  25558. function TI2C1A_I2C1ASTAT.getIWCOL : TBits_1; inline;
  25559. begin
  25560. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  25561. end;
  25562. procedure TI2C1A_I2C1ASTAT.setADD10; inline;
  25563. begin
  25564. pTDefRegMap(@Self)^.&set := $00000100;
  25565. end;
  25566. procedure TI2C1A_I2C1ASTAT.clearADD10; inline;
  25567. begin
  25568. pTDefRegMap(@Self)^.clr := $00000100;
  25569. end;
  25570. procedure TI2C1A_I2C1ASTAT.setADD10(thebits : TBits_1); inline;
  25571. begin
  25572. if thebits = 0 then
  25573. pTDefRegMap(@Self)^.clr := $00000100
  25574. else
  25575. pTDefRegMap(@Self)^.&set := $00000100;
  25576. end;
  25577. function TI2C1A_I2C1ASTAT.getADD10 : TBits_1; inline;
  25578. begin
  25579. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  25580. end;
  25581. procedure TI2C1A_I2C1ASTAT.setGCSTAT; inline;
  25582. begin
  25583. pTDefRegMap(@Self)^.&set := $00000200;
  25584. end;
  25585. procedure TI2C1A_I2C1ASTAT.clearGCSTAT; inline;
  25586. begin
  25587. pTDefRegMap(@Self)^.clr := $00000200;
  25588. end;
  25589. procedure TI2C1A_I2C1ASTAT.setGCSTAT(thebits : TBits_1); inline;
  25590. begin
  25591. if thebits = 0 then
  25592. pTDefRegMap(@Self)^.clr := $00000200
  25593. else
  25594. pTDefRegMap(@Self)^.&set := $00000200;
  25595. end;
  25596. function TI2C1A_I2C1ASTAT.getGCSTAT : TBits_1; inline;
  25597. begin
  25598. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  25599. end;
  25600. procedure TI2C1A_I2C1ASTAT.setBCL; inline;
  25601. begin
  25602. pTDefRegMap(@Self)^.&set := $00000400;
  25603. end;
  25604. procedure TI2C1A_I2C1ASTAT.clearBCL; inline;
  25605. begin
  25606. pTDefRegMap(@Self)^.clr := $00000400;
  25607. end;
  25608. procedure TI2C1A_I2C1ASTAT.setBCL(thebits : TBits_1); inline;
  25609. begin
  25610. if thebits = 0 then
  25611. pTDefRegMap(@Self)^.clr := $00000400
  25612. else
  25613. pTDefRegMap(@Self)^.&set := $00000400;
  25614. end;
  25615. function TI2C1A_I2C1ASTAT.getBCL : TBits_1; inline;
  25616. begin
  25617. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  25618. end;
  25619. procedure TI2C1A_I2C1ASTAT.setTRSTAT; inline;
  25620. begin
  25621. pTDefRegMap(@Self)^.&set := $00004000;
  25622. end;
  25623. procedure TI2C1A_I2C1ASTAT.clearTRSTAT; inline;
  25624. begin
  25625. pTDefRegMap(@Self)^.clr := $00004000;
  25626. end;
  25627. procedure TI2C1A_I2C1ASTAT.setTRSTAT(thebits : TBits_1); inline;
  25628. begin
  25629. if thebits = 0 then
  25630. pTDefRegMap(@Self)^.clr := $00004000
  25631. else
  25632. pTDefRegMap(@Self)^.&set := $00004000;
  25633. end;
  25634. function TI2C1A_I2C1ASTAT.getTRSTAT : TBits_1; inline;
  25635. begin
  25636. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  25637. end;
  25638. procedure TI2C1A_I2C1ASTAT.setACKSTAT; inline;
  25639. begin
  25640. pTDefRegMap(@Self)^.&set := $00008000;
  25641. end;
  25642. procedure TI2C1A_I2C1ASTAT.clearACKSTAT; inline;
  25643. begin
  25644. pTDefRegMap(@Self)^.clr := $00008000;
  25645. end;
  25646. procedure TI2C1A_I2C1ASTAT.setACKSTAT(thebits : TBits_1); inline;
  25647. begin
  25648. if thebits = 0 then
  25649. pTDefRegMap(@Self)^.clr := $00008000
  25650. else
  25651. pTDefRegMap(@Self)^.&set := $00008000;
  25652. end;
  25653. function TI2C1A_I2C1ASTAT.getACKSTAT : TBits_1; inline;
  25654. begin
  25655. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  25656. end;
  25657. procedure TI2C1A_I2C1ASTAT.setI2CPOV; inline;
  25658. begin
  25659. pTDefRegMap(@Self)^.&set := $00000040;
  25660. end;
  25661. procedure TI2C1A_I2C1ASTAT.clearI2CPOV; inline;
  25662. begin
  25663. pTDefRegMap(@Self)^.clr := $00000040;
  25664. end;
  25665. procedure TI2C1A_I2C1ASTAT.setI2CPOV(thebits : TBits_1); inline;
  25666. begin
  25667. if thebits = 0 then
  25668. pTDefRegMap(@Self)^.clr := $00000040
  25669. else
  25670. pTDefRegMap(@Self)^.&set := $00000040;
  25671. end;
  25672. function TI2C1A_I2C1ASTAT.getI2CPOV : TBits_1; inline;
  25673. begin
  25674. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  25675. end;
  25676. procedure TI2C1A_I2C1ASTAT.setw(thebits : TBits_32); inline;
  25677. begin
  25678. pTDefRegMap(@Self)^.val := thebits;
  25679. end;
  25680. function TI2C1A_I2C1ASTAT.getw : TBits_32; inline;
  25681. begin
  25682. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  25683. end;
  25684. procedure TI2C1A_I2C3STAT.setTBF; inline;
  25685. begin
  25686. pTDefRegMap(@Self)^.&set := $00000001;
  25687. end;
  25688. procedure TI2C1A_I2C3STAT.clearTBF; inline;
  25689. begin
  25690. pTDefRegMap(@Self)^.clr := $00000001;
  25691. end;
  25692. procedure TI2C1A_I2C3STAT.setTBF(thebits : TBits_1); inline;
  25693. begin
  25694. if thebits = 0 then
  25695. pTDefRegMap(@Self)^.clr := $00000001
  25696. else
  25697. pTDefRegMap(@Self)^.&set := $00000001;
  25698. end;
  25699. function TI2C1A_I2C3STAT.getTBF : TBits_1; inline;
  25700. begin
  25701. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  25702. end;
  25703. procedure TI2C1A_I2C3STAT.setRBF; inline;
  25704. begin
  25705. pTDefRegMap(@Self)^.&set := $00000002;
  25706. end;
  25707. procedure TI2C1A_I2C3STAT.clearRBF; inline;
  25708. begin
  25709. pTDefRegMap(@Self)^.clr := $00000002;
  25710. end;
  25711. procedure TI2C1A_I2C3STAT.setRBF(thebits : TBits_1); inline;
  25712. begin
  25713. if thebits = 0 then
  25714. pTDefRegMap(@Self)^.clr := $00000002
  25715. else
  25716. pTDefRegMap(@Self)^.&set := $00000002;
  25717. end;
  25718. function TI2C1A_I2C3STAT.getRBF : TBits_1; inline;
  25719. begin
  25720. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  25721. end;
  25722. procedure TI2C1A_I2C3STAT.setR_W; inline;
  25723. begin
  25724. pTDefRegMap(@Self)^.&set := $00000004;
  25725. end;
  25726. procedure TI2C1A_I2C3STAT.clearR_W; inline;
  25727. begin
  25728. pTDefRegMap(@Self)^.clr := $00000004;
  25729. end;
  25730. procedure TI2C1A_I2C3STAT.setR_W(thebits : TBits_1); inline;
  25731. begin
  25732. if thebits = 0 then
  25733. pTDefRegMap(@Self)^.clr := $00000004
  25734. else
  25735. pTDefRegMap(@Self)^.&set := $00000004;
  25736. end;
  25737. function TI2C1A_I2C3STAT.getR_W : TBits_1; inline;
  25738. begin
  25739. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  25740. end;
  25741. procedure TI2C1A_I2C3STAT.setS; inline;
  25742. begin
  25743. pTDefRegMap(@Self)^.&set := $00000008;
  25744. end;
  25745. procedure TI2C1A_I2C3STAT.clearS; inline;
  25746. begin
  25747. pTDefRegMap(@Self)^.clr := $00000008;
  25748. end;
  25749. procedure TI2C1A_I2C3STAT.setS(thebits : TBits_1); inline;
  25750. begin
  25751. if thebits = 0 then
  25752. pTDefRegMap(@Self)^.clr := $00000008
  25753. else
  25754. pTDefRegMap(@Self)^.&set := $00000008;
  25755. end;
  25756. function TI2C1A_I2C3STAT.getS : TBits_1; inline;
  25757. begin
  25758. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  25759. end;
  25760. procedure TI2C1A_I2C3STAT.setP; inline;
  25761. begin
  25762. pTDefRegMap(@Self)^.&set := $00000010;
  25763. end;
  25764. procedure TI2C1A_I2C3STAT.clearP; inline;
  25765. begin
  25766. pTDefRegMap(@Self)^.clr := $00000010;
  25767. end;
  25768. procedure TI2C1A_I2C3STAT.setP(thebits : TBits_1); inline;
  25769. begin
  25770. if thebits = 0 then
  25771. pTDefRegMap(@Self)^.clr := $00000010
  25772. else
  25773. pTDefRegMap(@Self)^.&set := $00000010;
  25774. end;
  25775. function TI2C1A_I2C3STAT.getP : TBits_1; inline;
  25776. begin
  25777. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  25778. end;
  25779. procedure TI2C1A_I2C3STAT.setD_A; inline;
  25780. begin
  25781. pTDefRegMap(@Self)^.&set := $00000020;
  25782. end;
  25783. procedure TI2C1A_I2C3STAT.clearD_A; inline;
  25784. begin
  25785. pTDefRegMap(@Self)^.clr := $00000020;
  25786. end;
  25787. procedure TI2C1A_I2C3STAT.setD_A(thebits : TBits_1); inline;
  25788. begin
  25789. if thebits = 0 then
  25790. pTDefRegMap(@Self)^.clr := $00000020
  25791. else
  25792. pTDefRegMap(@Self)^.&set := $00000020;
  25793. end;
  25794. function TI2C1A_I2C3STAT.getD_A : TBits_1; inline;
  25795. begin
  25796. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  25797. end;
  25798. procedure TI2C1A_I2C3STAT.setI2COV; inline;
  25799. begin
  25800. pTDefRegMap(@Self)^.&set := $00000040;
  25801. end;
  25802. procedure TI2C1A_I2C3STAT.clearI2COV; inline;
  25803. begin
  25804. pTDefRegMap(@Self)^.clr := $00000040;
  25805. end;
  25806. procedure TI2C1A_I2C3STAT.setI2COV(thebits : TBits_1); inline;
  25807. begin
  25808. if thebits = 0 then
  25809. pTDefRegMap(@Self)^.clr := $00000040
  25810. else
  25811. pTDefRegMap(@Self)^.&set := $00000040;
  25812. end;
  25813. function TI2C1A_I2C3STAT.getI2COV : TBits_1; inline;
  25814. begin
  25815. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  25816. end;
  25817. procedure TI2C1A_I2C3STAT.setIWCOL; inline;
  25818. begin
  25819. pTDefRegMap(@Self)^.&set := $00000080;
  25820. end;
  25821. procedure TI2C1A_I2C3STAT.clearIWCOL; inline;
  25822. begin
  25823. pTDefRegMap(@Self)^.clr := $00000080;
  25824. end;
  25825. procedure TI2C1A_I2C3STAT.setIWCOL(thebits : TBits_1); inline;
  25826. begin
  25827. if thebits = 0 then
  25828. pTDefRegMap(@Self)^.clr := $00000080
  25829. else
  25830. pTDefRegMap(@Self)^.&set := $00000080;
  25831. end;
  25832. function TI2C1A_I2C3STAT.getIWCOL : TBits_1; inline;
  25833. begin
  25834. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  25835. end;
  25836. procedure TI2C1A_I2C3STAT.setADD10; inline;
  25837. begin
  25838. pTDefRegMap(@Self)^.&set := $00000100;
  25839. end;
  25840. procedure TI2C1A_I2C3STAT.clearADD10; inline;
  25841. begin
  25842. pTDefRegMap(@Self)^.clr := $00000100;
  25843. end;
  25844. procedure TI2C1A_I2C3STAT.setADD10(thebits : TBits_1); inline;
  25845. begin
  25846. if thebits = 0 then
  25847. pTDefRegMap(@Self)^.clr := $00000100
  25848. else
  25849. pTDefRegMap(@Self)^.&set := $00000100;
  25850. end;
  25851. function TI2C1A_I2C3STAT.getADD10 : TBits_1; inline;
  25852. begin
  25853. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  25854. end;
  25855. procedure TI2C1A_I2C3STAT.setGCSTAT; inline;
  25856. begin
  25857. pTDefRegMap(@Self)^.&set := $00000200;
  25858. end;
  25859. procedure TI2C1A_I2C3STAT.clearGCSTAT; inline;
  25860. begin
  25861. pTDefRegMap(@Self)^.clr := $00000200;
  25862. end;
  25863. procedure TI2C1A_I2C3STAT.setGCSTAT(thebits : TBits_1); inline;
  25864. begin
  25865. if thebits = 0 then
  25866. pTDefRegMap(@Self)^.clr := $00000200
  25867. else
  25868. pTDefRegMap(@Self)^.&set := $00000200;
  25869. end;
  25870. function TI2C1A_I2C3STAT.getGCSTAT : TBits_1; inline;
  25871. begin
  25872. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  25873. end;
  25874. procedure TI2C1A_I2C3STAT.setBCL; inline;
  25875. begin
  25876. pTDefRegMap(@Self)^.&set := $00000400;
  25877. end;
  25878. procedure TI2C1A_I2C3STAT.clearBCL; inline;
  25879. begin
  25880. pTDefRegMap(@Self)^.clr := $00000400;
  25881. end;
  25882. procedure TI2C1A_I2C3STAT.setBCL(thebits : TBits_1); inline;
  25883. begin
  25884. if thebits = 0 then
  25885. pTDefRegMap(@Self)^.clr := $00000400
  25886. else
  25887. pTDefRegMap(@Self)^.&set := $00000400;
  25888. end;
  25889. function TI2C1A_I2C3STAT.getBCL : TBits_1; inline;
  25890. begin
  25891. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  25892. end;
  25893. procedure TI2C1A_I2C3STAT.setTRSTAT; inline;
  25894. begin
  25895. pTDefRegMap(@Self)^.&set := $00004000;
  25896. end;
  25897. procedure TI2C1A_I2C3STAT.clearTRSTAT; inline;
  25898. begin
  25899. pTDefRegMap(@Self)^.clr := $00004000;
  25900. end;
  25901. procedure TI2C1A_I2C3STAT.setTRSTAT(thebits : TBits_1); inline;
  25902. begin
  25903. if thebits = 0 then
  25904. pTDefRegMap(@Self)^.clr := $00004000
  25905. else
  25906. pTDefRegMap(@Self)^.&set := $00004000;
  25907. end;
  25908. function TI2C1A_I2C3STAT.getTRSTAT : TBits_1; inline;
  25909. begin
  25910. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  25911. end;
  25912. procedure TI2C1A_I2C3STAT.setACKSTAT; inline;
  25913. begin
  25914. pTDefRegMap(@Self)^.&set := $00008000;
  25915. end;
  25916. procedure TI2C1A_I2C3STAT.clearACKSTAT; inline;
  25917. begin
  25918. pTDefRegMap(@Self)^.clr := $00008000;
  25919. end;
  25920. procedure TI2C1A_I2C3STAT.setACKSTAT(thebits : TBits_1); inline;
  25921. begin
  25922. if thebits = 0 then
  25923. pTDefRegMap(@Self)^.clr := $00008000
  25924. else
  25925. pTDefRegMap(@Self)^.&set := $00008000;
  25926. end;
  25927. function TI2C1A_I2C3STAT.getACKSTAT : TBits_1; inline;
  25928. begin
  25929. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  25930. end;
  25931. procedure TI2C1A_I2C3STAT.setI2CPOV; inline;
  25932. begin
  25933. pTDefRegMap(@Self)^.&set := $00000040;
  25934. end;
  25935. procedure TI2C1A_I2C3STAT.clearI2CPOV; inline;
  25936. begin
  25937. pTDefRegMap(@Self)^.clr := $00000040;
  25938. end;
  25939. procedure TI2C1A_I2C3STAT.setI2CPOV(thebits : TBits_1); inline;
  25940. begin
  25941. if thebits = 0 then
  25942. pTDefRegMap(@Self)^.clr := $00000040
  25943. else
  25944. pTDefRegMap(@Self)^.&set := $00000040;
  25945. end;
  25946. function TI2C1A_I2C3STAT.getI2CPOV : TBits_1; inline;
  25947. begin
  25948. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  25949. end;
  25950. procedure TI2C1A_I2C3STAT.setw(thebits : TBits_32); inline;
  25951. begin
  25952. pTDefRegMap(@Self)^.val := thebits;
  25953. end;
  25954. function TI2C1A_I2C3STAT.getw : TBits_32; inline;
  25955. begin
  25956. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  25957. end;
  25958. procedure TI2C2A_I2C2ACON.setSEN; inline;
  25959. begin
  25960. pTDefRegMap(@Self)^.&set := $00000001;
  25961. end;
  25962. procedure TI2C2A_I2C2ACON.clearSEN; inline;
  25963. begin
  25964. pTDefRegMap(@Self)^.clr := $00000001;
  25965. end;
  25966. procedure TI2C2A_I2C2ACON.setSEN(thebits : TBits_1); inline;
  25967. begin
  25968. if thebits = 0 then
  25969. pTDefRegMap(@Self)^.clr := $00000001
  25970. else
  25971. pTDefRegMap(@Self)^.&set := $00000001;
  25972. end;
  25973. function TI2C2A_I2C2ACON.getSEN : TBits_1; inline;
  25974. begin
  25975. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  25976. end;
  25977. procedure TI2C2A_I2C2ACON.setRSEN; inline;
  25978. begin
  25979. pTDefRegMap(@Self)^.&set := $00000002;
  25980. end;
  25981. procedure TI2C2A_I2C2ACON.clearRSEN; inline;
  25982. begin
  25983. pTDefRegMap(@Self)^.clr := $00000002;
  25984. end;
  25985. procedure TI2C2A_I2C2ACON.setRSEN(thebits : TBits_1); inline;
  25986. begin
  25987. if thebits = 0 then
  25988. pTDefRegMap(@Self)^.clr := $00000002
  25989. else
  25990. pTDefRegMap(@Self)^.&set := $00000002;
  25991. end;
  25992. function TI2C2A_I2C2ACON.getRSEN : TBits_1; inline;
  25993. begin
  25994. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  25995. end;
  25996. procedure TI2C2A_I2C2ACON.setPEN; inline;
  25997. begin
  25998. pTDefRegMap(@Self)^.&set := $00000004;
  25999. end;
  26000. procedure TI2C2A_I2C2ACON.clearPEN; inline;
  26001. begin
  26002. pTDefRegMap(@Self)^.clr := $00000004;
  26003. end;
  26004. procedure TI2C2A_I2C2ACON.setPEN(thebits : TBits_1); inline;
  26005. begin
  26006. if thebits = 0 then
  26007. pTDefRegMap(@Self)^.clr := $00000004
  26008. else
  26009. pTDefRegMap(@Self)^.&set := $00000004;
  26010. end;
  26011. function TI2C2A_I2C2ACON.getPEN : TBits_1; inline;
  26012. begin
  26013. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  26014. end;
  26015. procedure TI2C2A_I2C2ACON.setRCEN; inline;
  26016. begin
  26017. pTDefRegMap(@Self)^.&set := $00000008;
  26018. end;
  26019. procedure TI2C2A_I2C2ACON.clearRCEN; inline;
  26020. begin
  26021. pTDefRegMap(@Self)^.clr := $00000008;
  26022. end;
  26023. procedure TI2C2A_I2C2ACON.setRCEN(thebits : TBits_1); inline;
  26024. begin
  26025. if thebits = 0 then
  26026. pTDefRegMap(@Self)^.clr := $00000008
  26027. else
  26028. pTDefRegMap(@Self)^.&set := $00000008;
  26029. end;
  26030. function TI2C2A_I2C2ACON.getRCEN : TBits_1; inline;
  26031. begin
  26032. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  26033. end;
  26034. procedure TI2C2A_I2C2ACON.setACKEN; inline;
  26035. begin
  26036. pTDefRegMap(@Self)^.&set := $00000010;
  26037. end;
  26038. procedure TI2C2A_I2C2ACON.clearACKEN; inline;
  26039. begin
  26040. pTDefRegMap(@Self)^.clr := $00000010;
  26041. end;
  26042. procedure TI2C2A_I2C2ACON.setACKEN(thebits : TBits_1); inline;
  26043. begin
  26044. if thebits = 0 then
  26045. pTDefRegMap(@Self)^.clr := $00000010
  26046. else
  26047. pTDefRegMap(@Self)^.&set := $00000010;
  26048. end;
  26049. function TI2C2A_I2C2ACON.getACKEN : TBits_1; inline;
  26050. begin
  26051. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  26052. end;
  26053. procedure TI2C2A_I2C2ACON.setACKDT; inline;
  26054. begin
  26055. pTDefRegMap(@Self)^.&set := $00000020;
  26056. end;
  26057. procedure TI2C2A_I2C2ACON.clearACKDT; inline;
  26058. begin
  26059. pTDefRegMap(@Self)^.clr := $00000020;
  26060. end;
  26061. procedure TI2C2A_I2C2ACON.setACKDT(thebits : TBits_1); inline;
  26062. begin
  26063. if thebits = 0 then
  26064. pTDefRegMap(@Self)^.clr := $00000020
  26065. else
  26066. pTDefRegMap(@Self)^.&set := $00000020;
  26067. end;
  26068. function TI2C2A_I2C2ACON.getACKDT : TBits_1; inline;
  26069. begin
  26070. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  26071. end;
  26072. procedure TI2C2A_I2C2ACON.setSTREN; inline;
  26073. begin
  26074. pTDefRegMap(@Self)^.&set := $00000040;
  26075. end;
  26076. procedure TI2C2A_I2C2ACON.clearSTREN; inline;
  26077. begin
  26078. pTDefRegMap(@Self)^.clr := $00000040;
  26079. end;
  26080. procedure TI2C2A_I2C2ACON.setSTREN(thebits : TBits_1); inline;
  26081. begin
  26082. if thebits = 0 then
  26083. pTDefRegMap(@Self)^.clr := $00000040
  26084. else
  26085. pTDefRegMap(@Self)^.&set := $00000040;
  26086. end;
  26087. function TI2C2A_I2C2ACON.getSTREN : TBits_1; inline;
  26088. begin
  26089. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  26090. end;
  26091. procedure TI2C2A_I2C2ACON.setGCEN; inline;
  26092. begin
  26093. pTDefRegMap(@Self)^.&set := $00000080;
  26094. end;
  26095. procedure TI2C2A_I2C2ACON.clearGCEN; inline;
  26096. begin
  26097. pTDefRegMap(@Self)^.clr := $00000080;
  26098. end;
  26099. procedure TI2C2A_I2C2ACON.setGCEN(thebits : TBits_1); inline;
  26100. begin
  26101. if thebits = 0 then
  26102. pTDefRegMap(@Self)^.clr := $00000080
  26103. else
  26104. pTDefRegMap(@Self)^.&set := $00000080;
  26105. end;
  26106. function TI2C2A_I2C2ACON.getGCEN : TBits_1; inline;
  26107. begin
  26108. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  26109. end;
  26110. procedure TI2C2A_I2C2ACON.setSMEN; inline;
  26111. begin
  26112. pTDefRegMap(@Self)^.&set := $00000100;
  26113. end;
  26114. procedure TI2C2A_I2C2ACON.clearSMEN; inline;
  26115. begin
  26116. pTDefRegMap(@Self)^.clr := $00000100;
  26117. end;
  26118. procedure TI2C2A_I2C2ACON.setSMEN(thebits : TBits_1); inline;
  26119. begin
  26120. if thebits = 0 then
  26121. pTDefRegMap(@Self)^.clr := $00000100
  26122. else
  26123. pTDefRegMap(@Self)^.&set := $00000100;
  26124. end;
  26125. function TI2C2A_I2C2ACON.getSMEN : TBits_1; inline;
  26126. begin
  26127. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  26128. end;
  26129. procedure TI2C2A_I2C2ACON.setDISSLW; inline;
  26130. begin
  26131. pTDefRegMap(@Self)^.&set := $00000200;
  26132. end;
  26133. procedure TI2C2A_I2C2ACON.clearDISSLW; inline;
  26134. begin
  26135. pTDefRegMap(@Self)^.clr := $00000200;
  26136. end;
  26137. procedure TI2C2A_I2C2ACON.setDISSLW(thebits : TBits_1); inline;
  26138. begin
  26139. if thebits = 0 then
  26140. pTDefRegMap(@Self)^.clr := $00000200
  26141. else
  26142. pTDefRegMap(@Self)^.&set := $00000200;
  26143. end;
  26144. function TI2C2A_I2C2ACON.getDISSLW : TBits_1; inline;
  26145. begin
  26146. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  26147. end;
  26148. procedure TI2C2A_I2C2ACON.setA10M; inline;
  26149. begin
  26150. pTDefRegMap(@Self)^.&set := $00000400;
  26151. end;
  26152. procedure TI2C2A_I2C2ACON.clearA10M; inline;
  26153. begin
  26154. pTDefRegMap(@Self)^.clr := $00000400;
  26155. end;
  26156. procedure TI2C2A_I2C2ACON.setA10M(thebits : TBits_1); inline;
  26157. begin
  26158. if thebits = 0 then
  26159. pTDefRegMap(@Self)^.clr := $00000400
  26160. else
  26161. pTDefRegMap(@Self)^.&set := $00000400;
  26162. end;
  26163. function TI2C2A_I2C2ACON.getA10M : TBits_1; inline;
  26164. begin
  26165. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  26166. end;
  26167. procedure TI2C2A_I2C2ACON.setSTRICT; inline;
  26168. begin
  26169. pTDefRegMap(@Self)^.&set := $00000800;
  26170. end;
  26171. procedure TI2C2A_I2C2ACON.clearSTRICT; inline;
  26172. begin
  26173. pTDefRegMap(@Self)^.clr := $00000800;
  26174. end;
  26175. procedure TI2C2A_I2C2ACON.setSTRICT(thebits : TBits_1); inline;
  26176. begin
  26177. if thebits = 0 then
  26178. pTDefRegMap(@Self)^.clr := $00000800
  26179. else
  26180. pTDefRegMap(@Self)^.&set := $00000800;
  26181. end;
  26182. function TI2C2A_I2C2ACON.getSTRICT : TBits_1; inline;
  26183. begin
  26184. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  26185. end;
  26186. procedure TI2C2A_I2C2ACON.setSCLREL; inline;
  26187. begin
  26188. pTDefRegMap(@Self)^.&set := $00001000;
  26189. end;
  26190. procedure TI2C2A_I2C2ACON.clearSCLREL; inline;
  26191. begin
  26192. pTDefRegMap(@Self)^.clr := $00001000;
  26193. end;
  26194. procedure TI2C2A_I2C2ACON.setSCLREL(thebits : TBits_1); inline;
  26195. begin
  26196. if thebits = 0 then
  26197. pTDefRegMap(@Self)^.clr := $00001000
  26198. else
  26199. pTDefRegMap(@Self)^.&set := $00001000;
  26200. end;
  26201. function TI2C2A_I2C2ACON.getSCLREL : TBits_1; inline;
  26202. begin
  26203. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  26204. end;
  26205. procedure TI2C2A_I2C2ACON.setSIDL; inline;
  26206. begin
  26207. pTDefRegMap(@Self)^.&set := $00002000;
  26208. end;
  26209. procedure TI2C2A_I2C2ACON.clearSIDL; inline;
  26210. begin
  26211. pTDefRegMap(@Self)^.clr := $00002000;
  26212. end;
  26213. procedure TI2C2A_I2C2ACON.setSIDL(thebits : TBits_1); inline;
  26214. begin
  26215. if thebits = 0 then
  26216. pTDefRegMap(@Self)^.clr := $00002000
  26217. else
  26218. pTDefRegMap(@Self)^.&set := $00002000;
  26219. end;
  26220. function TI2C2A_I2C2ACON.getSIDL : TBits_1; inline;
  26221. begin
  26222. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  26223. end;
  26224. procedure TI2C2A_I2C2ACON.setON; inline;
  26225. begin
  26226. pTDefRegMap(@Self)^.&set := $00008000;
  26227. end;
  26228. procedure TI2C2A_I2C2ACON.clearON; inline;
  26229. begin
  26230. pTDefRegMap(@Self)^.clr := $00008000;
  26231. end;
  26232. procedure TI2C2A_I2C2ACON.setON(thebits : TBits_1); inline;
  26233. begin
  26234. if thebits = 0 then
  26235. pTDefRegMap(@Self)^.clr := $00008000
  26236. else
  26237. pTDefRegMap(@Self)^.&set := $00008000;
  26238. end;
  26239. function TI2C2A_I2C2ACON.getON : TBits_1; inline;
  26240. begin
  26241. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  26242. end;
  26243. procedure TI2C2A_I2C2ACON.setIPMIEN; inline;
  26244. begin
  26245. pTDefRegMap(@Self)^.&set := $00000800;
  26246. end;
  26247. procedure TI2C2A_I2C2ACON.clearIPMIEN; inline;
  26248. begin
  26249. pTDefRegMap(@Self)^.clr := $00000800;
  26250. end;
  26251. procedure TI2C2A_I2C2ACON.setIPMIEN(thebits : TBits_1); inline;
  26252. begin
  26253. if thebits = 0 then
  26254. pTDefRegMap(@Self)^.clr := $00000800
  26255. else
  26256. pTDefRegMap(@Self)^.&set := $00000800;
  26257. end;
  26258. function TI2C2A_I2C2ACON.getIPMIEN : TBits_1; inline;
  26259. begin
  26260. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  26261. end;
  26262. procedure TI2C2A_I2C2ACON.setI2CSIDL; inline;
  26263. begin
  26264. pTDefRegMap(@Self)^.&set := $00002000;
  26265. end;
  26266. procedure TI2C2A_I2C2ACON.clearI2CSIDL; inline;
  26267. begin
  26268. pTDefRegMap(@Self)^.clr := $00002000;
  26269. end;
  26270. procedure TI2C2A_I2C2ACON.setI2CSIDL(thebits : TBits_1); inline;
  26271. begin
  26272. if thebits = 0 then
  26273. pTDefRegMap(@Self)^.clr := $00002000
  26274. else
  26275. pTDefRegMap(@Self)^.&set := $00002000;
  26276. end;
  26277. function TI2C2A_I2C2ACON.getI2CSIDL : TBits_1; inline;
  26278. begin
  26279. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  26280. end;
  26281. procedure TI2C2A_I2C2ACON.setI2CEN; inline;
  26282. begin
  26283. pTDefRegMap(@Self)^.&set := $00008000;
  26284. end;
  26285. procedure TI2C2A_I2C2ACON.clearI2CEN; inline;
  26286. begin
  26287. pTDefRegMap(@Self)^.clr := $00008000;
  26288. end;
  26289. procedure TI2C2A_I2C2ACON.setI2CEN(thebits : TBits_1); inline;
  26290. begin
  26291. if thebits = 0 then
  26292. pTDefRegMap(@Self)^.clr := $00008000
  26293. else
  26294. pTDefRegMap(@Self)^.&set := $00008000;
  26295. end;
  26296. function TI2C2A_I2C2ACON.getI2CEN : TBits_1; inline;
  26297. begin
  26298. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  26299. end;
  26300. procedure TI2C2A_I2C2ACON.setw(thebits : TBits_32); inline;
  26301. begin
  26302. pTDefRegMap(@Self)^.val := thebits;
  26303. end;
  26304. function TI2C2A_I2C2ACON.getw : TBits_32; inline;
  26305. begin
  26306. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  26307. end;
  26308. procedure TI2C2A_I2C4CON.setSEN; inline;
  26309. begin
  26310. pTDefRegMap(@Self)^.&set := $00000001;
  26311. end;
  26312. procedure TI2C2A_I2C4CON.clearSEN; inline;
  26313. begin
  26314. pTDefRegMap(@Self)^.clr := $00000001;
  26315. end;
  26316. procedure TI2C2A_I2C4CON.setSEN(thebits : TBits_1); inline;
  26317. begin
  26318. if thebits = 0 then
  26319. pTDefRegMap(@Self)^.clr := $00000001
  26320. else
  26321. pTDefRegMap(@Self)^.&set := $00000001;
  26322. end;
  26323. function TI2C2A_I2C4CON.getSEN : TBits_1; inline;
  26324. begin
  26325. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  26326. end;
  26327. procedure TI2C2A_I2C4CON.setRSEN; inline;
  26328. begin
  26329. pTDefRegMap(@Self)^.&set := $00000002;
  26330. end;
  26331. procedure TI2C2A_I2C4CON.clearRSEN; inline;
  26332. begin
  26333. pTDefRegMap(@Self)^.clr := $00000002;
  26334. end;
  26335. procedure TI2C2A_I2C4CON.setRSEN(thebits : TBits_1); inline;
  26336. begin
  26337. if thebits = 0 then
  26338. pTDefRegMap(@Self)^.clr := $00000002
  26339. else
  26340. pTDefRegMap(@Self)^.&set := $00000002;
  26341. end;
  26342. function TI2C2A_I2C4CON.getRSEN : TBits_1; inline;
  26343. begin
  26344. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  26345. end;
  26346. procedure TI2C2A_I2C4CON.setPEN; inline;
  26347. begin
  26348. pTDefRegMap(@Self)^.&set := $00000004;
  26349. end;
  26350. procedure TI2C2A_I2C4CON.clearPEN; inline;
  26351. begin
  26352. pTDefRegMap(@Self)^.clr := $00000004;
  26353. end;
  26354. procedure TI2C2A_I2C4CON.setPEN(thebits : TBits_1); inline;
  26355. begin
  26356. if thebits = 0 then
  26357. pTDefRegMap(@Self)^.clr := $00000004
  26358. else
  26359. pTDefRegMap(@Self)^.&set := $00000004;
  26360. end;
  26361. function TI2C2A_I2C4CON.getPEN : TBits_1; inline;
  26362. begin
  26363. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  26364. end;
  26365. procedure TI2C2A_I2C4CON.setRCEN; inline;
  26366. begin
  26367. pTDefRegMap(@Self)^.&set := $00000008;
  26368. end;
  26369. procedure TI2C2A_I2C4CON.clearRCEN; inline;
  26370. begin
  26371. pTDefRegMap(@Self)^.clr := $00000008;
  26372. end;
  26373. procedure TI2C2A_I2C4CON.setRCEN(thebits : TBits_1); inline;
  26374. begin
  26375. if thebits = 0 then
  26376. pTDefRegMap(@Self)^.clr := $00000008
  26377. else
  26378. pTDefRegMap(@Self)^.&set := $00000008;
  26379. end;
  26380. function TI2C2A_I2C4CON.getRCEN : TBits_1; inline;
  26381. begin
  26382. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  26383. end;
  26384. procedure TI2C2A_I2C4CON.setACKEN; inline;
  26385. begin
  26386. pTDefRegMap(@Self)^.&set := $00000010;
  26387. end;
  26388. procedure TI2C2A_I2C4CON.clearACKEN; inline;
  26389. begin
  26390. pTDefRegMap(@Self)^.clr := $00000010;
  26391. end;
  26392. procedure TI2C2A_I2C4CON.setACKEN(thebits : TBits_1); inline;
  26393. begin
  26394. if thebits = 0 then
  26395. pTDefRegMap(@Self)^.clr := $00000010
  26396. else
  26397. pTDefRegMap(@Self)^.&set := $00000010;
  26398. end;
  26399. function TI2C2A_I2C4CON.getACKEN : TBits_1; inline;
  26400. begin
  26401. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  26402. end;
  26403. procedure TI2C2A_I2C4CON.setACKDT; inline;
  26404. begin
  26405. pTDefRegMap(@Self)^.&set := $00000020;
  26406. end;
  26407. procedure TI2C2A_I2C4CON.clearACKDT; inline;
  26408. begin
  26409. pTDefRegMap(@Self)^.clr := $00000020;
  26410. end;
  26411. procedure TI2C2A_I2C4CON.setACKDT(thebits : TBits_1); inline;
  26412. begin
  26413. if thebits = 0 then
  26414. pTDefRegMap(@Self)^.clr := $00000020
  26415. else
  26416. pTDefRegMap(@Self)^.&set := $00000020;
  26417. end;
  26418. function TI2C2A_I2C4CON.getACKDT : TBits_1; inline;
  26419. begin
  26420. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  26421. end;
  26422. procedure TI2C2A_I2C4CON.setSTREN; inline;
  26423. begin
  26424. pTDefRegMap(@Self)^.&set := $00000040;
  26425. end;
  26426. procedure TI2C2A_I2C4CON.clearSTREN; inline;
  26427. begin
  26428. pTDefRegMap(@Self)^.clr := $00000040;
  26429. end;
  26430. procedure TI2C2A_I2C4CON.setSTREN(thebits : TBits_1); inline;
  26431. begin
  26432. if thebits = 0 then
  26433. pTDefRegMap(@Self)^.clr := $00000040
  26434. else
  26435. pTDefRegMap(@Self)^.&set := $00000040;
  26436. end;
  26437. function TI2C2A_I2C4CON.getSTREN : TBits_1; inline;
  26438. begin
  26439. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  26440. end;
  26441. procedure TI2C2A_I2C4CON.setGCEN; inline;
  26442. begin
  26443. pTDefRegMap(@Self)^.&set := $00000080;
  26444. end;
  26445. procedure TI2C2A_I2C4CON.clearGCEN; inline;
  26446. begin
  26447. pTDefRegMap(@Self)^.clr := $00000080;
  26448. end;
  26449. procedure TI2C2A_I2C4CON.setGCEN(thebits : TBits_1); inline;
  26450. begin
  26451. if thebits = 0 then
  26452. pTDefRegMap(@Self)^.clr := $00000080
  26453. else
  26454. pTDefRegMap(@Self)^.&set := $00000080;
  26455. end;
  26456. function TI2C2A_I2C4CON.getGCEN : TBits_1; inline;
  26457. begin
  26458. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  26459. end;
  26460. procedure TI2C2A_I2C4CON.setSMEN; inline;
  26461. begin
  26462. pTDefRegMap(@Self)^.&set := $00000100;
  26463. end;
  26464. procedure TI2C2A_I2C4CON.clearSMEN; inline;
  26465. begin
  26466. pTDefRegMap(@Self)^.clr := $00000100;
  26467. end;
  26468. procedure TI2C2A_I2C4CON.setSMEN(thebits : TBits_1); inline;
  26469. begin
  26470. if thebits = 0 then
  26471. pTDefRegMap(@Self)^.clr := $00000100
  26472. else
  26473. pTDefRegMap(@Self)^.&set := $00000100;
  26474. end;
  26475. function TI2C2A_I2C4CON.getSMEN : TBits_1; inline;
  26476. begin
  26477. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  26478. end;
  26479. procedure TI2C2A_I2C4CON.setDISSLW; inline;
  26480. begin
  26481. pTDefRegMap(@Self)^.&set := $00000200;
  26482. end;
  26483. procedure TI2C2A_I2C4CON.clearDISSLW; inline;
  26484. begin
  26485. pTDefRegMap(@Self)^.clr := $00000200;
  26486. end;
  26487. procedure TI2C2A_I2C4CON.setDISSLW(thebits : TBits_1); inline;
  26488. begin
  26489. if thebits = 0 then
  26490. pTDefRegMap(@Self)^.clr := $00000200
  26491. else
  26492. pTDefRegMap(@Self)^.&set := $00000200;
  26493. end;
  26494. function TI2C2A_I2C4CON.getDISSLW : TBits_1; inline;
  26495. begin
  26496. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  26497. end;
  26498. procedure TI2C2A_I2C4CON.setA10M; inline;
  26499. begin
  26500. pTDefRegMap(@Self)^.&set := $00000400;
  26501. end;
  26502. procedure TI2C2A_I2C4CON.clearA10M; inline;
  26503. begin
  26504. pTDefRegMap(@Self)^.clr := $00000400;
  26505. end;
  26506. procedure TI2C2A_I2C4CON.setA10M(thebits : TBits_1); inline;
  26507. begin
  26508. if thebits = 0 then
  26509. pTDefRegMap(@Self)^.clr := $00000400
  26510. else
  26511. pTDefRegMap(@Self)^.&set := $00000400;
  26512. end;
  26513. function TI2C2A_I2C4CON.getA10M : TBits_1; inline;
  26514. begin
  26515. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  26516. end;
  26517. procedure TI2C2A_I2C4CON.setSTRICT; inline;
  26518. begin
  26519. pTDefRegMap(@Self)^.&set := $00000800;
  26520. end;
  26521. procedure TI2C2A_I2C4CON.clearSTRICT; inline;
  26522. begin
  26523. pTDefRegMap(@Self)^.clr := $00000800;
  26524. end;
  26525. procedure TI2C2A_I2C4CON.setSTRICT(thebits : TBits_1); inline;
  26526. begin
  26527. if thebits = 0 then
  26528. pTDefRegMap(@Self)^.clr := $00000800
  26529. else
  26530. pTDefRegMap(@Self)^.&set := $00000800;
  26531. end;
  26532. function TI2C2A_I2C4CON.getSTRICT : TBits_1; inline;
  26533. begin
  26534. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  26535. end;
  26536. procedure TI2C2A_I2C4CON.setSCLREL; inline;
  26537. begin
  26538. pTDefRegMap(@Self)^.&set := $00001000;
  26539. end;
  26540. procedure TI2C2A_I2C4CON.clearSCLREL; inline;
  26541. begin
  26542. pTDefRegMap(@Self)^.clr := $00001000;
  26543. end;
  26544. procedure TI2C2A_I2C4CON.setSCLREL(thebits : TBits_1); inline;
  26545. begin
  26546. if thebits = 0 then
  26547. pTDefRegMap(@Self)^.clr := $00001000
  26548. else
  26549. pTDefRegMap(@Self)^.&set := $00001000;
  26550. end;
  26551. function TI2C2A_I2C4CON.getSCLREL : TBits_1; inline;
  26552. begin
  26553. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  26554. end;
  26555. procedure TI2C2A_I2C4CON.setSIDL; inline;
  26556. begin
  26557. pTDefRegMap(@Self)^.&set := $00002000;
  26558. end;
  26559. procedure TI2C2A_I2C4CON.clearSIDL; inline;
  26560. begin
  26561. pTDefRegMap(@Self)^.clr := $00002000;
  26562. end;
  26563. procedure TI2C2A_I2C4CON.setSIDL(thebits : TBits_1); inline;
  26564. begin
  26565. if thebits = 0 then
  26566. pTDefRegMap(@Self)^.clr := $00002000
  26567. else
  26568. pTDefRegMap(@Self)^.&set := $00002000;
  26569. end;
  26570. function TI2C2A_I2C4CON.getSIDL : TBits_1; inline;
  26571. begin
  26572. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  26573. end;
  26574. procedure TI2C2A_I2C4CON.setON; inline;
  26575. begin
  26576. pTDefRegMap(@Self)^.&set := $00008000;
  26577. end;
  26578. procedure TI2C2A_I2C4CON.clearON; inline;
  26579. begin
  26580. pTDefRegMap(@Self)^.clr := $00008000;
  26581. end;
  26582. procedure TI2C2A_I2C4CON.setON(thebits : TBits_1); inline;
  26583. begin
  26584. if thebits = 0 then
  26585. pTDefRegMap(@Self)^.clr := $00008000
  26586. else
  26587. pTDefRegMap(@Self)^.&set := $00008000;
  26588. end;
  26589. function TI2C2A_I2C4CON.getON : TBits_1; inline;
  26590. begin
  26591. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  26592. end;
  26593. procedure TI2C2A_I2C4CON.setIPMIEN; inline;
  26594. begin
  26595. pTDefRegMap(@Self)^.&set := $00000800;
  26596. end;
  26597. procedure TI2C2A_I2C4CON.clearIPMIEN; inline;
  26598. begin
  26599. pTDefRegMap(@Self)^.clr := $00000800;
  26600. end;
  26601. procedure TI2C2A_I2C4CON.setIPMIEN(thebits : TBits_1); inline;
  26602. begin
  26603. if thebits = 0 then
  26604. pTDefRegMap(@Self)^.clr := $00000800
  26605. else
  26606. pTDefRegMap(@Self)^.&set := $00000800;
  26607. end;
  26608. function TI2C2A_I2C4CON.getIPMIEN : TBits_1; inline;
  26609. begin
  26610. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  26611. end;
  26612. procedure TI2C2A_I2C4CON.setI2CSIDL; inline;
  26613. begin
  26614. pTDefRegMap(@Self)^.&set := $00002000;
  26615. end;
  26616. procedure TI2C2A_I2C4CON.clearI2CSIDL; inline;
  26617. begin
  26618. pTDefRegMap(@Self)^.clr := $00002000;
  26619. end;
  26620. procedure TI2C2A_I2C4CON.setI2CSIDL(thebits : TBits_1); inline;
  26621. begin
  26622. if thebits = 0 then
  26623. pTDefRegMap(@Self)^.clr := $00002000
  26624. else
  26625. pTDefRegMap(@Self)^.&set := $00002000;
  26626. end;
  26627. function TI2C2A_I2C4CON.getI2CSIDL : TBits_1; inline;
  26628. begin
  26629. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  26630. end;
  26631. procedure TI2C2A_I2C4CON.setI2CEN; inline;
  26632. begin
  26633. pTDefRegMap(@Self)^.&set := $00008000;
  26634. end;
  26635. procedure TI2C2A_I2C4CON.clearI2CEN; inline;
  26636. begin
  26637. pTDefRegMap(@Self)^.clr := $00008000;
  26638. end;
  26639. procedure TI2C2A_I2C4CON.setI2CEN(thebits : TBits_1); inline;
  26640. begin
  26641. if thebits = 0 then
  26642. pTDefRegMap(@Self)^.clr := $00008000
  26643. else
  26644. pTDefRegMap(@Self)^.&set := $00008000;
  26645. end;
  26646. function TI2C2A_I2C4CON.getI2CEN : TBits_1; inline;
  26647. begin
  26648. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  26649. end;
  26650. procedure TI2C2A_I2C4CON.setw(thebits : TBits_32); inline;
  26651. begin
  26652. pTDefRegMap(@Self)^.val := thebits;
  26653. end;
  26654. function TI2C2A_I2C4CON.getw : TBits_32; inline;
  26655. begin
  26656. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  26657. end;
  26658. procedure TI2C2A_I2C2ASTAT.setTBF; inline;
  26659. begin
  26660. pTDefRegMap(@Self)^.&set := $00000001;
  26661. end;
  26662. procedure TI2C2A_I2C2ASTAT.clearTBF; inline;
  26663. begin
  26664. pTDefRegMap(@Self)^.clr := $00000001;
  26665. end;
  26666. procedure TI2C2A_I2C2ASTAT.setTBF(thebits : TBits_1); inline;
  26667. begin
  26668. if thebits = 0 then
  26669. pTDefRegMap(@Self)^.clr := $00000001
  26670. else
  26671. pTDefRegMap(@Self)^.&set := $00000001;
  26672. end;
  26673. function TI2C2A_I2C2ASTAT.getTBF : TBits_1; inline;
  26674. begin
  26675. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  26676. end;
  26677. procedure TI2C2A_I2C2ASTAT.setRBF; inline;
  26678. begin
  26679. pTDefRegMap(@Self)^.&set := $00000002;
  26680. end;
  26681. procedure TI2C2A_I2C2ASTAT.clearRBF; inline;
  26682. begin
  26683. pTDefRegMap(@Self)^.clr := $00000002;
  26684. end;
  26685. procedure TI2C2A_I2C2ASTAT.setRBF(thebits : TBits_1); inline;
  26686. begin
  26687. if thebits = 0 then
  26688. pTDefRegMap(@Self)^.clr := $00000002
  26689. else
  26690. pTDefRegMap(@Self)^.&set := $00000002;
  26691. end;
  26692. function TI2C2A_I2C2ASTAT.getRBF : TBits_1; inline;
  26693. begin
  26694. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  26695. end;
  26696. procedure TI2C2A_I2C2ASTAT.setR_W; inline;
  26697. begin
  26698. pTDefRegMap(@Self)^.&set := $00000004;
  26699. end;
  26700. procedure TI2C2A_I2C2ASTAT.clearR_W; inline;
  26701. begin
  26702. pTDefRegMap(@Self)^.clr := $00000004;
  26703. end;
  26704. procedure TI2C2A_I2C2ASTAT.setR_W(thebits : TBits_1); inline;
  26705. begin
  26706. if thebits = 0 then
  26707. pTDefRegMap(@Self)^.clr := $00000004
  26708. else
  26709. pTDefRegMap(@Self)^.&set := $00000004;
  26710. end;
  26711. function TI2C2A_I2C2ASTAT.getR_W : TBits_1; inline;
  26712. begin
  26713. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  26714. end;
  26715. procedure TI2C2A_I2C2ASTAT.setS; inline;
  26716. begin
  26717. pTDefRegMap(@Self)^.&set := $00000008;
  26718. end;
  26719. procedure TI2C2A_I2C2ASTAT.clearS; inline;
  26720. begin
  26721. pTDefRegMap(@Self)^.clr := $00000008;
  26722. end;
  26723. procedure TI2C2A_I2C2ASTAT.setS(thebits : TBits_1); inline;
  26724. begin
  26725. if thebits = 0 then
  26726. pTDefRegMap(@Self)^.clr := $00000008
  26727. else
  26728. pTDefRegMap(@Self)^.&set := $00000008;
  26729. end;
  26730. function TI2C2A_I2C2ASTAT.getS : TBits_1; inline;
  26731. begin
  26732. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  26733. end;
  26734. procedure TI2C2A_I2C2ASTAT.setP; inline;
  26735. begin
  26736. pTDefRegMap(@Self)^.&set := $00000010;
  26737. end;
  26738. procedure TI2C2A_I2C2ASTAT.clearP; inline;
  26739. begin
  26740. pTDefRegMap(@Self)^.clr := $00000010;
  26741. end;
  26742. procedure TI2C2A_I2C2ASTAT.setP(thebits : TBits_1); inline;
  26743. begin
  26744. if thebits = 0 then
  26745. pTDefRegMap(@Self)^.clr := $00000010
  26746. else
  26747. pTDefRegMap(@Self)^.&set := $00000010;
  26748. end;
  26749. function TI2C2A_I2C2ASTAT.getP : TBits_1; inline;
  26750. begin
  26751. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  26752. end;
  26753. procedure TI2C2A_I2C2ASTAT.setD_A; inline;
  26754. begin
  26755. pTDefRegMap(@Self)^.&set := $00000020;
  26756. end;
  26757. procedure TI2C2A_I2C2ASTAT.clearD_A; inline;
  26758. begin
  26759. pTDefRegMap(@Self)^.clr := $00000020;
  26760. end;
  26761. procedure TI2C2A_I2C2ASTAT.setD_A(thebits : TBits_1); inline;
  26762. begin
  26763. if thebits = 0 then
  26764. pTDefRegMap(@Self)^.clr := $00000020
  26765. else
  26766. pTDefRegMap(@Self)^.&set := $00000020;
  26767. end;
  26768. function TI2C2A_I2C2ASTAT.getD_A : TBits_1; inline;
  26769. begin
  26770. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  26771. end;
  26772. procedure TI2C2A_I2C2ASTAT.setI2COV; inline;
  26773. begin
  26774. pTDefRegMap(@Self)^.&set := $00000040;
  26775. end;
  26776. procedure TI2C2A_I2C2ASTAT.clearI2COV; inline;
  26777. begin
  26778. pTDefRegMap(@Self)^.clr := $00000040;
  26779. end;
  26780. procedure TI2C2A_I2C2ASTAT.setI2COV(thebits : TBits_1); inline;
  26781. begin
  26782. if thebits = 0 then
  26783. pTDefRegMap(@Self)^.clr := $00000040
  26784. else
  26785. pTDefRegMap(@Self)^.&set := $00000040;
  26786. end;
  26787. function TI2C2A_I2C2ASTAT.getI2COV : TBits_1; inline;
  26788. begin
  26789. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  26790. end;
  26791. procedure TI2C2A_I2C2ASTAT.setIWCOL; inline;
  26792. begin
  26793. pTDefRegMap(@Self)^.&set := $00000080;
  26794. end;
  26795. procedure TI2C2A_I2C2ASTAT.clearIWCOL; inline;
  26796. begin
  26797. pTDefRegMap(@Self)^.clr := $00000080;
  26798. end;
  26799. procedure TI2C2A_I2C2ASTAT.setIWCOL(thebits : TBits_1); inline;
  26800. begin
  26801. if thebits = 0 then
  26802. pTDefRegMap(@Self)^.clr := $00000080
  26803. else
  26804. pTDefRegMap(@Self)^.&set := $00000080;
  26805. end;
  26806. function TI2C2A_I2C2ASTAT.getIWCOL : TBits_1; inline;
  26807. begin
  26808. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  26809. end;
  26810. procedure TI2C2A_I2C2ASTAT.setADD10; inline;
  26811. begin
  26812. pTDefRegMap(@Self)^.&set := $00000100;
  26813. end;
  26814. procedure TI2C2A_I2C2ASTAT.clearADD10; inline;
  26815. begin
  26816. pTDefRegMap(@Self)^.clr := $00000100;
  26817. end;
  26818. procedure TI2C2A_I2C2ASTAT.setADD10(thebits : TBits_1); inline;
  26819. begin
  26820. if thebits = 0 then
  26821. pTDefRegMap(@Self)^.clr := $00000100
  26822. else
  26823. pTDefRegMap(@Self)^.&set := $00000100;
  26824. end;
  26825. function TI2C2A_I2C2ASTAT.getADD10 : TBits_1; inline;
  26826. begin
  26827. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  26828. end;
  26829. procedure TI2C2A_I2C2ASTAT.setGCSTAT; inline;
  26830. begin
  26831. pTDefRegMap(@Self)^.&set := $00000200;
  26832. end;
  26833. procedure TI2C2A_I2C2ASTAT.clearGCSTAT; inline;
  26834. begin
  26835. pTDefRegMap(@Self)^.clr := $00000200;
  26836. end;
  26837. procedure TI2C2A_I2C2ASTAT.setGCSTAT(thebits : TBits_1); inline;
  26838. begin
  26839. if thebits = 0 then
  26840. pTDefRegMap(@Self)^.clr := $00000200
  26841. else
  26842. pTDefRegMap(@Self)^.&set := $00000200;
  26843. end;
  26844. function TI2C2A_I2C2ASTAT.getGCSTAT : TBits_1; inline;
  26845. begin
  26846. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  26847. end;
  26848. procedure TI2C2A_I2C2ASTAT.setBCL; inline;
  26849. begin
  26850. pTDefRegMap(@Self)^.&set := $00000400;
  26851. end;
  26852. procedure TI2C2A_I2C2ASTAT.clearBCL; inline;
  26853. begin
  26854. pTDefRegMap(@Self)^.clr := $00000400;
  26855. end;
  26856. procedure TI2C2A_I2C2ASTAT.setBCL(thebits : TBits_1); inline;
  26857. begin
  26858. if thebits = 0 then
  26859. pTDefRegMap(@Self)^.clr := $00000400
  26860. else
  26861. pTDefRegMap(@Self)^.&set := $00000400;
  26862. end;
  26863. function TI2C2A_I2C2ASTAT.getBCL : TBits_1; inline;
  26864. begin
  26865. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  26866. end;
  26867. procedure TI2C2A_I2C2ASTAT.setTRSTAT; inline;
  26868. begin
  26869. pTDefRegMap(@Self)^.&set := $00004000;
  26870. end;
  26871. procedure TI2C2A_I2C2ASTAT.clearTRSTAT; inline;
  26872. begin
  26873. pTDefRegMap(@Self)^.clr := $00004000;
  26874. end;
  26875. procedure TI2C2A_I2C2ASTAT.setTRSTAT(thebits : TBits_1); inline;
  26876. begin
  26877. if thebits = 0 then
  26878. pTDefRegMap(@Self)^.clr := $00004000
  26879. else
  26880. pTDefRegMap(@Self)^.&set := $00004000;
  26881. end;
  26882. function TI2C2A_I2C2ASTAT.getTRSTAT : TBits_1; inline;
  26883. begin
  26884. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  26885. end;
  26886. procedure TI2C2A_I2C2ASTAT.setACKSTAT; inline;
  26887. begin
  26888. pTDefRegMap(@Self)^.&set := $00008000;
  26889. end;
  26890. procedure TI2C2A_I2C2ASTAT.clearACKSTAT; inline;
  26891. begin
  26892. pTDefRegMap(@Self)^.clr := $00008000;
  26893. end;
  26894. procedure TI2C2A_I2C2ASTAT.setACKSTAT(thebits : TBits_1); inline;
  26895. begin
  26896. if thebits = 0 then
  26897. pTDefRegMap(@Self)^.clr := $00008000
  26898. else
  26899. pTDefRegMap(@Self)^.&set := $00008000;
  26900. end;
  26901. function TI2C2A_I2C2ASTAT.getACKSTAT : TBits_1; inline;
  26902. begin
  26903. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  26904. end;
  26905. procedure TI2C2A_I2C2ASTAT.setI2CPOV; inline;
  26906. begin
  26907. pTDefRegMap(@Self)^.&set := $00000040;
  26908. end;
  26909. procedure TI2C2A_I2C2ASTAT.clearI2CPOV; inline;
  26910. begin
  26911. pTDefRegMap(@Self)^.clr := $00000040;
  26912. end;
  26913. procedure TI2C2A_I2C2ASTAT.setI2CPOV(thebits : TBits_1); inline;
  26914. begin
  26915. if thebits = 0 then
  26916. pTDefRegMap(@Self)^.clr := $00000040
  26917. else
  26918. pTDefRegMap(@Self)^.&set := $00000040;
  26919. end;
  26920. function TI2C2A_I2C2ASTAT.getI2CPOV : TBits_1; inline;
  26921. begin
  26922. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  26923. end;
  26924. procedure TI2C2A_I2C2ASTAT.setw(thebits : TBits_32); inline;
  26925. begin
  26926. pTDefRegMap(@Self)^.val := thebits;
  26927. end;
  26928. function TI2C2A_I2C2ASTAT.getw : TBits_32; inline;
  26929. begin
  26930. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  26931. end;
  26932. procedure TI2C2A_I2C4STAT.setTBF; inline;
  26933. begin
  26934. pTDefRegMap(@Self)^.&set := $00000001;
  26935. end;
  26936. procedure TI2C2A_I2C4STAT.clearTBF; inline;
  26937. begin
  26938. pTDefRegMap(@Self)^.clr := $00000001;
  26939. end;
  26940. procedure TI2C2A_I2C4STAT.setTBF(thebits : TBits_1); inline;
  26941. begin
  26942. if thebits = 0 then
  26943. pTDefRegMap(@Self)^.clr := $00000001
  26944. else
  26945. pTDefRegMap(@Self)^.&set := $00000001;
  26946. end;
  26947. function TI2C2A_I2C4STAT.getTBF : TBits_1; inline;
  26948. begin
  26949. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  26950. end;
  26951. procedure TI2C2A_I2C4STAT.setRBF; inline;
  26952. begin
  26953. pTDefRegMap(@Self)^.&set := $00000002;
  26954. end;
  26955. procedure TI2C2A_I2C4STAT.clearRBF; inline;
  26956. begin
  26957. pTDefRegMap(@Self)^.clr := $00000002;
  26958. end;
  26959. procedure TI2C2A_I2C4STAT.setRBF(thebits : TBits_1); inline;
  26960. begin
  26961. if thebits = 0 then
  26962. pTDefRegMap(@Self)^.clr := $00000002
  26963. else
  26964. pTDefRegMap(@Self)^.&set := $00000002;
  26965. end;
  26966. function TI2C2A_I2C4STAT.getRBF : TBits_1; inline;
  26967. begin
  26968. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  26969. end;
  26970. procedure TI2C2A_I2C4STAT.setR_W; inline;
  26971. begin
  26972. pTDefRegMap(@Self)^.&set := $00000004;
  26973. end;
  26974. procedure TI2C2A_I2C4STAT.clearR_W; inline;
  26975. begin
  26976. pTDefRegMap(@Self)^.clr := $00000004;
  26977. end;
  26978. procedure TI2C2A_I2C4STAT.setR_W(thebits : TBits_1); inline;
  26979. begin
  26980. if thebits = 0 then
  26981. pTDefRegMap(@Self)^.clr := $00000004
  26982. else
  26983. pTDefRegMap(@Self)^.&set := $00000004;
  26984. end;
  26985. function TI2C2A_I2C4STAT.getR_W : TBits_1; inline;
  26986. begin
  26987. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  26988. end;
  26989. procedure TI2C2A_I2C4STAT.setS; inline;
  26990. begin
  26991. pTDefRegMap(@Self)^.&set := $00000008;
  26992. end;
  26993. procedure TI2C2A_I2C4STAT.clearS; inline;
  26994. begin
  26995. pTDefRegMap(@Self)^.clr := $00000008;
  26996. end;
  26997. procedure TI2C2A_I2C4STAT.setS(thebits : TBits_1); inline;
  26998. begin
  26999. if thebits = 0 then
  27000. pTDefRegMap(@Self)^.clr := $00000008
  27001. else
  27002. pTDefRegMap(@Self)^.&set := $00000008;
  27003. end;
  27004. function TI2C2A_I2C4STAT.getS : TBits_1; inline;
  27005. begin
  27006. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  27007. end;
  27008. procedure TI2C2A_I2C4STAT.setP; inline;
  27009. begin
  27010. pTDefRegMap(@Self)^.&set := $00000010;
  27011. end;
  27012. procedure TI2C2A_I2C4STAT.clearP; inline;
  27013. begin
  27014. pTDefRegMap(@Self)^.clr := $00000010;
  27015. end;
  27016. procedure TI2C2A_I2C4STAT.setP(thebits : TBits_1); inline;
  27017. begin
  27018. if thebits = 0 then
  27019. pTDefRegMap(@Self)^.clr := $00000010
  27020. else
  27021. pTDefRegMap(@Self)^.&set := $00000010;
  27022. end;
  27023. function TI2C2A_I2C4STAT.getP : TBits_1; inline;
  27024. begin
  27025. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  27026. end;
  27027. procedure TI2C2A_I2C4STAT.setD_A; inline;
  27028. begin
  27029. pTDefRegMap(@Self)^.&set := $00000020;
  27030. end;
  27031. procedure TI2C2A_I2C4STAT.clearD_A; inline;
  27032. begin
  27033. pTDefRegMap(@Self)^.clr := $00000020;
  27034. end;
  27035. procedure TI2C2A_I2C4STAT.setD_A(thebits : TBits_1); inline;
  27036. begin
  27037. if thebits = 0 then
  27038. pTDefRegMap(@Self)^.clr := $00000020
  27039. else
  27040. pTDefRegMap(@Self)^.&set := $00000020;
  27041. end;
  27042. function TI2C2A_I2C4STAT.getD_A : TBits_1; inline;
  27043. begin
  27044. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  27045. end;
  27046. procedure TI2C2A_I2C4STAT.setI2COV; inline;
  27047. begin
  27048. pTDefRegMap(@Self)^.&set := $00000040;
  27049. end;
  27050. procedure TI2C2A_I2C4STAT.clearI2COV; inline;
  27051. begin
  27052. pTDefRegMap(@Self)^.clr := $00000040;
  27053. end;
  27054. procedure TI2C2A_I2C4STAT.setI2COV(thebits : TBits_1); inline;
  27055. begin
  27056. if thebits = 0 then
  27057. pTDefRegMap(@Self)^.clr := $00000040
  27058. else
  27059. pTDefRegMap(@Self)^.&set := $00000040;
  27060. end;
  27061. function TI2C2A_I2C4STAT.getI2COV : TBits_1; inline;
  27062. begin
  27063. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  27064. end;
  27065. procedure TI2C2A_I2C4STAT.setIWCOL; inline;
  27066. begin
  27067. pTDefRegMap(@Self)^.&set := $00000080;
  27068. end;
  27069. procedure TI2C2A_I2C4STAT.clearIWCOL; inline;
  27070. begin
  27071. pTDefRegMap(@Self)^.clr := $00000080;
  27072. end;
  27073. procedure TI2C2A_I2C4STAT.setIWCOL(thebits : TBits_1); inline;
  27074. begin
  27075. if thebits = 0 then
  27076. pTDefRegMap(@Self)^.clr := $00000080
  27077. else
  27078. pTDefRegMap(@Self)^.&set := $00000080;
  27079. end;
  27080. function TI2C2A_I2C4STAT.getIWCOL : TBits_1; inline;
  27081. begin
  27082. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  27083. end;
  27084. procedure TI2C2A_I2C4STAT.setADD10; inline;
  27085. begin
  27086. pTDefRegMap(@Self)^.&set := $00000100;
  27087. end;
  27088. procedure TI2C2A_I2C4STAT.clearADD10; inline;
  27089. begin
  27090. pTDefRegMap(@Self)^.clr := $00000100;
  27091. end;
  27092. procedure TI2C2A_I2C4STAT.setADD10(thebits : TBits_1); inline;
  27093. begin
  27094. if thebits = 0 then
  27095. pTDefRegMap(@Self)^.clr := $00000100
  27096. else
  27097. pTDefRegMap(@Self)^.&set := $00000100;
  27098. end;
  27099. function TI2C2A_I2C4STAT.getADD10 : TBits_1; inline;
  27100. begin
  27101. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  27102. end;
  27103. procedure TI2C2A_I2C4STAT.setGCSTAT; inline;
  27104. begin
  27105. pTDefRegMap(@Self)^.&set := $00000200;
  27106. end;
  27107. procedure TI2C2A_I2C4STAT.clearGCSTAT; inline;
  27108. begin
  27109. pTDefRegMap(@Self)^.clr := $00000200;
  27110. end;
  27111. procedure TI2C2A_I2C4STAT.setGCSTAT(thebits : TBits_1); inline;
  27112. begin
  27113. if thebits = 0 then
  27114. pTDefRegMap(@Self)^.clr := $00000200
  27115. else
  27116. pTDefRegMap(@Self)^.&set := $00000200;
  27117. end;
  27118. function TI2C2A_I2C4STAT.getGCSTAT : TBits_1; inline;
  27119. begin
  27120. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  27121. end;
  27122. procedure TI2C2A_I2C4STAT.setBCL; inline;
  27123. begin
  27124. pTDefRegMap(@Self)^.&set := $00000400;
  27125. end;
  27126. procedure TI2C2A_I2C4STAT.clearBCL; inline;
  27127. begin
  27128. pTDefRegMap(@Self)^.clr := $00000400;
  27129. end;
  27130. procedure TI2C2A_I2C4STAT.setBCL(thebits : TBits_1); inline;
  27131. begin
  27132. if thebits = 0 then
  27133. pTDefRegMap(@Self)^.clr := $00000400
  27134. else
  27135. pTDefRegMap(@Self)^.&set := $00000400;
  27136. end;
  27137. function TI2C2A_I2C4STAT.getBCL : TBits_1; inline;
  27138. begin
  27139. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  27140. end;
  27141. procedure TI2C2A_I2C4STAT.setTRSTAT; inline;
  27142. begin
  27143. pTDefRegMap(@Self)^.&set := $00004000;
  27144. end;
  27145. procedure TI2C2A_I2C4STAT.clearTRSTAT; inline;
  27146. begin
  27147. pTDefRegMap(@Self)^.clr := $00004000;
  27148. end;
  27149. procedure TI2C2A_I2C4STAT.setTRSTAT(thebits : TBits_1); inline;
  27150. begin
  27151. if thebits = 0 then
  27152. pTDefRegMap(@Self)^.clr := $00004000
  27153. else
  27154. pTDefRegMap(@Self)^.&set := $00004000;
  27155. end;
  27156. function TI2C2A_I2C4STAT.getTRSTAT : TBits_1; inline;
  27157. begin
  27158. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  27159. end;
  27160. procedure TI2C2A_I2C4STAT.setACKSTAT; inline;
  27161. begin
  27162. pTDefRegMap(@Self)^.&set := $00008000;
  27163. end;
  27164. procedure TI2C2A_I2C4STAT.clearACKSTAT; inline;
  27165. begin
  27166. pTDefRegMap(@Self)^.clr := $00008000;
  27167. end;
  27168. procedure TI2C2A_I2C4STAT.setACKSTAT(thebits : TBits_1); inline;
  27169. begin
  27170. if thebits = 0 then
  27171. pTDefRegMap(@Self)^.clr := $00008000
  27172. else
  27173. pTDefRegMap(@Self)^.&set := $00008000;
  27174. end;
  27175. function TI2C2A_I2C4STAT.getACKSTAT : TBits_1; inline;
  27176. begin
  27177. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  27178. end;
  27179. procedure TI2C2A_I2C4STAT.setI2CPOV; inline;
  27180. begin
  27181. pTDefRegMap(@Self)^.&set := $00000040;
  27182. end;
  27183. procedure TI2C2A_I2C4STAT.clearI2CPOV; inline;
  27184. begin
  27185. pTDefRegMap(@Self)^.clr := $00000040;
  27186. end;
  27187. procedure TI2C2A_I2C4STAT.setI2CPOV(thebits : TBits_1); inline;
  27188. begin
  27189. if thebits = 0 then
  27190. pTDefRegMap(@Self)^.clr := $00000040
  27191. else
  27192. pTDefRegMap(@Self)^.&set := $00000040;
  27193. end;
  27194. function TI2C2A_I2C4STAT.getI2CPOV : TBits_1; inline;
  27195. begin
  27196. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  27197. end;
  27198. procedure TI2C2A_I2C4STAT.setw(thebits : TBits_32); inline;
  27199. begin
  27200. pTDefRegMap(@Self)^.val := thebits;
  27201. end;
  27202. function TI2C2A_I2C4STAT.getw : TBits_32; inline;
  27203. begin
  27204. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  27205. end;
  27206. procedure TI2C5_I2C3ACON.setSEN; inline;
  27207. begin
  27208. pTDefRegMap(@Self)^.&set := $00000001;
  27209. end;
  27210. procedure TI2C5_I2C3ACON.clearSEN; inline;
  27211. begin
  27212. pTDefRegMap(@Self)^.clr := $00000001;
  27213. end;
  27214. procedure TI2C5_I2C3ACON.setSEN(thebits : TBits_1); inline;
  27215. begin
  27216. if thebits = 0 then
  27217. pTDefRegMap(@Self)^.clr := $00000001
  27218. else
  27219. pTDefRegMap(@Self)^.&set := $00000001;
  27220. end;
  27221. function TI2C5_I2C3ACON.getSEN : TBits_1; inline;
  27222. begin
  27223. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  27224. end;
  27225. procedure TI2C5_I2C3ACON.setRSEN; inline;
  27226. begin
  27227. pTDefRegMap(@Self)^.&set := $00000002;
  27228. end;
  27229. procedure TI2C5_I2C3ACON.clearRSEN; inline;
  27230. begin
  27231. pTDefRegMap(@Self)^.clr := $00000002;
  27232. end;
  27233. procedure TI2C5_I2C3ACON.setRSEN(thebits : TBits_1); inline;
  27234. begin
  27235. if thebits = 0 then
  27236. pTDefRegMap(@Self)^.clr := $00000002
  27237. else
  27238. pTDefRegMap(@Self)^.&set := $00000002;
  27239. end;
  27240. function TI2C5_I2C3ACON.getRSEN : TBits_1; inline;
  27241. begin
  27242. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  27243. end;
  27244. procedure TI2C5_I2C3ACON.setPEN; inline;
  27245. begin
  27246. pTDefRegMap(@Self)^.&set := $00000004;
  27247. end;
  27248. procedure TI2C5_I2C3ACON.clearPEN; inline;
  27249. begin
  27250. pTDefRegMap(@Self)^.clr := $00000004;
  27251. end;
  27252. procedure TI2C5_I2C3ACON.setPEN(thebits : TBits_1); inline;
  27253. begin
  27254. if thebits = 0 then
  27255. pTDefRegMap(@Self)^.clr := $00000004
  27256. else
  27257. pTDefRegMap(@Self)^.&set := $00000004;
  27258. end;
  27259. function TI2C5_I2C3ACON.getPEN : TBits_1; inline;
  27260. begin
  27261. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  27262. end;
  27263. procedure TI2C5_I2C3ACON.setRCEN; inline;
  27264. begin
  27265. pTDefRegMap(@Self)^.&set := $00000008;
  27266. end;
  27267. procedure TI2C5_I2C3ACON.clearRCEN; inline;
  27268. begin
  27269. pTDefRegMap(@Self)^.clr := $00000008;
  27270. end;
  27271. procedure TI2C5_I2C3ACON.setRCEN(thebits : TBits_1); inline;
  27272. begin
  27273. if thebits = 0 then
  27274. pTDefRegMap(@Self)^.clr := $00000008
  27275. else
  27276. pTDefRegMap(@Self)^.&set := $00000008;
  27277. end;
  27278. function TI2C5_I2C3ACON.getRCEN : TBits_1; inline;
  27279. begin
  27280. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  27281. end;
  27282. procedure TI2C5_I2C3ACON.setACKEN; inline;
  27283. begin
  27284. pTDefRegMap(@Self)^.&set := $00000010;
  27285. end;
  27286. procedure TI2C5_I2C3ACON.clearACKEN; inline;
  27287. begin
  27288. pTDefRegMap(@Self)^.clr := $00000010;
  27289. end;
  27290. procedure TI2C5_I2C3ACON.setACKEN(thebits : TBits_1); inline;
  27291. begin
  27292. if thebits = 0 then
  27293. pTDefRegMap(@Self)^.clr := $00000010
  27294. else
  27295. pTDefRegMap(@Self)^.&set := $00000010;
  27296. end;
  27297. function TI2C5_I2C3ACON.getACKEN : TBits_1; inline;
  27298. begin
  27299. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  27300. end;
  27301. procedure TI2C5_I2C3ACON.setACKDT; inline;
  27302. begin
  27303. pTDefRegMap(@Self)^.&set := $00000020;
  27304. end;
  27305. procedure TI2C5_I2C3ACON.clearACKDT; inline;
  27306. begin
  27307. pTDefRegMap(@Self)^.clr := $00000020;
  27308. end;
  27309. procedure TI2C5_I2C3ACON.setACKDT(thebits : TBits_1); inline;
  27310. begin
  27311. if thebits = 0 then
  27312. pTDefRegMap(@Self)^.clr := $00000020
  27313. else
  27314. pTDefRegMap(@Self)^.&set := $00000020;
  27315. end;
  27316. function TI2C5_I2C3ACON.getACKDT : TBits_1; inline;
  27317. begin
  27318. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  27319. end;
  27320. procedure TI2C5_I2C3ACON.setSTREN; inline;
  27321. begin
  27322. pTDefRegMap(@Self)^.&set := $00000040;
  27323. end;
  27324. procedure TI2C5_I2C3ACON.clearSTREN; inline;
  27325. begin
  27326. pTDefRegMap(@Self)^.clr := $00000040;
  27327. end;
  27328. procedure TI2C5_I2C3ACON.setSTREN(thebits : TBits_1); inline;
  27329. begin
  27330. if thebits = 0 then
  27331. pTDefRegMap(@Self)^.clr := $00000040
  27332. else
  27333. pTDefRegMap(@Self)^.&set := $00000040;
  27334. end;
  27335. function TI2C5_I2C3ACON.getSTREN : TBits_1; inline;
  27336. begin
  27337. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  27338. end;
  27339. procedure TI2C5_I2C3ACON.setGCEN; inline;
  27340. begin
  27341. pTDefRegMap(@Self)^.&set := $00000080;
  27342. end;
  27343. procedure TI2C5_I2C3ACON.clearGCEN; inline;
  27344. begin
  27345. pTDefRegMap(@Self)^.clr := $00000080;
  27346. end;
  27347. procedure TI2C5_I2C3ACON.setGCEN(thebits : TBits_1); inline;
  27348. begin
  27349. if thebits = 0 then
  27350. pTDefRegMap(@Self)^.clr := $00000080
  27351. else
  27352. pTDefRegMap(@Self)^.&set := $00000080;
  27353. end;
  27354. function TI2C5_I2C3ACON.getGCEN : TBits_1; inline;
  27355. begin
  27356. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  27357. end;
  27358. procedure TI2C5_I2C3ACON.setSMEN; inline;
  27359. begin
  27360. pTDefRegMap(@Self)^.&set := $00000100;
  27361. end;
  27362. procedure TI2C5_I2C3ACON.clearSMEN; inline;
  27363. begin
  27364. pTDefRegMap(@Self)^.clr := $00000100;
  27365. end;
  27366. procedure TI2C5_I2C3ACON.setSMEN(thebits : TBits_1); inline;
  27367. begin
  27368. if thebits = 0 then
  27369. pTDefRegMap(@Self)^.clr := $00000100
  27370. else
  27371. pTDefRegMap(@Self)^.&set := $00000100;
  27372. end;
  27373. function TI2C5_I2C3ACON.getSMEN : TBits_1; inline;
  27374. begin
  27375. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  27376. end;
  27377. procedure TI2C5_I2C3ACON.setDISSLW; inline;
  27378. begin
  27379. pTDefRegMap(@Self)^.&set := $00000200;
  27380. end;
  27381. procedure TI2C5_I2C3ACON.clearDISSLW; inline;
  27382. begin
  27383. pTDefRegMap(@Self)^.clr := $00000200;
  27384. end;
  27385. procedure TI2C5_I2C3ACON.setDISSLW(thebits : TBits_1); inline;
  27386. begin
  27387. if thebits = 0 then
  27388. pTDefRegMap(@Self)^.clr := $00000200
  27389. else
  27390. pTDefRegMap(@Self)^.&set := $00000200;
  27391. end;
  27392. function TI2C5_I2C3ACON.getDISSLW : TBits_1; inline;
  27393. begin
  27394. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  27395. end;
  27396. procedure TI2C5_I2C3ACON.setA10M; inline;
  27397. begin
  27398. pTDefRegMap(@Self)^.&set := $00000400;
  27399. end;
  27400. procedure TI2C5_I2C3ACON.clearA10M; inline;
  27401. begin
  27402. pTDefRegMap(@Self)^.clr := $00000400;
  27403. end;
  27404. procedure TI2C5_I2C3ACON.setA10M(thebits : TBits_1); inline;
  27405. begin
  27406. if thebits = 0 then
  27407. pTDefRegMap(@Self)^.clr := $00000400
  27408. else
  27409. pTDefRegMap(@Self)^.&set := $00000400;
  27410. end;
  27411. function TI2C5_I2C3ACON.getA10M : TBits_1; inline;
  27412. begin
  27413. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  27414. end;
  27415. procedure TI2C5_I2C3ACON.setSTRICT; inline;
  27416. begin
  27417. pTDefRegMap(@Self)^.&set := $00000800;
  27418. end;
  27419. procedure TI2C5_I2C3ACON.clearSTRICT; inline;
  27420. begin
  27421. pTDefRegMap(@Self)^.clr := $00000800;
  27422. end;
  27423. procedure TI2C5_I2C3ACON.setSTRICT(thebits : TBits_1); inline;
  27424. begin
  27425. if thebits = 0 then
  27426. pTDefRegMap(@Self)^.clr := $00000800
  27427. else
  27428. pTDefRegMap(@Self)^.&set := $00000800;
  27429. end;
  27430. function TI2C5_I2C3ACON.getSTRICT : TBits_1; inline;
  27431. begin
  27432. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  27433. end;
  27434. procedure TI2C5_I2C3ACON.setSCLREL; inline;
  27435. begin
  27436. pTDefRegMap(@Self)^.&set := $00001000;
  27437. end;
  27438. procedure TI2C5_I2C3ACON.clearSCLREL; inline;
  27439. begin
  27440. pTDefRegMap(@Self)^.clr := $00001000;
  27441. end;
  27442. procedure TI2C5_I2C3ACON.setSCLREL(thebits : TBits_1); inline;
  27443. begin
  27444. if thebits = 0 then
  27445. pTDefRegMap(@Self)^.clr := $00001000
  27446. else
  27447. pTDefRegMap(@Self)^.&set := $00001000;
  27448. end;
  27449. function TI2C5_I2C3ACON.getSCLREL : TBits_1; inline;
  27450. begin
  27451. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  27452. end;
  27453. procedure TI2C5_I2C3ACON.setSIDL; inline;
  27454. begin
  27455. pTDefRegMap(@Self)^.&set := $00002000;
  27456. end;
  27457. procedure TI2C5_I2C3ACON.clearSIDL; inline;
  27458. begin
  27459. pTDefRegMap(@Self)^.clr := $00002000;
  27460. end;
  27461. procedure TI2C5_I2C3ACON.setSIDL(thebits : TBits_1); inline;
  27462. begin
  27463. if thebits = 0 then
  27464. pTDefRegMap(@Self)^.clr := $00002000
  27465. else
  27466. pTDefRegMap(@Self)^.&set := $00002000;
  27467. end;
  27468. function TI2C5_I2C3ACON.getSIDL : TBits_1; inline;
  27469. begin
  27470. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  27471. end;
  27472. procedure TI2C5_I2C3ACON.setON; inline;
  27473. begin
  27474. pTDefRegMap(@Self)^.&set := $00008000;
  27475. end;
  27476. procedure TI2C5_I2C3ACON.clearON; inline;
  27477. begin
  27478. pTDefRegMap(@Self)^.clr := $00008000;
  27479. end;
  27480. procedure TI2C5_I2C3ACON.setON(thebits : TBits_1); inline;
  27481. begin
  27482. if thebits = 0 then
  27483. pTDefRegMap(@Self)^.clr := $00008000
  27484. else
  27485. pTDefRegMap(@Self)^.&set := $00008000;
  27486. end;
  27487. function TI2C5_I2C3ACON.getON : TBits_1; inline;
  27488. begin
  27489. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  27490. end;
  27491. procedure TI2C5_I2C3ACON.setIPMIEN; inline;
  27492. begin
  27493. pTDefRegMap(@Self)^.&set := $00000800;
  27494. end;
  27495. procedure TI2C5_I2C3ACON.clearIPMIEN; inline;
  27496. begin
  27497. pTDefRegMap(@Self)^.clr := $00000800;
  27498. end;
  27499. procedure TI2C5_I2C3ACON.setIPMIEN(thebits : TBits_1); inline;
  27500. begin
  27501. if thebits = 0 then
  27502. pTDefRegMap(@Self)^.clr := $00000800
  27503. else
  27504. pTDefRegMap(@Self)^.&set := $00000800;
  27505. end;
  27506. function TI2C5_I2C3ACON.getIPMIEN : TBits_1; inline;
  27507. begin
  27508. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  27509. end;
  27510. procedure TI2C5_I2C3ACON.setI2CSIDL; inline;
  27511. begin
  27512. pTDefRegMap(@Self)^.&set := $00002000;
  27513. end;
  27514. procedure TI2C5_I2C3ACON.clearI2CSIDL; inline;
  27515. begin
  27516. pTDefRegMap(@Self)^.clr := $00002000;
  27517. end;
  27518. procedure TI2C5_I2C3ACON.setI2CSIDL(thebits : TBits_1); inline;
  27519. begin
  27520. if thebits = 0 then
  27521. pTDefRegMap(@Self)^.clr := $00002000
  27522. else
  27523. pTDefRegMap(@Self)^.&set := $00002000;
  27524. end;
  27525. function TI2C5_I2C3ACON.getI2CSIDL : TBits_1; inline;
  27526. begin
  27527. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  27528. end;
  27529. procedure TI2C5_I2C3ACON.setI2CEN; inline;
  27530. begin
  27531. pTDefRegMap(@Self)^.&set := $00008000;
  27532. end;
  27533. procedure TI2C5_I2C3ACON.clearI2CEN; inline;
  27534. begin
  27535. pTDefRegMap(@Self)^.clr := $00008000;
  27536. end;
  27537. procedure TI2C5_I2C3ACON.setI2CEN(thebits : TBits_1); inline;
  27538. begin
  27539. if thebits = 0 then
  27540. pTDefRegMap(@Self)^.clr := $00008000
  27541. else
  27542. pTDefRegMap(@Self)^.&set := $00008000;
  27543. end;
  27544. function TI2C5_I2C3ACON.getI2CEN : TBits_1; inline;
  27545. begin
  27546. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  27547. end;
  27548. procedure TI2C5_I2C3ACON.setw(thebits : TBits_32); inline;
  27549. begin
  27550. pTDefRegMap(@Self)^.val := thebits;
  27551. end;
  27552. function TI2C5_I2C3ACON.getw : TBits_32; inline;
  27553. begin
  27554. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  27555. end;
  27556. procedure TI2C5_I2C5CON.setSEN; inline;
  27557. begin
  27558. pTDefRegMap(@Self)^.&set := $00000001;
  27559. end;
  27560. procedure TI2C5_I2C5CON.clearSEN; inline;
  27561. begin
  27562. pTDefRegMap(@Self)^.clr := $00000001;
  27563. end;
  27564. procedure TI2C5_I2C5CON.setSEN(thebits : TBits_1); inline;
  27565. begin
  27566. if thebits = 0 then
  27567. pTDefRegMap(@Self)^.clr := $00000001
  27568. else
  27569. pTDefRegMap(@Self)^.&set := $00000001;
  27570. end;
  27571. function TI2C5_I2C5CON.getSEN : TBits_1; inline;
  27572. begin
  27573. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  27574. end;
  27575. procedure TI2C5_I2C5CON.setRSEN; inline;
  27576. begin
  27577. pTDefRegMap(@Self)^.&set := $00000002;
  27578. end;
  27579. procedure TI2C5_I2C5CON.clearRSEN; inline;
  27580. begin
  27581. pTDefRegMap(@Self)^.clr := $00000002;
  27582. end;
  27583. procedure TI2C5_I2C5CON.setRSEN(thebits : TBits_1); inline;
  27584. begin
  27585. if thebits = 0 then
  27586. pTDefRegMap(@Self)^.clr := $00000002
  27587. else
  27588. pTDefRegMap(@Self)^.&set := $00000002;
  27589. end;
  27590. function TI2C5_I2C5CON.getRSEN : TBits_1; inline;
  27591. begin
  27592. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  27593. end;
  27594. procedure TI2C5_I2C5CON.setPEN; inline;
  27595. begin
  27596. pTDefRegMap(@Self)^.&set := $00000004;
  27597. end;
  27598. procedure TI2C5_I2C5CON.clearPEN; inline;
  27599. begin
  27600. pTDefRegMap(@Self)^.clr := $00000004;
  27601. end;
  27602. procedure TI2C5_I2C5CON.setPEN(thebits : TBits_1); inline;
  27603. begin
  27604. if thebits = 0 then
  27605. pTDefRegMap(@Self)^.clr := $00000004
  27606. else
  27607. pTDefRegMap(@Self)^.&set := $00000004;
  27608. end;
  27609. function TI2C5_I2C5CON.getPEN : TBits_1; inline;
  27610. begin
  27611. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  27612. end;
  27613. procedure TI2C5_I2C5CON.setRCEN; inline;
  27614. begin
  27615. pTDefRegMap(@Self)^.&set := $00000008;
  27616. end;
  27617. procedure TI2C5_I2C5CON.clearRCEN; inline;
  27618. begin
  27619. pTDefRegMap(@Self)^.clr := $00000008;
  27620. end;
  27621. procedure TI2C5_I2C5CON.setRCEN(thebits : TBits_1); inline;
  27622. begin
  27623. if thebits = 0 then
  27624. pTDefRegMap(@Self)^.clr := $00000008
  27625. else
  27626. pTDefRegMap(@Self)^.&set := $00000008;
  27627. end;
  27628. function TI2C5_I2C5CON.getRCEN : TBits_1; inline;
  27629. begin
  27630. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  27631. end;
  27632. procedure TI2C5_I2C5CON.setACKEN; inline;
  27633. begin
  27634. pTDefRegMap(@Self)^.&set := $00000010;
  27635. end;
  27636. procedure TI2C5_I2C5CON.clearACKEN; inline;
  27637. begin
  27638. pTDefRegMap(@Self)^.clr := $00000010;
  27639. end;
  27640. procedure TI2C5_I2C5CON.setACKEN(thebits : TBits_1); inline;
  27641. begin
  27642. if thebits = 0 then
  27643. pTDefRegMap(@Self)^.clr := $00000010
  27644. else
  27645. pTDefRegMap(@Self)^.&set := $00000010;
  27646. end;
  27647. function TI2C5_I2C5CON.getACKEN : TBits_1; inline;
  27648. begin
  27649. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  27650. end;
  27651. procedure TI2C5_I2C5CON.setACKDT; inline;
  27652. begin
  27653. pTDefRegMap(@Self)^.&set := $00000020;
  27654. end;
  27655. procedure TI2C5_I2C5CON.clearACKDT; inline;
  27656. begin
  27657. pTDefRegMap(@Self)^.clr := $00000020;
  27658. end;
  27659. procedure TI2C5_I2C5CON.setACKDT(thebits : TBits_1); inline;
  27660. begin
  27661. if thebits = 0 then
  27662. pTDefRegMap(@Self)^.clr := $00000020
  27663. else
  27664. pTDefRegMap(@Self)^.&set := $00000020;
  27665. end;
  27666. function TI2C5_I2C5CON.getACKDT : TBits_1; inline;
  27667. begin
  27668. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  27669. end;
  27670. procedure TI2C5_I2C5CON.setSTREN; inline;
  27671. begin
  27672. pTDefRegMap(@Self)^.&set := $00000040;
  27673. end;
  27674. procedure TI2C5_I2C5CON.clearSTREN; inline;
  27675. begin
  27676. pTDefRegMap(@Self)^.clr := $00000040;
  27677. end;
  27678. procedure TI2C5_I2C5CON.setSTREN(thebits : TBits_1); inline;
  27679. begin
  27680. if thebits = 0 then
  27681. pTDefRegMap(@Self)^.clr := $00000040
  27682. else
  27683. pTDefRegMap(@Self)^.&set := $00000040;
  27684. end;
  27685. function TI2C5_I2C5CON.getSTREN : TBits_1; inline;
  27686. begin
  27687. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  27688. end;
  27689. procedure TI2C5_I2C5CON.setGCEN; inline;
  27690. begin
  27691. pTDefRegMap(@Self)^.&set := $00000080;
  27692. end;
  27693. procedure TI2C5_I2C5CON.clearGCEN; inline;
  27694. begin
  27695. pTDefRegMap(@Self)^.clr := $00000080;
  27696. end;
  27697. procedure TI2C5_I2C5CON.setGCEN(thebits : TBits_1); inline;
  27698. begin
  27699. if thebits = 0 then
  27700. pTDefRegMap(@Self)^.clr := $00000080
  27701. else
  27702. pTDefRegMap(@Self)^.&set := $00000080;
  27703. end;
  27704. function TI2C5_I2C5CON.getGCEN : TBits_1; inline;
  27705. begin
  27706. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  27707. end;
  27708. procedure TI2C5_I2C5CON.setSMEN; inline;
  27709. begin
  27710. pTDefRegMap(@Self)^.&set := $00000100;
  27711. end;
  27712. procedure TI2C5_I2C5CON.clearSMEN; inline;
  27713. begin
  27714. pTDefRegMap(@Self)^.clr := $00000100;
  27715. end;
  27716. procedure TI2C5_I2C5CON.setSMEN(thebits : TBits_1); inline;
  27717. begin
  27718. if thebits = 0 then
  27719. pTDefRegMap(@Self)^.clr := $00000100
  27720. else
  27721. pTDefRegMap(@Self)^.&set := $00000100;
  27722. end;
  27723. function TI2C5_I2C5CON.getSMEN : TBits_1; inline;
  27724. begin
  27725. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  27726. end;
  27727. procedure TI2C5_I2C5CON.setDISSLW; inline;
  27728. begin
  27729. pTDefRegMap(@Self)^.&set := $00000200;
  27730. end;
  27731. procedure TI2C5_I2C5CON.clearDISSLW; inline;
  27732. begin
  27733. pTDefRegMap(@Self)^.clr := $00000200;
  27734. end;
  27735. procedure TI2C5_I2C5CON.setDISSLW(thebits : TBits_1); inline;
  27736. begin
  27737. if thebits = 0 then
  27738. pTDefRegMap(@Self)^.clr := $00000200
  27739. else
  27740. pTDefRegMap(@Self)^.&set := $00000200;
  27741. end;
  27742. function TI2C5_I2C5CON.getDISSLW : TBits_1; inline;
  27743. begin
  27744. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  27745. end;
  27746. procedure TI2C5_I2C5CON.setA10M; inline;
  27747. begin
  27748. pTDefRegMap(@Self)^.&set := $00000400;
  27749. end;
  27750. procedure TI2C5_I2C5CON.clearA10M; inline;
  27751. begin
  27752. pTDefRegMap(@Self)^.clr := $00000400;
  27753. end;
  27754. procedure TI2C5_I2C5CON.setA10M(thebits : TBits_1); inline;
  27755. begin
  27756. if thebits = 0 then
  27757. pTDefRegMap(@Self)^.clr := $00000400
  27758. else
  27759. pTDefRegMap(@Self)^.&set := $00000400;
  27760. end;
  27761. function TI2C5_I2C5CON.getA10M : TBits_1; inline;
  27762. begin
  27763. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  27764. end;
  27765. procedure TI2C5_I2C5CON.setSTRICT; inline;
  27766. begin
  27767. pTDefRegMap(@Self)^.&set := $00000800;
  27768. end;
  27769. procedure TI2C5_I2C5CON.clearSTRICT; inline;
  27770. begin
  27771. pTDefRegMap(@Self)^.clr := $00000800;
  27772. end;
  27773. procedure TI2C5_I2C5CON.setSTRICT(thebits : TBits_1); inline;
  27774. begin
  27775. if thebits = 0 then
  27776. pTDefRegMap(@Self)^.clr := $00000800
  27777. else
  27778. pTDefRegMap(@Self)^.&set := $00000800;
  27779. end;
  27780. function TI2C5_I2C5CON.getSTRICT : TBits_1; inline;
  27781. begin
  27782. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  27783. end;
  27784. procedure TI2C5_I2C5CON.setSCLREL; inline;
  27785. begin
  27786. pTDefRegMap(@Self)^.&set := $00001000;
  27787. end;
  27788. procedure TI2C5_I2C5CON.clearSCLREL; inline;
  27789. begin
  27790. pTDefRegMap(@Self)^.clr := $00001000;
  27791. end;
  27792. procedure TI2C5_I2C5CON.setSCLREL(thebits : TBits_1); inline;
  27793. begin
  27794. if thebits = 0 then
  27795. pTDefRegMap(@Self)^.clr := $00001000
  27796. else
  27797. pTDefRegMap(@Self)^.&set := $00001000;
  27798. end;
  27799. function TI2C5_I2C5CON.getSCLREL : TBits_1; inline;
  27800. begin
  27801. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  27802. end;
  27803. procedure TI2C5_I2C5CON.setSIDL; inline;
  27804. begin
  27805. pTDefRegMap(@Self)^.&set := $00002000;
  27806. end;
  27807. procedure TI2C5_I2C5CON.clearSIDL; inline;
  27808. begin
  27809. pTDefRegMap(@Self)^.clr := $00002000;
  27810. end;
  27811. procedure TI2C5_I2C5CON.setSIDL(thebits : TBits_1); inline;
  27812. begin
  27813. if thebits = 0 then
  27814. pTDefRegMap(@Self)^.clr := $00002000
  27815. else
  27816. pTDefRegMap(@Self)^.&set := $00002000;
  27817. end;
  27818. function TI2C5_I2C5CON.getSIDL : TBits_1; inline;
  27819. begin
  27820. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  27821. end;
  27822. procedure TI2C5_I2C5CON.setON; inline;
  27823. begin
  27824. pTDefRegMap(@Self)^.&set := $00008000;
  27825. end;
  27826. procedure TI2C5_I2C5CON.clearON; inline;
  27827. begin
  27828. pTDefRegMap(@Self)^.clr := $00008000;
  27829. end;
  27830. procedure TI2C5_I2C5CON.setON(thebits : TBits_1); inline;
  27831. begin
  27832. if thebits = 0 then
  27833. pTDefRegMap(@Self)^.clr := $00008000
  27834. else
  27835. pTDefRegMap(@Self)^.&set := $00008000;
  27836. end;
  27837. function TI2C5_I2C5CON.getON : TBits_1; inline;
  27838. begin
  27839. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  27840. end;
  27841. procedure TI2C5_I2C5CON.setIPMIEN; inline;
  27842. begin
  27843. pTDefRegMap(@Self)^.&set := $00000800;
  27844. end;
  27845. procedure TI2C5_I2C5CON.clearIPMIEN; inline;
  27846. begin
  27847. pTDefRegMap(@Self)^.clr := $00000800;
  27848. end;
  27849. procedure TI2C5_I2C5CON.setIPMIEN(thebits : TBits_1); inline;
  27850. begin
  27851. if thebits = 0 then
  27852. pTDefRegMap(@Self)^.clr := $00000800
  27853. else
  27854. pTDefRegMap(@Self)^.&set := $00000800;
  27855. end;
  27856. function TI2C5_I2C5CON.getIPMIEN : TBits_1; inline;
  27857. begin
  27858. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  27859. end;
  27860. procedure TI2C5_I2C5CON.setI2CSIDL; inline;
  27861. begin
  27862. pTDefRegMap(@Self)^.&set := $00002000;
  27863. end;
  27864. procedure TI2C5_I2C5CON.clearI2CSIDL; inline;
  27865. begin
  27866. pTDefRegMap(@Self)^.clr := $00002000;
  27867. end;
  27868. procedure TI2C5_I2C5CON.setI2CSIDL(thebits : TBits_1); inline;
  27869. begin
  27870. if thebits = 0 then
  27871. pTDefRegMap(@Self)^.clr := $00002000
  27872. else
  27873. pTDefRegMap(@Self)^.&set := $00002000;
  27874. end;
  27875. function TI2C5_I2C5CON.getI2CSIDL : TBits_1; inline;
  27876. begin
  27877. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  27878. end;
  27879. procedure TI2C5_I2C5CON.setI2CEN; inline;
  27880. begin
  27881. pTDefRegMap(@Self)^.&set := $00008000;
  27882. end;
  27883. procedure TI2C5_I2C5CON.clearI2CEN; inline;
  27884. begin
  27885. pTDefRegMap(@Self)^.clr := $00008000;
  27886. end;
  27887. procedure TI2C5_I2C5CON.setI2CEN(thebits : TBits_1); inline;
  27888. begin
  27889. if thebits = 0 then
  27890. pTDefRegMap(@Self)^.clr := $00008000
  27891. else
  27892. pTDefRegMap(@Self)^.&set := $00008000;
  27893. end;
  27894. function TI2C5_I2C5CON.getI2CEN : TBits_1; inline;
  27895. begin
  27896. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  27897. end;
  27898. procedure TI2C5_I2C5CON.setw(thebits : TBits_32); inline;
  27899. begin
  27900. pTDefRegMap(@Self)^.val := thebits;
  27901. end;
  27902. function TI2C5_I2C5CON.getw : TBits_32; inline;
  27903. begin
  27904. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  27905. end;
  27906. procedure TI2C5_I2C3ASTAT.setTBF; inline;
  27907. begin
  27908. pTDefRegMap(@Self)^.&set := $00000001;
  27909. end;
  27910. procedure TI2C5_I2C3ASTAT.clearTBF; inline;
  27911. begin
  27912. pTDefRegMap(@Self)^.clr := $00000001;
  27913. end;
  27914. procedure TI2C5_I2C3ASTAT.setTBF(thebits : TBits_1); inline;
  27915. begin
  27916. if thebits = 0 then
  27917. pTDefRegMap(@Self)^.clr := $00000001
  27918. else
  27919. pTDefRegMap(@Self)^.&set := $00000001;
  27920. end;
  27921. function TI2C5_I2C3ASTAT.getTBF : TBits_1; inline;
  27922. begin
  27923. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  27924. end;
  27925. procedure TI2C5_I2C3ASTAT.setRBF; inline;
  27926. begin
  27927. pTDefRegMap(@Self)^.&set := $00000002;
  27928. end;
  27929. procedure TI2C5_I2C3ASTAT.clearRBF; inline;
  27930. begin
  27931. pTDefRegMap(@Self)^.clr := $00000002;
  27932. end;
  27933. procedure TI2C5_I2C3ASTAT.setRBF(thebits : TBits_1); inline;
  27934. begin
  27935. if thebits = 0 then
  27936. pTDefRegMap(@Self)^.clr := $00000002
  27937. else
  27938. pTDefRegMap(@Self)^.&set := $00000002;
  27939. end;
  27940. function TI2C5_I2C3ASTAT.getRBF : TBits_1; inline;
  27941. begin
  27942. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  27943. end;
  27944. procedure TI2C5_I2C3ASTAT.setR_W; inline;
  27945. begin
  27946. pTDefRegMap(@Self)^.&set := $00000004;
  27947. end;
  27948. procedure TI2C5_I2C3ASTAT.clearR_W; inline;
  27949. begin
  27950. pTDefRegMap(@Self)^.clr := $00000004;
  27951. end;
  27952. procedure TI2C5_I2C3ASTAT.setR_W(thebits : TBits_1); inline;
  27953. begin
  27954. if thebits = 0 then
  27955. pTDefRegMap(@Self)^.clr := $00000004
  27956. else
  27957. pTDefRegMap(@Self)^.&set := $00000004;
  27958. end;
  27959. function TI2C5_I2C3ASTAT.getR_W : TBits_1; inline;
  27960. begin
  27961. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  27962. end;
  27963. procedure TI2C5_I2C3ASTAT.setS; inline;
  27964. begin
  27965. pTDefRegMap(@Self)^.&set := $00000008;
  27966. end;
  27967. procedure TI2C5_I2C3ASTAT.clearS; inline;
  27968. begin
  27969. pTDefRegMap(@Self)^.clr := $00000008;
  27970. end;
  27971. procedure TI2C5_I2C3ASTAT.setS(thebits : TBits_1); inline;
  27972. begin
  27973. if thebits = 0 then
  27974. pTDefRegMap(@Self)^.clr := $00000008
  27975. else
  27976. pTDefRegMap(@Self)^.&set := $00000008;
  27977. end;
  27978. function TI2C5_I2C3ASTAT.getS : TBits_1; inline;
  27979. begin
  27980. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  27981. end;
  27982. procedure TI2C5_I2C3ASTAT.setP; inline;
  27983. begin
  27984. pTDefRegMap(@Self)^.&set := $00000010;
  27985. end;
  27986. procedure TI2C5_I2C3ASTAT.clearP; inline;
  27987. begin
  27988. pTDefRegMap(@Self)^.clr := $00000010;
  27989. end;
  27990. procedure TI2C5_I2C3ASTAT.setP(thebits : TBits_1); inline;
  27991. begin
  27992. if thebits = 0 then
  27993. pTDefRegMap(@Self)^.clr := $00000010
  27994. else
  27995. pTDefRegMap(@Self)^.&set := $00000010;
  27996. end;
  27997. function TI2C5_I2C3ASTAT.getP : TBits_1; inline;
  27998. begin
  27999. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  28000. end;
  28001. procedure TI2C5_I2C3ASTAT.setD_A; inline;
  28002. begin
  28003. pTDefRegMap(@Self)^.&set := $00000020;
  28004. end;
  28005. procedure TI2C5_I2C3ASTAT.clearD_A; inline;
  28006. begin
  28007. pTDefRegMap(@Self)^.clr := $00000020;
  28008. end;
  28009. procedure TI2C5_I2C3ASTAT.setD_A(thebits : TBits_1); inline;
  28010. begin
  28011. if thebits = 0 then
  28012. pTDefRegMap(@Self)^.clr := $00000020
  28013. else
  28014. pTDefRegMap(@Self)^.&set := $00000020;
  28015. end;
  28016. function TI2C5_I2C3ASTAT.getD_A : TBits_1; inline;
  28017. begin
  28018. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  28019. end;
  28020. procedure TI2C5_I2C3ASTAT.setI2COV; inline;
  28021. begin
  28022. pTDefRegMap(@Self)^.&set := $00000040;
  28023. end;
  28024. procedure TI2C5_I2C3ASTAT.clearI2COV; inline;
  28025. begin
  28026. pTDefRegMap(@Self)^.clr := $00000040;
  28027. end;
  28028. procedure TI2C5_I2C3ASTAT.setI2COV(thebits : TBits_1); inline;
  28029. begin
  28030. if thebits = 0 then
  28031. pTDefRegMap(@Self)^.clr := $00000040
  28032. else
  28033. pTDefRegMap(@Self)^.&set := $00000040;
  28034. end;
  28035. function TI2C5_I2C3ASTAT.getI2COV : TBits_1; inline;
  28036. begin
  28037. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  28038. end;
  28039. procedure TI2C5_I2C3ASTAT.setIWCOL; inline;
  28040. begin
  28041. pTDefRegMap(@Self)^.&set := $00000080;
  28042. end;
  28043. procedure TI2C5_I2C3ASTAT.clearIWCOL; inline;
  28044. begin
  28045. pTDefRegMap(@Self)^.clr := $00000080;
  28046. end;
  28047. procedure TI2C5_I2C3ASTAT.setIWCOL(thebits : TBits_1); inline;
  28048. begin
  28049. if thebits = 0 then
  28050. pTDefRegMap(@Self)^.clr := $00000080
  28051. else
  28052. pTDefRegMap(@Self)^.&set := $00000080;
  28053. end;
  28054. function TI2C5_I2C3ASTAT.getIWCOL : TBits_1; inline;
  28055. begin
  28056. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  28057. end;
  28058. procedure TI2C5_I2C3ASTAT.setADD10; inline;
  28059. begin
  28060. pTDefRegMap(@Self)^.&set := $00000100;
  28061. end;
  28062. procedure TI2C5_I2C3ASTAT.clearADD10; inline;
  28063. begin
  28064. pTDefRegMap(@Self)^.clr := $00000100;
  28065. end;
  28066. procedure TI2C5_I2C3ASTAT.setADD10(thebits : TBits_1); inline;
  28067. begin
  28068. if thebits = 0 then
  28069. pTDefRegMap(@Self)^.clr := $00000100
  28070. else
  28071. pTDefRegMap(@Self)^.&set := $00000100;
  28072. end;
  28073. function TI2C5_I2C3ASTAT.getADD10 : TBits_1; inline;
  28074. begin
  28075. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  28076. end;
  28077. procedure TI2C5_I2C3ASTAT.setGCSTAT; inline;
  28078. begin
  28079. pTDefRegMap(@Self)^.&set := $00000200;
  28080. end;
  28081. procedure TI2C5_I2C3ASTAT.clearGCSTAT; inline;
  28082. begin
  28083. pTDefRegMap(@Self)^.clr := $00000200;
  28084. end;
  28085. procedure TI2C5_I2C3ASTAT.setGCSTAT(thebits : TBits_1); inline;
  28086. begin
  28087. if thebits = 0 then
  28088. pTDefRegMap(@Self)^.clr := $00000200
  28089. else
  28090. pTDefRegMap(@Self)^.&set := $00000200;
  28091. end;
  28092. function TI2C5_I2C3ASTAT.getGCSTAT : TBits_1; inline;
  28093. begin
  28094. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  28095. end;
  28096. procedure TI2C5_I2C3ASTAT.setBCL; inline;
  28097. begin
  28098. pTDefRegMap(@Self)^.&set := $00000400;
  28099. end;
  28100. procedure TI2C5_I2C3ASTAT.clearBCL; inline;
  28101. begin
  28102. pTDefRegMap(@Self)^.clr := $00000400;
  28103. end;
  28104. procedure TI2C5_I2C3ASTAT.setBCL(thebits : TBits_1); inline;
  28105. begin
  28106. if thebits = 0 then
  28107. pTDefRegMap(@Self)^.clr := $00000400
  28108. else
  28109. pTDefRegMap(@Self)^.&set := $00000400;
  28110. end;
  28111. function TI2C5_I2C3ASTAT.getBCL : TBits_1; inline;
  28112. begin
  28113. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  28114. end;
  28115. procedure TI2C5_I2C3ASTAT.setTRSTAT; inline;
  28116. begin
  28117. pTDefRegMap(@Self)^.&set := $00004000;
  28118. end;
  28119. procedure TI2C5_I2C3ASTAT.clearTRSTAT; inline;
  28120. begin
  28121. pTDefRegMap(@Self)^.clr := $00004000;
  28122. end;
  28123. procedure TI2C5_I2C3ASTAT.setTRSTAT(thebits : TBits_1); inline;
  28124. begin
  28125. if thebits = 0 then
  28126. pTDefRegMap(@Self)^.clr := $00004000
  28127. else
  28128. pTDefRegMap(@Self)^.&set := $00004000;
  28129. end;
  28130. function TI2C5_I2C3ASTAT.getTRSTAT : TBits_1; inline;
  28131. begin
  28132. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  28133. end;
  28134. procedure TI2C5_I2C3ASTAT.setACKSTAT; inline;
  28135. begin
  28136. pTDefRegMap(@Self)^.&set := $00008000;
  28137. end;
  28138. procedure TI2C5_I2C3ASTAT.clearACKSTAT; inline;
  28139. begin
  28140. pTDefRegMap(@Self)^.clr := $00008000;
  28141. end;
  28142. procedure TI2C5_I2C3ASTAT.setACKSTAT(thebits : TBits_1); inline;
  28143. begin
  28144. if thebits = 0 then
  28145. pTDefRegMap(@Self)^.clr := $00008000
  28146. else
  28147. pTDefRegMap(@Self)^.&set := $00008000;
  28148. end;
  28149. function TI2C5_I2C3ASTAT.getACKSTAT : TBits_1; inline;
  28150. begin
  28151. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  28152. end;
  28153. procedure TI2C5_I2C3ASTAT.setI2CPOV; inline;
  28154. begin
  28155. pTDefRegMap(@Self)^.&set := $00000040;
  28156. end;
  28157. procedure TI2C5_I2C3ASTAT.clearI2CPOV; inline;
  28158. begin
  28159. pTDefRegMap(@Self)^.clr := $00000040;
  28160. end;
  28161. procedure TI2C5_I2C3ASTAT.setI2CPOV(thebits : TBits_1); inline;
  28162. begin
  28163. if thebits = 0 then
  28164. pTDefRegMap(@Self)^.clr := $00000040
  28165. else
  28166. pTDefRegMap(@Self)^.&set := $00000040;
  28167. end;
  28168. function TI2C5_I2C3ASTAT.getI2CPOV : TBits_1; inline;
  28169. begin
  28170. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  28171. end;
  28172. procedure TI2C5_I2C3ASTAT.setw(thebits : TBits_32); inline;
  28173. begin
  28174. pTDefRegMap(@Self)^.val := thebits;
  28175. end;
  28176. function TI2C5_I2C3ASTAT.getw : TBits_32; inline;
  28177. begin
  28178. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  28179. end;
  28180. procedure TI2C5_I2C5STAT.setTBF; inline;
  28181. begin
  28182. pTDefRegMap(@Self)^.&set := $00000001;
  28183. end;
  28184. procedure TI2C5_I2C5STAT.clearTBF; inline;
  28185. begin
  28186. pTDefRegMap(@Self)^.clr := $00000001;
  28187. end;
  28188. procedure TI2C5_I2C5STAT.setTBF(thebits : TBits_1); inline;
  28189. begin
  28190. if thebits = 0 then
  28191. pTDefRegMap(@Self)^.clr := $00000001
  28192. else
  28193. pTDefRegMap(@Self)^.&set := $00000001;
  28194. end;
  28195. function TI2C5_I2C5STAT.getTBF : TBits_1; inline;
  28196. begin
  28197. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  28198. end;
  28199. procedure TI2C5_I2C5STAT.setRBF; inline;
  28200. begin
  28201. pTDefRegMap(@Self)^.&set := $00000002;
  28202. end;
  28203. procedure TI2C5_I2C5STAT.clearRBF; inline;
  28204. begin
  28205. pTDefRegMap(@Self)^.clr := $00000002;
  28206. end;
  28207. procedure TI2C5_I2C5STAT.setRBF(thebits : TBits_1); inline;
  28208. begin
  28209. if thebits = 0 then
  28210. pTDefRegMap(@Self)^.clr := $00000002
  28211. else
  28212. pTDefRegMap(@Self)^.&set := $00000002;
  28213. end;
  28214. function TI2C5_I2C5STAT.getRBF : TBits_1; inline;
  28215. begin
  28216. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  28217. end;
  28218. procedure TI2C5_I2C5STAT.setR_W; inline;
  28219. begin
  28220. pTDefRegMap(@Self)^.&set := $00000004;
  28221. end;
  28222. procedure TI2C5_I2C5STAT.clearR_W; inline;
  28223. begin
  28224. pTDefRegMap(@Self)^.clr := $00000004;
  28225. end;
  28226. procedure TI2C5_I2C5STAT.setR_W(thebits : TBits_1); inline;
  28227. begin
  28228. if thebits = 0 then
  28229. pTDefRegMap(@Self)^.clr := $00000004
  28230. else
  28231. pTDefRegMap(@Self)^.&set := $00000004;
  28232. end;
  28233. function TI2C5_I2C5STAT.getR_W : TBits_1; inline;
  28234. begin
  28235. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  28236. end;
  28237. procedure TI2C5_I2C5STAT.setS; inline;
  28238. begin
  28239. pTDefRegMap(@Self)^.&set := $00000008;
  28240. end;
  28241. procedure TI2C5_I2C5STAT.clearS; inline;
  28242. begin
  28243. pTDefRegMap(@Self)^.clr := $00000008;
  28244. end;
  28245. procedure TI2C5_I2C5STAT.setS(thebits : TBits_1); inline;
  28246. begin
  28247. if thebits = 0 then
  28248. pTDefRegMap(@Self)^.clr := $00000008
  28249. else
  28250. pTDefRegMap(@Self)^.&set := $00000008;
  28251. end;
  28252. function TI2C5_I2C5STAT.getS : TBits_1; inline;
  28253. begin
  28254. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  28255. end;
  28256. procedure TI2C5_I2C5STAT.setP; inline;
  28257. begin
  28258. pTDefRegMap(@Self)^.&set := $00000010;
  28259. end;
  28260. procedure TI2C5_I2C5STAT.clearP; inline;
  28261. begin
  28262. pTDefRegMap(@Self)^.clr := $00000010;
  28263. end;
  28264. procedure TI2C5_I2C5STAT.setP(thebits : TBits_1); inline;
  28265. begin
  28266. if thebits = 0 then
  28267. pTDefRegMap(@Self)^.clr := $00000010
  28268. else
  28269. pTDefRegMap(@Self)^.&set := $00000010;
  28270. end;
  28271. function TI2C5_I2C5STAT.getP : TBits_1; inline;
  28272. begin
  28273. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  28274. end;
  28275. procedure TI2C5_I2C5STAT.setD_A; inline;
  28276. begin
  28277. pTDefRegMap(@Self)^.&set := $00000020;
  28278. end;
  28279. procedure TI2C5_I2C5STAT.clearD_A; inline;
  28280. begin
  28281. pTDefRegMap(@Self)^.clr := $00000020;
  28282. end;
  28283. procedure TI2C5_I2C5STAT.setD_A(thebits : TBits_1); inline;
  28284. begin
  28285. if thebits = 0 then
  28286. pTDefRegMap(@Self)^.clr := $00000020
  28287. else
  28288. pTDefRegMap(@Self)^.&set := $00000020;
  28289. end;
  28290. function TI2C5_I2C5STAT.getD_A : TBits_1; inline;
  28291. begin
  28292. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  28293. end;
  28294. procedure TI2C5_I2C5STAT.setI2COV; inline;
  28295. begin
  28296. pTDefRegMap(@Self)^.&set := $00000040;
  28297. end;
  28298. procedure TI2C5_I2C5STAT.clearI2COV; inline;
  28299. begin
  28300. pTDefRegMap(@Self)^.clr := $00000040;
  28301. end;
  28302. procedure TI2C5_I2C5STAT.setI2COV(thebits : TBits_1); inline;
  28303. begin
  28304. if thebits = 0 then
  28305. pTDefRegMap(@Self)^.clr := $00000040
  28306. else
  28307. pTDefRegMap(@Self)^.&set := $00000040;
  28308. end;
  28309. function TI2C5_I2C5STAT.getI2COV : TBits_1; inline;
  28310. begin
  28311. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  28312. end;
  28313. procedure TI2C5_I2C5STAT.setIWCOL; inline;
  28314. begin
  28315. pTDefRegMap(@Self)^.&set := $00000080;
  28316. end;
  28317. procedure TI2C5_I2C5STAT.clearIWCOL; inline;
  28318. begin
  28319. pTDefRegMap(@Self)^.clr := $00000080;
  28320. end;
  28321. procedure TI2C5_I2C5STAT.setIWCOL(thebits : TBits_1); inline;
  28322. begin
  28323. if thebits = 0 then
  28324. pTDefRegMap(@Self)^.clr := $00000080
  28325. else
  28326. pTDefRegMap(@Self)^.&set := $00000080;
  28327. end;
  28328. function TI2C5_I2C5STAT.getIWCOL : TBits_1; inline;
  28329. begin
  28330. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  28331. end;
  28332. procedure TI2C5_I2C5STAT.setADD10; inline;
  28333. begin
  28334. pTDefRegMap(@Self)^.&set := $00000100;
  28335. end;
  28336. procedure TI2C5_I2C5STAT.clearADD10; inline;
  28337. begin
  28338. pTDefRegMap(@Self)^.clr := $00000100;
  28339. end;
  28340. procedure TI2C5_I2C5STAT.setADD10(thebits : TBits_1); inline;
  28341. begin
  28342. if thebits = 0 then
  28343. pTDefRegMap(@Self)^.clr := $00000100
  28344. else
  28345. pTDefRegMap(@Self)^.&set := $00000100;
  28346. end;
  28347. function TI2C5_I2C5STAT.getADD10 : TBits_1; inline;
  28348. begin
  28349. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  28350. end;
  28351. procedure TI2C5_I2C5STAT.setGCSTAT; inline;
  28352. begin
  28353. pTDefRegMap(@Self)^.&set := $00000200;
  28354. end;
  28355. procedure TI2C5_I2C5STAT.clearGCSTAT; inline;
  28356. begin
  28357. pTDefRegMap(@Self)^.clr := $00000200;
  28358. end;
  28359. procedure TI2C5_I2C5STAT.setGCSTAT(thebits : TBits_1); inline;
  28360. begin
  28361. if thebits = 0 then
  28362. pTDefRegMap(@Self)^.clr := $00000200
  28363. else
  28364. pTDefRegMap(@Self)^.&set := $00000200;
  28365. end;
  28366. function TI2C5_I2C5STAT.getGCSTAT : TBits_1; inline;
  28367. begin
  28368. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  28369. end;
  28370. procedure TI2C5_I2C5STAT.setBCL; inline;
  28371. begin
  28372. pTDefRegMap(@Self)^.&set := $00000400;
  28373. end;
  28374. procedure TI2C5_I2C5STAT.clearBCL; inline;
  28375. begin
  28376. pTDefRegMap(@Self)^.clr := $00000400;
  28377. end;
  28378. procedure TI2C5_I2C5STAT.setBCL(thebits : TBits_1); inline;
  28379. begin
  28380. if thebits = 0 then
  28381. pTDefRegMap(@Self)^.clr := $00000400
  28382. else
  28383. pTDefRegMap(@Self)^.&set := $00000400;
  28384. end;
  28385. function TI2C5_I2C5STAT.getBCL : TBits_1; inline;
  28386. begin
  28387. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  28388. end;
  28389. procedure TI2C5_I2C5STAT.setTRSTAT; inline;
  28390. begin
  28391. pTDefRegMap(@Self)^.&set := $00004000;
  28392. end;
  28393. procedure TI2C5_I2C5STAT.clearTRSTAT; inline;
  28394. begin
  28395. pTDefRegMap(@Self)^.clr := $00004000;
  28396. end;
  28397. procedure TI2C5_I2C5STAT.setTRSTAT(thebits : TBits_1); inline;
  28398. begin
  28399. if thebits = 0 then
  28400. pTDefRegMap(@Self)^.clr := $00004000
  28401. else
  28402. pTDefRegMap(@Self)^.&set := $00004000;
  28403. end;
  28404. function TI2C5_I2C5STAT.getTRSTAT : TBits_1; inline;
  28405. begin
  28406. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  28407. end;
  28408. procedure TI2C5_I2C5STAT.setACKSTAT; inline;
  28409. begin
  28410. pTDefRegMap(@Self)^.&set := $00008000;
  28411. end;
  28412. procedure TI2C5_I2C5STAT.clearACKSTAT; inline;
  28413. begin
  28414. pTDefRegMap(@Self)^.clr := $00008000;
  28415. end;
  28416. procedure TI2C5_I2C5STAT.setACKSTAT(thebits : TBits_1); inline;
  28417. begin
  28418. if thebits = 0 then
  28419. pTDefRegMap(@Self)^.clr := $00008000
  28420. else
  28421. pTDefRegMap(@Self)^.&set := $00008000;
  28422. end;
  28423. function TI2C5_I2C5STAT.getACKSTAT : TBits_1; inline;
  28424. begin
  28425. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  28426. end;
  28427. procedure TI2C5_I2C5STAT.setI2CPOV; inline;
  28428. begin
  28429. pTDefRegMap(@Self)^.&set := $00000040;
  28430. end;
  28431. procedure TI2C5_I2C5STAT.clearI2CPOV; inline;
  28432. begin
  28433. pTDefRegMap(@Self)^.clr := $00000040;
  28434. end;
  28435. procedure TI2C5_I2C5STAT.setI2CPOV(thebits : TBits_1); inline;
  28436. begin
  28437. if thebits = 0 then
  28438. pTDefRegMap(@Self)^.clr := $00000040
  28439. else
  28440. pTDefRegMap(@Self)^.&set := $00000040;
  28441. end;
  28442. function TI2C5_I2C5STAT.getI2CPOV : TBits_1; inline;
  28443. begin
  28444. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  28445. end;
  28446. procedure TI2C5_I2C5STAT.setw(thebits : TBits_32); inline;
  28447. begin
  28448. pTDefRegMap(@Self)^.val := thebits;
  28449. end;
  28450. function TI2C5_I2C5STAT.getw : TBits_32; inline;
  28451. begin
  28452. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  28453. end;
  28454. procedure TI2C1_I2C1CON.setSEN; inline;
  28455. begin
  28456. pTDefRegMap(@Self)^.&set := $00000001;
  28457. end;
  28458. procedure TI2C1_I2C1CON.clearSEN; inline;
  28459. begin
  28460. pTDefRegMap(@Self)^.clr := $00000001;
  28461. end;
  28462. procedure TI2C1_I2C1CON.setSEN(thebits : TBits_1); inline;
  28463. begin
  28464. if thebits = 0 then
  28465. pTDefRegMap(@Self)^.clr := $00000001
  28466. else
  28467. pTDefRegMap(@Self)^.&set := $00000001;
  28468. end;
  28469. function TI2C1_I2C1CON.getSEN : TBits_1; inline;
  28470. begin
  28471. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  28472. end;
  28473. procedure TI2C1_I2C1CON.setRSEN; inline;
  28474. begin
  28475. pTDefRegMap(@Self)^.&set := $00000002;
  28476. end;
  28477. procedure TI2C1_I2C1CON.clearRSEN; inline;
  28478. begin
  28479. pTDefRegMap(@Self)^.clr := $00000002;
  28480. end;
  28481. procedure TI2C1_I2C1CON.setRSEN(thebits : TBits_1); inline;
  28482. begin
  28483. if thebits = 0 then
  28484. pTDefRegMap(@Self)^.clr := $00000002
  28485. else
  28486. pTDefRegMap(@Self)^.&set := $00000002;
  28487. end;
  28488. function TI2C1_I2C1CON.getRSEN : TBits_1; inline;
  28489. begin
  28490. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  28491. end;
  28492. procedure TI2C1_I2C1CON.setPEN; inline;
  28493. begin
  28494. pTDefRegMap(@Self)^.&set := $00000004;
  28495. end;
  28496. procedure TI2C1_I2C1CON.clearPEN; inline;
  28497. begin
  28498. pTDefRegMap(@Self)^.clr := $00000004;
  28499. end;
  28500. procedure TI2C1_I2C1CON.setPEN(thebits : TBits_1); inline;
  28501. begin
  28502. if thebits = 0 then
  28503. pTDefRegMap(@Self)^.clr := $00000004
  28504. else
  28505. pTDefRegMap(@Self)^.&set := $00000004;
  28506. end;
  28507. function TI2C1_I2C1CON.getPEN : TBits_1; inline;
  28508. begin
  28509. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  28510. end;
  28511. procedure TI2C1_I2C1CON.setRCEN; inline;
  28512. begin
  28513. pTDefRegMap(@Self)^.&set := $00000008;
  28514. end;
  28515. procedure TI2C1_I2C1CON.clearRCEN; inline;
  28516. begin
  28517. pTDefRegMap(@Self)^.clr := $00000008;
  28518. end;
  28519. procedure TI2C1_I2C1CON.setRCEN(thebits : TBits_1); inline;
  28520. begin
  28521. if thebits = 0 then
  28522. pTDefRegMap(@Self)^.clr := $00000008
  28523. else
  28524. pTDefRegMap(@Self)^.&set := $00000008;
  28525. end;
  28526. function TI2C1_I2C1CON.getRCEN : TBits_1; inline;
  28527. begin
  28528. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  28529. end;
  28530. procedure TI2C1_I2C1CON.setACKEN; inline;
  28531. begin
  28532. pTDefRegMap(@Self)^.&set := $00000010;
  28533. end;
  28534. procedure TI2C1_I2C1CON.clearACKEN; inline;
  28535. begin
  28536. pTDefRegMap(@Self)^.clr := $00000010;
  28537. end;
  28538. procedure TI2C1_I2C1CON.setACKEN(thebits : TBits_1); inline;
  28539. begin
  28540. if thebits = 0 then
  28541. pTDefRegMap(@Self)^.clr := $00000010
  28542. else
  28543. pTDefRegMap(@Self)^.&set := $00000010;
  28544. end;
  28545. function TI2C1_I2C1CON.getACKEN : TBits_1; inline;
  28546. begin
  28547. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  28548. end;
  28549. procedure TI2C1_I2C1CON.setACKDT; inline;
  28550. begin
  28551. pTDefRegMap(@Self)^.&set := $00000020;
  28552. end;
  28553. procedure TI2C1_I2C1CON.clearACKDT; inline;
  28554. begin
  28555. pTDefRegMap(@Self)^.clr := $00000020;
  28556. end;
  28557. procedure TI2C1_I2C1CON.setACKDT(thebits : TBits_1); inline;
  28558. begin
  28559. if thebits = 0 then
  28560. pTDefRegMap(@Self)^.clr := $00000020
  28561. else
  28562. pTDefRegMap(@Self)^.&set := $00000020;
  28563. end;
  28564. function TI2C1_I2C1CON.getACKDT : TBits_1; inline;
  28565. begin
  28566. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  28567. end;
  28568. procedure TI2C1_I2C1CON.setSTREN; inline;
  28569. begin
  28570. pTDefRegMap(@Self)^.&set := $00000040;
  28571. end;
  28572. procedure TI2C1_I2C1CON.clearSTREN; inline;
  28573. begin
  28574. pTDefRegMap(@Self)^.clr := $00000040;
  28575. end;
  28576. procedure TI2C1_I2C1CON.setSTREN(thebits : TBits_1); inline;
  28577. begin
  28578. if thebits = 0 then
  28579. pTDefRegMap(@Self)^.clr := $00000040
  28580. else
  28581. pTDefRegMap(@Self)^.&set := $00000040;
  28582. end;
  28583. function TI2C1_I2C1CON.getSTREN : TBits_1; inline;
  28584. begin
  28585. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  28586. end;
  28587. procedure TI2C1_I2C1CON.setGCEN; inline;
  28588. begin
  28589. pTDefRegMap(@Self)^.&set := $00000080;
  28590. end;
  28591. procedure TI2C1_I2C1CON.clearGCEN; inline;
  28592. begin
  28593. pTDefRegMap(@Self)^.clr := $00000080;
  28594. end;
  28595. procedure TI2C1_I2C1CON.setGCEN(thebits : TBits_1); inline;
  28596. begin
  28597. if thebits = 0 then
  28598. pTDefRegMap(@Self)^.clr := $00000080
  28599. else
  28600. pTDefRegMap(@Self)^.&set := $00000080;
  28601. end;
  28602. function TI2C1_I2C1CON.getGCEN : TBits_1; inline;
  28603. begin
  28604. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  28605. end;
  28606. procedure TI2C1_I2C1CON.setSMEN; inline;
  28607. begin
  28608. pTDefRegMap(@Self)^.&set := $00000100;
  28609. end;
  28610. procedure TI2C1_I2C1CON.clearSMEN; inline;
  28611. begin
  28612. pTDefRegMap(@Self)^.clr := $00000100;
  28613. end;
  28614. procedure TI2C1_I2C1CON.setSMEN(thebits : TBits_1); inline;
  28615. begin
  28616. if thebits = 0 then
  28617. pTDefRegMap(@Self)^.clr := $00000100
  28618. else
  28619. pTDefRegMap(@Self)^.&set := $00000100;
  28620. end;
  28621. function TI2C1_I2C1CON.getSMEN : TBits_1; inline;
  28622. begin
  28623. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  28624. end;
  28625. procedure TI2C1_I2C1CON.setDISSLW; inline;
  28626. begin
  28627. pTDefRegMap(@Self)^.&set := $00000200;
  28628. end;
  28629. procedure TI2C1_I2C1CON.clearDISSLW; inline;
  28630. begin
  28631. pTDefRegMap(@Self)^.clr := $00000200;
  28632. end;
  28633. procedure TI2C1_I2C1CON.setDISSLW(thebits : TBits_1); inline;
  28634. begin
  28635. if thebits = 0 then
  28636. pTDefRegMap(@Self)^.clr := $00000200
  28637. else
  28638. pTDefRegMap(@Self)^.&set := $00000200;
  28639. end;
  28640. function TI2C1_I2C1CON.getDISSLW : TBits_1; inline;
  28641. begin
  28642. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  28643. end;
  28644. procedure TI2C1_I2C1CON.setA10M; inline;
  28645. begin
  28646. pTDefRegMap(@Self)^.&set := $00000400;
  28647. end;
  28648. procedure TI2C1_I2C1CON.clearA10M; inline;
  28649. begin
  28650. pTDefRegMap(@Self)^.clr := $00000400;
  28651. end;
  28652. procedure TI2C1_I2C1CON.setA10M(thebits : TBits_1); inline;
  28653. begin
  28654. if thebits = 0 then
  28655. pTDefRegMap(@Self)^.clr := $00000400
  28656. else
  28657. pTDefRegMap(@Self)^.&set := $00000400;
  28658. end;
  28659. function TI2C1_I2C1CON.getA10M : TBits_1; inline;
  28660. begin
  28661. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  28662. end;
  28663. procedure TI2C1_I2C1CON.setSTRICT; inline;
  28664. begin
  28665. pTDefRegMap(@Self)^.&set := $00000800;
  28666. end;
  28667. procedure TI2C1_I2C1CON.clearSTRICT; inline;
  28668. begin
  28669. pTDefRegMap(@Self)^.clr := $00000800;
  28670. end;
  28671. procedure TI2C1_I2C1CON.setSTRICT(thebits : TBits_1); inline;
  28672. begin
  28673. if thebits = 0 then
  28674. pTDefRegMap(@Self)^.clr := $00000800
  28675. else
  28676. pTDefRegMap(@Self)^.&set := $00000800;
  28677. end;
  28678. function TI2C1_I2C1CON.getSTRICT : TBits_1; inline;
  28679. begin
  28680. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  28681. end;
  28682. procedure TI2C1_I2C1CON.setSCLREL; inline;
  28683. begin
  28684. pTDefRegMap(@Self)^.&set := $00001000;
  28685. end;
  28686. procedure TI2C1_I2C1CON.clearSCLREL; inline;
  28687. begin
  28688. pTDefRegMap(@Self)^.clr := $00001000;
  28689. end;
  28690. procedure TI2C1_I2C1CON.setSCLREL(thebits : TBits_1); inline;
  28691. begin
  28692. if thebits = 0 then
  28693. pTDefRegMap(@Self)^.clr := $00001000
  28694. else
  28695. pTDefRegMap(@Self)^.&set := $00001000;
  28696. end;
  28697. function TI2C1_I2C1CON.getSCLREL : TBits_1; inline;
  28698. begin
  28699. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  28700. end;
  28701. procedure TI2C1_I2C1CON.setSIDL; inline;
  28702. begin
  28703. pTDefRegMap(@Self)^.&set := $00002000;
  28704. end;
  28705. procedure TI2C1_I2C1CON.clearSIDL; inline;
  28706. begin
  28707. pTDefRegMap(@Self)^.clr := $00002000;
  28708. end;
  28709. procedure TI2C1_I2C1CON.setSIDL(thebits : TBits_1); inline;
  28710. begin
  28711. if thebits = 0 then
  28712. pTDefRegMap(@Self)^.clr := $00002000
  28713. else
  28714. pTDefRegMap(@Self)^.&set := $00002000;
  28715. end;
  28716. function TI2C1_I2C1CON.getSIDL : TBits_1; inline;
  28717. begin
  28718. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  28719. end;
  28720. procedure TI2C1_I2C1CON.setON; inline;
  28721. begin
  28722. pTDefRegMap(@Self)^.&set := $00008000;
  28723. end;
  28724. procedure TI2C1_I2C1CON.clearON; inline;
  28725. begin
  28726. pTDefRegMap(@Self)^.clr := $00008000;
  28727. end;
  28728. procedure TI2C1_I2C1CON.setON(thebits : TBits_1); inline;
  28729. begin
  28730. if thebits = 0 then
  28731. pTDefRegMap(@Self)^.clr := $00008000
  28732. else
  28733. pTDefRegMap(@Self)^.&set := $00008000;
  28734. end;
  28735. function TI2C1_I2C1CON.getON : TBits_1; inline;
  28736. begin
  28737. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  28738. end;
  28739. procedure TI2C1_I2C1CON.setIPMIEN; inline;
  28740. begin
  28741. pTDefRegMap(@Self)^.&set := $00000800;
  28742. end;
  28743. procedure TI2C1_I2C1CON.clearIPMIEN; inline;
  28744. begin
  28745. pTDefRegMap(@Self)^.clr := $00000800;
  28746. end;
  28747. procedure TI2C1_I2C1CON.setIPMIEN(thebits : TBits_1); inline;
  28748. begin
  28749. if thebits = 0 then
  28750. pTDefRegMap(@Self)^.clr := $00000800
  28751. else
  28752. pTDefRegMap(@Self)^.&set := $00000800;
  28753. end;
  28754. function TI2C1_I2C1CON.getIPMIEN : TBits_1; inline;
  28755. begin
  28756. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  28757. end;
  28758. procedure TI2C1_I2C1CON.setI2CSIDL; inline;
  28759. begin
  28760. pTDefRegMap(@Self)^.&set := $00002000;
  28761. end;
  28762. procedure TI2C1_I2C1CON.clearI2CSIDL; inline;
  28763. begin
  28764. pTDefRegMap(@Self)^.clr := $00002000;
  28765. end;
  28766. procedure TI2C1_I2C1CON.setI2CSIDL(thebits : TBits_1); inline;
  28767. begin
  28768. if thebits = 0 then
  28769. pTDefRegMap(@Self)^.clr := $00002000
  28770. else
  28771. pTDefRegMap(@Self)^.&set := $00002000;
  28772. end;
  28773. function TI2C1_I2C1CON.getI2CSIDL : TBits_1; inline;
  28774. begin
  28775. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  28776. end;
  28777. procedure TI2C1_I2C1CON.setI2CEN; inline;
  28778. begin
  28779. pTDefRegMap(@Self)^.&set := $00008000;
  28780. end;
  28781. procedure TI2C1_I2C1CON.clearI2CEN; inline;
  28782. begin
  28783. pTDefRegMap(@Self)^.clr := $00008000;
  28784. end;
  28785. procedure TI2C1_I2C1CON.setI2CEN(thebits : TBits_1); inline;
  28786. begin
  28787. if thebits = 0 then
  28788. pTDefRegMap(@Self)^.clr := $00008000
  28789. else
  28790. pTDefRegMap(@Self)^.&set := $00008000;
  28791. end;
  28792. function TI2C1_I2C1CON.getI2CEN : TBits_1; inline;
  28793. begin
  28794. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  28795. end;
  28796. procedure TI2C1_I2C1CON.setw(thebits : TBits_32); inline;
  28797. begin
  28798. pTDefRegMap(@Self)^.val := thebits;
  28799. end;
  28800. function TI2C1_I2C1CON.getw : TBits_32; inline;
  28801. begin
  28802. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  28803. end;
  28804. procedure TI2C1_I2C1STAT.setTBF; inline;
  28805. begin
  28806. pTDefRegMap(@Self)^.&set := $00000001;
  28807. end;
  28808. procedure TI2C1_I2C1STAT.clearTBF; inline;
  28809. begin
  28810. pTDefRegMap(@Self)^.clr := $00000001;
  28811. end;
  28812. procedure TI2C1_I2C1STAT.setTBF(thebits : TBits_1); inline;
  28813. begin
  28814. if thebits = 0 then
  28815. pTDefRegMap(@Self)^.clr := $00000001
  28816. else
  28817. pTDefRegMap(@Self)^.&set := $00000001;
  28818. end;
  28819. function TI2C1_I2C1STAT.getTBF : TBits_1; inline;
  28820. begin
  28821. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  28822. end;
  28823. procedure TI2C1_I2C1STAT.setRBF; inline;
  28824. begin
  28825. pTDefRegMap(@Self)^.&set := $00000002;
  28826. end;
  28827. procedure TI2C1_I2C1STAT.clearRBF; inline;
  28828. begin
  28829. pTDefRegMap(@Self)^.clr := $00000002;
  28830. end;
  28831. procedure TI2C1_I2C1STAT.setRBF(thebits : TBits_1); inline;
  28832. begin
  28833. if thebits = 0 then
  28834. pTDefRegMap(@Self)^.clr := $00000002
  28835. else
  28836. pTDefRegMap(@Self)^.&set := $00000002;
  28837. end;
  28838. function TI2C1_I2C1STAT.getRBF : TBits_1; inline;
  28839. begin
  28840. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  28841. end;
  28842. procedure TI2C1_I2C1STAT.setR_W; inline;
  28843. begin
  28844. pTDefRegMap(@Self)^.&set := $00000004;
  28845. end;
  28846. procedure TI2C1_I2C1STAT.clearR_W; inline;
  28847. begin
  28848. pTDefRegMap(@Self)^.clr := $00000004;
  28849. end;
  28850. procedure TI2C1_I2C1STAT.setR_W(thebits : TBits_1); inline;
  28851. begin
  28852. if thebits = 0 then
  28853. pTDefRegMap(@Self)^.clr := $00000004
  28854. else
  28855. pTDefRegMap(@Self)^.&set := $00000004;
  28856. end;
  28857. function TI2C1_I2C1STAT.getR_W : TBits_1; inline;
  28858. begin
  28859. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  28860. end;
  28861. procedure TI2C1_I2C1STAT.setS; inline;
  28862. begin
  28863. pTDefRegMap(@Self)^.&set := $00000008;
  28864. end;
  28865. procedure TI2C1_I2C1STAT.clearS; inline;
  28866. begin
  28867. pTDefRegMap(@Self)^.clr := $00000008;
  28868. end;
  28869. procedure TI2C1_I2C1STAT.setS(thebits : TBits_1); inline;
  28870. begin
  28871. if thebits = 0 then
  28872. pTDefRegMap(@Self)^.clr := $00000008
  28873. else
  28874. pTDefRegMap(@Self)^.&set := $00000008;
  28875. end;
  28876. function TI2C1_I2C1STAT.getS : TBits_1; inline;
  28877. begin
  28878. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  28879. end;
  28880. procedure TI2C1_I2C1STAT.setP; inline;
  28881. begin
  28882. pTDefRegMap(@Self)^.&set := $00000010;
  28883. end;
  28884. procedure TI2C1_I2C1STAT.clearP; inline;
  28885. begin
  28886. pTDefRegMap(@Self)^.clr := $00000010;
  28887. end;
  28888. procedure TI2C1_I2C1STAT.setP(thebits : TBits_1); inline;
  28889. begin
  28890. if thebits = 0 then
  28891. pTDefRegMap(@Self)^.clr := $00000010
  28892. else
  28893. pTDefRegMap(@Self)^.&set := $00000010;
  28894. end;
  28895. function TI2C1_I2C1STAT.getP : TBits_1; inline;
  28896. begin
  28897. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  28898. end;
  28899. procedure TI2C1_I2C1STAT.setD_A; inline;
  28900. begin
  28901. pTDefRegMap(@Self)^.&set := $00000020;
  28902. end;
  28903. procedure TI2C1_I2C1STAT.clearD_A; inline;
  28904. begin
  28905. pTDefRegMap(@Self)^.clr := $00000020;
  28906. end;
  28907. procedure TI2C1_I2C1STAT.setD_A(thebits : TBits_1); inline;
  28908. begin
  28909. if thebits = 0 then
  28910. pTDefRegMap(@Self)^.clr := $00000020
  28911. else
  28912. pTDefRegMap(@Self)^.&set := $00000020;
  28913. end;
  28914. function TI2C1_I2C1STAT.getD_A : TBits_1; inline;
  28915. begin
  28916. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  28917. end;
  28918. procedure TI2C1_I2C1STAT.setI2COV; inline;
  28919. begin
  28920. pTDefRegMap(@Self)^.&set := $00000040;
  28921. end;
  28922. procedure TI2C1_I2C1STAT.clearI2COV; inline;
  28923. begin
  28924. pTDefRegMap(@Self)^.clr := $00000040;
  28925. end;
  28926. procedure TI2C1_I2C1STAT.setI2COV(thebits : TBits_1); inline;
  28927. begin
  28928. if thebits = 0 then
  28929. pTDefRegMap(@Self)^.clr := $00000040
  28930. else
  28931. pTDefRegMap(@Self)^.&set := $00000040;
  28932. end;
  28933. function TI2C1_I2C1STAT.getI2COV : TBits_1; inline;
  28934. begin
  28935. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  28936. end;
  28937. procedure TI2C1_I2C1STAT.setIWCOL; inline;
  28938. begin
  28939. pTDefRegMap(@Self)^.&set := $00000080;
  28940. end;
  28941. procedure TI2C1_I2C1STAT.clearIWCOL; inline;
  28942. begin
  28943. pTDefRegMap(@Self)^.clr := $00000080;
  28944. end;
  28945. procedure TI2C1_I2C1STAT.setIWCOL(thebits : TBits_1); inline;
  28946. begin
  28947. if thebits = 0 then
  28948. pTDefRegMap(@Self)^.clr := $00000080
  28949. else
  28950. pTDefRegMap(@Self)^.&set := $00000080;
  28951. end;
  28952. function TI2C1_I2C1STAT.getIWCOL : TBits_1; inline;
  28953. begin
  28954. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  28955. end;
  28956. procedure TI2C1_I2C1STAT.setADD10; inline;
  28957. begin
  28958. pTDefRegMap(@Self)^.&set := $00000100;
  28959. end;
  28960. procedure TI2C1_I2C1STAT.clearADD10; inline;
  28961. begin
  28962. pTDefRegMap(@Self)^.clr := $00000100;
  28963. end;
  28964. procedure TI2C1_I2C1STAT.setADD10(thebits : TBits_1); inline;
  28965. begin
  28966. if thebits = 0 then
  28967. pTDefRegMap(@Self)^.clr := $00000100
  28968. else
  28969. pTDefRegMap(@Self)^.&set := $00000100;
  28970. end;
  28971. function TI2C1_I2C1STAT.getADD10 : TBits_1; inline;
  28972. begin
  28973. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  28974. end;
  28975. procedure TI2C1_I2C1STAT.setGCSTAT; inline;
  28976. begin
  28977. pTDefRegMap(@Self)^.&set := $00000200;
  28978. end;
  28979. procedure TI2C1_I2C1STAT.clearGCSTAT; inline;
  28980. begin
  28981. pTDefRegMap(@Self)^.clr := $00000200;
  28982. end;
  28983. procedure TI2C1_I2C1STAT.setGCSTAT(thebits : TBits_1); inline;
  28984. begin
  28985. if thebits = 0 then
  28986. pTDefRegMap(@Self)^.clr := $00000200
  28987. else
  28988. pTDefRegMap(@Self)^.&set := $00000200;
  28989. end;
  28990. function TI2C1_I2C1STAT.getGCSTAT : TBits_1; inline;
  28991. begin
  28992. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  28993. end;
  28994. procedure TI2C1_I2C1STAT.setBCL; inline;
  28995. begin
  28996. pTDefRegMap(@Self)^.&set := $00000400;
  28997. end;
  28998. procedure TI2C1_I2C1STAT.clearBCL; inline;
  28999. begin
  29000. pTDefRegMap(@Self)^.clr := $00000400;
  29001. end;
  29002. procedure TI2C1_I2C1STAT.setBCL(thebits : TBits_1); inline;
  29003. begin
  29004. if thebits = 0 then
  29005. pTDefRegMap(@Self)^.clr := $00000400
  29006. else
  29007. pTDefRegMap(@Self)^.&set := $00000400;
  29008. end;
  29009. function TI2C1_I2C1STAT.getBCL : TBits_1; inline;
  29010. begin
  29011. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  29012. end;
  29013. procedure TI2C1_I2C1STAT.setTRSTAT; inline;
  29014. begin
  29015. pTDefRegMap(@Self)^.&set := $00004000;
  29016. end;
  29017. procedure TI2C1_I2C1STAT.clearTRSTAT; inline;
  29018. begin
  29019. pTDefRegMap(@Self)^.clr := $00004000;
  29020. end;
  29021. procedure TI2C1_I2C1STAT.setTRSTAT(thebits : TBits_1); inline;
  29022. begin
  29023. if thebits = 0 then
  29024. pTDefRegMap(@Self)^.clr := $00004000
  29025. else
  29026. pTDefRegMap(@Self)^.&set := $00004000;
  29027. end;
  29028. function TI2C1_I2C1STAT.getTRSTAT : TBits_1; inline;
  29029. begin
  29030. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  29031. end;
  29032. procedure TI2C1_I2C1STAT.setACKSTAT; inline;
  29033. begin
  29034. pTDefRegMap(@Self)^.&set := $00008000;
  29035. end;
  29036. procedure TI2C1_I2C1STAT.clearACKSTAT; inline;
  29037. begin
  29038. pTDefRegMap(@Self)^.clr := $00008000;
  29039. end;
  29040. procedure TI2C1_I2C1STAT.setACKSTAT(thebits : TBits_1); inline;
  29041. begin
  29042. if thebits = 0 then
  29043. pTDefRegMap(@Self)^.clr := $00008000
  29044. else
  29045. pTDefRegMap(@Self)^.&set := $00008000;
  29046. end;
  29047. function TI2C1_I2C1STAT.getACKSTAT : TBits_1; inline;
  29048. begin
  29049. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  29050. end;
  29051. procedure TI2C1_I2C1STAT.setI2CPOV; inline;
  29052. begin
  29053. pTDefRegMap(@Self)^.&set := $00000040;
  29054. end;
  29055. procedure TI2C1_I2C1STAT.clearI2CPOV; inline;
  29056. begin
  29057. pTDefRegMap(@Self)^.clr := $00000040;
  29058. end;
  29059. procedure TI2C1_I2C1STAT.setI2CPOV(thebits : TBits_1); inline;
  29060. begin
  29061. if thebits = 0 then
  29062. pTDefRegMap(@Self)^.clr := $00000040
  29063. else
  29064. pTDefRegMap(@Self)^.&set := $00000040;
  29065. end;
  29066. function TI2C1_I2C1STAT.getI2CPOV : TBits_1; inline;
  29067. begin
  29068. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  29069. end;
  29070. procedure TI2C1_I2C1STAT.setw(thebits : TBits_32); inline;
  29071. begin
  29072. pTDefRegMap(@Self)^.val := thebits;
  29073. end;
  29074. function TI2C1_I2C1STAT.getw : TBits_32; inline;
  29075. begin
  29076. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  29077. end;
  29078. procedure TSPI3_SPI1ACON.setSRXISEL(thebits : TBits_2); inline;
  29079. begin
  29080. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  29081. end;
  29082. function TSPI3_SPI1ACON.getSRXISEL : TBits_2; inline;
  29083. begin
  29084. getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  29085. end;
  29086. procedure TSPI3_SPI1ACON.setSTXISEL(thebits : TBits_2); inline;
  29087. begin
  29088. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
  29089. end;
  29090. function TSPI3_SPI1ACON.getSTXISEL : TBits_2; inline;
  29091. begin
  29092. getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
  29093. end;
  29094. procedure TSPI3_SPI1ACON.setMSTEN; inline;
  29095. begin
  29096. pTDefRegMap(@Self)^.&set := $00000020;
  29097. end;
  29098. procedure TSPI3_SPI1ACON.clearMSTEN; inline;
  29099. begin
  29100. pTDefRegMap(@Self)^.clr := $00000020;
  29101. end;
  29102. procedure TSPI3_SPI1ACON.setMSTEN(thebits : TBits_1); inline;
  29103. begin
  29104. if thebits = 0 then
  29105. pTDefRegMap(@Self)^.clr := $00000020
  29106. else
  29107. pTDefRegMap(@Self)^.&set := $00000020;
  29108. end;
  29109. function TSPI3_SPI1ACON.getMSTEN : TBits_1; inline;
  29110. begin
  29111. getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  29112. end;
  29113. procedure TSPI3_SPI1ACON.setCKP; inline;
  29114. begin
  29115. pTDefRegMap(@Self)^.&set := $00000040;
  29116. end;
  29117. procedure TSPI3_SPI1ACON.clearCKP; inline;
  29118. begin
  29119. pTDefRegMap(@Self)^.clr := $00000040;
  29120. end;
  29121. procedure TSPI3_SPI1ACON.setCKP(thebits : TBits_1); inline;
  29122. begin
  29123. if thebits = 0 then
  29124. pTDefRegMap(@Self)^.clr := $00000040
  29125. else
  29126. pTDefRegMap(@Self)^.&set := $00000040;
  29127. end;
  29128. function TSPI3_SPI1ACON.getCKP : TBits_1; inline;
  29129. begin
  29130. getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  29131. end;
  29132. procedure TSPI3_SPI1ACON.setSSEN; inline;
  29133. begin
  29134. pTDefRegMap(@Self)^.&set := $00000080;
  29135. end;
  29136. procedure TSPI3_SPI1ACON.clearSSEN; inline;
  29137. begin
  29138. pTDefRegMap(@Self)^.clr := $00000080;
  29139. end;
  29140. procedure TSPI3_SPI1ACON.setSSEN(thebits : TBits_1); inline;
  29141. begin
  29142. if thebits = 0 then
  29143. pTDefRegMap(@Self)^.clr := $00000080
  29144. else
  29145. pTDefRegMap(@Self)^.&set := $00000080;
  29146. end;
  29147. function TSPI3_SPI1ACON.getSSEN : TBits_1; inline;
  29148. begin
  29149. getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  29150. end;
  29151. procedure TSPI3_SPI1ACON.setCKE; inline;
  29152. begin
  29153. pTDefRegMap(@Self)^.&set := $00000100;
  29154. end;
  29155. procedure TSPI3_SPI1ACON.clearCKE; inline;
  29156. begin
  29157. pTDefRegMap(@Self)^.clr := $00000100;
  29158. end;
  29159. procedure TSPI3_SPI1ACON.setCKE(thebits : TBits_1); inline;
  29160. begin
  29161. if thebits = 0 then
  29162. pTDefRegMap(@Self)^.clr := $00000100
  29163. else
  29164. pTDefRegMap(@Self)^.&set := $00000100;
  29165. end;
  29166. function TSPI3_SPI1ACON.getCKE : TBits_1; inline;
  29167. begin
  29168. getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  29169. end;
  29170. procedure TSPI3_SPI1ACON.setSMP; inline;
  29171. begin
  29172. pTDefRegMap(@Self)^.&set := $00000200;
  29173. end;
  29174. procedure TSPI3_SPI1ACON.clearSMP; inline;
  29175. begin
  29176. pTDefRegMap(@Self)^.clr := $00000200;
  29177. end;
  29178. procedure TSPI3_SPI1ACON.setSMP(thebits : TBits_1); inline;
  29179. begin
  29180. if thebits = 0 then
  29181. pTDefRegMap(@Self)^.clr := $00000200
  29182. else
  29183. pTDefRegMap(@Self)^.&set := $00000200;
  29184. end;
  29185. function TSPI3_SPI1ACON.getSMP : TBits_1; inline;
  29186. begin
  29187. getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  29188. end;
  29189. procedure TSPI3_SPI1ACON.setMODE16; inline;
  29190. begin
  29191. pTDefRegMap(@Self)^.&set := $00000400;
  29192. end;
  29193. procedure TSPI3_SPI1ACON.clearMODE16; inline;
  29194. begin
  29195. pTDefRegMap(@Self)^.clr := $00000400;
  29196. end;
  29197. procedure TSPI3_SPI1ACON.setMODE16(thebits : TBits_1); inline;
  29198. begin
  29199. if thebits = 0 then
  29200. pTDefRegMap(@Self)^.clr := $00000400
  29201. else
  29202. pTDefRegMap(@Self)^.&set := $00000400;
  29203. end;
  29204. function TSPI3_SPI1ACON.getMODE16 : TBits_1; inline;
  29205. begin
  29206. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  29207. end;
  29208. procedure TSPI3_SPI1ACON.setMODE32; inline;
  29209. begin
  29210. pTDefRegMap(@Self)^.&set := $00000800;
  29211. end;
  29212. procedure TSPI3_SPI1ACON.clearMODE32; inline;
  29213. begin
  29214. pTDefRegMap(@Self)^.clr := $00000800;
  29215. end;
  29216. procedure TSPI3_SPI1ACON.setMODE32(thebits : TBits_1); inline;
  29217. begin
  29218. if thebits = 0 then
  29219. pTDefRegMap(@Self)^.clr := $00000800
  29220. else
  29221. pTDefRegMap(@Self)^.&set := $00000800;
  29222. end;
  29223. function TSPI3_SPI1ACON.getMODE32 : TBits_1; inline;
  29224. begin
  29225. getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  29226. end;
  29227. procedure TSPI3_SPI1ACON.setDISSDO; inline;
  29228. begin
  29229. pTDefRegMap(@Self)^.&set := $00001000;
  29230. end;
  29231. procedure TSPI3_SPI1ACON.clearDISSDO; inline;
  29232. begin
  29233. pTDefRegMap(@Self)^.clr := $00001000;
  29234. end;
  29235. procedure TSPI3_SPI1ACON.setDISSDO(thebits : TBits_1); inline;
  29236. begin
  29237. if thebits = 0 then
  29238. pTDefRegMap(@Self)^.clr := $00001000
  29239. else
  29240. pTDefRegMap(@Self)^.&set := $00001000;
  29241. end;
  29242. function TSPI3_SPI1ACON.getDISSDO : TBits_1; inline;
  29243. begin
  29244. getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  29245. end;
  29246. procedure TSPI3_SPI1ACON.setSIDL; inline;
  29247. begin
  29248. pTDefRegMap(@Self)^.&set := $00002000;
  29249. end;
  29250. procedure TSPI3_SPI1ACON.clearSIDL; inline;
  29251. begin
  29252. pTDefRegMap(@Self)^.clr := $00002000;
  29253. end;
  29254. procedure TSPI3_SPI1ACON.setSIDL(thebits : TBits_1); inline;
  29255. begin
  29256. if thebits = 0 then
  29257. pTDefRegMap(@Self)^.clr := $00002000
  29258. else
  29259. pTDefRegMap(@Self)^.&set := $00002000;
  29260. end;
  29261. function TSPI3_SPI1ACON.getSIDL : TBits_1; inline;
  29262. begin
  29263. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  29264. end;
  29265. procedure TSPI3_SPI1ACON.setON; inline;
  29266. begin
  29267. pTDefRegMap(@Self)^.&set := $00008000;
  29268. end;
  29269. procedure TSPI3_SPI1ACON.clearON; inline;
  29270. begin
  29271. pTDefRegMap(@Self)^.clr := $00008000;
  29272. end;
  29273. procedure TSPI3_SPI1ACON.setON(thebits : TBits_1); inline;
  29274. begin
  29275. if thebits = 0 then
  29276. pTDefRegMap(@Self)^.clr := $00008000
  29277. else
  29278. pTDefRegMap(@Self)^.&set := $00008000;
  29279. end;
  29280. function TSPI3_SPI1ACON.getON : TBits_1; inline;
  29281. begin
  29282. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  29283. end;
  29284. procedure TSPI3_SPI1ACON.setENHBUF; inline;
  29285. begin
  29286. pTDefRegMap(@Self)^.&set := $00010000;
  29287. end;
  29288. procedure TSPI3_SPI1ACON.clearENHBUF; inline;
  29289. begin
  29290. pTDefRegMap(@Self)^.clr := $00010000;
  29291. end;
  29292. procedure TSPI3_SPI1ACON.setENHBUF(thebits : TBits_1); inline;
  29293. begin
  29294. if thebits = 0 then
  29295. pTDefRegMap(@Self)^.clr := $00010000
  29296. else
  29297. pTDefRegMap(@Self)^.&set := $00010000;
  29298. end;
  29299. function TSPI3_SPI1ACON.getENHBUF : TBits_1; inline;
  29300. begin
  29301. getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  29302. end;
  29303. procedure TSPI3_SPI1ACON.setSPIFE; inline;
  29304. begin
  29305. pTDefRegMap(@Self)^.&set := $00020000;
  29306. end;
  29307. procedure TSPI3_SPI1ACON.clearSPIFE; inline;
  29308. begin
  29309. pTDefRegMap(@Self)^.clr := $00020000;
  29310. end;
  29311. procedure TSPI3_SPI1ACON.setSPIFE(thebits : TBits_1); inline;
  29312. begin
  29313. if thebits = 0 then
  29314. pTDefRegMap(@Self)^.clr := $00020000
  29315. else
  29316. pTDefRegMap(@Self)^.&set := $00020000;
  29317. end;
  29318. function TSPI3_SPI1ACON.getSPIFE : TBits_1; inline;
  29319. begin
  29320. getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  29321. end;
  29322. procedure TSPI3_SPI1ACON.setFRMCNT(thebits : TBits_3); inline;
  29323. begin
  29324. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  29325. end;
  29326. function TSPI3_SPI1ACON.getFRMCNT : TBits_3; inline;
  29327. begin
  29328. getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  29329. end;
  29330. procedure TSPI3_SPI1ACON.setFRMSYPW; inline;
  29331. begin
  29332. pTDefRegMap(@Self)^.&set := $08000000;
  29333. end;
  29334. procedure TSPI3_SPI1ACON.clearFRMSYPW; inline;
  29335. begin
  29336. pTDefRegMap(@Self)^.clr := $08000000;
  29337. end;
  29338. procedure TSPI3_SPI1ACON.setFRMSYPW(thebits : TBits_1); inline;
  29339. begin
  29340. if thebits = 0 then
  29341. pTDefRegMap(@Self)^.clr := $08000000
  29342. else
  29343. pTDefRegMap(@Self)^.&set := $08000000;
  29344. end;
  29345. function TSPI3_SPI1ACON.getFRMSYPW : TBits_1; inline;
  29346. begin
  29347. getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  29348. end;
  29349. procedure TSPI3_SPI1ACON.setMSSEN; inline;
  29350. begin
  29351. pTDefRegMap(@Self)^.&set := $10000000;
  29352. end;
  29353. procedure TSPI3_SPI1ACON.clearMSSEN; inline;
  29354. begin
  29355. pTDefRegMap(@Self)^.clr := $10000000;
  29356. end;
  29357. procedure TSPI3_SPI1ACON.setMSSEN(thebits : TBits_1); inline;
  29358. begin
  29359. if thebits = 0 then
  29360. pTDefRegMap(@Self)^.clr := $10000000
  29361. else
  29362. pTDefRegMap(@Self)^.&set := $10000000;
  29363. end;
  29364. function TSPI3_SPI1ACON.getMSSEN : TBits_1; inline;
  29365. begin
  29366. getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  29367. end;
  29368. procedure TSPI3_SPI1ACON.setFRMPOL; inline;
  29369. begin
  29370. pTDefRegMap(@Self)^.&set := $20000000;
  29371. end;
  29372. procedure TSPI3_SPI1ACON.clearFRMPOL; inline;
  29373. begin
  29374. pTDefRegMap(@Self)^.clr := $20000000;
  29375. end;
  29376. procedure TSPI3_SPI1ACON.setFRMPOL(thebits : TBits_1); inline;
  29377. begin
  29378. if thebits = 0 then
  29379. pTDefRegMap(@Self)^.clr := $20000000
  29380. else
  29381. pTDefRegMap(@Self)^.&set := $20000000;
  29382. end;
  29383. function TSPI3_SPI1ACON.getFRMPOL : TBits_1; inline;
  29384. begin
  29385. getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  29386. end;
  29387. procedure TSPI3_SPI1ACON.setFRMSYNC; inline;
  29388. begin
  29389. pTDefRegMap(@Self)^.&set := $40000000;
  29390. end;
  29391. procedure TSPI3_SPI1ACON.clearFRMSYNC; inline;
  29392. begin
  29393. pTDefRegMap(@Self)^.clr := $40000000;
  29394. end;
  29395. procedure TSPI3_SPI1ACON.setFRMSYNC(thebits : TBits_1); inline;
  29396. begin
  29397. if thebits = 0 then
  29398. pTDefRegMap(@Self)^.clr := $40000000
  29399. else
  29400. pTDefRegMap(@Self)^.&set := $40000000;
  29401. end;
  29402. function TSPI3_SPI1ACON.getFRMSYNC : TBits_1; inline;
  29403. begin
  29404. getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  29405. end;
  29406. procedure TSPI3_SPI1ACON.setFRMEN; inline;
  29407. begin
  29408. pTDefRegMap(@Self)^.&set := $80000000;
  29409. end;
  29410. procedure TSPI3_SPI1ACON.clearFRMEN; inline;
  29411. begin
  29412. pTDefRegMap(@Self)^.clr := $80000000;
  29413. end;
  29414. procedure TSPI3_SPI1ACON.setFRMEN(thebits : TBits_1); inline;
  29415. begin
  29416. if thebits = 0 then
  29417. pTDefRegMap(@Self)^.clr := $80000000
  29418. else
  29419. pTDefRegMap(@Self)^.&set := $80000000;
  29420. end;
  29421. function TSPI3_SPI1ACON.getFRMEN : TBits_1; inline;
  29422. begin
  29423. getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  29424. end;
  29425. procedure TSPI3_SPI1ACON.setw(thebits : TBits_32); inline;
  29426. begin
  29427. pTDefRegMap(@Self)^.val := thebits;
  29428. end;
  29429. function TSPI3_SPI1ACON.getw : TBits_32; inline;
  29430. begin
  29431. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  29432. end;
  29433. procedure TSPI3_SPI3CON.setSRXISEL(thebits : TBits_2); inline;
  29434. begin
  29435. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  29436. end;
  29437. function TSPI3_SPI3CON.getSRXISEL : TBits_2; inline;
  29438. begin
  29439. getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  29440. end;
  29441. procedure TSPI3_SPI3CON.setSTXISEL(thebits : TBits_2); inline;
  29442. begin
  29443. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
  29444. end;
  29445. function TSPI3_SPI3CON.getSTXISEL : TBits_2; inline;
  29446. begin
  29447. getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
  29448. end;
  29449. procedure TSPI3_SPI3CON.setMSTEN; inline;
  29450. begin
  29451. pTDefRegMap(@Self)^.&set := $00000020;
  29452. end;
  29453. procedure TSPI3_SPI3CON.clearMSTEN; inline;
  29454. begin
  29455. pTDefRegMap(@Self)^.clr := $00000020;
  29456. end;
  29457. procedure TSPI3_SPI3CON.setMSTEN(thebits : TBits_1); inline;
  29458. begin
  29459. if thebits = 0 then
  29460. pTDefRegMap(@Self)^.clr := $00000020
  29461. else
  29462. pTDefRegMap(@Self)^.&set := $00000020;
  29463. end;
  29464. function TSPI3_SPI3CON.getMSTEN : TBits_1; inline;
  29465. begin
  29466. getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  29467. end;
  29468. procedure TSPI3_SPI3CON.setCKP; inline;
  29469. begin
  29470. pTDefRegMap(@Self)^.&set := $00000040;
  29471. end;
  29472. procedure TSPI3_SPI3CON.clearCKP; inline;
  29473. begin
  29474. pTDefRegMap(@Self)^.clr := $00000040;
  29475. end;
  29476. procedure TSPI3_SPI3CON.setCKP(thebits : TBits_1); inline;
  29477. begin
  29478. if thebits = 0 then
  29479. pTDefRegMap(@Self)^.clr := $00000040
  29480. else
  29481. pTDefRegMap(@Self)^.&set := $00000040;
  29482. end;
  29483. function TSPI3_SPI3CON.getCKP : TBits_1; inline;
  29484. begin
  29485. getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  29486. end;
  29487. procedure TSPI3_SPI3CON.setSSEN; inline;
  29488. begin
  29489. pTDefRegMap(@Self)^.&set := $00000080;
  29490. end;
  29491. procedure TSPI3_SPI3CON.clearSSEN; inline;
  29492. begin
  29493. pTDefRegMap(@Self)^.clr := $00000080;
  29494. end;
  29495. procedure TSPI3_SPI3CON.setSSEN(thebits : TBits_1); inline;
  29496. begin
  29497. if thebits = 0 then
  29498. pTDefRegMap(@Self)^.clr := $00000080
  29499. else
  29500. pTDefRegMap(@Self)^.&set := $00000080;
  29501. end;
  29502. function TSPI3_SPI3CON.getSSEN : TBits_1; inline;
  29503. begin
  29504. getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  29505. end;
  29506. procedure TSPI3_SPI3CON.setCKE; inline;
  29507. begin
  29508. pTDefRegMap(@Self)^.&set := $00000100;
  29509. end;
  29510. procedure TSPI3_SPI3CON.clearCKE; inline;
  29511. begin
  29512. pTDefRegMap(@Self)^.clr := $00000100;
  29513. end;
  29514. procedure TSPI3_SPI3CON.setCKE(thebits : TBits_1); inline;
  29515. begin
  29516. if thebits = 0 then
  29517. pTDefRegMap(@Self)^.clr := $00000100
  29518. else
  29519. pTDefRegMap(@Self)^.&set := $00000100;
  29520. end;
  29521. function TSPI3_SPI3CON.getCKE : TBits_1; inline;
  29522. begin
  29523. getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  29524. end;
  29525. procedure TSPI3_SPI3CON.setSMP; inline;
  29526. begin
  29527. pTDefRegMap(@Self)^.&set := $00000200;
  29528. end;
  29529. procedure TSPI3_SPI3CON.clearSMP; inline;
  29530. begin
  29531. pTDefRegMap(@Self)^.clr := $00000200;
  29532. end;
  29533. procedure TSPI3_SPI3CON.setSMP(thebits : TBits_1); inline;
  29534. begin
  29535. if thebits = 0 then
  29536. pTDefRegMap(@Self)^.clr := $00000200
  29537. else
  29538. pTDefRegMap(@Self)^.&set := $00000200;
  29539. end;
  29540. function TSPI3_SPI3CON.getSMP : TBits_1; inline;
  29541. begin
  29542. getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  29543. end;
  29544. procedure TSPI3_SPI3CON.setMODE16; inline;
  29545. begin
  29546. pTDefRegMap(@Self)^.&set := $00000400;
  29547. end;
  29548. procedure TSPI3_SPI3CON.clearMODE16; inline;
  29549. begin
  29550. pTDefRegMap(@Self)^.clr := $00000400;
  29551. end;
  29552. procedure TSPI3_SPI3CON.setMODE16(thebits : TBits_1); inline;
  29553. begin
  29554. if thebits = 0 then
  29555. pTDefRegMap(@Self)^.clr := $00000400
  29556. else
  29557. pTDefRegMap(@Self)^.&set := $00000400;
  29558. end;
  29559. function TSPI3_SPI3CON.getMODE16 : TBits_1; inline;
  29560. begin
  29561. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  29562. end;
  29563. procedure TSPI3_SPI3CON.setMODE32; inline;
  29564. begin
  29565. pTDefRegMap(@Self)^.&set := $00000800;
  29566. end;
  29567. procedure TSPI3_SPI3CON.clearMODE32; inline;
  29568. begin
  29569. pTDefRegMap(@Self)^.clr := $00000800;
  29570. end;
  29571. procedure TSPI3_SPI3CON.setMODE32(thebits : TBits_1); inline;
  29572. begin
  29573. if thebits = 0 then
  29574. pTDefRegMap(@Self)^.clr := $00000800
  29575. else
  29576. pTDefRegMap(@Self)^.&set := $00000800;
  29577. end;
  29578. function TSPI3_SPI3CON.getMODE32 : TBits_1; inline;
  29579. begin
  29580. getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  29581. end;
  29582. procedure TSPI3_SPI3CON.setDISSDO; inline;
  29583. begin
  29584. pTDefRegMap(@Self)^.&set := $00001000;
  29585. end;
  29586. procedure TSPI3_SPI3CON.clearDISSDO; inline;
  29587. begin
  29588. pTDefRegMap(@Self)^.clr := $00001000;
  29589. end;
  29590. procedure TSPI3_SPI3CON.setDISSDO(thebits : TBits_1); inline;
  29591. begin
  29592. if thebits = 0 then
  29593. pTDefRegMap(@Self)^.clr := $00001000
  29594. else
  29595. pTDefRegMap(@Self)^.&set := $00001000;
  29596. end;
  29597. function TSPI3_SPI3CON.getDISSDO : TBits_1; inline;
  29598. begin
  29599. getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  29600. end;
  29601. procedure TSPI3_SPI3CON.setSIDL; inline;
  29602. begin
  29603. pTDefRegMap(@Self)^.&set := $00002000;
  29604. end;
  29605. procedure TSPI3_SPI3CON.clearSIDL; inline;
  29606. begin
  29607. pTDefRegMap(@Self)^.clr := $00002000;
  29608. end;
  29609. procedure TSPI3_SPI3CON.setSIDL(thebits : TBits_1); inline;
  29610. begin
  29611. if thebits = 0 then
  29612. pTDefRegMap(@Self)^.clr := $00002000
  29613. else
  29614. pTDefRegMap(@Self)^.&set := $00002000;
  29615. end;
  29616. function TSPI3_SPI3CON.getSIDL : TBits_1; inline;
  29617. begin
  29618. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  29619. end;
  29620. procedure TSPI3_SPI3CON.setON; inline;
  29621. begin
  29622. pTDefRegMap(@Self)^.&set := $00008000;
  29623. end;
  29624. procedure TSPI3_SPI3CON.clearON; inline;
  29625. begin
  29626. pTDefRegMap(@Self)^.clr := $00008000;
  29627. end;
  29628. procedure TSPI3_SPI3CON.setON(thebits : TBits_1); inline;
  29629. begin
  29630. if thebits = 0 then
  29631. pTDefRegMap(@Self)^.clr := $00008000
  29632. else
  29633. pTDefRegMap(@Self)^.&set := $00008000;
  29634. end;
  29635. function TSPI3_SPI3CON.getON : TBits_1; inline;
  29636. begin
  29637. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  29638. end;
  29639. procedure TSPI3_SPI3CON.setENHBUF; inline;
  29640. begin
  29641. pTDefRegMap(@Self)^.&set := $00010000;
  29642. end;
  29643. procedure TSPI3_SPI3CON.clearENHBUF; inline;
  29644. begin
  29645. pTDefRegMap(@Self)^.clr := $00010000;
  29646. end;
  29647. procedure TSPI3_SPI3CON.setENHBUF(thebits : TBits_1); inline;
  29648. begin
  29649. if thebits = 0 then
  29650. pTDefRegMap(@Self)^.clr := $00010000
  29651. else
  29652. pTDefRegMap(@Self)^.&set := $00010000;
  29653. end;
  29654. function TSPI3_SPI3CON.getENHBUF : TBits_1; inline;
  29655. begin
  29656. getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  29657. end;
  29658. procedure TSPI3_SPI3CON.setSPIFE; inline;
  29659. begin
  29660. pTDefRegMap(@Self)^.&set := $00020000;
  29661. end;
  29662. procedure TSPI3_SPI3CON.clearSPIFE; inline;
  29663. begin
  29664. pTDefRegMap(@Self)^.clr := $00020000;
  29665. end;
  29666. procedure TSPI3_SPI3CON.setSPIFE(thebits : TBits_1); inline;
  29667. begin
  29668. if thebits = 0 then
  29669. pTDefRegMap(@Self)^.clr := $00020000
  29670. else
  29671. pTDefRegMap(@Self)^.&set := $00020000;
  29672. end;
  29673. function TSPI3_SPI3CON.getSPIFE : TBits_1; inline;
  29674. begin
  29675. getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  29676. end;
  29677. procedure TSPI3_SPI3CON.setFRMCNT(thebits : TBits_3); inline;
  29678. begin
  29679. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  29680. end;
  29681. function TSPI3_SPI3CON.getFRMCNT : TBits_3; inline;
  29682. begin
  29683. getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  29684. end;
  29685. procedure TSPI3_SPI3CON.setFRMSYPW; inline;
  29686. begin
  29687. pTDefRegMap(@Self)^.&set := $08000000;
  29688. end;
  29689. procedure TSPI3_SPI3CON.clearFRMSYPW; inline;
  29690. begin
  29691. pTDefRegMap(@Self)^.clr := $08000000;
  29692. end;
  29693. procedure TSPI3_SPI3CON.setFRMSYPW(thebits : TBits_1); inline;
  29694. begin
  29695. if thebits = 0 then
  29696. pTDefRegMap(@Self)^.clr := $08000000
  29697. else
  29698. pTDefRegMap(@Self)^.&set := $08000000;
  29699. end;
  29700. function TSPI3_SPI3CON.getFRMSYPW : TBits_1; inline;
  29701. begin
  29702. getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  29703. end;
  29704. procedure TSPI3_SPI3CON.setMSSEN; inline;
  29705. begin
  29706. pTDefRegMap(@Self)^.&set := $10000000;
  29707. end;
  29708. procedure TSPI3_SPI3CON.clearMSSEN; inline;
  29709. begin
  29710. pTDefRegMap(@Self)^.clr := $10000000;
  29711. end;
  29712. procedure TSPI3_SPI3CON.setMSSEN(thebits : TBits_1); inline;
  29713. begin
  29714. if thebits = 0 then
  29715. pTDefRegMap(@Self)^.clr := $10000000
  29716. else
  29717. pTDefRegMap(@Self)^.&set := $10000000;
  29718. end;
  29719. function TSPI3_SPI3CON.getMSSEN : TBits_1; inline;
  29720. begin
  29721. getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  29722. end;
  29723. procedure TSPI3_SPI3CON.setFRMPOL; inline;
  29724. begin
  29725. pTDefRegMap(@Self)^.&set := $20000000;
  29726. end;
  29727. procedure TSPI3_SPI3CON.clearFRMPOL; inline;
  29728. begin
  29729. pTDefRegMap(@Self)^.clr := $20000000;
  29730. end;
  29731. procedure TSPI3_SPI3CON.setFRMPOL(thebits : TBits_1); inline;
  29732. begin
  29733. if thebits = 0 then
  29734. pTDefRegMap(@Self)^.clr := $20000000
  29735. else
  29736. pTDefRegMap(@Self)^.&set := $20000000;
  29737. end;
  29738. function TSPI3_SPI3CON.getFRMPOL : TBits_1; inline;
  29739. begin
  29740. getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  29741. end;
  29742. procedure TSPI3_SPI3CON.setFRMSYNC; inline;
  29743. begin
  29744. pTDefRegMap(@Self)^.&set := $40000000;
  29745. end;
  29746. procedure TSPI3_SPI3CON.clearFRMSYNC; inline;
  29747. begin
  29748. pTDefRegMap(@Self)^.clr := $40000000;
  29749. end;
  29750. procedure TSPI3_SPI3CON.setFRMSYNC(thebits : TBits_1); inline;
  29751. begin
  29752. if thebits = 0 then
  29753. pTDefRegMap(@Self)^.clr := $40000000
  29754. else
  29755. pTDefRegMap(@Self)^.&set := $40000000;
  29756. end;
  29757. function TSPI3_SPI3CON.getFRMSYNC : TBits_1; inline;
  29758. begin
  29759. getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  29760. end;
  29761. procedure TSPI3_SPI3CON.setFRMEN; inline;
  29762. begin
  29763. pTDefRegMap(@Self)^.&set := $80000000;
  29764. end;
  29765. procedure TSPI3_SPI3CON.clearFRMEN; inline;
  29766. begin
  29767. pTDefRegMap(@Self)^.clr := $80000000;
  29768. end;
  29769. procedure TSPI3_SPI3CON.setFRMEN(thebits : TBits_1); inline;
  29770. begin
  29771. if thebits = 0 then
  29772. pTDefRegMap(@Self)^.clr := $80000000
  29773. else
  29774. pTDefRegMap(@Self)^.&set := $80000000;
  29775. end;
  29776. function TSPI3_SPI3CON.getFRMEN : TBits_1; inline;
  29777. begin
  29778. getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  29779. end;
  29780. procedure TSPI3_SPI3CON.setw(thebits : TBits_32); inline;
  29781. begin
  29782. pTDefRegMap(@Self)^.val := thebits;
  29783. end;
  29784. function TSPI3_SPI3CON.getw : TBits_32; inline;
  29785. begin
  29786. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  29787. end;
  29788. procedure TSPI3_SPI1ASTAT.setSPIRBF; inline;
  29789. begin
  29790. pTDefRegMap(@Self)^.&set := $00000001;
  29791. end;
  29792. procedure TSPI3_SPI1ASTAT.clearSPIRBF; inline;
  29793. begin
  29794. pTDefRegMap(@Self)^.clr := $00000001;
  29795. end;
  29796. procedure TSPI3_SPI1ASTAT.setSPIRBF(thebits : TBits_1); inline;
  29797. begin
  29798. if thebits = 0 then
  29799. pTDefRegMap(@Self)^.clr := $00000001
  29800. else
  29801. pTDefRegMap(@Self)^.&set := $00000001;
  29802. end;
  29803. function TSPI3_SPI1ASTAT.getSPIRBF : TBits_1; inline;
  29804. begin
  29805. getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  29806. end;
  29807. procedure TSPI3_SPI1ASTAT.setSPITBF; inline;
  29808. begin
  29809. pTDefRegMap(@Self)^.&set := $00000002;
  29810. end;
  29811. procedure TSPI3_SPI1ASTAT.clearSPITBF; inline;
  29812. begin
  29813. pTDefRegMap(@Self)^.clr := $00000002;
  29814. end;
  29815. procedure TSPI3_SPI1ASTAT.setSPITBF(thebits : TBits_1); inline;
  29816. begin
  29817. if thebits = 0 then
  29818. pTDefRegMap(@Self)^.clr := $00000002
  29819. else
  29820. pTDefRegMap(@Self)^.&set := $00000002;
  29821. end;
  29822. function TSPI3_SPI1ASTAT.getSPITBF : TBits_1; inline;
  29823. begin
  29824. getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  29825. end;
  29826. procedure TSPI3_SPI1ASTAT.setSPITBE; inline;
  29827. begin
  29828. pTDefRegMap(@Self)^.&set := $00000008;
  29829. end;
  29830. procedure TSPI3_SPI1ASTAT.clearSPITBE; inline;
  29831. begin
  29832. pTDefRegMap(@Self)^.clr := $00000008;
  29833. end;
  29834. procedure TSPI3_SPI1ASTAT.setSPITBE(thebits : TBits_1); inline;
  29835. begin
  29836. if thebits = 0 then
  29837. pTDefRegMap(@Self)^.clr := $00000008
  29838. else
  29839. pTDefRegMap(@Self)^.&set := $00000008;
  29840. end;
  29841. function TSPI3_SPI1ASTAT.getSPITBE : TBits_1; inline;
  29842. begin
  29843. getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  29844. end;
  29845. procedure TSPI3_SPI1ASTAT.setSPIRBE; inline;
  29846. begin
  29847. pTDefRegMap(@Self)^.&set := $00000020;
  29848. end;
  29849. procedure TSPI3_SPI1ASTAT.clearSPIRBE; inline;
  29850. begin
  29851. pTDefRegMap(@Self)^.clr := $00000020;
  29852. end;
  29853. procedure TSPI3_SPI1ASTAT.setSPIRBE(thebits : TBits_1); inline;
  29854. begin
  29855. if thebits = 0 then
  29856. pTDefRegMap(@Self)^.clr := $00000020
  29857. else
  29858. pTDefRegMap(@Self)^.&set := $00000020;
  29859. end;
  29860. function TSPI3_SPI1ASTAT.getSPIRBE : TBits_1; inline;
  29861. begin
  29862. getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  29863. end;
  29864. procedure TSPI3_SPI1ASTAT.setSPIROV; inline;
  29865. begin
  29866. pTDefRegMap(@Self)^.&set := $00000040;
  29867. end;
  29868. procedure TSPI3_SPI1ASTAT.clearSPIROV; inline;
  29869. begin
  29870. pTDefRegMap(@Self)^.clr := $00000040;
  29871. end;
  29872. procedure TSPI3_SPI1ASTAT.setSPIROV(thebits : TBits_1); inline;
  29873. begin
  29874. if thebits = 0 then
  29875. pTDefRegMap(@Self)^.clr := $00000040
  29876. else
  29877. pTDefRegMap(@Self)^.&set := $00000040;
  29878. end;
  29879. function TSPI3_SPI1ASTAT.getSPIROV : TBits_1; inline;
  29880. begin
  29881. getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  29882. end;
  29883. procedure TSPI3_SPI1ASTAT.setSRMT; inline;
  29884. begin
  29885. pTDefRegMap(@Self)^.&set := $00000080;
  29886. end;
  29887. procedure TSPI3_SPI1ASTAT.clearSRMT; inline;
  29888. begin
  29889. pTDefRegMap(@Self)^.clr := $00000080;
  29890. end;
  29891. procedure TSPI3_SPI1ASTAT.setSRMT(thebits : TBits_1); inline;
  29892. begin
  29893. if thebits = 0 then
  29894. pTDefRegMap(@Self)^.clr := $00000080
  29895. else
  29896. pTDefRegMap(@Self)^.&set := $00000080;
  29897. end;
  29898. function TSPI3_SPI1ASTAT.getSRMT : TBits_1; inline;
  29899. begin
  29900. getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  29901. end;
  29902. procedure TSPI3_SPI1ASTAT.setSPITUR; inline;
  29903. begin
  29904. pTDefRegMap(@Self)^.&set := $00000100;
  29905. end;
  29906. procedure TSPI3_SPI1ASTAT.clearSPITUR; inline;
  29907. begin
  29908. pTDefRegMap(@Self)^.clr := $00000100;
  29909. end;
  29910. procedure TSPI3_SPI1ASTAT.setSPITUR(thebits : TBits_1); inline;
  29911. begin
  29912. if thebits = 0 then
  29913. pTDefRegMap(@Self)^.clr := $00000100
  29914. else
  29915. pTDefRegMap(@Self)^.&set := $00000100;
  29916. end;
  29917. function TSPI3_SPI1ASTAT.getSPITUR : TBits_1; inline;
  29918. begin
  29919. getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  29920. end;
  29921. procedure TSPI3_SPI1ASTAT.setSPIBUSY; inline;
  29922. begin
  29923. pTDefRegMap(@Self)^.&set := $00000800;
  29924. end;
  29925. procedure TSPI3_SPI1ASTAT.clearSPIBUSY; inline;
  29926. begin
  29927. pTDefRegMap(@Self)^.clr := $00000800;
  29928. end;
  29929. procedure TSPI3_SPI1ASTAT.setSPIBUSY(thebits : TBits_1); inline;
  29930. begin
  29931. if thebits = 0 then
  29932. pTDefRegMap(@Self)^.clr := $00000800
  29933. else
  29934. pTDefRegMap(@Self)^.&set := $00000800;
  29935. end;
  29936. function TSPI3_SPI1ASTAT.getSPIBUSY : TBits_1; inline;
  29937. begin
  29938. getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  29939. end;
  29940. procedure TSPI3_SPI1ASTAT.setTXBUFELM(thebits : TBits_5); inline;
  29941. begin
  29942. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  29943. end;
  29944. function TSPI3_SPI1ASTAT.getTXBUFELM : TBits_5; inline;
  29945. begin
  29946. getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  29947. end;
  29948. procedure TSPI3_SPI1ASTAT.setRXBUFELM(thebits : TBits_5); inline;
  29949. begin
  29950. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  29951. end;
  29952. function TSPI3_SPI1ASTAT.getRXBUFELM : TBits_5; inline;
  29953. begin
  29954. getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  29955. end;
  29956. procedure TSPI3_SPI1ASTAT.setw(thebits : TBits_32); inline;
  29957. begin
  29958. pTDefRegMap(@Self)^.val := thebits;
  29959. end;
  29960. function TSPI3_SPI1ASTAT.getw : TBits_32; inline;
  29961. begin
  29962. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  29963. end;
  29964. procedure TSPI3_SPI3STAT.setSPIRBF; inline;
  29965. begin
  29966. pTDefRegMap(@Self)^.&set := $00000001;
  29967. end;
  29968. procedure TSPI3_SPI3STAT.clearSPIRBF; inline;
  29969. begin
  29970. pTDefRegMap(@Self)^.clr := $00000001;
  29971. end;
  29972. procedure TSPI3_SPI3STAT.setSPIRBF(thebits : TBits_1); inline;
  29973. begin
  29974. if thebits = 0 then
  29975. pTDefRegMap(@Self)^.clr := $00000001
  29976. else
  29977. pTDefRegMap(@Self)^.&set := $00000001;
  29978. end;
  29979. function TSPI3_SPI3STAT.getSPIRBF : TBits_1; inline;
  29980. begin
  29981. getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  29982. end;
  29983. procedure TSPI3_SPI3STAT.setSPITBF; inline;
  29984. begin
  29985. pTDefRegMap(@Self)^.&set := $00000002;
  29986. end;
  29987. procedure TSPI3_SPI3STAT.clearSPITBF; inline;
  29988. begin
  29989. pTDefRegMap(@Self)^.clr := $00000002;
  29990. end;
  29991. procedure TSPI3_SPI3STAT.setSPITBF(thebits : TBits_1); inline;
  29992. begin
  29993. if thebits = 0 then
  29994. pTDefRegMap(@Self)^.clr := $00000002
  29995. else
  29996. pTDefRegMap(@Self)^.&set := $00000002;
  29997. end;
  29998. function TSPI3_SPI3STAT.getSPITBF : TBits_1; inline;
  29999. begin
  30000. getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  30001. end;
  30002. procedure TSPI3_SPI3STAT.setSPITBE; inline;
  30003. begin
  30004. pTDefRegMap(@Self)^.&set := $00000008;
  30005. end;
  30006. procedure TSPI3_SPI3STAT.clearSPITBE; inline;
  30007. begin
  30008. pTDefRegMap(@Self)^.clr := $00000008;
  30009. end;
  30010. procedure TSPI3_SPI3STAT.setSPITBE(thebits : TBits_1); inline;
  30011. begin
  30012. if thebits = 0 then
  30013. pTDefRegMap(@Self)^.clr := $00000008
  30014. else
  30015. pTDefRegMap(@Self)^.&set := $00000008;
  30016. end;
  30017. function TSPI3_SPI3STAT.getSPITBE : TBits_1; inline;
  30018. begin
  30019. getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  30020. end;
  30021. procedure TSPI3_SPI3STAT.setSPIRBE; inline;
  30022. begin
  30023. pTDefRegMap(@Self)^.&set := $00000020;
  30024. end;
  30025. procedure TSPI3_SPI3STAT.clearSPIRBE; inline;
  30026. begin
  30027. pTDefRegMap(@Self)^.clr := $00000020;
  30028. end;
  30029. procedure TSPI3_SPI3STAT.setSPIRBE(thebits : TBits_1); inline;
  30030. begin
  30031. if thebits = 0 then
  30032. pTDefRegMap(@Self)^.clr := $00000020
  30033. else
  30034. pTDefRegMap(@Self)^.&set := $00000020;
  30035. end;
  30036. function TSPI3_SPI3STAT.getSPIRBE : TBits_1; inline;
  30037. begin
  30038. getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  30039. end;
  30040. procedure TSPI3_SPI3STAT.setSPIROV; inline;
  30041. begin
  30042. pTDefRegMap(@Self)^.&set := $00000040;
  30043. end;
  30044. procedure TSPI3_SPI3STAT.clearSPIROV; inline;
  30045. begin
  30046. pTDefRegMap(@Self)^.clr := $00000040;
  30047. end;
  30048. procedure TSPI3_SPI3STAT.setSPIROV(thebits : TBits_1); inline;
  30049. begin
  30050. if thebits = 0 then
  30051. pTDefRegMap(@Self)^.clr := $00000040
  30052. else
  30053. pTDefRegMap(@Self)^.&set := $00000040;
  30054. end;
  30055. function TSPI3_SPI3STAT.getSPIROV : TBits_1; inline;
  30056. begin
  30057. getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  30058. end;
  30059. procedure TSPI3_SPI3STAT.setSRMT; inline;
  30060. begin
  30061. pTDefRegMap(@Self)^.&set := $00000080;
  30062. end;
  30063. procedure TSPI3_SPI3STAT.clearSRMT; inline;
  30064. begin
  30065. pTDefRegMap(@Self)^.clr := $00000080;
  30066. end;
  30067. procedure TSPI3_SPI3STAT.setSRMT(thebits : TBits_1); inline;
  30068. begin
  30069. if thebits = 0 then
  30070. pTDefRegMap(@Self)^.clr := $00000080
  30071. else
  30072. pTDefRegMap(@Self)^.&set := $00000080;
  30073. end;
  30074. function TSPI3_SPI3STAT.getSRMT : TBits_1; inline;
  30075. begin
  30076. getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  30077. end;
  30078. procedure TSPI3_SPI3STAT.setSPITUR; inline;
  30079. begin
  30080. pTDefRegMap(@Self)^.&set := $00000100;
  30081. end;
  30082. procedure TSPI3_SPI3STAT.clearSPITUR; inline;
  30083. begin
  30084. pTDefRegMap(@Self)^.clr := $00000100;
  30085. end;
  30086. procedure TSPI3_SPI3STAT.setSPITUR(thebits : TBits_1); inline;
  30087. begin
  30088. if thebits = 0 then
  30089. pTDefRegMap(@Self)^.clr := $00000100
  30090. else
  30091. pTDefRegMap(@Self)^.&set := $00000100;
  30092. end;
  30093. function TSPI3_SPI3STAT.getSPITUR : TBits_1; inline;
  30094. begin
  30095. getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  30096. end;
  30097. procedure TSPI3_SPI3STAT.setSPIBUSY; inline;
  30098. begin
  30099. pTDefRegMap(@Self)^.&set := $00000800;
  30100. end;
  30101. procedure TSPI3_SPI3STAT.clearSPIBUSY; inline;
  30102. begin
  30103. pTDefRegMap(@Self)^.clr := $00000800;
  30104. end;
  30105. procedure TSPI3_SPI3STAT.setSPIBUSY(thebits : TBits_1); inline;
  30106. begin
  30107. if thebits = 0 then
  30108. pTDefRegMap(@Self)^.clr := $00000800
  30109. else
  30110. pTDefRegMap(@Self)^.&set := $00000800;
  30111. end;
  30112. function TSPI3_SPI3STAT.getSPIBUSY : TBits_1; inline;
  30113. begin
  30114. getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  30115. end;
  30116. procedure TSPI3_SPI3STAT.setTXBUFELM(thebits : TBits_5); inline;
  30117. begin
  30118. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  30119. end;
  30120. function TSPI3_SPI3STAT.getTXBUFELM : TBits_5; inline;
  30121. begin
  30122. getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  30123. end;
  30124. procedure TSPI3_SPI3STAT.setRXBUFELM(thebits : TBits_5); inline;
  30125. begin
  30126. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  30127. end;
  30128. function TSPI3_SPI3STAT.getRXBUFELM : TBits_5; inline;
  30129. begin
  30130. getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  30131. end;
  30132. procedure TSPI3_SPI3STAT.setw(thebits : TBits_32); inline;
  30133. begin
  30134. pTDefRegMap(@Self)^.val := thebits;
  30135. end;
  30136. function TSPI3_SPI3STAT.getw : TBits_32; inline;
  30137. begin
  30138. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  30139. end;
  30140. procedure TSPI2A_SPI2ACON.setSRXISEL(thebits : TBits_2); inline;
  30141. begin
  30142. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  30143. end;
  30144. function TSPI2A_SPI2ACON.getSRXISEL : TBits_2; inline;
  30145. begin
  30146. getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  30147. end;
  30148. procedure TSPI2A_SPI2ACON.setSTXISEL(thebits : TBits_2); inline;
  30149. begin
  30150. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
  30151. end;
  30152. function TSPI2A_SPI2ACON.getSTXISEL : TBits_2; inline;
  30153. begin
  30154. getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
  30155. end;
  30156. procedure TSPI2A_SPI2ACON.setMSTEN; inline;
  30157. begin
  30158. pTDefRegMap(@Self)^.&set := $00000020;
  30159. end;
  30160. procedure TSPI2A_SPI2ACON.clearMSTEN; inline;
  30161. begin
  30162. pTDefRegMap(@Self)^.clr := $00000020;
  30163. end;
  30164. procedure TSPI2A_SPI2ACON.setMSTEN(thebits : TBits_1); inline;
  30165. begin
  30166. if thebits = 0 then
  30167. pTDefRegMap(@Self)^.clr := $00000020
  30168. else
  30169. pTDefRegMap(@Self)^.&set := $00000020;
  30170. end;
  30171. function TSPI2A_SPI2ACON.getMSTEN : TBits_1; inline;
  30172. begin
  30173. getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  30174. end;
  30175. procedure TSPI2A_SPI2ACON.setCKP; inline;
  30176. begin
  30177. pTDefRegMap(@Self)^.&set := $00000040;
  30178. end;
  30179. procedure TSPI2A_SPI2ACON.clearCKP; inline;
  30180. begin
  30181. pTDefRegMap(@Self)^.clr := $00000040;
  30182. end;
  30183. procedure TSPI2A_SPI2ACON.setCKP(thebits : TBits_1); inline;
  30184. begin
  30185. if thebits = 0 then
  30186. pTDefRegMap(@Self)^.clr := $00000040
  30187. else
  30188. pTDefRegMap(@Self)^.&set := $00000040;
  30189. end;
  30190. function TSPI2A_SPI2ACON.getCKP : TBits_1; inline;
  30191. begin
  30192. getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  30193. end;
  30194. procedure TSPI2A_SPI2ACON.setSSEN; inline;
  30195. begin
  30196. pTDefRegMap(@Self)^.&set := $00000080;
  30197. end;
  30198. procedure TSPI2A_SPI2ACON.clearSSEN; inline;
  30199. begin
  30200. pTDefRegMap(@Self)^.clr := $00000080;
  30201. end;
  30202. procedure TSPI2A_SPI2ACON.setSSEN(thebits : TBits_1); inline;
  30203. begin
  30204. if thebits = 0 then
  30205. pTDefRegMap(@Self)^.clr := $00000080
  30206. else
  30207. pTDefRegMap(@Self)^.&set := $00000080;
  30208. end;
  30209. function TSPI2A_SPI2ACON.getSSEN : TBits_1; inline;
  30210. begin
  30211. getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  30212. end;
  30213. procedure TSPI2A_SPI2ACON.setCKE; inline;
  30214. begin
  30215. pTDefRegMap(@Self)^.&set := $00000100;
  30216. end;
  30217. procedure TSPI2A_SPI2ACON.clearCKE; inline;
  30218. begin
  30219. pTDefRegMap(@Self)^.clr := $00000100;
  30220. end;
  30221. procedure TSPI2A_SPI2ACON.setCKE(thebits : TBits_1); inline;
  30222. begin
  30223. if thebits = 0 then
  30224. pTDefRegMap(@Self)^.clr := $00000100
  30225. else
  30226. pTDefRegMap(@Self)^.&set := $00000100;
  30227. end;
  30228. function TSPI2A_SPI2ACON.getCKE : TBits_1; inline;
  30229. begin
  30230. getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  30231. end;
  30232. procedure TSPI2A_SPI2ACON.setSMP; inline;
  30233. begin
  30234. pTDefRegMap(@Self)^.&set := $00000200;
  30235. end;
  30236. procedure TSPI2A_SPI2ACON.clearSMP; inline;
  30237. begin
  30238. pTDefRegMap(@Self)^.clr := $00000200;
  30239. end;
  30240. procedure TSPI2A_SPI2ACON.setSMP(thebits : TBits_1); inline;
  30241. begin
  30242. if thebits = 0 then
  30243. pTDefRegMap(@Self)^.clr := $00000200
  30244. else
  30245. pTDefRegMap(@Self)^.&set := $00000200;
  30246. end;
  30247. function TSPI2A_SPI2ACON.getSMP : TBits_1; inline;
  30248. begin
  30249. getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  30250. end;
  30251. procedure TSPI2A_SPI2ACON.setMODE16; inline;
  30252. begin
  30253. pTDefRegMap(@Self)^.&set := $00000400;
  30254. end;
  30255. procedure TSPI2A_SPI2ACON.clearMODE16; inline;
  30256. begin
  30257. pTDefRegMap(@Self)^.clr := $00000400;
  30258. end;
  30259. procedure TSPI2A_SPI2ACON.setMODE16(thebits : TBits_1); inline;
  30260. begin
  30261. if thebits = 0 then
  30262. pTDefRegMap(@Self)^.clr := $00000400
  30263. else
  30264. pTDefRegMap(@Self)^.&set := $00000400;
  30265. end;
  30266. function TSPI2A_SPI2ACON.getMODE16 : TBits_1; inline;
  30267. begin
  30268. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  30269. end;
  30270. procedure TSPI2A_SPI2ACON.setMODE32; inline;
  30271. begin
  30272. pTDefRegMap(@Self)^.&set := $00000800;
  30273. end;
  30274. procedure TSPI2A_SPI2ACON.clearMODE32; inline;
  30275. begin
  30276. pTDefRegMap(@Self)^.clr := $00000800;
  30277. end;
  30278. procedure TSPI2A_SPI2ACON.setMODE32(thebits : TBits_1); inline;
  30279. begin
  30280. if thebits = 0 then
  30281. pTDefRegMap(@Self)^.clr := $00000800
  30282. else
  30283. pTDefRegMap(@Self)^.&set := $00000800;
  30284. end;
  30285. function TSPI2A_SPI2ACON.getMODE32 : TBits_1; inline;
  30286. begin
  30287. getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  30288. end;
  30289. procedure TSPI2A_SPI2ACON.setDISSDO; inline;
  30290. begin
  30291. pTDefRegMap(@Self)^.&set := $00001000;
  30292. end;
  30293. procedure TSPI2A_SPI2ACON.clearDISSDO; inline;
  30294. begin
  30295. pTDefRegMap(@Self)^.clr := $00001000;
  30296. end;
  30297. procedure TSPI2A_SPI2ACON.setDISSDO(thebits : TBits_1); inline;
  30298. begin
  30299. if thebits = 0 then
  30300. pTDefRegMap(@Self)^.clr := $00001000
  30301. else
  30302. pTDefRegMap(@Self)^.&set := $00001000;
  30303. end;
  30304. function TSPI2A_SPI2ACON.getDISSDO : TBits_1; inline;
  30305. begin
  30306. getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  30307. end;
  30308. procedure TSPI2A_SPI2ACON.setSIDL; inline;
  30309. begin
  30310. pTDefRegMap(@Self)^.&set := $00002000;
  30311. end;
  30312. procedure TSPI2A_SPI2ACON.clearSIDL; inline;
  30313. begin
  30314. pTDefRegMap(@Self)^.clr := $00002000;
  30315. end;
  30316. procedure TSPI2A_SPI2ACON.setSIDL(thebits : TBits_1); inline;
  30317. begin
  30318. if thebits = 0 then
  30319. pTDefRegMap(@Self)^.clr := $00002000
  30320. else
  30321. pTDefRegMap(@Self)^.&set := $00002000;
  30322. end;
  30323. function TSPI2A_SPI2ACON.getSIDL : TBits_1; inline;
  30324. begin
  30325. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  30326. end;
  30327. procedure TSPI2A_SPI2ACON.setON; inline;
  30328. begin
  30329. pTDefRegMap(@Self)^.&set := $00008000;
  30330. end;
  30331. procedure TSPI2A_SPI2ACON.clearON; inline;
  30332. begin
  30333. pTDefRegMap(@Self)^.clr := $00008000;
  30334. end;
  30335. procedure TSPI2A_SPI2ACON.setON(thebits : TBits_1); inline;
  30336. begin
  30337. if thebits = 0 then
  30338. pTDefRegMap(@Self)^.clr := $00008000
  30339. else
  30340. pTDefRegMap(@Self)^.&set := $00008000;
  30341. end;
  30342. function TSPI2A_SPI2ACON.getON : TBits_1; inline;
  30343. begin
  30344. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  30345. end;
  30346. procedure TSPI2A_SPI2ACON.setENHBUF; inline;
  30347. begin
  30348. pTDefRegMap(@Self)^.&set := $00010000;
  30349. end;
  30350. procedure TSPI2A_SPI2ACON.clearENHBUF; inline;
  30351. begin
  30352. pTDefRegMap(@Self)^.clr := $00010000;
  30353. end;
  30354. procedure TSPI2A_SPI2ACON.setENHBUF(thebits : TBits_1); inline;
  30355. begin
  30356. if thebits = 0 then
  30357. pTDefRegMap(@Self)^.clr := $00010000
  30358. else
  30359. pTDefRegMap(@Self)^.&set := $00010000;
  30360. end;
  30361. function TSPI2A_SPI2ACON.getENHBUF : TBits_1; inline;
  30362. begin
  30363. getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  30364. end;
  30365. procedure TSPI2A_SPI2ACON.setSPIFE; inline;
  30366. begin
  30367. pTDefRegMap(@Self)^.&set := $00020000;
  30368. end;
  30369. procedure TSPI2A_SPI2ACON.clearSPIFE; inline;
  30370. begin
  30371. pTDefRegMap(@Self)^.clr := $00020000;
  30372. end;
  30373. procedure TSPI2A_SPI2ACON.setSPIFE(thebits : TBits_1); inline;
  30374. begin
  30375. if thebits = 0 then
  30376. pTDefRegMap(@Self)^.clr := $00020000
  30377. else
  30378. pTDefRegMap(@Self)^.&set := $00020000;
  30379. end;
  30380. function TSPI2A_SPI2ACON.getSPIFE : TBits_1; inline;
  30381. begin
  30382. getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  30383. end;
  30384. procedure TSPI2A_SPI2ACON.setFRMCNT(thebits : TBits_3); inline;
  30385. begin
  30386. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  30387. end;
  30388. function TSPI2A_SPI2ACON.getFRMCNT : TBits_3; inline;
  30389. begin
  30390. getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  30391. end;
  30392. procedure TSPI2A_SPI2ACON.setFRMSYPW; inline;
  30393. begin
  30394. pTDefRegMap(@Self)^.&set := $08000000;
  30395. end;
  30396. procedure TSPI2A_SPI2ACON.clearFRMSYPW; inline;
  30397. begin
  30398. pTDefRegMap(@Self)^.clr := $08000000;
  30399. end;
  30400. procedure TSPI2A_SPI2ACON.setFRMSYPW(thebits : TBits_1); inline;
  30401. begin
  30402. if thebits = 0 then
  30403. pTDefRegMap(@Self)^.clr := $08000000
  30404. else
  30405. pTDefRegMap(@Self)^.&set := $08000000;
  30406. end;
  30407. function TSPI2A_SPI2ACON.getFRMSYPW : TBits_1; inline;
  30408. begin
  30409. getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  30410. end;
  30411. procedure TSPI2A_SPI2ACON.setMSSEN; inline;
  30412. begin
  30413. pTDefRegMap(@Self)^.&set := $10000000;
  30414. end;
  30415. procedure TSPI2A_SPI2ACON.clearMSSEN; inline;
  30416. begin
  30417. pTDefRegMap(@Self)^.clr := $10000000;
  30418. end;
  30419. procedure TSPI2A_SPI2ACON.setMSSEN(thebits : TBits_1); inline;
  30420. begin
  30421. if thebits = 0 then
  30422. pTDefRegMap(@Self)^.clr := $10000000
  30423. else
  30424. pTDefRegMap(@Self)^.&set := $10000000;
  30425. end;
  30426. function TSPI2A_SPI2ACON.getMSSEN : TBits_1; inline;
  30427. begin
  30428. getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  30429. end;
  30430. procedure TSPI2A_SPI2ACON.setFRMPOL; inline;
  30431. begin
  30432. pTDefRegMap(@Self)^.&set := $20000000;
  30433. end;
  30434. procedure TSPI2A_SPI2ACON.clearFRMPOL; inline;
  30435. begin
  30436. pTDefRegMap(@Self)^.clr := $20000000;
  30437. end;
  30438. procedure TSPI2A_SPI2ACON.setFRMPOL(thebits : TBits_1); inline;
  30439. begin
  30440. if thebits = 0 then
  30441. pTDefRegMap(@Self)^.clr := $20000000
  30442. else
  30443. pTDefRegMap(@Self)^.&set := $20000000;
  30444. end;
  30445. function TSPI2A_SPI2ACON.getFRMPOL : TBits_1; inline;
  30446. begin
  30447. getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  30448. end;
  30449. procedure TSPI2A_SPI2ACON.setFRMSYNC; inline;
  30450. begin
  30451. pTDefRegMap(@Self)^.&set := $40000000;
  30452. end;
  30453. procedure TSPI2A_SPI2ACON.clearFRMSYNC; inline;
  30454. begin
  30455. pTDefRegMap(@Self)^.clr := $40000000;
  30456. end;
  30457. procedure TSPI2A_SPI2ACON.setFRMSYNC(thebits : TBits_1); inline;
  30458. begin
  30459. if thebits = 0 then
  30460. pTDefRegMap(@Self)^.clr := $40000000
  30461. else
  30462. pTDefRegMap(@Self)^.&set := $40000000;
  30463. end;
  30464. function TSPI2A_SPI2ACON.getFRMSYNC : TBits_1; inline;
  30465. begin
  30466. getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  30467. end;
  30468. procedure TSPI2A_SPI2ACON.setFRMEN; inline;
  30469. begin
  30470. pTDefRegMap(@Self)^.&set := $80000000;
  30471. end;
  30472. procedure TSPI2A_SPI2ACON.clearFRMEN; inline;
  30473. begin
  30474. pTDefRegMap(@Self)^.clr := $80000000;
  30475. end;
  30476. procedure TSPI2A_SPI2ACON.setFRMEN(thebits : TBits_1); inline;
  30477. begin
  30478. if thebits = 0 then
  30479. pTDefRegMap(@Self)^.clr := $80000000
  30480. else
  30481. pTDefRegMap(@Self)^.&set := $80000000;
  30482. end;
  30483. function TSPI2A_SPI2ACON.getFRMEN : TBits_1; inline;
  30484. begin
  30485. getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  30486. end;
  30487. procedure TSPI2A_SPI2ACON.setw(thebits : TBits_32); inline;
  30488. begin
  30489. pTDefRegMap(@Self)^.val := thebits;
  30490. end;
  30491. function TSPI2A_SPI2ACON.getw : TBits_32; inline;
  30492. begin
  30493. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  30494. end;
  30495. procedure TSPI2A_SPI2CON.setSRXISEL(thebits : TBits_2); inline;
  30496. begin
  30497. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  30498. end;
  30499. function TSPI2A_SPI2CON.getSRXISEL : TBits_2; inline;
  30500. begin
  30501. getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  30502. end;
  30503. procedure TSPI2A_SPI2CON.setSTXISEL(thebits : TBits_2); inline;
  30504. begin
  30505. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
  30506. end;
  30507. function TSPI2A_SPI2CON.getSTXISEL : TBits_2; inline;
  30508. begin
  30509. getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
  30510. end;
  30511. procedure TSPI2A_SPI2CON.setMSTEN; inline;
  30512. begin
  30513. pTDefRegMap(@Self)^.&set := $00000020;
  30514. end;
  30515. procedure TSPI2A_SPI2CON.clearMSTEN; inline;
  30516. begin
  30517. pTDefRegMap(@Self)^.clr := $00000020;
  30518. end;
  30519. procedure TSPI2A_SPI2CON.setMSTEN(thebits : TBits_1); inline;
  30520. begin
  30521. if thebits = 0 then
  30522. pTDefRegMap(@Self)^.clr := $00000020
  30523. else
  30524. pTDefRegMap(@Self)^.&set := $00000020;
  30525. end;
  30526. function TSPI2A_SPI2CON.getMSTEN : TBits_1; inline;
  30527. begin
  30528. getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  30529. end;
  30530. procedure TSPI2A_SPI2CON.setCKP; inline;
  30531. begin
  30532. pTDefRegMap(@Self)^.&set := $00000040;
  30533. end;
  30534. procedure TSPI2A_SPI2CON.clearCKP; inline;
  30535. begin
  30536. pTDefRegMap(@Self)^.clr := $00000040;
  30537. end;
  30538. procedure TSPI2A_SPI2CON.setCKP(thebits : TBits_1); inline;
  30539. begin
  30540. if thebits = 0 then
  30541. pTDefRegMap(@Self)^.clr := $00000040
  30542. else
  30543. pTDefRegMap(@Self)^.&set := $00000040;
  30544. end;
  30545. function TSPI2A_SPI2CON.getCKP : TBits_1; inline;
  30546. begin
  30547. getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  30548. end;
  30549. procedure TSPI2A_SPI2CON.setSSEN; inline;
  30550. begin
  30551. pTDefRegMap(@Self)^.&set := $00000080;
  30552. end;
  30553. procedure TSPI2A_SPI2CON.clearSSEN; inline;
  30554. begin
  30555. pTDefRegMap(@Self)^.clr := $00000080;
  30556. end;
  30557. procedure TSPI2A_SPI2CON.setSSEN(thebits : TBits_1); inline;
  30558. begin
  30559. if thebits = 0 then
  30560. pTDefRegMap(@Self)^.clr := $00000080
  30561. else
  30562. pTDefRegMap(@Self)^.&set := $00000080;
  30563. end;
  30564. function TSPI2A_SPI2CON.getSSEN : TBits_1; inline;
  30565. begin
  30566. getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  30567. end;
  30568. procedure TSPI2A_SPI2CON.setCKE; inline;
  30569. begin
  30570. pTDefRegMap(@Self)^.&set := $00000100;
  30571. end;
  30572. procedure TSPI2A_SPI2CON.clearCKE; inline;
  30573. begin
  30574. pTDefRegMap(@Self)^.clr := $00000100;
  30575. end;
  30576. procedure TSPI2A_SPI2CON.setCKE(thebits : TBits_1); inline;
  30577. begin
  30578. if thebits = 0 then
  30579. pTDefRegMap(@Self)^.clr := $00000100
  30580. else
  30581. pTDefRegMap(@Self)^.&set := $00000100;
  30582. end;
  30583. function TSPI2A_SPI2CON.getCKE : TBits_1; inline;
  30584. begin
  30585. getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  30586. end;
  30587. procedure TSPI2A_SPI2CON.setSMP; inline;
  30588. begin
  30589. pTDefRegMap(@Self)^.&set := $00000200;
  30590. end;
  30591. procedure TSPI2A_SPI2CON.clearSMP; inline;
  30592. begin
  30593. pTDefRegMap(@Self)^.clr := $00000200;
  30594. end;
  30595. procedure TSPI2A_SPI2CON.setSMP(thebits : TBits_1); inline;
  30596. begin
  30597. if thebits = 0 then
  30598. pTDefRegMap(@Self)^.clr := $00000200
  30599. else
  30600. pTDefRegMap(@Self)^.&set := $00000200;
  30601. end;
  30602. function TSPI2A_SPI2CON.getSMP : TBits_1; inline;
  30603. begin
  30604. getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  30605. end;
  30606. procedure TSPI2A_SPI2CON.setMODE16; inline;
  30607. begin
  30608. pTDefRegMap(@Self)^.&set := $00000400;
  30609. end;
  30610. procedure TSPI2A_SPI2CON.clearMODE16; inline;
  30611. begin
  30612. pTDefRegMap(@Self)^.clr := $00000400;
  30613. end;
  30614. procedure TSPI2A_SPI2CON.setMODE16(thebits : TBits_1); inline;
  30615. begin
  30616. if thebits = 0 then
  30617. pTDefRegMap(@Self)^.clr := $00000400
  30618. else
  30619. pTDefRegMap(@Self)^.&set := $00000400;
  30620. end;
  30621. function TSPI2A_SPI2CON.getMODE16 : TBits_1; inline;
  30622. begin
  30623. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  30624. end;
  30625. procedure TSPI2A_SPI2CON.setMODE32; inline;
  30626. begin
  30627. pTDefRegMap(@Self)^.&set := $00000800;
  30628. end;
  30629. procedure TSPI2A_SPI2CON.clearMODE32; inline;
  30630. begin
  30631. pTDefRegMap(@Self)^.clr := $00000800;
  30632. end;
  30633. procedure TSPI2A_SPI2CON.setMODE32(thebits : TBits_1); inline;
  30634. begin
  30635. if thebits = 0 then
  30636. pTDefRegMap(@Self)^.clr := $00000800
  30637. else
  30638. pTDefRegMap(@Self)^.&set := $00000800;
  30639. end;
  30640. function TSPI2A_SPI2CON.getMODE32 : TBits_1; inline;
  30641. begin
  30642. getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  30643. end;
  30644. procedure TSPI2A_SPI2CON.setDISSDO; inline;
  30645. begin
  30646. pTDefRegMap(@Self)^.&set := $00001000;
  30647. end;
  30648. procedure TSPI2A_SPI2CON.clearDISSDO; inline;
  30649. begin
  30650. pTDefRegMap(@Self)^.clr := $00001000;
  30651. end;
  30652. procedure TSPI2A_SPI2CON.setDISSDO(thebits : TBits_1); inline;
  30653. begin
  30654. if thebits = 0 then
  30655. pTDefRegMap(@Self)^.clr := $00001000
  30656. else
  30657. pTDefRegMap(@Self)^.&set := $00001000;
  30658. end;
  30659. function TSPI2A_SPI2CON.getDISSDO : TBits_1; inline;
  30660. begin
  30661. getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  30662. end;
  30663. procedure TSPI2A_SPI2CON.setSIDL; inline;
  30664. begin
  30665. pTDefRegMap(@Self)^.&set := $00002000;
  30666. end;
  30667. procedure TSPI2A_SPI2CON.clearSIDL; inline;
  30668. begin
  30669. pTDefRegMap(@Self)^.clr := $00002000;
  30670. end;
  30671. procedure TSPI2A_SPI2CON.setSIDL(thebits : TBits_1); inline;
  30672. begin
  30673. if thebits = 0 then
  30674. pTDefRegMap(@Self)^.clr := $00002000
  30675. else
  30676. pTDefRegMap(@Self)^.&set := $00002000;
  30677. end;
  30678. function TSPI2A_SPI2CON.getSIDL : TBits_1; inline;
  30679. begin
  30680. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  30681. end;
  30682. procedure TSPI2A_SPI2CON.setON; inline;
  30683. begin
  30684. pTDefRegMap(@Self)^.&set := $00008000;
  30685. end;
  30686. procedure TSPI2A_SPI2CON.clearON; inline;
  30687. begin
  30688. pTDefRegMap(@Self)^.clr := $00008000;
  30689. end;
  30690. procedure TSPI2A_SPI2CON.setON(thebits : TBits_1); inline;
  30691. begin
  30692. if thebits = 0 then
  30693. pTDefRegMap(@Self)^.clr := $00008000
  30694. else
  30695. pTDefRegMap(@Self)^.&set := $00008000;
  30696. end;
  30697. function TSPI2A_SPI2CON.getON : TBits_1; inline;
  30698. begin
  30699. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  30700. end;
  30701. procedure TSPI2A_SPI2CON.setENHBUF; inline;
  30702. begin
  30703. pTDefRegMap(@Self)^.&set := $00010000;
  30704. end;
  30705. procedure TSPI2A_SPI2CON.clearENHBUF; inline;
  30706. begin
  30707. pTDefRegMap(@Self)^.clr := $00010000;
  30708. end;
  30709. procedure TSPI2A_SPI2CON.setENHBUF(thebits : TBits_1); inline;
  30710. begin
  30711. if thebits = 0 then
  30712. pTDefRegMap(@Self)^.clr := $00010000
  30713. else
  30714. pTDefRegMap(@Self)^.&set := $00010000;
  30715. end;
  30716. function TSPI2A_SPI2CON.getENHBUF : TBits_1; inline;
  30717. begin
  30718. getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  30719. end;
  30720. procedure TSPI2A_SPI2CON.setSPIFE; inline;
  30721. begin
  30722. pTDefRegMap(@Self)^.&set := $00020000;
  30723. end;
  30724. procedure TSPI2A_SPI2CON.clearSPIFE; inline;
  30725. begin
  30726. pTDefRegMap(@Self)^.clr := $00020000;
  30727. end;
  30728. procedure TSPI2A_SPI2CON.setSPIFE(thebits : TBits_1); inline;
  30729. begin
  30730. if thebits = 0 then
  30731. pTDefRegMap(@Self)^.clr := $00020000
  30732. else
  30733. pTDefRegMap(@Self)^.&set := $00020000;
  30734. end;
  30735. function TSPI2A_SPI2CON.getSPIFE : TBits_1; inline;
  30736. begin
  30737. getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  30738. end;
  30739. procedure TSPI2A_SPI2CON.setFRMCNT(thebits : TBits_3); inline;
  30740. begin
  30741. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  30742. end;
  30743. function TSPI2A_SPI2CON.getFRMCNT : TBits_3; inline;
  30744. begin
  30745. getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  30746. end;
  30747. procedure TSPI2A_SPI2CON.setFRMSYPW; inline;
  30748. begin
  30749. pTDefRegMap(@Self)^.&set := $08000000;
  30750. end;
  30751. procedure TSPI2A_SPI2CON.clearFRMSYPW; inline;
  30752. begin
  30753. pTDefRegMap(@Self)^.clr := $08000000;
  30754. end;
  30755. procedure TSPI2A_SPI2CON.setFRMSYPW(thebits : TBits_1); inline;
  30756. begin
  30757. if thebits = 0 then
  30758. pTDefRegMap(@Self)^.clr := $08000000
  30759. else
  30760. pTDefRegMap(@Self)^.&set := $08000000;
  30761. end;
  30762. function TSPI2A_SPI2CON.getFRMSYPW : TBits_1; inline;
  30763. begin
  30764. getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  30765. end;
  30766. procedure TSPI2A_SPI2CON.setMSSEN; inline;
  30767. begin
  30768. pTDefRegMap(@Self)^.&set := $10000000;
  30769. end;
  30770. procedure TSPI2A_SPI2CON.clearMSSEN; inline;
  30771. begin
  30772. pTDefRegMap(@Self)^.clr := $10000000;
  30773. end;
  30774. procedure TSPI2A_SPI2CON.setMSSEN(thebits : TBits_1); inline;
  30775. begin
  30776. if thebits = 0 then
  30777. pTDefRegMap(@Self)^.clr := $10000000
  30778. else
  30779. pTDefRegMap(@Self)^.&set := $10000000;
  30780. end;
  30781. function TSPI2A_SPI2CON.getMSSEN : TBits_1; inline;
  30782. begin
  30783. getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  30784. end;
  30785. procedure TSPI2A_SPI2CON.setFRMPOL; inline;
  30786. begin
  30787. pTDefRegMap(@Self)^.&set := $20000000;
  30788. end;
  30789. procedure TSPI2A_SPI2CON.clearFRMPOL; inline;
  30790. begin
  30791. pTDefRegMap(@Self)^.clr := $20000000;
  30792. end;
  30793. procedure TSPI2A_SPI2CON.setFRMPOL(thebits : TBits_1); inline;
  30794. begin
  30795. if thebits = 0 then
  30796. pTDefRegMap(@Self)^.clr := $20000000
  30797. else
  30798. pTDefRegMap(@Self)^.&set := $20000000;
  30799. end;
  30800. function TSPI2A_SPI2CON.getFRMPOL : TBits_1; inline;
  30801. begin
  30802. getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  30803. end;
  30804. procedure TSPI2A_SPI2CON.setFRMSYNC; inline;
  30805. begin
  30806. pTDefRegMap(@Self)^.&set := $40000000;
  30807. end;
  30808. procedure TSPI2A_SPI2CON.clearFRMSYNC; inline;
  30809. begin
  30810. pTDefRegMap(@Self)^.clr := $40000000;
  30811. end;
  30812. procedure TSPI2A_SPI2CON.setFRMSYNC(thebits : TBits_1); inline;
  30813. begin
  30814. if thebits = 0 then
  30815. pTDefRegMap(@Self)^.clr := $40000000
  30816. else
  30817. pTDefRegMap(@Self)^.&set := $40000000;
  30818. end;
  30819. function TSPI2A_SPI2CON.getFRMSYNC : TBits_1; inline;
  30820. begin
  30821. getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  30822. end;
  30823. procedure TSPI2A_SPI2CON.setFRMEN; inline;
  30824. begin
  30825. pTDefRegMap(@Self)^.&set := $80000000;
  30826. end;
  30827. procedure TSPI2A_SPI2CON.clearFRMEN; inline;
  30828. begin
  30829. pTDefRegMap(@Self)^.clr := $80000000;
  30830. end;
  30831. procedure TSPI2A_SPI2CON.setFRMEN(thebits : TBits_1); inline;
  30832. begin
  30833. if thebits = 0 then
  30834. pTDefRegMap(@Self)^.clr := $80000000
  30835. else
  30836. pTDefRegMap(@Self)^.&set := $80000000;
  30837. end;
  30838. function TSPI2A_SPI2CON.getFRMEN : TBits_1; inline;
  30839. begin
  30840. getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  30841. end;
  30842. procedure TSPI2A_SPI2CON.setw(thebits : TBits_32); inline;
  30843. begin
  30844. pTDefRegMap(@Self)^.val := thebits;
  30845. end;
  30846. function TSPI2A_SPI2CON.getw : TBits_32; inline;
  30847. begin
  30848. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  30849. end;
  30850. procedure TSPI2A_SPI2ASTAT.setSPIRBF; inline;
  30851. begin
  30852. pTDefRegMap(@Self)^.&set := $00000001;
  30853. end;
  30854. procedure TSPI2A_SPI2ASTAT.clearSPIRBF; inline;
  30855. begin
  30856. pTDefRegMap(@Self)^.clr := $00000001;
  30857. end;
  30858. procedure TSPI2A_SPI2ASTAT.setSPIRBF(thebits : TBits_1); inline;
  30859. begin
  30860. if thebits = 0 then
  30861. pTDefRegMap(@Self)^.clr := $00000001
  30862. else
  30863. pTDefRegMap(@Self)^.&set := $00000001;
  30864. end;
  30865. function TSPI2A_SPI2ASTAT.getSPIRBF : TBits_1; inline;
  30866. begin
  30867. getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  30868. end;
  30869. procedure TSPI2A_SPI2ASTAT.setSPITBF; inline;
  30870. begin
  30871. pTDefRegMap(@Self)^.&set := $00000002;
  30872. end;
  30873. procedure TSPI2A_SPI2ASTAT.clearSPITBF; inline;
  30874. begin
  30875. pTDefRegMap(@Self)^.clr := $00000002;
  30876. end;
  30877. procedure TSPI2A_SPI2ASTAT.setSPITBF(thebits : TBits_1); inline;
  30878. begin
  30879. if thebits = 0 then
  30880. pTDefRegMap(@Self)^.clr := $00000002
  30881. else
  30882. pTDefRegMap(@Self)^.&set := $00000002;
  30883. end;
  30884. function TSPI2A_SPI2ASTAT.getSPITBF : TBits_1; inline;
  30885. begin
  30886. getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  30887. end;
  30888. procedure TSPI2A_SPI2ASTAT.setSPITBE; inline;
  30889. begin
  30890. pTDefRegMap(@Self)^.&set := $00000008;
  30891. end;
  30892. procedure TSPI2A_SPI2ASTAT.clearSPITBE; inline;
  30893. begin
  30894. pTDefRegMap(@Self)^.clr := $00000008;
  30895. end;
  30896. procedure TSPI2A_SPI2ASTAT.setSPITBE(thebits : TBits_1); inline;
  30897. begin
  30898. if thebits = 0 then
  30899. pTDefRegMap(@Self)^.clr := $00000008
  30900. else
  30901. pTDefRegMap(@Self)^.&set := $00000008;
  30902. end;
  30903. function TSPI2A_SPI2ASTAT.getSPITBE : TBits_1; inline;
  30904. begin
  30905. getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  30906. end;
  30907. procedure TSPI2A_SPI2ASTAT.setSPIRBE; inline;
  30908. begin
  30909. pTDefRegMap(@Self)^.&set := $00000020;
  30910. end;
  30911. procedure TSPI2A_SPI2ASTAT.clearSPIRBE; inline;
  30912. begin
  30913. pTDefRegMap(@Self)^.clr := $00000020;
  30914. end;
  30915. procedure TSPI2A_SPI2ASTAT.setSPIRBE(thebits : TBits_1); inline;
  30916. begin
  30917. if thebits = 0 then
  30918. pTDefRegMap(@Self)^.clr := $00000020
  30919. else
  30920. pTDefRegMap(@Self)^.&set := $00000020;
  30921. end;
  30922. function TSPI2A_SPI2ASTAT.getSPIRBE : TBits_1; inline;
  30923. begin
  30924. getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  30925. end;
  30926. procedure TSPI2A_SPI2ASTAT.setSPIROV; inline;
  30927. begin
  30928. pTDefRegMap(@Self)^.&set := $00000040;
  30929. end;
  30930. procedure TSPI2A_SPI2ASTAT.clearSPIROV; inline;
  30931. begin
  30932. pTDefRegMap(@Self)^.clr := $00000040;
  30933. end;
  30934. procedure TSPI2A_SPI2ASTAT.setSPIROV(thebits : TBits_1); inline;
  30935. begin
  30936. if thebits = 0 then
  30937. pTDefRegMap(@Self)^.clr := $00000040
  30938. else
  30939. pTDefRegMap(@Self)^.&set := $00000040;
  30940. end;
  30941. function TSPI2A_SPI2ASTAT.getSPIROV : TBits_1; inline;
  30942. begin
  30943. getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  30944. end;
  30945. procedure TSPI2A_SPI2ASTAT.setSRMT; inline;
  30946. begin
  30947. pTDefRegMap(@Self)^.&set := $00000080;
  30948. end;
  30949. procedure TSPI2A_SPI2ASTAT.clearSRMT; inline;
  30950. begin
  30951. pTDefRegMap(@Self)^.clr := $00000080;
  30952. end;
  30953. procedure TSPI2A_SPI2ASTAT.setSRMT(thebits : TBits_1); inline;
  30954. begin
  30955. if thebits = 0 then
  30956. pTDefRegMap(@Self)^.clr := $00000080
  30957. else
  30958. pTDefRegMap(@Self)^.&set := $00000080;
  30959. end;
  30960. function TSPI2A_SPI2ASTAT.getSRMT : TBits_1; inline;
  30961. begin
  30962. getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  30963. end;
  30964. procedure TSPI2A_SPI2ASTAT.setSPITUR; inline;
  30965. begin
  30966. pTDefRegMap(@Self)^.&set := $00000100;
  30967. end;
  30968. procedure TSPI2A_SPI2ASTAT.clearSPITUR; inline;
  30969. begin
  30970. pTDefRegMap(@Self)^.clr := $00000100;
  30971. end;
  30972. procedure TSPI2A_SPI2ASTAT.setSPITUR(thebits : TBits_1); inline;
  30973. begin
  30974. if thebits = 0 then
  30975. pTDefRegMap(@Self)^.clr := $00000100
  30976. else
  30977. pTDefRegMap(@Self)^.&set := $00000100;
  30978. end;
  30979. function TSPI2A_SPI2ASTAT.getSPITUR : TBits_1; inline;
  30980. begin
  30981. getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  30982. end;
  30983. procedure TSPI2A_SPI2ASTAT.setSPIBUSY; inline;
  30984. begin
  30985. pTDefRegMap(@Self)^.&set := $00000800;
  30986. end;
  30987. procedure TSPI2A_SPI2ASTAT.clearSPIBUSY; inline;
  30988. begin
  30989. pTDefRegMap(@Self)^.clr := $00000800;
  30990. end;
  30991. procedure TSPI2A_SPI2ASTAT.setSPIBUSY(thebits : TBits_1); inline;
  30992. begin
  30993. if thebits = 0 then
  30994. pTDefRegMap(@Self)^.clr := $00000800
  30995. else
  30996. pTDefRegMap(@Self)^.&set := $00000800;
  30997. end;
  30998. function TSPI2A_SPI2ASTAT.getSPIBUSY : TBits_1; inline;
  30999. begin
  31000. getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  31001. end;
  31002. procedure TSPI2A_SPI2ASTAT.setTXBUFELM(thebits : TBits_5); inline;
  31003. begin
  31004. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  31005. end;
  31006. function TSPI2A_SPI2ASTAT.getTXBUFELM : TBits_5; inline;
  31007. begin
  31008. getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  31009. end;
  31010. procedure TSPI2A_SPI2ASTAT.setRXBUFELM(thebits : TBits_5); inline;
  31011. begin
  31012. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  31013. end;
  31014. function TSPI2A_SPI2ASTAT.getRXBUFELM : TBits_5; inline;
  31015. begin
  31016. getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  31017. end;
  31018. procedure TSPI2A_SPI2ASTAT.setw(thebits : TBits_32); inline;
  31019. begin
  31020. pTDefRegMap(@Self)^.val := thebits;
  31021. end;
  31022. function TSPI2A_SPI2ASTAT.getw : TBits_32; inline;
  31023. begin
  31024. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  31025. end;
  31026. procedure TSPI2A_SPI2STAT.setSPIRBF; inline;
  31027. begin
  31028. pTDefRegMap(@Self)^.&set := $00000001;
  31029. end;
  31030. procedure TSPI2A_SPI2STAT.clearSPIRBF; inline;
  31031. begin
  31032. pTDefRegMap(@Self)^.clr := $00000001;
  31033. end;
  31034. procedure TSPI2A_SPI2STAT.setSPIRBF(thebits : TBits_1); inline;
  31035. begin
  31036. if thebits = 0 then
  31037. pTDefRegMap(@Self)^.clr := $00000001
  31038. else
  31039. pTDefRegMap(@Self)^.&set := $00000001;
  31040. end;
  31041. function TSPI2A_SPI2STAT.getSPIRBF : TBits_1; inline;
  31042. begin
  31043. getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  31044. end;
  31045. procedure TSPI2A_SPI2STAT.setSPITBF; inline;
  31046. begin
  31047. pTDefRegMap(@Self)^.&set := $00000002;
  31048. end;
  31049. procedure TSPI2A_SPI2STAT.clearSPITBF; inline;
  31050. begin
  31051. pTDefRegMap(@Self)^.clr := $00000002;
  31052. end;
  31053. procedure TSPI2A_SPI2STAT.setSPITBF(thebits : TBits_1); inline;
  31054. begin
  31055. if thebits = 0 then
  31056. pTDefRegMap(@Self)^.clr := $00000002
  31057. else
  31058. pTDefRegMap(@Self)^.&set := $00000002;
  31059. end;
  31060. function TSPI2A_SPI2STAT.getSPITBF : TBits_1; inline;
  31061. begin
  31062. getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  31063. end;
  31064. procedure TSPI2A_SPI2STAT.setSPITBE; inline;
  31065. begin
  31066. pTDefRegMap(@Self)^.&set := $00000008;
  31067. end;
  31068. procedure TSPI2A_SPI2STAT.clearSPITBE; inline;
  31069. begin
  31070. pTDefRegMap(@Self)^.clr := $00000008;
  31071. end;
  31072. procedure TSPI2A_SPI2STAT.setSPITBE(thebits : TBits_1); inline;
  31073. begin
  31074. if thebits = 0 then
  31075. pTDefRegMap(@Self)^.clr := $00000008
  31076. else
  31077. pTDefRegMap(@Self)^.&set := $00000008;
  31078. end;
  31079. function TSPI2A_SPI2STAT.getSPITBE : TBits_1; inline;
  31080. begin
  31081. getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  31082. end;
  31083. procedure TSPI2A_SPI2STAT.setSPIRBE; inline;
  31084. begin
  31085. pTDefRegMap(@Self)^.&set := $00000020;
  31086. end;
  31087. procedure TSPI2A_SPI2STAT.clearSPIRBE; inline;
  31088. begin
  31089. pTDefRegMap(@Self)^.clr := $00000020;
  31090. end;
  31091. procedure TSPI2A_SPI2STAT.setSPIRBE(thebits : TBits_1); inline;
  31092. begin
  31093. if thebits = 0 then
  31094. pTDefRegMap(@Self)^.clr := $00000020
  31095. else
  31096. pTDefRegMap(@Self)^.&set := $00000020;
  31097. end;
  31098. function TSPI2A_SPI2STAT.getSPIRBE : TBits_1; inline;
  31099. begin
  31100. getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  31101. end;
  31102. procedure TSPI2A_SPI2STAT.setSPIROV; inline;
  31103. begin
  31104. pTDefRegMap(@Self)^.&set := $00000040;
  31105. end;
  31106. procedure TSPI2A_SPI2STAT.clearSPIROV; inline;
  31107. begin
  31108. pTDefRegMap(@Self)^.clr := $00000040;
  31109. end;
  31110. procedure TSPI2A_SPI2STAT.setSPIROV(thebits : TBits_1); inline;
  31111. begin
  31112. if thebits = 0 then
  31113. pTDefRegMap(@Self)^.clr := $00000040
  31114. else
  31115. pTDefRegMap(@Self)^.&set := $00000040;
  31116. end;
  31117. function TSPI2A_SPI2STAT.getSPIROV : TBits_1; inline;
  31118. begin
  31119. getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  31120. end;
  31121. procedure TSPI2A_SPI2STAT.setSRMT; inline;
  31122. begin
  31123. pTDefRegMap(@Self)^.&set := $00000080;
  31124. end;
  31125. procedure TSPI2A_SPI2STAT.clearSRMT; inline;
  31126. begin
  31127. pTDefRegMap(@Self)^.clr := $00000080;
  31128. end;
  31129. procedure TSPI2A_SPI2STAT.setSRMT(thebits : TBits_1); inline;
  31130. begin
  31131. if thebits = 0 then
  31132. pTDefRegMap(@Self)^.clr := $00000080
  31133. else
  31134. pTDefRegMap(@Self)^.&set := $00000080;
  31135. end;
  31136. function TSPI2A_SPI2STAT.getSRMT : TBits_1; inline;
  31137. begin
  31138. getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  31139. end;
  31140. procedure TSPI2A_SPI2STAT.setSPITUR; inline;
  31141. begin
  31142. pTDefRegMap(@Self)^.&set := $00000100;
  31143. end;
  31144. procedure TSPI2A_SPI2STAT.clearSPITUR; inline;
  31145. begin
  31146. pTDefRegMap(@Self)^.clr := $00000100;
  31147. end;
  31148. procedure TSPI2A_SPI2STAT.setSPITUR(thebits : TBits_1); inline;
  31149. begin
  31150. if thebits = 0 then
  31151. pTDefRegMap(@Self)^.clr := $00000100
  31152. else
  31153. pTDefRegMap(@Self)^.&set := $00000100;
  31154. end;
  31155. function TSPI2A_SPI2STAT.getSPITUR : TBits_1; inline;
  31156. begin
  31157. getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  31158. end;
  31159. procedure TSPI2A_SPI2STAT.setSPIBUSY; inline;
  31160. begin
  31161. pTDefRegMap(@Self)^.&set := $00000800;
  31162. end;
  31163. procedure TSPI2A_SPI2STAT.clearSPIBUSY; inline;
  31164. begin
  31165. pTDefRegMap(@Self)^.clr := $00000800;
  31166. end;
  31167. procedure TSPI2A_SPI2STAT.setSPIBUSY(thebits : TBits_1); inline;
  31168. begin
  31169. if thebits = 0 then
  31170. pTDefRegMap(@Self)^.clr := $00000800
  31171. else
  31172. pTDefRegMap(@Self)^.&set := $00000800;
  31173. end;
  31174. function TSPI2A_SPI2STAT.getSPIBUSY : TBits_1; inline;
  31175. begin
  31176. getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  31177. end;
  31178. procedure TSPI2A_SPI2STAT.setTXBUFELM(thebits : TBits_5); inline;
  31179. begin
  31180. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  31181. end;
  31182. function TSPI2A_SPI2STAT.getTXBUFELM : TBits_5; inline;
  31183. begin
  31184. getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  31185. end;
  31186. procedure TSPI2A_SPI2STAT.setRXBUFELM(thebits : TBits_5); inline;
  31187. begin
  31188. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  31189. end;
  31190. function TSPI2A_SPI2STAT.getRXBUFELM : TBits_5; inline;
  31191. begin
  31192. getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  31193. end;
  31194. procedure TSPI2A_SPI2STAT.setw(thebits : TBits_32); inline;
  31195. begin
  31196. pTDefRegMap(@Self)^.val := thebits;
  31197. end;
  31198. function TSPI2A_SPI2STAT.getw : TBits_32; inline;
  31199. begin
  31200. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  31201. end;
  31202. procedure TSPI3A_SPI3ACON.setSRXISEL(thebits : TBits_2); inline;
  31203. begin
  31204. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  31205. end;
  31206. function TSPI3A_SPI3ACON.getSRXISEL : TBits_2; inline;
  31207. begin
  31208. getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  31209. end;
  31210. procedure TSPI3A_SPI3ACON.setSTXISEL(thebits : TBits_2); inline;
  31211. begin
  31212. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
  31213. end;
  31214. function TSPI3A_SPI3ACON.getSTXISEL : TBits_2; inline;
  31215. begin
  31216. getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
  31217. end;
  31218. procedure TSPI3A_SPI3ACON.setMSTEN; inline;
  31219. begin
  31220. pTDefRegMap(@Self)^.&set := $00000020;
  31221. end;
  31222. procedure TSPI3A_SPI3ACON.clearMSTEN; inline;
  31223. begin
  31224. pTDefRegMap(@Self)^.clr := $00000020;
  31225. end;
  31226. procedure TSPI3A_SPI3ACON.setMSTEN(thebits : TBits_1); inline;
  31227. begin
  31228. if thebits = 0 then
  31229. pTDefRegMap(@Self)^.clr := $00000020
  31230. else
  31231. pTDefRegMap(@Self)^.&set := $00000020;
  31232. end;
  31233. function TSPI3A_SPI3ACON.getMSTEN : TBits_1; inline;
  31234. begin
  31235. getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  31236. end;
  31237. procedure TSPI3A_SPI3ACON.setCKP; inline;
  31238. begin
  31239. pTDefRegMap(@Self)^.&set := $00000040;
  31240. end;
  31241. procedure TSPI3A_SPI3ACON.clearCKP; inline;
  31242. begin
  31243. pTDefRegMap(@Self)^.clr := $00000040;
  31244. end;
  31245. procedure TSPI3A_SPI3ACON.setCKP(thebits : TBits_1); inline;
  31246. begin
  31247. if thebits = 0 then
  31248. pTDefRegMap(@Self)^.clr := $00000040
  31249. else
  31250. pTDefRegMap(@Self)^.&set := $00000040;
  31251. end;
  31252. function TSPI3A_SPI3ACON.getCKP : TBits_1; inline;
  31253. begin
  31254. getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  31255. end;
  31256. procedure TSPI3A_SPI3ACON.setSSEN; inline;
  31257. begin
  31258. pTDefRegMap(@Self)^.&set := $00000080;
  31259. end;
  31260. procedure TSPI3A_SPI3ACON.clearSSEN; inline;
  31261. begin
  31262. pTDefRegMap(@Self)^.clr := $00000080;
  31263. end;
  31264. procedure TSPI3A_SPI3ACON.setSSEN(thebits : TBits_1); inline;
  31265. begin
  31266. if thebits = 0 then
  31267. pTDefRegMap(@Self)^.clr := $00000080
  31268. else
  31269. pTDefRegMap(@Self)^.&set := $00000080;
  31270. end;
  31271. function TSPI3A_SPI3ACON.getSSEN : TBits_1; inline;
  31272. begin
  31273. getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  31274. end;
  31275. procedure TSPI3A_SPI3ACON.setCKE; inline;
  31276. begin
  31277. pTDefRegMap(@Self)^.&set := $00000100;
  31278. end;
  31279. procedure TSPI3A_SPI3ACON.clearCKE; inline;
  31280. begin
  31281. pTDefRegMap(@Self)^.clr := $00000100;
  31282. end;
  31283. procedure TSPI3A_SPI3ACON.setCKE(thebits : TBits_1); inline;
  31284. begin
  31285. if thebits = 0 then
  31286. pTDefRegMap(@Self)^.clr := $00000100
  31287. else
  31288. pTDefRegMap(@Self)^.&set := $00000100;
  31289. end;
  31290. function TSPI3A_SPI3ACON.getCKE : TBits_1; inline;
  31291. begin
  31292. getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  31293. end;
  31294. procedure TSPI3A_SPI3ACON.setSMP; inline;
  31295. begin
  31296. pTDefRegMap(@Self)^.&set := $00000200;
  31297. end;
  31298. procedure TSPI3A_SPI3ACON.clearSMP; inline;
  31299. begin
  31300. pTDefRegMap(@Self)^.clr := $00000200;
  31301. end;
  31302. procedure TSPI3A_SPI3ACON.setSMP(thebits : TBits_1); inline;
  31303. begin
  31304. if thebits = 0 then
  31305. pTDefRegMap(@Self)^.clr := $00000200
  31306. else
  31307. pTDefRegMap(@Self)^.&set := $00000200;
  31308. end;
  31309. function TSPI3A_SPI3ACON.getSMP : TBits_1; inline;
  31310. begin
  31311. getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  31312. end;
  31313. procedure TSPI3A_SPI3ACON.setMODE16; inline;
  31314. begin
  31315. pTDefRegMap(@Self)^.&set := $00000400;
  31316. end;
  31317. procedure TSPI3A_SPI3ACON.clearMODE16; inline;
  31318. begin
  31319. pTDefRegMap(@Self)^.clr := $00000400;
  31320. end;
  31321. procedure TSPI3A_SPI3ACON.setMODE16(thebits : TBits_1); inline;
  31322. begin
  31323. if thebits = 0 then
  31324. pTDefRegMap(@Self)^.clr := $00000400
  31325. else
  31326. pTDefRegMap(@Self)^.&set := $00000400;
  31327. end;
  31328. function TSPI3A_SPI3ACON.getMODE16 : TBits_1; inline;
  31329. begin
  31330. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  31331. end;
  31332. procedure TSPI3A_SPI3ACON.setMODE32; inline;
  31333. begin
  31334. pTDefRegMap(@Self)^.&set := $00000800;
  31335. end;
  31336. procedure TSPI3A_SPI3ACON.clearMODE32; inline;
  31337. begin
  31338. pTDefRegMap(@Self)^.clr := $00000800;
  31339. end;
  31340. procedure TSPI3A_SPI3ACON.setMODE32(thebits : TBits_1); inline;
  31341. begin
  31342. if thebits = 0 then
  31343. pTDefRegMap(@Self)^.clr := $00000800
  31344. else
  31345. pTDefRegMap(@Self)^.&set := $00000800;
  31346. end;
  31347. function TSPI3A_SPI3ACON.getMODE32 : TBits_1; inline;
  31348. begin
  31349. getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  31350. end;
  31351. procedure TSPI3A_SPI3ACON.setDISSDO; inline;
  31352. begin
  31353. pTDefRegMap(@Self)^.&set := $00001000;
  31354. end;
  31355. procedure TSPI3A_SPI3ACON.clearDISSDO; inline;
  31356. begin
  31357. pTDefRegMap(@Self)^.clr := $00001000;
  31358. end;
  31359. procedure TSPI3A_SPI3ACON.setDISSDO(thebits : TBits_1); inline;
  31360. begin
  31361. if thebits = 0 then
  31362. pTDefRegMap(@Self)^.clr := $00001000
  31363. else
  31364. pTDefRegMap(@Self)^.&set := $00001000;
  31365. end;
  31366. function TSPI3A_SPI3ACON.getDISSDO : TBits_1; inline;
  31367. begin
  31368. getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  31369. end;
  31370. procedure TSPI3A_SPI3ACON.setSIDL; inline;
  31371. begin
  31372. pTDefRegMap(@Self)^.&set := $00002000;
  31373. end;
  31374. procedure TSPI3A_SPI3ACON.clearSIDL; inline;
  31375. begin
  31376. pTDefRegMap(@Self)^.clr := $00002000;
  31377. end;
  31378. procedure TSPI3A_SPI3ACON.setSIDL(thebits : TBits_1); inline;
  31379. begin
  31380. if thebits = 0 then
  31381. pTDefRegMap(@Self)^.clr := $00002000
  31382. else
  31383. pTDefRegMap(@Self)^.&set := $00002000;
  31384. end;
  31385. function TSPI3A_SPI3ACON.getSIDL : TBits_1; inline;
  31386. begin
  31387. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  31388. end;
  31389. procedure TSPI3A_SPI3ACON.setON; inline;
  31390. begin
  31391. pTDefRegMap(@Self)^.&set := $00008000;
  31392. end;
  31393. procedure TSPI3A_SPI3ACON.clearON; inline;
  31394. begin
  31395. pTDefRegMap(@Self)^.clr := $00008000;
  31396. end;
  31397. procedure TSPI3A_SPI3ACON.setON(thebits : TBits_1); inline;
  31398. begin
  31399. if thebits = 0 then
  31400. pTDefRegMap(@Self)^.clr := $00008000
  31401. else
  31402. pTDefRegMap(@Self)^.&set := $00008000;
  31403. end;
  31404. function TSPI3A_SPI3ACON.getON : TBits_1; inline;
  31405. begin
  31406. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  31407. end;
  31408. procedure TSPI3A_SPI3ACON.setENHBUF; inline;
  31409. begin
  31410. pTDefRegMap(@Self)^.&set := $00010000;
  31411. end;
  31412. procedure TSPI3A_SPI3ACON.clearENHBUF; inline;
  31413. begin
  31414. pTDefRegMap(@Self)^.clr := $00010000;
  31415. end;
  31416. procedure TSPI3A_SPI3ACON.setENHBUF(thebits : TBits_1); inline;
  31417. begin
  31418. if thebits = 0 then
  31419. pTDefRegMap(@Self)^.clr := $00010000
  31420. else
  31421. pTDefRegMap(@Self)^.&set := $00010000;
  31422. end;
  31423. function TSPI3A_SPI3ACON.getENHBUF : TBits_1; inline;
  31424. begin
  31425. getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  31426. end;
  31427. procedure TSPI3A_SPI3ACON.setSPIFE; inline;
  31428. begin
  31429. pTDefRegMap(@Self)^.&set := $00020000;
  31430. end;
  31431. procedure TSPI3A_SPI3ACON.clearSPIFE; inline;
  31432. begin
  31433. pTDefRegMap(@Self)^.clr := $00020000;
  31434. end;
  31435. procedure TSPI3A_SPI3ACON.setSPIFE(thebits : TBits_1); inline;
  31436. begin
  31437. if thebits = 0 then
  31438. pTDefRegMap(@Self)^.clr := $00020000
  31439. else
  31440. pTDefRegMap(@Self)^.&set := $00020000;
  31441. end;
  31442. function TSPI3A_SPI3ACON.getSPIFE : TBits_1; inline;
  31443. begin
  31444. getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  31445. end;
  31446. procedure TSPI3A_SPI3ACON.setFRMCNT(thebits : TBits_3); inline;
  31447. begin
  31448. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  31449. end;
  31450. function TSPI3A_SPI3ACON.getFRMCNT : TBits_3; inline;
  31451. begin
  31452. getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  31453. end;
  31454. procedure TSPI3A_SPI3ACON.setFRMSYPW; inline;
  31455. begin
  31456. pTDefRegMap(@Self)^.&set := $08000000;
  31457. end;
  31458. procedure TSPI3A_SPI3ACON.clearFRMSYPW; inline;
  31459. begin
  31460. pTDefRegMap(@Self)^.clr := $08000000;
  31461. end;
  31462. procedure TSPI3A_SPI3ACON.setFRMSYPW(thebits : TBits_1); inline;
  31463. begin
  31464. if thebits = 0 then
  31465. pTDefRegMap(@Self)^.clr := $08000000
  31466. else
  31467. pTDefRegMap(@Self)^.&set := $08000000;
  31468. end;
  31469. function TSPI3A_SPI3ACON.getFRMSYPW : TBits_1; inline;
  31470. begin
  31471. getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  31472. end;
  31473. procedure TSPI3A_SPI3ACON.setMSSEN; inline;
  31474. begin
  31475. pTDefRegMap(@Self)^.&set := $10000000;
  31476. end;
  31477. procedure TSPI3A_SPI3ACON.clearMSSEN; inline;
  31478. begin
  31479. pTDefRegMap(@Self)^.clr := $10000000;
  31480. end;
  31481. procedure TSPI3A_SPI3ACON.setMSSEN(thebits : TBits_1); inline;
  31482. begin
  31483. if thebits = 0 then
  31484. pTDefRegMap(@Self)^.clr := $10000000
  31485. else
  31486. pTDefRegMap(@Self)^.&set := $10000000;
  31487. end;
  31488. function TSPI3A_SPI3ACON.getMSSEN : TBits_1; inline;
  31489. begin
  31490. getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  31491. end;
  31492. procedure TSPI3A_SPI3ACON.setFRMPOL; inline;
  31493. begin
  31494. pTDefRegMap(@Self)^.&set := $20000000;
  31495. end;
  31496. procedure TSPI3A_SPI3ACON.clearFRMPOL; inline;
  31497. begin
  31498. pTDefRegMap(@Self)^.clr := $20000000;
  31499. end;
  31500. procedure TSPI3A_SPI3ACON.setFRMPOL(thebits : TBits_1); inline;
  31501. begin
  31502. if thebits = 0 then
  31503. pTDefRegMap(@Self)^.clr := $20000000
  31504. else
  31505. pTDefRegMap(@Self)^.&set := $20000000;
  31506. end;
  31507. function TSPI3A_SPI3ACON.getFRMPOL : TBits_1; inline;
  31508. begin
  31509. getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  31510. end;
  31511. procedure TSPI3A_SPI3ACON.setFRMSYNC; inline;
  31512. begin
  31513. pTDefRegMap(@Self)^.&set := $40000000;
  31514. end;
  31515. procedure TSPI3A_SPI3ACON.clearFRMSYNC; inline;
  31516. begin
  31517. pTDefRegMap(@Self)^.clr := $40000000;
  31518. end;
  31519. procedure TSPI3A_SPI3ACON.setFRMSYNC(thebits : TBits_1); inline;
  31520. begin
  31521. if thebits = 0 then
  31522. pTDefRegMap(@Self)^.clr := $40000000
  31523. else
  31524. pTDefRegMap(@Self)^.&set := $40000000;
  31525. end;
  31526. function TSPI3A_SPI3ACON.getFRMSYNC : TBits_1; inline;
  31527. begin
  31528. getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  31529. end;
  31530. procedure TSPI3A_SPI3ACON.setFRMEN; inline;
  31531. begin
  31532. pTDefRegMap(@Self)^.&set := $80000000;
  31533. end;
  31534. procedure TSPI3A_SPI3ACON.clearFRMEN; inline;
  31535. begin
  31536. pTDefRegMap(@Self)^.clr := $80000000;
  31537. end;
  31538. procedure TSPI3A_SPI3ACON.setFRMEN(thebits : TBits_1); inline;
  31539. begin
  31540. if thebits = 0 then
  31541. pTDefRegMap(@Self)^.clr := $80000000
  31542. else
  31543. pTDefRegMap(@Self)^.&set := $80000000;
  31544. end;
  31545. function TSPI3A_SPI3ACON.getFRMEN : TBits_1; inline;
  31546. begin
  31547. getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  31548. end;
  31549. procedure TSPI3A_SPI3ACON.setw(thebits : TBits_32); inline;
  31550. begin
  31551. pTDefRegMap(@Self)^.val := thebits;
  31552. end;
  31553. function TSPI3A_SPI3ACON.getw : TBits_32; inline;
  31554. begin
  31555. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  31556. end;
  31557. procedure TSPI3A_SPI4CON.setSRXISEL(thebits : TBits_2); inline;
  31558. begin
  31559. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  31560. end;
  31561. function TSPI3A_SPI4CON.getSRXISEL : TBits_2; inline;
  31562. begin
  31563. getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  31564. end;
  31565. procedure TSPI3A_SPI4CON.setSTXISEL(thebits : TBits_2); inline;
  31566. begin
  31567. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
  31568. end;
  31569. function TSPI3A_SPI4CON.getSTXISEL : TBits_2; inline;
  31570. begin
  31571. getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
  31572. end;
  31573. procedure TSPI3A_SPI4CON.setMSTEN; inline;
  31574. begin
  31575. pTDefRegMap(@Self)^.&set := $00000020;
  31576. end;
  31577. procedure TSPI3A_SPI4CON.clearMSTEN; inline;
  31578. begin
  31579. pTDefRegMap(@Self)^.clr := $00000020;
  31580. end;
  31581. procedure TSPI3A_SPI4CON.setMSTEN(thebits : TBits_1); inline;
  31582. begin
  31583. if thebits = 0 then
  31584. pTDefRegMap(@Self)^.clr := $00000020
  31585. else
  31586. pTDefRegMap(@Self)^.&set := $00000020;
  31587. end;
  31588. function TSPI3A_SPI4CON.getMSTEN : TBits_1; inline;
  31589. begin
  31590. getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  31591. end;
  31592. procedure TSPI3A_SPI4CON.setCKP; inline;
  31593. begin
  31594. pTDefRegMap(@Self)^.&set := $00000040;
  31595. end;
  31596. procedure TSPI3A_SPI4CON.clearCKP; inline;
  31597. begin
  31598. pTDefRegMap(@Self)^.clr := $00000040;
  31599. end;
  31600. procedure TSPI3A_SPI4CON.setCKP(thebits : TBits_1); inline;
  31601. begin
  31602. if thebits = 0 then
  31603. pTDefRegMap(@Self)^.clr := $00000040
  31604. else
  31605. pTDefRegMap(@Self)^.&set := $00000040;
  31606. end;
  31607. function TSPI3A_SPI4CON.getCKP : TBits_1; inline;
  31608. begin
  31609. getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  31610. end;
  31611. procedure TSPI3A_SPI4CON.setSSEN; inline;
  31612. begin
  31613. pTDefRegMap(@Self)^.&set := $00000080;
  31614. end;
  31615. procedure TSPI3A_SPI4CON.clearSSEN; inline;
  31616. begin
  31617. pTDefRegMap(@Self)^.clr := $00000080;
  31618. end;
  31619. procedure TSPI3A_SPI4CON.setSSEN(thebits : TBits_1); inline;
  31620. begin
  31621. if thebits = 0 then
  31622. pTDefRegMap(@Self)^.clr := $00000080
  31623. else
  31624. pTDefRegMap(@Self)^.&set := $00000080;
  31625. end;
  31626. function TSPI3A_SPI4CON.getSSEN : TBits_1; inline;
  31627. begin
  31628. getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  31629. end;
  31630. procedure TSPI3A_SPI4CON.setCKE; inline;
  31631. begin
  31632. pTDefRegMap(@Self)^.&set := $00000100;
  31633. end;
  31634. procedure TSPI3A_SPI4CON.clearCKE; inline;
  31635. begin
  31636. pTDefRegMap(@Self)^.clr := $00000100;
  31637. end;
  31638. procedure TSPI3A_SPI4CON.setCKE(thebits : TBits_1); inline;
  31639. begin
  31640. if thebits = 0 then
  31641. pTDefRegMap(@Self)^.clr := $00000100
  31642. else
  31643. pTDefRegMap(@Self)^.&set := $00000100;
  31644. end;
  31645. function TSPI3A_SPI4CON.getCKE : TBits_1; inline;
  31646. begin
  31647. getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  31648. end;
  31649. procedure TSPI3A_SPI4CON.setSMP; inline;
  31650. begin
  31651. pTDefRegMap(@Self)^.&set := $00000200;
  31652. end;
  31653. procedure TSPI3A_SPI4CON.clearSMP; inline;
  31654. begin
  31655. pTDefRegMap(@Self)^.clr := $00000200;
  31656. end;
  31657. procedure TSPI3A_SPI4CON.setSMP(thebits : TBits_1); inline;
  31658. begin
  31659. if thebits = 0 then
  31660. pTDefRegMap(@Self)^.clr := $00000200
  31661. else
  31662. pTDefRegMap(@Self)^.&set := $00000200;
  31663. end;
  31664. function TSPI3A_SPI4CON.getSMP : TBits_1; inline;
  31665. begin
  31666. getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  31667. end;
  31668. procedure TSPI3A_SPI4CON.setMODE16; inline;
  31669. begin
  31670. pTDefRegMap(@Self)^.&set := $00000400;
  31671. end;
  31672. procedure TSPI3A_SPI4CON.clearMODE16; inline;
  31673. begin
  31674. pTDefRegMap(@Self)^.clr := $00000400;
  31675. end;
  31676. procedure TSPI3A_SPI4CON.setMODE16(thebits : TBits_1); inline;
  31677. begin
  31678. if thebits = 0 then
  31679. pTDefRegMap(@Self)^.clr := $00000400
  31680. else
  31681. pTDefRegMap(@Self)^.&set := $00000400;
  31682. end;
  31683. function TSPI3A_SPI4CON.getMODE16 : TBits_1; inline;
  31684. begin
  31685. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  31686. end;
  31687. procedure TSPI3A_SPI4CON.setMODE32; inline;
  31688. begin
  31689. pTDefRegMap(@Self)^.&set := $00000800;
  31690. end;
  31691. procedure TSPI3A_SPI4CON.clearMODE32; inline;
  31692. begin
  31693. pTDefRegMap(@Self)^.clr := $00000800;
  31694. end;
  31695. procedure TSPI3A_SPI4CON.setMODE32(thebits : TBits_1); inline;
  31696. begin
  31697. if thebits = 0 then
  31698. pTDefRegMap(@Self)^.clr := $00000800
  31699. else
  31700. pTDefRegMap(@Self)^.&set := $00000800;
  31701. end;
  31702. function TSPI3A_SPI4CON.getMODE32 : TBits_1; inline;
  31703. begin
  31704. getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  31705. end;
  31706. procedure TSPI3A_SPI4CON.setDISSDO; inline;
  31707. begin
  31708. pTDefRegMap(@Self)^.&set := $00001000;
  31709. end;
  31710. procedure TSPI3A_SPI4CON.clearDISSDO; inline;
  31711. begin
  31712. pTDefRegMap(@Self)^.clr := $00001000;
  31713. end;
  31714. procedure TSPI3A_SPI4CON.setDISSDO(thebits : TBits_1); inline;
  31715. begin
  31716. if thebits = 0 then
  31717. pTDefRegMap(@Self)^.clr := $00001000
  31718. else
  31719. pTDefRegMap(@Self)^.&set := $00001000;
  31720. end;
  31721. function TSPI3A_SPI4CON.getDISSDO : TBits_1; inline;
  31722. begin
  31723. getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  31724. end;
  31725. procedure TSPI3A_SPI4CON.setSIDL; inline;
  31726. begin
  31727. pTDefRegMap(@Self)^.&set := $00002000;
  31728. end;
  31729. procedure TSPI3A_SPI4CON.clearSIDL; inline;
  31730. begin
  31731. pTDefRegMap(@Self)^.clr := $00002000;
  31732. end;
  31733. procedure TSPI3A_SPI4CON.setSIDL(thebits : TBits_1); inline;
  31734. begin
  31735. if thebits = 0 then
  31736. pTDefRegMap(@Self)^.clr := $00002000
  31737. else
  31738. pTDefRegMap(@Self)^.&set := $00002000;
  31739. end;
  31740. function TSPI3A_SPI4CON.getSIDL : TBits_1; inline;
  31741. begin
  31742. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  31743. end;
  31744. procedure TSPI3A_SPI4CON.setON; inline;
  31745. begin
  31746. pTDefRegMap(@Self)^.&set := $00008000;
  31747. end;
  31748. procedure TSPI3A_SPI4CON.clearON; inline;
  31749. begin
  31750. pTDefRegMap(@Self)^.clr := $00008000;
  31751. end;
  31752. procedure TSPI3A_SPI4CON.setON(thebits : TBits_1); inline;
  31753. begin
  31754. if thebits = 0 then
  31755. pTDefRegMap(@Self)^.clr := $00008000
  31756. else
  31757. pTDefRegMap(@Self)^.&set := $00008000;
  31758. end;
  31759. function TSPI3A_SPI4CON.getON : TBits_1; inline;
  31760. begin
  31761. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  31762. end;
  31763. procedure TSPI3A_SPI4CON.setENHBUF; inline;
  31764. begin
  31765. pTDefRegMap(@Self)^.&set := $00010000;
  31766. end;
  31767. procedure TSPI3A_SPI4CON.clearENHBUF; inline;
  31768. begin
  31769. pTDefRegMap(@Self)^.clr := $00010000;
  31770. end;
  31771. procedure TSPI3A_SPI4CON.setENHBUF(thebits : TBits_1); inline;
  31772. begin
  31773. if thebits = 0 then
  31774. pTDefRegMap(@Self)^.clr := $00010000
  31775. else
  31776. pTDefRegMap(@Self)^.&set := $00010000;
  31777. end;
  31778. function TSPI3A_SPI4CON.getENHBUF : TBits_1; inline;
  31779. begin
  31780. getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  31781. end;
  31782. procedure TSPI3A_SPI4CON.setSPIFE; inline;
  31783. begin
  31784. pTDefRegMap(@Self)^.&set := $00020000;
  31785. end;
  31786. procedure TSPI3A_SPI4CON.clearSPIFE; inline;
  31787. begin
  31788. pTDefRegMap(@Self)^.clr := $00020000;
  31789. end;
  31790. procedure TSPI3A_SPI4CON.setSPIFE(thebits : TBits_1); inline;
  31791. begin
  31792. if thebits = 0 then
  31793. pTDefRegMap(@Self)^.clr := $00020000
  31794. else
  31795. pTDefRegMap(@Self)^.&set := $00020000;
  31796. end;
  31797. function TSPI3A_SPI4CON.getSPIFE : TBits_1; inline;
  31798. begin
  31799. getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  31800. end;
  31801. procedure TSPI3A_SPI4CON.setFRMCNT(thebits : TBits_3); inline;
  31802. begin
  31803. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  31804. end;
  31805. function TSPI3A_SPI4CON.getFRMCNT : TBits_3; inline;
  31806. begin
  31807. getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  31808. end;
  31809. procedure TSPI3A_SPI4CON.setFRMSYPW; inline;
  31810. begin
  31811. pTDefRegMap(@Self)^.&set := $08000000;
  31812. end;
  31813. procedure TSPI3A_SPI4CON.clearFRMSYPW; inline;
  31814. begin
  31815. pTDefRegMap(@Self)^.clr := $08000000;
  31816. end;
  31817. procedure TSPI3A_SPI4CON.setFRMSYPW(thebits : TBits_1); inline;
  31818. begin
  31819. if thebits = 0 then
  31820. pTDefRegMap(@Self)^.clr := $08000000
  31821. else
  31822. pTDefRegMap(@Self)^.&set := $08000000;
  31823. end;
  31824. function TSPI3A_SPI4CON.getFRMSYPW : TBits_1; inline;
  31825. begin
  31826. getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  31827. end;
  31828. procedure TSPI3A_SPI4CON.setMSSEN; inline;
  31829. begin
  31830. pTDefRegMap(@Self)^.&set := $10000000;
  31831. end;
  31832. procedure TSPI3A_SPI4CON.clearMSSEN; inline;
  31833. begin
  31834. pTDefRegMap(@Self)^.clr := $10000000;
  31835. end;
  31836. procedure TSPI3A_SPI4CON.setMSSEN(thebits : TBits_1); inline;
  31837. begin
  31838. if thebits = 0 then
  31839. pTDefRegMap(@Self)^.clr := $10000000
  31840. else
  31841. pTDefRegMap(@Self)^.&set := $10000000;
  31842. end;
  31843. function TSPI3A_SPI4CON.getMSSEN : TBits_1; inline;
  31844. begin
  31845. getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  31846. end;
  31847. procedure TSPI3A_SPI4CON.setFRMPOL; inline;
  31848. begin
  31849. pTDefRegMap(@Self)^.&set := $20000000;
  31850. end;
  31851. procedure TSPI3A_SPI4CON.clearFRMPOL; inline;
  31852. begin
  31853. pTDefRegMap(@Self)^.clr := $20000000;
  31854. end;
  31855. procedure TSPI3A_SPI4CON.setFRMPOL(thebits : TBits_1); inline;
  31856. begin
  31857. if thebits = 0 then
  31858. pTDefRegMap(@Self)^.clr := $20000000
  31859. else
  31860. pTDefRegMap(@Self)^.&set := $20000000;
  31861. end;
  31862. function TSPI3A_SPI4CON.getFRMPOL : TBits_1; inline;
  31863. begin
  31864. getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  31865. end;
  31866. procedure TSPI3A_SPI4CON.setFRMSYNC; inline;
  31867. begin
  31868. pTDefRegMap(@Self)^.&set := $40000000;
  31869. end;
  31870. procedure TSPI3A_SPI4CON.clearFRMSYNC; inline;
  31871. begin
  31872. pTDefRegMap(@Self)^.clr := $40000000;
  31873. end;
  31874. procedure TSPI3A_SPI4CON.setFRMSYNC(thebits : TBits_1); inline;
  31875. begin
  31876. if thebits = 0 then
  31877. pTDefRegMap(@Self)^.clr := $40000000
  31878. else
  31879. pTDefRegMap(@Self)^.&set := $40000000;
  31880. end;
  31881. function TSPI3A_SPI4CON.getFRMSYNC : TBits_1; inline;
  31882. begin
  31883. getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  31884. end;
  31885. procedure TSPI3A_SPI4CON.setFRMEN; inline;
  31886. begin
  31887. pTDefRegMap(@Self)^.&set := $80000000;
  31888. end;
  31889. procedure TSPI3A_SPI4CON.clearFRMEN; inline;
  31890. begin
  31891. pTDefRegMap(@Self)^.clr := $80000000;
  31892. end;
  31893. procedure TSPI3A_SPI4CON.setFRMEN(thebits : TBits_1); inline;
  31894. begin
  31895. if thebits = 0 then
  31896. pTDefRegMap(@Self)^.clr := $80000000
  31897. else
  31898. pTDefRegMap(@Self)^.&set := $80000000;
  31899. end;
  31900. function TSPI3A_SPI4CON.getFRMEN : TBits_1; inline;
  31901. begin
  31902. getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  31903. end;
  31904. procedure TSPI3A_SPI4CON.setw(thebits : TBits_32); inline;
  31905. begin
  31906. pTDefRegMap(@Self)^.val := thebits;
  31907. end;
  31908. function TSPI3A_SPI4CON.getw : TBits_32; inline;
  31909. begin
  31910. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  31911. end;
  31912. procedure TSPI3A_SPI3ASTAT.setSPIRBF; inline;
  31913. begin
  31914. pTDefRegMap(@Self)^.&set := $00000001;
  31915. end;
  31916. procedure TSPI3A_SPI3ASTAT.clearSPIRBF; inline;
  31917. begin
  31918. pTDefRegMap(@Self)^.clr := $00000001;
  31919. end;
  31920. procedure TSPI3A_SPI3ASTAT.setSPIRBF(thebits : TBits_1); inline;
  31921. begin
  31922. if thebits = 0 then
  31923. pTDefRegMap(@Self)^.clr := $00000001
  31924. else
  31925. pTDefRegMap(@Self)^.&set := $00000001;
  31926. end;
  31927. function TSPI3A_SPI3ASTAT.getSPIRBF : TBits_1; inline;
  31928. begin
  31929. getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  31930. end;
  31931. procedure TSPI3A_SPI3ASTAT.setSPITBF; inline;
  31932. begin
  31933. pTDefRegMap(@Self)^.&set := $00000002;
  31934. end;
  31935. procedure TSPI3A_SPI3ASTAT.clearSPITBF; inline;
  31936. begin
  31937. pTDefRegMap(@Self)^.clr := $00000002;
  31938. end;
  31939. procedure TSPI3A_SPI3ASTAT.setSPITBF(thebits : TBits_1); inline;
  31940. begin
  31941. if thebits = 0 then
  31942. pTDefRegMap(@Self)^.clr := $00000002
  31943. else
  31944. pTDefRegMap(@Self)^.&set := $00000002;
  31945. end;
  31946. function TSPI3A_SPI3ASTAT.getSPITBF : TBits_1; inline;
  31947. begin
  31948. getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  31949. end;
  31950. procedure TSPI3A_SPI3ASTAT.setSPITBE; inline;
  31951. begin
  31952. pTDefRegMap(@Self)^.&set := $00000008;
  31953. end;
  31954. procedure TSPI3A_SPI3ASTAT.clearSPITBE; inline;
  31955. begin
  31956. pTDefRegMap(@Self)^.clr := $00000008;
  31957. end;
  31958. procedure TSPI3A_SPI3ASTAT.setSPITBE(thebits : TBits_1); inline;
  31959. begin
  31960. if thebits = 0 then
  31961. pTDefRegMap(@Self)^.clr := $00000008
  31962. else
  31963. pTDefRegMap(@Self)^.&set := $00000008;
  31964. end;
  31965. function TSPI3A_SPI3ASTAT.getSPITBE : TBits_1; inline;
  31966. begin
  31967. getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  31968. end;
  31969. procedure TSPI3A_SPI3ASTAT.setSPIRBE; inline;
  31970. begin
  31971. pTDefRegMap(@Self)^.&set := $00000020;
  31972. end;
  31973. procedure TSPI3A_SPI3ASTAT.clearSPIRBE; inline;
  31974. begin
  31975. pTDefRegMap(@Self)^.clr := $00000020;
  31976. end;
  31977. procedure TSPI3A_SPI3ASTAT.setSPIRBE(thebits : TBits_1); inline;
  31978. begin
  31979. if thebits = 0 then
  31980. pTDefRegMap(@Self)^.clr := $00000020
  31981. else
  31982. pTDefRegMap(@Self)^.&set := $00000020;
  31983. end;
  31984. function TSPI3A_SPI3ASTAT.getSPIRBE : TBits_1; inline;
  31985. begin
  31986. getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  31987. end;
  31988. procedure TSPI3A_SPI3ASTAT.setSPIROV; inline;
  31989. begin
  31990. pTDefRegMap(@Self)^.&set := $00000040;
  31991. end;
  31992. procedure TSPI3A_SPI3ASTAT.clearSPIROV; inline;
  31993. begin
  31994. pTDefRegMap(@Self)^.clr := $00000040;
  31995. end;
  31996. procedure TSPI3A_SPI3ASTAT.setSPIROV(thebits : TBits_1); inline;
  31997. begin
  31998. if thebits = 0 then
  31999. pTDefRegMap(@Self)^.clr := $00000040
  32000. else
  32001. pTDefRegMap(@Self)^.&set := $00000040;
  32002. end;
  32003. function TSPI3A_SPI3ASTAT.getSPIROV : TBits_1; inline;
  32004. begin
  32005. getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  32006. end;
  32007. procedure TSPI3A_SPI3ASTAT.setSRMT; inline;
  32008. begin
  32009. pTDefRegMap(@Self)^.&set := $00000080;
  32010. end;
  32011. procedure TSPI3A_SPI3ASTAT.clearSRMT; inline;
  32012. begin
  32013. pTDefRegMap(@Self)^.clr := $00000080;
  32014. end;
  32015. procedure TSPI3A_SPI3ASTAT.setSRMT(thebits : TBits_1); inline;
  32016. begin
  32017. if thebits = 0 then
  32018. pTDefRegMap(@Self)^.clr := $00000080
  32019. else
  32020. pTDefRegMap(@Self)^.&set := $00000080;
  32021. end;
  32022. function TSPI3A_SPI3ASTAT.getSRMT : TBits_1; inline;
  32023. begin
  32024. getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  32025. end;
  32026. procedure TSPI3A_SPI3ASTAT.setSPITUR; inline;
  32027. begin
  32028. pTDefRegMap(@Self)^.&set := $00000100;
  32029. end;
  32030. procedure TSPI3A_SPI3ASTAT.clearSPITUR; inline;
  32031. begin
  32032. pTDefRegMap(@Self)^.clr := $00000100;
  32033. end;
  32034. procedure TSPI3A_SPI3ASTAT.setSPITUR(thebits : TBits_1); inline;
  32035. begin
  32036. if thebits = 0 then
  32037. pTDefRegMap(@Self)^.clr := $00000100
  32038. else
  32039. pTDefRegMap(@Self)^.&set := $00000100;
  32040. end;
  32041. function TSPI3A_SPI3ASTAT.getSPITUR : TBits_1; inline;
  32042. begin
  32043. getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  32044. end;
  32045. procedure TSPI3A_SPI3ASTAT.setSPIBUSY; inline;
  32046. begin
  32047. pTDefRegMap(@Self)^.&set := $00000800;
  32048. end;
  32049. procedure TSPI3A_SPI3ASTAT.clearSPIBUSY; inline;
  32050. begin
  32051. pTDefRegMap(@Self)^.clr := $00000800;
  32052. end;
  32053. procedure TSPI3A_SPI3ASTAT.setSPIBUSY(thebits : TBits_1); inline;
  32054. begin
  32055. if thebits = 0 then
  32056. pTDefRegMap(@Self)^.clr := $00000800
  32057. else
  32058. pTDefRegMap(@Self)^.&set := $00000800;
  32059. end;
  32060. function TSPI3A_SPI3ASTAT.getSPIBUSY : TBits_1; inline;
  32061. begin
  32062. getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  32063. end;
  32064. procedure TSPI3A_SPI3ASTAT.setTXBUFELM(thebits : TBits_5); inline;
  32065. begin
  32066. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  32067. end;
  32068. function TSPI3A_SPI3ASTAT.getTXBUFELM : TBits_5; inline;
  32069. begin
  32070. getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  32071. end;
  32072. procedure TSPI3A_SPI3ASTAT.setRXBUFELM(thebits : TBits_5); inline;
  32073. begin
  32074. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  32075. end;
  32076. function TSPI3A_SPI3ASTAT.getRXBUFELM : TBits_5; inline;
  32077. begin
  32078. getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  32079. end;
  32080. procedure TSPI3A_SPI3ASTAT.setw(thebits : TBits_32); inline;
  32081. begin
  32082. pTDefRegMap(@Self)^.val := thebits;
  32083. end;
  32084. function TSPI3A_SPI3ASTAT.getw : TBits_32; inline;
  32085. begin
  32086. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  32087. end;
  32088. procedure TSPI3A_SPI4STAT.setSPIRBF; inline;
  32089. begin
  32090. pTDefRegMap(@Self)^.&set := $00000001;
  32091. end;
  32092. procedure TSPI3A_SPI4STAT.clearSPIRBF; inline;
  32093. begin
  32094. pTDefRegMap(@Self)^.clr := $00000001;
  32095. end;
  32096. procedure TSPI3A_SPI4STAT.setSPIRBF(thebits : TBits_1); inline;
  32097. begin
  32098. if thebits = 0 then
  32099. pTDefRegMap(@Self)^.clr := $00000001
  32100. else
  32101. pTDefRegMap(@Self)^.&set := $00000001;
  32102. end;
  32103. function TSPI3A_SPI4STAT.getSPIRBF : TBits_1; inline;
  32104. begin
  32105. getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  32106. end;
  32107. procedure TSPI3A_SPI4STAT.setSPITBF; inline;
  32108. begin
  32109. pTDefRegMap(@Self)^.&set := $00000002;
  32110. end;
  32111. procedure TSPI3A_SPI4STAT.clearSPITBF; inline;
  32112. begin
  32113. pTDefRegMap(@Self)^.clr := $00000002;
  32114. end;
  32115. procedure TSPI3A_SPI4STAT.setSPITBF(thebits : TBits_1); inline;
  32116. begin
  32117. if thebits = 0 then
  32118. pTDefRegMap(@Self)^.clr := $00000002
  32119. else
  32120. pTDefRegMap(@Self)^.&set := $00000002;
  32121. end;
  32122. function TSPI3A_SPI4STAT.getSPITBF : TBits_1; inline;
  32123. begin
  32124. getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  32125. end;
  32126. procedure TSPI3A_SPI4STAT.setSPITBE; inline;
  32127. begin
  32128. pTDefRegMap(@Self)^.&set := $00000008;
  32129. end;
  32130. procedure TSPI3A_SPI4STAT.clearSPITBE; inline;
  32131. begin
  32132. pTDefRegMap(@Self)^.clr := $00000008;
  32133. end;
  32134. procedure TSPI3A_SPI4STAT.setSPITBE(thebits : TBits_1); inline;
  32135. begin
  32136. if thebits = 0 then
  32137. pTDefRegMap(@Self)^.clr := $00000008
  32138. else
  32139. pTDefRegMap(@Self)^.&set := $00000008;
  32140. end;
  32141. function TSPI3A_SPI4STAT.getSPITBE : TBits_1; inline;
  32142. begin
  32143. getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  32144. end;
  32145. procedure TSPI3A_SPI4STAT.setSPIRBE; inline;
  32146. begin
  32147. pTDefRegMap(@Self)^.&set := $00000020;
  32148. end;
  32149. procedure TSPI3A_SPI4STAT.clearSPIRBE; inline;
  32150. begin
  32151. pTDefRegMap(@Self)^.clr := $00000020;
  32152. end;
  32153. procedure TSPI3A_SPI4STAT.setSPIRBE(thebits : TBits_1); inline;
  32154. begin
  32155. if thebits = 0 then
  32156. pTDefRegMap(@Self)^.clr := $00000020
  32157. else
  32158. pTDefRegMap(@Self)^.&set := $00000020;
  32159. end;
  32160. function TSPI3A_SPI4STAT.getSPIRBE : TBits_1; inline;
  32161. begin
  32162. getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  32163. end;
  32164. procedure TSPI3A_SPI4STAT.setSPIROV; inline;
  32165. begin
  32166. pTDefRegMap(@Self)^.&set := $00000040;
  32167. end;
  32168. procedure TSPI3A_SPI4STAT.clearSPIROV; inline;
  32169. begin
  32170. pTDefRegMap(@Self)^.clr := $00000040;
  32171. end;
  32172. procedure TSPI3A_SPI4STAT.setSPIROV(thebits : TBits_1); inline;
  32173. begin
  32174. if thebits = 0 then
  32175. pTDefRegMap(@Self)^.clr := $00000040
  32176. else
  32177. pTDefRegMap(@Self)^.&set := $00000040;
  32178. end;
  32179. function TSPI3A_SPI4STAT.getSPIROV : TBits_1; inline;
  32180. begin
  32181. getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  32182. end;
  32183. procedure TSPI3A_SPI4STAT.setSRMT; inline;
  32184. begin
  32185. pTDefRegMap(@Self)^.&set := $00000080;
  32186. end;
  32187. procedure TSPI3A_SPI4STAT.clearSRMT; inline;
  32188. begin
  32189. pTDefRegMap(@Self)^.clr := $00000080;
  32190. end;
  32191. procedure TSPI3A_SPI4STAT.setSRMT(thebits : TBits_1); inline;
  32192. begin
  32193. if thebits = 0 then
  32194. pTDefRegMap(@Self)^.clr := $00000080
  32195. else
  32196. pTDefRegMap(@Self)^.&set := $00000080;
  32197. end;
  32198. function TSPI3A_SPI4STAT.getSRMT : TBits_1; inline;
  32199. begin
  32200. getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  32201. end;
  32202. procedure TSPI3A_SPI4STAT.setSPITUR; inline;
  32203. begin
  32204. pTDefRegMap(@Self)^.&set := $00000100;
  32205. end;
  32206. procedure TSPI3A_SPI4STAT.clearSPITUR; inline;
  32207. begin
  32208. pTDefRegMap(@Self)^.clr := $00000100;
  32209. end;
  32210. procedure TSPI3A_SPI4STAT.setSPITUR(thebits : TBits_1); inline;
  32211. begin
  32212. if thebits = 0 then
  32213. pTDefRegMap(@Self)^.clr := $00000100
  32214. else
  32215. pTDefRegMap(@Self)^.&set := $00000100;
  32216. end;
  32217. function TSPI3A_SPI4STAT.getSPITUR : TBits_1; inline;
  32218. begin
  32219. getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  32220. end;
  32221. procedure TSPI3A_SPI4STAT.setSPIBUSY; inline;
  32222. begin
  32223. pTDefRegMap(@Self)^.&set := $00000800;
  32224. end;
  32225. procedure TSPI3A_SPI4STAT.clearSPIBUSY; inline;
  32226. begin
  32227. pTDefRegMap(@Self)^.clr := $00000800;
  32228. end;
  32229. procedure TSPI3A_SPI4STAT.setSPIBUSY(thebits : TBits_1); inline;
  32230. begin
  32231. if thebits = 0 then
  32232. pTDefRegMap(@Self)^.clr := $00000800
  32233. else
  32234. pTDefRegMap(@Self)^.&set := $00000800;
  32235. end;
  32236. function TSPI3A_SPI4STAT.getSPIBUSY : TBits_1; inline;
  32237. begin
  32238. getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  32239. end;
  32240. procedure TSPI3A_SPI4STAT.setTXBUFELM(thebits : TBits_5); inline;
  32241. begin
  32242. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  32243. end;
  32244. function TSPI3A_SPI4STAT.getTXBUFELM : TBits_5; inline;
  32245. begin
  32246. getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  32247. end;
  32248. procedure TSPI3A_SPI4STAT.setRXBUFELM(thebits : TBits_5); inline;
  32249. begin
  32250. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  32251. end;
  32252. function TSPI3A_SPI4STAT.getRXBUFELM : TBits_5; inline;
  32253. begin
  32254. getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  32255. end;
  32256. procedure TSPI3A_SPI4STAT.setw(thebits : TBits_32); inline;
  32257. begin
  32258. pTDefRegMap(@Self)^.val := thebits;
  32259. end;
  32260. function TSPI3A_SPI4STAT.getw : TBits_32; inline;
  32261. begin
  32262. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  32263. end;
  32264. procedure TUART1A_U1AMODE.setSTSEL; inline;
  32265. begin
  32266. pTDefRegMap(@Self)^.&set := $00000001;
  32267. end;
  32268. procedure TUART1A_U1AMODE.clearSTSEL; inline;
  32269. begin
  32270. pTDefRegMap(@Self)^.clr := $00000001;
  32271. end;
  32272. procedure TUART1A_U1AMODE.setSTSEL(thebits : TBits_1); inline;
  32273. begin
  32274. if thebits = 0 then
  32275. pTDefRegMap(@Self)^.clr := $00000001
  32276. else
  32277. pTDefRegMap(@Self)^.&set := $00000001;
  32278. end;
  32279. function TUART1A_U1AMODE.getSTSEL : TBits_1; inline;
  32280. begin
  32281. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  32282. end;
  32283. procedure TUART1A_U1AMODE.setPDSEL(thebits : TBits_2); inline;
  32284. begin
  32285. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  32286. end;
  32287. function TUART1A_U1AMODE.getPDSEL : TBits_2; inline;
  32288. begin
  32289. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  32290. end;
  32291. procedure TUART1A_U1AMODE.setBRGH; inline;
  32292. begin
  32293. pTDefRegMap(@Self)^.&set := $00000008;
  32294. end;
  32295. procedure TUART1A_U1AMODE.clearBRGH; inline;
  32296. begin
  32297. pTDefRegMap(@Self)^.clr := $00000008;
  32298. end;
  32299. procedure TUART1A_U1AMODE.setBRGH(thebits : TBits_1); inline;
  32300. begin
  32301. if thebits = 0 then
  32302. pTDefRegMap(@Self)^.clr := $00000008
  32303. else
  32304. pTDefRegMap(@Self)^.&set := $00000008;
  32305. end;
  32306. function TUART1A_U1AMODE.getBRGH : TBits_1; inline;
  32307. begin
  32308. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  32309. end;
  32310. procedure TUART1A_U1AMODE.setRXINV; inline;
  32311. begin
  32312. pTDefRegMap(@Self)^.&set := $00000010;
  32313. end;
  32314. procedure TUART1A_U1AMODE.clearRXINV; inline;
  32315. begin
  32316. pTDefRegMap(@Self)^.clr := $00000010;
  32317. end;
  32318. procedure TUART1A_U1AMODE.setRXINV(thebits : TBits_1); inline;
  32319. begin
  32320. if thebits = 0 then
  32321. pTDefRegMap(@Self)^.clr := $00000010
  32322. else
  32323. pTDefRegMap(@Self)^.&set := $00000010;
  32324. end;
  32325. function TUART1A_U1AMODE.getRXINV : TBits_1; inline;
  32326. begin
  32327. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  32328. end;
  32329. procedure TUART1A_U1AMODE.setABAUD; inline;
  32330. begin
  32331. pTDefRegMap(@Self)^.&set := $00000020;
  32332. end;
  32333. procedure TUART1A_U1AMODE.clearABAUD; inline;
  32334. begin
  32335. pTDefRegMap(@Self)^.clr := $00000020;
  32336. end;
  32337. procedure TUART1A_U1AMODE.setABAUD(thebits : TBits_1); inline;
  32338. begin
  32339. if thebits = 0 then
  32340. pTDefRegMap(@Self)^.clr := $00000020
  32341. else
  32342. pTDefRegMap(@Self)^.&set := $00000020;
  32343. end;
  32344. function TUART1A_U1AMODE.getABAUD : TBits_1; inline;
  32345. begin
  32346. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  32347. end;
  32348. procedure TUART1A_U1AMODE.setLPBACK; inline;
  32349. begin
  32350. pTDefRegMap(@Self)^.&set := $00000040;
  32351. end;
  32352. procedure TUART1A_U1AMODE.clearLPBACK; inline;
  32353. begin
  32354. pTDefRegMap(@Self)^.clr := $00000040;
  32355. end;
  32356. procedure TUART1A_U1AMODE.setLPBACK(thebits : TBits_1); inline;
  32357. begin
  32358. if thebits = 0 then
  32359. pTDefRegMap(@Self)^.clr := $00000040
  32360. else
  32361. pTDefRegMap(@Self)^.&set := $00000040;
  32362. end;
  32363. function TUART1A_U1AMODE.getLPBACK : TBits_1; inline;
  32364. begin
  32365. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  32366. end;
  32367. procedure TUART1A_U1AMODE.setWAKE; inline;
  32368. begin
  32369. pTDefRegMap(@Self)^.&set := $00000080;
  32370. end;
  32371. procedure TUART1A_U1AMODE.clearWAKE; inline;
  32372. begin
  32373. pTDefRegMap(@Self)^.clr := $00000080;
  32374. end;
  32375. procedure TUART1A_U1AMODE.setWAKE(thebits : TBits_1); inline;
  32376. begin
  32377. if thebits = 0 then
  32378. pTDefRegMap(@Self)^.clr := $00000080
  32379. else
  32380. pTDefRegMap(@Self)^.&set := $00000080;
  32381. end;
  32382. function TUART1A_U1AMODE.getWAKE : TBits_1; inline;
  32383. begin
  32384. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  32385. end;
  32386. procedure TUART1A_U1AMODE.setUEN(thebits : TBits_2); inline;
  32387. begin
  32388. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  32389. end;
  32390. function TUART1A_U1AMODE.getUEN : TBits_2; inline;
  32391. begin
  32392. getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  32393. end;
  32394. procedure TUART1A_U1AMODE.setRTSMD; inline;
  32395. begin
  32396. pTDefRegMap(@Self)^.&set := $00000800;
  32397. end;
  32398. procedure TUART1A_U1AMODE.clearRTSMD; inline;
  32399. begin
  32400. pTDefRegMap(@Self)^.clr := $00000800;
  32401. end;
  32402. procedure TUART1A_U1AMODE.setRTSMD(thebits : TBits_1); inline;
  32403. begin
  32404. if thebits = 0 then
  32405. pTDefRegMap(@Self)^.clr := $00000800
  32406. else
  32407. pTDefRegMap(@Self)^.&set := $00000800;
  32408. end;
  32409. function TUART1A_U1AMODE.getRTSMD : TBits_1; inline;
  32410. begin
  32411. getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  32412. end;
  32413. procedure TUART1A_U1AMODE.setIREN; inline;
  32414. begin
  32415. pTDefRegMap(@Self)^.&set := $00001000;
  32416. end;
  32417. procedure TUART1A_U1AMODE.clearIREN; inline;
  32418. begin
  32419. pTDefRegMap(@Self)^.clr := $00001000;
  32420. end;
  32421. procedure TUART1A_U1AMODE.setIREN(thebits : TBits_1); inline;
  32422. begin
  32423. if thebits = 0 then
  32424. pTDefRegMap(@Self)^.clr := $00001000
  32425. else
  32426. pTDefRegMap(@Self)^.&set := $00001000;
  32427. end;
  32428. function TUART1A_U1AMODE.getIREN : TBits_1; inline;
  32429. begin
  32430. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  32431. end;
  32432. procedure TUART1A_U1AMODE.setSIDL; inline;
  32433. begin
  32434. pTDefRegMap(@Self)^.&set := $00002000;
  32435. end;
  32436. procedure TUART1A_U1AMODE.clearSIDL; inline;
  32437. begin
  32438. pTDefRegMap(@Self)^.clr := $00002000;
  32439. end;
  32440. procedure TUART1A_U1AMODE.setSIDL(thebits : TBits_1); inline;
  32441. begin
  32442. if thebits = 0 then
  32443. pTDefRegMap(@Self)^.clr := $00002000
  32444. else
  32445. pTDefRegMap(@Self)^.&set := $00002000;
  32446. end;
  32447. function TUART1A_U1AMODE.getSIDL : TBits_1; inline;
  32448. begin
  32449. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  32450. end;
  32451. procedure TUART1A_U1AMODE.setON; inline;
  32452. begin
  32453. pTDefRegMap(@Self)^.&set := $00008000;
  32454. end;
  32455. procedure TUART1A_U1AMODE.clearON; inline;
  32456. begin
  32457. pTDefRegMap(@Self)^.clr := $00008000;
  32458. end;
  32459. procedure TUART1A_U1AMODE.setON(thebits : TBits_1); inline;
  32460. begin
  32461. if thebits = 0 then
  32462. pTDefRegMap(@Self)^.clr := $00008000
  32463. else
  32464. pTDefRegMap(@Self)^.&set := $00008000;
  32465. end;
  32466. function TUART1A_U1AMODE.getON : TBits_1; inline;
  32467. begin
  32468. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  32469. end;
  32470. procedure TUART1A_U1AMODE.setPDSEL0; inline;
  32471. begin
  32472. pTDefRegMap(@Self)^.&set := $00000002;
  32473. end;
  32474. procedure TUART1A_U1AMODE.clearPDSEL0; inline;
  32475. begin
  32476. pTDefRegMap(@Self)^.clr := $00000002;
  32477. end;
  32478. procedure TUART1A_U1AMODE.setPDSEL0(thebits : TBits_1); inline;
  32479. begin
  32480. if thebits = 0 then
  32481. pTDefRegMap(@Self)^.clr := $00000002
  32482. else
  32483. pTDefRegMap(@Self)^.&set := $00000002;
  32484. end;
  32485. function TUART1A_U1AMODE.getPDSEL0 : TBits_1; inline;
  32486. begin
  32487. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  32488. end;
  32489. procedure TUART1A_U1AMODE.setPDSEL1; inline;
  32490. begin
  32491. pTDefRegMap(@Self)^.&set := $00000004;
  32492. end;
  32493. procedure TUART1A_U1AMODE.clearPDSEL1; inline;
  32494. begin
  32495. pTDefRegMap(@Self)^.clr := $00000004;
  32496. end;
  32497. procedure TUART1A_U1AMODE.setPDSEL1(thebits : TBits_1); inline;
  32498. begin
  32499. if thebits = 0 then
  32500. pTDefRegMap(@Self)^.clr := $00000004
  32501. else
  32502. pTDefRegMap(@Self)^.&set := $00000004;
  32503. end;
  32504. function TUART1A_U1AMODE.getPDSEL1 : TBits_1; inline;
  32505. begin
  32506. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  32507. end;
  32508. procedure TUART1A_U1AMODE.setUEN0; inline;
  32509. begin
  32510. pTDefRegMap(@Self)^.&set := $00000100;
  32511. end;
  32512. procedure TUART1A_U1AMODE.clearUEN0; inline;
  32513. begin
  32514. pTDefRegMap(@Self)^.clr := $00000100;
  32515. end;
  32516. procedure TUART1A_U1AMODE.setUEN0(thebits : TBits_1); inline;
  32517. begin
  32518. if thebits = 0 then
  32519. pTDefRegMap(@Self)^.clr := $00000100
  32520. else
  32521. pTDefRegMap(@Self)^.&set := $00000100;
  32522. end;
  32523. function TUART1A_U1AMODE.getUEN0 : TBits_1; inline;
  32524. begin
  32525. getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  32526. end;
  32527. procedure TUART1A_U1AMODE.setUEN1; inline;
  32528. begin
  32529. pTDefRegMap(@Self)^.&set := $00000200;
  32530. end;
  32531. procedure TUART1A_U1AMODE.clearUEN1; inline;
  32532. begin
  32533. pTDefRegMap(@Self)^.clr := $00000200;
  32534. end;
  32535. procedure TUART1A_U1AMODE.setUEN1(thebits : TBits_1); inline;
  32536. begin
  32537. if thebits = 0 then
  32538. pTDefRegMap(@Self)^.clr := $00000200
  32539. else
  32540. pTDefRegMap(@Self)^.&set := $00000200;
  32541. end;
  32542. function TUART1A_U1AMODE.getUEN1 : TBits_1; inline;
  32543. begin
  32544. getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  32545. end;
  32546. procedure TUART1A_U1AMODE.setUSIDL; inline;
  32547. begin
  32548. pTDefRegMap(@Self)^.&set := $00002000;
  32549. end;
  32550. procedure TUART1A_U1AMODE.clearUSIDL; inline;
  32551. begin
  32552. pTDefRegMap(@Self)^.clr := $00002000;
  32553. end;
  32554. procedure TUART1A_U1AMODE.setUSIDL(thebits : TBits_1); inline;
  32555. begin
  32556. if thebits = 0 then
  32557. pTDefRegMap(@Self)^.clr := $00002000
  32558. else
  32559. pTDefRegMap(@Self)^.&set := $00002000;
  32560. end;
  32561. function TUART1A_U1AMODE.getUSIDL : TBits_1; inline;
  32562. begin
  32563. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  32564. end;
  32565. procedure TUART1A_U1AMODE.setUARTEN; inline;
  32566. begin
  32567. pTDefRegMap(@Self)^.&set := $00008000;
  32568. end;
  32569. procedure TUART1A_U1AMODE.clearUARTEN; inline;
  32570. begin
  32571. pTDefRegMap(@Self)^.clr := $00008000;
  32572. end;
  32573. procedure TUART1A_U1AMODE.setUARTEN(thebits : TBits_1); inline;
  32574. begin
  32575. if thebits = 0 then
  32576. pTDefRegMap(@Self)^.clr := $00008000
  32577. else
  32578. pTDefRegMap(@Self)^.&set := $00008000;
  32579. end;
  32580. function TUART1A_U1AMODE.getUARTEN : TBits_1; inline;
  32581. begin
  32582. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  32583. end;
  32584. procedure TUART1A_U1AMODE.setw(thebits : TBits_32); inline;
  32585. begin
  32586. pTDefRegMap(@Self)^.val := thebits;
  32587. end;
  32588. function TUART1A_U1AMODE.getw : TBits_32; inline;
  32589. begin
  32590. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  32591. end;
  32592. procedure TUART1A_U1MODE.setSTSEL; inline;
  32593. begin
  32594. pTDefRegMap(@Self)^.&set := $00000001;
  32595. end;
  32596. procedure TUART1A_U1MODE.clearSTSEL; inline;
  32597. begin
  32598. pTDefRegMap(@Self)^.clr := $00000001;
  32599. end;
  32600. procedure TUART1A_U1MODE.setSTSEL(thebits : TBits_1); inline;
  32601. begin
  32602. if thebits = 0 then
  32603. pTDefRegMap(@Self)^.clr := $00000001
  32604. else
  32605. pTDefRegMap(@Self)^.&set := $00000001;
  32606. end;
  32607. function TUART1A_U1MODE.getSTSEL : TBits_1; inline;
  32608. begin
  32609. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  32610. end;
  32611. procedure TUART1A_U1MODE.setPDSEL(thebits : TBits_2); inline;
  32612. begin
  32613. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  32614. end;
  32615. function TUART1A_U1MODE.getPDSEL : TBits_2; inline;
  32616. begin
  32617. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  32618. end;
  32619. procedure TUART1A_U1MODE.setBRGH; inline;
  32620. begin
  32621. pTDefRegMap(@Self)^.&set := $00000008;
  32622. end;
  32623. procedure TUART1A_U1MODE.clearBRGH; inline;
  32624. begin
  32625. pTDefRegMap(@Self)^.clr := $00000008;
  32626. end;
  32627. procedure TUART1A_U1MODE.setBRGH(thebits : TBits_1); inline;
  32628. begin
  32629. if thebits = 0 then
  32630. pTDefRegMap(@Self)^.clr := $00000008
  32631. else
  32632. pTDefRegMap(@Self)^.&set := $00000008;
  32633. end;
  32634. function TUART1A_U1MODE.getBRGH : TBits_1; inline;
  32635. begin
  32636. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  32637. end;
  32638. procedure TUART1A_U1MODE.setRXINV; inline;
  32639. begin
  32640. pTDefRegMap(@Self)^.&set := $00000010;
  32641. end;
  32642. procedure TUART1A_U1MODE.clearRXINV; inline;
  32643. begin
  32644. pTDefRegMap(@Self)^.clr := $00000010;
  32645. end;
  32646. procedure TUART1A_U1MODE.setRXINV(thebits : TBits_1); inline;
  32647. begin
  32648. if thebits = 0 then
  32649. pTDefRegMap(@Self)^.clr := $00000010
  32650. else
  32651. pTDefRegMap(@Self)^.&set := $00000010;
  32652. end;
  32653. function TUART1A_U1MODE.getRXINV : TBits_1; inline;
  32654. begin
  32655. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  32656. end;
  32657. procedure TUART1A_U1MODE.setABAUD; inline;
  32658. begin
  32659. pTDefRegMap(@Self)^.&set := $00000020;
  32660. end;
  32661. procedure TUART1A_U1MODE.clearABAUD; inline;
  32662. begin
  32663. pTDefRegMap(@Self)^.clr := $00000020;
  32664. end;
  32665. procedure TUART1A_U1MODE.setABAUD(thebits : TBits_1); inline;
  32666. begin
  32667. if thebits = 0 then
  32668. pTDefRegMap(@Self)^.clr := $00000020
  32669. else
  32670. pTDefRegMap(@Self)^.&set := $00000020;
  32671. end;
  32672. function TUART1A_U1MODE.getABAUD : TBits_1; inline;
  32673. begin
  32674. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  32675. end;
  32676. procedure TUART1A_U1MODE.setLPBACK; inline;
  32677. begin
  32678. pTDefRegMap(@Self)^.&set := $00000040;
  32679. end;
  32680. procedure TUART1A_U1MODE.clearLPBACK; inline;
  32681. begin
  32682. pTDefRegMap(@Self)^.clr := $00000040;
  32683. end;
  32684. procedure TUART1A_U1MODE.setLPBACK(thebits : TBits_1); inline;
  32685. begin
  32686. if thebits = 0 then
  32687. pTDefRegMap(@Self)^.clr := $00000040
  32688. else
  32689. pTDefRegMap(@Self)^.&set := $00000040;
  32690. end;
  32691. function TUART1A_U1MODE.getLPBACK : TBits_1; inline;
  32692. begin
  32693. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  32694. end;
  32695. procedure TUART1A_U1MODE.setWAKE; inline;
  32696. begin
  32697. pTDefRegMap(@Self)^.&set := $00000080;
  32698. end;
  32699. procedure TUART1A_U1MODE.clearWAKE; inline;
  32700. begin
  32701. pTDefRegMap(@Self)^.clr := $00000080;
  32702. end;
  32703. procedure TUART1A_U1MODE.setWAKE(thebits : TBits_1); inline;
  32704. begin
  32705. if thebits = 0 then
  32706. pTDefRegMap(@Self)^.clr := $00000080
  32707. else
  32708. pTDefRegMap(@Self)^.&set := $00000080;
  32709. end;
  32710. function TUART1A_U1MODE.getWAKE : TBits_1; inline;
  32711. begin
  32712. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  32713. end;
  32714. procedure TUART1A_U1MODE.setUEN(thebits : TBits_2); inline;
  32715. begin
  32716. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  32717. end;
  32718. function TUART1A_U1MODE.getUEN : TBits_2; inline;
  32719. begin
  32720. getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  32721. end;
  32722. procedure TUART1A_U1MODE.setRTSMD; inline;
  32723. begin
  32724. pTDefRegMap(@Self)^.&set := $00000800;
  32725. end;
  32726. procedure TUART1A_U1MODE.clearRTSMD; inline;
  32727. begin
  32728. pTDefRegMap(@Self)^.clr := $00000800;
  32729. end;
  32730. procedure TUART1A_U1MODE.setRTSMD(thebits : TBits_1); inline;
  32731. begin
  32732. if thebits = 0 then
  32733. pTDefRegMap(@Self)^.clr := $00000800
  32734. else
  32735. pTDefRegMap(@Self)^.&set := $00000800;
  32736. end;
  32737. function TUART1A_U1MODE.getRTSMD : TBits_1; inline;
  32738. begin
  32739. getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  32740. end;
  32741. procedure TUART1A_U1MODE.setIREN; inline;
  32742. begin
  32743. pTDefRegMap(@Self)^.&set := $00001000;
  32744. end;
  32745. procedure TUART1A_U1MODE.clearIREN; inline;
  32746. begin
  32747. pTDefRegMap(@Self)^.clr := $00001000;
  32748. end;
  32749. procedure TUART1A_U1MODE.setIREN(thebits : TBits_1); inline;
  32750. begin
  32751. if thebits = 0 then
  32752. pTDefRegMap(@Self)^.clr := $00001000
  32753. else
  32754. pTDefRegMap(@Self)^.&set := $00001000;
  32755. end;
  32756. function TUART1A_U1MODE.getIREN : TBits_1; inline;
  32757. begin
  32758. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  32759. end;
  32760. procedure TUART1A_U1MODE.setSIDL; inline;
  32761. begin
  32762. pTDefRegMap(@Self)^.&set := $00002000;
  32763. end;
  32764. procedure TUART1A_U1MODE.clearSIDL; inline;
  32765. begin
  32766. pTDefRegMap(@Self)^.clr := $00002000;
  32767. end;
  32768. procedure TUART1A_U1MODE.setSIDL(thebits : TBits_1); inline;
  32769. begin
  32770. if thebits = 0 then
  32771. pTDefRegMap(@Self)^.clr := $00002000
  32772. else
  32773. pTDefRegMap(@Self)^.&set := $00002000;
  32774. end;
  32775. function TUART1A_U1MODE.getSIDL : TBits_1; inline;
  32776. begin
  32777. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  32778. end;
  32779. procedure TUART1A_U1MODE.setON; inline;
  32780. begin
  32781. pTDefRegMap(@Self)^.&set := $00008000;
  32782. end;
  32783. procedure TUART1A_U1MODE.clearON; inline;
  32784. begin
  32785. pTDefRegMap(@Self)^.clr := $00008000;
  32786. end;
  32787. procedure TUART1A_U1MODE.setON(thebits : TBits_1); inline;
  32788. begin
  32789. if thebits = 0 then
  32790. pTDefRegMap(@Self)^.clr := $00008000
  32791. else
  32792. pTDefRegMap(@Self)^.&set := $00008000;
  32793. end;
  32794. function TUART1A_U1MODE.getON : TBits_1; inline;
  32795. begin
  32796. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  32797. end;
  32798. procedure TUART1A_U1MODE.setPDSEL0; inline;
  32799. begin
  32800. pTDefRegMap(@Self)^.&set := $00000002;
  32801. end;
  32802. procedure TUART1A_U1MODE.clearPDSEL0; inline;
  32803. begin
  32804. pTDefRegMap(@Self)^.clr := $00000002;
  32805. end;
  32806. procedure TUART1A_U1MODE.setPDSEL0(thebits : TBits_1); inline;
  32807. begin
  32808. if thebits = 0 then
  32809. pTDefRegMap(@Self)^.clr := $00000002
  32810. else
  32811. pTDefRegMap(@Self)^.&set := $00000002;
  32812. end;
  32813. function TUART1A_U1MODE.getPDSEL0 : TBits_1; inline;
  32814. begin
  32815. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  32816. end;
  32817. procedure TUART1A_U1MODE.setPDSEL1; inline;
  32818. begin
  32819. pTDefRegMap(@Self)^.&set := $00000004;
  32820. end;
  32821. procedure TUART1A_U1MODE.clearPDSEL1; inline;
  32822. begin
  32823. pTDefRegMap(@Self)^.clr := $00000004;
  32824. end;
  32825. procedure TUART1A_U1MODE.setPDSEL1(thebits : TBits_1); inline;
  32826. begin
  32827. if thebits = 0 then
  32828. pTDefRegMap(@Self)^.clr := $00000004
  32829. else
  32830. pTDefRegMap(@Self)^.&set := $00000004;
  32831. end;
  32832. function TUART1A_U1MODE.getPDSEL1 : TBits_1; inline;
  32833. begin
  32834. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  32835. end;
  32836. procedure TUART1A_U1MODE.setUEN0; inline;
  32837. begin
  32838. pTDefRegMap(@Self)^.&set := $00000100;
  32839. end;
  32840. procedure TUART1A_U1MODE.clearUEN0; inline;
  32841. begin
  32842. pTDefRegMap(@Self)^.clr := $00000100;
  32843. end;
  32844. procedure TUART1A_U1MODE.setUEN0(thebits : TBits_1); inline;
  32845. begin
  32846. if thebits = 0 then
  32847. pTDefRegMap(@Self)^.clr := $00000100
  32848. else
  32849. pTDefRegMap(@Self)^.&set := $00000100;
  32850. end;
  32851. function TUART1A_U1MODE.getUEN0 : TBits_1; inline;
  32852. begin
  32853. getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  32854. end;
  32855. procedure TUART1A_U1MODE.setUEN1; inline;
  32856. begin
  32857. pTDefRegMap(@Self)^.&set := $00000200;
  32858. end;
  32859. procedure TUART1A_U1MODE.clearUEN1; inline;
  32860. begin
  32861. pTDefRegMap(@Self)^.clr := $00000200;
  32862. end;
  32863. procedure TUART1A_U1MODE.setUEN1(thebits : TBits_1); inline;
  32864. begin
  32865. if thebits = 0 then
  32866. pTDefRegMap(@Self)^.clr := $00000200
  32867. else
  32868. pTDefRegMap(@Self)^.&set := $00000200;
  32869. end;
  32870. function TUART1A_U1MODE.getUEN1 : TBits_1; inline;
  32871. begin
  32872. getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  32873. end;
  32874. procedure TUART1A_U1MODE.setUSIDL; inline;
  32875. begin
  32876. pTDefRegMap(@Self)^.&set := $00002000;
  32877. end;
  32878. procedure TUART1A_U1MODE.clearUSIDL; inline;
  32879. begin
  32880. pTDefRegMap(@Self)^.clr := $00002000;
  32881. end;
  32882. procedure TUART1A_U1MODE.setUSIDL(thebits : TBits_1); inline;
  32883. begin
  32884. if thebits = 0 then
  32885. pTDefRegMap(@Self)^.clr := $00002000
  32886. else
  32887. pTDefRegMap(@Self)^.&set := $00002000;
  32888. end;
  32889. function TUART1A_U1MODE.getUSIDL : TBits_1; inline;
  32890. begin
  32891. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  32892. end;
  32893. procedure TUART1A_U1MODE.setUARTEN; inline;
  32894. begin
  32895. pTDefRegMap(@Self)^.&set := $00008000;
  32896. end;
  32897. procedure TUART1A_U1MODE.clearUARTEN; inline;
  32898. begin
  32899. pTDefRegMap(@Self)^.clr := $00008000;
  32900. end;
  32901. procedure TUART1A_U1MODE.setUARTEN(thebits : TBits_1); inline;
  32902. begin
  32903. if thebits = 0 then
  32904. pTDefRegMap(@Self)^.clr := $00008000
  32905. else
  32906. pTDefRegMap(@Self)^.&set := $00008000;
  32907. end;
  32908. function TUART1A_U1MODE.getUARTEN : TBits_1; inline;
  32909. begin
  32910. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  32911. end;
  32912. procedure TUART1A_U1MODE.setw(thebits : TBits_32); inline;
  32913. begin
  32914. pTDefRegMap(@Self)^.val := thebits;
  32915. end;
  32916. function TUART1A_U1MODE.getw : TBits_32; inline;
  32917. begin
  32918. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  32919. end;
  32920. procedure TUART1A_U1ASTA.setURXDA; inline;
  32921. begin
  32922. pTDefRegMap(@Self)^.&set := $00000001;
  32923. end;
  32924. procedure TUART1A_U1ASTA.clearURXDA; inline;
  32925. begin
  32926. pTDefRegMap(@Self)^.clr := $00000001;
  32927. end;
  32928. procedure TUART1A_U1ASTA.setURXDA(thebits : TBits_1); inline;
  32929. begin
  32930. if thebits = 0 then
  32931. pTDefRegMap(@Self)^.clr := $00000001
  32932. else
  32933. pTDefRegMap(@Self)^.&set := $00000001;
  32934. end;
  32935. function TUART1A_U1ASTA.getURXDA : TBits_1; inline;
  32936. begin
  32937. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  32938. end;
  32939. procedure TUART1A_U1ASTA.setOERR; inline;
  32940. begin
  32941. pTDefRegMap(@Self)^.&set := $00000002;
  32942. end;
  32943. procedure TUART1A_U1ASTA.clearOERR; inline;
  32944. begin
  32945. pTDefRegMap(@Self)^.clr := $00000002;
  32946. end;
  32947. procedure TUART1A_U1ASTA.setOERR(thebits : TBits_1); inline;
  32948. begin
  32949. if thebits = 0 then
  32950. pTDefRegMap(@Self)^.clr := $00000002
  32951. else
  32952. pTDefRegMap(@Self)^.&set := $00000002;
  32953. end;
  32954. function TUART1A_U1ASTA.getOERR : TBits_1; inline;
  32955. begin
  32956. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  32957. end;
  32958. procedure TUART1A_U1ASTA.setFERR; inline;
  32959. begin
  32960. pTDefRegMap(@Self)^.&set := $00000004;
  32961. end;
  32962. procedure TUART1A_U1ASTA.clearFERR; inline;
  32963. begin
  32964. pTDefRegMap(@Self)^.clr := $00000004;
  32965. end;
  32966. procedure TUART1A_U1ASTA.setFERR(thebits : TBits_1); inline;
  32967. begin
  32968. if thebits = 0 then
  32969. pTDefRegMap(@Self)^.clr := $00000004
  32970. else
  32971. pTDefRegMap(@Self)^.&set := $00000004;
  32972. end;
  32973. function TUART1A_U1ASTA.getFERR : TBits_1; inline;
  32974. begin
  32975. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  32976. end;
  32977. procedure TUART1A_U1ASTA.setPERR; inline;
  32978. begin
  32979. pTDefRegMap(@Self)^.&set := $00000008;
  32980. end;
  32981. procedure TUART1A_U1ASTA.clearPERR; inline;
  32982. begin
  32983. pTDefRegMap(@Self)^.clr := $00000008;
  32984. end;
  32985. procedure TUART1A_U1ASTA.setPERR(thebits : TBits_1); inline;
  32986. begin
  32987. if thebits = 0 then
  32988. pTDefRegMap(@Self)^.clr := $00000008
  32989. else
  32990. pTDefRegMap(@Self)^.&set := $00000008;
  32991. end;
  32992. function TUART1A_U1ASTA.getPERR : TBits_1; inline;
  32993. begin
  32994. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  32995. end;
  32996. procedure TUART1A_U1ASTA.setRIDLE; inline;
  32997. begin
  32998. pTDefRegMap(@Self)^.&set := $00000010;
  32999. end;
  33000. procedure TUART1A_U1ASTA.clearRIDLE; inline;
  33001. begin
  33002. pTDefRegMap(@Self)^.clr := $00000010;
  33003. end;
  33004. procedure TUART1A_U1ASTA.setRIDLE(thebits : TBits_1); inline;
  33005. begin
  33006. if thebits = 0 then
  33007. pTDefRegMap(@Self)^.clr := $00000010
  33008. else
  33009. pTDefRegMap(@Self)^.&set := $00000010;
  33010. end;
  33011. function TUART1A_U1ASTA.getRIDLE : TBits_1; inline;
  33012. begin
  33013. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  33014. end;
  33015. procedure TUART1A_U1ASTA.setADDEN; inline;
  33016. begin
  33017. pTDefRegMap(@Self)^.&set := $00000020;
  33018. end;
  33019. procedure TUART1A_U1ASTA.clearADDEN; inline;
  33020. begin
  33021. pTDefRegMap(@Self)^.clr := $00000020;
  33022. end;
  33023. procedure TUART1A_U1ASTA.setADDEN(thebits : TBits_1); inline;
  33024. begin
  33025. if thebits = 0 then
  33026. pTDefRegMap(@Self)^.clr := $00000020
  33027. else
  33028. pTDefRegMap(@Self)^.&set := $00000020;
  33029. end;
  33030. function TUART1A_U1ASTA.getADDEN : TBits_1; inline;
  33031. begin
  33032. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  33033. end;
  33034. procedure TUART1A_U1ASTA.setURXISEL(thebits : TBits_2); inline;
  33035. begin
  33036. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  33037. end;
  33038. function TUART1A_U1ASTA.getURXISEL : TBits_2; inline;
  33039. begin
  33040. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  33041. end;
  33042. procedure TUART1A_U1ASTA.setTRMT; inline;
  33043. begin
  33044. pTDefRegMap(@Self)^.&set := $00000100;
  33045. end;
  33046. procedure TUART1A_U1ASTA.clearTRMT; inline;
  33047. begin
  33048. pTDefRegMap(@Self)^.clr := $00000100;
  33049. end;
  33050. procedure TUART1A_U1ASTA.setTRMT(thebits : TBits_1); inline;
  33051. begin
  33052. if thebits = 0 then
  33053. pTDefRegMap(@Self)^.clr := $00000100
  33054. else
  33055. pTDefRegMap(@Self)^.&set := $00000100;
  33056. end;
  33057. function TUART1A_U1ASTA.getTRMT : TBits_1; inline;
  33058. begin
  33059. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  33060. end;
  33061. procedure TUART1A_U1ASTA.setUTXBF; inline;
  33062. begin
  33063. pTDefRegMap(@Self)^.&set := $00000200;
  33064. end;
  33065. procedure TUART1A_U1ASTA.clearUTXBF; inline;
  33066. begin
  33067. pTDefRegMap(@Self)^.clr := $00000200;
  33068. end;
  33069. procedure TUART1A_U1ASTA.setUTXBF(thebits : TBits_1); inline;
  33070. begin
  33071. if thebits = 0 then
  33072. pTDefRegMap(@Self)^.clr := $00000200
  33073. else
  33074. pTDefRegMap(@Self)^.&set := $00000200;
  33075. end;
  33076. function TUART1A_U1ASTA.getUTXBF : TBits_1; inline;
  33077. begin
  33078. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  33079. end;
  33080. procedure TUART1A_U1ASTA.setUTXEN; inline;
  33081. begin
  33082. pTDefRegMap(@Self)^.&set := $00000400;
  33083. end;
  33084. procedure TUART1A_U1ASTA.clearUTXEN; inline;
  33085. begin
  33086. pTDefRegMap(@Self)^.clr := $00000400;
  33087. end;
  33088. procedure TUART1A_U1ASTA.setUTXEN(thebits : TBits_1); inline;
  33089. begin
  33090. if thebits = 0 then
  33091. pTDefRegMap(@Self)^.clr := $00000400
  33092. else
  33093. pTDefRegMap(@Self)^.&set := $00000400;
  33094. end;
  33095. function TUART1A_U1ASTA.getUTXEN : TBits_1; inline;
  33096. begin
  33097. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  33098. end;
  33099. procedure TUART1A_U1ASTA.setUTXBRK; inline;
  33100. begin
  33101. pTDefRegMap(@Self)^.&set := $00000800;
  33102. end;
  33103. procedure TUART1A_U1ASTA.clearUTXBRK; inline;
  33104. begin
  33105. pTDefRegMap(@Self)^.clr := $00000800;
  33106. end;
  33107. procedure TUART1A_U1ASTA.setUTXBRK(thebits : TBits_1); inline;
  33108. begin
  33109. if thebits = 0 then
  33110. pTDefRegMap(@Self)^.clr := $00000800
  33111. else
  33112. pTDefRegMap(@Self)^.&set := $00000800;
  33113. end;
  33114. function TUART1A_U1ASTA.getUTXBRK : TBits_1; inline;
  33115. begin
  33116. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  33117. end;
  33118. procedure TUART1A_U1ASTA.setURXEN; inline;
  33119. begin
  33120. pTDefRegMap(@Self)^.&set := $00001000;
  33121. end;
  33122. procedure TUART1A_U1ASTA.clearURXEN; inline;
  33123. begin
  33124. pTDefRegMap(@Self)^.clr := $00001000;
  33125. end;
  33126. procedure TUART1A_U1ASTA.setURXEN(thebits : TBits_1); inline;
  33127. begin
  33128. if thebits = 0 then
  33129. pTDefRegMap(@Self)^.clr := $00001000
  33130. else
  33131. pTDefRegMap(@Self)^.&set := $00001000;
  33132. end;
  33133. function TUART1A_U1ASTA.getURXEN : TBits_1; inline;
  33134. begin
  33135. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  33136. end;
  33137. procedure TUART1A_U1ASTA.setUTXINV; inline;
  33138. begin
  33139. pTDefRegMap(@Self)^.&set := $00002000;
  33140. end;
  33141. procedure TUART1A_U1ASTA.clearUTXINV; inline;
  33142. begin
  33143. pTDefRegMap(@Self)^.clr := $00002000;
  33144. end;
  33145. procedure TUART1A_U1ASTA.setUTXINV(thebits : TBits_1); inline;
  33146. begin
  33147. if thebits = 0 then
  33148. pTDefRegMap(@Self)^.clr := $00002000
  33149. else
  33150. pTDefRegMap(@Self)^.&set := $00002000;
  33151. end;
  33152. function TUART1A_U1ASTA.getUTXINV : TBits_1; inline;
  33153. begin
  33154. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  33155. end;
  33156. procedure TUART1A_U1ASTA.setUTXISEL(thebits : TBits_2); inline;
  33157. begin
  33158. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  33159. end;
  33160. function TUART1A_U1ASTA.getUTXISEL : TBits_2; inline;
  33161. begin
  33162. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  33163. end;
  33164. procedure TUART1A_U1ASTA.setADDR(thebits : TBits_8); inline;
  33165. begin
  33166. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  33167. end;
  33168. function TUART1A_U1ASTA.getADDR : TBits_8; inline;
  33169. begin
  33170. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  33171. end;
  33172. procedure TUART1A_U1ASTA.setADM_EN; inline;
  33173. begin
  33174. pTDefRegMap(@Self)^.&set := $01000000;
  33175. end;
  33176. procedure TUART1A_U1ASTA.clearADM_EN; inline;
  33177. begin
  33178. pTDefRegMap(@Self)^.clr := $01000000;
  33179. end;
  33180. procedure TUART1A_U1ASTA.setADM_EN(thebits : TBits_1); inline;
  33181. begin
  33182. if thebits = 0 then
  33183. pTDefRegMap(@Self)^.clr := $01000000
  33184. else
  33185. pTDefRegMap(@Self)^.&set := $01000000;
  33186. end;
  33187. function TUART1A_U1ASTA.getADM_EN : TBits_1; inline;
  33188. begin
  33189. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  33190. end;
  33191. procedure TUART1A_U1ASTA.setURXISEL0; inline;
  33192. begin
  33193. pTDefRegMap(@Self)^.&set := $00000040;
  33194. end;
  33195. procedure TUART1A_U1ASTA.clearURXISEL0; inline;
  33196. begin
  33197. pTDefRegMap(@Self)^.clr := $00000040;
  33198. end;
  33199. procedure TUART1A_U1ASTA.setURXISEL0(thebits : TBits_1); inline;
  33200. begin
  33201. if thebits = 0 then
  33202. pTDefRegMap(@Self)^.clr := $00000040
  33203. else
  33204. pTDefRegMap(@Self)^.&set := $00000040;
  33205. end;
  33206. function TUART1A_U1ASTA.getURXISEL0 : TBits_1; inline;
  33207. begin
  33208. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  33209. end;
  33210. procedure TUART1A_U1ASTA.setURXISEL1; inline;
  33211. begin
  33212. pTDefRegMap(@Self)^.&set := $00000080;
  33213. end;
  33214. procedure TUART1A_U1ASTA.clearURXISEL1; inline;
  33215. begin
  33216. pTDefRegMap(@Self)^.clr := $00000080;
  33217. end;
  33218. procedure TUART1A_U1ASTA.setURXISEL1(thebits : TBits_1); inline;
  33219. begin
  33220. if thebits = 0 then
  33221. pTDefRegMap(@Self)^.clr := $00000080
  33222. else
  33223. pTDefRegMap(@Self)^.&set := $00000080;
  33224. end;
  33225. function TUART1A_U1ASTA.getURXISEL1 : TBits_1; inline;
  33226. begin
  33227. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  33228. end;
  33229. procedure TUART1A_U1ASTA.setUTXISEL0; inline;
  33230. begin
  33231. pTDefRegMap(@Self)^.&set := $00004000;
  33232. end;
  33233. procedure TUART1A_U1ASTA.clearUTXISEL0; inline;
  33234. begin
  33235. pTDefRegMap(@Self)^.clr := $00004000;
  33236. end;
  33237. procedure TUART1A_U1ASTA.setUTXISEL0(thebits : TBits_1); inline;
  33238. begin
  33239. if thebits = 0 then
  33240. pTDefRegMap(@Self)^.clr := $00004000
  33241. else
  33242. pTDefRegMap(@Self)^.&set := $00004000;
  33243. end;
  33244. function TUART1A_U1ASTA.getUTXISEL0 : TBits_1; inline;
  33245. begin
  33246. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  33247. end;
  33248. procedure TUART1A_U1ASTA.setUTXISEL1; inline;
  33249. begin
  33250. pTDefRegMap(@Self)^.&set := $00008000;
  33251. end;
  33252. procedure TUART1A_U1ASTA.clearUTXISEL1; inline;
  33253. begin
  33254. pTDefRegMap(@Self)^.clr := $00008000;
  33255. end;
  33256. procedure TUART1A_U1ASTA.setUTXISEL1(thebits : TBits_1); inline;
  33257. begin
  33258. if thebits = 0 then
  33259. pTDefRegMap(@Self)^.clr := $00008000
  33260. else
  33261. pTDefRegMap(@Self)^.&set := $00008000;
  33262. end;
  33263. function TUART1A_U1ASTA.getUTXISEL1 : TBits_1; inline;
  33264. begin
  33265. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  33266. end;
  33267. procedure TUART1A_U1ASTA.setUTXSEL(thebits : TBits_2); inline;
  33268. begin
  33269. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  33270. end;
  33271. function TUART1A_U1ASTA.getUTXSEL : TBits_2; inline;
  33272. begin
  33273. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  33274. end;
  33275. procedure TUART1A_U1ASTA.setw(thebits : TBits_32); inline;
  33276. begin
  33277. pTDefRegMap(@Self)^.val := thebits;
  33278. end;
  33279. function TUART1A_U1ASTA.getw : TBits_32; inline;
  33280. begin
  33281. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  33282. end;
  33283. procedure TUART1A_U1STA.setURXDA; inline;
  33284. begin
  33285. pTDefRegMap(@Self)^.&set := $00000001;
  33286. end;
  33287. procedure TUART1A_U1STA.clearURXDA; inline;
  33288. begin
  33289. pTDefRegMap(@Self)^.clr := $00000001;
  33290. end;
  33291. procedure TUART1A_U1STA.setURXDA(thebits : TBits_1); inline;
  33292. begin
  33293. if thebits = 0 then
  33294. pTDefRegMap(@Self)^.clr := $00000001
  33295. else
  33296. pTDefRegMap(@Self)^.&set := $00000001;
  33297. end;
  33298. function TUART1A_U1STA.getURXDA : TBits_1; inline;
  33299. begin
  33300. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  33301. end;
  33302. procedure TUART1A_U1STA.setOERR; inline;
  33303. begin
  33304. pTDefRegMap(@Self)^.&set := $00000002;
  33305. end;
  33306. procedure TUART1A_U1STA.clearOERR; inline;
  33307. begin
  33308. pTDefRegMap(@Self)^.clr := $00000002;
  33309. end;
  33310. procedure TUART1A_U1STA.setOERR(thebits : TBits_1); inline;
  33311. begin
  33312. if thebits = 0 then
  33313. pTDefRegMap(@Self)^.clr := $00000002
  33314. else
  33315. pTDefRegMap(@Self)^.&set := $00000002;
  33316. end;
  33317. function TUART1A_U1STA.getOERR : TBits_1; inline;
  33318. begin
  33319. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  33320. end;
  33321. procedure TUART1A_U1STA.setFERR; inline;
  33322. begin
  33323. pTDefRegMap(@Self)^.&set := $00000004;
  33324. end;
  33325. procedure TUART1A_U1STA.clearFERR; inline;
  33326. begin
  33327. pTDefRegMap(@Self)^.clr := $00000004;
  33328. end;
  33329. procedure TUART1A_U1STA.setFERR(thebits : TBits_1); inline;
  33330. begin
  33331. if thebits = 0 then
  33332. pTDefRegMap(@Self)^.clr := $00000004
  33333. else
  33334. pTDefRegMap(@Self)^.&set := $00000004;
  33335. end;
  33336. function TUART1A_U1STA.getFERR : TBits_1; inline;
  33337. begin
  33338. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  33339. end;
  33340. procedure TUART1A_U1STA.setPERR; inline;
  33341. begin
  33342. pTDefRegMap(@Self)^.&set := $00000008;
  33343. end;
  33344. procedure TUART1A_U1STA.clearPERR; inline;
  33345. begin
  33346. pTDefRegMap(@Self)^.clr := $00000008;
  33347. end;
  33348. procedure TUART1A_U1STA.setPERR(thebits : TBits_1); inline;
  33349. begin
  33350. if thebits = 0 then
  33351. pTDefRegMap(@Self)^.clr := $00000008
  33352. else
  33353. pTDefRegMap(@Self)^.&set := $00000008;
  33354. end;
  33355. function TUART1A_U1STA.getPERR : TBits_1; inline;
  33356. begin
  33357. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  33358. end;
  33359. procedure TUART1A_U1STA.setRIDLE; inline;
  33360. begin
  33361. pTDefRegMap(@Self)^.&set := $00000010;
  33362. end;
  33363. procedure TUART1A_U1STA.clearRIDLE; inline;
  33364. begin
  33365. pTDefRegMap(@Self)^.clr := $00000010;
  33366. end;
  33367. procedure TUART1A_U1STA.setRIDLE(thebits : TBits_1); inline;
  33368. begin
  33369. if thebits = 0 then
  33370. pTDefRegMap(@Self)^.clr := $00000010
  33371. else
  33372. pTDefRegMap(@Self)^.&set := $00000010;
  33373. end;
  33374. function TUART1A_U1STA.getRIDLE : TBits_1; inline;
  33375. begin
  33376. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  33377. end;
  33378. procedure TUART1A_U1STA.setADDEN; inline;
  33379. begin
  33380. pTDefRegMap(@Self)^.&set := $00000020;
  33381. end;
  33382. procedure TUART1A_U1STA.clearADDEN; inline;
  33383. begin
  33384. pTDefRegMap(@Self)^.clr := $00000020;
  33385. end;
  33386. procedure TUART1A_U1STA.setADDEN(thebits : TBits_1); inline;
  33387. begin
  33388. if thebits = 0 then
  33389. pTDefRegMap(@Self)^.clr := $00000020
  33390. else
  33391. pTDefRegMap(@Self)^.&set := $00000020;
  33392. end;
  33393. function TUART1A_U1STA.getADDEN : TBits_1; inline;
  33394. begin
  33395. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  33396. end;
  33397. procedure TUART1A_U1STA.setURXISEL(thebits : TBits_2); inline;
  33398. begin
  33399. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  33400. end;
  33401. function TUART1A_U1STA.getURXISEL : TBits_2; inline;
  33402. begin
  33403. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  33404. end;
  33405. procedure TUART1A_U1STA.setTRMT; inline;
  33406. begin
  33407. pTDefRegMap(@Self)^.&set := $00000100;
  33408. end;
  33409. procedure TUART1A_U1STA.clearTRMT; inline;
  33410. begin
  33411. pTDefRegMap(@Self)^.clr := $00000100;
  33412. end;
  33413. procedure TUART1A_U1STA.setTRMT(thebits : TBits_1); inline;
  33414. begin
  33415. if thebits = 0 then
  33416. pTDefRegMap(@Self)^.clr := $00000100
  33417. else
  33418. pTDefRegMap(@Self)^.&set := $00000100;
  33419. end;
  33420. function TUART1A_U1STA.getTRMT : TBits_1; inline;
  33421. begin
  33422. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  33423. end;
  33424. procedure TUART1A_U1STA.setUTXBF; inline;
  33425. begin
  33426. pTDefRegMap(@Self)^.&set := $00000200;
  33427. end;
  33428. procedure TUART1A_U1STA.clearUTXBF; inline;
  33429. begin
  33430. pTDefRegMap(@Self)^.clr := $00000200;
  33431. end;
  33432. procedure TUART1A_U1STA.setUTXBF(thebits : TBits_1); inline;
  33433. begin
  33434. if thebits = 0 then
  33435. pTDefRegMap(@Self)^.clr := $00000200
  33436. else
  33437. pTDefRegMap(@Self)^.&set := $00000200;
  33438. end;
  33439. function TUART1A_U1STA.getUTXBF : TBits_1; inline;
  33440. begin
  33441. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  33442. end;
  33443. procedure TUART1A_U1STA.setUTXEN; inline;
  33444. begin
  33445. pTDefRegMap(@Self)^.&set := $00000400;
  33446. end;
  33447. procedure TUART1A_U1STA.clearUTXEN; inline;
  33448. begin
  33449. pTDefRegMap(@Self)^.clr := $00000400;
  33450. end;
  33451. procedure TUART1A_U1STA.setUTXEN(thebits : TBits_1); inline;
  33452. begin
  33453. if thebits = 0 then
  33454. pTDefRegMap(@Self)^.clr := $00000400
  33455. else
  33456. pTDefRegMap(@Self)^.&set := $00000400;
  33457. end;
  33458. function TUART1A_U1STA.getUTXEN : TBits_1; inline;
  33459. begin
  33460. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  33461. end;
  33462. procedure TUART1A_U1STA.setUTXBRK; inline;
  33463. begin
  33464. pTDefRegMap(@Self)^.&set := $00000800;
  33465. end;
  33466. procedure TUART1A_U1STA.clearUTXBRK; inline;
  33467. begin
  33468. pTDefRegMap(@Self)^.clr := $00000800;
  33469. end;
  33470. procedure TUART1A_U1STA.setUTXBRK(thebits : TBits_1); inline;
  33471. begin
  33472. if thebits = 0 then
  33473. pTDefRegMap(@Self)^.clr := $00000800
  33474. else
  33475. pTDefRegMap(@Self)^.&set := $00000800;
  33476. end;
  33477. function TUART1A_U1STA.getUTXBRK : TBits_1; inline;
  33478. begin
  33479. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  33480. end;
  33481. procedure TUART1A_U1STA.setURXEN; inline;
  33482. begin
  33483. pTDefRegMap(@Self)^.&set := $00001000;
  33484. end;
  33485. procedure TUART1A_U1STA.clearURXEN; inline;
  33486. begin
  33487. pTDefRegMap(@Self)^.clr := $00001000;
  33488. end;
  33489. procedure TUART1A_U1STA.setURXEN(thebits : TBits_1); inline;
  33490. begin
  33491. if thebits = 0 then
  33492. pTDefRegMap(@Self)^.clr := $00001000
  33493. else
  33494. pTDefRegMap(@Self)^.&set := $00001000;
  33495. end;
  33496. function TUART1A_U1STA.getURXEN : TBits_1; inline;
  33497. begin
  33498. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  33499. end;
  33500. procedure TUART1A_U1STA.setUTXINV; inline;
  33501. begin
  33502. pTDefRegMap(@Self)^.&set := $00002000;
  33503. end;
  33504. procedure TUART1A_U1STA.clearUTXINV; inline;
  33505. begin
  33506. pTDefRegMap(@Self)^.clr := $00002000;
  33507. end;
  33508. procedure TUART1A_U1STA.setUTXINV(thebits : TBits_1); inline;
  33509. begin
  33510. if thebits = 0 then
  33511. pTDefRegMap(@Self)^.clr := $00002000
  33512. else
  33513. pTDefRegMap(@Self)^.&set := $00002000;
  33514. end;
  33515. function TUART1A_U1STA.getUTXINV : TBits_1; inline;
  33516. begin
  33517. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  33518. end;
  33519. procedure TUART1A_U1STA.setUTXISEL(thebits : TBits_2); inline;
  33520. begin
  33521. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  33522. end;
  33523. function TUART1A_U1STA.getUTXISEL : TBits_2; inline;
  33524. begin
  33525. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  33526. end;
  33527. procedure TUART1A_U1STA.setADDR(thebits : TBits_8); inline;
  33528. begin
  33529. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  33530. end;
  33531. function TUART1A_U1STA.getADDR : TBits_8; inline;
  33532. begin
  33533. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  33534. end;
  33535. procedure TUART1A_U1STA.setADM_EN; inline;
  33536. begin
  33537. pTDefRegMap(@Self)^.&set := $01000000;
  33538. end;
  33539. procedure TUART1A_U1STA.clearADM_EN; inline;
  33540. begin
  33541. pTDefRegMap(@Self)^.clr := $01000000;
  33542. end;
  33543. procedure TUART1A_U1STA.setADM_EN(thebits : TBits_1); inline;
  33544. begin
  33545. if thebits = 0 then
  33546. pTDefRegMap(@Self)^.clr := $01000000
  33547. else
  33548. pTDefRegMap(@Self)^.&set := $01000000;
  33549. end;
  33550. function TUART1A_U1STA.getADM_EN : TBits_1; inline;
  33551. begin
  33552. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  33553. end;
  33554. procedure TUART1A_U1STA.setURXISEL0; inline;
  33555. begin
  33556. pTDefRegMap(@Self)^.&set := $00000040;
  33557. end;
  33558. procedure TUART1A_U1STA.clearURXISEL0; inline;
  33559. begin
  33560. pTDefRegMap(@Self)^.clr := $00000040;
  33561. end;
  33562. procedure TUART1A_U1STA.setURXISEL0(thebits : TBits_1); inline;
  33563. begin
  33564. if thebits = 0 then
  33565. pTDefRegMap(@Self)^.clr := $00000040
  33566. else
  33567. pTDefRegMap(@Self)^.&set := $00000040;
  33568. end;
  33569. function TUART1A_U1STA.getURXISEL0 : TBits_1; inline;
  33570. begin
  33571. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  33572. end;
  33573. procedure TUART1A_U1STA.setURXISEL1; inline;
  33574. begin
  33575. pTDefRegMap(@Self)^.&set := $00000080;
  33576. end;
  33577. procedure TUART1A_U1STA.clearURXISEL1; inline;
  33578. begin
  33579. pTDefRegMap(@Self)^.clr := $00000080;
  33580. end;
  33581. procedure TUART1A_U1STA.setURXISEL1(thebits : TBits_1); inline;
  33582. begin
  33583. if thebits = 0 then
  33584. pTDefRegMap(@Self)^.clr := $00000080
  33585. else
  33586. pTDefRegMap(@Self)^.&set := $00000080;
  33587. end;
  33588. function TUART1A_U1STA.getURXISEL1 : TBits_1; inline;
  33589. begin
  33590. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  33591. end;
  33592. procedure TUART1A_U1STA.setUTXISEL0; inline;
  33593. begin
  33594. pTDefRegMap(@Self)^.&set := $00004000;
  33595. end;
  33596. procedure TUART1A_U1STA.clearUTXISEL0; inline;
  33597. begin
  33598. pTDefRegMap(@Self)^.clr := $00004000;
  33599. end;
  33600. procedure TUART1A_U1STA.setUTXISEL0(thebits : TBits_1); inline;
  33601. begin
  33602. if thebits = 0 then
  33603. pTDefRegMap(@Self)^.clr := $00004000
  33604. else
  33605. pTDefRegMap(@Self)^.&set := $00004000;
  33606. end;
  33607. function TUART1A_U1STA.getUTXISEL0 : TBits_1; inline;
  33608. begin
  33609. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  33610. end;
  33611. procedure TUART1A_U1STA.setUTXISEL1; inline;
  33612. begin
  33613. pTDefRegMap(@Self)^.&set := $00008000;
  33614. end;
  33615. procedure TUART1A_U1STA.clearUTXISEL1; inline;
  33616. begin
  33617. pTDefRegMap(@Self)^.clr := $00008000;
  33618. end;
  33619. procedure TUART1A_U1STA.setUTXISEL1(thebits : TBits_1); inline;
  33620. begin
  33621. if thebits = 0 then
  33622. pTDefRegMap(@Self)^.clr := $00008000
  33623. else
  33624. pTDefRegMap(@Self)^.&set := $00008000;
  33625. end;
  33626. function TUART1A_U1STA.getUTXISEL1 : TBits_1; inline;
  33627. begin
  33628. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  33629. end;
  33630. procedure TUART1A_U1STA.setUTXSEL(thebits : TBits_2); inline;
  33631. begin
  33632. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  33633. end;
  33634. function TUART1A_U1STA.getUTXSEL : TBits_2; inline;
  33635. begin
  33636. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  33637. end;
  33638. procedure TUART1A_U1STA.setw(thebits : TBits_32); inline;
  33639. begin
  33640. pTDefRegMap(@Self)^.val := thebits;
  33641. end;
  33642. function TUART1A_U1STA.getw : TBits_32; inline;
  33643. begin
  33644. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  33645. end;
  33646. procedure TUART4_U1BMODE.setSTSEL; inline;
  33647. begin
  33648. pTDefRegMap(@Self)^.&set := $00000001;
  33649. end;
  33650. procedure TUART4_U1BMODE.clearSTSEL; inline;
  33651. begin
  33652. pTDefRegMap(@Self)^.clr := $00000001;
  33653. end;
  33654. procedure TUART4_U1BMODE.setSTSEL(thebits : TBits_1); inline;
  33655. begin
  33656. if thebits = 0 then
  33657. pTDefRegMap(@Self)^.clr := $00000001
  33658. else
  33659. pTDefRegMap(@Self)^.&set := $00000001;
  33660. end;
  33661. function TUART4_U1BMODE.getSTSEL : TBits_1; inline;
  33662. begin
  33663. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  33664. end;
  33665. procedure TUART4_U1BMODE.setPDSEL(thebits : TBits_2); inline;
  33666. begin
  33667. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  33668. end;
  33669. function TUART4_U1BMODE.getPDSEL : TBits_2; inline;
  33670. begin
  33671. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  33672. end;
  33673. procedure TUART4_U1BMODE.setBRGH; inline;
  33674. begin
  33675. pTDefRegMap(@Self)^.&set := $00000008;
  33676. end;
  33677. procedure TUART4_U1BMODE.clearBRGH; inline;
  33678. begin
  33679. pTDefRegMap(@Self)^.clr := $00000008;
  33680. end;
  33681. procedure TUART4_U1BMODE.setBRGH(thebits : TBits_1); inline;
  33682. begin
  33683. if thebits = 0 then
  33684. pTDefRegMap(@Self)^.clr := $00000008
  33685. else
  33686. pTDefRegMap(@Self)^.&set := $00000008;
  33687. end;
  33688. function TUART4_U1BMODE.getBRGH : TBits_1; inline;
  33689. begin
  33690. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  33691. end;
  33692. procedure TUART4_U1BMODE.setRXINV; inline;
  33693. begin
  33694. pTDefRegMap(@Self)^.&set := $00000010;
  33695. end;
  33696. procedure TUART4_U1BMODE.clearRXINV; inline;
  33697. begin
  33698. pTDefRegMap(@Self)^.clr := $00000010;
  33699. end;
  33700. procedure TUART4_U1BMODE.setRXINV(thebits : TBits_1); inline;
  33701. begin
  33702. if thebits = 0 then
  33703. pTDefRegMap(@Self)^.clr := $00000010
  33704. else
  33705. pTDefRegMap(@Self)^.&set := $00000010;
  33706. end;
  33707. function TUART4_U1BMODE.getRXINV : TBits_1; inline;
  33708. begin
  33709. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  33710. end;
  33711. procedure TUART4_U1BMODE.setABAUD; inline;
  33712. begin
  33713. pTDefRegMap(@Self)^.&set := $00000020;
  33714. end;
  33715. procedure TUART4_U1BMODE.clearABAUD; inline;
  33716. begin
  33717. pTDefRegMap(@Self)^.clr := $00000020;
  33718. end;
  33719. procedure TUART4_U1BMODE.setABAUD(thebits : TBits_1); inline;
  33720. begin
  33721. if thebits = 0 then
  33722. pTDefRegMap(@Self)^.clr := $00000020
  33723. else
  33724. pTDefRegMap(@Self)^.&set := $00000020;
  33725. end;
  33726. function TUART4_U1BMODE.getABAUD : TBits_1; inline;
  33727. begin
  33728. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  33729. end;
  33730. procedure TUART4_U1BMODE.setLPBACK; inline;
  33731. begin
  33732. pTDefRegMap(@Self)^.&set := $00000040;
  33733. end;
  33734. procedure TUART4_U1BMODE.clearLPBACK; inline;
  33735. begin
  33736. pTDefRegMap(@Self)^.clr := $00000040;
  33737. end;
  33738. procedure TUART4_U1BMODE.setLPBACK(thebits : TBits_1); inline;
  33739. begin
  33740. if thebits = 0 then
  33741. pTDefRegMap(@Self)^.clr := $00000040
  33742. else
  33743. pTDefRegMap(@Self)^.&set := $00000040;
  33744. end;
  33745. function TUART4_U1BMODE.getLPBACK : TBits_1; inline;
  33746. begin
  33747. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  33748. end;
  33749. procedure TUART4_U1BMODE.setWAKE; inline;
  33750. begin
  33751. pTDefRegMap(@Self)^.&set := $00000080;
  33752. end;
  33753. procedure TUART4_U1BMODE.clearWAKE; inline;
  33754. begin
  33755. pTDefRegMap(@Self)^.clr := $00000080;
  33756. end;
  33757. procedure TUART4_U1BMODE.setWAKE(thebits : TBits_1); inline;
  33758. begin
  33759. if thebits = 0 then
  33760. pTDefRegMap(@Self)^.clr := $00000080
  33761. else
  33762. pTDefRegMap(@Self)^.&set := $00000080;
  33763. end;
  33764. function TUART4_U1BMODE.getWAKE : TBits_1; inline;
  33765. begin
  33766. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  33767. end;
  33768. procedure TUART4_U1BMODE.setIREN; inline;
  33769. begin
  33770. pTDefRegMap(@Self)^.&set := $00001000;
  33771. end;
  33772. procedure TUART4_U1BMODE.clearIREN; inline;
  33773. begin
  33774. pTDefRegMap(@Self)^.clr := $00001000;
  33775. end;
  33776. procedure TUART4_U1BMODE.setIREN(thebits : TBits_1); inline;
  33777. begin
  33778. if thebits = 0 then
  33779. pTDefRegMap(@Self)^.clr := $00001000
  33780. else
  33781. pTDefRegMap(@Self)^.&set := $00001000;
  33782. end;
  33783. function TUART4_U1BMODE.getIREN : TBits_1; inline;
  33784. begin
  33785. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  33786. end;
  33787. procedure TUART4_U1BMODE.setSIDL; inline;
  33788. begin
  33789. pTDefRegMap(@Self)^.&set := $00002000;
  33790. end;
  33791. procedure TUART4_U1BMODE.clearSIDL; inline;
  33792. begin
  33793. pTDefRegMap(@Self)^.clr := $00002000;
  33794. end;
  33795. procedure TUART4_U1BMODE.setSIDL(thebits : TBits_1); inline;
  33796. begin
  33797. if thebits = 0 then
  33798. pTDefRegMap(@Self)^.clr := $00002000
  33799. else
  33800. pTDefRegMap(@Self)^.&set := $00002000;
  33801. end;
  33802. function TUART4_U1BMODE.getSIDL : TBits_1; inline;
  33803. begin
  33804. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  33805. end;
  33806. procedure TUART4_U1BMODE.setON; inline;
  33807. begin
  33808. pTDefRegMap(@Self)^.&set := $00008000;
  33809. end;
  33810. procedure TUART4_U1BMODE.clearON; inline;
  33811. begin
  33812. pTDefRegMap(@Self)^.clr := $00008000;
  33813. end;
  33814. procedure TUART4_U1BMODE.setON(thebits : TBits_1); inline;
  33815. begin
  33816. if thebits = 0 then
  33817. pTDefRegMap(@Self)^.clr := $00008000
  33818. else
  33819. pTDefRegMap(@Self)^.&set := $00008000;
  33820. end;
  33821. function TUART4_U1BMODE.getON : TBits_1; inline;
  33822. begin
  33823. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  33824. end;
  33825. procedure TUART4_U1BMODE.setPDSEL0; inline;
  33826. begin
  33827. pTDefRegMap(@Self)^.&set := $00000002;
  33828. end;
  33829. procedure TUART4_U1BMODE.clearPDSEL0; inline;
  33830. begin
  33831. pTDefRegMap(@Self)^.clr := $00000002;
  33832. end;
  33833. procedure TUART4_U1BMODE.setPDSEL0(thebits : TBits_1); inline;
  33834. begin
  33835. if thebits = 0 then
  33836. pTDefRegMap(@Self)^.clr := $00000002
  33837. else
  33838. pTDefRegMap(@Self)^.&set := $00000002;
  33839. end;
  33840. function TUART4_U1BMODE.getPDSEL0 : TBits_1; inline;
  33841. begin
  33842. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  33843. end;
  33844. procedure TUART4_U1BMODE.setPDSEL1; inline;
  33845. begin
  33846. pTDefRegMap(@Self)^.&set := $00000004;
  33847. end;
  33848. procedure TUART4_U1BMODE.clearPDSEL1; inline;
  33849. begin
  33850. pTDefRegMap(@Self)^.clr := $00000004;
  33851. end;
  33852. procedure TUART4_U1BMODE.setPDSEL1(thebits : TBits_1); inline;
  33853. begin
  33854. if thebits = 0 then
  33855. pTDefRegMap(@Self)^.clr := $00000004
  33856. else
  33857. pTDefRegMap(@Self)^.&set := $00000004;
  33858. end;
  33859. function TUART4_U1BMODE.getPDSEL1 : TBits_1; inline;
  33860. begin
  33861. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  33862. end;
  33863. procedure TUART4_U1BMODE.setUSIDL; inline;
  33864. begin
  33865. pTDefRegMap(@Self)^.&set := $00002000;
  33866. end;
  33867. procedure TUART4_U1BMODE.clearUSIDL; inline;
  33868. begin
  33869. pTDefRegMap(@Self)^.clr := $00002000;
  33870. end;
  33871. procedure TUART4_U1BMODE.setUSIDL(thebits : TBits_1); inline;
  33872. begin
  33873. if thebits = 0 then
  33874. pTDefRegMap(@Self)^.clr := $00002000
  33875. else
  33876. pTDefRegMap(@Self)^.&set := $00002000;
  33877. end;
  33878. function TUART4_U1BMODE.getUSIDL : TBits_1; inline;
  33879. begin
  33880. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  33881. end;
  33882. procedure TUART4_U1BMODE.setUARTEN; inline;
  33883. begin
  33884. pTDefRegMap(@Self)^.&set := $00008000;
  33885. end;
  33886. procedure TUART4_U1BMODE.clearUARTEN; inline;
  33887. begin
  33888. pTDefRegMap(@Self)^.clr := $00008000;
  33889. end;
  33890. procedure TUART4_U1BMODE.setUARTEN(thebits : TBits_1); inline;
  33891. begin
  33892. if thebits = 0 then
  33893. pTDefRegMap(@Self)^.clr := $00008000
  33894. else
  33895. pTDefRegMap(@Self)^.&set := $00008000;
  33896. end;
  33897. function TUART4_U1BMODE.getUARTEN : TBits_1; inline;
  33898. begin
  33899. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  33900. end;
  33901. procedure TUART4_U1BMODE.setw(thebits : TBits_32); inline;
  33902. begin
  33903. pTDefRegMap(@Self)^.val := thebits;
  33904. end;
  33905. function TUART4_U1BMODE.getw : TBits_32; inline;
  33906. begin
  33907. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  33908. end;
  33909. procedure TUART4_U4MODE.setSTSEL; inline;
  33910. begin
  33911. pTDefRegMap(@Self)^.&set := $00000001;
  33912. end;
  33913. procedure TUART4_U4MODE.clearSTSEL; inline;
  33914. begin
  33915. pTDefRegMap(@Self)^.clr := $00000001;
  33916. end;
  33917. procedure TUART4_U4MODE.setSTSEL(thebits : TBits_1); inline;
  33918. begin
  33919. if thebits = 0 then
  33920. pTDefRegMap(@Self)^.clr := $00000001
  33921. else
  33922. pTDefRegMap(@Self)^.&set := $00000001;
  33923. end;
  33924. function TUART4_U4MODE.getSTSEL : TBits_1; inline;
  33925. begin
  33926. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  33927. end;
  33928. procedure TUART4_U4MODE.setPDSEL(thebits : TBits_2); inline;
  33929. begin
  33930. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  33931. end;
  33932. function TUART4_U4MODE.getPDSEL : TBits_2; inline;
  33933. begin
  33934. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  33935. end;
  33936. procedure TUART4_U4MODE.setBRGH; inline;
  33937. begin
  33938. pTDefRegMap(@Self)^.&set := $00000008;
  33939. end;
  33940. procedure TUART4_U4MODE.clearBRGH; inline;
  33941. begin
  33942. pTDefRegMap(@Self)^.clr := $00000008;
  33943. end;
  33944. procedure TUART4_U4MODE.setBRGH(thebits : TBits_1); inline;
  33945. begin
  33946. if thebits = 0 then
  33947. pTDefRegMap(@Self)^.clr := $00000008
  33948. else
  33949. pTDefRegMap(@Self)^.&set := $00000008;
  33950. end;
  33951. function TUART4_U4MODE.getBRGH : TBits_1; inline;
  33952. begin
  33953. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  33954. end;
  33955. procedure TUART4_U4MODE.setRXINV; inline;
  33956. begin
  33957. pTDefRegMap(@Self)^.&set := $00000010;
  33958. end;
  33959. procedure TUART4_U4MODE.clearRXINV; inline;
  33960. begin
  33961. pTDefRegMap(@Self)^.clr := $00000010;
  33962. end;
  33963. procedure TUART4_U4MODE.setRXINV(thebits : TBits_1); inline;
  33964. begin
  33965. if thebits = 0 then
  33966. pTDefRegMap(@Self)^.clr := $00000010
  33967. else
  33968. pTDefRegMap(@Self)^.&set := $00000010;
  33969. end;
  33970. function TUART4_U4MODE.getRXINV : TBits_1; inline;
  33971. begin
  33972. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  33973. end;
  33974. procedure TUART4_U4MODE.setABAUD; inline;
  33975. begin
  33976. pTDefRegMap(@Self)^.&set := $00000020;
  33977. end;
  33978. procedure TUART4_U4MODE.clearABAUD; inline;
  33979. begin
  33980. pTDefRegMap(@Self)^.clr := $00000020;
  33981. end;
  33982. procedure TUART4_U4MODE.setABAUD(thebits : TBits_1); inline;
  33983. begin
  33984. if thebits = 0 then
  33985. pTDefRegMap(@Self)^.clr := $00000020
  33986. else
  33987. pTDefRegMap(@Self)^.&set := $00000020;
  33988. end;
  33989. function TUART4_U4MODE.getABAUD : TBits_1; inline;
  33990. begin
  33991. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  33992. end;
  33993. procedure TUART4_U4MODE.setLPBACK; inline;
  33994. begin
  33995. pTDefRegMap(@Self)^.&set := $00000040;
  33996. end;
  33997. procedure TUART4_U4MODE.clearLPBACK; inline;
  33998. begin
  33999. pTDefRegMap(@Self)^.clr := $00000040;
  34000. end;
  34001. procedure TUART4_U4MODE.setLPBACK(thebits : TBits_1); inline;
  34002. begin
  34003. if thebits = 0 then
  34004. pTDefRegMap(@Self)^.clr := $00000040
  34005. else
  34006. pTDefRegMap(@Self)^.&set := $00000040;
  34007. end;
  34008. function TUART4_U4MODE.getLPBACK : TBits_1; inline;
  34009. begin
  34010. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  34011. end;
  34012. procedure TUART4_U4MODE.setWAKE; inline;
  34013. begin
  34014. pTDefRegMap(@Self)^.&set := $00000080;
  34015. end;
  34016. procedure TUART4_U4MODE.clearWAKE; inline;
  34017. begin
  34018. pTDefRegMap(@Self)^.clr := $00000080;
  34019. end;
  34020. procedure TUART4_U4MODE.setWAKE(thebits : TBits_1); inline;
  34021. begin
  34022. if thebits = 0 then
  34023. pTDefRegMap(@Self)^.clr := $00000080
  34024. else
  34025. pTDefRegMap(@Self)^.&set := $00000080;
  34026. end;
  34027. function TUART4_U4MODE.getWAKE : TBits_1; inline;
  34028. begin
  34029. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  34030. end;
  34031. procedure TUART4_U4MODE.setIREN; inline;
  34032. begin
  34033. pTDefRegMap(@Self)^.&set := $00001000;
  34034. end;
  34035. procedure TUART4_U4MODE.clearIREN; inline;
  34036. begin
  34037. pTDefRegMap(@Self)^.clr := $00001000;
  34038. end;
  34039. procedure TUART4_U4MODE.setIREN(thebits : TBits_1); inline;
  34040. begin
  34041. if thebits = 0 then
  34042. pTDefRegMap(@Self)^.clr := $00001000
  34043. else
  34044. pTDefRegMap(@Self)^.&set := $00001000;
  34045. end;
  34046. function TUART4_U4MODE.getIREN : TBits_1; inline;
  34047. begin
  34048. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  34049. end;
  34050. procedure TUART4_U4MODE.setSIDL; inline;
  34051. begin
  34052. pTDefRegMap(@Self)^.&set := $00002000;
  34053. end;
  34054. procedure TUART4_U4MODE.clearSIDL; inline;
  34055. begin
  34056. pTDefRegMap(@Self)^.clr := $00002000;
  34057. end;
  34058. procedure TUART4_U4MODE.setSIDL(thebits : TBits_1); inline;
  34059. begin
  34060. if thebits = 0 then
  34061. pTDefRegMap(@Self)^.clr := $00002000
  34062. else
  34063. pTDefRegMap(@Self)^.&set := $00002000;
  34064. end;
  34065. function TUART4_U4MODE.getSIDL : TBits_1; inline;
  34066. begin
  34067. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  34068. end;
  34069. procedure TUART4_U4MODE.setON; inline;
  34070. begin
  34071. pTDefRegMap(@Self)^.&set := $00008000;
  34072. end;
  34073. procedure TUART4_U4MODE.clearON; inline;
  34074. begin
  34075. pTDefRegMap(@Self)^.clr := $00008000;
  34076. end;
  34077. procedure TUART4_U4MODE.setON(thebits : TBits_1); inline;
  34078. begin
  34079. if thebits = 0 then
  34080. pTDefRegMap(@Self)^.clr := $00008000
  34081. else
  34082. pTDefRegMap(@Self)^.&set := $00008000;
  34083. end;
  34084. function TUART4_U4MODE.getON : TBits_1; inline;
  34085. begin
  34086. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  34087. end;
  34088. procedure TUART4_U4MODE.setPDSEL0; inline;
  34089. begin
  34090. pTDefRegMap(@Self)^.&set := $00000002;
  34091. end;
  34092. procedure TUART4_U4MODE.clearPDSEL0; inline;
  34093. begin
  34094. pTDefRegMap(@Self)^.clr := $00000002;
  34095. end;
  34096. procedure TUART4_U4MODE.setPDSEL0(thebits : TBits_1); inline;
  34097. begin
  34098. if thebits = 0 then
  34099. pTDefRegMap(@Self)^.clr := $00000002
  34100. else
  34101. pTDefRegMap(@Self)^.&set := $00000002;
  34102. end;
  34103. function TUART4_U4MODE.getPDSEL0 : TBits_1; inline;
  34104. begin
  34105. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  34106. end;
  34107. procedure TUART4_U4MODE.setPDSEL1; inline;
  34108. begin
  34109. pTDefRegMap(@Self)^.&set := $00000004;
  34110. end;
  34111. procedure TUART4_U4MODE.clearPDSEL1; inline;
  34112. begin
  34113. pTDefRegMap(@Self)^.clr := $00000004;
  34114. end;
  34115. procedure TUART4_U4MODE.setPDSEL1(thebits : TBits_1); inline;
  34116. begin
  34117. if thebits = 0 then
  34118. pTDefRegMap(@Self)^.clr := $00000004
  34119. else
  34120. pTDefRegMap(@Self)^.&set := $00000004;
  34121. end;
  34122. function TUART4_U4MODE.getPDSEL1 : TBits_1; inline;
  34123. begin
  34124. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  34125. end;
  34126. procedure TUART4_U4MODE.setUSIDL; inline;
  34127. begin
  34128. pTDefRegMap(@Self)^.&set := $00002000;
  34129. end;
  34130. procedure TUART4_U4MODE.clearUSIDL; inline;
  34131. begin
  34132. pTDefRegMap(@Self)^.clr := $00002000;
  34133. end;
  34134. procedure TUART4_U4MODE.setUSIDL(thebits : TBits_1); inline;
  34135. begin
  34136. if thebits = 0 then
  34137. pTDefRegMap(@Self)^.clr := $00002000
  34138. else
  34139. pTDefRegMap(@Self)^.&set := $00002000;
  34140. end;
  34141. function TUART4_U4MODE.getUSIDL : TBits_1; inline;
  34142. begin
  34143. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  34144. end;
  34145. procedure TUART4_U4MODE.setUARTEN; inline;
  34146. begin
  34147. pTDefRegMap(@Self)^.&set := $00008000;
  34148. end;
  34149. procedure TUART4_U4MODE.clearUARTEN; inline;
  34150. begin
  34151. pTDefRegMap(@Self)^.clr := $00008000;
  34152. end;
  34153. procedure TUART4_U4MODE.setUARTEN(thebits : TBits_1); inline;
  34154. begin
  34155. if thebits = 0 then
  34156. pTDefRegMap(@Self)^.clr := $00008000
  34157. else
  34158. pTDefRegMap(@Self)^.&set := $00008000;
  34159. end;
  34160. function TUART4_U4MODE.getUARTEN : TBits_1; inline;
  34161. begin
  34162. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  34163. end;
  34164. procedure TUART4_U4MODE.setw(thebits : TBits_32); inline;
  34165. begin
  34166. pTDefRegMap(@Self)^.val := thebits;
  34167. end;
  34168. function TUART4_U4MODE.getw : TBits_32; inline;
  34169. begin
  34170. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  34171. end;
  34172. procedure TUART4_U1BSTA.setURXDA; inline;
  34173. begin
  34174. pTDefRegMap(@Self)^.&set := $00000001;
  34175. end;
  34176. procedure TUART4_U1BSTA.clearURXDA; inline;
  34177. begin
  34178. pTDefRegMap(@Self)^.clr := $00000001;
  34179. end;
  34180. procedure TUART4_U1BSTA.setURXDA(thebits : TBits_1); inline;
  34181. begin
  34182. if thebits = 0 then
  34183. pTDefRegMap(@Self)^.clr := $00000001
  34184. else
  34185. pTDefRegMap(@Self)^.&set := $00000001;
  34186. end;
  34187. function TUART4_U1BSTA.getURXDA : TBits_1; inline;
  34188. begin
  34189. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  34190. end;
  34191. procedure TUART4_U1BSTA.setOERR; inline;
  34192. begin
  34193. pTDefRegMap(@Self)^.&set := $00000002;
  34194. end;
  34195. procedure TUART4_U1BSTA.clearOERR; inline;
  34196. begin
  34197. pTDefRegMap(@Self)^.clr := $00000002;
  34198. end;
  34199. procedure TUART4_U1BSTA.setOERR(thebits : TBits_1); inline;
  34200. begin
  34201. if thebits = 0 then
  34202. pTDefRegMap(@Self)^.clr := $00000002
  34203. else
  34204. pTDefRegMap(@Self)^.&set := $00000002;
  34205. end;
  34206. function TUART4_U1BSTA.getOERR : TBits_1; inline;
  34207. begin
  34208. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  34209. end;
  34210. procedure TUART4_U1BSTA.setFERR; inline;
  34211. begin
  34212. pTDefRegMap(@Self)^.&set := $00000004;
  34213. end;
  34214. procedure TUART4_U1BSTA.clearFERR; inline;
  34215. begin
  34216. pTDefRegMap(@Self)^.clr := $00000004;
  34217. end;
  34218. procedure TUART4_U1BSTA.setFERR(thebits : TBits_1); inline;
  34219. begin
  34220. if thebits = 0 then
  34221. pTDefRegMap(@Self)^.clr := $00000004
  34222. else
  34223. pTDefRegMap(@Self)^.&set := $00000004;
  34224. end;
  34225. function TUART4_U1BSTA.getFERR : TBits_1; inline;
  34226. begin
  34227. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  34228. end;
  34229. procedure TUART4_U1BSTA.setPERR; inline;
  34230. begin
  34231. pTDefRegMap(@Self)^.&set := $00000008;
  34232. end;
  34233. procedure TUART4_U1BSTA.clearPERR; inline;
  34234. begin
  34235. pTDefRegMap(@Self)^.clr := $00000008;
  34236. end;
  34237. procedure TUART4_U1BSTA.setPERR(thebits : TBits_1); inline;
  34238. begin
  34239. if thebits = 0 then
  34240. pTDefRegMap(@Self)^.clr := $00000008
  34241. else
  34242. pTDefRegMap(@Self)^.&set := $00000008;
  34243. end;
  34244. function TUART4_U1BSTA.getPERR : TBits_1; inline;
  34245. begin
  34246. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  34247. end;
  34248. procedure TUART4_U1BSTA.setRIDLE; inline;
  34249. begin
  34250. pTDefRegMap(@Self)^.&set := $00000010;
  34251. end;
  34252. procedure TUART4_U1BSTA.clearRIDLE; inline;
  34253. begin
  34254. pTDefRegMap(@Self)^.clr := $00000010;
  34255. end;
  34256. procedure TUART4_U1BSTA.setRIDLE(thebits : TBits_1); inline;
  34257. begin
  34258. if thebits = 0 then
  34259. pTDefRegMap(@Self)^.clr := $00000010
  34260. else
  34261. pTDefRegMap(@Self)^.&set := $00000010;
  34262. end;
  34263. function TUART4_U1BSTA.getRIDLE : TBits_1; inline;
  34264. begin
  34265. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  34266. end;
  34267. procedure TUART4_U1BSTA.setADDEN; inline;
  34268. begin
  34269. pTDefRegMap(@Self)^.&set := $00000020;
  34270. end;
  34271. procedure TUART4_U1BSTA.clearADDEN; inline;
  34272. begin
  34273. pTDefRegMap(@Self)^.clr := $00000020;
  34274. end;
  34275. procedure TUART4_U1BSTA.setADDEN(thebits : TBits_1); inline;
  34276. begin
  34277. if thebits = 0 then
  34278. pTDefRegMap(@Self)^.clr := $00000020
  34279. else
  34280. pTDefRegMap(@Self)^.&set := $00000020;
  34281. end;
  34282. function TUART4_U1BSTA.getADDEN : TBits_1; inline;
  34283. begin
  34284. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  34285. end;
  34286. procedure TUART4_U1BSTA.setURXISEL(thebits : TBits_2); inline;
  34287. begin
  34288. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  34289. end;
  34290. function TUART4_U1BSTA.getURXISEL : TBits_2; inline;
  34291. begin
  34292. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  34293. end;
  34294. procedure TUART4_U1BSTA.setTRMT; inline;
  34295. begin
  34296. pTDefRegMap(@Self)^.&set := $00000100;
  34297. end;
  34298. procedure TUART4_U1BSTA.clearTRMT; inline;
  34299. begin
  34300. pTDefRegMap(@Self)^.clr := $00000100;
  34301. end;
  34302. procedure TUART4_U1BSTA.setTRMT(thebits : TBits_1); inline;
  34303. begin
  34304. if thebits = 0 then
  34305. pTDefRegMap(@Self)^.clr := $00000100
  34306. else
  34307. pTDefRegMap(@Self)^.&set := $00000100;
  34308. end;
  34309. function TUART4_U1BSTA.getTRMT : TBits_1; inline;
  34310. begin
  34311. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  34312. end;
  34313. procedure TUART4_U1BSTA.setUTXBF; inline;
  34314. begin
  34315. pTDefRegMap(@Self)^.&set := $00000200;
  34316. end;
  34317. procedure TUART4_U1BSTA.clearUTXBF; inline;
  34318. begin
  34319. pTDefRegMap(@Self)^.clr := $00000200;
  34320. end;
  34321. procedure TUART4_U1BSTA.setUTXBF(thebits : TBits_1); inline;
  34322. begin
  34323. if thebits = 0 then
  34324. pTDefRegMap(@Self)^.clr := $00000200
  34325. else
  34326. pTDefRegMap(@Self)^.&set := $00000200;
  34327. end;
  34328. function TUART4_U1BSTA.getUTXBF : TBits_1; inline;
  34329. begin
  34330. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  34331. end;
  34332. procedure TUART4_U1BSTA.setUTXEN; inline;
  34333. begin
  34334. pTDefRegMap(@Self)^.&set := $00000400;
  34335. end;
  34336. procedure TUART4_U1BSTA.clearUTXEN; inline;
  34337. begin
  34338. pTDefRegMap(@Self)^.clr := $00000400;
  34339. end;
  34340. procedure TUART4_U1BSTA.setUTXEN(thebits : TBits_1); inline;
  34341. begin
  34342. if thebits = 0 then
  34343. pTDefRegMap(@Self)^.clr := $00000400
  34344. else
  34345. pTDefRegMap(@Self)^.&set := $00000400;
  34346. end;
  34347. function TUART4_U1BSTA.getUTXEN : TBits_1; inline;
  34348. begin
  34349. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  34350. end;
  34351. procedure TUART4_U1BSTA.setUTXBRK; inline;
  34352. begin
  34353. pTDefRegMap(@Self)^.&set := $00000800;
  34354. end;
  34355. procedure TUART4_U1BSTA.clearUTXBRK; inline;
  34356. begin
  34357. pTDefRegMap(@Self)^.clr := $00000800;
  34358. end;
  34359. procedure TUART4_U1BSTA.setUTXBRK(thebits : TBits_1); inline;
  34360. begin
  34361. if thebits = 0 then
  34362. pTDefRegMap(@Self)^.clr := $00000800
  34363. else
  34364. pTDefRegMap(@Self)^.&set := $00000800;
  34365. end;
  34366. function TUART4_U1BSTA.getUTXBRK : TBits_1; inline;
  34367. begin
  34368. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  34369. end;
  34370. procedure TUART4_U1BSTA.setURXEN; inline;
  34371. begin
  34372. pTDefRegMap(@Self)^.&set := $00001000;
  34373. end;
  34374. procedure TUART4_U1BSTA.clearURXEN; inline;
  34375. begin
  34376. pTDefRegMap(@Self)^.clr := $00001000;
  34377. end;
  34378. procedure TUART4_U1BSTA.setURXEN(thebits : TBits_1); inline;
  34379. begin
  34380. if thebits = 0 then
  34381. pTDefRegMap(@Self)^.clr := $00001000
  34382. else
  34383. pTDefRegMap(@Self)^.&set := $00001000;
  34384. end;
  34385. function TUART4_U1BSTA.getURXEN : TBits_1; inline;
  34386. begin
  34387. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  34388. end;
  34389. procedure TUART4_U1BSTA.setUTXINV; inline;
  34390. begin
  34391. pTDefRegMap(@Self)^.&set := $00002000;
  34392. end;
  34393. procedure TUART4_U1BSTA.clearUTXINV; inline;
  34394. begin
  34395. pTDefRegMap(@Self)^.clr := $00002000;
  34396. end;
  34397. procedure TUART4_U1BSTA.setUTXINV(thebits : TBits_1); inline;
  34398. begin
  34399. if thebits = 0 then
  34400. pTDefRegMap(@Self)^.clr := $00002000
  34401. else
  34402. pTDefRegMap(@Self)^.&set := $00002000;
  34403. end;
  34404. function TUART4_U1BSTA.getUTXINV : TBits_1; inline;
  34405. begin
  34406. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  34407. end;
  34408. procedure TUART4_U1BSTA.setUTXISEL(thebits : TBits_2); inline;
  34409. begin
  34410. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  34411. end;
  34412. function TUART4_U1BSTA.getUTXISEL : TBits_2; inline;
  34413. begin
  34414. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  34415. end;
  34416. procedure TUART4_U1BSTA.setADDR(thebits : TBits_8); inline;
  34417. begin
  34418. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  34419. end;
  34420. function TUART4_U1BSTA.getADDR : TBits_8; inline;
  34421. begin
  34422. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  34423. end;
  34424. procedure TUART4_U1BSTA.setADM_EN; inline;
  34425. begin
  34426. pTDefRegMap(@Self)^.&set := $01000000;
  34427. end;
  34428. procedure TUART4_U1BSTA.clearADM_EN; inline;
  34429. begin
  34430. pTDefRegMap(@Self)^.clr := $01000000;
  34431. end;
  34432. procedure TUART4_U1BSTA.setADM_EN(thebits : TBits_1); inline;
  34433. begin
  34434. if thebits = 0 then
  34435. pTDefRegMap(@Self)^.clr := $01000000
  34436. else
  34437. pTDefRegMap(@Self)^.&set := $01000000;
  34438. end;
  34439. function TUART4_U1BSTA.getADM_EN : TBits_1; inline;
  34440. begin
  34441. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  34442. end;
  34443. procedure TUART4_U1BSTA.setURXISEL0; inline;
  34444. begin
  34445. pTDefRegMap(@Self)^.&set := $00000040;
  34446. end;
  34447. procedure TUART4_U1BSTA.clearURXISEL0; inline;
  34448. begin
  34449. pTDefRegMap(@Self)^.clr := $00000040;
  34450. end;
  34451. procedure TUART4_U1BSTA.setURXISEL0(thebits : TBits_1); inline;
  34452. begin
  34453. if thebits = 0 then
  34454. pTDefRegMap(@Self)^.clr := $00000040
  34455. else
  34456. pTDefRegMap(@Self)^.&set := $00000040;
  34457. end;
  34458. function TUART4_U1BSTA.getURXISEL0 : TBits_1; inline;
  34459. begin
  34460. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  34461. end;
  34462. procedure TUART4_U1BSTA.setURXISEL1; inline;
  34463. begin
  34464. pTDefRegMap(@Self)^.&set := $00000080;
  34465. end;
  34466. procedure TUART4_U1BSTA.clearURXISEL1; inline;
  34467. begin
  34468. pTDefRegMap(@Self)^.clr := $00000080;
  34469. end;
  34470. procedure TUART4_U1BSTA.setURXISEL1(thebits : TBits_1); inline;
  34471. begin
  34472. if thebits = 0 then
  34473. pTDefRegMap(@Self)^.clr := $00000080
  34474. else
  34475. pTDefRegMap(@Self)^.&set := $00000080;
  34476. end;
  34477. function TUART4_U1BSTA.getURXISEL1 : TBits_1; inline;
  34478. begin
  34479. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  34480. end;
  34481. procedure TUART4_U1BSTA.setUTXISEL0; inline;
  34482. begin
  34483. pTDefRegMap(@Self)^.&set := $00004000;
  34484. end;
  34485. procedure TUART4_U1BSTA.clearUTXISEL0; inline;
  34486. begin
  34487. pTDefRegMap(@Self)^.clr := $00004000;
  34488. end;
  34489. procedure TUART4_U1BSTA.setUTXISEL0(thebits : TBits_1); inline;
  34490. begin
  34491. if thebits = 0 then
  34492. pTDefRegMap(@Self)^.clr := $00004000
  34493. else
  34494. pTDefRegMap(@Self)^.&set := $00004000;
  34495. end;
  34496. function TUART4_U1BSTA.getUTXISEL0 : TBits_1; inline;
  34497. begin
  34498. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  34499. end;
  34500. procedure TUART4_U1BSTA.setUTXISEL1; inline;
  34501. begin
  34502. pTDefRegMap(@Self)^.&set := $00008000;
  34503. end;
  34504. procedure TUART4_U1BSTA.clearUTXISEL1; inline;
  34505. begin
  34506. pTDefRegMap(@Self)^.clr := $00008000;
  34507. end;
  34508. procedure TUART4_U1BSTA.setUTXISEL1(thebits : TBits_1); inline;
  34509. begin
  34510. if thebits = 0 then
  34511. pTDefRegMap(@Self)^.clr := $00008000
  34512. else
  34513. pTDefRegMap(@Self)^.&set := $00008000;
  34514. end;
  34515. function TUART4_U1BSTA.getUTXISEL1 : TBits_1; inline;
  34516. begin
  34517. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  34518. end;
  34519. procedure TUART4_U1BSTA.setUTXSEL(thebits : TBits_2); inline;
  34520. begin
  34521. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  34522. end;
  34523. function TUART4_U1BSTA.getUTXSEL : TBits_2; inline;
  34524. begin
  34525. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  34526. end;
  34527. procedure TUART4_U1BSTA.setw(thebits : TBits_32); inline;
  34528. begin
  34529. pTDefRegMap(@Self)^.val := thebits;
  34530. end;
  34531. function TUART4_U1BSTA.getw : TBits_32; inline;
  34532. begin
  34533. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  34534. end;
  34535. procedure TUART4_U4STA.setURXDA; inline;
  34536. begin
  34537. pTDefRegMap(@Self)^.&set := $00000001;
  34538. end;
  34539. procedure TUART4_U4STA.clearURXDA; inline;
  34540. begin
  34541. pTDefRegMap(@Self)^.clr := $00000001;
  34542. end;
  34543. procedure TUART4_U4STA.setURXDA(thebits : TBits_1); inline;
  34544. begin
  34545. if thebits = 0 then
  34546. pTDefRegMap(@Self)^.clr := $00000001
  34547. else
  34548. pTDefRegMap(@Self)^.&set := $00000001;
  34549. end;
  34550. function TUART4_U4STA.getURXDA : TBits_1; inline;
  34551. begin
  34552. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  34553. end;
  34554. procedure TUART4_U4STA.setOERR; inline;
  34555. begin
  34556. pTDefRegMap(@Self)^.&set := $00000002;
  34557. end;
  34558. procedure TUART4_U4STA.clearOERR; inline;
  34559. begin
  34560. pTDefRegMap(@Self)^.clr := $00000002;
  34561. end;
  34562. procedure TUART4_U4STA.setOERR(thebits : TBits_1); inline;
  34563. begin
  34564. if thebits = 0 then
  34565. pTDefRegMap(@Self)^.clr := $00000002
  34566. else
  34567. pTDefRegMap(@Self)^.&set := $00000002;
  34568. end;
  34569. function TUART4_U4STA.getOERR : TBits_1; inline;
  34570. begin
  34571. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  34572. end;
  34573. procedure TUART4_U4STA.setFERR; inline;
  34574. begin
  34575. pTDefRegMap(@Self)^.&set := $00000004;
  34576. end;
  34577. procedure TUART4_U4STA.clearFERR; inline;
  34578. begin
  34579. pTDefRegMap(@Self)^.clr := $00000004;
  34580. end;
  34581. procedure TUART4_U4STA.setFERR(thebits : TBits_1); inline;
  34582. begin
  34583. if thebits = 0 then
  34584. pTDefRegMap(@Self)^.clr := $00000004
  34585. else
  34586. pTDefRegMap(@Self)^.&set := $00000004;
  34587. end;
  34588. function TUART4_U4STA.getFERR : TBits_1; inline;
  34589. begin
  34590. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  34591. end;
  34592. procedure TUART4_U4STA.setPERR; inline;
  34593. begin
  34594. pTDefRegMap(@Self)^.&set := $00000008;
  34595. end;
  34596. procedure TUART4_U4STA.clearPERR; inline;
  34597. begin
  34598. pTDefRegMap(@Self)^.clr := $00000008;
  34599. end;
  34600. procedure TUART4_U4STA.setPERR(thebits : TBits_1); inline;
  34601. begin
  34602. if thebits = 0 then
  34603. pTDefRegMap(@Self)^.clr := $00000008
  34604. else
  34605. pTDefRegMap(@Self)^.&set := $00000008;
  34606. end;
  34607. function TUART4_U4STA.getPERR : TBits_1; inline;
  34608. begin
  34609. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  34610. end;
  34611. procedure TUART4_U4STA.setRIDLE; inline;
  34612. begin
  34613. pTDefRegMap(@Self)^.&set := $00000010;
  34614. end;
  34615. procedure TUART4_U4STA.clearRIDLE; inline;
  34616. begin
  34617. pTDefRegMap(@Self)^.clr := $00000010;
  34618. end;
  34619. procedure TUART4_U4STA.setRIDLE(thebits : TBits_1); inline;
  34620. begin
  34621. if thebits = 0 then
  34622. pTDefRegMap(@Self)^.clr := $00000010
  34623. else
  34624. pTDefRegMap(@Self)^.&set := $00000010;
  34625. end;
  34626. function TUART4_U4STA.getRIDLE : TBits_1; inline;
  34627. begin
  34628. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  34629. end;
  34630. procedure TUART4_U4STA.setADDEN; inline;
  34631. begin
  34632. pTDefRegMap(@Self)^.&set := $00000020;
  34633. end;
  34634. procedure TUART4_U4STA.clearADDEN; inline;
  34635. begin
  34636. pTDefRegMap(@Self)^.clr := $00000020;
  34637. end;
  34638. procedure TUART4_U4STA.setADDEN(thebits : TBits_1); inline;
  34639. begin
  34640. if thebits = 0 then
  34641. pTDefRegMap(@Self)^.clr := $00000020
  34642. else
  34643. pTDefRegMap(@Self)^.&set := $00000020;
  34644. end;
  34645. function TUART4_U4STA.getADDEN : TBits_1; inline;
  34646. begin
  34647. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  34648. end;
  34649. procedure TUART4_U4STA.setURXISEL(thebits : TBits_2); inline;
  34650. begin
  34651. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  34652. end;
  34653. function TUART4_U4STA.getURXISEL : TBits_2; inline;
  34654. begin
  34655. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  34656. end;
  34657. procedure TUART4_U4STA.setTRMT; inline;
  34658. begin
  34659. pTDefRegMap(@Self)^.&set := $00000100;
  34660. end;
  34661. procedure TUART4_U4STA.clearTRMT; inline;
  34662. begin
  34663. pTDefRegMap(@Self)^.clr := $00000100;
  34664. end;
  34665. procedure TUART4_U4STA.setTRMT(thebits : TBits_1); inline;
  34666. begin
  34667. if thebits = 0 then
  34668. pTDefRegMap(@Self)^.clr := $00000100
  34669. else
  34670. pTDefRegMap(@Self)^.&set := $00000100;
  34671. end;
  34672. function TUART4_U4STA.getTRMT : TBits_1; inline;
  34673. begin
  34674. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  34675. end;
  34676. procedure TUART4_U4STA.setUTXBF; inline;
  34677. begin
  34678. pTDefRegMap(@Self)^.&set := $00000200;
  34679. end;
  34680. procedure TUART4_U4STA.clearUTXBF; inline;
  34681. begin
  34682. pTDefRegMap(@Self)^.clr := $00000200;
  34683. end;
  34684. procedure TUART4_U4STA.setUTXBF(thebits : TBits_1); inline;
  34685. begin
  34686. if thebits = 0 then
  34687. pTDefRegMap(@Self)^.clr := $00000200
  34688. else
  34689. pTDefRegMap(@Self)^.&set := $00000200;
  34690. end;
  34691. function TUART4_U4STA.getUTXBF : TBits_1; inline;
  34692. begin
  34693. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  34694. end;
  34695. procedure TUART4_U4STA.setUTXEN; inline;
  34696. begin
  34697. pTDefRegMap(@Self)^.&set := $00000400;
  34698. end;
  34699. procedure TUART4_U4STA.clearUTXEN; inline;
  34700. begin
  34701. pTDefRegMap(@Self)^.clr := $00000400;
  34702. end;
  34703. procedure TUART4_U4STA.setUTXEN(thebits : TBits_1); inline;
  34704. begin
  34705. if thebits = 0 then
  34706. pTDefRegMap(@Self)^.clr := $00000400
  34707. else
  34708. pTDefRegMap(@Self)^.&set := $00000400;
  34709. end;
  34710. function TUART4_U4STA.getUTXEN : TBits_1; inline;
  34711. begin
  34712. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  34713. end;
  34714. procedure TUART4_U4STA.setUTXBRK; inline;
  34715. begin
  34716. pTDefRegMap(@Self)^.&set := $00000800;
  34717. end;
  34718. procedure TUART4_U4STA.clearUTXBRK; inline;
  34719. begin
  34720. pTDefRegMap(@Self)^.clr := $00000800;
  34721. end;
  34722. procedure TUART4_U4STA.setUTXBRK(thebits : TBits_1); inline;
  34723. begin
  34724. if thebits = 0 then
  34725. pTDefRegMap(@Self)^.clr := $00000800
  34726. else
  34727. pTDefRegMap(@Self)^.&set := $00000800;
  34728. end;
  34729. function TUART4_U4STA.getUTXBRK : TBits_1; inline;
  34730. begin
  34731. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  34732. end;
  34733. procedure TUART4_U4STA.setURXEN; inline;
  34734. begin
  34735. pTDefRegMap(@Self)^.&set := $00001000;
  34736. end;
  34737. procedure TUART4_U4STA.clearURXEN; inline;
  34738. begin
  34739. pTDefRegMap(@Self)^.clr := $00001000;
  34740. end;
  34741. procedure TUART4_U4STA.setURXEN(thebits : TBits_1); inline;
  34742. begin
  34743. if thebits = 0 then
  34744. pTDefRegMap(@Self)^.clr := $00001000
  34745. else
  34746. pTDefRegMap(@Self)^.&set := $00001000;
  34747. end;
  34748. function TUART4_U4STA.getURXEN : TBits_1; inline;
  34749. begin
  34750. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  34751. end;
  34752. procedure TUART4_U4STA.setUTXINV; inline;
  34753. begin
  34754. pTDefRegMap(@Self)^.&set := $00002000;
  34755. end;
  34756. procedure TUART4_U4STA.clearUTXINV; inline;
  34757. begin
  34758. pTDefRegMap(@Self)^.clr := $00002000;
  34759. end;
  34760. procedure TUART4_U4STA.setUTXINV(thebits : TBits_1); inline;
  34761. begin
  34762. if thebits = 0 then
  34763. pTDefRegMap(@Self)^.clr := $00002000
  34764. else
  34765. pTDefRegMap(@Self)^.&set := $00002000;
  34766. end;
  34767. function TUART4_U4STA.getUTXINV : TBits_1; inline;
  34768. begin
  34769. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  34770. end;
  34771. procedure TUART4_U4STA.setUTXISEL(thebits : TBits_2); inline;
  34772. begin
  34773. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  34774. end;
  34775. function TUART4_U4STA.getUTXISEL : TBits_2; inline;
  34776. begin
  34777. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  34778. end;
  34779. procedure TUART4_U4STA.setADDR(thebits : TBits_8); inline;
  34780. begin
  34781. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  34782. end;
  34783. function TUART4_U4STA.getADDR : TBits_8; inline;
  34784. begin
  34785. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  34786. end;
  34787. procedure TUART4_U4STA.setADM_EN; inline;
  34788. begin
  34789. pTDefRegMap(@Self)^.&set := $01000000;
  34790. end;
  34791. procedure TUART4_U4STA.clearADM_EN; inline;
  34792. begin
  34793. pTDefRegMap(@Self)^.clr := $01000000;
  34794. end;
  34795. procedure TUART4_U4STA.setADM_EN(thebits : TBits_1); inline;
  34796. begin
  34797. if thebits = 0 then
  34798. pTDefRegMap(@Self)^.clr := $01000000
  34799. else
  34800. pTDefRegMap(@Self)^.&set := $01000000;
  34801. end;
  34802. function TUART4_U4STA.getADM_EN : TBits_1; inline;
  34803. begin
  34804. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  34805. end;
  34806. procedure TUART4_U4STA.setURXISEL0; inline;
  34807. begin
  34808. pTDefRegMap(@Self)^.&set := $00000040;
  34809. end;
  34810. procedure TUART4_U4STA.clearURXISEL0; inline;
  34811. begin
  34812. pTDefRegMap(@Self)^.clr := $00000040;
  34813. end;
  34814. procedure TUART4_U4STA.setURXISEL0(thebits : TBits_1); inline;
  34815. begin
  34816. if thebits = 0 then
  34817. pTDefRegMap(@Self)^.clr := $00000040
  34818. else
  34819. pTDefRegMap(@Self)^.&set := $00000040;
  34820. end;
  34821. function TUART4_U4STA.getURXISEL0 : TBits_1; inline;
  34822. begin
  34823. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  34824. end;
  34825. procedure TUART4_U4STA.setURXISEL1; inline;
  34826. begin
  34827. pTDefRegMap(@Self)^.&set := $00000080;
  34828. end;
  34829. procedure TUART4_U4STA.clearURXISEL1; inline;
  34830. begin
  34831. pTDefRegMap(@Self)^.clr := $00000080;
  34832. end;
  34833. procedure TUART4_U4STA.setURXISEL1(thebits : TBits_1); inline;
  34834. begin
  34835. if thebits = 0 then
  34836. pTDefRegMap(@Self)^.clr := $00000080
  34837. else
  34838. pTDefRegMap(@Self)^.&set := $00000080;
  34839. end;
  34840. function TUART4_U4STA.getURXISEL1 : TBits_1; inline;
  34841. begin
  34842. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  34843. end;
  34844. procedure TUART4_U4STA.setUTXISEL0; inline;
  34845. begin
  34846. pTDefRegMap(@Self)^.&set := $00004000;
  34847. end;
  34848. procedure TUART4_U4STA.clearUTXISEL0; inline;
  34849. begin
  34850. pTDefRegMap(@Self)^.clr := $00004000;
  34851. end;
  34852. procedure TUART4_U4STA.setUTXISEL0(thebits : TBits_1); inline;
  34853. begin
  34854. if thebits = 0 then
  34855. pTDefRegMap(@Self)^.clr := $00004000
  34856. else
  34857. pTDefRegMap(@Self)^.&set := $00004000;
  34858. end;
  34859. function TUART4_U4STA.getUTXISEL0 : TBits_1; inline;
  34860. begin
  34861. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  34862. end;
  34863. procedure TUART4_U4STA.setUTXISEL1; inline;
  34864. begin
  34865. pTDefRegMap(@Self)^.&set := $00008000;
  34866. end;
  34867. procedure TUART4_U4STA.clearUTXISEL1; inline;
  34868. begin
  34869. pTDefRegMap(@Self)^.clr := $00008000;
  34870. end;
  34871. procedure TUART4_U4STA.setUTXISEL1(thebits : TBits_1); inline;
  34872. begin
  34873. if thebits = 0 then
  34874. pTDefRegMap(@Self)^.clr := $00008000
  34875. else
  34876. pTDefRegMap(@Self)^.&set := $00008000;
  34877. end;
  34878. function TUART4_U4STA.getUTXISEL1 : TBits_1; inline;
  34879. begin
  34880. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  34881. end;
  34882. procedure TUART4_U4STA.setUTXSEL(thebits : TBits_2); inline;
  34883. begin
  34884. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  34885. end;
  34886. function TUART4_U4STA.getUTXSEL : TBits_2; inline;
  34887. begin
  34888. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  34889. end;
  34890. procedure TUART4_U4STA.setw(thebits : TBits_32); inline;
  34891. begin
  34892. pTDefRegMap(@Self)^.val := thebits;
  34893. end;
  34894. function TUART4_U4STA.getw : TBits_32; inline;
  34895. begin
  34896. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  34897. end;
  34898. procedure TUART2A_U2AMODE.setSTSEL; inline;
  34899. begin
  34900. pTDefRegMap(@Self)^.&set := $00000001;
  34901. end;
  34902. procedure TUART2A_U2AMODE.clearSTSEL; inline;
  34903. begin
  34904. pTDefRegMap(@Self)^.clr := $00000001;
  34905. end;
  34906. procedure TUART2A_U2AMODE.setSTSEL(thebits : TBits_1); inline;
  34907. begin
  34908. if thebits = 0 then
  34909. pTDefRegMap(@Self)^.clr := $00000001
  34910. else
  34911. pTDefRegMap(@Self)^.&set := $00000001;
  34912. end;
  34913. function TUART2A_U2AMODE.getSTSEL : TBits_1; inline;
  34914. begin
  34915. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  34916. end;
  34917. procedure TUART2A_U2AMODE.setPDSEL(thebits : TBits_2); inline;
  34918. begin
  34919. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  34920. end;
  34921. function TUART2A_U2AMODE.getPDSEL : TBits_2; inline;
  34922. begin
  34923. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  34924. end;
  34925. procedure TUART2A_U2AMODE.setBRGH; inline;
  34926. begin
  34927. pTDefRegMap(@Self)^.&set := $00000008;
  34928. end;
  34929. procedure TUART2A_U2AMODE.clearBRGH; inline;
  34930. begin
  34931. pTDefRegMap(@Self)^.clr := $00000008;
  34932. end;
  34933. procedure TUART2A_U2AMODE.setBRGH(thebits : TBits_1); inline;
  34934. begin
  34935. if thebits = 0 then
  34936. pTDefRegMap(@Self)^.clr := $00000008
  34937. else
  34938. pTDefRegMap(@Self)^.&set := $00000008;
  34939. end;
  34940. function TUART2A_U2AMODE.getBRGH : TBits_1; inline;
  34941. begin
  34942. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  34943. end;
  34944. procedure TUART2A_U2AMODE.setRXINV; inline;
  34945. begin
  34946. pTDefRegMap(@Self)^.&set := $00000010;
  34947. end;
  34948. procedure TUART2A_U2AMODE.clearRXINV; inline;
  34949. begin
  34950. pTDefRegMap(@Self)^.clr := $00000010;
  34951. end;
  34952. procedure TUART2A_U2AMODE.setRXINV(thebits : TBits_1); inline;
  34953. begin
  34954. if thebits = 0 then
  34955. pTDefRegMap(@Self)^.clr := $00000010
  34956. else
  34957. pTDefRegMap(@Self)^.&set := $00000010;
  34958. end;
  34959. function TUART2A_U2AMODE.getRXINV : TBits_1; inline;
  34960. begin
  34961. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  34962. end;
  34963. procedure TUART2A_U2AMODE.setABAUD; inline;
  34964. begin
  34965. pTDefRegMap(@Self)^.&set := $00000020;
  34966. end;
  34967. procedure TUART2A_U2AMODE.clearABAUD; inline;
  34968. begin
  34969. pTDefRegMap(@Self)^.clr := $00000020;
  34970. end;
  34971. procedure TUART2A_U2AMODE.setABAUD(thebits : TBits_1); inline;
  34972. begin
  34973. if thebits = 0 then
  34974. pTDefRegMap(@Self)^.clr := $00000020
  34975. else
  34976. pTDefRegMap(@Self)^.&set := $00000020;
  34977. end;
  34978. function TUART2A_U2AMODE.getABAUD : TBits_1; inline;
  34979. begin
  34980. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  34981. end;
  34982. procedure TUART2A_U2AMODE.setLPBACK; inline;
  34983. begin
  34984. pTDefRegMap(@Self)^.&set := $00000040;
  34985. end;
  34986. procedure TUART2A_U2AMODE.clearLPBACK; inline;
  34987. begin
  34988. pTDefRegMap(@Self)^.clr := $00000040;
  34989. end;
  34990. procedure TUART2A_U2AMODE.setLPBACK(thebits : TBits_1); inline;
  34991. begin
  34992. if thebits = 0 then
  34993. pTDefRegMap(@Self)^.clr := $00000040
  34994. else
  34995. pTDefRegMap(@Self)^.&set := $00000040;
  34996. end;
  34997. function TUART2A_U2AMODE.getLPBACK : TBits_1; inline;
  34998. begin
  34999. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  35000. end;
  35001. procedure TUART2A_U2AMODE.setWAKE; inline;
  35002. begin
  35003. pTDefRegMap(@Self)^.&set := $00000080;
  35004. end;
  35005. procedure TUART2A_U2AMODE.clearWAKE; inline;
  35006. begin
  35007. pTDefRegMap(@Self)^.clr := $00000080;
  35008. end;
  35009. procedure TUART2A_U2AMODE.setWAKE(thebits : TBits_1); inline;
  35010. begin
  35011. if thebits = 0 then
  35012. pTDefRegMap(@Self)^.clr := $00000080
  35013. else
  35014. pTDefRegMap(@Self)^.&set := $00000080;
  35015. end;
  35016. function TUART2A_U2AMODE.getWAKE : TBits_1; inline;
  35017. begin
  35018. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  35019. end;
  35020. procedure TUART2A_U2AMODE.setUEN(thebits : TBits_2); inline;
  35021. begin
  35022. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  35023. end;
  35024. function TUART2A_U2AMODE.getUEN : TBits_2; inline;
  35025. begin
  35026. getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  35027. end;
  35028. procedure TUART2A_U2AMODE.setRTSMD; inline;
  35029. begin
  35030. pTDefRegMap(@Self)^.&set := $00000800;
  35031. end;
  35032. procedure TUART2A_U2AMODE.clearRTSMD; inline;
  35033. begin
  35034. pTDefRegMap(@Self)^.clr := $00000800;
  35035. end;
  35036. procedure TUART2A_U2AMODE.setRTSMD(thebits : TBits_1); inline;
  35037. begin
  35038. if thebits = 0 then
  35039. pTDefRegMap(@Self)^.clr := $00000800
  35040. else
  35041. pTDefRegMap(@Self)^.&set := $00000800;
  35042. end;
  35043. function TUART2A_U2AMODE.getRTSMD : TBits_1; inline;
  35044. begin
  35045. getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  35046. end;
  35047. procedure TUART2A_U2AMODE.setIREN; inline;
  35048. begin
  35049. pTDefRegMap(@Self)^.&set := $00001000;
  35050. end;
  35051. procedure TUART2A_U2AMODE.clearIREN; inline;
  35052. begin
  35053. pTDefRegMap(@Self)^.clr := $00001000;
  35054. end;
  35055. procedure TUART2A_U2AMODE.setIREN(thebits : TBits_1); inline;
  35056. begin
  35057. if thebits = 0 then
  35058. pTDefRegMap(@Self)^.clr := $00001000
  35059. else
  35060. pTDefRegMap(@Self)^.&set := $00001000;
  35061. end;
  35062. function TUART2A_U2AMODE.getIREN : TBits_1; inline;
  35063. begin
  35064. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  35065. end;
  35066. procedure TUART2A_U2AMODE.setSIDL; inline;
  35067. begin
  35068. pTDefRegMap(@Self)^.&set := $00002000;
  35069. end;
  35070. procedure TUART2A_U2AMODE.clearSIDL; inline;
  35071. begin
  35072. pTDefRegMap(@Self)^.clr := $00002000;
  35073. end;
  35074. procedure TUART2A_U2AMODE.setSIDL(thebits : TBits_1); inline;
  35075. begin
  35076. if thebits = 0 then
  35077. pTDefRegMap(@Self)^.clr := $00002000
  35078. else
  35079. pTDefRegMap(@Self)^.&set := $00002000;
  35080. end;
  35081. function TUART2A_U2AMODE.getSIDL : TBits_1; inline;
  35082. begin
  35083. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  35084. end;
  35085. procedure TUART2A_U2AMODE.setON; inline;
  35086. begin
  35087. pTDefRegMap(@Self)^.&set := $00008000;
  35088. end;
  35089. procedure TUART2A_U2AMODE.clearON; inline;
  35090. begin
  35091. pTDefRegMap(@Self)^.clr := $00008000;
  35092. end;
  35093. procedure TUART2A_U2AMODE.setON(thebits : TBits_1); inline;
  35094. begin
  35095. if thebits = 0 then
  35096. pTDefRegMap(@Self)^.clr := $00008000
  35097. else
  35098. pTDefRegMap(@Self)^.&set := $00008000;
  35099. end;
  35100. function TUART2A_U2AMODE.getON : TBits_1; inline;
  35101. begin
  35102. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  35103. end;
  35104. procedure TUART2A_U2AMODE.setPDSEL0; inline;
  35105. begin
  35106. pTDefRegMap(@Self)^.&set := $00000002;
  35107. end;
  35108. procedure TUART2A_U2AMODE.clearPDSEL0; inline;
  35109. begin
  35110. pTDefRegMap(@Self)^.clr := $00000002;
  35111. end;
  35112. procedure TUART2A_U2AMODE.setPDSEL0(thebits : TBits_1); inline;
  35113. begin
  35114. if thebits = 0 then
  35115. pTDefRegMap(@Self)^.clr := $00000002
  35116. else
  35117. pTDefRegMap(@Self)^.&set := $00000002;
  35118. end;
  35119. function TUART2A_U2AMODE.getPDSEL0 : TBits_1; inline;
  35120. begin
  35121. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  35122. end;
  35123. procedure TUART2A_U2AMODE.setPDSEL1; inline;
  35124. begin
  35125. pTDefRegMap(@Self)^.&set := $00000004;
  35126. end;
  35127. procedure TUART2A_U2AMODE.clearPDSEL1; inline;
  35128. begin
  35129. pTDefRegMap(@Self)^.clr := $00000004;
  35130. end;
  35131. procedure TUART2A_U2AMODE.setPDSEL1(thebits : TBits_1); inline;
  35132. begin
  35133. if thebits = 0 then
  35134. pTDefRegMap(@Self)^.clr := $00000004
  35135. else
  35136. pTDefRegMap(@Self)^.&set := $00000004;
  35137. end;
  35138. function TUART2A_U2AMODE.getPDSEL1 : TBits_1; inline;
  35139. begin
  35140. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  35141. end;
  35142. procedure TUART2A_U2AMODE.setUEN0; inline;
  35143. begin
  35144. pTDefRegMap(@Self)^.&set := $00000100;
  35145. end;
  35146. procedure TUART2A_U2AMODE.clearUEN0; inline;
  35147. begin
  35148. pTDefRegMap(@Self)^.clr := $00000100;
  35149. end;
  35150. procedure TUART2A_U2AMODE.setUEN0(thebits : TBits_1); inline;
  35151. begin
  35152. if thebits = 0 then
  35153. pTDefRegMap(@Self)^.clr := $00000100
  35154. else
  35155. pTDefRegMap(@Self)^.&set := $00000100;
  35156. end;
  35157. function TUART2A_U2AMODE.getUEN0 : TBits_1; inline;
  35158. begin
  35159. getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  35160. end;
  35161. procedure TUART2A_U2AMODE.setUEN1; inline;
  35162. begin
  35163. pTDefRegMap(@Self)^.&set := $00000200;
  35164. end;
  35165. procedure TUART2A_U2AMODE.clearUEN1; inline;
  35166. begin
  35167. pTDefRegMap(@Self)^.clr := $00000200;
  35168. end;
  35169. procedure TUART2A_U2AMODE.setUEN1(thebits : TBits_1); inline;
  35170. begin
  35171. if thebits = 0 then
  35172. pTDefRegMap(@Self)^.clr := $00000200
  35173. else
  35174. pTDefRegMap(@Self)^.&set := $00000200;
  35175. end;
  35176. function TUART2A_U2AMODE.getUEN1 : TBits_1; inline;
  35177. begin
  35178. getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  35179. end;
  35180. procedure TUART2A_U2AMODE.setUSIDL; inline;
  35181. begin
  35182. pTDefRegMap(@Self)^.&set := $00002000;
  35183. end;
  35184. procedure TUART2A_U2AMODE.clearUSIDL; inline;
  35185. begin
  35186. pTDefRegMap(@Self)^.clr := $00002000;
  35187. end;
  35188. procedure TUART2A_U2AMODE.setUSIDL(thebits : TBits_1); inline;
  35189. begin
  35190. if thebits = 0 then
  35191. pTDefRegMap(@Self)^.clr := $00002000
  35192. else
  35193. pTDefRegMap(@Self)^.&set := $00002000;
  35194. end;
  35195. function TUART2A_U2AMODE.getUSIDL : TBits_1; inline;
  35196. begin
  35197. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  35198. end;
  35199. procedure TUART2A_U2AMODE.setUARTEN; inline;
  35200. begin
  35201. pTDefRegMap(@Self)^.&set := $00008000;
  35202. end;
  35203. procedure TUART2A_U2AMODE.clearUARTEN; inline;
  35204. begin
  35205. pTDefRegMap(@Self)^.clr := $00008000;
  35206. end;
  35207. procedure TUART2A_U2AMODE.setUARTEN(thebits : TBits_1); inline;
  35208. begin
  35209. if thebits = 0 then
  35210. pTDefRegMap(@Self)^.clr := $00008000
  35211. else
  35212. pTDefRegMap(@Self)^.&set := $00008000;
  35213. end;
  35214. function TUART2A_U2AMODE.getUARTEN : TBits_1; inline;
  35215. begin
  35216. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  35217. end;
  35218. procedure TUART2A_U2AMODE.setw(thebits : TBits_32); inline;
  35219. begin
  35220. pTDefRegMap(@Self)^.val := thebits;
  35221. end;
  35222. function TUART2A_U2AMODE.getw : TBits_32; inline;
  35223. begin
  35224. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  35225. end;
  35226. procedure TUART2A_U3MODE.setSTSEL; inline;
  35227. begin
  35228. pTDefRegMap(@Self)^.&set := $00000001;
  35229. end;
  35230. procedure TUART2A_U3MODE.clearSTSEL; inline;
  35231. begin
  35232. pTDefRegMap(@Self)^.clr := $00000001;
  35233. end;
  35234. procedure TUART2A_U3MODE.setSTSEL(thebits : TBits_1); inline;
  35235. begin
  35236. if thebits = 0 then
  35237. pTDefRegMap(@Self)^.clr := $00000001
  35238. else
  35239. pTDefRegMap(@Self)^.&set := $00000001;
  35240. end;
  35241. function TUART2A_U3MODE.getSTSEL : TBits_1; inline;
  35242. begin
  35243. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  35244. end;
  35245. procedure TUART2A_U3MODE.setPDSEL(thebits : TBits_2); inline;
  35246. begin
  35247. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  35248. end;
  35249. function TUART2A_U3MODE.getPDSEL : TBits_2; inline;
  35250. begin
  35251. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  35252. end;
  35253. procedure TUART2A_U3MODE.setBRGH; inline;
  35254. begin
  35255. pTDefRegMap(@Self)^.&set := $00000008;
  35256. end;
  35257. procedure TUART2A_U3MODE.clearBRGH; inline;
  35258. begin
  35259. pTDefRegMap(@Self)^.clr := $00000008;
  35260. end;
  35261. procedure TUART2A_U3MODE.setBRGH(thebits : TBits_1); inline;
  35262. begin
  35263. if thebits = 0 then
  35264. pTDefRegMap(@Self)^.clr := $00000008
  35265. else
  35266. pTDefRegMap(@Self)^.&set := $00000008;
  35267. end;
  35268. function TUART2A_U3MODE.getBRGH : TBits_1; inline;
  35269. begin
  35270. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  35271. end;
  35272. procedure TUART2A_U3MODE.setRXINV; inline;
  35273. begin
  35274. pTDefRegMap(@Self)^.&set := $00000010;
  35275. end;
  35276. procedure TUART2A_U3MODE.clearRXINV; inline;
  35277. begin
  35278. pTDefRegMap(@Self)^.clr := $00000010;
  35279. end;
  35280. procedure TUART2A_U3MODE.setRXINV(thebits : TBits_1); inline;
  35281. begin
  35282. if thebits = 0 then
  35283. pTDefRegMap(@Self)^.clr := $00000010
  35284. else
  35285. pTDefRegMap(@Self)^.&set := $00000010;
  35286. end;
  35287. function TUART2A_U3MODE.getRXINV : TBits_1; inline;
  35288. begin
  35289. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  35290. end;
  35291. procedure TUART2A_U3MODE.setABAUD; inline;
  35292. begin
  35293. pTDefRegMap(@Self)^.&set := $00000020;
  35294. end;
  35295. procedure TUART2A_U3MODE.clearABAUD; inline;
  35296. begin
  35297. pTDefRegMap(@Self)^.clr := $00000020;
  35298. end;
  35299. procedure TUART2A_U3MODE.setABAUD(thebits : TBits_1); inline;
  35300. begin
  35301. if thebits = 0 then
  35302. pTDefRegMap(@Self)^.clr := $00000020
  35303. else
  35304. pTDefRegMap(@Self)^.&set := $00000020;
  35305. end;
  35306. function TUART2A_U3MODE.getABAUD : TBits_1; inline;
  35307. begin
  35308. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  35309. end;
  35310. procedure TUART2A_U3MODE.setLPBACK; inline;
  35311. begin
  35312. pTDefRegMap(@Self)^.&set := $00000040;
  35313. end;
  35314. procedure TUART2A_U3MODE.clearLPBACK; inline;
  35315. begin
  35316. pTDefRegMap(@Self)^.clr := $00000040;
  35317. end;
  35318. procedure TUART2A_U3MODE.setLPBACK(thebits : TBits_1); inline;
  35319. begin
  35320. if thebits = 0 then
  35321. pTDefRegMap(@Self)^.clr := $00000040
  35322. else
  35323. pTDefRegMap(@Self)^.&set := $00000040;
  35324. end;
  35325. function TUART2A_U3MODE.getLPBACK : TBits_1; inline;
  35326. begin
  35327. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  35328. end;
  35329. procedure TUART2A_U3MODE.setWAKE; inline;
  35330. begin
  35331. pTDefRegMap(@Self)^.&set := $00000080;
  35332. end;
  35333. procedure TUART2A_U3MODE.clearWAKE; inline;
  35334. begin
  35335. pTDefRegMap(@Self)^.clr := $00000080;
  35336. end;
  35337. procedure TUART2A_U3MODE.setWAKE(thebits : TBits_1); inline;
  35338. begin
  35339. if thebits = 0 then
  35340. pTDefRegMap(@Self)^.clr := $00000080
  35341. else
  35342. pTDefRegMap(@Self)^.&set := $00000080;
  35343. end;
  35344. function TUART2A_U3MODE.getWAKE : TBits_1; inline;
  35345. begin
  35346. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  35347. end;
  35348. procedure TUART2A_U3MODE.setUEN(thebits : TBits_2); inline;
  35349. begin
  35350. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  35351. end;
  35352. function TUART2A_U3MODE.getUEN : TBits_2; inline;
  35353. begin
  35354. getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  35355. end;
  35356. procedure TUART2A_U3MODE.setRTSMD; inline;
  35357. begin
  35358. pTDefRegMap(@Self)^.&set := $00000800;
  35359. end;
  35360. procedure TUART2A_U3MODE.clearRTSMD; inline;
  35361. begin
  35362. pTDefRegMap(@Self)^.clr := $00000800;
  35363. end;
  35364. procedure TUART2A_U3MODE.setRTSMD(thebits : TBits_1); inline;
  35365. begin
  35366. if thebits = 0 then
  35367. pTDefRegMap(@Self)^.clr := $00000800
  35368. else
  35369. pTDefRegMap(@Self)^.&set := $00000800;
  35370. end;
  35371. function TUART2A_U3MODE.getRTSMD : TBits_1; inline;
  35372. begin
  35373. getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  35374. end;
  35375. procedure TUART2A_U3MODE.setIREN; inline;
  35376. begin
  35377. pTDefRegMap(@Self)^.&set := $00001000;
  35378. end;
  35379. procedure TUART2A_U3MODE.clearIREN; inline;
  35380. begin
  35381. pTDefRegMap(@Self)^.clr := $00001000;
  35382. end;
  35383. procedure TUART2A_U3MODE.setIREN(thebits : TBits_1); inline;
  35384. begin
  35385. if thebits = 0 then
  35386. pTDefRegMap(@Self)^.clr := $00001000
  35387. else
  35388. pTDefRegMap(@Self)^.&set := $00001000;
  35389. end;
  35390. function TUART2A_U3MODE.getIREN : TBits_1; inline;
  35391. begin
  35392. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  35393. end;
  35394. procedure TUART2A_U3MODE.setSIDL; inline;
  35395. begin
  35396. pTDefRegMap(@Self)^.&set := $00002000;
  35397. end;
  35398. procedure TUART2A_U3MODE.clearSIDL; inline;
  35399. begin
  35400. pTDefRegMap(@Self)^.clr := $00002000;
  35401. end;
  35402. procedure TUART2A_U3MODE.setSIDL(thebits : TBits_1); inline;
  35403. begin
  35404. if thebits = 0 then
  35405. pTDefRegMap(@Self)^.clr := $00002000
  35406. else
  35407. pTDefRegMap(@Self)^.&set := $00002000;
  35408. end;
  35409. function TUART2A_U3MODE.getSIDL : TBits_1; inline;
  35410. begin
  35411. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  35412. end;
  35413. procedure TUART2A_U3MODE.setON; inline;
  35414. begin
  35415. pTDefRegMap(@Self)^.&set := $00008000;
  35416. end;
  35417. procedure TUART2A_U3MODE.clearON; inline;
  35418. begin
  35419. pTDefRegMap(@Self)^.clr := $00008000;
  35420. end;
  35421. procedure TUART2A_U3MODE.setON(thebits : TBits_1); inline;
  35422. begin
  35423. if thebits = 0 then
  35424. pTDefRegMap(@Self)^.clr := $00008000
  35425. else
  35426. pTDefRegMap(@Self)^.&set := $00008000;
  35427. end;
  35428. function TUART2A_U3MODE.getON : TBits_1; inline;
  35429. begin
  35430. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  35431. end;
  35432. procedure TUART2A_U3MODE.setPDSEL0; inline;
  35433. begin
  35434. pTDefRegMap(@Self)^.&set := $00000002;
  35435. end;
  35436. procedure TUART2A_U3MODE.clearPDSEL0; inline;
  35437. begin
  35438. pTDefRegMap(@Self)^.clr := $00000002;
  35439. end;
  35440. procedure TUART2A_U3MODE.setPDSEL0(thebits : TBits_1); inline;
  35441. begin
  35442. if thebits = 0 then
  35443. pTDefRegMap(@Self)^.clr := $00000002
  35444. else
  35445. pTDefRegMap(@Self)^.&set := $00000002;
  35446. end;
  35447. function TUART2A_U3MODE.getPDSEL0 : TBits_1; inline;
  35448. begin
  35449. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  35450. end;
  35451. procedure TUART2A_U3MODE.setPDSEL1; inline;
  35452. begin
  35453. pTDefRegMap(@Self)^.&set := $00000004;
  35454. end;
  35455. procedure TUART2A_U3MODE.clearPDSEL1; inline;
  35456. begin
  35457. pTDefRegMap(@Self)^.clr := $00000004;
  35458. end;
  35459. procedure TUART2A_U3MODE.setPDSEL1(thebits : TBits_1); inline;
  35460. begin
  35461. if thebits = 0 then
  35462. pTDefRegMap(@Self)^.clr := $00000004
  35463. else
  35464. pTDefRegMap(@Self)^.&set := $00000004;
  35465. end;
  35466. function TUART2A_U3MODE.getPDSEL1 : TBits_1; inline;
  35467. begin
  35468. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  35469. end;
  35470. procedure TUART2A_U3MODE.setUEN0; inline;
  35471. begin
  35472. pTDefRegMap(@Self)^.&set := $00000100;
  35473. end;
  35474. procedure TUART2A_U3MODE.clearUEN0; inline;
  35475. begin
  35476. pTDefRegMap(@Self)^.clr := $00000100;
  35477. end;
  35478. procedure TUART2A_U3MODE.setUEN0(thebits : TBits_1); inline;
  35479. begin
  35480. if thebits = 0 then
  35481. pTDefRegMap(@Self)^.clr := $00000100
  35482. else
  35483. pTDefRegMap(@Self)^.&set := $00000100;
  35484. end;
  35485. function TUART2A_U3MODE.getUEN0 : TBits_1; inline;
  35486. begin
  35487. getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  35488. end;
  35489. procedure TUART2A_U3MODE.setUEN1; inline;
  35490. begin
  35491. pTDefRegMap(@Self)^.&set := $00000200;
  35492. end;
  35493. procedure TUART2A_U3MODE.clearUEN1; inline;
  35494. begin
  35495. pTDefRegMap(@Self)^.clr := $00000200;
  35496. end;
  35497. procedure TUART2A_U3MODE.setUEN1(thebits : TBits_1); inline;
  35498. begin
  35499. if thebits = 0 then
  35500. pTDefRegMap(@Self)^.clr := $00000200
  35501. else
  35502. pTDefRegMap(@Self)^.&set := $00000200;
  35503. end;
  35504. function TUART2A_U3MODE.getUEN1 : TBits_1; inline;
  35505. begin
  35506. getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  35507. end;
  35508. procedure TUART2A_U3MODE.setUSIDL; inline;
  35509. begin
  35510. pTDefRegMap(@Self)^.&set := $00002000;
  35511. end;
  35512. procedure TUART2A_U3MODE.clearUSIDL; inline;
  35513. begin
  35514. pTDefRegMap(@Self)^.clr := $00002000;
  35515. end;
  35516. procedure TUART2A_U3MODE.setUSIDL(thebits : TBits_1); inline;
  35517. begin
  35518. if thebits = 0 then
  35519. pTDefRegMap(@Self)^.clr := $00002000
  35520. else
  35521. pTDefRegMap(@Self)^.&set := $00002000;
  35522. end;
  35523. function TUART2A_U3MODE.getUSIDL : TBits_1; inline;
  35524. begin
  35525. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  35526. end;
  35527. procedure TUART2A_U3MODE.setUARTEN; inline;
  35528. begin
  35529. pTDefRegMap(@Self)^.&set := $00008000;
  35530. end;
  35531. procedure TUART2A_U3MODE.clearUARTEN; inline;
  35532. begin
  35533. pTDefRegMap(@Self)^.clr := $00008000;
  35534. end;
  35535. procedure TUART2A_U3MODE.setUARTEN(thebits : TBits_1); inline;
  35536. begin
  35537. if thebits = 0 then
  35538. pTDefRegMap(@Self)^.clr := $00008000
  35539. else
  35540. pTDefRegMap(@Self)^.&set := $00008000;
  35541. end;
  35542. function TUART2A_U3MODE.getUARTEN : TBits_1; inline;
  35543. begin
  35544. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  35545. end;
  35546. procedure TUART2A_U3MODE.setw(thebits : TBits_32); inline;
  35547. begin
  35548. pTDefRegMap(@Self)^.val := thebits;
  35549. end;
  35550. function TUART2A_U3MODE.getw : TBits_32; inline;
  35551. begin
  35552. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  35553. end;
  35554. procedure TUART2A_U2ASTA.setURXDA; inline;
  35555. begin
  35556. pTDefRegMap(@Self)^.&set := $00000001;
  35557. end;
  35558. procedure TUART2A_U2ASTA.clearURXDA; inline;
  35559. begin
  35560. pTDefRegMap(@Self)^.clr := $00000001;
  35561. end;
  35562. procedure TUART2A_U2ASTA.setURXDA(thebits : TBits_1); inline;
  35563. begin
  35564. if thebits = 0 then
  35565. pTDefRegMap(@Self)^.clr := $00000001
  35566. else
  35567. pTDefRegMap(@Self)^.&set := $00000001;
  35568. end;
  35569. function TUART2A_U2ASTA.getURXDA : TBits_1; inline;
  35570. begin
  35571. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  35572. end;
  35573. procedure TUART2A_U2ASTA.setOERR; inline;
  35574. begin
  35575. pTDefRegMap(@Self)^.&set := $00000002;
  35576. end;
  35577. procedure TUART2A_U2ASTA.clearOERR; inline;
  35578. begin
  35579. pTDefRegMap(@Self)^.clr := $00000002;
  35580. end;
  35581. procedure TUART2A_U2ASTA.setOERR(thebits : TBits_1); inline;
  35582. begin
  35583. if thebits = 0 then
  35584. pTDefRegMap(@Self)^.clr := $00000002
  35585. else
  35586. pTDefRegMap(@Self)^.&set := $00000002;
  35587. end;
  35588. function TUART2A_U2ASTA.getOERR : TBits_1; inline;
  35589. begin
  35590. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  35591. end;
  35592. procedure TUART2A_U2ASTA.setFERR; inline;
  35593. begin
  35594. pTDefRegMap(@Self)^.&set := $00000004;
  35595. end;
  35596. procedure TUART2A_U2ASTA.clearFERR; inline;
  35597. begin
  35598. pTDefRegMap(@Self)^.clr := $00000004;
  35599. end;
  35600. procedure TUART2A_U2ASTA.setFERR(thebits : TBits_1); inline;
  35601. begin
  35602. if thebits = 0 then
  35603. pTDefRegMap(@Self)^.clr := $00000004
  35604. else
  35605. pTDefRegMap(@Self)^.&set := $00000004;
  35606. end;
  35607. function TUART2A_U2ASTA.getFERR : TBits_1; inline;
  35608. begin
  35609. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  35610. end;
  35611. procedure TUART2A_U2ASTA.setPERR; inline;
  35612. begin
  35613. pTDefRegMap(@Self)^.&set := $00000008;
  35614. end;
  35615. procedure TUART2A_U2ASTA.clearPERR; inline;
  35616. begin
  35617. pTDefRegMap(@Self)^.clr := $00000008;
  35618. end;
  35619. procedure TUART2A_U2ASTA.setPERR(thebits : TBits_1); inline;
  35620. begin
  35621. if thebits = 0 then
  35622. pTDefRegMap(@Self)^.clr := $00000008
  35623. else
  35624. pTDefRegMap(@Self)^.&set := $00000008;
  35625. end;
  35626. function TUART2A_U2ASTA.getPERR : TBits_1; inline;
  35627. begin
  35628. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  35629. end;
  35630. procedure TUART2A_U2ASTA.setRIDLE; inline;
  35631. begin
  35632. pTDefRegMap(@Self)^.&set := $00000010;
  35633. end;
  35634. procedure TUART2A_U2ASTA.clearRIDLE; inline;
  35635. begin
  35636. pTDefRegMap(@Self)^.clr := $00000010;
  35637. end;
  35638. procedure TUART2A_U2ASTA.setRIDLE(thebits : TBits_1); inline;
  35639. begin
  35640. if thebits = 0 then
  35641. pTDefRegMap(@Self)^.clr := $00000010
  35642. else
  35643. pTDefRegMap(@Self)^.&set := $00000010;
  35644. end;
  35645. function TUART2A_U2ASTA.getRIDLE : TBits_1; inline;
  35646. begin
  35647. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  35648. end;
  35649. procedure TUART2A_U2ASTA.setADDEN; inline;
  35650. begin
  35651. pTDefRegMap(@Self)^.&set := $00000020;
  35652. end;
  35653. procedure TUART2A_U2ASTA.clearADDEN; inline;
  35654. begin
  35655. pTDefRegMap(@Self)^.clr := $00000020;
  35656. end;
  35657. procedure TUART2A_U2ASTA.setADDEN(thebits : TBits_1); inline;
  35658. begin
  35659. if thebits = 0 then
  35660. pTDefRegMap(@Self)^.clr := $00000020
  35661. else
  35662. pTDefRegMap(@Self)^.&set := $00000020;
  35663. end;
  35664. function TUART2A_U2ASTA.getADDEN : TBits_1; inline;
  35665. begin
  35666. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  35667. end;
  35668. procedure TUART2A_U2ASTA.setURXISEL(thebits : TBits_2); inline;
  35669. begin
  35670. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  35671. end;
  35672. function TUART2A_U2ASTA.getURXISEL : TBits_2; inline;
  35673. begin
  35674. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  35675. end;
  35676. procedure TUART2A_U2ASTA.setTRMT; inline;
  35677. begin
  35678. pTDefRegMap(@Self)^.&set := $00000100;
  35679. end;
  35680. procedure TUART2A_U2ASTA.clearTRMT; inline;
  35681. begin
  35682. pTDefRegMap(@Self)^.clr := $00000100;
  35683. end;
  35684. procedure TUART2A_U2ASTA.setTRMT(thebits : TBits_1); inline;
  35685. begin
  35686. if thebits = 0 then
  35687. pTDefRegMap(@Self)^.clr := $00000100
  35688. else
  35689. pTDefRegMap(@Self)^.&set := $00000100;
  35690. end;
  35691. function TUART2A_U2ASTA.getTRMT : TBits_1; inline;
  35692. begin
  35693. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  35694. end;
  35695. procedure TUART2A_U2ASTA.setUTXBF; inline;
  35696. begin
  35697. pTDefRegMap(@Self)^.&set := $00000200;
  35698. end;
  35699. procedure TUART2A_U2ASTA.clearUTXBF; inline;
  35700. begin
  35701. pTDefRegMap(@Self)^.clr := $00000200;
  35702. end;
  35703. procedure TUART2A_U2ASTA.setUTXBF(thebits : TBits_1); inline;
  35704. begin
  35705. if thebits = 0 then
  35706. pTDefRegMap(@Self)^.clr := $00000200
  35707. else
  35708. pTDefRegMap(@Self)^.&set := $00000200;
  35709. end;
  35710. function TUART2A_U2ASTA.getUTXBF : TBits_1; inline;
  35711. begin
  35712. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  35713. end;
  35714. procedure TUART2A_U2ASTA.setUTXEN; inline;
  35715. begin
  35716. pTDefRegMap(@Self)^.&set := $00000400;
  35717. end;
  35718. procedure TUART2A_U2ASTA.clearUTXEN; inline;
  35719. begin
  35720. pTDefRegMap(@Self)^.clr := $00000400;
  35721. end;
  35722. procedure TUART2A_U2ASTA.setUTXEN(thebits : TBits_1); inline;
  35723. begin
  35724. if thebits = 0 then
  35725. pTDefRegMap(@Self)^.clr := $00000400
  35726. else
  35727. pTDefRegMap(@Self)^.&set := $00000400;
  35728. end;
  35729. function TUART2A_U2ASTA.getUTXEN : TBits_1; inline;
  35730. begin
  35731. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  35732. end;
  35733. procedure TUART2A_U2ASTA.setUTXBRK; inline;
  35734. begin
  35735. pTDefRegMap(@Self)^.&set := $00000800;
  35736. end;
  35737. procedure TUART2A_U2ASTA.clearUTXBRK; inline;
  35738. begin
  35739. pTDefRegMap(@Self)^.clr := $00000800;
  35740. end;
  35741. procedure TUART2A_U2ASTA.setUTXBRK(thebits : TBits_1); inline;
  35742. begin
  35743. if thebits = 0 then
  35744. pTDefRegMap(@Self)^.clr := $00000800
  35745. else
  35746. pTDefRegMap(@Self)^.&set := $00000800;
  35747. end;
  35748. function TUART2A_U2ASTA.getUTXBRK : TBits_1; inline;
  35749. begin
  35750. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  35751. end;
  35752. procedure TUART2A_U2ASTA.setURXEN; inline;
  35753. begin
  35754. pTDefRegMap(@Self)^.&set := $00001000;
  35755. end;
  35756. procedure TUART2A_U2ASTA.clearURXEN; inline;
  35757. begin
  35758. pTDefRegMap(@Self)^.clr := $00001000;
  35759. end;
  35760. procedure TUART2A_U2ASTA.setURXEN(thebits : TBits_1); inline;
  35761. begin
  35762. if thebits = 0 then
  35763. pTDefRegMap(@Self)^.clr := $00001000
  35764. else
  35765. pTDefRegMap(@Self)^.&set := $00001000;
  35766. end;
  35767. function TUART2A_U2ASTA.getURXEN : TBits_1; inline;
  35768. begin
  35769. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  35770. end;
  35771. procedure TUART2A_U2ASTA.setUTXINV; inline;
  35772. begin
  35773. pTDefRegMap(@Self)^.&set := $00002000;
  35774. end;
  35775. procedure TUART2A_U2ASTA.clearUTXINV; inline;
  35776. begin
  35777. pTDefRegMap(@Self)^.clr := $00002000;
  35778. end;
  35779. procedure TUART2A_U2ASTA.setUTXINV(thebits : TBits_1); inline;
  35780. begin
  35781. if thebits = 0 then
  35782. pTDefRegMap(@Self)^.clr := $00002000
  35783. else
  35784. pTDefRegMap(@Self)^.&set := $00002000;
  35785. end;
  35786. function TUART2A_U2ASTA.getUTXINV : TBits_1; inline;
  35787. begin
  35788. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  35789. end;
  35790. procedure TUART2A_U2ASTA.setUTXISEL(thebits : TBits_2); inline;
  35791. begin
  35792. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  35793. end;
  35794. function TUART2A_U2ASTA.getUTXISEL : TBits_2; inline;
  35795. begin
  35796. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  35797. end;
  35798. procedure TUART2A_U2ASTA.setADDR(thebits : TBits_8); inline;
  35799. begin
  35800. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  35801. end;
  35802. function TUART2A_U2ASTA.getADDR : TBits_8; inline;
  35803. begin
  35804. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  35805. end;
  35806. procedure TUART2A_U2ASTA.setADM_EN; inline;
  35807. begin
  35808. pTDefRegMap(@Self)^.&set := $01000000;
  35809. end;
  35810. procedure TUART2A_U2ASTA.clearADM_EN; inline;
  35811. begin
  35812. pTDefRegMap(@Self)^.clr := $01000000;
  35813. end;
  35814. procedure TUART2A_U2ASTA.setADM_EN(thebits : TBits_1); inline;
  35815. begin
  35816. if thebits = 0 then
  35817. pTDefRegMap(@Self)^.clr := $01000000
  35818. else
  35819. pTDefRegMap(@Self)^.&set := $01000000;
  35820. end;
  35821. function TUART2A_U2ASTA.getADM_EN : TBits_1; inline;
  35822. begin
  35823. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  35824. end;
  35825. procedure TUART2A_U2ASTA.setURXISEL0; inline;
  35826. begin
  35827. pTDefRegMap(@Self)^.&set := $00000040;
  35828. end;
  35829. procedure TUART2A_U2ASTA.clearURXISEL0; inline;
  35830. begin
  35831. pTDefRegMap(@Self)^.clr := $00000040;
  35832. end;
  35833. procedure TUART2A_U2ASTA.setURXISEL0(thebits : TBits_1); inline;
  35834. begin
  35835. if thebits = 0 then
  35836. pTDefRegMap(@Self)^.clr := $00000040
  35837. else
  35838. pTDefRegMap(@Self)^.&set := $00000040;
  35839. end;
  35840. function TUART2A_U2ASTA.getURXISEL0 : TBits_1; inline;
  35841. begin
  35842. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  35843. end;
  35844. procedure TUART2A_U2ASTA.setURXISEL1; inline;
  35845. begin
  35846. pTDefRegMap(@Self)^.&set := $00000080;
  35847. end;
  35848. procedure TUART2A_U2ASTA.clearURXISEL1; inline;
  35849. begin
  35850. pTDefRegMap(@Self)^.clr := $00000080;
  35851. end;
  35852. procedure TUART2A_U2ASTA.setURXISEL1(thebits : TBits_1); inline;
  35853. begin
  35854. if thebits = 0 then
  35855. pTDefRegMap(@Self)^.clr := $00000080
  35856. else
  35857. pTDefRegMap(@Self)^.&set := $00000080;
  35858. end;
  35859. function TUART2A_U2ASTA.getURXISEL1 : TBits_1; inline;
  35860. begin
  35861. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  35862. end;
  35863. procedure TUART2A_U2ASTA.setUTXISEL0; inline;
  35864. begin
  35865. pTDefRegMap(@Self)^.&set := $00004000;
  35866. end;
  35867. procedure TUART2A_U2ASTA.clearUTXISEL0; inline;
  35868. begin
  35869. pTDefRegMap(@Self)^.clr := $00004000;
  35870. end;
  35871. procedure TUART2A_U2ASTA.setUTXISEL0(thebits : TBits_1); inline;
  35872. begin
  35873. if thebits = 0 then
  35874. pTDefRegMap(@Self)^.clr := $00004000
  35875. else
  35876. pTDefRegMap(@Self)^.&set := $00004000;
  35877. end;
  35878. function TUART2A_U2ASTA.getUTXISEL0 : TBits_1; inline;
  35879. begin
  35880. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  35881. end;
  35882. procedure TUART2A_U2ASTA.setUTXISEL1; inline;
  35883. begin
  35884. pTDefRegMap(@Self)^.&set := $00008000;
  35885. end;
  35886. procedure TUART2A_U2ASTA.clearUTXISEL1; inline;
  35887. begin
  35888. pTDefRegMap(@Self)^.clr := $00008000;
  35889. end;
  35890. procedure TUART2A_U2ASTA.setUTXISEL1(thebits : TBits_1); inline;
  35891. begin
  35892. if thebits = 0 then
  35893. pTDefRegMap(@Self)^.clr := $00008000
  35894. else
  35895. pTDefRegMap(@Self)^.&set := $00008000;
  35896. end;
  35897. function TUART2A_U2ASTA.getUTXISEL1 : TBits_1; inline;
  35898. begin
  35899. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  35900. end;
  35901. procedure TUART2A_U2ASTA.setUTXSEL(thebits : TBits_2); inline;
  35902. begin
  35903. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  35904. end;
  35905. function TUART2A_U2ASTA.getUTXSEL : TBits_2; inline;
  35906. begin
  35907. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  35908. end;
  35909. procedure TUART2A_U2ASTA.setw(thebits : TBits_32); inline;
  35910. begin
  35911. pTDefRegMap(@Self)^.val := thebits;
  35912. end;
  35913. function TUART2A_U2ASTA.getw : TBits_32; inline;
  35914. begin
  35915. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  35916. end;
  35917. procedure TUART2A_U3STA.setURXDA; inline;
  35918. begin
  35919. pTDefRegMap(@Self)^.&set := $00000001;
  35920. end;
  35921. procedure TUART2A_U3STA.clearURXDA; inline;
  35922. begin
  35923. pTDefRegMap(@Self)^.clr := $00000001;
  35924. end;
  35925. procedure TUART2A_U3STA.setURXDA(thebits : TBits_1); inline;
  35926. begin
  35927. if thebits = 0 then
  35928. pTDefRegMap(@Self)^.clr := $00000001
  35929. else
  35930. pTDefRegMap(@Self)^.&set := $00000001;
  35931. end;
  35932. function TUART2A_U3STA.getURXDA : TBits_1; inline;
  35933. begin
  35934. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  35935. end;
  35936. procedure TUART2A_U3STA.setOERR; inline;
  35937. begin
  35938. pTDefRegMap(@Self)^.&set := $00000002;
  35939. end;
  35940. procedure TUART2A_U3STA.clearOERR; inline;
  35941. begin
  35942. pTDefRegMap(@Self)^.clr := $00000002;
  35943. end;
  35944. procedure TUART2A_U3STA.setOERR(thebits : TBits_1); inline;
  35945. begin
  35946. if thebits = 0 then
  35947. pTDefRegMap(@Self)^.clr := $00000002
  35948. else
  35949. pTDefRegMap(@Self)^.&set := $00000002;
  35950. end;
  35951. function TUART2A_U3STA.getOERR : TBits_1; inline;
  35952. begin
  35953. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  35954. end;
  35955. procedure TUART2A_U3STA.setFERR; inline;
  35956. begin
  35957. pTDefRegMap(@Self)^.&set := $00000004;
  35958. end;
  35959. procedure TUART2A_U3STA.clearFERR; inline;
  35960. begin
  35961. pTDefRegMap(@Self)^.clr := $00000004;
  35962. end;
  35963. procedure TUART2A_U3STA.setFERR(thebits : TBits_1); inline;
  35964. begin
  35965. if thebits = 0 then
  35966. pTDefRegMap(@Self)^.clr := $00000004
  35967. else
  35968. pTDefRegMap(@Self)^.&set := $00000004;
  35969. end;
  35970. function TUART2A_U3STA.getFERR : TBits_1; inline;
  35971. begin
  35972. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  35973. end;
  35974. procedure TUART2A_U3STA.setPERR; inline;
  35975. begin
  35976. pTDefRegMap(@Self)^.&set := $00000008;
  35977. end;
  35978. procedure TUART2A_U3STA.clearPERR; inline;
  35979. begin
  35980. pTDefRegMap(@Self)^.clr := $00000008;
  35981. end;
  35982. procedure TUART2A_U3STA.setPERR(thebits : TBits_1); inline;
  35983. begin
  35984. if thebits = 0 then
  35985. pTDefRegMap(@Self)^.clr := $00000008
  35986. else
  35987. pTDefRegMap(@Self)^.&set := $00000008;
  35988. end;
  35989. function TUART2A_U3STA.getPERR : TBits_1; inline;
  35990. begin
  35991. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  35992. end;
  35993. procedure TUART2A_U3STA.setRIDLE; inline;
  35994. begin
  35995. pTDefRegMap(@Self)^.&set := $00000010;
  35996. end;
  35997. procedure TUART2A_U3STA.clearRIDLE; inline;
  35998. begin
  35999. pTDefRegMap(@Self)^.clr := $00000010;
  36000. end;
  36001. procedure TUART2A_U3STA.setRIDLE(thebits : TBits_1); inline;
  36002. begin
  36003. if thebits = 0 then
  36004. pTDefRegMap(@Self)^.clr := $00000010
  36005. else
  36006. pTDefRegMap(@Self)^.&set := $00000010;
  36007. end;
  36008. function TUART2A_U3STA.getRIDLE : TBits_1; inline;
  36009. begin
  36010. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  36011. end;
  36012. procedure TUART2A_U3STA.setADDEN; inline;
  36013. begin
  36014. pTDefRegMap(@Self)^.&set := $00000020;
  36015. end;
  36016. procedure TUART2A_U3STA.clearADDEN; inline;
  36017. begin
  36018. pTDefRegMap(@Self)^.clr := $00000020;
  36019. end;
  36020. procedure TUART2A_U3STA.setADDEN(thebits : TBits_1); inline;
  36021. begin
  36022. if thebits = 0 then
  36023. pTDefRegMap(@Self)^.clr := $00000020
  36024. else
  36025. pTDefRegMap(@Self)^.&set := $00000020;
  36026. end;
  36027. function TUART2A_U3STA.getADDEN : TBits_1; inline;
  36028. begin
  36029. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  36030. end;
  36031. procedure TUART2A_U3STA.setURXISEL(thebits : TBits_2); inline;
  36032. begin
  36033. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  36034. end;
  36035. function TUART2A_U3STA.getURXISEL : TBits_2; inline;
  36036. begin
  36037. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  36038. end;
  36039. procedure TUART2A_U3STA.setTRMT; inline;
  36040. begin
  36041. pTDefRegMap(@Self)^.&set := $00000100;
  36042. end;
  36043. procedure TUART2A_U3STA.clearTRMT; inline;
  36044. begin
  36045. pTDefRegMap(@Self)^.clr := $00000100;
  36046. end;
  36047. procedure TUART2A_U3STA.setTRMT(thebits : TBits_1); inline;
  36048. begin
  36049. if thebits = 0 then
  36050. pTDefRegMap(@Self)^.clr := $00000100
  36051. else
  36052. pTDefRegMap(@Self)^.&set := $00000100;
  36053. end;
  36054. function TUART2A_U3STA.getTRMT : TBits_1; inline;
  36055. begin
  36056. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  36057. end;
  36058. procedure TUART2A_U3STA.setUTXBF; inline;
  36059. begin
  36060. pTDefRegMap(@Self)^.&set := $00000200;
  36061. end;
  36062. procedure TUART2A_U3STA.clearUTXBF; inline;
  36063. begin
  36064. pTDefRegMap(@Self)^.clr := $00000200;
  36065. end;
  36066. procedure TUART2A_U3STA.setUTXBF(thebits : TBits_1); inline;
  36067. begin
  36068. if thebits = 0 then
  36069. pTDefRegMap(@Self)^.clr := $00000200
  36070. else
  36071. pTDefRegMap(@Self)^.&set := $00000200;
  36072. end;
  36073. function TUART2A_U3STA.getUTXBF : TBits_1; inline;
  36074. begin
  36075. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  36076. end;
  36077. procedure TUART2A_U3STA.setUTXEN; inline;
  36078. begin
  36079. pTDefRegMap(@Self)^.&set := $00000400;
  36080. end;
  36081. procedure TUART2A_U3STA.clearUTXEN; inline;
  36082. begin
  36083. pTDefRegMap(@Self)^.clr := $00000400;
  36084. end;
  36085. procedure TUART2A_U3STA.setUTXEN(thebits : TBits_1); inline;
  36086. begin
  36087. if thebits = 0 then
  36088. pTDefRegMap(@Self)^.clr := $00000400
  36089. else
  36090. pTDefRegMap(@Self)^.&set := $00000400;
  36091. end;
  36092. function TUART2A_U3STA.getUTXEN : TBits_1; inline;
  36093. begin
  36094. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  36095. end;
  36096. procedure TUART2A_U3STA.setUTXBRK; inline;
  36097. begin
  36098. pTDefRegMap(@Self)^.&set := $00000800;
  36099. end;
  36100. procedure TUART2A_U3STA.clearUTXBRK; inline;
  36101. begin
  36102. pTDefRegMap(@Self)^.clr := $00000800;
  36103. end;
  36104. procedure TUART2A_U3STA.setUTXBRK(thebits : TBits_1); inline;
  36105. begin
  36106. if thebits = 0 then
  36107. pTDefRegMap(@Self)^.clr := $00000800
  36108. else
  36109. pTDefRegMap(@Self)^.&set := $00000800;
  36110. end;
  36111. function TUART2A_U3STA.getUTXBRK : TBits_1; inline;
  36112. begin
  36113. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  36114. end;
  36115. procedure TUART2A_U3STA.setURXEN; inline;
  36116. begin
  36117. pTDefRegMap(@Self)^.&set := $00001000;
  36118. end;
  36119. procedure TUART2A_U3STA.clearURXEN; inline;
  36120. begin
  36121. pTDefRegMap(@Self)^.clr := $00001000;
  36122. end;
  36123. procedure TUART2A_U3STA.setURXEN(thebits : TBits_1); inline;
  36124. begin
  36125. if thebits = 0 then
  36126. pTDefRegMap(@Self)^.clr := $00001000
  36127. else
  36128. pTDefRegMap(@Self)^.&set := $00001000;
  36129. end;
  36130. function TUART2A_U3STA.getURXEN : TBits_1; inline;
  36131. begin
  36132. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  36133. end;
  36134. procedure TUART2A_U3STA.setUTXINV; inline;
  36135. begin
  36136. pTDefRegMap(@Self)^.&set := $00002000;
  36137. end;
  36138. procedure TUART2A_U3STA.clearUTXINV; inline;
  36139. begin
  36140. pTDefRegMap(@Self)^.clr := $00002000;
  36141. end;
  36142. procedure TUART2A_U3STA.setUTXINV(thebits : TBits_1); inline;
  36143. begin
  36144. if thebits = 0 then
  36145. pTDefRegMap(@Self)^.clr := $00002000
  36146. else
  36147. pTDefRegMap(@Self)^.&set := $00002000;
  36148. end;
  36149. function TUART2A_U3STA.getUTXINV : TBits_1; inline;
  36150. begin
  36151. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  36152. end;
  36153. procedure TUART2A_U3STA.setUTXISEL(thebits : TBits_2); inline;
  36154. begin
  36155. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  36156. end;
  36157. function TUART2A_U3STA.getUTXISEL : TBits_2; inline;
  36158. begin
  36159. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  36160. end;
  36161. procedure TUART2A_U3STA.setADDR(thebits : TBits_8); inline;
  36162. begin
  36163. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  36164. end;
  36165. function TUART2A_U3STA.getADDR : TBits_8; inline;
  36166. begin
  36167. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  36168. end;
  36169. procedure TUART2A_U3STA.setADM_EN; inline;
  36170. begin
  36171. pTDefRegMap(@Self)^.&set := $01000000;
  36172. end;
  36173. procedure TUART2A_U3STA.clearADM_EN; inline;
  36174. begin
  36175. pTDefRegMap(@Self)^.clr := $01000000;
  36176. end;
  36177. procedure TUART2A_U3STA.setADM_EN(thebits : TBits_1); inline;
  36178. begin
  36179. if thebits = 0 then
  36180. pTDefRegMap(@Self)^.clr := $01000000
  36181. else
  36182. pTDefRegMap(@Self)^.&set := $01000000;
  36183. end;
  36184. function TUART2A_U3STA.getADM_EN : TBits_1; inline;
  36185. begin
  36186. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  36187. end;
  36188. procedure TUART2A_U3STA.setURXISEL0; inline;
  36189. begin
  36190. pTDefRegMap(@Self)^.&set := $00000040;
  36191. end;
  36192. procedure TUART2A_U3STA.clearURXISEL0; inline;
  36193. begin
  36194. pTDefRegMap(@Self)^.clr := $00000040;
  36195. end;
  36196. procedure TUART2A_U3STA.setURXISEL0(thebits : TBits_1); inline;
  36197. begin
  36198. if thebits = 0 then
  36199. pTDefRegMap(@Self)^.clr := $00000040
  36200. else
  36201. pTDefRegMap(@Self)^.&set := $00000040;
  36202. end;
  36203. function TUART2A_U3STA.getURXISEL0 : TBits_1; inline;
  36204. begin
  36205. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  36206. end;
  36207. procedure TUART2A_U3STA.setURXISEL1; inline;
  36208. begin
  36209. pTDefRegMap(@Self)^.&set := $00000080;
  36210. end;
  36211. procedure TUART2A_U3STA.clearURXISEL1; inline;
  36212. begin
  36213. pTDefRegMap(@Self)^.clr := $00000080;
  36214. end;
  36215. procedure TUART2A_U3STA.setURXISEL1(thebits : TBits_1); inline;
  36216. begin
  36217. if thebits = 0 then
  36218. pTDefRegMap(@Self)^.clr := $00000080
  36219. else
  36220. pTDefRegMap(@Self)^.&set := $00000080;
  36221. end;
  36222. function TUART2A_U3STA.getURXISEL1 : TBits_1; inline;
  36223. begin
  36224. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  36225. end;
  36226. procedure TUART2A_U3STA.setUTXISEL0; inline;
  36227. begin
  36228. pTDefRegMap(@Self)^.&set := $00004000;
  36229. end;
  36230. procedure TUART2A_U3STA.clearUTXISEL0; inline;
  36231. begin
  36232. pTDefRegMap(@Self)^.clr := $00004000;
  36233. end;
  36234. procedure TUART2A_U3STA.setUTXISEL0(thebits : TBits_1); inline;
  36235. begin
  36236. if thebits = 0 then
  36237. pTDefRegMap(@Self)^.clr := $00004000
  36238. else
  36239. pTDefRegMap(@Self)^.&set := $00004000;
  36240. end;
  36241. function TUART2A_U3STA.getUTXISEL0 : TBits_1; inline;
  36242. begin
  36243. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  36244. end;
  36245. procedure TUART2A_U3STA.setUTXISEL1; inline;
  36246. begin
  36247. pTDefRegMap(@Self)^.&set := $00008000;
  36248. end;
  36249. procedure TUART2A_U3STA.clearUTXISEL1; inline;
  36250. begin
  36251. pTDefRegMap(@Self)^.clr := $00008000;
  36252. end;
  36253. procedure TUART2A_U3STA.setUTXISEL1(thebits : TBits_1); inline;
  36254. begin
  36255. if thebits = 0 then
  36256. pTDefRegMap(@Self)^.clr := $00008000
  36257. else
  36258. pTDefRegMap(@Self)^.&set := $00008000;
  36259. end;
  36260. function TUART2A_U3STA.getUTXISEL1 : TBits_1; inline;
  36261. begin
  36262. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  36263. end;
  36264. procedure TUART2A_U3STA.setUTXSEL(thebits : TBits_2); inline;
  36265. begin
  36266. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  36267. end;
  36268. function TUART2A_U3STA.getUTXSEL : TBits_2; inline;
  36269. begin
  36270. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  36271. end;
  36272. procedure TUART2A_U3STA.setw(thebits : TBits_32); inline;
  36273. begin
  36274. pTDefRegMap(@Self)^.val := thebits;
  36275. end;
  36276. function TUART2A_U3STA.getw : TBits_32; inline;
  36277. begin
  36278. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  36279. end;
  36280. procedure TUART6_U2BMODE.setSTSEL; inline;
  36281. begin
  36282. pTDefRegMap(@Self)^.&set := $00000001;
  36283. end;
  36284. procedure TUART6_U2BMODE.clearSTSEL; inline;
  36285. begin
  36286. pTDefRegMap(@Self)^.clr := $00000001;
  36287. end;
  36288. procedure TUART6_U2BMODE.setSTSEL(thebits : TBits_1); inline;
  36289. begin
  36290. if thebits = 0 then
  36291. pTDefRegMap(@Self)^.clr := $00000001
  36292. else
  36293. pTDefRegMap(@Self)^.&set := $00000001;
  36294. end;
  36295. function TUART6_U2BMODE.getSTSEL : TBits_1; inline;
  36296. begin
  36297. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  36298. end;
  36299. procedure TUART6_U2BMODE.setPDSEL(thebits : TBits_2); inline;
  36300. begin
  36301. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  36302. end;
  36303. function TUART6_U2BMODE.getPDSEL : TBits_2; inline;
  36304. begin
  36305. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  36306. end;
  36307. procedure TUART6_U2BMODE.setBRGH; inline;
  36308. begin
  36309. pTDefRegMap(@Self)^.&set := $00000008;
  36310. end;
  36311. procedure TUART6_U2BMODE.clearBRGH; inline;
  36312. begin
  36313. pTDefRegMap(@Self)^.clr := $00000008;
  36314. end;
  36315. procedure TUART6_U2BMODE.setBRGH(thebits : TBits_1); inline;
  36316. begin
  36317. if thebits = 0 then
  36318. pTDefRegMap(@Self)^.clr := $00000008
  36319. else
  36320. pTDefRegMap(@Self)^.&set := $00000008;
  36321. end;
  36322. function TUART6_U2BMODE.getBRGH : TBits_1; inline;
  36323. begin
  36324. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  36325. end;
  36326. procedure TUART6_U2BMODE.setRXINV; inline;
  36327. begin
  36328. pTDefRegMap(@Self)^.&set := $00000010;
  36329. end;
  36330. procedure TUART6_U2BMODE.clearRXINV; inline;
  36331. begin
  36332. pTDefRegMap(@Self)^.clr := $00000010;
  36333. end;
  36334. procedure TUART6_U2BMODE.setRXINV(thebits : TBits_1); inline;
  36335. begin
  36336. if thebits = 0 then
  36337. pTDefRegMap(@Self)^.clr := $00000010
  36338. else
  36339. pTDefRegMap(@Self)^.&set := $00000010;
  36340. end;
  36341. function TUART6_U2BMODE.getRXINV : TBits_1; inline;
  36342. begin
  36343. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  36344. end;
  36345. procedure TUART6_U2BMODE.setABAUD; inline;
  36346. begin
  36347. pTDefRegMap(@Self)^.&set := $00000020;
  36348. end;
  36349. procedure TUART6_U2BMODE.clearABAUD; inline;
  36350. begin
  36351. pTDefRegMap(@Self)^.clr := $00000020;
  36352. end;
  36353. procedure TUART6_U2BMODE.setABAUD(thebits : TBits_1); inline;
  36354. begin
  36355. if thebits = 0 then
  36356. pTDefRegMap(@Self)^.clr := $00000020
  36357. else
  36358. pTDefRegMap(@Self)^.&set := $00000020;
  36359. end;
  36360. function TUART6_U2BMODE.getABAUD : TBits_1; inline;
  36361. begin
  36362. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  36363. end;
  36364. procedure TUART6_U2BMODE.setLPBACK; inline;
  36365. begin
  36366. pTDefRegMap(@Self)^.&set := $00000040;
  36367. end;
  36368. procedure TUART6_U2BMODE.clearLPBACK; inline;
  36369. begin
  36370. pTDefRegMap(@Self)^.clr := $00000040;
  36371. end;
  36372. procedure TUART6_U2BMODE.setLPBACK(thebits : TBits_1); inline;
  36373. begin
  36374. if thebits = 0 then
  36375. pTDefRegMap(@Self)^.clr := $00000040
  36376. else
  36377. pTDefRegMap(@Self)^.&set := $00000040;
  36378. end;
  36379. function TUART6_U2BMODE.getLPBACK : TBits_1; inline;
  36380. begin
  36381. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  36382. end;
  36383. procedure TUART6_U2BMODE.setWAKE; inline;
  36384. begin
  36385. pTDefRegMap(@Self)^.&set := $00000080;
  36386. end;
  36387. procedure TUART6_U2BMODE.clearWAKE; inline;
  36388. begin
  36389. pTDefRegMap(@Self)^.clr := $00000080;
  36390. end;
  36391. procedure TUART6_U2BMODE.setWAKE(thebits : TBits_1); inline;
  36392. begin
  36393. if thebits = 0 then
  36394. pTDefRegMap(@Self)^.clr := $00000080
  36395. else
  36396. pTDefRegMap(@Self)^.&set := $00000080;
  36397. end;
  36398. function TUART6_U2BMODE.getWAKE : TBits_1; inline;
  36399. begin
  36400. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  36401. end;
  36402. procedure TUART6_U2BMODE.setIREN; inline;
  36403. begin
  36404. pTDefRegMap(@Self)^.&set := $00001000;
  36405. end;
  36406. procedure TUART6_U2BMODE.clearIREN; inline;
  36407. begin
  36408. pTDefRegMap(@Self)^.clr := $00001000;
  36409. end;
  36410. procedure TUART6_U2BMODE.setIREN(thebits : TBits_1); inline;
  36411. begin
  36412. if thebits = 0 then
  36413. pTDefRegMap(@Self)^.clr := $00001000
  36414. else
  36415. pTDefRegMap(@Self)^.&set := $00001000;
  36416. end;
  36417. function TUART6_U2BMODE.getIREN : TBits_1; inline;
  36418. begin
  36419. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  36420. end;
  36421. procedure TUART6_U2BMODE.setSIDL; inline;
  36422. begin
  36423. pTDefRegMap(@Self)^.&set := $00002000;
  36424. end;
  36425. procedure TUART6_U2BMODE.clearSIDL; inline;
  36426. begin
  36427. pTDefRegMap(@Self)^.clr := $00002000;
  36428. end;
  36429. procedure TUART6_U2BMODE.setSIDL(thebits : TBits_1); inline;
  36430. begin
  36431. if thebits = 0 then
  36432. pTDefRegMap(@Self)^.clr := $00002000
  36433. else
  36434. pTDefRegMap(@Self)^.&set := $00002000;
  36435. end;
  36436. function TUART6_U2BMODE.getSIDL : TBits_1; inline;
  36437. begin
  36438. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  36439. end;
  36440. procedure TUART6_U2BMODE.setON; inline;
  36441. begin
  36442. pTDefRegMap(@Self)^.&set := $00008000;
  36443. end;
  36444. procedure TUART6_U2BMODE.clearON; inline;
  36445. begin
  36446. pTDefRegMap(@Self)^.clr := $00008000;
  36447. end;
  36448. procedure TUART6_U2BMODE.setON(thebits : TBits_1); inline;
  36449. begin
  36450. if thebits = 0 then
  36451. pTDefRegMap(@Self)^.clr := $00008000
  36452. else
  36453. pTDefRegMap(@Self)^.&set := $00008000;
  36454. end;
  36455. function TUART6_U2BMODE.getON : TBits_1; inline;
  36456. begin
  36457. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  36458. end;
  36459. procedure TUART6_U2BMODE.setPDSEL0; inline;
  36460. begin
  36461. pTDefRegMap(@Self)^.&set := $00000002;
  36462. end;
  36463. procedure TUART6_U2BMODE.clearPDSEL0; inline;
  36464. begin
  36465. pTDefRegMap(@Self)^.clr := $00000002;
  36466. end;
  36467. procedure TUART6_U2BMODE.setPDSEL0(thebits : TBits_1); inline;
  36468. begin
  36469. if thebits = 0 then
  36470. pTDefRegMap(@Self)^.clr := $00000002
  36471. else
  36472. pTDefRegMap(@Self)^.&set := $00000002;
  36473. end;
  36474. function TUART6_U2BMODE.getPDSEL0 : TBits_1; inline;
  36475. begin
  36476. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  36477. end;
  36478. procedure TUART6_U2BMODE.setPDSEL1; inline;
  36479. begin
  36480. pTDefRegMap(@Self)^.&set := $00000004;
  36481. end;
  36482. procedure TUART6_U2BMODE.clearPDSEL1; inline;
  36483. begin
  36484. pTDefRegMap(@Self)^.clr := $00000004;
  36485. end;
  36486. procedure TUART6_U2BMODE.setPDSEL1(thebits : TBits_1); inline;
  36487. begin
  36488. if thebits = 0 then
  36489. pTDefRegMap(@Self)^.clr := $00000004
  36490. else
  36491. pTDefRegMap(@Self)^.&set := $00000004;
  36492. end;
  36493. function TUART6_U2BMODE.getPDSEL1 : TBits_1; inline;
  36494. begin
  36495. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  36496. end;
  36497. procedure TUART6_U2BMODE.setUSIDL; inline;
  36498. begin
  36499. pTDefRegMap(@Self)^.&set := $00002000;
  36500. end;
  36501. procedure TUART6_U2BMODE.clearUSIDL; inline;
  36502. begin
  36503. pTDefRegMap(@Self)^.clr := $00002000;
  36504. end;
  36505. procedure TUART6_U2BMODE.setUSIDL(thebits : TBits_1); inline;
  36506. begin
  36507. if thebits = 0 then
  36508. pTDefRegMap(@Self)^.clr := $00002000
  36509. else
  36510. pTDefRegMap(@Self)^.&set := $00002000;
  36511. end;
  36512. function TUART6_U2BMODE.getUSIDL : TBits_1; inline;
  36513. begin
  36514. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  36515. end;
  36516. procedure TUART6_U2BMODE.setUARTEN; inline;
  36517. begin
  36518. pTDefRegMap(@Self)^.&set := $00008000;
  36519. end;
  36520. procedure TUART6_U2BMODE.clearUARTEN; inline;
  36521. begin
  36522. pTDefRegMap(@Self)^.clr := $00008000;
  36523. end;
  36524. procedure TUART6_U2BMODE.setUARTEN(thebits : TBits_1); inline;
  36525. begin
  36526. if thebits = 0 then
  36527. pTDefRegMap(@Self)^.clr := $00008000
  36528. else
  36529. pTDefRegMap(@Self)^.&set := $00008000;
  36530. end;
  36531. function TUART6_U2BMODE.getUARTEN : TBits_1; inline;
  36532. begin
  36533. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  36534. end;
  36535. procedure TUART6_U2BMODE.setw(thebits : TBits_32); inline;
  36536. begin
  36537. pTDefRegMap(@Self)^.val := thebits;
  36538. end;
  36539. function TUART6_U2BMODE.getw : TBits_32; inline;
  36540. begin
  36541. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  36542. end;
  36543. procedure TUART6_U6MODE.setSTSEL; inline;
  36544. begin
  36545. pTDefRegMap(@Self)^.&set := $00000001;
  36546. end;
  36547. procedure TUART6_U6MODE.clearSTSEL; inline;
  36548. begin
  36549. pTDefRegMap(@Self)^.clr := $00000001;
  36550. end;
  36551. procedure TUART6_U6MODE.setSTSEL(thebits : TBits_1); inline;
  36552. begin
  36553. if thebits = 0 then
  36554. pTDefRegMap(@Self)^.clr := $00000001
  36555. else
  36556. pTDefRegMap(@Self)^.&set := $00000001;
  36557. end;
  36558. function TUART6_U6MODE.getSTSEL : TBits_1; inline;
  36559. begin
  36560. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  36561. end;
  36562. procedure TUART6_U6MODE.setPDSEL(thebits : TBits_2); inline;
  36563. begin
  36564. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  36565. end;
  36566. function TUART6_U6MODE.getPDSEL : TBits_2; inline;
  36567. begin
  36568. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  36569. end;
  36570. procedure TUART6_U6MODE.setBRGH; inline;
  36571. begin
  36572. pTDefRegMap(@Self)^.&set := $00000008;
  36573. end;
  36574. procedure TUART6_U6MODE.clearBRGH; inline;
  36575. begin
  36576. pTDefRegMap(@Self)^.clr := $00000008;
  36577. end;
  36578. procedure TUART6_U6MODE.setBRGH(thebits : TBits_1); inline;
  36579. begin
  36580. if thebits = 0 then
  36581. pTDefRegMap(@Self)^.clr := $00000008
  36582. else
  36583. pTDefRegMap(@Self)^.&set := $00000008;
  36584. end;
  36585. function TUART6_U6MODE.getBRGH : TBits_1; inline;
  36586. begin
  36587. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  36588. end;
  36589. procedure TUART6_U6MODE.setRXINV; inline;
  36590. begin
  36591. pTDefRegMap(@Self)^.&set := $00000010;
  36592. end;
  36593. procedure TUART6_U6MODE.clearRXINV; inline;
  36594. begin
  36595. pTDefRegMap(@Self)^.clr := $00000010;
  36596. end;
  36597. procedure TUART6_U6MODE.setRXINV(thebits : TBits_1); inline;
  36598. begin
  36599. if thebits = 0 then
  36600. pTDefRegMap(@Self)^.clr := $00000010
  36601. else
  36602. pTDefRegMap(@Self)^.&set := $00000010;
  36603. end;
  36604. function TUART6_U6MODE.getRXINV : TBits_1; inline;
  36605. begin
  36606. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  36607. end;
  36608. procedure TUART6_U6MODE.setABAUD; inline;
  36609. begin
  36610. pTDefRegMap(@Self)^.&set := $00000020;
  36611. end;
  36612. procedure TUART6_U6MODE.clearABAUD; inline;
  36613. begin
  36614. pTDefRegMap(@Self)^.clr := $00000020;
  36615. end;
  36616. procedure TUART6_U6MODE.setABAUD(thebits : TBits_1); inline;
  36617. begin
  36618. if thebits = 0 then
  36619. pTDefRegMap(@Self)^.clr := $00000020
  36620. else
  36621. pTDefRegMap(@Self)^.&set := $00000020;
  36622. end;
  36623. function TUART6_U6MODE.getABAUD : TBits_1; inline;
  36624. begin
  36625. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  36626. end;
  36627. procedure TUART6_U6MODE.setLPBACK; inline;
  36628. begin
  36629. pTDefRegMap(@Self)^.&set := $00000040;
  36630. end;
  36631. procedure TUART6_U6MODE.clearLPBACK; inline;
  36632. begin
  36633. pTDefRegMap(@Self)^.clr := $00000040;
  36634. end;
  36635. procedure TUART6_U6MODE.setLPBACK(thebits : TBits_1); inline;
  36636. begin
  36637. if thebits = 0 then
  36638. pTDefRegMap(@Self)^.clr := $00000040
  36639. else
  36640. pTDefRegMap(@Self)^.&set := $00000040;
  36641. end;
  36642. function TUART6_U6MODE.getLPBACK : TBits_1; inline;
  36643. begin
  36644. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  36645. end;
  36646. procedure TUART6_U6MODE.setWAKE; inline;
  36647. begin
  36648. pTDefRegMap(@Self)^.&set := $00000080;
  36649. end;
  36650. procedure TUART6_U6MODE.clearWAKE; inline;
  36651. begin
  36652. pTDefRegMap(@Self)^.clr := $00000080;
  36653. end;
  36654. procedure TUART6_U6MODE.setWAKE(thebits : TBits_1); inline;
  36655. begin
  36656. if thebits = 0 then
  36657. pTDefRegMap(@Self)^.clr := $00000080
  36658. else
  36659. pTDefRegMap(@Self)^.&set := $00000080;
  36660. end;
  36661. function TUART6_U6MODE.getWAKE : TBits_1; inline;
  36662. begin
  36663. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  36664. end;
  36665. procedure TUART6_U6MODE.setIREN; inline;
  36666. begin
  36667. pTDefRegMap(@Self)^.&set := $00001000;
  36668. end;
  36669. procedure TUART6_U6MODE.clearIREN; inline;
  36670. begin
  36671. pTDefRegMap(@Self)^.clr := $00001000;
  36672. end;
  36673. procedure TUART6_U6MODE.setIREN(thebits : TBits_1); inline;
  36674. begin
  36675. if thebits = 0 then
  36676. pTDefRegMap(@Self)^.clr := $00001000
  36677. else
  36678. pTDefRegMap(@Self)^.&set := $00001000;
  36679. end;
  36680. function TUART6_U6MODE.getIREN : TBits_1; inline;
  36681. begin
  36682. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  36683. end;
  36684. procedure TUART6_U6MODE.setSIDL; inline;
  36685. begin
  36686. pTDefRegMap(@Self)^.&set := $00002000;
  36687. end;
  36688. procedure TUART6_U6MODE.clearSIDL; inline;
  36689. begin
  36690. pTDefRegMap(@Self)^.clr := $00002000;
  36691. end;
  36692. procedure TUART6_U6MODE.setSIDL(thebits : TBits_1); inline;
  36693. begin
  36694. if thebits = 0 then
  36695. pTDefRegMap(@Self)^.clr := $00002000
  36696. else
  36697. pTDefRegMap(@Self)^.&set := $00002000;
  36698. end;
  36699. function TUART6_U6MODE.getSIDL : TBits_1; inline;
  36700. begin
  36701. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  36702. end;
  36703. procedure TUART6_U6MODE.setON; inline;
  36704. begin
  36705. pTDefRegMap(@Self)^.&set := $00008000;
  36706. end;
  36707. procedure TUART6_U6MODE.clearON; inline;
  36708. begin
  36709. pTDefRegMap(@Self)^.clr := $00008000;
  36710. end;
  36711. procedure TUART6_U6MODE.setON(thebits : TBits_1); inline;
  36712. begin
  36713. if thebits = 0 then
  36714. pTDefRegMap(@Self)^.clr := $00008000
  36715. else
  36716. pTDefRegMap(@Self)^.&set := $00008000;
  36717. end;
  36718. function TUART6_U6MODE.getON : TBits_1; inline;
  36719. begin
  36720. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  36721. end;
  36722. procedure TUART6_U6MODE.setPDSEL0; inline;
  36723. begin
  36724. pTDefRegMap(@Self)^.&set := $00000002;
  36725. end;
  36726. procedure TUART6_U6MODE.clearPDSEL0; inline;
  36727. begin
  36728. pTDefRegMap(@Self)^.clr := $00000002;
  36729. end;
  36730. procedure TUART6_U6MODE.setPDSEL0(thebits : TBits_1); inline;
  36731. begin
  36732. if thebits = 0 then
  36733. pTDefRegMap(@Self)^.clr := $00000002
  36734. else
  36735. pTDefRegMap(@Self)^.&set := $00000002;
  36736. end;
  36737. function TUART6_U6MODE.getPDSEL0 : TBits_1; inline;
  36738. begin
  36739. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  36740. end;
  36741. procedure TUART6_U6MODE.setPDSEL1; inline;
  36742. begin
  36743. pTDefRegMap(@Self)^.&set := $00000004;
  36744. end;
  36745. procedure TUART6_U6MODE.clearPDSEL1; inline;
  36746. begin
  36747. pTDefRegMap(@Self)^.clr := $00000004;
  36748. end;
  36749. procedure TUART6_U6MODE.setPDSEL1(thebits : TBits_1); inline;
  36750. begin
  36751. if thebits = 0 then
  36752. pTDefRegMap(@Self)^.clr := $00000004
  36753. else
  36754. pTDefRegMap(@Self)^.&set := $00000004;
  36755. end;
  36756. function TUART6_U6MODE.getPDSEL1 : TBits_1; inline;
  36757. begin
  36758. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  36759. end;
  36760. procedure TUART6_U6MODE.setUSIDL; inline;
  36761. begin
  36762. pTDefRegMap(@Self)^.&set := $00002000;
  36763. end;
  36764. procedure TUART6_U6MODE.clearUSIDL; inline;
  36765. begin
  36766. pTDefRegMap(@Self)^.clr := $00002000;
  36767. end;
  36768. procedure TUART6_U6MODE.setUSIDL(thebits : TBits_1); inline;
  36769. begin
  36770. if thebits = 0 then
  36771. pTDefRegMap(@Self)^.clr := $00002000
  36772. else
  36773. pTDefRegMap(@Self)^.&set := $00002000;
  36774. end;
  36775. function TUART6_U6MODE.getUSIDL : TBits_1; inline;
  36776. begin
  36777. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  36778. end;
  36779. procedure TUART6_U6MODE.setUARTEN; inline;
  36780. begin
  36781. pTDefRegMap(@Self)^.&set := $00008000;
  36782. end;
  36783. procedure TUART6_U6MODE.clearUARTEN; inline;
  36784. begin
  36785. pTDefRegMap(@Self)^.clr := $00008000;
  36786. end;
  36787. procedure TUART6_U6MODE.setUARTEN(thebits : TBits_1); inline;
  36788. begin
  36789. if thebits = 0 then
  36790. pTDefRegMap(@Self)^.clr := $00008000
  36791. else
  36792. pTDefRegMap(@Self)^.&set := $00008000;
  36793. end;
  36794. function TUART6_U6MODE.getUARTEN : TBits_1; inline;
  36795. begin
  36796. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  36797. end;
  36798. procedure TUART6_U6MODE.setw(thebits : TBits_32); inline;
  36799. begin
  36800. pTDefRegMap(@Self)^.val := thebits;
  36801. end;
  36802. function TUART6_U6MODE.getw : TBits_32; inline;
  36803. begin
  36804. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  36805. end;
  36806. procedure TUART6_U2BSTA.setURXDA; inline;
  36807. begin
  36808. pTDefRegMap(@Self)^.&set := $00000001;
  36809. end;
  36810. procedure TUART6_U2BSTA.clearURXDA; inline;
  36811. begin
  36812. pTDefRegMap(@Self)^.clr := $00000001;
  36813. end;
  36814. procedure TUART6_U2BSTA.setURXDA(thebits : TBits_1); inline;
  36815. begin
  36816. if thebits = 0 then
  36817. pTDefRegMap(@Self)^.clr := $00000001
  36818. else
  36819. pTDefRegMap(@Self)^.&set := $00000001;
  36820. end;
  36821. function TUART6_U2BSTA.getURXDA : TBits_1; inline;
  36822. begin
  36823. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  36824. end;
  36825. procedure TUART6_U2BSTA.setOERR; inline;
  36826. begin
  36827. pTDefRegMap(@Self)^.&set := $00000002;
  36828. end;
  36829. procedure TUART6_U2BSTA.clearOERR; inline;
  36830. begin
  36831. pTDefRegMap(@Self)^.clr := $00000002;
  36832. end;
  36833. procedure TUART6_U2BSTA.setOERR(thebits : TBits_1); inline;
  36834. begin
  36835. if thebits = 0 then
  36836. pTDefRegMap(@Self)^.clr := $00000002
  36837. else
  36838. pTDefRegMap(@Self)^.&set := $00000002;
  36839. end;
  36840. function TUART6_U2BSTA.getOERR : TBits_1; inline;
  36841. begin
  36842. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  36843. end;
  36844. procedure TUART6_U2BSTA.setFERR; inline;
  36845. begin
  36846. pTDefRegMap(@Self)^.&set := $00000004;
  36847. end;
  36848. procedure TUART6_U2BSTA.clearFERR; inline;
  36849. begin
  36850. pTDefRegMap(@Self)^.clr := $00000004;
  36851. end;
  36852. procedure TUART6_U2BSTA.setFERR(thebits : TBits_1); inline;
  36853. begin
  36854. if thebits = 0 then
  36855. pTDefRegMap(@Self)^.clr := $00000004
  36856. else
  36857. pTDefRegMap(@Self)^.&set := $00000004;
  36858. end;
  36859. function TUART6_U2BSTA.getFERR : TBits_1; inline;
  36860. begin
  36861. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  36862. end;
  36863. procedure TUART6_U2BSTA.setPERR; inline;
  36864. begin
  36865. pTDefRegMap(@Self)^.&set := $00000008;
  36866. end;
  36867. procedure TUART6_U2BSTA.clearPERR; inline;
  36868. begin
  36869. pTDefRegMap(@Self)^.clr := $00000008;
  36870. end;
  36871. procedure TUART6_U2BSTA.setPERR(thebits : TBits_1); inline;
  36872. begin
  36873. if thebits = 0 then
  36874. pTDefRegMap(@Self)^.clr := $00000008
  36875. else
  36876. pTDefRegMap(@Self)^.&set := $00000008;
  36877. end;
  36878. function TUART6_U2BSTA.getPERR : TBits_1; inline;
  36879. begin
  36880. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  36881. end;
  36882. procedure TUART6_U2BSTA.setRIDLE; inline;
  36883. begin
  36884. pTDefRegMap(@Self)^.&set := $00000010;
  36885. end;
  36886. procedure TUART6_U2BSTA.clearRIDLE; inline;
  36887. begin
  36888. pTDefRegMap(@Self)^.clr := $00000010;
  36889. end;
  36890. procedure TUART6_U2BSTA.setRIDLE(thebits : TBits_1); inline;
  36891. begin
  36892. if thebits = 0 then
  36893. pTDefRegMap(@Self)^.clr := $00000010
  36894. else
  36895. pTDefRegMap(@Self)^.&set := $00000010;
  36896. end;
  36897. function TUART6_U2BSTA.getRIDLE : TBits_1; inline;
  36898. begin
  36899. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  36900. end;
  36901. procedure TUART6_U2BSTA.setADDEN; inline;
  36902. begin
  36903. pTDefRegMap(@Self)^.&set := $00000020;
  36904. end;
  36905. procedure TUART6_U2BSTA.clearADDEN; inline;
  36906. begin
  36907. pTDefRegMap(@Self)^.clr := $00000020;
  36908. end;
  36909. procedure TUART6_U2BSTA.setADDEN(thebits : TBits_1); inline;
  36910. begin
  36911. if thebits = 0 then
  36912. pTDefRegMap(@Self)^.clr := $00000020
  36913. else
  36914. pTDefRegMap(@Self)^.&set := $00000020;
  36915. end;
  36916. function TUART6_U2BSTA.getADDEN : TBits_1; inline;
  36917. begin
  36918. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  36919. end;
  36920. procedure TUART6_U2BSTA.setURXISEL(thebits : TBits_2); inline;
  36921. begin
  36922. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  36923. end;
  36924. function TUART6_U2BSTA.getURXISEL : TBits_2; inline;
  36925. begin
  36926. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  36927. end;
  36928. procedure TUART6_U2BSTA.setTRMT; inline;
  36929. begin
  36930. pTDefRegMap(@Self)^.&set := $00000100;
  36931. end;
  36932. procedure TUART6_U2BSTA.clearTRMT; inline;
  36933. begin
  36934. pTDefRegMap(@Self)^.clr := $00000100;
  36935. end;
  36936. procedure TUART6_U2BSTA.setTRMT(thebits : TBits_1); inline;
  36937. begin
  36938. if thebits = 0 then
  36939. pTDefRegMap(@Self)^.clr := $00000100
  36940. else
  36941. pTDefRegMap(@Self)^.&set := $00000100;
  36942. end;
  36943. function TUART6_U2BSTA.getTRMT : TBits_1; inline;
  36944. begin
  36945. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  36946. end;
  36947. procedure TUART6_U2BSTA.setUTXBF; inline;
  36948. begin
  36949. pTDefRegMap(@Self)^.&set := $00000200;
  36950. end;
  36951. procedure TUART6_U2BSTA.clearUTXBF; inline;
  36952. begin
  36953. pTDefRegMap(@Self)^.clr := $00000200;
  36954. end;
  36955. procedure TUART6_U2BSTA.setUTXBF(thebits : TBits_1); inline;
  36956. begin
  36957. if thebits = 0 then
  36958. pTDefRegMap(@Self)^.clr := $00000200
  36959. else
  36960. pTDefRegMap(@Self)^.&set := $00000200;
  36961. end;
  36962. function TUART6_U2BSTA.getUTXBF : TBits_1; inline;
  36963. begin
  36964. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  36965. end;
  36966. procedure TUART6_U2BSTA.setUTXEN; inline;
  36967. begin
  36968. pTDefRegMap(@Self)^.&set := $00000400;
  36969. end;
  36970. procedure TUART6_U2BSTA.clearUTXEN; inline;
  36971. begin
  36972. pTDefRegMap(@Self)^.clr := $00000400;
  36973. end;
  36974. procedure TUART6_U2BSTA.setUTXEN(thebits : TBits_1); inline;
  36975. begin
  36976. if thebits = 0 then
  36977. pTDefRegMap(@Self)^.clr := $00000400
  36978. else
  36979. pTDefRegMap(@Self)^.&set := $00000400;
  36980. end;
  36981. function TUART6_U2BSTA.getUTXEN : TBits_1; inline;
  36982. begin
  36983. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  36984. end;
  36985. procedure TUART6_U2BSTA.setUTXBRK; inline;
  36986. begin
  36987. pTDefRegMap(@Self)^.&set := $00000800;
  36988. end;
  36989. procedure TUART6_U2BSTA.clearUTXBRK; inline;
  36990. begin
  36991. pTDefRegMap(@Self)^.clr := $00000800;
  36992. end;
  36993. procedure TUART6_U2BSTA.setUTXBRK(thebits : TBits_1); inline;
  36994. begin
  36995. if thebits = 0 then
  36996. pTDefRegMap(@Self)^.clr := $00000800
  36997. else
  36998. pTDefRegMap(@Self)^.&set := $00000800;
  36999. end;
  37000. function TUART6_U2BSTA.getUTXBRK : TBits_1; inline;
  37001. begin
  37002. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  37003. end;
  37004. procedure TUART6_U2BSTA.setURXEN; inline;
  37005. begin
  37006. pTDefRegMap(@Self)^.&set := $00001000;
  37007. end;
  37008. procedure TUART6_U2BSTA.clearURXEN; inline;
  37009. begin
  37010. pTDefRegMap(@Self)^.clr := $00001000;
  37011. end;
  37012. procedure TUART6_U2BSTA.setURXEN(thebits : TBits_1); inline;
  37013. begin
  37014. if thebits = 0 then
  37015. pTDefRegMap(@Self)^.clr := $00001000
  37016. else
  37017. pTDefRegMap(@Self)^.&set := $00001000;
  37018. end;
  37019. function TUART6_U2BSTA.getURXEN : TBits_1; inline;
  37020. begin
  37021. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  37022. end;
  37023. procedure TUART6_U2BSTA.setUTXINV; inline;
  37024. begin
  37025. pTDefRegMap(@Self)^.&set := $00002000;
  37026. end;
  37027. procedure TUART6_U2BSTA.clearUTXINV; inline;
  37028. begin
  37029. pTDefRegMap(@Self)^.clr := $00002000;
  37030. end;
  37031. procedure TUART6_U2BSTA.setUTXINV(thebits : TBits_1); inline;
  37032. begin
  37033. if thebits = 0 then
  37034. pTDefRegMap(@Self)^.clr := $00002000
  37035. else
  37036. pTDefRegMap(@Self)^.&set := $00002000;
  37037. end;
  37038. function TUART6_U2BSTA.getUTXINV : TBits_1; inline;
  37039. begin
  37040. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  37041. end;
  37042. procedure TUART6_U2BSTA.setUTXISEL(thebits : TBits_2); inline;
  37043. begin
  37044. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  37045. end;
  37046. function TUART6_U2BSTA.getUTXISEL : TBits_2; inline;
  37047. begin
  37048. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  37049. end;
  37050. procedure TUART6_U2BSTA.setADDR(thebits : TBits_8); inline;
  37051. begin
  37052. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  37053. end;
  37054. function TUART6_U2BSTA.getADDR : TBits_8; inline;
  37055. begin
  37056. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  37057. end;
  37058. procedure TUART6_U2BSTA.setADM_EN; inline;
  37059. begin
  37060. pTDefRegMap(@Self)^.&set := $01000000;
  37061. end;
  37062. procedure TUART6_U2BSTA.clearADM_EN; inline;
  37063. begin
  37064. pTDefRegMap(@Self)^.clr := $01000000;
  37065. end;
  37066. procedure TUART6_U2BSTA.setADM_EN(thebits : TBits_1); inline;
  37067. begin
  37068. if thebits = 0 then
  37069. pTDefRegMap(@Self)^.clr := $01000000
  37070. else
  37071. pTDefRegMap(@Self)^.&set := $01000000;
  37072. end;
  37073. function TUART6_U2BSTA.getADM_EN : TBits_1; inline;
  37074. begin
  37075. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  37076. end;
  37077. procedure TUART6_U2BSTA.setURXISEL0; inline;
  37078. begin
  37079. pTDefRegMap(@Self)^.&set := $00000040;
  37080. end;
  37081. procedure TUART6_U2BSTA.clearURXISEL0; inline;
  37082. begin
  37083. pTDefRegMap(@Self)^.clr := $00000040;
  37084. end;
  37085. procedure TUART6_U2BSTA.setURXISEL0(thebits : TBits_1); inline;
  37086. begin
  37087. if thebits = 0 then
  37088. pTDefRegMap(@Self)^.clr := $00000040
  37089. else
  37090. pTDefRegMap(@Self)^.&set := $00000040;
  37091. end;
  37092. function TUART6_U2BSTA.getURXISEL0 : TBits_1; inline;
  37093. begin
  37094. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  37095. end;
  37096. procedure TUART6_U2BSTA.setURXISEL1; inline;
  37097. begin
  37098. pTDefRegMap(@Self)^.&set := $00000080;
  37099. end;
  37100. procedure TUART6_U2BSTA.clearURXISEL1; inline;
  37101. begin
  37102. pTDefRegMap(@Self)^.clr := $00000080;
  37103. end;
  37104. procedure TUART6_U2BSTA.setURXISEL1(thebits : TBits_1); inline;
  37105. begin
  37106. if thebits = 0 then
  37107. pTDefRegMap(@Self)^.clr := $00000080
  37108. else
  37109. pTDefRegMap(@Self)^.&set := $00000080;
  37110. end;
  37111. function TUART6_U2BSTA.getURXISEL1 : TBits_1; inline;
  37112. begin
  37113. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  37114. end;
  37115. procedure TUART6_U2BSTA.setUTXISEL0; inline;
  37116. begin
  37117. pTDefRegMap(@Self)^.&set := $00004000;
  37118. end;
  37119. procedure TUART6_U2BSTA.clearUTXISEL0; inline;
  37120. begin
  37121. pTDefRegMap(@Self)^.clr := $00004000;
  37122. end;
  37123. procedure TUART6_U2BSTA.setUTXISEL0(thebits : TBits_1); inline;
  37124. begin
  37125. if thebits = 0 then
  37126. pTDefRegMap(@Self)^.clr := $00004000
  37127. else
  37128. pTDefRegMap(@Self)^.&set := $00004000;
  37129. end;
  37130. function TUART6_U2BSTA.getUTXISEL0 : TBits_1; inline;
  37131. begin
  37132. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  37133. end;
  37134. procedure TUART6_U2BSTA.setUTXISEL1; inline;
  37135. begin
  37136. pTDefRegMap(@Self)^.&set := $00008000;
  37137. end;
  37138. procedure TUART6_U2BSTA.clearUTXISEL1; inline;
  37139. begin
  37140. pTDefRegMap(@Self)^.clr := $00008000;
  37141. end;
  37142. procedure TUART6_U2BSTA.setUTXISEL1(thebits : TBits_1); inline;
  37143. begin
  37144. if thebits = 0 then
  37145. pTDefRegMap(@Self)^.clr := $00008000
  37146. else
  37147. pTDefRegMap(@Self)^.&set := $00008000;
  37148. end;
  37149. function TUART6_U2BSTA.getUTXISEL1 : TBits_1; inline;
  37150. begin
  37151. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  37152. end;
  37153. procedure TUART6_U2BSTA.setUTXSEL(thebits : TBits_2); inline;
  37154. begin
  37155. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  37156. end;
  37157. function TUART6_U2BSTA.getUTXSEL : TBits_2; inline;
  37158. begin
  37159. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  37160. end;
  37161. procedure TUART6_U2BSTA.setw(thebits : TBits_32); inline;
  37162. begin
  37163. pTDefRegMap(@Self)^.val := thebits;
  37164. end;
  37165. function TUART6_U2BSTA.getw : TBits_32; inline;
  37166. begin
  37167. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  37168. end;
  37169. procedure TUART6_U6STA.setURXDA; inline;
  37170. begin
  37171. pTDefRegMap(@Self)^.&set := $00000001;
  37172. end;
  37173. procedure TUART6_U6STA.clearURXDA; inline;
  37174. begin
  37175. pTDefRegMap(@Self)^.clr := $00000001;
  37176. end;
  37177. procedure TUART6_U6STA.setURXDA(thebits : TBits_1); inline;
  37178. begin
  37179. if thebits = 0 then
  37180. pTDefRegMap(@Self)^.clr := $00000001
  37181. else
  37182. pTDefRegMap(@Self)^.&set := $00000001;
  37183. end;
  37184. function TUART6_U6STA.getURXDA : TBits_1; inline;
  37185. begin
  37186. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  37187. end;
  37188. procedure TUART6_U6STA.setOERR; inline;
  37189. begin
  37190. pTDefRegMap(@Self)^.&set := $00000002;
  37191. end;
  37192. procedure TUART6_U6STA.clearOERR; inline;
  37193. begin
  37194. pTDefRegMap(@Self)^.clr := $00000002;
  37195. end;
  37196. procedure TUART6_U6STA.setOERR(thebits : TBits_1); inline;
  37197. begin
  37198. if thebits = 0 then
  37199. pTDefRegMap(@Self)^.clr := $00000002
  37200. else
  37201. pTDefRegMap(@Self)^.&set := $00000002;
  37202. end;
  37203. function TUART6_U6STA.getOERR : TBits_1; inline;
  37204. begin
  37205. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  37206. end;
  37207. procedure TUART6_U6STA.setFERR; inline;
  37208. begin
  37209. pTDefRegMap(@Self)^.&set := $00000004;
  37210. end;
  37211. procedure TUART6_U6STA.clearFERR; inline;
  37212. begin
  37213. pTDefRegMap(@Self)^.clr := $00000004;
  37214. end;
  37215. procedure TUART6_U6STA.setFERR(thebits : TBits_1); inline;
  37216. begin
  37217. if thebits = 0 then
  37218. pTDefRegMap(@Self)^.clr := $00000004
  37219. else
  37220. pTDefRegMap(@Self)^.&set := $00000004;
  37221. end;
  37222. function TUART6_U6STA.getFERR : TBits_1; inline;
  37223. begin
  37224. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  37225. end;
  37226. procedure TUART6_U6STA.setPERR; inline;
  37227. begin
  37228. pTDefRegMap(@Self)^.&set := $00000008;
  37229. end;
  37230. procedure TUART6_U6STA.clearPERR; inline;
  37231. begin
  37232. pTDefRegMap(@Self)^.clr := $00000008;
  37233. end;
  37234. procedure TUART6_U6STA.setPERR(thebits : TBits_1); inline;
  37235. begin
  37236. if thebits = 0 then
  37237. pTDefRegMap(@Self)^.clr := $00000008
  37238. else
  37239. pTDefRegMap(@Self)^.&set := $00000008;
  37240. end;
  37241. function TUART6_U6STA.getPERR : TBits_1; inline;
  37242. begin
  37243. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  37244. end;
  37245. procedure TUART6_U6STA.setRIDLE; inline;
  37246. begin
  37247. pTDefRegMap(@Self)^.&set := $00000010;
  37248. end;
  37249. procedure TUART6_U6STA.clearRIDLE; inline;
  37250. begin
  37251. pTDefRegMap(@Self)^.clr := $00000010;
  37252. end;
  37253. procedure TUART6_U6STA.setRIDLE(thebits : TBits_1); inline;
  37254. begin
  37255. if thebits = 0 then
  37256. pTDefRegMap(@Self)^.clr := $00000010
  37257. else
  37258. pTDefRegMap(@Self)^.&set := $00000010;
  37259. end;
  37260. function TUART6_U6STA.getRIDLE : TBits_1; inline;
  37261. begin
  37262. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  37263. end;
  37264. procedure TUART6_U6STA.setADDEN; inline;
  37265. begin
  37266. pTDefRegMap(@Self)^.&set := $00000020;
  37267. end;
  37268. procedure TUART6_U6STA.clearADDEN; inline;
  37269. begin
  37270. pTDefRegMap(@Self)^.clr := $00000020;
  37271. end;
  37272. procedure TUART6_U6STA.setADDEN(thebits : TBits_1); inline;
  37273. begin
  37274. if thebits = 0 then
  37275. pTDefRegMap(@Self)^.clr := $00000020
  37276. else
  37277. pTDefRegMap(@Self)^.&set := $00000020;
  37278. end;
  37279. function TUART6_U6STA.getADDEN : TBits_1; inline;
  37280. begin
  37281. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  37282. end;
  37283. procedure TUART6_U6STA.setURXISEL(thebits : TBits_2); inline;
  37284. begin
  37285. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  37286. end;
  37287. function TUART6_U6STA.getURXISEL : TBits_2; inline;
  37288. begin
  37289. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  37290. end;
  37291. procedure TUART6_U6STA.setTRMT; inline;
  37292. begin
  37293. pTDefRegMap(@Self)^.&set := $00000100;
  37294. end;
  37295. procedure TUART6_U6STA.clearTRMT; inline;
  37296. begin
  37297. pTDefRegMap(@Self)^.clr := $00000100;
  37298. end;
  37299. procedure TUART6_U6STA.setTRMT(thebits : TBits_1); inline;
  37300. begin
  37301. if thebits = 0 then
  37302. pTDefRegMap(@Self)^.clr := $00000100
  37303. else
  37304. pTDefRegMap(@Self)^.&set := $00000100;
  37305. end;
  37306. function TUART6_U6STA.getTRMT : TBits_1; inline;
  37307. begin
  37308. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  37309. end;
  37310. procedure TUART6_U6STA.setUTXBF; inline;
  37311. begin
  37312. pTDefRegMap(@Self)^.&set := $00000200;
  37313. end;
  37314. procedure TUART6_U6STA.clearUTXBF; inline;
  37315. begin
  37316. pTDefRegMap(@Self)^.clr := $00000200;
  37317. end;
  37318. procedure TUART6_U6STA.setUTXBF(thebits : TBits_1); inline;
  37319. begin
  37320. if thebits = 0 then
  37321. pTDefRegMap(@Self)^.clr := $00000200
  37322. else
  37323. pTDefRegMap(@Self)^.&set := $00000200;
  37324. end;
  37325. function TUART6_U6STA.getUTXBF : TBits_1; inline;
  37326. begin
  37327. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  37328. end;
  37329. procedure TUART6_U6STA.setUTXEN; inline;
  37330. begin
  37331. pTDefRegMap(@Self)^.&set := $00000400;
  37332. end;
  37333. procedure TUART6_U6STA.clearUTXEN; inline;
  37334. begin
  37335. pTDefRegMap(@Self)^.clr := $00000400;
  37336. end;
  37337. procedure TUART6_U6STA.setUTXEN(thebits : TBits_1); inline;
  37338. begin
  37339. if thebits = 0 then
  37340. pTDefRegMap(@Self)^.clr := $00000400
  37341. else
  37342. pTDefRegMap(@Self)^.&set := $00000400;
  37343. end;
  37344. function TUART6_U6STA.getUTXEN : TBits_1; inline;
  37345. begin
  37346. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  37347. end;
  37348. procedure TUART6_U6STA.setUTXBRK; inline;
  37349. begin
  37350. pTDefRegMap(@Self)^.&set := $00000800;
  37351. end;
  37352. procedure TUART6_U6STA.clearUTXBRK; inline;
  37353. begin
  37354. pTDefRegMap(@Self)^.clr := $00000800;
  37355. end;
  37356. procedure TUART6_U6STA.setUTXBRK(thebits : TBits_1); inline;
  37357. begin
  37358. if thebits = 0 then
  37359. pTDefRegMap(@Self)^.clr := $00000800
  37360. else
  37361. pTDefRegMap(@Self)^.&set := $00000800;
  37362. end;
  37363. function TUART6_U6STA.getUTXBRK : TBits_1; inline;
  37364. begin
  37365. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  37366. end;
  37367. procedure TUART6_U6STA.setURXEN; inline;
  37368. begin
  37369. pTDefRegMap(@Self)^.&set := $00001000;
  37370. end;
  37371. procedure TUART6_U6STA.clearURXEN; inline;
  37372. begin
  37373. pTDefRegMap(@Self)^.clr := $00001000;
  37374. end;
  37375. procedure TUART6_U6STA.setURXEN(thebits : TBits_1); inline;
  37376. begin
  37377. if thebits = 0 then
  37378. pTDefRegMap(@Self)^.clr := $00001000
  37379. else
  37380. pTDefRegMap(@Self)^.&set := $00001000;
  37381. end;
  37382. function TUART6_U6STA.getURXEN : TBits_1; inline;
  37383. begin
  37384. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  37385. end;
  37386. procedure TUART6_U6STA.setUTXINV; inline;
  37387. begin
  37388. pTDefRegMap(@Self)^.&set := $00002000;
  37389. end;
  37390. procedure TUART6_U6STA.clearUTXINV; inline;
  37391. begin
  37392. pTDefRegMap(@Self)^.clr := $00002000;
  37393. end;
  37394. procedure TUART6_U6STA.setUTXINV(thebits : TBits_1); inline;
  37395. begin
  37396. if thebits = 0 then
  37397. pTDefRegMap(@Self)^.clr := $00002000
  37398. else
  37399. pTDefRegMap(@Self)^.&set := $00002000;
  37400. end;
  37401. function TUART6_U6STA.getUTXINV : TBits_1; inline;
  37402. begin
  37403. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  37404. end;
  37405. procedure TUART6_U6STA.setUTXISEL(thebits : TBits_2); inline;
  37406. begin
  37407. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  37408. end;
  37409. function TUART6_U6STA.getUTXISEL : TBits_2; inline;
  37410. begin
  37411. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  37412. end;
  37413. procedure TUART6_U6STA.setADDR(thebits : TBits_8); inline;
  37414. begin
  37415. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  37416. end;
  37417. function TUART6_U6STA.getADDR : TBits_8; inline;
  37418. begin
  37419. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  37420. end;
  37421. procedure TUART6_U6STA.setADM_EN; inline;
  37422. begin
  37423. pTDefRegMap(@Self)^.&set := $01000000;
  37424. end;
  37425. procedure TUART6_U6STA.clearADM_EN; inline;
  37426. begin
  37427. pTDefRegMap(@Self)^.clr := $01000000;
  37428. end;
  37429. procedure TUART6_U6STA.setADM_EN(thebits : TBits_1); inline;
  37430. begin
  37431. if thebits = 0 then
  37432. pTDefRegMap(@Self)^.clr := $01000000
  37433. else
  37434. pTDefRegMap(@Self)^.&set := $01000000;
  37435. end;
  37436. function TUART6_U6STA.getADM_EN : TBits_1; inline;
  37437. begin
  37438. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  37439. end;
  37440. procedure TUART6_U6STA.setURXISEL0; inline;
  37441. begin
  37442. pTDefRegMap(@Self)^.&set := $00000040;
  37443. end;
  37444. procedure TUART6_U6STA.clearURXISEL0; inline;
  37445. begin
  37446. pTDefRegMap(@Self)^.clr := $00000040;
  37447. end;
  37448. procedure TUART6_U6STA.setURXISEL0(thebits : TBits_1); inline;
  37449. begin
  37450. if thebits = 0 then
  37451. pTDefRegMap(@Self)^.clr := $00000040
  37452. else
  37453. pTDefRegMap(@Self)^.&set := $00000040;
  37454. end;
  37455. function TUART6_U6STA.getURXISEL0 : TBits_1; inline;
  37456. begin
  37457. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  37458. end;
  37459. procedure TUART6_U6STA.setURXISEL1; inline;
  37460. begin
  37461. pTDefRegMap(@Self)^.&set := $00000080;
  37462. end;
  37463. procedure TUART6_U6STA.clearURXISEL1; inline;
  37464. begin
  37465. pTDefRegMap(@Self)^.clr := $00000080;
  37466. end;
  37467. procedure TUART6_U6STA.setURXISEL1(thebits : TBits_1); inline;
  37468. begin
  37469. if thebits = 0 then
  37470. pTDefRegMap(@Self)^.clr := $00000080
  37471. else
  37472. pTDefRegMap(@Self)^.&set := $00000080;
  37473. end;
  37474. function TUART6_U6STA.getURXISEL1 : TBits_1; inline;
  37475. begin
  37476. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  37477. end;
  37478. procedure TUART6_U6STA.setUTXISEL0; inline;
  37479. begin
  37480. pTDefRegMap(@Self)^.&set := $00004000;
  37481. end;
  37482. procedure TUART6_U6STA.clearUTXISEL0; inline;
  37483. begin
  37484. pTDefRegMap(@Self)^.clr := $00004000;
  37485. end;
  37486. procedure TUART6_U6STA.setUTXISEL0(thebits : TBits_1); inline;
  37487. begin
  37488. if thebits = 0 then
  37489. pTDefRegMap(@Self)^.clr := $00004000
  37490. else
  37491. pTDefRegMap(@Self)^.&set := $00004000;
  37492. end;
  37493. function TUART6_U6STA.getUTXISEL0 : TBits_1; inline;
  37494. begin
  37495. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  37496. end;
  37497. procedure TUART6_U6STA.setUTXISEL1; inline;
  37498. begin
  37499. pTDefRegMap(@Self)^.&set := $00008000;
  37500. end;
  37501. procedure TUART6_U6STA.clearUTXISEL1; inline;
  37502. begin
  37503. pTDefRegMap(@Self)^.clr := $00008000;
  37504. end;
  37505. procedure TUART6_U6STA.setUTXISEL1(thebits : TBits_1); inline;
  37506. begin
  37507. if thebits = 0 then
  37508. pTDefRegMap(@Self)^.clr := $00008000
  37509. else
  37510. pTDefRegMap(@Self)^.&set := $00008000;
  37511. end;
  37512. function TUART6_U6STA.getUTXISEL1 : TBits_1; inline;
  37513. begin
  37514. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  37515. end;
  37516. procedure TUART6_U6STA.setUTXSEL(thebits : TBits_2); inline;
  37517. begin
  37518. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  37519. end;
  37520. function TUART6_U6STA.getUTXSEL : TBits_2; inline;
  37521. begin
  37522. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  37523. end;
  37524. procedure TUART6_U6STA.setw(thebits : TBits_32); inline;
  37525. begin
  37526. pTDefRegMap(@Self)^.val := thebits;
  37527. end;
  37528. function TUART6_U6STA.getw : TBits_32; inline;
  37529. begin
  37530. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  37531. end;
  37532. procedure TUART2_U2MODE.setSTSEL; inline;
  37533. begin
  37534. pTDefRegMap(@Self)^.&set := $00000001;
  37535. end;
  37536. procedure TUART2_U2MODE.clearSTSEL; inline;
  37537. begin
  37538. pTDefRegMap(@Self)^.clr := $00000001;
  37539. end;
  37540. procedure TUART2_U2MODE.setSTSEL(thebits : TBits_1); inline;
  37541. begin
  37542. if thebits = 0 then
  37543. pTDefRegMap(@Self)^.clr := $00000001
  37544. else
  37545. pTDefRegMap(@Self)^.&set := $00000001;
  37546. end;
  37547. function TUART2_U2MODE.getSTSEL : TBits_1; inline;
  37548. begin
  37549. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  37550. end;
  37551. procedure TUART2_U2MODE.setPDSEL(thebits : TBits_2); inline;
  37552. begin
  37553. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  37554. end;
  37555. function TUART2_U2MODE.getPDSEL : TBits_2; inline;
  37556. begin
  37557. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  37558. end;
  37559. procedure TUART2_U2MODE.setBRGH; inline;
  37560. begin
  37561. pTDefRegMap(@Self)^.&set := $00000008;
  37562. end;
  37563. procedure TUART2_U2MODE.clearBRGH; inline;
  37564. begin
  37565. pTDefRegMap(@Self)^.clr := $00000008;
  37566. end;
  37567. procedure TUART2_U2MODE.setBRGH(thebits : TBits_1); inline;
  37568. begin
  37569. if thebits = 0 then
  37570. pTDefRegMap(@Self)^.clr := $00000008
  37571. else
  37572. pTDefRegMap(@Self)^.&set := $00000008;
  37573. end;
  37574. function TUART2_U2MODE.getBRGH : TBits_1; inline;
  37575. begin
  37576. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  37577. end;
  37578. procedure TUART2_U2MODE.setRXINV; inline;
  37579. begin
  37580. pTDefRegMap(@Self)^.&set := $00000010;
  37581. end;
  37582. procedure TUART2_U2MODE.clearRXINV; inline;
  37583. begin
  37584. pTDefRegMap(@Self)^.clr := $00000010;
  37585. end;
  37586. procedure TUART2_U2MODE.setRXINV(thebits : TBits_1); inline;
  37587. begin
  37588. if thebits = 0 then
  37589. pTDefRegMap(@Self)^.clr := $00000010
  37590. else
  37591. pTDefRegMap(@Self)^.&set := $00000010;
  37592. end;
  37593. function TUART2_U2MODE.getRXINV : TBits_1; inline;
  37594. begin
  37595. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  37596. end;
  37597. procedure TUART2_U2MODE.setABAUD; inline;
  37598. begin
  37599. pTDefRegMap(@Self)^.&set := $00000020;
  37600. end;
  37601. procedure TUART2_U2MODE.clearABAUD; inline;
  37602. begin
  37603. pTDefRegMap(@Self)^.clr := $00000020;
  37604. end;
  37605. procedure TUART2_U2MODE.setABAUD(thebits : TBits_1); inline;
  37606. begin
  37607. if thebits = 0 then
  37608. pTDefRegMap(@Self)^.clr := $00000020
  37609. else
  37610. pTDefRegMap(@Self)^.&set := $00000020;
  37611. end;
  37612. function TUART2_U2MODE.getABAUD : TBits_1; inline;
  37613. begin
  37614. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  37615. end;
  37616. procedure TUART2_U2MODE.setLPBACK; inline;
  37617. begin
  37618. pTDefRegMap(@Self)^.&set := $00000040;
  37619. end;
  37620. procedure TUART2_U2MODE.clearLPBACK; inline;
  37621. begin
  37622. pTDefRegMap(@Self)^.clr := $00000040;
  37623. end;
  37624. procedure TUART2_U2MODE.setLPBACK(thebits : TBits_1); inline;
  37625. begin
  37626. if thebits = 0 then
  37627. pTDefRegMap(@Self)^.clr := $00000040
  37628. else
  37629. pTDefRegMap(@Self)^.&set := $00000040;
  37630. end;
  37631. function TUART2_U2MODE.getLPBACK : TBits_1; inline;
  37632. begin
  37633. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  37634. end;
  37635. procedure TUART2_U2MODE.setWAKE; inline;
  37636. begin
  37637. pTDefRegMap(@Self)^.&set := $00000080;
  37638. end;
  37639. procedure TUART2_U2MODE.clearWAKE; inline;
  37640. begin
  37641. pTDefRegMap(@Self)^.clr := $00000080;
  37642. end;
  37643. procedure TUART2_U2MODE.setWAKE(thebits : TBits_1); inline;
  37644. begin
  37645. if thebits = 0 then
  37646. pTDefRegMap(@Self)^.clr := $00000080
  37647. else
  37648. pTDefRegMap(@Self)^.&set := $00000080;
  37649. end;
  37650. function TUART2_U2MODE.getWAKE : TBits_1; inline;
  37651. begin
  37652. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  37653. end;
  37654. procedure TUART2_U2MODE.setUEN(thebits : TBits_2); inline;
  37655. begin
  37656. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  37657. end;
  37658. function TUART2_U2MODE.getUEN : TBits_2; inline;
  37659. begin
  37660. getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  37661. end;
  37662. procedure TUART2_U2MODE.setRTSMD; inline;
  37663. begin
  37664. pTDefRegMap(@Self)^.&set := $00000800;
  37665. end;
  37666. procedure TUART2_U2MODE.clearRTSMD; inline;
  37667. begin
  37668. pTDefRegMap(@Self)^.clr := $00000800;
  37669. end;
  37670. procedure TUART2_U2MODE.setRTSMD(thebits : TBits_1); inline;
  37671. begin
  37672. if thebits = 0 then
  37673. pTDefRegMap(@Self)^.clr := $00000800
  37674. else
  37675. pTDefRegMap(@Self)^.&set := $00000800;
  37676. end;
  37677. function TUART2_U2MODE.getRTSMD : TBits_1; inline;
  37678. begin
  37679. getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  37680. end;
  37681. procedure TUART2_U2MODE.setIREN; inline;
  37682. begin
  37683. pTDefRegMap(@Self)^.&set := $00001000;
  37684. end;
  37685. procedure TUART2_U2MODE.clearIREN; inline;
  37686. begin
  37687. pTDefRegMap(@Self)^.clr := $00001000;
  37688. end;
  37689. procedure TUART2_U2MODE.setIREN(thebits : TBits_1); inline;
  37690. begin
  37691. if thebits = 0 then
  37692. pTDefRegMap(@Self)^.clr := $00001000
  37693. else
  37694. pTDefRegMap(@Self)^.&set := $00001000;
  37695. end;
  37696. function TUART2_U2MODE.getIREN : TBits_1; inline;
  37697. begin
  37698. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  37699. end;
  37700. procedure TUART2_U2MODE.setSIDL; inline;
  37701. begin
  37702. pTDefRegMap(@Self)^.&set := $00002000;
  37703. end;
  37704. procedure TUART2_U2MODE.clearSIDL; inline;
  37705. begin
  37706. pTDefRegMap(@Self)^.clr := $00002000;
  37707. end;
  37708. procedure TUART2_U2MODE.setSIDL(thebits : TBits_1); inline;
  37709. begin
  37710. if thebits = 0 then
  37711. pTDefRegMap(@Self)^.clr := $00002000
  37712. else
  37713. pTDefRegMap(@Self)^.&set := $00002000;
  37714. end;
  37715. function TUART2_U2MODE.getSIDL : TBits_1; inline;
  37716. begin
  37717. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  37718. end;
  37719. procedure TUART2_U2MODE.setON; inline;
  37720. begin
  37721. pTDefRegMap(@Self)^.&set := $00008000;
  37722. end;
  37723. procedure TUART2_U2MODE.clearON; inline;
  37724. begin
  37725. pTDefRegMap(@Self)^.clr := $00008000;
  37726. end;
  37727. procedure TUART2_U2MODE.setON(thebits : TBits_1); inline;
  37728. begin
  37729. if thebits = 0 then
  37730. pTDefRegMap(@Self)^.clr := $00008000
  37731. else
  37732. pTDefRegMap(@Self)^.&set := $00008000;
  37733. end;
  37734. function TUART2_U2MODE.getON : TBits_1; inline;
  37735. begin
  37736. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  37737. end;
  37738. procedure TUART2_U2MODE.setPDSEL0; inline;
  37739. begin
  37740. pTDefRegMap(@Self)^.&set := $00000002;
  37741. end;
  37742. procedure TUART2_U2MODE.clearPDSEL0; inline;
  37743. begin
  37744. pTDefRegMap(@Self)^.clr := $00000002;
  37745. end;
  37746. procedure TUART2_U2MODE.setPDSEL0(thebits : TBits_1); inline;
  37747. begin
  37748. if thebits = 0 then
  37749. pTDefRegMap(@Self)^.clr := $00000002
  37750. else
  37751. pTDefRegMap(@Self)^.&set := $00000002;
  37752. end;
  37753. function TUART2_U2MODE.getPDSEL0 : TBits_1; inline;
  37754. begin
  37755. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  37756. end;
  37757. procedure TUART2_U2MODE.setPDSEL1; inline;
  37758. begin
  37759. pTDefRegMap(@Self)^.&set := $00000004;
  37760. end;
  37761. procedure TUART2_U2MODE.clearPDSEL1; inline;
  37762. begin
  37763. pTDefRegMap(@Self)^.clr := $00000004;
  37764. end;
  37765. procedure TUART2_U2MODE.setPDSEL1(thebits : TBits_1); inline;
  37766. begin
  37767. if thebits = 0 then
  37768. pTDefRegMap(@Self)^.clr := $00000004
  37769. else
  37770. pTDefRegMap(@Self)^.&set := $00000004;
  37771. end;
  37772. function TUART2_U2MODE.getPDSEL1 : TBits_1; inline;
  37773. begin
  37774. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  37775. end;
  37776. procedure TUART2_U2MODE.setUEN0; inline;
  37777. begin
  37778. pTDefRegMap(@Self)^.&set := $00000100;
  37779. end;
  37780. procedure TUART2_U2MODE.clearUEN0; inline;
  37781. begin
  37782. pTDefRegMap(@Self)^.clr := $00000100;
  37783. end;
  37784. procedure TUART2_U2MODE.setUEN0(thebits : TBits_1); inline;
  37785. begin
  37786. if thebits = 0 then
  37787. pTDefRegMap(@Self)^.clr := $00000100
  37788. else
  37789. pTDefRegMap(@Self)^.&set := $00000100;
  37790. end;
  37791. function TUART2_U2MODE.getUEN0 : TBits_1; inline;
  37792. begin
  37793. getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  37794. end;
  37795. procedure TUART2_U2MODE.setUEN1; inline;
  37796. begin
  37797. pTDefRegMap(@Self)^.&set := $00000200;
  37798. end;
  37799. procedure TUART2_U2MODE.clearUEN1; inline;
  37800. begin
  37801. pTDefRegMap(@Self)^.clr := $00000200;
  37802. end;
  37803. procedure TUART2_U2MODE.setUEN1(thebits : TBits_1); inline;
  37804. begin
  37805. if thebits = 0 then
  37806. pTDefRegMap(@Self)^.clr := $00000200
  37807. else
  37808. pTDefRegMap(@Self)^.&set := $00000200;
  37809. end;
  37810. function TUART2_U2MODE.getUEN1 : TBits_1; inline;
  37811. begin
  37812. getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  37813. end;
  37814. procedure TUART2_U2MODE.setUSIDL; inline;
  37815. begin
  37816. pTDefRegMap(@Self)^.&set := $00002000;
  37817. end;
  37818. procedure TUART2_U2MODE.clearUSIDL; inline;
  37819. begin
  37820. pTDefRegMap(@Self)^.clr := $00002000;
  37821. end;
  37822. procedure TUART2_U2MODE.setUSIDL(thebits : TBits_1); inline;
  37823. begin
  37824. if thebits = 0 then
  37825. pTDefRegMap(@Self)^.clr := $00002000
  37826. else
  37827. pTDefRegMap(@Self)^.&set := $00002000;
  37828. end;
  37829. function TUART2_U2MODE.getUSIDL : TBits_1; inline;
  37830. begin
  37831. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  37832. end;
  37833. procedure TUART2_U2MODE.setUARTEN; inline;
  37834. begin
  37835. pTDefRegMap(@Self)^.&set := $00008000;
  37836. end;
  37837. procedure TUART2_U2MODE.clearUARTEN; inline;
  37838. begin
  37839. pTDefRegMap(@Self)^.clr := $00008000;
  37840. end;
  37841. procedure TUART2_U2MODE.setUARTEN(thebits : TBits_1); inline;
  37842. begin
  37843. if thebits = 0 then
  37844. pTDefRegMap(@Self)^.clr := $00008000
  37845. else
  37846. pTDefRegMap(@Self)^.&set := $00008000;
  37847. end;
  37848. function TUART2_U2MODE.getUARTEN : TBits_1; inline;
  37849. begin
  37850. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  37851. end;
  37852. procedure TUART2_U2MODE.setw(thebits : TBits_32); inline;
  37853. begin
  37854. pTDefRegMap(@Self)^.val := thebits;
  37855. end;
  37856. function TUART2_U2MODE.getw : TBits_32; inline;
  37857. begin
  37858. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  37859. end;
  37860. procedure TUART2_U3AMODE.setSTSEL; inline;
  37861. begin
  37862. pTDefRegMap(@Self)^.&set := $00000001;
  37863. end;
  37864. procedure TUART2_U3AMODE.clearSTSEL; inline;
  37865. begin
  37866. pTDefRegMap(@Self)^.clr := $00000001;
  37867. end;
  37868. procedure TUART2_U3AMODE.setSTSEL(thebits : TBits_1); inline;
  37869. begin
  37870. if thebits = 0 then
  37871. pTDefRegMap(@Self)^.clr := $00000001
  37872. else
  37873. pTDefRegMap(@Self)^.&set := $00000001;
  37874. end;
  37875. function TUART2_U3AMODE.getSTSEL : TBits_1; inline;
  37876. begin
  37877. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  37878. end;
  37879. procedure TUART2_U3AMODE.setPDSEL(thebits : TBits_2); inline;
  37880. begin
  37881. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  37882. end;
  37883. function TUART2_U3AMODE.getPDSEL : TBits_2; inline;
  37884. begin
  37885. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  37886. end;
  37887. procedure TUART2_U3AMODE.setBRGH; inline;
  37888. begin
  37889. pTDefRegMap(@Self)^.&set := $00000008;
  37890. end;
  37891. procedure TUART2_U3AMODE.clearBRGH; inline;
  37892. begin
  37893. pTDefRegMap(@Self)^.clr := $00000008;
  37894. end;
  37895. procedure TUART2_U3AMODE.setBRGH(thebits : TBits_1); inline;
  37896. begin
  37897. if thebits = 0 then
  37898. pTDefRegMap(@Self)^.clr := $00000008
  37899. else
  37900. pTDefRegMap(@Self)^.&set := $00000008;
  37901. end;
  37902. function TUART2_U3AMODE.getBRGH : TBits_1; inline;
  37903. begin
  37904. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  37905. end;
  37906. procedure TUART2_U3AMODE.setRXINV; inline;
  37907. begin
  37908. pTDefRegMap(@Self)^.&set := $00000010;
  37909. end;
  37910. procedure TUART2_U3AMODE.clearRXINV; inline;
  37911. begin
  37912. pTDefRegMap(@Self)^.clr := $00000010;
  37913. end;
  37914. procedure TUART2_U3AMODE.setRXINV(thebits : TBits_1); inline;
  37915. begin
  37916. if thebits = 0 then
  37917. pTDefRegMap(@Self)^.clr := $00000010
  37918. else
  37919. pTDefRegMap(@Self)^.&set := $00000010;
  37920. end;
  37921. function TUART2_U3AMODE.getRXINV : TBits_1; inline;
  37922. begin
  37923. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  37924. end;
  37925. procedure TUART2_U3AMODE.setABAUD; inline;
  37926. begin
  37927. pTDefRegMap(@Self)^.&set := $00000020;
  37928. end;
  37929. procedure TUART2_U3AMODE.clearABAUD; inline;
  37930. begin
  37931. pTDefRegMap(@Self)^.clr := $00000020;
  37932. end;
  37933. procedure TUART2_U3AMODE.setABAUD(thebits : TBits_1); inline;
  37934. begin
  37935. if thebits = 0 then
  37936. pTDefRegMap(@Self)^.clr := $00000020
  37937. else
  37938. pTDefRegMap(@Self)^.&set := $00000020;
  37939. end;
  37940. function TUART2_U3AMODE.getABAUD : TBits_1; inline;
  37941. begin
  37942. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  37943. end;
  37944. procedure TUART2_U3AMODE.setLPBACK; inline;
  37945. begin
  37946. pTDefRegMap(@Self)^.&set := $00000040;
  37947. end;
  37948. procedure TUART2_U3AMODE.clearLPBACK; inline;
  37949. begin
  37950. pTDefRegMap(@Self)^.clr := $00000040;
  37951. end;
  37952. procedure TUART2_U3AMODE.setLPBACK(thebits : TBits_1); inline;
  37953. begin
  37954. if thebits = 0 then
  37955. pTDefRegMap(@Self)^.clr := $00000040
  37956. else
  37957. pTDefRegMap(@Self)^.&set := $00000040;
  37958. end;
  37959. function TUART2_U3AMODE.getLPBACK : TBits_1; inline;
  37960. begin
  37961. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  37962. end;
  37963. procedure TUART2_U3AMODE.setWAKE; inline;
  37964. begin
  37965. pTDefRegMap(@Self)^.&set := $00000080;
  37966. end;
  37967. procedure TUART2_U3AMODE.clearWAKE; inline;
  37968. begin
  37969. pTDefRegMap(@Self)^.clr := $00000080;
  37970. end;
  37971. procedure TUART2_U3AMODE.setWAKE(thebits : TBits_1); inline;
  37972. begin
  37973. if thebits = 0 then
  37974. pTDefRegMap(@Self)^.clr := $00000080
  37975. else
  37976. pTDefRegMap(@Self)^.&set := $00000080;
  37977. end;
  37978. function TUART2_U3AMODE.getWAKE : TBits_1; inline;
  37979. begin
  37980. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  37981. end;
  37982. procedure TUART2_U3AMODE.setUEN(thebits : TBits_2); inline;
  37983. begin
  37984. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  37985. end;
  37986. function TUART2_U3AMODE.getUEN : TBits_2; inline;
  37987. begin
  37988. getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  37989. end;
  37990. procedure TUART2_U3AMODE.setRTSMD; inline;
  37991. begin
  37992. pTDefRegMap(@Self)^.&set := $00000800;
  37993. end;
  37994. procedure TUART2_U3AMODE.clearRTSMD; inline;
  37995. begin
  37996. pTDefRegMap(@Self)^.clr := $00000800;
  37997. end;
  37998. procedure TUART2_U3AMODE.setRTSMD(thebits : TBits_1); inline;
  37999. begin
  38000. if thebits = 0 then
  38001. pTDefRegMap(@Self)^.clr := $00000800
  38002. else
  38003. pTDefRegMap(@Self)^.&set := $00000800;
  38004. end;
  38005. function TUART2_U3AMODE.getRTSMD : TBits_1; inline;
  38006. begin
  38007. getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  38008. end;
  38009. procedure TUART2_U3AMODE.setIREN; inline;
  38010. begin
  38011. pTDefRegMap(@Self)^.&set := $00001000;
  38012. end;
  38013. procedure TUART2_U3AMODE.clearIREN; inline;
  38014. begin
  38015. pTDefRegMap(@Self)^.clr := $00001000;
  38016. end;
  38017. procedure TUART2_U3AMODE.setIREN(thebits : TBits_1); inline;
  38018. begin
  38019. if thebits = 0 then
  38020. pTDefRegMap(@Self)^.clr := $00001000
  38021. else
  38022. pTDefRegMap(@Self)^.&set := $00001000;
  38023. end;
  38024. function TUART2_U3AMODE.getIREN : TBits_1; inline;
  38025. begin
  38026. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  38027. end;
  38028. procedure TUART2_U3AMODE.setSIDL; inline;
  38029. begin
  38030. pTDefRegMap(@Self)^.&set := $00002000;
  38031. end;
  38032. procedure TUART2_U3AMODE.clearSIDL; inline;
  38033. begin
  38034. pTDefRegMap(@Self)^.clr := $00002000;
  38035. end;
  38036. procedure TUART2_U3AMODE.setSIDL(thebits : TBits_1); inline;
  38037. begin
  38038. if thebits = 0 then
  38039. pTDefRegMap(@Self)^.clr := $00002000
  38040. else
  38041. pTDefRegMap(@Self)^.&set := $00002000;
  38042. end;
  38043. function TUART2_U3AMODE.getSIDL : TBits_1; inline;
  38044. begin
  38045. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  38046. end;
  38047. procedure TUART2_U3AMODE.setON; inline;
  38048. begin
  38049. pTDefRegMap(@Self)^.&set := $00008000;
  38050. end;
  38051. procedure TUART2_U3AMODE.clearON; inline;
  38052. begin
  38053. pTDefRegMap(@Self)^.clr := $00008000;
  38054. end;
  38055. procedure TUART2_U3AMODE.setON(thebits : TBits_1); inline;
  38056. begin
  38057. if thebits = 0 then
  38058. pTDefRegMap(@Self)^.clr := $00008000
  38059. else
  38060. pTDefRegMap(@Self)^.&set := $00008000;
  38061. end;
  38062. function TUART2_U3AMODE.getON : TBits_1; inline;
  38063. begin
  38064. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  38065. end;
  38066. procedure TUART2_U3AMODE.setPDSEL0; inline;
  38067. begin
  38068. pTDefRegMap(@Self)^.&set := $00000002;
  38069. end;
  38070. procedure TUART2_U3AMODE.clearPDSEL0; inline;
  38071. begin
  38072. pTDefRegMap(@Self)^.clr := $00000002;
  38073. end;
  38074. procedure TUART2_U3AMODE.setPDSEL0(thebits : TBits_1); inline;
  38075. begin
  38076. if thebits = 0 then
  38077. pTDefRegMap(@Self)^.clr := $00000002
  38078. else
  38079. pTDefRegMap(@Self)^.&set := $00000002;
  38080. end;
  38081. function TUART2_U3AMODE.getPDSEL0 : TBits_1; inline;
  38082. begin
  38083. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  38084. end;
  38085. procedure TUART2_U3AMODE.setPDSEL1; inline;
  38086. begin
  38087. pTDefRegMap(@Self)^.&set := $00000004;
  38088. end;
  38089. procedure TUART2_U3AMODE.clearPDSEL1; inline;
  38090. begin
  38091. pTDefRegMap(@Self)^.clr := $00000004;
  38092. end;
  38093. procedure TUART2_U3AMODE.setPDSEL1(thebits : TBits_1); inline;
  38094. begin
  38095. if thebits = 0 then
  38096. pTDefRegMap(@Self)^.clr := $00000004
  38097. else
  38098. pTDefRegMap(@Self)^.&set := $00000004;
  38099. end;
  38100. function TUART2_U3AMODE.getPDSEL1 : TBits_1; inline;
  38101. begin
  38102. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  38103. end;
  38104. procedure TUART2_U3AMODE.setUEN0; inline;
  38105. begin
  38106. pTDefRegMap(@Self)^.&set := $00000100;
  38107. end;
  38108. procedure TUART2_U3AMODE.clearUEN0; inline;
  38109. begin
  38110. pTDefRegMap(@Self)^.clr := $00000100;
  38111. end;
  38112. procedure TUART2_U3AMODE.setUEN0(thebits : TBits_1); inline;
  38113. begin
  38114. if thebits = 0 then
  38115. pTDefRegMap(@Self)^.clr := $00000100
  38116. else
  38117. pTDefRegMap(@Self)^.&set := $00000100;
  38118. end;
  38119. function TUART2_U3AMODE.getUEN0 : TBits_1; inline;
  38120. begin
  38121. getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  38122. end;
  38123. procedure TUART2_U3AMODE.setUEN1; inline;
  38124. begin
  38125. pTDefRegMap(@Self)^.&set := $00000200;
  38126. end;
  38127. procedure TUART2_U3AMODE.clearUEN1; inline;
  38128. begin
  38129. pTDefRegMap(@Self)^.clr := $00000200;
  38130. end;
  38131. procedure TUART2_U3AMODE.setUEN1(thebits : TBits_1); inline;
  38132. begin
  38133. if thebits = 0 then
  38134. pTDefRegMap(@Self)^.clr := $00000200
  38135. else
  38136. pTDefRegMap(@Self)^.&set := $00000200;
  38137. end;
  38138. function TUART2_U3AMODE.getUEN1 : TBits_1; inline;
  38139. begin
  38140. getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  38141. end;
  38142. procedure TUART2_U3AMODE.setUSIDL; inline;
  38143. begin
  38144. pTDefRegMap(@Self)^.&set := $00002000;
  38145. end;
  38146. procedure TUART2_U3AMODE.clearUSIDL; inline;
  38147. begin
  38148. pTDefRegMap(@Self)^.clr := $00002000;
  38149. end;
  38150. procedure TUART2_U3AMODE.setUSIDL(thebits : TBits_1); inline;
  38151. begin
  38152. if thebits = 0 then
  38153. pTDefRegMap(@Self)^.clr := $00002000
  38154. else
  38155. pTDefRegMap(@Self)^.&set := $00002000;
  38156. end;
  38157. function TUART2_U3AMODE.getUSIDL : TBits_1; inline;
  38158. begin
  38159. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  38160. end;
  38161. procedure TUART2_U3AMODE.setUARTEN; inline;
  38162. begin
  38163. pTDefRegMap(@Self)^.&set := $00008000;
  38164. end;
  38165. procedure TUART2_U3AMODE.clearUARTEN; inline;
  38166. begin
  38167. pTDefRegMap(@Self)^.clr := $00008000;
  38168. end;
  38169. procedure TUART2_U3AMODE.setUARTEN(thebits : TBits_1); inline;
  38170. begin
  38171. if thebits = 0 then
  38172. pTDefRegMap(@Self)^.clr := $00008000
  38173. else
  38174. pTDefRegMap(@Self)^.&set := $00008000;
  38175. end;
  38176. function TUART2_U3AMODE.getUARTEN : TBits_1; inline;
  38177. begin
  38178. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  38179. end;
  38180. procedure TUART2_U3AMODE.setw(thebits : TBits_32); inline;
  38181. begin
  38182. pTDefRegMap(@Self)^.val := thebits;
  38183. end;
  38184. function TUART2_U3AMODE.getw : TBits_32; inline;
  38185. begin
  38186. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  38187. end;
  38188. procedure TUART2_U2STA.setURXDA; inline;
  38189. begin
  38190. pTDefRegMap(@Self)^.&set := $00000001;
  38191. end;
  38192. procedure TUART2_U2STA.clearURXDA; inline;
  38193. begin
  38194. pTDefRegMap(@Self)^.clr := $00000001;
  38195. end;
  38196. procedure TUART2_U2STA.setURXDA(thebits : TBits_1); inline;
  38197. begin
  38198. if thebits = 0 then
  38199. pTDefRegMap(@Self)^.clr := $00000001
  38200. else
  38201. pTDefRegMap(@Self)^.&set := $00000001;
  38202. end;
  38203. function TUART2_U2STA.getURXDA : TBits_1; inline;
  38204. begin
  38205. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  38206. end;
  38207. procedure TUART2_U2STA.setOERR; inline;
  38208. begin
  38209. pTDefRegMap(@Self)^.&set := $00000002;
  38210. end;
  38211. procedure TUART2_U2STA.clearOERR; inline;
  38212. begin
  38213. pTDefRegMap(@Self)^.clr := $00000002;
  38214. end;
  38215. procedure TUART2_U2STA.setOERR(thebits : TBits_1); inline;
  38216. begin
  38217. if thebits = 0 then
  38218. pTDefRegMap(@Self)^.clr := $00000002
  38219. else
  38220. pTDefRegMap(@Self)^.&set := $00000002;
  38221. end;
  38222. function TUART2_U2STA.getOERR : TBits_1; inline;
  38223. begin
  38224. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  38225. end;
  38226. procedure TUART2_U2STA.setFERR; inline;
  38227. begin
  38228. pTDefRegMap(@Self)^.&set := $00000004;
  38229. end;
  38230. procedure TUART2_U2STA.clearFERR; inline;
  38231. begin
  38232. pTDefRegMap(@Self)^.clr := $00000004;
  38233. end;
  38234. procedure TUART2_U2STA.setFERR(thebits : TBits_1); inline;
  38235. begin
  38236. if thebits = 0 then
  38237. pTDefRegMap(@Self)^.clr := $00000004
  38238. else
  38239. pTDefRegMap(@Self)^.&set := $00000004;
  38240. end;
  38241. function TUART2_U2STA.getFERR : TBits_1; inline;
  38242. begin
  38243. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  38244. end;
  38245. procedure TUART2_U2STA.setPERR; inline;
  38246. begin
  38247. pTDefRegMap(@Self)^.&set := $00000008;
  38248. end;
  38249. procedure TUART2_U2STA.clearPERR; inline;
  38250. begin
  38251. pTDefRegMap(@Self)^.clr := $00000008;
  38252. end;
  38253. procedure TUART2_U2STA.setPERR(thebits : TBits_1); inline;
  38254. begin
  38255. if thebits = 0 then
  38256. pTDefRegMap(@Self)^.clr := $00000008
  38257. else
  38258. pTDefRegMap(@Self)^.&set := $00000008;
  38259. end;
  38260. function TUART2_U2STA.getPERR : TBits_1; inline;
  38261. begin
  38262. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  38263. end;
  38264. procedure TUART2_U2STA.setRIDLE; inline;
  38265. begin
  38266. pTDefRegMap(@Self)^.&set := $00000010;
  38267. end;
  38268. procedure TUART2_U2STA.clearRIDLE; inline;
  38269. begin
  38270. pTDefRegMap(@Self)^.clr := $00000010;
  38271. end;
  38272. procedure TUART2_U2STA.setRIDLE(thebits : TBits_1); inline;
  38273. begin
  38274. if thebits = 0 then
  38275. pTDefRegMap(@Self)^.clr := $00000010
  38276. else
  38277. pTDefRegMap(@Self)^.&set := $00000010;
  38278. end;
  38279. function TUART2_U2STA.getRIDLE : TBits_1; inline;
  38280. begin
  38281. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  38282. end;
  38283. procedure TUART2_U2STA.setADDEN; inline;
  38284. begin
  38285. pTDefRegMap(@Self)^.&set := $00000020;
  38286. end;
  38287. procedure TUART2_U2STA.clearADDEN; inline;
  38288. begin
  38289. pTDefRegMap(@Self)^.clr := $00000020;
  38290. end;
  38291. procedure TUART2_U2STA.setADDEN(thebits : TBits_1); inline;
  38292. begin
  38293. if thebits = 0 then
  38294. pTDefRegMap(@Self)^.clr := $00000020
  38295. else
  38296. pTDefRegMap(@Self)^.&set := $00000020;
  38297. end;
  38298. function TUART2_U2STA.getADDEN : TBits_1; inline;
  38299. begin
  38300. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  38301. end;
  38302. procedure TUART2_U2STA.setURXISEL(thebits : TBits_2); inline;
  38303. begin
  38304. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  38305. end;
  38306. function TUART2_U2STA.getURXISEL : TBits_2; inline;
  38307. begin
  38308. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  38309. end;
  38310. procedure TUART2_U2STA.setTRMT; inline;
  38311. begin
  38312. pTDefRegMap(@Self)^.&set := $00000100;
  38313. end;
  38314. procedure TUART2_U2STA.clearTRMT; inline;
  38315. begin
  38316. pTDefRegMap(@Self)^.clr := $00000100;
  38317. end;
  38318. procedure TUART2_U2STA.setTRMT(thebits : TBits_1); inline;
  38319. begin
  38320. if thebits = 0 then
  38321. pTDefRegMap(@Self)^.clr := $00000100
  38322. else
  38323. pTDefRegMap(@Self)^.&set := $00000100;
  38324. end;
  38325. function TUART2_U2STA.getTRMT : TBits_1; inline;
  38326. begin
  38327. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  38328. end;
  38329. procedure TUART2_U2STA.setUTXBF; inline;
  38330. begin
  38331. pTDefRegMap(@Self)^.&set := $00000200;
  38332. end;
  38333. procedure TUART2_U2STA.clearUTXBF; inline;
  38334. begin
  38335. pTDefRegMap(@Self)^.clr := $00000200;
  38336. end;
  38337. procedure TUART2_U2STA.setUTXBF(thebits : TBits_1); inline;
  38338. begin
  38339. if thebits = 0 then
  38340. pTDefRegMap(@Self)^.clr := $00000200
  38341. else
  38342. pTDefRegMap(@Self)^.&set := $00000200;
  38343. end;
  38344. function TUART2_U2STA.getUTXBF : TBits_1; inline;
  38345. begin
  38346. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  38347. end;
  38348. procedure TUART2_U2STA.setUTXEN; inline;
  38349. begin
  38350. pTDefRegMap(@Self)^.&set := $00000400;
  38351. end;
  38352. procedure TUART2_U2STA.clearUTXEN; inline;
  38353. begin
  38354. pTDefRegMap(@Self)^.clr := $00000400;
  38355. end;
  38356. procedure TUART2_U2STA.setUTXEN(thebits : TBits_1); inline;
  38357. begin
  38358. if thebits = 0 then
  38359. pTDefRegMap(@Self)^.clr := $00000400
  38360. else
  38361. pTDefRegMap(@Self)^.&set := $00000400;
  38362. end;
  38363. function TUART2_U2STA.getUTXEN : TBits_1; inline;
  38364. begin
  38365. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  38366. end;
  38367. procedure TUART2_U2STA.setUTXBRK; inline;
  38368. begin
  38369. pTDefRegMap(@Self)^.&set := $00000800;
  38370. end;
  38371. procedure TUART2_U2STA.clearUTXBRK; inline;
  38372. begin
  38373. pTDefRegMap(@Self)^.clr := $00000800;
  38374. end;
  38375. procedure TUART2_U2STA.setUTXBRK(thebits : TBits_1); inline;
  38376. begin
  38377. if thebits = 0 then
  38378. pTDefRegMap(@Self)^.clr := $00000800
  38379. else
  38380. pTDefRegMap(@Self)^.&set := $00000800;
  38381. end;
  38382. function TUART2_U2STA.getUTXBRK : TBits_1; inline;
  38383. begin
  38384. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  38385. end;
  38386. procedure TUART2_U2STA.setURXEN; inline;
  38387. begin
  38388. pTDefRegMap(@Self)^.&set := $00001000;
  38389. end;
  38390. procedure TUART2_U2STA.clearURXEN; inline;
  38391. begin
  38392. pTDefRegMap(@Self)^.clr := $00001000;
  38393. end;
  38394. procedure TUART2_U2STA.setURXEN(thebits : TBits_1); inline;
  38395. begin
  38396. if thebits = 0 then
  38397. pTDefRegMap(@Self)^.clr := $00001000
  38398. else
  38399. pTDefRegMap(@Self)^.&set := $00001000;
  38400. end;
  38401. function TUART2_U2STA.getURXEN : TBits_1; inline;
  38402. begin
  38403. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  38404. end;
  38405. procedure TUART2_U2STA.setUTXINV; inline;
  38406. begin
  38407. pTDefRegMap(@Self)^.&set := $00002000;
  38408. end;
  38409. procedure TUART2_U2STA.clearUTXINV; inline;
  38410. begin
  38411. pTDefRegMap(@Self)^.clr := $00002000;
  38412. end;
  38413. procedure TUART2_U2STA.setUTXINV(thebits : TBits_1); inline;
  38414. begin
  38415. if thebits = 0 then
  38416. pTDefRegMap(@Self)^.clr := $00002000
  38417. else
  38418. pTDefRegMap(@Self)^.&set := $00002000;
  38419. end;
  38420. function TUART2_U2STA.getUTXINV : TBits_1; inline;
  38421. begin
  38422. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  38423. end;
  38424. procedure TUART2_U2STA.setUTXISEL(thebits : TBits_2); inline;
  38425. begin
  38426. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  38427. end;
  38428. function TUART2_U2STA.getUTXISEL : TBits_2; inline;
  38429. begin
  38430. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  38431. end;
  38432. procedure TUART2_U2STA.setADDR(thebits : TBits_8); inline;
  38433. begin
  38434. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  38435. end;
  38436. function TUART2_U2STA.getADDR : TBits_8; inline;
  38437. begin
  38438. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  38439. end;
  38440. procedure TUART2_U2STA.setADM_EN; inline;
  38441. begin
  38442. pTDefRegMap(@Self)^.&set := $01000000;
  38443. end;
  38444. procedure TUART2_U2STA.clearADM_EN; inline;
  38445. begin
  38446. pTDefRegMap(@Self)^.clr := $01000000;
  38447. end;
  38448. procedure TUART2_U2STA.setADM_EN(thebits : TBits_1); inline;
  38449. begin
  38450. if thebits = 0 then
  38451. pTDefRegMap(@Self)^.clr := $01000000
  38452. else
  38453. pTDefRegMap(@Self)^.&set := $01000000;
  38454. end;
  38455. function TUART2_U2STA.getADM_EN : TBits_1; inline;
  38456. begin
  38457. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  38458. end;
  38459. procedure TUART2_U2STA.setURXISEL0; inline;
  38460. begin
  38461. pTDefRegMap(@Self)^.&set := $00000040;
  38462. end;
  38463. procedure TUART2_U2STA.clearURXISEL0; inline;
  38464. begin
  38465. pTDefRegMap(@Self)^.clr := $00000040;
  38466. end;
  38467. procedure TUART2_U2STA.setURXISEL0(thebits : TBits_1); inline;
  38468. begin
  38469. if thebits = 0 then
  38470. pTDefRegMap(@Self)^.clr := $00000040
  38471. else
  38472. pTDefRegMap(@Self)^.&set := $00000040;
  38473. end;
  38474. function TUART2_U2STA.getURXISEL0 : TBits_1; inline;
  38475. begin
  38476. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  38477. end;
  38478. procedure TUART2_U2STA.setURXISEL1; inline;
  38479. begin
  38480. pTDefRegMap(@Self)^.&set := $00000080;
  38481. end;
  38482. procedure TUART2_U2STA.clearURXISEL1; inline;
  38483. begin
  38484. pTDefRegMap(@Self)^.clr := $00000080;
  38485. end;
  38486. procedure TUART2_U2STA.setURXISEL1(thebits : TBits_1); inline;
  38487. begin
  38488. if thebits = 0 then
  38489. pTDefRegMap(@Self)^.clr := $00000080
  38490. else
  38491. pTDefRegMap(@Self)^.&set := $00000080;
  38492. end;
  38493. function TUART2_U2STA.getURXISEL1 : TBits_1; inline;
  38494. begin
  38495. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  38496. end;
  38497. procedure TUART2_U2STA.setUTXISEL0; inline;
  38498. begin
  38499. pTDefRegMap(@Self)^.&set := $00004000;
  38500. end;
  38501. procedure TUART2_U2STA.clearUTXISEL0; inline;
  38502. begin
  38503. pTDefRegMap(@Self)^.clr := $00004000;
  38504. end;
  38505. procedure TUART2_U2STA.setUTXISEL0(thebits : TBits_1); inline;
  38506. begin
  38507. if thebits = 0 then
  38508. pTDefRegMap(@Self)^.clr := $00004000
  38509. else
  38510. pTDefRegMap(@Self)^.&set := $00004000;
  38511. end;
  38512. function TUART2_U2STA.getUTXISEL0 : TBits_1; inline;
  38513. begin
  38514. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  38515. end;
  38516. procedure TUART2_U2STA.setUTXISEL1; inline;
  38517. begin
  38518. pTDefRegMap(@Self)^.&set := $00008000;
  38519. end;
  38520. procedure TUART2_U2STA.clearUTXISEL1; inline;
  38521. begin
  38522. pTDefRegMap(@Self)^.clr := $00008000;
  38523. end;
  38524. procedure TUART2_U2STA.setUTXISEL1(thebits : TBits_1); inline;
  38525. begin
  38526. if thebits = 0 then
  38527. pTDefRegMap(@Self)^.clr := $00008000
  38528. else
  38529. pTDefRegMap(@Self)^.&set := $00008000;
  38530. end;
  38531. function TUART2_U2STA.getUTXISEL1 : TBits_1; inline;
  38532. begin
  38533. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  38534. end;
  38535. procedure TUART2_U2STA.setUTXSEL(thebits : TBits_2); inline;
  38536. begin
  38537. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  38538. end;
  38539. function TUART2_U2STA.getUTXSEL : TBits_2; inline;
  38540. begin
  38541. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  38542. end;
  38543. procedure TUART2_U2STA.setw(thebits : TBits_32); inline;
  38544. begin
  38545. pTDefRegMap(@Self)^.val := thebits;
  38546. end;
  38547. function TUART2_U2STA.getw : TBits_32; inline;
  38548. begin
  38549. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  38550. end;
  38551. procedure TUART2_U3ASTA.setURXDA; inline;
  38552. begin
  38553. pTDefRegMap(@Self)^.&set := $00000001;
  38554. end;
  38555. procedure TUART2_U3ASTA.clearURXDA; inline;
  38556. begin
  38557. pTDefRegMap(@Self)^.clr := $00000001;
  38558. end;
  38559. procedure TUART2_U3ASTA.setURXDA(thebits : TBits_1); inline;
  38560. begin
  38561. if thebits = 0 then
  38562. pTDefRegMap(@Self)^.clr := $00000001
  38563. else
  38564. pTDefRegMap(@Self)^.&set := $00000001;
  38565. end;
  38566. function TUART2_U3ASTA.getURXDA : TBits_1; inline;
  38567. begin
  38568. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  38569. end;
  38570. procedure TUART2_U3ASTA.setOERR; inline;
  38571. begin
  38572. pTDefRegMap(@Self)^.&set := $00000002;
  38573. end;
  38574. procedure TUART2_U3ASTA.clearOERR; inline;
  38575. begin
  38576. pTDefRegMap(@Self)^.clr := $00000002;
  38577. end;
  38578. procedure TUART2_U3ASTA.setOERR(thebits : TBits_1); inline;
  38579. begin
  38580. if thebits = 0 then
  38581. pTDefRegMap(@Self)^.clr := $00000002
  38582. else
  38583. pTDefRegMap(@Self)^.&set := $00000002;
  38584. end;
  38585. function TUART2_U3ASTA.getOERR : TBits_1; inline;
  38586. begin
  38587. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  38588. end;
  38589. procedure TUART2_U3ASTA.setFERR; inline;
  38590. begin
  38591. pTDefRegMap(@Self)^.&set := $00000004;
  38592. end;
  38593. procedure TUART2_U3ASTA.clearFERR; inline;
  38594. begin
  38595. pTDefRegMap(@Self)^.clr := $00000004;
  38596. end;
  38597. procedure TUART2_U3ASTA.setFERR(thebits : TBits_1); inline;
  38598. begin
  38599. if thebits = 0 then
  38600. pTDefRegMap(@Self)^.clr := $00000004
  38601. else
  38602. pTDefRegMap(@Self)^.&set := $00000004;
  38603. end;
  38604. function TUART2_U3ASTA.getFERR : TBits_1; inline;
  38605. begin
  38606. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  38607. end;
  38608. procedure TUART2_U3ASTA.setPERR; inline;
  38609. begin
  38610. pTDefRegMap(@Self)^.&set := $00000008;
  38611. end;
  38612. procedure TUART2_U3ASTA.clearPERR; inline;
  38613. begin
  38614. pTDefRegMap(@Self)^.clr := $00000008;
  38615. end;
  38616. procedure TUART2_U3ASTA.setPERR(thebits : TBits_1); inline;
  38617. begin
  38618. if thebits = 0 then
  38619. pTDefRegMap(@Self)^.clr := $00000008
  38620. else
  38621. pTDefRegMap(@Self)^.&set := $00000008;
  38622. end;
  38623. function TUART2_U3ASTA.getPERR : TBits_1; inline;
  38624. begin
  38625. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  38626. end;
  38627. procedure TUART2_U3ASTA.setRIDLE; inline;
  38628. begin
  38629. pTDefRegMap(@Self)^.&set := $00000010;
  38630. end;
  38631. procedure TUART2_U3ASTA.clearRIDLE; inline;
  38632. begin
  38633. pTDefRegMap(@Self)^.clr := $00000010;
  38634. end;
  38635. procedure TUART2_U3ASTA.setRIDLE(thebits : TBits_1); inline;
  38636. begin
  38637. if thebits = 0 then
  38638. pTDefRegMap(@Self)^.clr := $00000010
  38639. else
  38640. pTDefRegMap(@Self)^.&set := $00000010;
  38641. end;
  38642. function TUART2_U3ASTA.getRIDLE : TBits_1; inline;
  38643. begin
  38644. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  38645. end;
  38646. procedure TUART2_U3ASTA.setADDEN; inline;
  38647. begin
  38648. pTDefRegMap(@Self)^.&set := $00000020;
  38649. end;
  38650. procedure TUART2_U3ASTA.clearADDEN; inline;
  38651. begin
  38652. pTDefRegMap(@Self)^.clr := $00000020;
  38653. end;
  38654. procedure TUART2_U3ASTA.setADDEN(thebits : TBits_1); inline;
  38655. begin
  38656. if thebits = 0 then
  38657. pTDefRegMap(@Self)^.clr := $00000020
  38658. else
  38659. pTDefRegMap(@Self)^.&set := $00000020;
  38660. end;
  38661. function TUART2_U3ASTA.getADDEN : TBits_1; inline;
  38662. begin
  38663. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  38664. end;
  38665. procedure TUART2_U3ASTA.setURXISEL(thebits : TBits_2); inline;
  38666. begin
  38667. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  38668. end;
  38669. function TUART2_U3ASTA.getURXISEL : TBits_2; inline;
  38670. begin
  38671. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  38672. end;
  38673. procedure TUART2_U3ASTA.setTRMT; inline;
  38674. begin
  38675. pTDefRegMap(@Self)^.&set := $00000100;
  38676. end;
  38677. procedure TUART2_U3ASTA.clearTRMT; inline;
  38678. begin
  38679. pTDefRegMap(@Self)^.clr := $00000100;
  38680. end;
  38681. procedure TUART2_U3ASTA.setTRMT(thebits : TBits_1); inline;
  38682. begin
  38683. if thebits = 0 then
  38684. pTDefRegMap(@Self)^.clr := $00000100
  38685. else
  38686. pTDefRegMap(@Self)^.&set := $00000100;
  38687. end;
  38688. function TUART2_U3ASTA.getTRMT : TBits_1; inline;
  38689. begin
  38690. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  38691. end;
  38692. procedure TUART2_U3ASTA.setUTXBF; inline;
  38693. begin
  38694. pTDefRegMap(@Self)^.&set := $00000200;
  38695. end;
  38696. procedure TUART2_U3ASTA.clearUTXBF; inline;
  38697. begin
  38698. pTDefRegMap(@Self)^.clr := $00000200;
  38699. end;
  38700. procedure TUART2_U3ASTA.setUTXBF(thebits : TBits_1); inline;
  38701. begin
  38702. if thebits = 0 then
  38703. pTDefRegMap(@Self)^.clr := $00000200
  38704. else
  38705. pTDefRegMap(@Self)^.&set := $00000200;
  38706. end;
  38707. function TUART2_U3ASTA.getUTXBF : TBits_1; inline;
  38708. begin
  38709. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  38710. end;
  38711. procedure TUART2_U3ASTA.setUTXEN; inline;
  38712. begin
  38713. pTDefRegMap(@Self)^.&set := $00000400;
  38714. end;
  38715. procedure TUART2_U3ASTA.clearUTXEN; inline;
  38716. begin
  38717. pTDefRegMap(@Self)^.clr := $00000400;
  38718. end;
  38719. procedure TUART2_U3ASTA.setUTXEN(thebits : TBits_1); inline;
  38720. begin
  38721. if thebits = 0 then
  38722. pTDefRegMap(@Self)^.clr := $00000400
  38723. else
  38724. pTDefRegMap(@Self)^.&set := $00000400;
  38725. end;
  38726. function TUART2_U3ASTA.getUTXEN : TBits_1; inline;
  38727. begin
  38728. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  38729. end;
  38730. procedure TUART2_U3ASTA.setUTXBRK; inline;
  38731. begin
  38732. pTDefRegMap(@Self)^.&set := $00000800;
  38733. end;
  38734. procedure TUART2_U3ASTA.clearUTXBRK; inline;
  38735. begin
  38736. pTDefRegMap(@Self)^.clr := $00000800;
  38737. end;
  38738. procedure TUART2_U3ASTA.setUTXBRK(thebits : TBits_1); inline;
  38739. begin
  38740. if thebits = 0 then
  38741. pTDefRegMap(@Self)^.clr := $00000800
  38742. else
  38743. pTDefRegMap(@Self)^.&set := $00000800;
  38744. end;
  38745. function TUART2_U3ASTA.getUTXBRK : TBits_1; inline;
  38746. begin
  38747. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  38748. end;
  38749. procedure TUART2_U3ASTA.setURXEN; inline;
  38750. begin
  38751. pTDefRegMap(@Self)^.&set := $00001000;
  38752. end;
  38753. procedure TUART2_U3ASTA.clearURXEN; inline;
  38754. begin
  38755. pTDefRegMap(@Self)^.clr := $00001000;
  38756. end;
  38757. procedure TUART2_U3ASTA.setURXEN(thebits : TBits_1); inline;
  38758. begin
  38759. if thebits = 0 then
  38760. pTDefRegMap(@Self)^.clr := $00001000
  38761. else
  38762. pTDefRegMap(@Self)^.&set := $00001000;
  38763. end;
  38764. function TUART2_U3ASTA.getURXEN : TBits_1; inline;
  38765. begin
  38766. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  38767. end;
  38768. procedure TUART2_U3ASTA.setUTXINV; inline;
  38769. begin
  38770. pTDefRegMap(@Self)^.&set := $00002000;
  38771. end;
  38772. procedure TUART2_U3ASTA.clearUTXINV; inline;
  38773. begin
  38774. pTDefRegMap(@Self)^.clr := $00002000;
  38775. end;
  38776. procedure TUART2_U3ASTA.setUTXINV(thebits : TBits_1); inline;
  38777. begin
  38778. if thebits = 0 then
  38779. pTDefRegMap(@Self)^.clr := $00002000
  38780. else
  38781. pTDefRegMap(@Self)^.&set := $00002000;
  38782. end;
  38783. function TUART2_U3ASTA.getUTXINV : TBits_1; inline;
  38784. begin
  38785. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  38786. end;
  38787. procedure TUART2_U3ASTA.setUTXISEL(thebits : TBits_2); inline;
  38788. begin
  38789. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  38790. end;
  38791. function TUART2_U3ASTA.getUTXISEL : TBits_2; inline;
  38792. begin
  38793. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  38794. end;
  38795. procedure TUART2_U3ASTA.setADDR(thebits : TBits_8); inline;
  38796. begin
  38797. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  38798. end;
  38799. function TUART2_U3ASTA.getADDR : TBits_8; inline;
  38800. begin
  38801. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  38802. end;
  38803. procedure TUART2_U3ASTA.setADM_EN; inline;
  38804. begin
  38805. pTDefRegMap(@Self)^.&set := $01000000;
  38806. end;
  38807. procedure TUART2_U3ASTA.clearADM_EN; inline;
  38808. begin
  38809. pTDefRegMap(@Self)^.clr := $01000000;
  38810. end;
  38811. procedure TUART2_U3ASTA.setADM_EN(thebits : TBits_1); inline;
  38812. begin
  38813. if thebits = 0 then
  38814. pTDefRegMap(@Self)^.clr := $01000000
  38815. else
  38816. pTDefRegMap(@Self)^.&set := $01000000;
  38817. end;
  38818. function TUART2_U3ASTA.getADM_EN : TBits_1; inline;
  38819. begin
  38820. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  38821. end;
  38822. procedure TUART2_U3ASTA.setURXISEL0; inline;
  38823. begin
  38824. pTDefRegMap(@Self)^.&set := $00000040;
  38825. end;
  38826. procedure TUART2_U3ASTA.clearURXISEL0; inline;
  38827. begin
  38828. pTDefRegMap(@Self)^.clr := $00000040;
  38829. end;
  38830. procedure TUART2_U3ASTA.setURXISEL0(thebits : TBits_1); inline;
  38831. begin
  38832. if thebits = 0 then
  38833. pTDefRegMap(@Self)^.clr := $00000040
  38834. else
  38835. pTDefRegMap(@Self)^.&set := $00000040;
  38836. end;
  38837. function TUART2_U3ASTA.getURXISEL0 : TBits_1; inline;
  38838. begin
  38839. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  38840. end;
  38841. procedure TUART2_U3ASTA.setURXISEL1; inline;
  38842. begin
  38843. pTDefRegMap(@Self)^.&set := $00000080;
  38844. end;
  38845. procedure TUART2_U3ASTA.clearURXISEL1; inline;
  38846. begin
  38847. pTDefRegMap(@Self)^.clr := $00000080;
  38848. end;
  38849. procedure TUART2_U3ASTA.setURXISEL1(thebits : TBits_1); inline;
  38850. begin
  38851. if thebits = 0 then
  38852. pTDefRegMap(@Self)^.clr := $00000080
  38853. else
  38854. pTDefRegMap(@Self)^.&set := $00000080;
  38855. end;
  38856. function TUART2_U3ASTA.getURXISEL1 : TBits_1; inline;
  38857. begin
  38858. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  38859. end;
  38860. procedure TUART2_U3ASTA.setUTXISEL0; inline;
  38861. begin
  38862. pTDefRegMap(@Self)^.&set := $00004000;
  38863. end;
  38864. procedure TUART2_U3ASTA.clearUTXISEL0; inline;
  38865. begin
  38866. pTDefRegMap(@Self)^.clr := $00004000;
  38867. end;
  38868. procedure TUART2_U3ASTA.setUTXISEL0(thebits : TBits_1); inline;
  38869. begin
  38870. if thebits = 0 then
  38871. pTDefRegMap(@Self)^.clr := $00004000
  38872. else
  38873. pTDefRegMap(@Self)^.&set := $00004000;
  38874. end;
  38875. function TUART2_U3ASTA.getUTXISEL0 : TBits_1; inline;
  38876. begin
  38877. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  38878. end;
  38879. procedure TUART2_U3ASTA.setUTXISEL1; inline;
  38880. begin
  38881. pTDefRegMap(@Self)^.&set := $00008000;
  38882. end;
  38883. procedure TUART2_U3ASTA.clearUTXISEL1; inline;
  38884. begin
  38885. pTDefRegMap(@Self)^.clr := $00008000;
  38886. end;
  38887. procedure TUART2_U3ASTA.setUTXISEL1(thebits : TBits_1); inline;
  38888. begin
  38889. if thebits = 0 then
  38890. pTDefRegMap(@Self)^.clr := $00008000
  38891. else
  38892. pTDefRegMap(@Self)^.&set := $00008000;
  38893. end;
  38894. function TUART2_U3ASTA.getUTXISEL1 : TBits_1; inline;
  38895. begin
  38896. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  38897. end;
  38898. procedure TUART2_U3ASTA.setUTXSEL(thebits : TBits_2); inline;
  38899. begin
  38900. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  38901. end;
  38902. function TUART2_U3ASTA.getUTXSEL : TBits_2; inline;
  38903. begin
  38904. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  38905. end;
  38906. procedure TUART2_U3ASTA.setw(thebits : TBits_32); inline;
  38907. begin
  38908. pTDefRegMap(@Self)^.val := thebits;
  38909. end;
  38910. function TUART2_U3ASTA.getw : TBits_32; inline;
  38911. begin
  38912. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  38913. end;
  38914. procedure TUART5_U3BMODE.setSTSEL; inline;
  38915. begin
  38916. pTDefRegMap(@Self)^.&set := $00000001;
  38917. end;
  38918. procedure TUART5_U3BMODE.clearSTSEL; inline;
  38919. begin
  38920. pTDefRegMap(@Self)^.clr := $00000001;
  38921. end;
  38922. procedure TUART5_U3BMODE.setSTSEL(thebits : TBits_1); inline;
  38923. begin
  38924. if thebits = 0 then
  38925. pTDefRegMap(@Self)^.clr := $00000001
  38926. else
  38927. pTDefRegMap(@Self)^.&set := $00000001;
  38928. end;
  38929. function TUART5_U3BMODE.getSTSEL : TBits_1; inline;
  38930. begin
  38931. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  38932. end;
  38933. procedure TUART5_U3BMODE.setPDSEL(thebits : TBits_2); inline;
  38934. begin
  38935. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  38936. end;
  38937. function TUART5_U3BMODE.getPDSEL : TBits_2; inline;
  38938. begin
  38939. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  38940. end;
  38941. procedure TUART5_U3BMODE.setBRGH; inline;
  38942. begin
  38943. pTDefRegMap(@Self)^.&set := $00000008;
  38944. end;
  38945. procedure TUART5_U3BMODE.clearBRGH; inline;
  38946. begin
  38947. pTDefRegMap(@Self)^.clr := $00000008;
  38948. end;
  38949. procedure TUART5_U3BMODE.setBRGH(thebits : TBits_1); inline;
  38950. begin
  38951. if thebits = 0 then
  38952. pTDefRegMap(@Self)^.clr := $00000008
  38953. else
  38954. pTDefRegMap(@Self)^.&set := $00000008;
  38955. end;
  38956. function TUART5_U3BMODE.getBRGH : TBits_1; inline;
  38957. begin
  38958. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  38959. end;
  38960. procedure TUART5_U3BMODE.setRXINV; inline;
  38961. begin
  38962. pTDefRegMap(@Self)^.&set := $00000010;
  38963. end;
  38964. procedure TUART5_U3BMODE.clearRXINV; inline;
  38965. begin
  38966. pTDefRegMap(@Self)^.clr := $00000010;
  38967. end;
  38968. procedure TUART5_U3BMODE.setRXINV(thebits : TBits_1); inline;
  38969. begin
  38970. if thebits = 0 then
  38971. pTDefRegMap(@Self)^.clr := $00000010
  38972. else
  38973. pTDefRegMap(@Self)^.&set := $00000010;
  38974. end;
  38975. function TUART5_U3BMODE.getRXINV : TBits_1; inline;
  38976. begin
  38977. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  38978. end;
  38979. procedure TUART5_U3BMODE.setABAUD; inline;
  38980. begin
  38981. pTDefRegMap(@Self)^.&set := $00000020;
  38982. end;
  38983. procedure TUART5_U3BMODE.clearABAUD; inline;
  38984. begin
  38985. pTDefRegMap(@Self)^.clr := $00000020;
  38986. end;
  38987. procedure TUART5_U3BMODE.setABAUD(thebits : TBits_1); inline;
  38988. begin
  38989. if thebits = 0 then
  38990. pTDefRegMap(@Self)^.clr := $00000020
  38991. else
  38992. pTDefRegMap(@Self)^.&set := $00000020;
  38993. end;
  38994. function TUART5_U3BMODE.getABAUD : TBits_1; inline;
  38995. begin
  38996. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  38997. end;
  38998. procedure TUART5_U3BMODE.setLPBACK; inline;
  38999. begin
  39000. pTDefRegMap(@Self)^.&set := $00000040;
  39001. end;
  39002. procedure TUART5_U3BMODE.clearLPBACK; inline;
  39003. begin
  39004. pTDefRegMap(@Self)^.clr := $00000040;
  39005. end;
  39006. procedure TUART5_U3BMODE.setLPBACK(thebits : TBits_1); inline;
  39007. begin
  39008. if thebits = 0 then
  39009. pTDefRegMap(@Self)^.clr := $00000040
  39010. else
  39011. pTDefRegMap(@Self)^.&set := $00000040;
  39012. end;
  39013. function TUART5_U3BMODE.getLPBACK : TBits_1; inline;
  39014. begin
  39015. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  39016. end;
  39017. procedure TUART5_U3BMODE.setWAKE; inline;
  39018. begin
  39019. pTDefRegMap(@Self)^.&set := $00000080;
  39020. end;
  39021. procedure TUART5_U3BMODE.clearWAKE; inline;
  39022. begin
  39023. pTDefRegMap(@Self)^.clr := $00000080;
  39024. end;
  39025. procedure TUART5_U3BMODE.setWAKE(thebits : TBits_1); inline;
  39026. begin
  39027. if thebits = 0 then
  39028. pTDefRegMap(@Self)^.clr := $00000080
  39029. else
  39030. pTDefRegMap(@Self)^.&set := $00000080;
  39031. end;
  39032. function TUART5_U3BMODE.getWAKE : TBits_1; inline;
  39033. begin
  39034. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  39035. end;
  39036. procedure TUART5_U3BMODE.setIREN; inline;
  39037. begin
  39038. pTDefRegMap(@Self)^.&set := $00001000;
  39039. end;
  39040. procedure TUART5_U3BMODE.clearIREN; inline;
  39041. begin
  39042. pTDefRegMap(@Self)^.clr := $00001000;
  39043. end;
  39044. procedure TUART5_U3BMODE.setIREN(thebits : TBits_1); inline;
  39045. begin
  39046. if thebits = 0 then
  39047. pTDefRegMap(@Self)^.clr := $00001000
  39048. else
  39049. pTDefRegMap(@Self)^.&set := $00001000;
  39050. end;
  39051. function TUART5_U3BMODE.getIREN : TBits_1; inline;
  39052. begin
  39053. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  39054. end;
  39055. procedure TUART5_U3BMODE.setSIDL; inline;
  39056. begin
  39057. pTDefRegMap(@Self)^.&set := $00002000;
  39058. end;
  39059. procedure TUART5_U3BMODE.clearSIDL; inline;
  39060. begin
  39061. pTDefRegMap(@Self)^.clr := $00002000;
  39062. end;
  39063. procedure TUART5_U3BMODE.setSIDL(thebits : TBits_1); inline;
  39064. begin
  39065. if thebits = 0 then
  39066. pTDefRegMap(@Self)^.clr := $00002000
  39067. else
  39068. pTDefRegMap(@Self)^.&set := $00002000;
  39069. end;
  39070. function TUART5_U3BMODE.getSIDL : TBits_1; inline;
  39071. begin
  39072. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  39073. end;
  39074. procedure TUART5_U3BMODE.setON; inline;
  39075. begin
  39076. pTDefRegMap(@Self)^.&set := $00008000;
  39077. end;
  39078. procedure TUART5_U3BMODE.clearON; inline;
  39079. begin
  39080. pTDefRegMap(@Self)^.clr := $00008000;
  39081. end;
  39082. procedure TUART5_U3BMODE.setON(thebits : TBits_1); inline;
  39083. begin
  39084. if thebits = 0 then
  39085. pTDefRegMap(@Self)^.clr := $00008000
  39086. else
  39087. pTDefRegMap(@Self)^.&set := $00008000;
  39088. end;
  39089. function TUART5_U3BMODE.getON : TBits_1; inline;
  39090. begin
  39091. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  39092. end;
  39093. procedure TUART5_U3BMODE.setPDSEL0; inline;
  39094. begin
  39095. pTDefRegMap(@Self)^.&set := $00000002;
  39096. end;
  39097. procedure TUART5_U3BMODE.clearPDSEL0; inline;
  39098. begin
  39099. pTDefRegMap(@Self)^.clr := $00000002;
  39100. end;
  39101. procedure TUART5_U3BMODE.setPDSEL0(thebits : TBits_1); inline;
  39102. begin
  39103. if thebits = 0 then
  39104. pTDefRegMap(@Self)^.clr := $00000002
  39105. else
  39106. pTDefRegMap(@Self)^.&set := $00000002;
  39107. end;
  39108. function TUART5_U3BMODE.getPDSEL0 : TBits_1; inline;
  39109. begin
  39110. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  39111. end;
  39112. procedure TUART5_U3BMODE.setPDSEL1; inline;
  39113. begin
  39114. pTDefRegMap(@Self)^.&set := $00000004;
  39115. end;
  39116. procedure TUART5_U3BMODE.clearPDSEL1; inline;
  39117. begin
  39118. pTDefRegMap(@Self)^.clr := $00000004;
  39119. end;
  39120. procedure TUART5_U3BMODE.setPDSEL1(thebits : TBits_1); inline;
  39121. begin
  39122. if thebits = 0 then
  39123. pTDefRegMap(@Self)^.clr := $00000004
  39124. else
  39125. pTDefRegMap(@Self)^.&set := $00000004;
  39126. end;
  39127. function TUART5_U3BMODE.getPDSEL1 : TBits_1; inline;
  39128. begin
  39129. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  39130. end;
  39131. procedure TUART5_U3BMODE.setUSIDL; inline;
  39132. begin
  39133. pTDefRegMap(@Self)^.&set := $00002000;
  39134. end;
  39135. procedure TUART5_U3BMODE.clearUSIDL; inline;
  39136. begin
  39137. pTDefRegMap(@Self)^.clr := $00002000;
  39138. end;
  39139. procedure TUART5_U3BMODE.setUSIDL(thebits : TBits_1); inline;
  39140. begin
  39141. if thebits = 0 then
  39142. pTDefRegMap(@Self)^.clr := $00002000
  39143. else
  39144. pTDefRegMap(@Self)^.&set := $00002000;
  39145. end;
  39146. function TUART5_U3BMODE.getUSIDL : TBits_1; inline;
  39147. begin
  39148. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  39149. end;
  39150. procedure TUART5_U3BMODE.setUARTEN; inline;
  39151. begin
  39152. pTDefRegMap(@Self)^.&set := $00008000;
  39153. end;
  39154. procedure TUART5_U3BMODE.clearUARTEN; inline;
  39155. begin
  39156. pTDefRegMap(@Self)^.clr := $00008000;
  39157. end;
  39158. procedure TUART5_U3BMODE.setUARTEN(thebits : TBits_1); inline;
  39159. begin
  39160. if thebits = 0 then
  39161. pTDefRegMap(@Self)^.clr := $00008000
  39162. else
  39163. pTDefRegMap(@Self)^.&set := $00008000;
  39164. end;
  39165. function TUART5_U3BMODE.getUARTEN : TBits_1; inline;
  39166. begin
  39167. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  39168. end;
  39169. procedure TUART5_U3BMODE.setw(thebits : TBits_32); inline;
  39170. begin
  39171. pTDefRegMap(@Self)^.val := thebits;
  39172. end;
  39173. function TUART5_U3BMODE.getw : TBits_32; inline;
  39174. begin
  39175. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  39176. end;
  39177. procedure TUART5_U5MODE.setSTSEL; inline;
  39178. begin
  39179. pTDefRegMap(@Self)^.&set := $00000001;
  39180. end;
  39181. procedure TUART5_U5MODE.clearSTSEL; inline;
  39182. begin
  39183. pTDefRegMap(@Self)^.clr := $00000001;
  39184. end;
  39185. procedure TUART5_U5MODE.setSTSEL(thebits : TBits_1); inline;
  39186. begin
  39187. if thebits = 0 then
  39188. pTDefRegMap(@Self)^.clr := $00000001
  39189. else
  39190. pTDefRegMap(@Self)^.&set := $00000001;
  39191. end;
  39192. function TUART5_U5MODE.getSTSEL : TBits_1; inline;
  39193. begin
  39194. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  39195. end;
  39196. procedure TUART5_U5MODE.setPDSEL(thebits : TBits_2); inline;
  39197. begin
  39198. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  39199. end;
  39200. function TUART5_U5MODE.getPDSEL : TBits_2; inline;
  39201. begin
  39202. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  39203. end;
  39204. procedure TUART5_U5MODE.setBRGH; inline;
  39205. begin
  39206. pTDefRegMap(@Self)^.&set := $00000008;
  39207. end;
  39208. procedure TUART5_U5MODE.clearBRGH; inline;
  39209. begin
  39210. pTDefRegMap(@Self)^.clr := $00000008;
  39211. end;
  39212. procedure TUART5_U5MODE.setBRGH(thebits : TBits_1); inline;
  39213. begin
  39214. if thebits = 0 then
  39215. pTDefRegMap(@Self)^.clr := $00000008
  39216. else
  39217. pTDefRegMap(@Self)^.&set := $00000008;
  39218. end;
  39219. function TUART5_U5MODE.getBRGH : TBits_1; inline;
  39220. begin
  39221. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  39222. end;
  39223. procedure TUART5_U5MODE.setRXINV; inline;
  39224. begin
  39225. pTDefRegMap(@Self)^.&set := $00000010;
  39226. end;
  39227. procedure TUART5_U5MODE.clearRXINV; inline;
  39228. begin
  39229. pTDefRegMap(@Self)^.clr := $00000010;
  39230. end;
  39231. procedure TUART5_U5MODE.setRXINV(thebits : TBits_1); inline;
  39232. begin
  39233. if thebits = 0 then
  39234. pTDefRegMap(@Self)^.clr := $00000010
  39235. else
  39236. pTDefRegMap(@Self)^.&set := $00000010;
  39237. end;
  39238. function TUART5_U5MODE.getRXINV : TBits_1; inline;
  39239. begin
  39240. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  39241. end;
  39242. procedure TUART5_U5MODE.setABAUD; inline;
  39243. begin
  39244. pTDefRegMap(@Self)^.&set := $00000020;
  39245. end;
  39246. procedure TUART5_U5MODE.clearABAUD; inline;
  39247. begin
  39248. pTDefRegMap(@Self)^.clr := $00000020;
  39249. end;
  39250. procedure TUART5_U5MODE.setABAUD(thebits : TBits_1); inline;
  39251. begin
  39252. if thebits = 0 then
  39253. pTDefRegMap(@Self)^.clr := $00000020
  39254. else
  39255. pTDefRegMap(@Self)^.&set := $00000020;
  39256. end;
  39257. function TUART5_U5MODE.getABAUD : TBits_1; inline;
  39258. begin
  39259. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  39260. end;
  39261. procedure TUART5_U5MODE.setLPBACK; inline;
  39262. begin
  39263. pTDefRegMap(@Self)^.&set := $00000040;
  39264. end;
  39265. procedure TUART5_U5MODE.clearLPBACK; inline;
  39266. begin
  39267. pTDefRegMap(@Self)^.clr := $00000040;
  39268. end;
  39269. procedure TUART5_U5MODE.setLPBACK(thebits : TBits_1); inline;
  39270. begin
  39271. if thebits = 0 then
  39272. pTDefRegMap(@Self)^.clr := $00000040
  39273. else
  39274. pTDefRegMap(@Self)^.&set := $00000040;
  39275. end;
  39276. function TUART5_U5MODE.getLPBACK : TBits_1; inline;
  39277. begin
  39278. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  39279. end;
  39280. procedure TUART5_U5MODE.setWAKE; inline;
  39281. begin
  39282. pTDefRegMap(@Self)^.&set := $00000080;
  39283. end;
  39284. procedure TUART5_U5MODE.clearWAKE; inline;
  39285. begin
  39286. pTDefRegMap(@Self)^.clr := $00000080;
  39287. end;
  39288. procedure TUART5_U5MODE.setWAKE(thebits : TBits_1); inline;
  39289. begin
  39290. if thebits = 0 then
  39291. pTDefRegMap(@Self)^.clr := $00000080
  39292. else
  39293. pTDefRegMap(@Self)^.&set := $00000080;
  39294. end;
  39295. function TUART5_U5MODE.getWAKE : TBits_1; inline;
  39296. begin
  39297. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  39298. end;
  39299. procedure TUART5_U5MODE.setIREN; inline;
  39300. begin
  39301. pTDefRegMap(@Self)^.&set := $00001000;
  39302. end;
  39303. procedure TUART5_U5MODE.clearIREN; inline;
  39304. begin
  39305. pTDefRegMap(@Self)^.clr := $00001000;
  39306. end;
  39307. procedure TUART5_U5MODE.setIREN(thebits : TBits_1); inline;
  39308. begin
  39309. if thebits = 0 then
  39310. pTDefRegMap(@Self)^.clr := $00001000
  39311. else
  39312. pTDefRegMap(@Self)^.&set := $00001000;
  39313. end;
  39314. function TUART5_U5MODE.getIREN : TBits_1; inline;
  39315. begin
  39316. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  39317. end;
  39318. procedure TUART5_U5MODE.setSIDL; inline;
  39319. begin
  39320. pTDefRegMap(@Self)^.&set := $00002000;
  39321. end;
  39322. procedure TUART5_U5MODE.clearSIDL; inline;
  39323. begin
  39324. pTDefRegMap(@Self)^.clr := $00002000;
  39325. end;
  39326. procedure TUART5_U5MODE.setSIDL(thebits : TBits_1); inline;
  39327. begin
  39328. if thebits = 0 then
  39329. pTDefRegMap(@Self)^.clr := $00002000
  39330. else
  39331. pTDefRegMap(@Self)^.&set := $00002000;
  39332. end;
  39333. function TUART5_U5MODE.getSIDL : TBits_1; inline;
  39334. begin
  39335. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  39336. end;
  39337. procedure TUART5_U5MODE.setON; inline;
  39338. begin
  39339. pTDefRegMap(@Self)^.&set := $00008000;
  39340. end;
  39341. procedure TUART5_U5MODE.clearON; inline;
  39342. begin
  39343. pTDefRegMap(@Self)^.clr := $00008000;
  39344. end;
  39345. procedure TUART5_U5MODE.setON(thebits : TBits_1); inline;
  39346. begin
  39347. if thebits = 0 then
  39348. pTDefRegMap(@Self)^.clr := $00008000
  39349. else
  39350. pTDefRegMap(@Self)^.&set := $00008000;
  39351. end;
  39352. function TUART5_U5MODE.getON : TBits_1; inline;
  39353. begin
  39354. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  39355. end;
  39356. procedure TUART5_U5MODE.setPDSEL0; inline;
  39357. begin
  39358. pTDefRegMap(@Self)^.&set := $00000002;
  39359. end;
  39360. procedure TUART5_U5MODE.clearPDSEL0; inline;
  39361. begin
  39362. pTDefRegMap(@Self)^.clr := $00000002;
  39363. end;
  39364. procedure TUART5_U5MODE.setPDSEL0(thebits : TBits_1); inline;
  39365. begin
  39366. if thebits = 0 then
  39367. pTDefRegMap(@Self)^.clr := $00000002
  39368. else
  39369. pTDefRegMap(@Self)^.&set := $00000002;
  39370. end;
  39371. function TUART5_U5MODE.getPDSEL0 : TBits_1; inline;
  39372. begin
  39373. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  39374. end;
  39375. procedure TUART5_U5MODE.setPDSEL1; inline;
  39376. begin
  39377. pTDefRegMap(@Self)^.&set := $00000004;
  39378. end;
  39379. procedure TUART5_U5MODE.clearPDSEL1; inline;
  39380. begin
  39381. pTDefRegMap(@Self)^.clr := $00000004;
  39382. end;
  39383. procedure TUART5_U5MODE.setPDSEL1(thebits : TBits_1); inline;
  39384. begin
  39385. if thebits = 0 then
  39386. pTDefRegMap(@Self)^.clr := $00000004
  39387. else
  39388. pTDefRegMap(@Self)^.&set := $00000004;
  39389. end;
  39390. function TUART5_U5MODE.getPDSEL1 : TBits_1; inline;
  39391. begin
  39392. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  39393. end;
  39394. procedure TUART5_U5MODE.setUSIDL; inline;
  39395. begin
  39396. pTDefRegMap(@Self)^.&set := $00002000;
  39397. end;
  39398. procedure TUART5_U5MODE.clearUSIDL; inline;
  39399. begin
  39400. pTDefRegMap(@Self)^.clr := $00002000;
  39401. end;
  39402. procedure TUART5_U5MODE.setUSIDL(thebits : TBits_1); inline;
  39403. begin
  39404. if thebits = 0 then
  39405. pTDefRegMap(@Self)^.clr := $00002000
  39406. else
  39407. pTDefRegMap(@Self)^.&set := $00002000;
  39408. end;
  39409. function TUART5_U5MODE.getUSIDL : TBits_1; inline;
  39410. begin
  39411. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  39412. end;
  39413. procedure TUART5_U5MODE.setUARTEN; inline;
  39414. begin
  39415. pTDefRegMap(@Self)^.&set := $00008000;
  39416. end;
  39417. procedure TUART5_U5MODE.clearUARTEN; inline;
  39418. begin
  39419. pTDefRegMap(@Self)^.clr := $00008000;
  39420. end;
  39421. procedure TUART5_U5MODE.setUARTEN(thebits : TBits_1); inline;
  39422. begin
  39423. if thebits = 0 then
  39424. pTDefRegMap(@Self)^.clr := $00008000
  39425. else
  39426. pTDefRegMap(@Self)^.&set := $00008000;
  39427. end;
  39428. function TUART5_U5MODE.getUARTEN : TBits_1; inline;
  39429. begin
  39430. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  39431. end;
  39432. procedure TUART5_U5MODE.setw(thebits : TBits_32); inline;
  39433. begin
  39434. pTDefRegMap(@Self)^.val := thebits;
  39435. end;
  39436. function TUART5_U5MODE.getw : TBits_32; inline;
  39437. begin
  39438. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  39439. end;
  39440. procedure TUART5_U3BSTA.setURXDA; inline;
  39441. begin
  39442. pTDefRegMap(@Self)^.&set := $00000001;
  39443. end;
  39444. procedure TUART5_U3BSTA.clearURXDA; inline;
  39445. begin
  39446. pTDefRegMap(@Self)^.clr := $00000001;
  39447. end;
  39448. procedure TUART5_U3BSTA.setURXDA(thebits : TBits_1); inline;
  39449. begin
  39450. if thebits = 0 then
  39451. pTDefRegMap(@Self)^.clr := $00000001
  39452. else
  39453. pTDefRegMap(@Self)^.&set := $00000001;
  39454. end;
  39455. function TUART5_U3BSTA.getURXDA : TBits_1; inline;
  39456. begin
  39457. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  39458. end;
  39459. procedure TUART5_U3BSTA.setOERR; inline;
  39460. begin
  39461. pTDefRegMap(@Self)^.&set := $00000002;
  39462. end;
  39463. procedure TUART5_U3BSTA.clearOERR; inline;
  39464. begin
  39465. pTDefRegMap(@Self)^.clr := $00000002;
  39466. end;
  39467. procedure TUART5_U3BSTA.setOERR(thebits : TBits_1); inline;
  39468. begin
  39469. if thebits = 0 then
  39470. pTDefRegMap(@Self)^.clr := $00000002
  39471. else
  39472. pTDefRegMap(@Self)^.&set := $00000002;
  39473. end;
  39474. function TUART5_U3BSTA.getOERR : TBits_1; inline;
  39475. begin
  39476. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  39477. end;
  39478. procedure TUART5_U3BSTA.setFERR; inline;
  39479. begin
  39480. pTDefRegMap(@Self)^.&set := $00000004;
  39481. end;
  39482. procedure TUART5_U3BSTA.clearFERR; inline;
  39483. begin
  39484. pTDefRegMap(@Self)^.clr := $00000004;
  39485. end;
  39486. procedure TUART5_U3BSTA.setFERR(thebits : TBits_1); inline;
  39487. begin
  39488. if thebits = 0 then
  39489. pTDefRegMap(@Self)^.clr := $00000004
  39490. else
  39491. pTDefRegMap(@Self)^.&set := $00000004;
  39492. end;
  39493. function TUART5_U3BSTA.getFERR : TBits_1; inline;
  39494. begin
  39495. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  39496. end;
  39497. procedure TUART5_U3BSTA.setPERR; inline;
  39498. begin
  39499. pTDefRegMap(@Self)^.&set := $00000008;
  39500. end;
  39501. procedure TUART5_U3BSTA.clearPERR; inline;
  39502. begin
  39503. pTDefRegMap(@Self)^.clr := $00000008;
  39504. end;
  39505. procedure TUART5_U3BSTA.setPERR(thebits : TBits_1); inline;
  39506. begin
  39507. if thebits = 0 then
  39508. pTDefRegMap(@Self)^.clr := $00000008
  39509. else
  39510. pTDefRegMap(@Self)^.&set := $00000008;
  39511. end;
  39512. function TUART5_U3BSTA.getPERR : TBits_1; inline;
  39513. begin
  39514. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  39515. end;
  39516. procedure TUART5_U3BSTA.setRIDLE; inline;
  39517. begin
  39518. pTDefRegMap(@Self)^.&set := $00000010;
  39519. end;
  39520. procedure TUART5_U3BSTA.clearRIDLE; inline;
  39521. begin
  39522. pTDefRegMap(@Self)^.clr := $00000010;
  39523. end;
  39524. procedure TUART5_U3BSTA.setRIDLE(thebits : TBits_1); inline;
  39525. begin
  39526. if thebits = 0 then
  39527. pTDefRegMap(@Self)^.clr := $00000010
  39528. else
  39529. pTDefRegMap(@Self)^.&set := $00000010;
  39530. end;
  39531. function TUART5_U3BSTA.getRIDLE : TBits_1; inline;
  39532. begin
  39533. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  39534. end;
  39535. procedure TUART5_U3BSTA.setADDEN; inline;
  39536. begin
  39537. pTDefRegMap(@Self)^.&set := $00000020;
  39538. end;
  39539. procedure TUART5_U3BSTA.clearADDEN; inline;
  39540. begin
  39541. pTDefRegMap(@Self)^.clr := $00000020;
  39542. end;
  39543. procedure TUART5_U3BSTA.setADDEN(thebits : TBits_1); inline;
  39544. begin
  39545. if thebits = 0 then
  39546. pTDefRegMap(@Self)^.clr := $00000020
  39547. else
  39548. pTDefRegMap(@Self)^.&set := $00000020;
  39549. end;
  39550. function TUART5_U3BSTA.getADDEN : TBits_1; inline;
  39551. begin
  39552. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  39553. end;
  39554. procedure TUART5_U3BSTA.setURXISEL(thebits : TBits_2); inline;
  39555. begin
  39556. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  39557. end;
  39558. function TUART5_U3BSTA.getURXISEL : TBits_2; inline;
  39559. begin
  39560. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  39561. end;
  39562. procedure TUART5_U3BSTA.setTRMT; inline;
  39563. begin
  39564. pTDefRegMap(@Self)^.&set := $00000100;
  39565. end;
  39566. procedure TUART5_U3BSTA.clearTRMT; inline;
  39567. begin
  39568. pTDefRegMap(@Self)^.clr := $00000100;
  39569. end;
  39570. procedure TUART5_U3BSTA.setTRMT(thebits : TBits_1); inline;
  39571. begin
  39572. if thebits = 0 then
  39573. pTDefRegMap(@Self)^.clr := $00000100
  39574. else
  39575. pTDefRegMap(@Self)^.&set := $00000100;
  39576. end;
  39577. function TUART5_U3BSTA.getTRMT : TBits_1; inline;
  39578. begin
  39579. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  39580. end;
  39581. procedure TUART5_U3BSTA.setUTXBF; inline;
  39582. begin
  39583. pTDefRegMap(@Self)^.&set := $00000200;
  39584. end;
  39585. procedure TUART5_U3BSTA.clearUTXBF; inline;
  39586. begin
  39587. pTDefRegMap(@Self)^.clr := $00000200;
  39588. end;
  39589. procedure TUART5_U3BSTA.setUTXBF(thebits : TBits_1); inline;
  39590. begin
  39591. if thebits = 0 then
  39592. pTDefRegMap(@Self)^.clr := $00000200
  39593. else
  39594. pTDefRegMap(@Self)^.&set := $00000200;
  39595. end;
  39596. function TUART5_U3BSTA.getUTXBF : TBits_1; inline;
  39597. begin
  39598. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  39599. end;
  39600. procedure TUART5_U3BSTA.setUTXEN; inline;
  39601. begin
  39602. pTDefRegMap(@Self)^.&set := $00000400;
  39603. end;
  39604. procedure TUART5_U3BSTA.clearUTXEN; inline;
  39605. begin
  39606. pTDefRegMap(@Self)^.clr := $00000400;
  39607. end;
  39608. procedure TUART5_U3BSTA.setUTXEN(thebits : TBits_1); inline;
  39609. begin
  39610. if thebits = 0 then
  39611. pTDefRegMap(@Self)^.clr := $00000400
  39612. else
  39613. pTDefRegMap(@Self)^.&set := $00000400;
  39614. end;
  39615. function TUART5_U3BSTA.getUTXEN : TBits_1; inline;
  39616. begin
  39617. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  39618. end;
  39619. procedure TUART5_U3BSTA.setUTXBRK; inline;
  39620. begin
  39621. pTDefRegMap(@Self)^.&set := $00000800;
  39622. end;
  39623. procedure TUART5_U3BSTA.clearUTXBRK; inline;
  39624. begin
  39625. pTDefRegMap(@Self)^.clr := $00000800;
  39626. end;
  39627. procedure TUART5_U3BSTA.setUTXBRK(thebits : TBits_1); inline;
  39628. begin
  39629. if thebits = 0 then
  39630. pTDefRegMap(@Self)^.clr := $00000800
  39631. else
  39632. pTDefRegMap(@Self)^.&set := $00000800;
  39633. end;
  39634. function TUART5_U3BSTA.getUTXBRK : TBits_1; inline;
  39635. begin
  39636. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  39637. end;
  39638. procedure TUART5_U3BSTA.setURXEN; inline;
  39639. begin
  39640. pTDefRegMap(@Self)^.&set := $00001000;
  39641. end;
  39642. procedure TUART5_U3BSTA.clearURXEN; inline;
  39643. begin
  39644. pTDefRegMap(@Self)^.clr := $00001000;
  39645. end;
  39646. procedure TUART5_U3BSTA.setURXEN(thebits : TBits_1); inline;
  39647. begin
  39648. if thebits = 0 then
  39649. pTDefRegMap(@Self)^.clr := $00001000
  39650. else
  39651. pTDefRegMap(@Self)^.&set := $00001000;
  39652. end;
  39653. function TUART5_U3BSTA.getURXEN : TBits_1; inline;
  39654. begin
  39655. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  39656. end;
  39657. procedure TUART5_U3BSTA.setUTXINV; inline;
  39658. begin
  39659. pTDefRegMap(@Self)^.&set := $00002000;
  39660. end;
  39661. procedure TUART5_U3BSTA.clearUTXINV; inline;
  39662. begin
  39663. pTDefRegMap(@Self)^.clr := $00002000;
  39664. end;
  39665. procedure TUART5_U3BSTA.setUTXINV(thebits : TBits_1); inline;
  39666. begin
  39667. if thebits = 0 then
  39668. pTDefRegMap(@Self)^.clr := $00002000
  39669. else
  39670. pTDefRegMap(@Self)^.&set := $00002000;
  39671. end;
  39672. function TUART5_U3BSTA.getUTXINV : TBits_1; inline;
  39673. begin
  39674. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  39675. end;
  39676. procedure TUART5_U3BSTA.setUTXISEL(thebits : TBits_2); inline;
  39677. begin
  39678. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  39679. end;
  39680. function TUART5_U3BSTA.getUTXISEL : TBits_2; inline;
  39681. begin
  39682. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  39683. end;
  39684. procedure TUART5_U3BSTA.setADDR(thebits : TBits_8); inline;
  39685. begin
  39686. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  39687. end;
  39688. function TUART5_U3BSTA.getADDR : TBits_8; inline;
  39689. begin
  39690. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  39691. end;
  39692. procedure TUART5_U3BSTA.setADM_EN; inline;
  39693. begin
  39694. pTDefRegMap(@Self)^.&set := $01000000;
  39695. end;
  39696. procedure TUART5_U3BSTA.clearADM_EN; inline;
  39697. begin
  39698. pTDefRegMap(@Self)^.clr := $01000000;
  39699. end;
  39700. procedure TUART5_U3BSTA.setADM_EN(thebits : TBits_1); inline;
  39701. begin
  39702. if thebits = 0 then
  39703. pTDefRegMap(@Self)^.clr := $01000000
  39704. else
  39705. pTDefRegMap(@Self)^.&set := $01000000;
  39706. end;
  39707. function TUART5_U3BSTA.getADM_EN : TBits_1; inline;
  39708. begin
  39709. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  39710. end;
  39711. procedure TUART5_U3BSTA.setURXISEL0; inline;
  39712. begin
  39713. pTDefRegMap(@Self)^.&set := $00000040;
  39714. end;
  39715. procedure TUART5_U3BSTA.clearURXISEL0; inline;
  39716. begin
  39717. pTDefRegMap(@Self)^.clr := $00000040;
  39718. end;
  39719. procedure TUART5_U3BSTA.setURXISEL0(thebits : TBits_1); inline;
  39720. begin
  39721. if thebits = 0 then
  39722. pTDefRegMap(@Self)^.clr := $00000040
  39723. else
  39724. pTDefRegMap(@Self)^.&set := $00000040;
  39725. end;
  39726. function TUART5_U3BSTA.getURXISEL0 : TBits_1; inline;
  39727. begin
  39728. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  39729. end;
  39730. procedure TUART5_U3BSTA.setURXISEL1; inline;
  39731. begin
  39732. pTDefRegMap(@Self)^.&set := $00000080;
  39733. end;
  39734. procedure TUART5_U3BSTA.clearURXISEL1; inline;
  39735. begin
  39736. pTDefRegMap(@Self)^.clr := $00000080;
  39737. end;
  39738. procedure TUART5_U3BSTA.setURXISEL1(thebits : TBits_1); inline;
  39739. begin
  39740. if thebits = 0 then
  39741. pTDefRegMap(@Self)^.clr := $00000080
  39742. else
  39743. pTDefRegMap(@Self)^.&set := $00000080;
  39744. end;
  39745. function TUART5_U3BSTA.getURXISEL1 : TBits_1; inline;
  39746. begin
  39747. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  39748. end;
  39749. procedure TUART5_U3BSTA.setUTXISEL0; inline;
  39750. begin
  39751. pTDefRegMap(@Self)^.&set := $00004000;
  39752. end;
  39753. procedure TUART5_U3BSTA.clearUTXISEL0; inline;
  39754. begin
  39755. pTDefRegMap(@Self)^.clr := $00004000;
  39756. end;
  39757. procedure TUART5_U3BSTA.setUTXISEL0(thebits : TBits_1); inline;
  39758. begin
  39759. if thebits = 0 then
  39760. pTDefRegMap(@Self)^.clr := $00004000
  39761. else
  39762. pTDefRegMap(@Self)^.&set := $00004000;
  39763. end;
  39764. function TUART5_U3BSTA.getUTXISEL0 : TBits_1; inline;
  39765. begin
  39766. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  39767. end;
  39768. procedure TUART5_U3BSTA.setUTXISEL1; inline;
  39769. begin
  39770. pTDefRegMap(@Self)^.&set := $00008000;
  39771. end;
  39772. procedure TUART5_U3BSTA.clearUTXISEL1; inline;
  39773. begin
  39774. pTDefRegMap(@Self)^.clr := $00008000;
  39775. end;
  39776. procedure TUART5_U3BSTA.setUTXISEL1(thebits : TBits_1); inline;
  39777. begin
  39778. if thebits = 0 then
  39779. pTDefRegMap(@Self)^.clr := $00008000
  39780. else
  39781. pTDefRegMap(@Self)^.&set := $00008000;
  39782. end;
  39783. function TUART5_U3BSTA.getUTXISEL1 : TBits_1; inline;
  39784. begin
  39785. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  39786. end;
  39787. procedure TUART5_U3BSTA.setUTXSEL(thebits : TBits_2); inline;
  39788. begin
  39789. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  39790. end;
  39791. function TUART5_U3BSTA.getUTXSEL : TBits_2; inline;
  39792. begin
  39793. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  39794. end;
  39795. procedure TUART5_U3BSTA.setw(thebits : TBits_32); inline;
  39796. begin
  39797. pTDefRegMap(@Self)^.val := thebits;
  39798. end;
  39799. function TUART5_U3BSTA.getw : TBits_32; inline;
  39800. begin
  39801. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  39802. end;
  39803. procedure TUART5_U5STA.setURXDA; inline;
  39804. begin
  39805. pTDefRegMap(@Self)^.&set := $00000001;
  39806. end;
  39807. procedure TUART5_U5STA.clearURXDA; inline;
  39808. begin
  39809. pTDefRegMap(@Self)^.clr := $00000001;
  39810. end;
  39811. procedure TUART5_U5STA.setURXDA(thebits : TBits_1); inline;
  39812. begin
  39813. if thebits = 0 then
  39814. pTDefRegMap(@Self)^.clr := $00000001
  39815. else
  39816. pTDefRegMap(@Self)^.&set := $00000001;
  39817. end;
  39818. function TUART5_U5STA.getURXDA : TBits_1; inline;
  39819. begin
  39820. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  39821. end;
  39822. procedure TUART5_U5STA.setOERR; inline;
  39823. begin
  39824. pTDefRegMap(@Self)^.&set := $00000002;
  39825. end;
  39826. procedure TUART5_U5STA.clearOERR; inline;
  39827. begin
  39828. pTDefRegMap(@Self)^.clr := $00000002;
  39829. end;
  39830. procedure TUART5_U5STA.setOERR(thebits : TBits_1); inline;
  39831. begin
  39832. if thebits = 0 then
  39833. pTDefRegMap(@Self)^.clr := $00000002
  39834. else
  39835. pTDefRegMap(@Self)^.&set := $00000002;
  39836. end;
  39837. function TUART5_U5STA.getOERR : TBits_1; inline;
  39838. begin
  39839. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  39840. end;
  39841. procedure TUART5_U5STA.setFERR; inline;
  39842. begin
  39843. pTDefRegMap(@Self)^.&set := $00000004;
  39844. end;
  39845. procedure TUART5_U5STA.clearFERR; inline;
  39846. begin
  39847. pTDefRegMap(@Self)^.clr := $00000004;
  39848. end;
  39849. procedure TUART5_U5STA.setFERR(thebits : TBits_1); inline;
  39850. begin
  39851. if thebits = 0 then
  39852. pTDefRegMap(@Self)^.clr := $00000004
  39853. else
  39854. pTDefRegMap(@Self)^.&set := $00000004;
  39855. end;
  39856. function TUART5_U5STA.getFERR : TBits_1; inline;
  39857. begin
  39858. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  39859. end;
  39860. procedure TUART5_U5STA.setPERR; inline;
  39861. begin
  39862. pTDefRegMap(@Self)^.&set := $00000008;
  39863. end;
  39864. procedure TUART5_U5STA.clearPERR; inline;
  39865. begin
  39866. pTDefRegMap(@Self)^.clr := $00000008;
  39867. end;
  39868. procedure TUART5_U5STA.setPERR(thebits : TBits_1); inline;
  39869. begin
  39870. if thebits = 0 then
  39871. pTDefRegMap(@Self)^.clr := $00000008
  39872. else
  39873. pTDefRegMap(@Self)^.&set := $00000008;
  39874. end;
  39875. function TUART5_U5STA.getPERR : TBits_1; inline;
  39876. begin
  39877. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  39878. end;
  39879. procedure TUART5_U5STA.setRIDLE; inline;
  39880. begin
  39881. pTDefRegMap(@Self)^.&set := $00000010;
  39882. end;
  39883. procedure TUART5_U5STA.clearRIDLE; inline;
  39884. begin
  39885. pTDefRegMap(@Self)^.clr := $00000010;
  39886. end;
  39887. procedure TUART5_U5STA.setRIDLE(thebits : TBits_1); inline;
  39888. begin
  39889. if thebits = 0 then
  39890. pTDefRegMap(@Self)^.clr := $00000010
  39891. else
  39892. pTDefRegMap(@Self)^.&set := $00000010;
  39893. end;
  39894. function TUART5_U5STA.getRIDLE : TBits_1; inline;
  39895. begin
  39896. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  39897. end;
  39898. procedure TUART5_U5STA.setADDEN; inline;
  39899. begin
  39900. pTDefRegMap(@Self)^.&set := $00000020;
  39901. end;
  39902. procedure TUART5_U5STA.clearADDEN; inline;
  39903. begin
  39904. pTDefRegMap(@Self)^.clr := $00000020;
  39905. end;
  39906. procedure TUART5_U5STA.setADDEN(thebits : TBits_1); inline;
  39907. begin
  39908. if thebits = 0 then
  39909. pTDefRegMap(@Self)^.clr := $00000020
  39910. else
  39911. pTDefRegMap(@Self)^.&set := $00000020;
  39912. end;
  39913. function TUART5_U5STA.getADDEN : TBits_1; inline;
  39914. begin
  39915. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  39916. end;
  39917. procedure TUART5_U5STA.setURXISEL(thebits : TBits_2); inline;
  39918. begin
  39919. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  39920. end;
  39921. function TUART5_U5STA.getURXISEL : TBits_2; inline;
  39922. begin
  39923. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  39924. end;
  39925. procedure TUART5_U5STA.setTRMT; inline;
  39926. begin
  39927. pTDefRegMap(@Self)^.&set := $00000100;
  39928. end;
  39929. procedure TUART5_U5STA.clearTRMT; inline;
  39930. begin
  39931. pTDefRegMap(@Self)^.clr := $00000100;
  39932. end;
  39933. procedure TUART5_U5STA.setTRMT(thebits : TBits_1); inline;
  39934. begin
  39935. if thebits = 0 then
  39936. pTDefRegMap(@Self)^.clr := $00000100
  39937. else
  39938. pTDefRegMap(@Self)^.&set := $00000100;
  39939. end;
  39940. function TUART5_U5STA.getTRMT : TBits_1; inline;
  39941. begin
  39942. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  39943. end;
  39944. procedure TUART5_U5STA.setUTXBF; inline;
  39945. begin
  39946. pTDefRegMap(@Self)^.&set := $00000200;
  39947. end;
  39948. procedure TUART5_U5STA.clearUTXBF; inline;
  39949. begin
  39950. pTDefRegMap(@Self)^.clr := $00000200;
  39951. end;
  39952. procedure TUART5_U5STA.setUTXBF(thebits : TBits_1); inline;
  39953. begin
  39954. if thebits = 0 then
  39955. pTDefRegMap(@Self)^.clr := $00000200
  39956. else
  39957. pTDefRegMap(@Self)^.&set := $00000200;
  39958. end;
  39959. function TUART5_U5STA.getUTXBF : TBits_1; inline;
  39960. begin
  39961. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  39962. end;
  39963. procedure TUART5_U5STA.setUTXEN; inline;
  39964. begin
  39965. pTDefRegMap(@Self)^.&set := $00000400;
  39966. end;
  39967. procedure TUART5_U5STA.clearUTXEN; inline;
  39968. begin
  39969. pTDefRegMap(@Self)^.clr := $00000400;
  39970. end;
  39971. procedure TUART5_U5STA.setUTXEN(thebits : TBits_1); inline;
  39972. begin
  39973. if thebits = 0 then
  39974. pTDefRegMap(@Self)^.clr := $00000400
  39975. else
  39976. pTDefRegMap(@Self)^.&set := $00000400;
  39977. end;
  39978. function TUART5_U5STA.getUTXEN : TBits_1; inline;
  39979. begin
  39980. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  39981. end;
  39982. procedure TUART5_U5STA.setUTXBRK; inline;
  39983. begin
  39984. pTDefRegMap(@Self)^.&set := $00000800;
  39985. end;
  39986. procedure TUART5_U5STA.clearUTXBRK; inline;
  39987. begin
  39988. pTDefRegMap(@Self)^.clr := $00000800;
  39989. end;
  39990. procedure TUART5_U5STA.setUTXBRK(thebits : TBits_1); inline;
  39991. begin
  39992. if thebits = 0 then
  39993. pTDefRegMap(@Self)^.clr := $00000800
  39994. else
  39995. pTDefRegMap(@Self)^.&set := $00000800;
  39996. end;
  39997. function TUART5_U5STA.getUTXBRK : TBits_1; inline;
  39998. begin
  39999. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  40000. end;
  40001. procedure TUART5_U5STA.setURXEN; inline;
  40002. begin
  40003. pTDefRegMap(@Self)^.&set := $00001000;
  40004. end;
  40005. procedure TUART5_U5STA.clearURXEN; inline;
  40006. begin
  40007. pTDefRegMap(@Self)^.clr := $00001000;
  40008. end;
  40009. procedure TUART5_U5STA.setURXEN(thebits : TBits_1); inline;
  40010. begin
  40011. if thebits = 0 then
  40012. pTDefRegMap(@Self)^.clr := $00001000
  40013. else
  40014. pTDefRegMap(@Self)^.&set := $00001000;
  40015. end;
  40016. function TUART5_U5STA.getURXEN : TBits_1; inline;
  40017. begin
  40018. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  40019. end;
  40020. procedure TUART5_U5STA.setUTXINV; inline;
  40021. begin
  40022. pTDefRegMap(@Self)^.&set := $00002000;
  40023. end;
  40024. procedure TUART5_U5STA.clearUTXINV; inline;
  40025. begin
  40026. pTDefRegMap(@Self)^.clr := $00002000;
  40027. end;
  40028. procedure TUART5_U5STA.setUTXINV(thebits : TBits_1); inline;
  40029. begin
  40030. if thebits = 0 then
  40031. pTDefRegMap(@Self)^.clr := $00002000
  40032. else
  40033. pTDefRegMap(@Self)^.&set := $00002000;
  40034. end;
  40035. function TUART5_U5STA.getUTXINV : TBits_1; inline;
  40036. begin
  40037. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  40038. end;
  40039. procedure TUART5_U5STA.setUTXISEL(thebits : TBits_2); inline;
  40040. begin
  40041. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  40042. end;
  40043. function TUART5_U5STA.getUTXISEL : TBits_2; inline;
  40044. begin
  40045. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  40046. end;
  40047. procedure TUART5_U5STA.setADDR(thebits : TBits_8); inline;
  40048. begin
  40049. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  40050. end;
  40051. function TUART5_U5STA.getADDR : TBits_8; inline;
  40052. begin
  40053. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  40054. end;
  40055. procedure TUART5_U5STA.setADM_EN; inline;
  40056. begin
  40057. pTDefRegMap(@Self)^.&set := $01000000;
  40058. end;
  40059. procedure TUART5_U5STA.clearADM_EN; inline;
  40060. begin
  40061. pTDefRegMap(@Self)^.clr := $01000000;
  40062. end;
  40063. procedure TUART5_U5STA.setADM_EN(thebits : TBits_1); inline;
  40064. begin
  40065. if thebits = 0 then
  40066. pTDefRegMap(@Self)^.clr := $01000000
  40067. else
  40068. pTDefRegMap(@Self)^.&set := $01000000;
  40069. end;
  40070. function TUART5_U5STA.getADM_EN : TBits_1; inline;
  40071. begin
  40072. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  40073. end;
  40074. procedure TUART5_U5STA.setURXISEL0; inline;
  40075. begin
  40076. pTDefRegMap(@Self)^.&set := $00000040;
  40077. end;
  40078. procedure TUART5_U5STA.clearURXISEL0; inline;
  40079. begin
  40080. pTDefRegMap(@Self)^.clr := $00000040;
  40081. end;
  40082. procedure TUART5_U5STA.setURXISEL0(thebits : TBits_1); inline;
  40083. begin
  40084. if thebits = 0 then
  40085. pTDefRegMap(@Self)^.clr := $00000040
  40086. else
  40087. pTDefRegMap(@Self)^.&set := $00000040;
  40088. end;
  40089. function TUART5_U5STA.getURXISEL0 : TBits_1; inline;
  40090. begin
  40091. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  40092. end;
  40093. procedure TUART5_U5STA.setURXISEL1; inline;
  40094. begin
  40095. pTDefRegMap(@Self)^.&set := $00000080;
  40096. end;
  40097. procedure TUART5_U5STA.clearURXISEL1; inline;
  40098. begin
  40099. pTDefRegMap(@Self)^.clr := $00000080;
  40100. end;
  40101. procedure TUART5_U5STA.setURXISEL1(thebits : TBits_1); inline;
  40102. begin
  40103. if thebits = 0 then
  40104. pTDefRegMap(@Self)^.clr := $00000080
  40105. else
  40106. pTDefRegMap(@Self)^.&set := $00000080;
  40107. end;
  40108. function TUART5_U5STA.getURXISEL1 : TBits_1; inline;
  40109. begin
  40110. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  40111. end;
  40112. procedure TUART5_U5STA.setUTXISEL0; inline;
  40113. begin
  40114. pTDefRegMap(@Self)^.&set := $00004000;
  40115. end;
  40116. procedure TUART5_U5STA.clearUTXISEL0; inline;
  40117. begin
  40118. pTDefRegMap(@Self)^.clr := $00004000;
  40119. end;
  40120. procedure TUART5_U5STA.setUTXISEL0(thebits : TBits_1); inline;
  40121. begin
  40122. if thebits = 0 then
  40123. pTDefRegMap(@Self)^.clr := $00004000
  40124. else
  40125. pTDefRegMap(@Self)^.&set := $00004000;
  40126. end;
  40127. function TUART5_U5STA.getUTXISEL0 : TBits_1; inline;
  40128. begin
  40129. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  40130. end;
  40131. procedure TUART5_U5STA.setUTXISEL1; inline;
  40132. begin
  40133. pTDefRegMap(@Self)^.&set := $00008000;
  40134. end;
  40135. procedure TUART5_U5STA.clearUTXISEL1; inline;
  40136. begin
  40137. pTDefRegMap(@Self)^.clr := $00008000;
  40138. end;
  40139. procedure TUART5_U5STA.setUTXISEL1(thebits : TBits_1); inline;
  40140. begin
  40141. if thebits = 0 then
  40142. pTDefRegMap(@Self)^.clr := $00008000
  40143. else
  40144. pTDefRegMap(@Self)^.&set := $00008000;
  40145. end;
  40146. function TUART5_U5STA.getUTXISEL1 : TBits_1; inline;
  40147. begin
  40148. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  40149. end;
  40150. procedure TUART5_U5STA.setUTXSEL(thebits : TBits_2); inline;
  40151. begin
  40152. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  40153. end;
  40154. function TUART5_U5STA.getUTXSEL : TBits_2; inline;
  40155. begin
  40156. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  40157. end;
  40158. procedure TUART5_U5STA.setw(thebits : TBits_32); inline;
  40159. begin
  40160. pTDefRegMap(@Self)^.val := thebits;
  40161. end;
  40162. function TUART5_U5STA.getw : TBits_32; inline;
  40163. begin
  40164. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  40165. end;
  40166. procedure TPMP_PMCON.setRDSP; inline;
  40167. begin
  40168. pTDefRegMap(@Self)^.&set := $00000001;
  40169. end;
  40170. procedure TPMP_PMCON.clearRDSP; inline;
  40171. begin
  40172. pTDefRegMap(@Self)^.clr := $00000001;
  40173. end;
  40174. procedure TPMP_PMCON.setRDSP(thebits : TBits_1); inline;
  40175. begin
  40176. if thebits = 0 then
  40177. pTDefRegMap(@Self)^.clr := $00000001
  40178. else
  40179. pTDefRegMap(@Self)^.&set := $00000001;
  40180. end;
  40181. function TPMP_PMCON.getRDSP : TBits_1; inline;
  40182. begin
  40183. getRDSP := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  40184. end;
  40185. procedure TPMP_PMCON.setWRSP; inline;
  40186. begin
  40187. pTDefRegMap(@Self)^.&set := $00000002;
  40188. end;
  40189. procedure TPMP_PMCON.clearWRSP; inline;
  40190. begin
  40191. pTDefRegMap(@Self)^.clr := $00000002;
  40192. end;
  40193. procedure TPMP_PMCON.setWRSP(thebits : TBits_1); inline;
  40194. begin
  40195. if thebits = 0 then
  40196. pTDefRegMap(@Self)^.clr := $00000002
  40197. else
  40198. pTDefRegMap(@Self)^.&set := $00000002;
  40199. end;
  40200. function TPMP_PMCON.getWRSP : TBits_1; inline;
  40201. begin
  40202. getWRSP := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  40203. end;
  40204. procedure TPMP_PMCON.setCS1P; inline;
  40205. begin
  40206. pTDefRegMap(@Self)^.&set := $00000008;
  40207. end;
  40208. procedure TPMP_PMCON.clearCS1P; inline;
  40209. begin
  40210. pTDefRegMap(@Self)^.clr := $00000008;
  40211. end;
  40212. procedure TPMP_PMCON.setCS1P(thebits : TBits_1); inline;
  40213. begin
  40214. if thebits = 0 then
  40215. pTDefRegMap(@Self)^.clr := $00000008
  40216. else
  40217. pTDefRegMap(@Self)^.&set := $00000008;
  40218. end;
  40219. function TPMP_PMCON.getCS1P : TBits_1; inline;
  40220. begin
  40221. getCS1P := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  40222. end;
  40223. procedure TPMP_PMCON.setCS2P; inline;
  40224. begin
  40225. pTDefRegMap(@Self)^.&set := $00000010;
  40226. end;
  40227. procedure TPMP_PMCON.clearCS2P; inline;
  40228. begin
  40229. pTDefRegMap(@Self)^.clr := $00000010;
  40230. end;
  40231. procedure TPMP_PMCON.setCS2P(thebits : TBits_1); inline;
  40232. begin
  40233. if thebits = 0 then
  40234. pTDefRegMap(@Self)^.clr := $00000010
  40235. else
  40236. pTDefRegMap(@Self)^.&set := $00000010;
  40237. end;
  40238. function TPMP_PMCON.getCS2P : TBits_1; inline;
  40239. begin
  40240. getCS2P := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  40241. end;
  40242. procedure TPMP_PMCON.setALP; inline;
  40243. begin
  40244. pTDefRegMap(@Self)^.&set := $00000020;
  40245. end;
  40246. procedure TPMP_PMCON.clearALP; inline;
  40247. begin
  40248. pTDefRegMap(@Self)^.clr := $00000020;
  40249. end;
  40250. procedure TPMP_PMCON.setALP(thebits : TBits_1); inline;
  40251. begin
  40252. if thebits = 0 then
  40253. pTDefRegMap(@Self)^.clr := $00000020
  40254. else
  40255. pTDefRegMap(@Self)^.&set := $00000020;
  40256. end;
  40257. function TPMP_PMCON.getALP : TBits_1; inline;
  40258. begin
  40259. getALP := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  40260. end;
  40261. procedure TPMP_PMCON.setCSF(thebits : TBits_2); inline;
  40262. begin
  40263. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  40264. end;
  40265. function TPMP_PMCON.getCSF : TBits_2; inline;
  40266. begin
  40267. getCSF := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  40268. end;
  40269. procedure TPMP_PMCON.setPTRDEN; inline;
  40270. begin
  40271. pTDefRegMap(@Self)^.&set := $00000100;
  40272. end;
  40273. procedure TPMP_PMCON.clearPTRDEN; inline;
  40274. begin
  40275. pTDefRegMap(@Self)^.clr := $00000100;
  40276. end;
  40277. procedure TPMP_PMCON.setPTRDEN(thebits : TBits_1); inline;
  40278. begin
  40279. if thebits = 0 then
  40280. pTDefRegMap(@Self)^.clr := $00000100
  40281. else
  40282. pTDefRegMap(@Self)^.&set := $00000100;
  40283. end;
  40284. function TPMP_PMCON.getPTRDEN : TBits_1; inline;
  40285. begin
  40286. getPTRDEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  40287. end;
  40288. procedure TPMP_PMCON.setPTWREN; inline;
  40289. begin
  40290. pTDefRegMap(@Self)^.&set := $00000200;
  40291. end;
  40292. procedure TPMP_PMCON.clearPTWREN; inline;
  40293. begin
  40294. pTDefRegMap(@Self)^.clr := $00000200;
  40295. end;
  40296. procedure TPMP_PMCON.setPTWREN(thebits : TBits_1); inline;
  40297. begin
  40298. if thebits = 0 then
  40299. pTDefRegMap(@Self)^.clr := $00000200
  40300. else
  40301. pTDefRegMap(@Self)^.&set := $00000200;
  40302. end;
  40303. function TPMP_PMCON.getPTWREN : TBits_1; inline;
  40304. begin
  40305. getPTWREN := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  40306. end;
  40307. procedure TPMP_PMCON.setPMPTTL; inline;
  40308. begin
  40309. pTDefRegMap(@Self)^.&set := $00000400;
  40310. end;
  40311. procedure TPMP_PMCON.clearPMPTTL; inline;
  40312. begin
  40313. pTDefRegMap(@Self)^.clr := $00000400;
  40314. end;
  40315. procedure TPMP_PMCON.setPMPTTL(thebits : TBits_1); inline;
  40316. begin
  40317. if thebits = 0 then
  40318. pTDefRegMap(@Self)^.clr := $00000400
  40319. else
  40320. pTDefRegMap(@Self)^.&set := $00000400;
  40321. end;
  40322. function TPMP_PMCON.getPMPTTL : TBits_1; inline;
  40323. begin
  40324. getPMPTTL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  40325. end;
  40326. procedure TPMP_PMCON.setADRMUX(thebits : TBits_2); inline;
  40327. begin
  40328. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE7FF or ( thebits shl 11 );
  40329. end;
  40330. function TPMP_PMCON.getADRMUX : TBits_2; inline;
  40331. begin
  40332. getADRMUX := (pTDefRegMap(@Self)^.val and $00001800) shr 11;
  40333. end;
  40334. procedure TPMP_PMCON.setSIDL; inline;
  40335. begin
  40336. pTDefRegMap(@Self)^.&set := $00002000;
  40337. end;
  40338. procedure TPMP_PMCON.clearSIDL; inline;
  40339. begin
  40340. pTDefRegMap(@Self)^.clr := $00002000;
  40341. end;
  40342. procedure TPMP_PMCON.setSIDL(thebits : TBits_1); inline;
  40343. begin
  40344. if thebits = 0 then
  40345. pTDefRegMap(@Self)^.clr := $00002000
  40346. else
  40347. pTDefRegMap(@Self)^.&set := $00002000;
  40348. end;
  40349. function TPMP_PMCON.getSIDL : TBits_1; inline;
  40350. begin
  40351. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  40352. end;
  40353. procedure TPMP_PMCON.setON; inline;
  40354. begin
  40355. pTDefRegMap(@Self)^.&set := $00008000;
  40356. end;
  40357. procedure TPMP_PMCON.clearON; inline;
  40358. begin
  40359. pTDefRegMap(@Self)^.clr := $00008000;
  40360. end;
  40361. procedure TPMP_PMCON.setON(thebits : TBits_1); inline;
  40362. begin
  40363. if thebits = 0 then
  40364. pTDefRegMap(@Self)^.clr := $00008000
  40365. else
  40366. pTDefRegMap(@Self)^.&set := $00008000;
  40367. end;
  40368. function TPMP_PMCON.getON : TBits_1; inline;
  40369. begin
  40370. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  40371. end;
  40372. procedure TPMP_PMCON.setCSF0; inline;
  40373. begin
  40374. pTDefRegMap(@Self)^.&set := $00000040;
  40375. end;
  40376. procedure TPMP_PMCON.clearCSF0; inline;
  40377. begin
  40378. pTDefRegMap(@Self)^.clr := $00000040;
  40379. end;
  40380. procedure TPMP_PMCON.setCSF0(thebits : TBits_1); inline;
  40381. begin
  40382. if thebits = 0 then
  40383. pTDefRegMap(@Self)^.clr := $00000040
  40384. else
  40385. pTDefRegMap(@Self)^.&set := $00000040;
  40386. end;
  40387. function TPMP_PMCON.getCSF0 : TBits_1; inline;
  40388. begin
  40389. getCSF0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  40390. end;
  40391. procedure TPMP_PMCON.setCSF1; inline;
  40392. begin
  40393. pTDefRegMap(@Self)^.&set := $00000080;
  40394. end;
  40395. procedure TPMP_PMCON.clearCSF1; inline;
  40396. begin
  40397. pTDefRegMap(@Self)^.clr := $00000080;
  40398. end;
  40399. procedure TPMP_PMCON.setCSF1(thebits : TBits_1); inline;
  40400. begin
  40401. if thebits = 0 then
  40402. pTDefRegMap(@Self)^.clr := $00000080
  40403. else
  40404. pTDefRegMap(@Self)^.&set := $00000080;
  40405. end;
  40406. function TPMP_PMCON.getCSF1 : TBits_1; inline;
  40407. begin
  40408. getCSF1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  40409. end;
  40410. procedure TPMP_PMCON.setADRMUX0; inline;
  40411. begin
  40412. pTDefRegMap(@Self)^.&set := $00000800;
  40413. end;
  40414. procedure TPMP_PMCON.clearADRMUX0; inline;
  40415. begin
  40416. pTDefRegMap(@Self)^.clr := $00000800;
  40417. end;
  40418. procedure TPMP_PMCON.setADRMUX0(thebits : TBits_1); inline;
  40419. begin
  40420. if thebits = 0 then
  40421. pTDefRegMap(@Self)^.clr := $00000800
  40422. else
  40423. pTDefRegMap(@Self)^.&set := $00000800;
  40424. end;
  40425. function TPMP_PMCON.getADRMUX0 : TBits_1; inline;
  40426. begin
  40427. getADRMUX0 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  40428. end;
  40429. procedure TPMP_PMCON.setADRMUX1; inline;
  40430. begin
  40431. pTDefRegMap(@Self)^.&set := $00001000;
  40432. end;
  40433. procedure TPMP_PMCON.clearADRMUX1; inline;
  40434. begin
  40435. pTDefRegMap(@Self)^.clr := $00001000;
  40436. end;
  40437. procedure TPMP_PMCON.setADRMUX1(thebits : TBits_1); inline;
  40438. begin
  40439. if thebits = 0 then
  40440. pTDefRegMap(@Self)^.clr := $00001000
  40441. else
  40442. pTDefRegMap(@Self)^.&set := $00001000;
  40443. end;
  40444. function TPMP_PMCON.getADRMUX1 : TBits_1; inline;
  40445. begin
  40446. getADRMUX1 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  40447. end;
  40448. procedure TPMP_PMCON.setPSIDL; inline;
  40449. begin
  40450. pTDefRegMap(@Self)^.&set := $00002000;
  40451. end;
  40452. procedure TPMP_PMCON.clearPSIDL; inline;
  40453. begin
  40454. pTDefRegMap(@Self)^.clr := $00002000;
  40455. end;
  40456. procedure TPMP_PMCON.setPSIDL(thebits : TBits_1); inline;
  40457. begin
  40458. if thebits = 0 then
  40459. pTDefRegMap(@Self)^.clr := $00002000
  40460. else
  40461. pTDefRegMap(@Self)^.&set := $00002000;
  40462. end;
  40463. function TPMP_PMCON.getPSIDL : TBits_1; inline;
  40464. begin
  40465. getPSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  40466. end;
  40467. procedure TPMP_PMCON.setPMPEN; inline;
  40468. begin
  40469. pTDefRegMap(@Self)^.&set := $00008000;
  40470. end;
  40471. procedure TPMP_PMCON.clearPMPEN; inline;
  40472. begin
  40473. pTDefRegMap(@Self)^.clr := $00008000;
  40474. end;
  40475. procedure TPMP_PMCON.setPMPEN(thebits : TBits_1); inline;
  40476. begin
  40477. if thebits = 0 then
  40478. pTDefRegMap(@Self)^.clr := $00008000
  40479. else
  40480. pTDefRegMap(@Self)^.&set := $00008000;
  40481. end;
  40482. function TPMP_PMCON.getPMPEN : TBits_1; inline;
  40483. begin
  40484. getPMPEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  40485. end;
  40486. procedure TPMP_PMCON.setw(thebits : TBits_32); inline;
  40487. begin
  40488. pTDefRegMap(@Self)^.val := thebits;
  40489. end;
  40490. function TPMP_PMCON.getw : TBits_32; inline;
  40491. begin
  40492. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  40493. end;
  40494. procedure TPMP_PMMODE.setWAITE(thebits : TBits_2); inline;
  40495. begin
  40496. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  40497. end;
  40498. function TPMP_PMMODE.getWAITE : TBits_2; inline;
  40499. begin
  40500. getWAITE := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  40501. end;
  40502. procedure TPMP_PMMODE.setWAITM(thebits : TBits_4); inline;
  40503. begin
  40504. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC3 or ( thebits shl 2 );
  40505. end;
  40506. function TPMP_PMMODE.getWAITM : TBits_4; inline;
  40507. begin
  40508. getWAITM := (pTDefRegMap(@Self)^.val and $0000003C) shr 2;
  40509. end;
  40510. procedure TPMP_PMMODE.setWAITB(thebits : TBits_2); inline;
  40511. begin
  40512. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  40513. end;
  40514. function TPMP_PMMODE.getWAITB : TBits_2; inline;
  40515. begin
  40516. getWAITB := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  40517. end;
  40518. procedure TPMP_PMMODE.setMODE(thebits : TBits_2); inline;
  40519. begin
  40520. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  40521. end;
  40522. function TPMP_PMMODE.getMODE : TBits_2; inline;
  40523. begin
  40524. getMODE := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  40525. end;
  40526. procedure TPMP_PMMODE.setMODE16; inline;
  40527. begin
  40528. pTDefRegMap(@Self)^.&set := $00000400;
  40529. end;
  40530. procedure TPMP_PMMODE.clearMODE16; inline;
  40531. begin
  40532. pTDefRegMap(@Self)^.clr := $00000400;
  40533. end;
  40534. procedure TPMP_PMMODE.setMODE16(thebits : TBits_1); inline;
  40535. begin
  40536. if thebits = 0 then
  40537. pTDefRegMap(@Self)^.clr := $00000400
  40538. else
  40539. pTDefRegMap(@Self)^.&set := $00000400;
  40540. end;
  40541. function TPMP_PMMODE.getMODE16 : TBits_1; inline;
  40542. begin
  40543. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  40544. end;
  40545. procedure TPMP_PMMODE.setINCM(thebits : TBits_2); inline;
  40546. begin
  40547. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE7FF or ( thebits shl 11 );
  40548. end;
  40549. function TPMP_PMMODE.getINCM : TBits_2; inline;
  40550. begin
  40551. getINCM := (pTDefRegMap(@Self)^.val and $00001800) shr 11;
  40552. end;
  40553. procedure TPMP_PMMODE.setIRQM(thebits : TBits_2); inline;
  40554. begin
  40555. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  40556. end;
  40557. function TPMP_PMMODE.getIRQM : TBits_2; inline;
  40558. begin
  40559. getIRQM := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  40560. end;
  40561. procedure TPMP_PMMODE.setBUSY; inline;
  40562. begin
  40563. pTDefRegMap(@Self)^.&set := $00008000;
  40564. end;
  40565. procedure TPMP_PMMODE.clearBUSY; inline;
  40566. begin
  40567. pTDefRegMap(@Self)^.clr := $00008000;
  40568. end;
  40569. procedure TPMP_PMMODE.setBUSY(thebits : TBits_1); inline;
  40570. begin
  40571. if thebits = 0 then
  40572. pTDefRegMap(@Self)^.clr := $00008000
  40573. else
  40574. pTDefRegMap(@Self)^.&set := $00008000;
  40575. end;
  40576. function TPMP_PMMODE.getBUSY : TBits_1; inline;
  40577. begin
  40578. getBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  40579. end;
  40580. procedure TPMP_PMMODE.setWAITE0; inline;
  40581. begin
  40582. pTDefRegMap(@Self)^.&set := $00000001;
  40583. end;
  40584. procedure TPMP_PMMODE.clearWAITE0; inline;
  40585. begin
  40586. pTDefRegMap(@Self)^.clr := $00000001;
  40587. end;
  40588. procedure TPMP_PMMODE.setWAITE0(thebits : TBits_1); inline;
  40589. begin
  40590. if thebits = 0 then
  40591. pTDefRegMap(@Self)^.clr := $00000001
  40592. else
  40593. pTDefRegMap(@Self)^.&set := $00000001;
  40594. end;
  40595. function TPMP_PMMODE.getWAITE0 : TBits_1; inline;
  40596. begin
  40597. getWAITE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  40598. end;
  40599. procedure TPMP_PMMODE.setWAITE1; inline;
  40600. begin
  40601. pTDefRegMap(@Self)^.&set := $00000002;
  40602. end;
  40603. procedure TPMP_PMMODE.clearWAITE1; inline;
  40604. begin
  40605. pTDefRegMap(@Self)^.clr := $00000002;
  40606. end;
  40607. procedure TPMP_PMMODE.setWAITE1(thebits : TBits_1); inline;
  40608. begin
  40609. if thebits = 0 then
  40610. pTDefRegMap(@Self)^.clr := $00000002
  40611. else
  40612. pTDefRegMap(@Self)^.&set := $00000002;
  40613. end;
  40614. function TPMP_PMMODE.getWAITE1 : TBits_1; inline;
  40615. begin
  40616. getWAITE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  40617. end;
  40618. procedure TPMP_PMMODE.setWAITM0; inline;
  40619. begin
  40620. pTDefRegMap(@Self)^.&set := $00000004;
  40621. end;
  40622. procedure TPMP_PMMODE.clearWAITM0; inline;
  40623. begin
  40624. pTDefRegMap(@Self)^.clr := $00000004;
  40625. end;
  40626. procedure TPMP_PMMODE.setWAITM0(thebits : TBits_1); inline;
  40627. begin
  40628. if thebits = 0 then
  40629. pTDefRegMap(@Self)^.clr := $00000004
  40630. else
  40631. pTDefRegMap(@Self)^.&set := $00000004;
  40632. end;
  40633. function TPMP_PMMODE.getWAITM0 : TBits_1; inline;
  40634. begin
  40635. getWAITM0 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  40636. end;
  40637. procedure TPMP_PMMODE.setWAITM1; inline;
  40638. begin
  40639. pTDefRegMap(@Self)^.&set := $00000008;
  40640. end;
  40641. procedure TPMP_PMMODE.clearWAITM1; inline;
  40642. begin
  40643. pTDefRegMap(@Self)^.clr := $00000008;
  40644. end;
  40645. procedure TPMP_PMMODE.setWAITM1(thebits : TBits_1); inline;
  40646. begin
  40647. if thebits = 0 then
  40648. pTDefRegMap(@Self)^.clr := $00000008
  40649. else
  40650. pTDefRegMap(@Self)^.&set := $00000008;
  40651. end;
  40652. function TPMP_PMMODE.getWAITM1 : TBits_1; inline;
  40653. begin
  40654. getWAITM1 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  40655. end;
  40656. procedure TPMP_PMMODE.setWAITM2; inline;
  40657. begin
  40658. pTDefRegMap(@Self)^.&set := $00000010;
  40659. end;
  40660. procedure TPMP_PMMODE.clearWAITM2; inline;
  40661. begin
  40662. pTDefRegMap(@Self)^.clr := $00000010;
  40663. end;
  40664. procedure TPMP_PMMODE.setWAITM2(thebits : TBits_1); inline;
  40665. begin
  40666. if thebits = 0 then
  40667. pTDefRegMap(@Self)^.clr := $00000010
  40668. else
  40669. pTDefRegMap(@Self)^.&set := $00000010;
  40670. end;
  40671. function TPMP_PMMODE.getWAITM2 : TBits_1; inline;
  40672. begin
  40673. getWAITM2 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  40674. end;
  40675. procedure TPMP_PMMODE.setWAITM3; inline;
  40676. begin
  40677. pTDefRegMap(@Self)^.&set := $00000020;
  40678. end;
  40679. procedure TPMP_PMMODE.clearWAITM3; inline;
  40680. begin
  40681. pTDefRegMap(@Self)^.clr := $00000020;
  40682. end;
  40683. procedure TPMP_PMMODE.setWAITM3(thebits : TBits_1); inline;
  40684. begin
  40685. if thebits = 0 then
  40686. pTDefRegMap(@Self)^.clr := $00000020
  40687. else
  40688. pTDefRegMap(@Self)^.&set := $00000020;
  40689. end;
  40690. function TPMP_PMMODE.getWAITM3 : TBits_1; inline;
  40691. begin
  40692. getWAITM3 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  40693. end;
  40694. procedure TPMP_PMMODE.setWAITB0; inline;
  40695. begin
  40696. pTDefRegMap(@Self)^.&set := $00000040;
  40697. end;
  40698. procedure TPMP_PMMODE.clearWAITB0; inline;
  40699. begin
  40700. pTDefRegMap(@Self)^.clr := $00000040;
  40701. end;
  40702. procedure TPMP_PMMODE.setWAITB0(thebits : TBits_1); inline;
  40703. begin
  40704. if thebits = 0 then
  40705. pTDefRegMap(@Self)^.clr := $00000040
  40706. else
  40707. pTDefRegMap(@Self)^.&set := $00000040;
  40708. end;
  40709. function TPMP_PMMODE.getWAITB0 : TBits_1; inline;
  40710. begin
  40711. getWAITB0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  40712. end;
  40713. procedure TPMP_PMMODE.setWAITB1; inline;
  40714. begin
  40715. pTDefRegMap(@Self)^.&set := $00000080;
  40716. end;
  40717. procedure TPMP_PMMODE.clearWAITB1; inline;
  40718. begin
  40719. pTDefRegMap(@Self)^.clr := $00000080;
  40720. end;
  40721. procedure TPMP_PMMODE.setWAITB1(thebits : TBits_1); inline;
  40722. begin
  40723. if thebits = 0 then
  40724. pTDefRegMap(@Self)^.clr := $00000080
  40725. else
  40726. pTDefRegMap(@Self)^.&set := $00000080;
  40727. end;
  40728. function TPMP_PMMODE.getWAITB1 : TBits_1; inline;
  40729. begin
  40730. getWAITB1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  40731. end;
  40732. procedure TPMP_PMMODE.setMODE0; inline;
  40733. begin
  40734. pTDefRegMap(@Self)^.&set := $00000100;
  40735. end;
  40736. procedure TPMP_PMMODE.clearMODE0; inline;
  40737. begin
  40738. pTDefRegMap(@Self)^.clr := $00000100;
  40739. end;
  40740. procedure TPMP_PMMODE.setMODE0(thebits : TBits_1); inline;
  40741. begin
  40742. if thebits = 0 then
  40743. pTDefRegMap(@Self)^.clr := $00000100
  40744. else
  40745. pTDefRegMap(@Self)^.&set := $00000100;
  40746. end;
  40747. function TPMP_PMMODE.getMODE0 : TBits_1; inline;
  40748. begin
  40749. getMODE0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  40750. end;
  40751. procedure TPMP_PMMODE.setMODE1; inline;
  40752. begin
  40753. pTDefRegMap(@Self)^.&set := $00000200;
  40754. end;
  40755. procedure TPMP_PMMODE.clearMODE1; inline;
  40756. begin
  40757. pTDefRegMap(@Self)^.clr := $00000200;
  40758. end;
  40759. procedure TPMP_PMMODE.setMODE1(thebits : TBits_1); inline;
  40760. begin
  40761. if thebits = 0 then
  40762. pTDefRegMap(@Self)^.clr := $00000200
  40763. else
  40764. pTDefRegMap(@Self)^.&set := $00000200;
  40765. end;
  40766. function TPMP_PMMODE.getMODE1 : TBits_1; inline;
  40767. begin
  40768. getMODE1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  40769. end;
  40770. procedure TPMP_PMMODE.setINCM0; inline;
  40771. begin
  40772. pTDefRegMap(@Self)^.&set := $00000800;
  40773. end;
  40774. procedure TPMP_PMMODE.clearINCM0; inline;
  40775. begin
  40776. pTDefRegMap(@Self)^.clr := $00000800;
  40777. end;
  40778. procedure TPMP_PMMODE.setINCM0(thebits : TBits_1); inline;
  40779. begin
  40780. if thebits = 0 then
  40781. pTDefRegMap(@Self)^.clr := $00000800
  40782. else
  40783. pTDefRegMap(@Self)^.&set := $00000800;
  40784. end;
  40785. function TPMP_PMMODE.getINCM0 : TBits_1; inline;
  40786. begin
  40787. getINCM0 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  40788. end;
  40789. procedure TPMP_PMMODE.setINCM1; inline;
  40790. begin
  40791. pTDefRegMap(@Self)^.&set := $00001000;
  40792. end;
  40793. procedure TPMP_PMMODE.clearINCM1; inline;
  40794. begin
  40795. pTDefRegMap(@Self)^.clr := $00001000;
  40796. end;
  40797. procedure TPMP_PMMODE.setINCM1(thebits : TBits_1); inline;
  40798. begin
  40799. if thebits = 0 then
  40800. pTDefRegMap(@Self)^.clr := $00001000
  40801. else
  40802. pTDefRegMap(@Self)^.&set := $00001000;
  40803. end;
  40804. function TPMP_PMMODE.getINCM1 : TBits_1; inline;
  40805. begin
  40806. getINCM1 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  40807. end;
  40808. procedure TPMP_PMMODE.setIRQM0; inline;
  40809. begin
  40810. pTDefRegMap(@Self)^.&set := $00002000;
  40811. end;
  40812. procedure TPMP_PMMODE.clearIRQM0; inline;
  40813. begin
  40814. pTDefRegMap(@Self)^.clr := $00002000;
  40815. end;
  40816. procedure TPMP_PMMODE.setIRQM0(thebits : TBits_1); inline;
  40817. begin
  40818. if thebits = 0 then
  40819. pTDefRegMap(@Self)^.clr := $00002000
  40820. else
  40821. pTDefRegMap(@Self)^.&set := $00002000;
  40822. end;
  40823. function TPMP_PMMODE.getIRQM0 : TBits_1; inline;
  40824. begin
  40825. getIRQM0 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  40826. end;
  40827. procedure TPMP_PMMODE.setIRQM1; inline;
  40828. begin
  40829. pTDefRegMap(@Self)^.&set := $00004000;
  40830. end;
  40831. procedure TPMP_PMMODE.clearIRQM1; inline;
  40832. begin
  40833. pTDefRegMap(@Self)^.clr := $00004000;
  40834. end;
  40835. procedure TPMP_PMMODE.setIRQM1(thebits : TBits_1); inline;
  40836. begin
  40837. if thebits = 0 then
  40838. pTDefRegMap(@Self)^.clr := $00004000
  40839. else
  40840. pTDefRegMap(@Self)^.&set := $00004000;
  40841. end;
  40842. function TPMP_PMMODE.getIRQM1 : TBits_1; inline;
  40843. begin
  40844. getIRQM1 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  40845. end;
  40846. procedure TPMP_PMMODE.setw(thebits : TBits_32); inline;
  40847. begin
  40848. pTDefRegMap(@Self)^.val := thebits;
  40849. end;
  40850. function TPMP_PMMODE.getw : TBits_32; inline;
  40851. begin
  40852. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  40853. end;
  40854. procedure TPMP_PMADDR.setADDR(thebits : TBits_14); inline;
  40855. begin
  40856. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFC000 or ( thebits shl 0 );
  40857. end;
  40858. function TPMP_PMADDR.getADDR : TBits_14; inline;
  40859. begin
  40860. getADDR := (pTDefRegMap(@Self)^.val and $00003FFF) shr 0;
  40861. end;
  40862. procedure TPMP_PMADDR.setCS(thebits : TBits_2); inline;
  40863. begin
  40864. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  40865. end;
  40866. function TPMP_PMADDR.getCS : TBits_2; inline;
  40867. begin
  40868. getCS := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  40869. end;
  40870. procedure TPMP_PMADDR.setPADDR(thebits : TBits_14); inline;
  40871. begin
  40872. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFC000 or ( thebits shl 0 );
  40873. end;
  40874. function TPMP_PMADDR.getPADDR : TBits_14; inline;
  40875. begin
  40876. getPADDR := (pTDefRegMap(@Self)^.val and $00003FFF) shr 0;
  40877. end;
  40878. procedure TPMP_PMADDR.setCS1; inline;
  40879. begin
  40880. pTDefRegMap(@Self)^.&set := $00004000;
  40881. end;
  40882. procedure TPMP_PMADDR.clearCS1; inline;
  40883. begin
  40884. pTDefRegMap(@Self)^.clr := $00004000;
  40885. end;
  40886. procedure TPMP_PMADDR.setCS1(thebits : TBits_1); inline;
  40887. begin
  40888. if thebits = 0 then
  40889. pTDefRegMap(@Self)^.clr := $00004000
  40890. else
  40891. pTDefRegMap(@Self)^.&set := $00004000;
  40892. end;
  40893. function TPMP_PMADDR.getCS1 : TBits_1; inline;
  40894. begin
  40895. getCS1 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  40896. end;
  40897. procedure TPMP_PMADDR.setCS2; inline;
  40898. begin
  40899. pTDefRegMap(@Self)^.&set := $00008000;
  40900. end;
  40901. procedure TPMP_PMADDR.clearCS2; inline;
  40902. begin
  40903. pTDefRegMap(@Self)^.clr := $00008000;
  40904. end;
  40905. procedure TPMP_PMADDR.setCS2(thebits : TBits_1); inline;
  40906. begin
  40907. if thebits = 0 then
  40908. pTDefRegMap(@Self)^.clr := $00008000
  40909. else
  40910. pTDefRegMap(@Self)^.&set := $00008000;
  40911. end;
  40912. function TPMP_PMADDR.getCS2 : TBits_1; inline;
  40913. begin
  40914. getCS2 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  40915. end;
  40916. procedure TPMP_PMADDR.setw(thebits : TBits_32); inline;
  40917. begin
  40918. pTDefRegMap(@Self)^.val := thebits;
  40919. end;
  40920. function TPMP_PMADDR.getw : TBits_32; inline;
  40921. begin
  40922. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  40923. end;
  40924. procedure TPMP_PMDOUT.setDATAOUT(thebits : TBits_32); inline;
  40925. begin
  40926. pTDefRegMap(@Self)^.val := thebits;
  40927. end;
  40928. function TPMP_PMDOUT.getDATAOUT : TBits_32; inline;
  40929. begin
  40930. getDATAOUT := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  40931. end;
  40932. procedure TPMP_PMDOUT.setw(thebits : TBits_32); inline;
  40933. begin
  40934. pTDefRegMap(@Self)^.val := thebits;
  40935. end;
  40936. function TPMP_PMDOUT.getw : TBits_32; inline;
  40937. begin
  40938. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  40939. end;
  40940. procedure TPMP_PMDIN.setDATAIN(thebits : TBits_32); inline;
  40941. begin
  40942. pTDefRegMap(@Self)^.val := thebits;
  40943. end;
  40944. function TPMP_PMDIN.getDATAIN : TBits_32; inline;
  40945. begin
  40946. getDATAIN := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  40947. end;
  40948. procedure TPMP_PMDIN.setw(thebits : TBits_32); inline;
  40949. begin
  40950. pTDefRegMap(@Self)^.val := thebits;
  40951. end;
  40952. function TPMP_PMDIN.getw : TBits_32; inline;
  40953. begin
  40954. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  40955. end;
  40956. procedure TPMP_PMAEN.setPTEN(thebits : TBits_16); inline;
  40957. begin
  40958. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  40959. end;
  40960. function TPMP_PMAEN.getPTEN : TBits_16; inline;
  40961. begin
  40962. getPTEN := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  40963. end;
  40964. procedure TPMP_PMAEN.setPTEN0; inline;
  40965. begin
  40966. pTDefRegMap(@Self)^.&set := $00000001;
  40967. end;
  40968. procedure TPMP_PMAEN.clearPTEN0; inline;
  40969. begin
  40970. pTDefRegMap(@Self)^.clr := $00000001;
  40971. end;
  40972. procedure TPMP_PMAEN.setPTEN0(thebits : TBits_1); inline;
  40973. begin
  40974. if thebits = 0 then
  40975. pTDefRegMap(@Self)^.clr := $00000001
  40976. else
  40977. pTDefRegMap(@Self)^.&set := $00000001;
  40978. end;
  40979. function TPMP_PMAEN.getPTEN0 : TBits_1; inline;
  40980. begin
  40981. getPTEN0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  40982. end;
  40983. procedure TPMP_PMAEN.setPTEN1; inline;
  40984. begin
  40985. pTDefRegMap(@Self)^.&set := $00000002;
  40986. end;
  40987. procedure TPMP_PMAEN.clearPTEN1; inline;
  40988. begin
  40989. pTDefRegMap(@Self)^.clr := $00000002;
  40990. end;
  40991. procedure TPMP_PMAEN.setPTEN1(thebits : TBits_1); inline;
  40992. begin
  40993. if thebits = 0 then
  40994. pTDefRegMap(@Self)^.clr := $00000002
  40995. else
  40996. pTDefRegMap(@Self)^.&set := $00000002;
  40997. end;
  40998. function TPMP_PMAEN.getPTEN1 : TBits_1; inline;
  40999. begin
  41000. getPTEN1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  41001. end;
  41002. procedure TPMP_PMAEN.setPTEN2; inline;
  41003. begin
  41004. pTDefRegMap(@Self)^.&set := $00000004;
  41005. end;
  41006. procedure TPMP_PMAEN.clearPTEN2; inline;
  41007. begin
  41008. pTDefRegMap(@Self)^.clr := $00000004;
  41009. end;
  41010. procedure TPMP_PMAEN.setPTEN2(thebits : TBits_1); inline;
  41011. begin
  41012. if thebits = 0 then
  41013. pTDefRegMap(@Self)^.clr := $00000004
  41014. else
  41015. pTDefRegMap(@Self)^.&set := $00000004;
  41016. end;
  41017. function TPMP_PMAEN.getPTEN2 : TBits_1; inline;
  41018. begin
  41019. getPTEN2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  41020. end;
  41021. procedure TPMP_PMAEN.setPTEN3; inline;
  41022. begin
  41023. pTDefRegMap(@Self)^.&set := $00000008;
  41024. end;
  41025. procedure TPMP_PMAEN.clearPTEN3; inline;
  41026. begin
  41027. pTDefRegMap(@Self)^.clr := $00000008;
  41028. end;
  41029. procedure TPMP_PMAEN.setPTEN3(thebits : TBits_1); inline;
  41030. begin
  41031. if thebits = 0 then
  41032. pTDefRegMap(@Self)^.clr := $00000008
  41033. else
  41034. pTDefRegMap(@Self)^.&set := $00000008;
  41035. end;
  41036. function TPMP_PMAEN.getPTEN3 : TBits_1; inline;
  41037. begin
  41038. getPTEN3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  41039. end;
  41040. procedure TPMP_PMAEN.setPTEN4; inline;
  41041. begin
  41042. pTDefRegMap(@Self)^.&set := $00000010;
  41043. end;
  41044. procedure TPMP_PMAEN.clearPTEN4; inline;
  41045. begin
  41046. pTDefRegMap(@Self)^.clr := $00000010;
  41047. end;
  41048. procedure TPMP_PMAEN.setPTEN4(thebits : TBits_1); inline;
  41049. begin
  41050. if thebits = 0 then
  41051. pTDefRegMap(@Self)^.clr := $00000010
  41052. else
  41053. pTDefRegMap(@Self)^.&set := $00000010;
  41054. end;
  41055. function TPMP_PMAEN.getPTEN4 : TBits_1; inline;
  41056. begin
  41057. getPTEN4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  41058. end;
  41059. procedure TPMP_PMAEN.setPTEN5; inline;
  41060. begin
  41061. pTDefRegMap(@Self)^.&set := $00000020;
  41062. end;
  41063. procedure TPMP_PMAEN.clearPTEN5; inline;
  41064. begin
  41065. pTDefRegMap(@Self)^.clr := $00000020;
  41066. end;
  41067. procedure TPMP_PMAEN.setPTEN5(thebits : TBits_1); inline;
  41068. begin
  41069. if thebits = 0 then
  41070. pTDefRegMap(@Self)^.clr := $00000020
  41071. else
  41072. pTDefRegMap(@Self)^.&set := $00000020;
  41073. end;
  41074. function TPMP_PMAEN.getPTEN5 : TBits_1; inline;
  41075. begin
  41076. getPTEN5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  41077. end;
  41078. procedure TPMP_PMAEN.setPTEN6; inline;
  41079. begin
  41080. pTDefRegMap(@Self)^.&set := $00000040;
  41081. end;
  41082. procedure TPMP_PMAEN.clearPTEN6; inline;
  41083. begin
  41084. pTDefRegMap(@Self)^.clr := $00000040;
  41085. end;
  41086. procedure TPMP_PMAEN.setPTEN6(thebits : TBits_1); inline;
  41087. begin
  41088. if thebits = 0 then
  41089. pTDefRegMap(@Self)^.clr := $00000040
  41090. else
  41091. pTDefRegMap(@Self)^.&set := $00000040;
  41092. end;
  41093. function TPMP_PMAEN.getPTEN6 : TBits_1; inline;
  41094. begin
  41095. getPTEN6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  41096. end;
  41097. procedure TPMP_PMAEN.setPTEN7; inline;
  41098. begin
  41099. pTDefRegMap(@Self)^.&set := $00000080;
  41100. end;
  41101. procedure TPMP_PMAEN.clearPTEN7; inline;
  41102. begin
  41103. pTDefRegMap(@Self)^.clr := $00000080;
  41104. end;
  41105. procedure TPMP_PMAEN.setPTEN7(thebits : TBits_1); inline;
  41106. begin
  41107. if thebits = 0 then
  41108. pTDefRegMap(@Self)^.clr := $00000080
  41109. else
  41110. pTDefRegMap(@Self)^.&set := $00000080;
  41111. end;
  41112. function TPMP_PMAEN.getPTEN7 : TBits_1; inline;
  41113. begin
  41114. getPTEN7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  41115. end;
  41116. procedure TPMP_PMAEN.setPTEN8; inline;
  41117. begin
  41118. pTDefRegMap(@Self)^.&set := $00000100;
  41119. end;
  41120. procedure TPMP_PMAEN.clearPTEN8; inline;
  41121. begin
  41122. pTDefRegMap(@Self)^.clr := $00000100;
  41123. end;
  41124. procedure TPMP_PMAEN.setPTEN8(thebits : TBits_1); inline;
  41125. begin
  41126. if thebits = 0 then
  41127. pTDefRegMap(@Self)^.clr := $00000100
  41128. else
  41129. pTDefRegMap(@Self)^.&set := $00000100;
  41130. end;
  41131. function TPMP_PMAEN.getPTEN8 : TBits_1; inline;
  41132. begin
  41133. getPTEN8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  41134. end;
  41135. procedure TPMP_PMAEN.setPTEN9; inline;
  41136. begin
  41137. pTDefRegMap(@Self)^.&set := $00000200;
  41138. end;
  41139. procedure TPMP_PMAEN.clearPTEN9; inline;
  41140. begin
  41141. pTDefRegMap(@Self)^.clr := $00000200;
  41142. end;
  41143. procedure TPMP_PMAEN.setPTEN9(thebits : TBits_1); inline;
  41144. begin
  41145. if thebits = 0 then
  41146. pTDefRegMap(@Self)^.clr := $00000200
  41147. else
  41148. pTDefRegMap(@Self)^.&set := $00000200;
  41149. end;
  41150. function TPMP_PMAEN.getPTEN9 : TBits_1; inline;
  41151. begin
  41152. getPTEN9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  41153. end;
  41154. procedure TPMP_PMAEN.setPTEN10; inline;
  41155. begin
  41156. pTDefRegMap(@Self)^.&set := $00000400;
  41157. end;
  41158. procedure TPMP_PMAEN.clearPTEN10; inline;
  41159. begin
  41160. pTDefRegMap(@Self)^.clr := $00000400;
  41161. end;
  41162. procedure TPMP_PMAEN.setPTEN10(thebits : TBits_1); inline;
  41163. begin
  41164. if thebits = 0 then
  41165. pTDefRegMap(@Self)^.clr := $00000400
  41166. else
  41167. pTDefRegMap(@Self)^.&set := $00000400;
  41168. end;
  41169. function TPMP_PMAEN.getPTEN10 : TBits_1; inline;
  41170. begin
  41171. getPTEN10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  41172. end;
  41173. procedure TPMP_PMAEN.setPTEN11; inline;
  41174. begin
  41175. pTDefRegMap(@Self)^.&set := $00000800;
  41176. end;
  41177. procedure TPMP_PMAEN.clearPTEN11; inline;
  41178. begin
  41179. pTDefRegMap(@Self)^.clr := $00000800;
  41180. end;
  41181. procedure TPMP_PMAEN.setPTEN11(thebits : TBits_1); inline;
  41182. begin
  41183. if thebits = 0 then
  41184. pTDefRegMap(@Self)^.clr := $00000800
  41185. else
  41186. pTDefRegMap(@Self)^.&set := $00000800;
  41187. end;
  41188. function TPMP_PMAEN.getPTEN11 : TBits_1; inline;
  41189. begin
  41190. getPTEN11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  41191. end;
  41192. procedure TPMP_PMAEN.setPTEN12; inline;
  41193. begin
  41194. pTDefRegMap(@Self)^.&set := $00001000;
  41195. end;
  41196. procedure TPMP_PMAEN.clearPTEN12; inline;
  41197. begin
  41198. pTDefRegMap(@Self)^.clr := $00001000;
  41199. end;
  41200. procedure TPMP_PMAEN.setPTEN12(thebits : TBits_1); inline;
  41201. begin
  41202. if thebits = 0 then
  41203. pTDefRegMap(@Self)^.clr := $00001000
  41204. else
  41205. pTDefRegMap(@Self)^.&set := $00001000;
  41206. end;
  41207. function TPMP_PMAEN.getPTEN12 : TBits_1; inline;
  41208. begin
  41209. getPTEN12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  41210. end;
  41211. procedure TPMP_PMAEN.setPTEN13; inline;
  41212. begin
  41213. pTDefRegMap(@Self)^.&set := $00002000;
  41214. end;
  41215. procedure TPMP_PMAEN.clearPTEN13; inline;
  41216. begin
  41217. pTDefRegMap(@Self)^.clr := $00002000;
  41218. end;
  41219. procedure TPMP_PMAEN.setPTEN13(thebits : TBits_1); inline;
  41220. begin
  41221. if thebits = 0 then
  41222. pTDefRegMap(@Self)^.clr := $00002000
  41223. else
  41224. pTDefRegMap(@Self)^.&set := $00002000;
  41225. end;
  41226. function TPMP_PMAEN.getPTEN13 : TBits_1; inline;
  41227. begin
  41228. getPTEN13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  41229. end;
  41230. procedure TPMP_PMAEN.setPTEN14; inline;
  41231. begin
  41232. pTDefRegMap(@Self)^.&set := $00004000;
  41233. end;
  41234. procedure TPMP_PMAEN.clearPTEN14; inline;
  41235. begin
  41236. pTDefRegMap(@Self)^.clr := $00004000;
  41237. end;
  41238. procedure TPMP_PMAEN.setPTEN14(thebits : TBits_1); inline;
  41239. begin
  41240. if thebits = 0 then
  41241. pTDefRegMap(@Self)^.clr := $00004000
  41242. else
  41243. pTDefRegMap(@Self)^.&set := $00004000;
  41244. end;
  41245. function TPMP_PMAEN.getPTEN14 : TBits_1; inline;
  41246. begin
  41247. getPTEN14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  41248. end;
  41249. procedure TPMP_PMAEN.setPTEN15; inline;
  41250. begin
  41251. pTDefRegMap(@Self)^.&set := $00008000;
  41252. end;
  41253. procedure TPMP_PMAEN.clearPTEN15; inline;
  41254. begin
  41255. pTDefRegMap(@Self)^.clr := $00008000;
  41256. end;
  41257. procedure TPMP_PMAEN.setPTEN15(thebits : TBits_1); inline;
  41258. begin
  41259. if thebits = 0 then
  41260. pTDefRegMap(@Self)^.clr := $00008000
  41261. else
  41262. pTDefRegMap(@Self)^.&set := $00008000;
  41263. end;
  41264. function TPMP_PMAEN.getPTEN15 : TBits_1; inline;
  41265. begin
  41266. getPTEN15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  41267. end;
  41268. procedure TPMP_PMAEN.setw(thebits : TBits_32); inline;
  41269. begin
  41270. pTDefRegMap(@Self)^.val := thebits;
  41271. end;
  41272. function TPMP_PMAEN.getw : TBits_32; inline;
  41273. begin
  41274. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  41275. end;
  41276. procedure TPMP_PMSTAT.setOB0E; inline;
  41277. begin
  41278. pTDefRegMap(@Self)^.&set := $00000001;
  41279. end;
  41280. procedure TPMP_PMSTAT.clearOB0E; inline;
  41281. begin
  41282. pTDefRegMap(@Self)^.clr := $00000001;
  41283. end;
  41284. procedure TPMP_PMSTAT.setOB0E(thebits : TBits_1); inline;
  41285. begin
  41286. if thebits = 0 then
  41287. pTDefRegMap(@Self)^.clr := $00000001
  41288. else
  41289. pTDefRegMap(@Self)^.&set := $00000001;
  41290. end;
  41291. function TPMP_PMSTAT.getOB0E : TBits_1; inline;
  41292. begin
  41293. getOB0E := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  41294. end;
  41295. procedure TPMP_PMSTAT.setOB1E; inline;
  41296. begin
  41297. pTDefRegMap(@Self)^.&set := $00000002;
  41298. end;
  41299. procedure TPMP_PMSTAT.clearOB1E; inline;
  41300. begin
  41301. pTDefRegMap(@Self)^.clr := $00000002;
  41302. end;
  41303. procedure TPMP_PMSTAT.setOB1E(thebits : TBits_1); inline;
  41304. begin
  41305. if thebits = 0 then
  41306. pTDefRegMap(@Self)^.clr := $00000002
  41307. else
  41308. pTDefRegMap(@Self)^.&set := $00000002;
  41309. end;
  41310. function TPMP_PMSTAT.getOB1E : TBits_1; inline;
  41311. begin
  41312. getOB1E := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  41313. end;
  41314. procedure TPMP_PMSTAT.setOB2E; inline;
  41315. begin
  41316. pTDefRegMap(@Self)^.&set := $00000004;
  41317. end;
  41318. procedure TPMP_PMSTAT.clearOB2E; inline;
  41319. begin
  41320. pTDefRegMap(@Self)^.clr := $00000004;
  41321. end;
  41322. procedure TPMP_PMSTAT.setOB2E(thebits : TBits_1); inline;
  41323. begin
  41324. if thebits = 0 then
  41325. pTDefRegMap(@Self)^.clr := $00000004
  41326. else
  41327. pTDefRegMap(@Self)^.&set := $00000004;
  41328. end;
  41329. function TPMP_PMSTAT.getOB2E : TBits_1; inline;
  41330. begin
  41331. getOB2E := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  41332. end;
  41333. procedure TPMP_PMSTAT.setOB3E; inline;
  41334. begin
  41335. pTDefRegMap(@Self)^.&set := $00000008;
  41336. end;
  41337. procedure TPMP_PMSTAT.clearOB3E; inline;
  41338. begin
  41339. pTDefRegMap(@Self)^.clr := $00000008;
  41340. end;
  41341. procedure TPMP_PMSTAT.setOB3E(thebits : TBits_1); inline;
  41342. begin
  41343. if thebits = 0 then
  41344. pTDefRegMap(@Self)^.clr := $00000008
  41345. else
  41346. pTDefRegMap(@Self)^.&set := $00000008;
  41347. end;
  41348. function TPMP_PMSTAT.getOB3E : TBits_1; inline;
  41349. begin
  41350. getOB3E := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  41351. end;
  41352. procedure TPMP_PMSTAT.setOBUF; inline;
  41353. begin
  41354. pTDefRegMap(@Self)^.&set := $00000040;
  41355. end;
  41356. procedure TPMP_PMSTAT.clearOBUF; inline;
  41357. begin
  41358. pTDefRegMap(@Self)^.clr := $00000040;
  41359. end;
  41360. procedure TPMP_PMSTAT.setOBUF(thebits : TBits_1); inline;
  41361. begin
  41362. if thebits = 0 then
  41363. pTDefRegMap(@Self)^.clr := $00000040
  41364. else
  41365. pTDefRegMap(@Self)^.&set := $00000040;
  41366. end;
  41367. function TPMP_PMSTAT.getOBUF : TBits_1; inline;
  41368. begin
  41369. getOBUF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  41370. end;
  41371. procedure TPMP_PMSTAT.setOBE; inline;
  41372. begin
  41373. pTDefRegMap(@Self)^.&set := $00000080;
  41374. end;
  41375. procedure TPMP_PMSTAT.clearOBE; inline;
  41376. begin
  41377. pTDefRegMap(@Self)^.clr := $00000080;
  41378. end;
  41379. procedure TPMP_PMSTAT.setOBE(thebits : TBits_1); inline;
  41380. begin
  41381. if thebits = 0 then
  41382. pTDefRegMap(@Self)^.clr := $00000080
  41383. else
  41384. pTDefRegMap(@Self)^.&set := $00000080;
  41385. end;
  41386. function TPMP_PMSTAT.getOBE : TBits_1; inline;
  41387. begin
  41388. getOBE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  41389. end;
  41390. procedure TPMP_PMSTAT.setIB0F; inline;
  41391. begin
  41392. pTDefRegMap(@Self)^.&set := $00000100;
  41393. end;
  41394. procedure TPMP_PMSTAT.clearIB0F; inline;
  41395. begin
  41396. pTDefRegMap(@Self)^.clr := $00000100;
  41397. end;
  41398. procedure TPMP_PMSTAT.setIB0F(thebits : TBits_1); inline;
  41399. begin
  41400. if thebits = 0 then
  41401. pTDefRegMap(@Self)^.clr := $00000100
  41402. else
  41403. pTDefRegMap(@Self)^.&set := $00000100;
  41404. end;
  41405. function TPMP_PMSTAT.getIB0F : TBits_1; inline;
  41406. begin
  41407. getIB0F := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  41408. end;
  41409. procedure TPMP_PMSTAT.setIB1F; inline;
  41410. begin
  41411. pTDefRegMap(@Self)^.&set := $00000200;
  41412. end;
  41413. procedure TPMP_PMSTAT.clearIB1F; inline;
  41414. begin
  41415. pTDefRegMap(@Self)^.clr := $00000200;
  41416. end;
  41417. procedure TPMP_PMSTAT.setIB1F(thebits : TBits_1); inline;
  41418. begin
  41419. if thebits = 0 then
  41420. pTDefRegMap(@Self)^.clr := $00000200
  41421. else
  41422. pTDefRegMap(@Self)^.&set := $00000200;
  41423. end;
  41424. function TPMP_PMSTAT.getIB1F : TBits_1; inline;
  41425. begin
  41426. getIB1F := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  41427. end;
  41428. procedure TPMP_PMSTAT.setIB2F; inline;
  41429. begin
  41430. pTDefRegMap(@Self)^.&set := $00000400;
  41431. end;
  41432. procedure TPMP_PMSTAT.clearIB2F; inline;
  41433. begin
  41434. pTDefRegMap(@Self)^.clr := $00000400;
  41435. end;
  41436. procedure TPMP_PMSTAT.setIB2F(thebits : TBits_1); inline;
  41437. begin
  41438. if thebits = 0 then
  41439. pTDefRegMap(@Self)^.clr := $00000400
  41440. else
  41441. pTDefRegMap(@Self)^.&set := $00000400;
  41442. end;
  41443. function TPMP_PMSTAT.getIB2F : TBits_1; inline;
  41444. begin
  41445. getIB2F := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  41446. end;
  41447. procedure TPMP_PMSTAT.setIB3F; inline;
  41448. begin
  41449. pTDefRegMap(@Self)^.&set := $00000800;
  41450. end;
  41451. procedure TPMP_PMSTAT.clearIB3F; inline;
  41452. begin
  41453. pTDefRegMap(@Self)^.clr := $00000800;
  41454. end;
  41455. procedure TPMP_PMSTAT.setIB3F(thebits : TBits_1); inline;
  41456. begin
  41457. if thebits = 0 then
  41458. pTDefRegMap(@Self)^.clr := $00000800
  41459. else
  41460. pTDefRegMap(@Self)^.&set := $00000800;
  41461. end;
  41462. function TPMP_PMSTAT.getIB3F : TBits_1; inline;
  41463. begin
  41464. getIB3F := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  41465. end;
  41466. procedure TPMP_PMSTAT.setIBOV; inline;
  41467. begin
  41468. pTDefRegMap(@Self)^.&set := $00004000;
  41469. end;
  41470. procedure TPMP_PMSTAT.clearIBOV; inline;
  41471. begin
  41472. pTDefRegMap(@Self)^.clr := $00004000;
  41473. end;
  41474. procedure TPMP_PMSTAT.setIBOV(thebits : TBits_1); inline;
  41475. begin
  41476. if thebits = 0 then
  41477. pTDefRegMap(@Self)^.clr := $00004000
  41478. else
  41479. pTDefRegMap(@Self)^.&set := $00004000;
  41480. end;
  41481. function TPMP_PMSTAT.getIBOV : TBits_1; inline;
  41482. begin
  41483. getIBOV := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  41484. end;
  41485. procedure TPMP_PMSTAT.setIBF; inline;
  41486. begin
  41487. pTDefRegMap(@Self)^.&set := $00008000;
  41488. end;
  41489. procedure TPMP_PMSTAT.clearIBF; inline;
  41490. begin
  41491. pTDefRegMap(@Self)^.clr := $00008000;
  41492. end;
  41493. procedure TPMP_PMSTAT.setIBF(thebits : TBits_1); inline;
  41494. begin
  41495. if thebits = 0 then
  41496. pTDefRegMap(@Self)^.clr := $00008000
  41497. else
  41498. pTDefRegMap(@Self)^.&set := $00008000;
  41499. end;
  41500. function TPMP_PMSTAT.getIBF : TBits_1; inline;
  41501. begin
  41502. getIBF := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  41503. end;
  41504. procedure TPMP_PMSTAT.setw(thebits : TBits_32); inline;
  41505. begin
  41506. pTDefRegMap(@Self)^.val := thebits;
  41507. end;
  41508. function TPMP_PMSTAT.getw : TBits_32; inline;
  41509. begin
  41510. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  41511. end;
  41512. procedure TADC10_AD1CON1.setDONE; inline;
  41513. begin
  41514. pTDefRegMap(@Self)^.&set := $00000001;
  41515. end;
  41516. procedure TADC10_AD1CON1.clearDONE; inline;
  41517. begin
  41518. pTDefRegMap(@Self)^.clr := $00000001;
  41519. end;
  41520. procedure TADC10_AD1CON1.setDONE(thebits : TBits_1); inline;
  41521. begin
  41522. if thebits = 0 then
  41523. pTDefRegMap(@Self)^.clr := $00000001
  41524. else
  41525. pTDefRegMap(@Self)^.&set := $00000001;
  41526. end;
  41527. function TADC10_AD1CON1.getDONE : TBits_1; inline;
  41528. begin
  41529. getDONE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  41530. end;
  41531. procedure TADC10_AD1CON1.setSAMP; inline;
  41532. begin
  41533. pTDefRegMap(@Self)^.&set := $00000002;
  41534. end;
  41535. procedure TADC10_AD1CON1.clearSAMP; inline;
  41536. begin
  41537. pTDefRegMap(@Self)^.clr := $00000002;
  41538. end;
  41539. procedure TADC10_AD1CON1.setSAMP(thebits : TBits_1); inline;
  41540. begin
  41541. if thebits = 0 then
  41542. pTDefRegMap(@Self)^.clr := $00000002
  41543. else
  41544. pTDefRegMap(@Self)^.&set := $00000002;
  41545. end;
  41546. function TADC10_AD1CON1.getSAMP : TBits_1; inline;
  41547. begin
  41548. getSAMP := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  41549. end;
  41550. procedure TADC10_AD1CON1.setASAM; inline;
  41551. begin
  41552. pTDefRegMap(@Self)^.&set := $00000004;
  41553. end;
  41554. procedure TADC10_AD1CON1.clearASAM; inline;
  41555. begin
  41556. pTDefRegMap(@Self)^.clr := $00000004;
  41557. end;
  41558. procedure TADC10_AD1CON1.setASAM(thebits : TBits_1); inline;
  41559. begin
  41560. if thebits = 0 then
  41561. pTDefRegMap(@Self)^.clr := $00000004
  41562. else
  41563. pTDefRegMap(@Self)^.&set := $00000004;
  41564. end;
  41565. function TADC10_AD1CON1.getASAM : TBits_1; inline;
  41566. begin
  41567. getASAM := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  41568. end;
  41569. procedure TADC10_AD1CON1.setCLRASAM; inline;
  41570. begin
  41571. pTDefRegMap(@Self)^.&set := $00000010;
  41572. end;
  41573. procedure TADC10_AD1CON1.clearCLRASAM; inline;
  41574. begin
  41575. pTDefRegMap(@Self)^.clr := $00000010;
  41576. end;
  41577. procedure TADC10_AD1CON1.setCLRASAM(thebits : TBits_1); inline;
  41578. begin
  41579. if thebits = 0 then
  41580. pTDefRegMap(@Self)^.clr := $00000010
  41581. else
  41582. pTDefRegMap(@Self)^.&set := $00000010;
  41583. end;
  41584. function TADC10_AD1CON1.getCLRASAM : TBits_1; inline;
  41585. begin
  41586. getCLRASAM := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  41587. end;
  41588. procedure TADC10_AD1CON1.setSSRC(thebits : TBits_3); inline;
  41589. begin
  41590. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF1F or ( thebits shl 5 );
  41591. end;
  41592. function TADC10_AD1CON1.getSSRC : TBits_3; inline;
  41593. begin
  41594. getSSRC := (pTDefRegMap(@Self)^.val and $000000E0) shr 5;
  41595. end;
  41596. procedure TADC10_AD1CON1.setFORM(thebits : TBits_3); inline;
  41597. begin
  41598. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF8FF or ( thebits shl 8 );
  41599. end;
  41600. function TADC10_AD1CON1.getFORM : TBits_3; inline;
  41601. begin
  41602. getFORM := (pTDefRegMap(@Self)^.val and $00000700) shr 8;
  41603. end;
  41604. procedure TADC10_AD1CON1.setSIDL; inline;
  41605. begin
  41606. pTDefRegMap(@Self)^.&set := $00002000;
  41607. end;
  41608. procedure TADC10_AD1CON1.clearSIDL; inline;
  41609. begin
  41610. pTDefRegMap(@Self)^.clr := $00002000;
  41611. end;
  41612. procedure TADC10_AD1CON1.setSIDL(thebits : TBits_1); inline;
  41613. begin
  41614. if thebits = 0 then
  41615. pTDefRegMap(@Self)^.clr := $00002000
  41616. else
  41617. pTDefRegMap(@Self)^.&set := $00002000;
  41618. end;
  41619. function TADC10_AD1CON1.getSIDL : TBits_1; inline;
  41620. begin
  41621. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  41622. end;
  41623. procedure TADC10_AD1CON1.setON; inline;
  41624. begin
  41625. pTDefRegMap(@Self)^.&set := $00008000;
  41626. end;
  41627. procedure TADC10_AD1CON1.clearON; inline;
  41628. begin
  41629. pTDefRegMap(@Self)^.clr := $00008000;
  41630. end;
  41631. procedure TADC10_AD1CON1.setON(thebits : TBits_1); inline;
  41632. begin
  41633. if thebits = 0 then
  41634. pTDefRegMap(@Self)^.clr := $00008000
  41635. else
  41636. pTDefRegMap(@Self)^.&set := $00008000;
  41637. end;
  41638. function TADC10_AD1CON1.getON : TBits_1; inline;
  41639. begin
  41640. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  41641. end;
  41642. procedure TADC10_AD1CON1.setSSRC0; inline;
  41643. begin
  41644. pTDefRegMap(@Self)^.&set := $00000020;
  41645. end;
  41646. procedure TADC10_AD1CON1.clearSSRC0; inline;
  41647. begin
  41648. pTDefRegMap(@Self)^.clr := $00000020;
  41649. end;
  41650. procedure TADC10_AD1CON1.setSSRC0(thebits : TBits_1); inline;
  41651. begin
  41652. if thebits = 0 then
  41653. pTDefRegMap(@Self)^.clr := $00000020
  41654. else
  41655. pTDefRegMap(@Self)^.&set := $00000020;
  41656. end;
  41657. function TADC10_AD1CON1.getSSRC0 : TBits_1; inline;
  41658. begin
  41659. getSSRC0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  41660. end;
  41661. procedure TADC10_AD1CON1.setSSRC1; inline;
  41662. begin
  41663. pTDefRegMap(@Self)^.&set := $00000040;
  41664. end;
  41665. procedure TADC10_AD1CON1.clearSSRC1; inline;
  41666. begin
  41667. pTDefRegMap(@Self)^.clr := $00000040;
  41668. end;
  41669. procedure TADC10_AD1CON1.setSSRC1(thebits : TBits_1); inline;
  41670. begin
  41671. if thebits = 0 then
  41672. pTDefRegMap(@Self)^.clr := $00000040
  41673. else
  41674. pTDefRegMap(@Self)^.&set := $00000040;
  41675. end;
  41676. function TADC10_AD1CON1.getSSRC1 : TBits_1; inline;
  41677. begin
  41678. getSSRC1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  41679. end;
  41680. procedure TADC10_AD1CON1.setSSRC2; inline;
  41681. begin
  41682. pTDefRegMap(@Self)^.&set := $00000080;
  41683. end;
  41684. procedure TADC10_AD1CON1.clearSSRC2; inline;
  41685. begin
  41686. pTDefRegMap(@Self)^.clr := $00000080;
  41687. end;
  41688. procedure TADC10_AD1CON1.setSSRC2(thebits : TBits_1); inline;
  41689. begin
  41690. if thebits = 0 then
  41691. pTDefRegMap(@Self)^.clr := $00000080
  41692. else
  41693. pTDefRegMap(@Self)^.&set := $00000080;
  41694. end;
  41695. function TADC10_AD1CON1.getSSRC2 : TBits_1; inline;
  41696. begin
  41697. getSSRC2 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  41698. end;
  41699. procedure TADC10_AD1CON1.setFORM0; inline;
  41700. begin
  41701. pTDefRegMap(@Self)^.&set := $00000100;
  41702. end;
  41703. procedure TADC10_AD1CON1.clearFORM0; inline;
  41704. begin
  41705. pTDefRegMap(@Self)^.clr := $00000100;
  41706. end;
  41707. procedure TADC10_AD1CON1.setFORM0(thebits : TBits_1); inline;
  41708. begin
  41709. if thebits = 0 then
  41710. pTDefRegMap(@Self)^.clr := $00000100
  41711. else
  41712. pTDefRegMap(@Self)^.&set := $00000100;
  41713. end;
  41714. function TADC10_AD1CON1.getFORM0 : TBits_1; inline;
  41715. begin
  41716. getFORM0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  41717. end;
  41718. procedure TADC10_AD1CON1.setFORM1; inline;
  41719. begin
  41720. pTDefRegMap(@Self)^.&set := $00000200;
  41721. end;
  41722. procedure TADC10_AD1CON1.clearFORM1; inline;
  41723. begin
  41724. pTDefRegMap(@Self)^.clr := $00000200;
  41725. end;
  41726. procedure TADC10_AD1CON1.setFORM1(thebits : TBits_1); inline;
  41727. begin
  41728. if thebits = 0 then
  41729. pTDefRegMap(@Self)^.clr := $00000200
  41730. else
  41731. pTDefRegMap(@Self)^.&set := $00000200;
  41732. end;
  41733. function TADC10_AD1CON1.getFORM1 : TBits_1; inline;
  41734. begin
  41735. getFORM1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  41736. end;
  41737. procedure TADC10_AD1CON1.setFORM2; inline;
  41738. begin
  41739. pTDefRegMap(@Self)^.&set := $00000400;
  41740. end;
  41741. procedure TADC10_AD1CON1.clearFORM2; inline;
  41742. begin
  41743. pTDefRegMap(@Self)^.clr := $00000400;
  41744. end;
  41745. procedure TADC10_AD1CON1.setFORM2(thebits : TBits_1); inline;
  41746. begin
  41747. if thebits = 0 then
  41748. pTDefRegMap(@Self)^.clr := $00000400
  41749. else
  41750. pTDefRegMap(@Self)^.&set := $00000400;
  41751. end;
  41752. function TADC10_AD1CON1.getFORM2 : TBits_1; inline;
  41753. begin
  41754. getFORM2 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  41755. end;
  41756. procedure TADC10_AD1CON1.setADSIDL; inline;
  41757. begin
  41758. pTDefRegMap(@Self)^.&set := $00002000;
  41759. end;
  41760. procedure TADC10_AD1CON1.clearADSIDL; inline;
  41761. begin
  41762. pTDefRegMap(@Self)^.clr := $00002000;
  41763. end;
  41764. procedure TADC10_AD1CON1.setADSIDL(thebits : TBits_1); inline;
  41765. begin
  41766. if thebits = 0 then
  41767. pTDefRegMap(@Self)^.clr := $00002000
  41768. else
  41769. pTDefRegMap(@Self)^.&set := $00002000;
  41770. end;
  41771. function TADC10_AD1CON1.getADSIDL : TBits_1; inline;
  41772. begin
  41773. getADSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  41774. end;
  41775. procedure TADC10_AD1CON1.setADON; inline;
  41776. begin
  41777. pTDefRegMap(@Self)^.&set := $00008000;
  41778. end;
  41779. procedure TADC10_AD1CON1.clearADON; inline;
  41780. begin
  41781. pTDefRegMap(@Self)^.clr := $00008000;
  41782. end;
  41783. procedure TADC10_AD1CON1.setADON(thebits : TBits_1); inline;
  41784. begin
  41785. if thebits = 0 then
  41786. pTDefRegMap(@Self)^.clr := $00008000
  41787. else
  41788. pTDefRegMap(@Self)^.&set := $00008000;
  41789. end;
  41790. function TADC10_AD1CON1.getADON : TBits_1; inline;
  41791. begin
  41792. getADON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  41793. end;
  41794. procedure TADC10_AD1CON1.setw(thebits : TBits_32); inline;
  41795. begin
  41796. pTDefRegMap(@Self)^.val := thebits;
  41797. end;
  41798. function TADC10_AD1CON1.getw : TBits_32; inline;
  41799. begin
  41800. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  41801. end;
  41802. procedure TADC10_AD1CON2.setALTS; inline;
  41803. begin
  41804. pTDefRegMap(@Self)^.&set := $00000001;
  41805. end;
  41806. procedure TADC10_AD1CON2.clearALTS; inline;
  41807. begin
  41808. pTDefRegMap(@Self)^.clr := $00000001;
  41809. end;
  41810. procedure TADC10_AD1CON2.setALTS(thebits : TBits_1); inline;
  41811. begin
  41812. if thebits = 0 then
  41813. pTDefRegMap(@Self)^.clr := $00000001
  41814. else
  41815. pTDefRegMap(@Self)^.&set := $00000001;
  41816. end;
  41817. function TADC10_AD1CON2.getALTS : TBits_1; inline;
  41818. begin
  41819. getALTS := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  41820. end;
  41821. procedure TADC10_AD1CON2.setBUFM; inline;
  41822. begin
  41823. pTDefRegMap(@Self)^.&set := $00000002;
  41824. end;
  41825. procedure TADC10_AD1CON2.clearBUFM; inline;
  41826. begin
  41827. pTDefRegMap(@Self)^.clr := $00000002;
  41828. end;
  41829. procedure TADC10_AD1CON2.setBUFM(thebits : TBits_1); inline;
  41830. begin
  41831. if thebits = 0 then
  41832. pTDefRegMap(@Self)^.clr := $00000002
  41833. else
  41834. pTDefRegMap(@Self)^.&set := $00000002;
  41835. end;
  41836. function TADC10_AD1CON2.getBUFM : TBits_1; inline;
  41837. begin
  41838. getBUFM := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  41839. end;
  41840. procedure TADC10_AD1CON2.setSMPI(thebits : TBits_4); inline;
  41841. begin
  41842. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC3 or ( thebits shl 2 );
  41843. end;
  41844. function TADC10_AD1CON2.getSMPI : TBits_4; inline;
  41845. begin
  41846. getSMPI := (pTDefRegMap(@Self)^.val and $0000003C) shr 2;
  41847. end;
  41848. procedure TADC10_AD1CON2.setBUFS; inline;
  41849. begin
  41850. pTDefRegMap(@Self)^.&set := $00000080;
  41851. end;
  41852. procedure TADC10_AD1CON2.clearBUFS; inline;
  41853. begin
  41854. pTDefRegMap(@Self)^.clr := $00000080;
  41855. end;
  41856. procedure TADC10_AD1CON2.setBUFS(thebits : TBits_1); inline;
  41857. begin
  41858. if thebits = 0 then
  41859. pTDefRegMap(@Self)^.clr := $00000080
  41860. else
  41861. pTDefRegMap(@Self)^.&set := $00000080;
  41862. end;
  41863. function TADC10_AD1CON2.getBUFS : TBits_1; inline;
  41864. begin
  41865. getBUFS := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  41866. end;
  41867. procedure TADC10_AD1CON2.setCSCNA; inline;
  41868. begin
  41869. pTDefRegMap(@Self)^.&set := $00000400;
  41870. end;
  41871. procedure TADC10_AD1CON2.clearCSCNA; inline;
  41872. begin
  41873. pTDefRegMap(@Self)^.clr := $00000400;
  41874. end;
  41875. procedure TADC10_AD1CON2.setCSCNA(thebits : TBits_1); inline;
  41876. begin
  41877. if thebits = 0 then
  41878. pTDefRegMap(@Self)^.clr := $00000400
  41879. else
  41880. pTDefRegMap(@Self)^.&set := $00000400;
  41881. end;
  41882. function TADC10_AD1CON2.getCSCNA : TBits_1; inline;
  41883. begin
  41884. getCSCNA := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  41885. end;
  41886. procedure TADC10_AD1CON2.setOFFCAL; inline;
  41887. begin
  41888. pTDefRegMap(@Self)^.&set := $00001000;
  41889. end;
  41890. procedure TADC10_AD1CON2.clearOFFCAL; inline;
  41891. begin
  41892. pTDefRegMap(@Self)^.clr := $00001000;
  41893. end;
  41894. procedure TADC10_AD1CON2.setOFFCAL(thebits : TBits_1); inline;
  41895. begin
  41896. if thebits = 0 then
  41897. pTDefRegMap(@Self)^.clr := $00001000
  41898. else
  41899. pTDefRegMap(@Self)^.&set := $00001000;
  41900. end;
  41901. function TADC10_AD1CON2.getOFFCAL : TBits_1; inline;
  41902. begin
  41903. getOFFCAL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  41904. end;
  41905. procedure TADC10_AD1CON2.setVCFG(thebits : TBits_3); inline;
  41906. begin
  41907. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF1FFF or ( thebits shl 13 );
  41908. end;
  41909. function TADC10_AD1CON2.getVCFG : TBits_3; inline;
  41910. begin
  41911. getVCFG := (pTDefRegMap(@Self)^.val and $0000E000) shr 13;
  41912. end;
  41913. procedure TADC10_AD1CON2.setSMPI0; inline;
  41914. begin
  41915. pTDefRegMap(@Self)^.&set := $00000004;
  41916. end;
  41917. procedure TADC10_AD1CON2.clearSMPI0; inline;
  41918. begin
  41919. pTDefRegMap(@Self)^.clr := $00000004;
  41920. end;
  41921. procedure TADC10_AD1CON2.setSMPI0(thebits : TBits_1); inline;
  41922. begin
  41923. if thebits = 0 then
  41924. pTDefRegMap(@Self)^.clr := $00000004
  41925. else
  41926. pTDefRegMap(@Self)^.&set := $00000004;
  41927. end;
  41928. function TADC10_AD1CON2.getSMPI0 : TBits_1; inline;
  41929. begin
  41930. getSMPI0 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  41931. end;
  41932. procedure TADC10_AD1CON2.setSMPI1; inline;
  41933. begin
  41934. pTDefRegMap(@Self)^.&set := $00000008;
  41935. end;
  41936. procedure TADC10_AD1CON2.clearSMPI1; inline;
  41937. begin
  41938. pTDefRegMap(@Self)^.clr := $00000008;
  41939. end;
  41940. procedure TADC10_AD1CON2.setSMPI1(thebits : TBits_1); inline;
  41941. begin
  41942. if thebits = 0 then
  41943. pTDefRegMap(@Self)^.clr := $00000008
  41944. else
  41945. pTDefRegMap(@Self)^.&set := $00000008;
  41946. end;
  41947. function TADC10_AD1CON2.getSMPI1 : TBits_1; inline;
  41948. begin
  41949. getSMPI1 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  41950. end;
  41951. procedure TADC10_AD1CON2.setSMPI2; inline;
  41952. begin
  41953. pTDefRegMap(@Self)^.&set := $00000010;
  41954. end;
  41955. procedure TADC10_AD1CON2.clearSMPI2; inline;
  41956. begin
  41957. pTDefRegMap(@Self)^.clr := $00000010;
  41958. end;
  41959. procedure TADC10_AD1CON2.setSMPI2(thebits : TBits_1); inline;
  41960. begin
  41961. if thebits = 0 then
  41962. pTDefRegMap(@Self)^.clr := $00000010
  41963. else
  41964. pTDefRegMap(@Self)^.&set := $00000010;
  41965. end;
  41966. function TADC10_AD1CON2.getSMPI2 : TBits_1; inline;
  41967. begin
  41968. getSMPI2 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  41969. end;
  41970. procedure TADC10_AD1CON2.setSMPI3; inline;
  41971. begin
  41972. pTDefRegMap(@Self)^.&set := $00000020;
  41973. end;
  41974. procedure TADC10_AD1CON2.clearSMPI3; inline;
  41975. begin
  41976. pTDefRegMap(@Self)^.clr := $00000020;
  41977. end;
  41978. procedure TADC10_AD1CON2.setSMPI3(thebits : TBits_1); inline;
  41979. begin
  41980. if thebits = 0 then
  41981. pTDefRegMap(@Self)^.clr := $00000020
  41982. else
  41983. pTDefRegMap(@Self)^.&set := $00000020;
  41984. end;
  41985. function TADC10_AD1CON2.getSMPI3 : TBits_1; inline;
  41986. begin
  41987. getSMPI3 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  41988. end;
  41989. procedure TADC10_AD1CON2.setVCFG0; inline;
  41990. begin
  41991. pTDefRegMap(@Self)^.&set := $00002000;
  41992. end;
  41993. procedure TADC10_AD1CON2.clearVCFG0; inline;
  41994. begin
  41995. pTDefRegMap(@Self)^.clr := $00002000;
  41996. end;
  41997. procedure TADC10_AD1CON2.setVCFG0(thebits : TBits_1); inline;
  41998. begin
  41999. if thebits = 0 then
  42000. pTDefRegMap(@Self)^.clr := $00002000
  42001. else
  42002. pTDefRegMap(@Self)^.&set := $00002000;
  42003. end;
  42004. function TADC10_AD1CON2.getVCFG0 : TBits_1; inline;
  42005. begin
  42006. getVCFG0 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  42007. end;
  42008. procedure TADC10_AD1CON2.setVCFG1; inline;
  42009. begin
  42010. pTDefRegMap(@Self)^.&set := $00004000;
  42011. end;
  42012. procedure TADC10_AD1CON2.clearVCFG1; inline;
  42013. begin
  42014. pTDefRegMap(@Self)^.clr := $00004000;
  42015. end;
  42016. procedure TADC10_AD1CON2.setVCFG1(thebits : TBits_1); inline;
  42017. begin
  42018. if thebits = 0 then
  42019. pTDefRegMap(@Self)^.clr := $00004000
  42020. else
  42021. pTDefRegMap(@Self)^.&set := $00004000;
  42022. end;
  42023. function TADC10_AD1CON2.getVCFG1 : TBits_1; inline;
  42024. begin
  42025. getVCFG1 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  42026. end;
  42027. procedure TADC10_AD1CON2.setVCFG2; inline;
  42028. begin
  42029. pTDefRegMap(@Self)^.&set := $00008000;
  42030. end;
  42031. procedure TADC10_AD1CON2.clearVCFG2; inline;
  42032. begin
  42033. pTDefRegMap(@Self)^.clr := $00008000;
  42034. end;
  42035. procedure TADC10_AD1CON2.setVCFG2(thebits : TBits_1); inline;
  42036. begin
  42037. if thebits = 0 then
  42038. pTDefRegMap(@Self)^.clr := $00008000
  42039. else
  42040. pTDefRegMap(@Self)^.&set := $00008000;
  42041. end;
  42042. function TADC10_AD1CON2.getVCFG2 : TBits_1; inline;
  42043. begin
  42044. getVCFG2 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  42045. end;
  42046. procedure TADC10_AD1CON2.setw(thebits : TBits_32); inline;
  42047. begin
  42048. pTDefRegMap(@Self)^.val := thebits;
  42049. end;
  42050. function TADC10_AD1CON2.getw : TBits_32; inline;
  42051. begin
  42052. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  42053. end;
  42054. procedure TADC10_AD1CON3.setADCS(thebits : TBits_8); inline;
  42055. begin
  42056. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  42057. end;
  42058. function TADC10_AD1CON3.getADCS : TBits_8; inline;
  42059. begin
  42060. getADCS := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  42061. end;
  42062. procedure TADC10_AD1CON3.setSAMC(thebits : TBits_5); inline;
  42063. begin
  42064. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  42065. end;
  42066. function TADC10_AD1CON3.getSAMC : TBits_5; inline;
  42067. begin
  42068. getSAMC := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  42069. end;
  42070. procedure TADC10_AD1CON3.setADRC; inline;
  42071. begin
  42072. pTDefRegMap(@Self)^.&set := $00008000;
  42073. end;
  42074. procedure TADC10_AD1CON3.clearADRC; inline;
  42075. begin
  42076. pTDefRegMap(@Self)^.clr := $00008000;
  42077. end;
  42078. procedure TADC10_AD1CON3.setADRC(thebits : TBits_1); inline;
  42079. begin
  42080. if thebits = 0 then
  42081. pTDefRegMap(@Self)^.clr := $00008000
  42082. else
  42083. pTDefRegMap(@Self)^.&set := $00008000;
  42084. end;
  42085. function TADC10_AD1CON3.getADRC : TBits_1; inline;
  42086. begin
  42087. getADRC := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  42088. end;
  42089. procedure TADC10_AD1CON3.setADCS0; inline;
  42090. begin
  42091. pTDefRegMap(@Self)^.&set := $00000001;
  42092. end;
  42093. procedure TADC10_AD1CON3.clearADCS0; inline;
  42094. begin
  42095. pTDefRegMap(@Self)^.clr := $00000001;
  42096. end;
  42097. procedure TADC10_AD1CON3.setADCS0(thebits : TBits_1); inline;
  42098. begin
  42099. if thebits = 0 then
  42100. pTDefRegMap(@Self)^.clr := $00000001
  42101. else
  42102. pTDefRegMap(@Self)^.&set := $00000001;
  42103. end;
  42104. function TADC10_AD1CON3.getADCS0 : TBits_1; inline;
  42105. begin
  42106. getADCS0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  42107. end;
  42108. procedure TADC10_AD1CON3.setADCS1; inline;
  42109. begin
  42110. pTDefRegMap(@Self)^.&set := $00000002;
  42111. end;
  42112. procedure TADC10_AD1CON3.clearADCS1; inline;
  42113. begin
  42114. pTDefRegMap(@Self)^.clr := $00000002;
  42115. end;
  42116. procedure TADC10_AD1CON3.setADCS1(thebits : TBits_1); inline;
  42117. begin
  42118. if thebits = 0 then
  42119. pTDefRegMap(@Self)^.clr := $00000002
  42120. else
  42121. pTDefRegMap(@Self)^.&set := $00000002;
  42122. end;
  42123. function TADC10_AD1CON3.getADCS1 : TBits_1; inline;
  42124. begin
  42125. getADCS1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  42126. end;
  42127. procedure TADC10_AD1CON3.setADCS2; inline;
  42128. begin
  42129. pTDefRegMap(@Self)^.&set := $00000004;
  42130. end;
  42131. procedure TADC10_AD1CON3.clearADCS2; inline;
  42132. begin
  42133. pTDefRegMap(@Self)^.clr := $00000004;
  42134. end;
  42135. procedure TADC10_AD1CON3.setADCS2(thebits : TBits_1); inline;
  42136. begin
  42137. if thebits = 0 then
  42138. pTDefRegMap(@Self)^.clr := $00000004
  42139. else
  42140. pTDefRegMap(@Self)^.&set := $00000004;
  42141. end;
  42142. function TADC10_AD1CON3.getADCS2 : TBits_1; inline;
  42143. begin
  42144. getADCS2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  42145. end;
  42146. procedure TADC10_AD1CON3.setADCS3; inline;
  42147. begin
  42148. pTDefRegMap(@Self)^.&set := $00000008;
  42149. end;
  42150. procedure TADC10_AD1CON3.clearADCS3; inline;
  42151. begin
  42152. pTDefRegMap(@Self)^.clr := $00000008;
  42153. end;
  42154. procedure TADC10_AD1CON3.setADCS3(thebits : TBits_1); inline;
  42155. begin
  42156. if thebits = 0 then
  42157. pTDefRegMap(@Self)^.clr := $00000008
  42158. else
  42159. pTDefRegMap(@Self)^.&set := $00000008;
  42160. end;
  42161. function TADC10_AD1CON3.getADCS3 : TBits_1; inline;
  42162. begin
  42163. getADCS3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  42164. end;
  42165. procedure TADC10_AD1CON3.setADCS4; inline;
  42166. begin
  42167. pTDefRegMap(@Self)^.&set := $00000010;
  42168. end;
  42169. procedure TADC10_AD1CON3.clearADCS4; inline;
  42170. begin
  42171. pTDefRegMap(@Self)^.clr := $00000010;
  42172. end;
  42173. procedure TADC10_AD1CON3.setADCS4(thebits : TBits_1); inline;
  42174. begin
  42175. if thebits = 0 then
  42176. pTDefRegMap(@Self)^.clr := $00000010
  42177. else
  42178. pTDefRegMap(@Self)^.&set := $00000010;
  42179. end;
  42180. function TADC10_AD1CON3.getADCS4 : TBits_1; inline;
  42181. begin
  42182. getADCS4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  42183. end;
  42184. procedure TADC10_AD1CON3.setADCS5; inline;
  42185. begin
  42186. pTDefRegMap(@Self)^.&set := $00000020;
  42187. end;
  42188. procedure TADC10_AD1CON3.clearADCS5; inline;
  42189. begin
  42190. pTDefRegMap(@Self)^.clr := $00000020;
  42191. end;
  42192. procedure TADC10_AD1CON3.setADCS5(thebits : TBits_1); inline;
  42193. begin
  42194. if thebits = 0 then
  42195. pTDefRegMap(@Self)^.clr := $00000020
  42196. else
  42197. pTDefRegMap(@Self)^.&set := $00000020;
  42198. end;
  42199. function TADC10_AD1CON3.getADCS5 : TBits_1; inline;
  42200. begin
  42201. getADCS5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  42202. end;
  42203. procedure TADC10_AD1CON3.setADCS6; inline;
  42204. begin
  42205. pTDefRegMap(@Self)^.&set := $00000040;
  42206. end;
  42207. procedure TADC10_AD1CON3.clearADCS6; inline;
  42208. begin
  42209. pTDefRegMap(@Self)^.clr := $00000040;
  42210. end;
  42211. procedure TADC10_AD1CON3.setADCS6(thebits : TBits_1); inline;
  42212. begin
  42213. if thebits = 0 then
  42214. pTDefRegMap(@Self)^.clr := $00000040
  42215. else
  42216. pTDefRegMap(@Self)^.&set := $00000040;
  42217. end;
  42218. function TADC10_AD1CON3.getADCS6 : TBits_1; inline;
  42219. begin
  42220. getADCS6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  42221. end;
  42222. procedure TADC10_AD1CON3.setADCS7; inline;
  42223. begin
  42224. pTDefRegMap(@Self)^.&set := $00000080;
  42225. end;
  42226. procedure TADC10_AD1CON3.clearADCS7; inline;
  42227. begin
  42228. pTDefRegMap(@Self)^.clr := $00000080;
  42229. end;
  42230. procedure TADC10_AD1CON3.setADCS7(thebits : TBits_1); inline;
  42231. begin
  42232. if thebits = 0 then
  42233. pTDefRegMap(@Self)^.clr := $00000080
  42234. else
  42235. pTDefRegMap(@Self)^.&set := $00000080;
  42236. end;
  42237. function TADC10_AD1CON3.getADCS7 : TBits_1; inline;
  42238. begin
  42239. getADCS7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  42240. end;
  42241. procedure TADC10_AD1CON3.setSAMC0; inline;
  42242. begin
  42243. pTDefRegMap(@Self)^.&set := $00000100;
  42244. end;
  42245. procedure TADC10_AD1CON3.clearSAMC0; inline;
  42246. begin
  42247. pTDefRegMap(@Self)^.clr := $00000100;
  42248. end;
  42249. procedure TADC10_AD1CON3.setSAMC0(thebits : TBits_1); inline;
  42250. begin
  42251. if thebits = 0 then
  42252. pTDefRegMap(@Self)^.clr := $00000100
  42253. else
  42254. pTDefRegMap(@Self)^.&set := $00000100;
  42255. end;
  42256. function TADC10_AD1CON3.getSAMC0 : TBits_1; inline;
  42257. begin
  42258. getSAMC0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  42259. end;
  42260. procedure TADC10_AD1CON3.setSAMC1; inline;
  42261. begin
  42262. pTDefRegMap(@Self)^.&set := $00000200;
  42263. end;
  42264. procedure TADC10_AD1CON3.clearSAMC1; inline;
  42265. begin
  42266. pTDefRegMap(@Self)^.clr := $00000200;
  42267. end;
  42268. procedure TADC10_AD1CON3.setSAMC1(thebits : TBits_1); inline;
  42269. begin
  42270. if thebits = 0 then
  42271. pTDefRegMap(@Self)^.clr := $00000200
  42272. else
  42273. pTDefRegMap(@Self)^.&set := $00000200;
  42274. end;
  42275. function TADC10_AD1CON3.getSAMC1 : TBits_1; inline;
  42276. begin
  42277. getSAMC1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  42278. end;
  42279. procedure TADC10_AD1CON3.setSAMC2; inline;
  42280. begin
  42281. pTDefRegMap(@Self)^.&set := $00000400;
  42282. end;
  42283. procedure TADC10_AD1CON3.clearSAMC2; inline;
  42284. begin
  42285. pTDefRegMap(@Self)^.clr := $00000400;
  42286. end;
  42287. procedure TADC10_AD1CON3.setSAMC2(thebits : TBits_1); inline;
  42288. begin
  42289. if thebits = 0 then
  42290. pTDefRegMap(@Self)^.clr := $00000400
  42291. else
  42292. pTDefRegMap(@Self)^.&set := $00000400;
  42293. end;
  42294. function TADC10_AD1CON3.getSAMC2 : TBits_1; inline;
  42295. begin
  42296. getSAMC2 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  42297. end;
  42298. procedure TADC10_AD1CON3.setSAMC3; inline;
  42299. begin
  42300. pTDefRegMap(@Self)^.&set := $00000800;
  42301. end;
  42302. procedure TADC10_AD1CON3.clearSAMC3; inline;
  42303. begin
  42304. pTDefRegMap(@Self)^.clr := $00000800;
  42305. end;
  42306. procedure TADC10_AD1CON3.setSAMC3(thebits : TBits_1); inline;
  42307. begin
  42308. if thebits = 0 then
  42309. pTDefRegMap(@Self)^.clr := $00000800
  42310. else
  42311. pTDefRegMap(@Self)^.&set := $00000800;
  42312. end;
  42313. function TADC10_AD1CON3.getSAMC3 : TBits_1; inline;
  42314. begin
  42315. getSAMC3 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  42316. end;
  42317. procedure TADC10_AD1CON3.setSAMC4; inline;
  42318. begin
  42319. pTDefRegMap(@Self)^.&set := $00001000;
  42320. end;
  42321. procedure TADC10_AD1CON3.clearSAMC4; inline;
  42322. begin
  42323. pTDefRegMap(@Self)^.clr := $00001000;
  42324. end;
  42325. procedure TADC10_AD1CON3.setSAMC4(thebits : TBits_1); inline;
  42326. begin
  42327. if thebits = 0 then
  42328. pTDefRegMap(@Self)^.clr := $00001000
  42329. else
  42330. pTDefRegMap(@Self)^.&set := $00001000;
  42331. end;
  42332. function TADC10_AD1CON3.getSAMC4 : TBits_1; inline;
  42333. begin
  42334. getSAMC4 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  42335. end;
  42336. procedure TADC10_AD1CON3.setw(thebits : TBits_32); inline;
  42337. begin
  42338. pTDefRegMap(@Self)^.val := thebits;
  42339. end;
  42340. function TADC10_AD1CON3.getw : TBits_32; inline;
  42341. begin
  42342. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  42343. end;
  42344. procedure TADC10_AD1CHS.setCH0SA(thebits : TBits_4); inline;
  42345. begin
  42346. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF0FFFF or ( thebits shl 16 );
  42347. end;
  42348. function TADC10_AD1CHS.getCH0SA : TBits_4; inline;
  42349. begin
  42350. getCH0SA := (pTDefRegMap(@Self)^.val and $000F0000) shr 16;
  42351. end;
  42352. procedure TADC10_AD1CHS.setCH0NA; inline;
  42353. begin
  42354. pTDefRegMap(@Self)^.&set := $00800000;
  42355. end;
  42356. procedure TADC10_AD1CHS.clearCH0NA; inline;
  42357. begin
  42358. pTDefRegMap(@Self)^.clr := $00800000;
  42359. end;
  42360. procedure TADC10_AD1CHS.setCH0NA(thebits : TBits_1); inline;
  42361. begin
  42362. if thebits = 0 then
  42363. pTDefRegMap(@Self)^.clr := $00800000
  42364. else
  42365. pTDefRegMap(@Self)^.&set := $00800000;
  42366. end;
  42367. function TADC10_AD1CHS.getCH0NA : TBits_1; inline;
  42368. begin
  42369. getCH0NA := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  42370. end;
  42371. procedure TADC10_AD1CHS.setCH0SB(thebits : TBits_4); inline;
  42372. begin
  42373. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F0FFFFFF or ( thebits shl 24 );
  42374. end;
  42375. function TADC10_AD1CHS.getCH0SB : TBits_4; inline;
  42376. begin
  42377. getCH0SB := (pTDefRegMap(@Self)^.val and $0F000000) shr 24;
  42378. end;
  42379. procedure TADC10_AD1CHS.setCH0NB; inline;
  42380. begin
  42381. pTDefRegMap(@Self)^.&set := $80000000;
  42382. end;
  42383. procedure TADC10_AD1CHS.clearCH0NB; inline;
  42384. begin
  42385. pTDefRegMap(@Self)^.clr := $80000000;
  42386. end;
  42387. procedure TADC10_AD1CHS.setCH0NB(thebits : TBits_1); inline;
  42388. begin
  42389. if thebits = 0 then
  42390. pTDefRegMap(@Self)^.clr := $80000000
  42391. else
  42392. pTDefRegMap(@Self)^.&set := $80000000;
  42393. end;
  42394. function TADC10_AD1CHS.getCH0NB : TBits_1; inline;
  42395. begin
  42396. getCH0NB := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  42397. end;
  42398. procedure TADC10_AD1CHS.setCH0SA0; inline;
  42399. begin
  42400. pTDefRegMap(@Self)^.&set := $00010000;
  42401. end;
  42402. procedure TADC10_AD1CHS.clearCH0SA0; inline;
  42403. begin
  42404. pTDefRegMap(@Self)^.clr := $00010000;
  42405. end;
  42406. procedure TADC10_AD1CHS.setCH0SA0(thebits : TBits_1); inline;
  42407. begin
  42408. if thebits = 0 then
  42409. pTDefRegMap(@Self)^.clr := $00010000
  42410. else
  42411. pTDefRegMap(@Self)^.&set := $00010000;
  42412. end;
  42413. function TADC10_AD1CHS.getCH0SA0 : TBits_1; inline;
  42414. begin
  42415. getCH0SA0 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  42416. end;
  42417. procedure TADC10_AD1CHS.setCH0SA1; inline;
  42418. begin
  42419. pTDefRegMap(@Self)^.&set := $00020000;
  42420. end;
  42421. procedure TADC10_AD1CHS.clearCH0SA1; inline;
  42422. begin
  42423. pTDefRegMap(@Self)^.clr := $00020000;
  42424. end;
  42425. procedure TADC10_AD1CHS.setCH0SA1(thebits : TBits_1); inline;
  42426. begin
  42427. if thebits = 0 then
  42428. pTDefRegMap(@Self)^.clr := $00020000
  42429. else
  42430. pTDefRegMap(@Self)^.&set := $00020000;
  42431. end;
  42432. function TADC10_AD1CHS.getCH0SA1 : TBits_1; inline;
  42433. begin
  42434. getCH0SA1 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  42435. end;
  42436. procedure TADC10_AD1CHS.setCH0SA2; inline;
  42437. begin
  42438. pTDefRegMap(@Self)^.&set := $00040000;
  42439. end;
  42440. procedure TADC10_AD1CHS.clearCH0SA2; inline;
  42441. begin
  42442. pTDefRegMap(@Self)^.clr := $00040000;
  42443. end;
  42444. procedure TADC10_AD1CHS.setCH0SA2(thebits : TBits_1); inline;
  42445. begin
  42446. if thebits = 0 then
  42447. pTDefRegMap(@Self)^.clr := $00040000
  42448. else
  42449. pTDefRegMap(@Self)^.&set := $00040000;
  42450. end;
  42451. function TADC10_AD1CHS.getCH0SA2 : TBits_1; inline;
  42452. begin
  42453. getCH0SA2 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  42454. end;
  42455. procedure TADC10_AD1CHS.setCH0SA3; inline;
  42456. begin
  42457. pTDefRegMap(@Self)^.&set := $00080000;
  42458. end;
  42459. procedure TADC10_AD1CHS.clearCH0SA3; inline;
  42460. begin
  42461. pTDefRegMap(@Self)^.clr := $00080000;
  42462. end;
  42463. procedure TADC10_AD1CHS.setCH0SA3(thebits : TBits_1); inline;
  42464. begin
  42465. if thebits = 0 then
  42466. pTDefRegMap(@Self)^.clr := $00080000
  42467. else
  42468. pTDefRegMap(@Self)^.&set := $00080000;
  42469. end;
  42470. function TADC10_AD1CHS.getCH0SA3 : TBits_1; inline;
  42471. begin
  42472. getCH0SA3 := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  42473. end;
  42474. procedure TADC10_AD1CHS.setCH0SB0; inline;
  42475. begin
  42476. pTDefRegMap(@Self)^.&set := $01000000;
  42477. end;
  42478. procedure TADC10_AD1CHS.clearCH0SB0; inline;
  42479. begin
  42480. pTDefRegMap(@Self)^.clr := $01000000;
  42481. end;
  42482. procedure TADC10_AD1CHS.setCH0SB0(thebits : TBits_1); inline;
  42483. begin
  42484. if thebits = 0 then
  42485. pTDefRegMap(@Self)^.clr := $01000000
  42486. else
  42487. pTDefRegMap(@Self)^.&set := $01000000;
  42488. end;
  42489. function TADC10_AD1CHS.getCH0SB0 : TBits_1; inline;
  42490. begin
  42491. getCH0SB0 := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  42492. end;
  42493. procedure TADC10_AD1CHS.setCH0SB1; inline;
  42494. begin
  42495. pTDefRegMap(@Self)^.&set := $02000000;
  42496. end;
  42497. procedure TADC10_AD1CHS.clearCH0SB1; inline;
  42498. begin
  42499. pTDefRegMap(@Self)^.clr := $02000000;
  42500. end;
  42501. procedure TADC10_AD1CHS.setCH0SB1(thebits : TBits_1); inline;
  42502. begin
  42503. if thebits = 0 then
  42504. pTDefRegMap(@Self)^.clr := $02000000
  42505. else
  42506. pTDefRegMap(@Self)^.&set := $02000000;
  42507. end;
  42508. function TADC10_AD1CHS.getCH0SB1 : TBits_1; inline;
  42509. begin
  42510. getCH0SB1 := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  42511. end;
  42512. procedure TADC10_AD1CHS.setCH0SB2; inline;
  42513. begin
  42514. pTDefRegMap(@Self)^.&set := $04000000;
  42515. end;
  42516. procedure TADC10_AD1CHS.clearCH0SB2; inline;
  42517. begin
  42518. pTDefRegMap(@Self)^.clr := $04000000;
  42519. end;
  42520. procedure TADC10_AD1CHS.setCH0SB2(thebits : TBits_1); inline;
  42521. begin
  42522. if thebits = 0 then
  42523. pTDefRegMap(@Self)^.clr := $04000000
  42524. else
  42525. pTDefRegMap(@Self)^.&set := $04000000;
  42526. end;
  42527. function TADC10_AD1CHS.getCH0SB2 : TBits_1; inline;
  42528. begin
  42529. getCH0SB2 := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  42530. end;
  42531. procedure TADC10_AD1CHS.setCH0SB3; inline;
  42532. begin
  42533. pTDefRegMap(@Self)^.&set := $08000000;
  42534. end;
  42535. procedure TADC10_AD1CHS.clearCH0SB3; inline;
  42536. begin
  42537. pTDefRegMap(@Self)^.clr := $08000000;
  42538. end;
  42539. procedure TADC10_AD1CHS.setCH0SB3(thebits : TBits_1); inline;
  42540. begin
  42541. if thebits = 0 then
  42542. pTDefRegMap(@Self)^.clr := $08000000
  42543. else
  42544. pTDefRegMap(@Self)^.&set := $08000000;
  42545. end;
  42546. function TADC10_AD1CHS.getCH0SB3 : TBits_1; inline;
  42547. begin
  42548. getCH0SB3 := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  42549. end;
  42550. procedure TADC10_AD1CHS.setw(thebits : TBits_32); inline;
  42551. begin
  42552. pTDefRegMap(@Self)^.val := thebits;
  42553. end;
  42554. function TADC10_AD1CHS.getw : TBits_32; inline;
  42555. begin
  42556. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  42557. end;
  42558. procedure TADC10_AD1CSSL.setCSSL(thebits : TBits_16); inline;
  42559. begin
  42560. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  42561. end;
  42562. function TADC10_AD1CSSL.getCSSL : TBits_16; inline;
  42563. begin
  42564. getCSSL := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  42565. end;
  42566. procedure TADC10_AD1CSSL.setCSSL0; inline;
  42567. begin
  42568. pTDefRegMap(@Self)^.&set := $00000001;
  42569. end;
  42570. procedure TADC10_AD1CSSL.clearCSSL0; inline;
  42571. begin
  42572. pTDefRegMap(@Self)^.clr := $00000001;
  42573. end;
  42574. procedure TADC10_AD1CSSL.setCSSL0(thebits : TBits_1); inline;
  42575. begin
  42576. if thebits = 0 then
  42577. pTDefRegMap(@Self)^.clr := $00000001
  42578. else
  42579. pTDefRegMap(@Self)^.&set := $00000001;
  42580. end;
  42581. function TADC10_AD1CSSL.getCSSL0 : TBits_1; inline;
  42582. begin
  42583. getCSSL0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  42584. end;
  42585. procedure TADC10_AD1CSSL.setCSSL1; inline;
  42586. begin
  42587. pTDefRegMap(@Self)^.&set := $00000002;
  42588. end;
  42589. procedure TADC10_AD1CSSL.clearCSSL1; inline;
  42590. begin
  42591. pTDefRegMap(@Self)^.clr := $00000002;
  42592. end;
  42593. procedure TADC10_AD1CSSL.setCSSL1(thebits : TBits_1); inline;
  42594. begin
  42595. if thebits = 0 then
  42596. pTDefRegMap(@Self)^.clr := $00000002
  42597. else
  42598. pTDefRegMap(@Self)^.&set := $00000002;
  42599. end;
  42600. function TADC10_AD1CSSL.getCSSL1 : TBits_1; inline;
  42601. begin
  42602. getCSSL1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  42603. end;
  42604. procedure TADC10_AD1CSSL.setCSSL2; inline;
  42605. begin
  42606. pTDefRegMap(@Self)^.&set := $00000004;
  42607. end;
  42608. procedure TADC10_AD1CSSL.clearCSSL2; inline;
  42609. begin
  42610. pTDefRegMap(@Self)^.clr := $00000004;
  42611. end;
  42612. procedure TADC10_AD1CSSL.setCSSL2(thebits : TBits_1); inline;
  42613. begin
  42614. if thebits = 0 then
  42615. pTDefRegMap(@Self)^.clr := $00000004
  42616. else
  42617. pTDefRegMap(@Self)^.&set := $00000004;
  42618. end;
  42619. function TADC10_AD1CSSL.getCSSL2 : TBits_1; inline;
  42620. begin
  42621. getCSSL2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  42622. end;
  42623. procedure TADC10_AD1CSSL.setCSSL3; inline;
  42624. begin
  42625. pTDefRegMap(@Self)^.&set := $00000008;
  42626. end;
  42627. procedure TADC10_AD1CSSL.clearCSSL3; inline;
  42628. begin
  42629. pTDefRegMap(@Self)^.clr := $00000008;
  42630. end;
  42631. procedure TADC10_AD1CSSL.setCSSL3(thebits : TBits_1); inline;
  42632. begin
  42633. if thebits = 0 then
  42634. pTDefRegMap(@Self)^.clr := $00000008
  42635. else
  42636. pTDefRegMap(@Self)^.&set := $00000008;
  42637. end;
  42638. function TADC10_AD1CSSL.getCSSL3 : TBits_1; inline;
  42639. begin
  42640. getCSSL3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  42641. end;
  42642. procedure TADC10_AD1CSSL.setCSSL4; inline;
  42643. begin
  42644. pTDefRegMap(@Self)^.&set := $00000010;
  42645. end;
  42646. procedure TADC10_AD1CSSL.clearCSSL4; inline;
  42647. begin
  42648. pTDefRegMap(@Self)^.clr := $00000010;
  42649. end;
  42650. procedure TADC10_AD1CSSL.setCSSL4(thebits : TBits_1); inline;
  42651. begin
  42652. if thebits = 0 then
  42653. pTDefRegMap(@Self)^.clr := $00000010
  42654. else
  42655. pTDefRegMap(@Self)^.&set := $00000010;
  42656. end;
  42657. function TADC10_AD1CSSL.getCSSL4 : TBits_1; inline;
  42658. begin
  42659. getCSSL4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  42660. end;
  42661. procedure TADC10_AD1CSSL.setCSSL5; inline;
  42662. begin
  42663. pTDefRegMap(@Self)^.&set := $00000020;
  42664. end;
  42665. procedure TADC10_AD1CSSL.clearCSSL5; inline;
  42666. begin
  42667. pTDefRegMap(@Self)^.clr := $00000020;
  42668. end;
  42669. procedure TADC10_AD1CSSL.setCSSL5(thebits : TBits_1); inline;
  42670. begin
  42671. if thebits = 0 then
  42672. pTDefRegMap(@Self)^.clr := $00000020
  42673. else
  42674. pTDefRegMap(@Self)^.&set := $00000020;
  42675. end;
  42676. function TADC10_AD1CSSL.getCSSL5 : TBits_1; inline;
  42677. begin
  42678. getCSSL5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  42679. end;
  42680. procedure TADC10_AD1CSSL.setCSSL6; inline;
  42681. begin
  42682. pTDefRegMap(@Self)^.&set := $00000040;
  42683. end;
  42684. procedure TADC10_AD1CSSL.clearCSSL6; inline;
  42685. begin
  42686. pTDefRegMap(@Self)^.clr := $00000040;
  42687. end;
  42688. procedure TADC10_AD1CSSL.setCSSL6(thebits : TBits_1); inline;
  42689. begin
  42690. if thebits = 0 then
  42691. pTDefRegMap(@Self)^.clr := $00000040
  42692. else
  42693. pTDefRegMap(@Self)^.&set := $00000040;
  42694. end;
  42695. function TADC10_AD1CSSL.getCSSL6 : TBits_1; inline;
  42696. begin
  42697. getCSSL6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  42698. end;
  42699. procedure TADC10_AD1CSSL.setCSSL7; inline;
  42700. begin
  42701. pTDefRegMap(@Self)^.&set := $00000080;
  42702. end;
  42703. procedure TADC10_AD1CSSL.clearCSSL7; inline;
  42704. begin
  42705. pTDefRegMap(@Self)^.clr := $00000080;
  42706. end;
  42707. procedure TADC10_AD1CSSL.setCSSL7(thebits : TBits_1); inline;
  42708. begin
  42709. if thebits = 0 then
  42710. pTDefRegMap(@Self)^.clr := $00000080
  42711. else
  42712. pTDefRegMap(@Self)^.&set := $00000080;
  42713. end;
  42714. function TADC10_AD1CSSL.getCSSL7 : TBits_1; inline;
  42715. begin
  42716. getCSSL7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  42717. end;
  42718. procedure TADC10_AD1CSSL.setCSSL8; inline;
  42719. begin
  42720. pTDefRegMap(@Self)^.&set := $00000100;
  42721. end;
  42722. procedure TADC10_AD1CSSL.clearCSSL8; inline;
  42723. begin
  42724. pTDefRegMap(@Self)^.clr := $00000100;
  42725. end;
  42726. procedure TADC10_AD1CSSL.setCSSL8(thebits : TBits_1); inline;
  42727. begin
  42728. if thebits = 0 then
  42729. pTDefRegMap(@Self)^.clr := $00000100
  42730. else
  42731. pTDefRegMap(@Self)^.&set := $00000100;
  42732. end;
  42733. function TADC10_AD1CSSL.getCSSL8 : TBits_1; inline;
  42734. begin
  42735. getCSSL8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  42736. end;
  42737. procedure TADC10_AD1CSSL.setCSSL9; inline;
  42738. begin
  42739. pTDefRegMap(@Self)^.&set := $00000200;
  42740. end;
  42741. procedure TADC10_AD1CSSL.clearCSSL9; inline;
  42742. begin
  42743. pTDefRegMap(@Self)^.clr := $00000200;
  42744. end;
  42745. procedure TADC10_AD1CSSL.setCSSL9(thebits : TBits_1); inline;
  42746. begin
  42747. if thebits = 0 then
  42748. pTDefRegMap(@Self)^.clr := $00000200
  42749. else
  42750. pTDefRegMap(@Self)^.&set := $00000200;
  42751. end;
  42752. function TADC10_AD1CSSL.getCSSL9 : TBits_1; inline;
  42753. begin
  42754. getCSSL9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  42755. end;
  42756. procedure TADC10_AD1CSSL.setCSSL10; inline;
  42757. begin
  42758. pTDefRegMap(@Self)^.&set := $00000400;
  42759. end;
  42760. procedure TADC10_AD1CSSL.clearCSSL10; inline;
  42761. begin
  42762. pTDefRegMap(@Self)^.clr := $00000400;
  42763. end;
  42764. procedure TADC10_AD1CSSL.setCSSL10(thebits : TBits_1); inline;
  42765. begin
  42766. if thebits = 0 then
  42767. pTDefRegMap(@Self)^.clr := $00000400
  42768. else
  42769. pTDefRegMap(@Self)^.&set := $00000400;
  42770. end;
  42771. function TADC10_AD1CSSL.getCSSL10 : TBits_1; inline;
  42772. begin
  42773. getCSSL10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  42774. end;
  42775. procedure TADC10_AD1CSSL.setCSSL11; inline;
  42776. begin
  42777. pTDefRegMap(@Self)^.&set := $00000800;
  42778. end;
  42779. procedure TADC10_AD1CSSL.clearCSSL11; inline;
  42780. begin
  42781. pTDefRegMap(@Self)^.clr := $00000800;
  42782. end;
  42783. procedure TADC10_AD1CSSL.setCSSL11(thebits : TBits_1); inline;
  42784. begin
  42785. if thebits = 0 then
  42786. pTDefRegMap(@Self)^.clr := $00000800
  42787. else
  42788. pTDefRegMap(@Self)^.&set := $00000800;
  42789. end;
  42790. function TADC10_AD1CSSL.getCSSL11 : TBits_1; inline;
  42791. begin
  42792. getCSSL11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  42793. end;
  42794. procedure TADC10_AD1CSSL.setCSSL12; inline;
  42795. begin
  42796. pTDefRegMap(@Self)^.&set := $00001000;
  42797. end;
  42798. procedure TADC10_AD1CSSL.clearCSSL12; inline;
  42799. begin
  42800. pTDefRegMap(@Self)^.clr := $00001000;
  42801. end;
  42802. procedure TADC10_AD1CSSL.setCSSL12(thebits : TBits_1); inline;
  42803. begin
  42804. if thebits = 0 then
  42805. pTDefRegMap(@Self)^.clr := $00001000
  42806. else
  42807. pTDefRegMap(@Self)^.&set := $00001000;
  42808. end;
  42809. function TADC10_AD1CSSL.getCSSL12 : TBits_1; inline;
  42810. begin
  42811. getCSSL12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  42812. end;
  42813. procedure TADC10_AD1CSSL.setCSSL13; inline;
  42814. begin
  42815. pTDefRegMap(@Self)^.&set := $00002000;
  42816. end;
  42817. procedure TADC10_AD1CSSL.clearCSSL13; inline;
  42818. begin
  42819. pTDefRegMap(@Self)^.clr := $00002000;
  42820. end;
  42821. procedure TADC10_AD1CSSL.setCSSL13(thebits : TBits_1); inline;
  42822. begin
  42823. if thebits = 0 then
  42824. pTDefRegMap(@Self)^.clr := $00002000
  42825. else
  42826. pTDefRegMap(@Self)^.&set := $00002000;
  42827. end;
  42828. function TADC10_AD1CSSL.getCSSL13 : TBits_1; inline;
  42829. begin
  42830. getCSSL13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  42831. end;
  42832. procedure TADC10_AD1CSSL.setCSSL14; inline;
  42833. begin
  42834. pTDefRegMap(@Self)^.&set := $00004000;
  42835. end;
  42836. procedure TADC10_AD1CSSL.clearCSSL14; inline;
  42837. begin
  42838. pTDefRegMap(@Self)^.clr := $00004000;
  42839. end;
  42840. procedure TADC10_AD1CSSL.setCSSL14(thebits : TBits_1); inline;
  42841. begin
  42842. if thebits = 0 then
  42843. pTDefRegMap(@Self)^.clr := $00004000
  42844. else
  42845. pTDefRegMap(@Self)^.&set := $00004000;
  42846. end;
  42847. function TADC10_AD1CSSL.getCSSL14 : TBits_1; inline;
  42848. begin
  42849. getCSSL14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  42850. end;
  42851. procedure TADC10_AD1CSSL.setCSSL15; inline;
  42852. begin
  42853. pTDefRegMap(@Self)^.&set := $00008000;
  42854. end;
  42855. procedure TADC10_AD1CSSL.clearCSSL15; inline;
  42856. begin
  42857. pTDefRegMap(@Self)^.clr := $00008000;
  42858. end;
  42859. procedure TADC10_AD1CSSL.setCSSL15(thebits : TBits_1); inline;
  42860. begin
  42861. if thebits = 0 then
  42862. pTDefRegMap(@Self)^.clr := $00008000
  42863. else
  42864. pTDefRegMap(@Self)^.&set := $00008000;
  42865. end;
  42866. function TADC10_AD1CSSL.getCSSL15 : TBits_1; inline;
  42867. begin
  42868. getCSSL15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  42869. end;
  42870. procedure TADC10_AD1CSSL.setw(thebits : TBits_32); inline;
  42871. begin
  42872. pTDefRegMap(@Self)^.val := thebits;
  42873. end;
  42874. function TADC10_AD1CSSL.getw : TBits_32; inline;
  42875. begin
  42876. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  42877. end;
  42878. procedure TADC10_AD1PCFG.setPCFG(thebits : TBits_16); inline;
  42879. begin
  42880. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  42881. end;
  42882. function TADC10_AD1PCFG.getPCFG : TBits_16; inline;
  42883. begin
  42884. getPCFG := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  42885. end;
  42886. procedure TADC10_AD1PCFG.setPCFG0; inline;
  42887. begin
  42888. pTDefRegMap(@Self)^.&set := $00000001;
  42889. end;
  42890. procedure TADC10_AD1PCFG.clearPCFG0; inline;
  42891. begin
  42892. pTDefRegMap(@Self)^.clr := $00000001;
  42893. end;
  42894. procedure TADC10_AD1PCFG.setPCFG0(thebits : TBits_1); inline;
  42895. begin
  42896. if thebits = 0 then
  42897. pTDefRegMap(@Self)^.clr := $00000001
  42898. else
  42899. pTDefRegMap(@Self)^.&set := $00000001;
  42900. end;
  42901. function TADC10_AD1PCFG.getPCFG0 : TBits_1; inline;
  42902. begin
  42903. getPCFG0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  42904. end;
  42905. procedure TADC10_AD1PCFG.setPCFG1; inline;
  42906. begin
  42907. pTDefRegMap(@Self)^.&set := $00000002;
  42908. end;
  42909. procedure TADC10_AD1PCFG.clearPCFG1; inline;
  42910. begin
  42911. pTDefRegMap(@Self)^.clr := $00000002;
  42912. end;
  42913. procedure TADC10_AD1PCFG.setPCFG1(thebits : TBits_1); inline;
  42914. begin
  42915. if thebits = 0 then
  42916. pTDefRegMap(@Self)^.clr := $00000002
  42917. else
  42918. pTDefRegMap(@Self)^.&set := $00000002;
  42919. end;
  42920. function TADC10_AD1PCFG.getPCFG1 : TBits_1; inline;
  42921. begin
  42922. getPCFG1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  42923. end;
  42924. procedure TADC10_AD1PCFG.setPCFG2; inline;
  42925. begin
  42926. pTDefRegMap(@Self)^.&set := $00000004;
  42927. end;
  42928. procedure TADC10_AD1PCFG.clearPCFG2; inline;
  42929. begin
  42930. pTDefRegMap(@Self)^.clr := $00000004;
  42931. end;
  42932. procedure TADC10_AD1PCFG.setPCFG2(thebits : TBits_1); inline;
  42933. begin
  42934. if thebits = 0 then
  42935. pTDefRegMap(@Self)^.clr := $00000004
  42936. else
  42937. pTDefRegMap(@Self)^.&set := $00000004;
  42938. end;
  42939. function TADC10_AD1PCFG.getPCFG2 : TBits_1; inline;
  42940. begin
  42941. getPCFG2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  42942. end;
  42943. procedure TADC10_AD1PCFG.setPCFG3; inline;
  42944. begin
  42945. pTDefRegMap(@Self)^.&set := $00000008;
  42946. end;
  42947. procedure TADC10_AD1PCFG.clearPCFG3; inline;
  42948. begin
  42949. pTDefRegMap(@Self)^.clr := $00000008;
  42950. end;
  42951. procedure TADC10_AD1PCFG.setPCFG3(thebits : TBits_1); inline;
  42952. begin
  42953. if thebits = 0 then
  42954. pTDefRegMap(@Self)^.clr := $00000008
  42955. else
  42956. pTDefRegMap(@Self)^.&set := $00000008;
  42957. end;
  42958. function TADC10_AD1PCFG.getPCFG3 : TBits_1; inline;
  42959. begin
  42960. getPCFG3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  42961. end;
  42962. procedure TADC10_AD1PCFG.setPCFG4; inline;
  42963. begin
  42964. pTDefRegMap(@Self)^.&set := $00000010;
  42965. end;
  42966. procedure TADC10_AD1PCFG.clearPCFG4; inline;
  42967. begin
  42968. pTDefRegMap(@Self)^.clr := $00000010;
  42969. end;
  42970. procedure TADC10_AD1PCFG.setPCFG4(thebits : TBits_1); inline;
  42971. begin
  42972. if thebits = 0 then
  42973. pTDefRegMap(@Self)^.clr := $00000010
  42974. else
  42975. pTDefRegMap(@Self)^.&set := $00000010;
  42976. end;
  42977. function TADC10_AD1PCFG.getPCFG4 : TBits_1; inline;
  42978. begin
  42979. getPCFG4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  42980. end;
  42981. procedure TADC10_AD1PCFG.setPCFG5; inline;
  42982. begin
  42983. pTDefRegMap(@Self)^.&set := $00000020;
  42984. end;
  42985. procedure TADC10_AD1PCFG.clearPCFG5; inline;
  42986. begin
  42987. pTDefRegMap(@Self)^.clr := $00000020;
  42988. end;
  42989. procedure TADC10_AD1PCFG.setPCFG5(thebits : TBits_1); inline;
  42990. begin
  42991. if thebits = 0 then
  42992. pTDefRegMap(@Self)^.clr := $00000020
  42993. else
  42994. pTDefRegMap(@Self)^.&set := $00000020;
  42995. end;
  42996. function TADC10_AD1PCFG.getPCFG5 : TBits_1; inline;
  42997. begin
  42998. getPCFG5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  42999. end;
  43000. procedure TADC10_AD1PCFG.setPCFG6; inline;
  43001. begin
  43002. pTDefRegMap(@Self)^.&set := $00000040;
  43003. end;
  43004. procedure TADC10_AD1PCFG.clearPCFG6; inline;
  43005. begin
  43006. pTDefRegMap(@Self)^.clr := $00000040;
  43007. end;
  43008. procedure TADC10_AD1PCFG.setPCFG6(thebits : TBits_1); inline;
  43009. begin
  43010. if thebits = 0 then
  43011. pTDefRegMap(@Self)^.clr := $00000040
  43012. else
  43013. pTDefRegMap(@Self)^.&set := $00000040;
  43014. end;
  43015. function TADC10_AD1PCFG.getPCFG6 : TBits_1; inline;
  43016. begin
  43017. getPCFG6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  43018. end;
  43019. procedure TADC10_AD1PCFG.setPCFG7; inline;
  43020. begin
  43021. pTDefRegMap(@Self)^.&set := $00000080;
  43022. end;
  43023. procedure TADC10_AD1PCFG.clearPCFG7; inline;
  43024. begin
  43025. pTDefRegMap(@Self)^.clr := $00000080;
  43026. end;
  43027. procedure TADC10_AD1PCFG.setPCFG7(thebits : TBits_1); inline;
  43028. begin
  43029. if thebits = 0 then
  43030. pTDefRegMap(@Self)^.clr := $00000080
  43031. else
  43032. pTDefRegMap(@Self)^.&set := $00000080;
  43033. end;
  43034. function TADC10_AD1PCFG.getPCFG7 : TBits_1; inline;
  43035. begin
  43036. getPCFG7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  43037. end;
  43038. procedure TADC10_AD1PCFG.setPCFG8; inline;
  43039. begin
  43040. pTDefRegMap(@Self)^.&set := $00000100;
  43041. end;
  43042. procedure TADC10_AD1PCFG.clearPCFG8; inline;
  43043. begin
  43044. pTDefRegMap(@Self)^.clr := $00000100;
  43045. end;
  43046. procedure TADC10_AD1PCFG.setPCFG8(thebits : TBits_1); inline;
  43047. begin
  43048. if thebits = 0 then
  43049. pTDefRegMap(@Self)^.clr := $00000100
  43050. else
  43051. pTDefRegMap(@Self)^.&set := $00000100;
  43052. end;
  43053. function TADC10_AD1PCFG.getPCFG8 : TBits_1; inline;
  43054. begin
  43055. getPCFG8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  43056. end;
  43057. procedure TADC10_AD1PCFG.setPCFG9; inline;
  43058. begin
  43059. pTDefRegMap(@Self)^.&set := $00000200;
  43060. end;
  43061. procedure TADC10_AD1PCFG.clearPCFG9; inline;
  43062. begin
  43063. pTDefRegMap(@Self)^.clr := $00000200;
  43064. end;
  43065. procedure TADC10_AD1PCFG.setPCFG9(thebits : TBits_1); inline;
  43066. begin
  43067. if thebits = 0 then
  43068. pTDefRegMap(@Self)^.clr := $00000200
  43069. else
  43070. pTDefRegMap(@Self)^.&set := $00000200;
  43071. end;
  43072. function TADC10_AD1PCFG.getPCFG9 : TBits_1; inline;
  43073. begin
  43074. getPCFG9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  43075. end;
  43076. procedure TADC10_AD1PCFG.setPCFG10; inline;
  43077. begin
  43078. pTDefRegMap(@Self)^.&set := $00000400;
  43079. end;
  43080. procedure TADC10_AD1PCFG.clearPCFG10; inline;
  43081. begin
  43082. pTDefRegMap(@Self)^.clr := $00000400;
  43083. end;
  43084. procedure TADC10_AD1PCFG.setPCFG10(thebits : TBits_1); inline;
  43085. begin
  43086. if thebits = 0 then
  43087. pTDefRegMap(@Self)^.clr := $00000400
  43088. else
  43089. pTDefRegMap(@Self)^.&set := $00000400;
  43090. end;
  43091. function TADC10_AD1PCFG.getPCFG10 : TBits_1; inline;
  43092. begin
  43093. getPCFG10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  43094. end;
  43095. procedure TADC10_AD1PCFG.setPCFG11; inline;
  43096. begin
  43097. pTDefRegMap(@Self)^.&set := $00000800;
  43098. end;
  43099. procedure TADC10_AD1PCFG.clearPCFG11; inline;
  43100. begin
  43101. pTDefRegMap(@Self)^.clr := $00000800;
  43102. end;
  43103. procedure TADC10_AD1PCFG.setPCFG11(thebits : TBits_1); inline;
  43104. begin
  43105. if thebits = 0 then
  43106. pTDefRegMap(@Self)^.clr := $00000800
  43107. else
  43108. pTDefRegMap(@Self)^.&set := $00000800;
  43109. end;
  43110. function TADC10_AD1PCFG.getPCFG11 : TBits_1; inline;
  43111. begin
  43112. getPCFG11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  43113. end;
  43114. procedure TADC10_AD1PCFG.setPCFG12; inline;
  43115. begin
  43116. pTDefRegMap(@Self)^.&set := $00001000;
  43117. end;
  43118. procedure TADC10_AD1PCFG.clearPCFG12; inline;
  43119. begin
  43120. pTDefRegMap(@Self)^.clr := $00001000;
  43121. end;
  43122. procedure TADC10_AD1PCFG.setPCFG12(thebits : TBits_1); inline;
  43123. begin
  43124. if thebits = 0 then
  43125. pTDefRegMap(@Self)^.clr := $00001000
  43126. else
  43127. pTDefRegMap(@Self)^.&set := $00001000;
  43128. end;
  43129. function TADC10_AD1PCFG.getPCFG12 : TBits_1; inline;
  43130. begin
  43131. getPCFG12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  43132. end;
  43133. procedure TADC10_AD1PCFG.setPCFG13; inline;
  43134. begin
  43135. pTDefRegMap(@Self)^.&set := $00002000;
  43136. end;
  43137. procedure TADC10_AD1PCFG.clearPCFG13; inline;
  43138. begin
  43139. pTDefRegMap(@Self)^.clr := $00002000;
  43140. end;
  43141. procedure TADC10_AD1PCFG.setPCFG13(thebits : TBits_1); inline;
  43142. begin
  43143. if thebits = 0 then
  43144. pTDefRegMap(@Self)^.clr := $00002000
  43145. else
  43146. pTDefRegMap(@Self)^.&set := $00002000;
  43147. end;
  43148. function TADC10_AD1PCFG.getPCFG13 : TBits_1; inline;
  43149. begin
  43150. getPCFG13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  43151. end;
  43152. procedure TADC10_AD1PCFG.setPCFG14; inline;
  43153. begin
  43154. pTDefRegMap(@Self)^.&set := $00004000;
  43155. end;
  43156. procedure TADC10_AD1PCFG.clearPCFG14; inline;
  43157. begin
  43158. pTDefRegMap(@Self)^.clr := $00004000;
  43159. end;
  43160. procedure TADC10_AD1PCFG.setPCFG14(thebits : TBits_1); inline;
  43161. begin
  43162. if thebits = 0 then
  43163. pTDefRegMap(@Self)^.clr := $00004000
  43164. else
  43165. pTDefRegMap(@Self)^.&set := $00004000;
  43166. end;
  43167. function TADC10_AD1PCFG.getPCFG14 : TBits_1; inline;
  43168. begin
  43169. getPCFG14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  43170. end;
  43171. procedure TADC10_AD1PCFG.setPCFG15; inline;
  43172. begin
  43173. pTDefRegMap(@Self)^.&set := $00008000;
  43174. end;
  43175. procedure TADC10_AD1PCFG.clearPCFG15; inline;
  43176. begin
  43177. pTDefRegMap(@Self)^.clr := $00008000;
  43178. end;
  43179. procedure TADC10_AD1PCFG.setPCFG15(thebits : TBits_1); inline;
  43180. begin
  43181. if thebits = 0 then
  43182. pTDefRegMap(@Self)^.clr := $00008000
  43183. else
  43184. pTDefRegMap(@Self)^.&set := $00008000;
  43185. end;
  43186. function TADC10_AD1PCFG.getPCFG15 : TBits_1; inline;
  43187. begin
  43188. getPCFG15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  43189. end;
  43190. procedure TADC10_AD1PCFG.setw(thebits : TBits_32); inline;
  43191. begin
  43192. pTDefRegMap(@Self)^.val := thebits;
  43193. end;
  43194. function TADC10_AD1PCFG.getw : TBits_32; inline;
  43195. begin
  43196. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  43197. end;
  43198. procedure TCVR_CVRCON.setCVR(thebits : TBits_4); inline;
  43199. begin
  43200. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  43201. end;
  43202. function TCVR_CVRCON.getCVR : TBits_4; inline;
  43203. begin
  43204. getCVR := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  43205. end;
  43206. procedure TCVR_CVRCON.setCVRSS; inline;
  43207. begin
  43208. pTDefRegMap(@Self)^.&set := $00000010;
  43209. end;
  43210. procedure TCVR_CVRCON.clearCVRSS; inline;
  43211. begin
  43212. pTDefRegMap(@Self)^.clr := $00000010;
  43213. end;
  43214. procedure TCVR_CVRCON.setCVRSS(thebits : TBits_1); inline;
  43215. begin
  43216. if thebits = 0 then
  43217. pTDefRegMap(@Self)^.clr := $00000010
  43218. else
  43219. pTDefRegMap(@Self)^.&set := $00000010;
  43220. end;
  43221. function TCVR_CVRCON.getCVRSS : TBits_1; inline;
  43222. begin
  43223. getCVRSS := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  43224. end;
  43225. procedure TCVR_CVRCON.setCVRR; inline;
  43226. begin
  43227. pTDefRegMap(@Self)^.&set := $00000020;
  43228. end;
  43229. procedure TCVR_CVRCON.clearCVRR; inline;
  43230. begin
  43231. pTDefRegMap(@Self)^.clr := $00000020;
  43232. end;
  43233. procedure TCVR_CVRCON.setCVRR(thebits : TBits_1); inline;
  43234. begin
  43235. if thebits = 0 then
  43236. pTDefRegMap(@Self)^.clr := $00000020
  43237. else
  43238. pTDefRegMap(@Self)^.&set := $00000020;
  43239. end;
  43240. function TCVR_CVRCON.getCVRR : TBits_1; inline;
  43241. begin
  43242. getCVRR := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  43243. end;
  43244. procedure TCVR_CVRCON.setCVROE; inline;
  43245. begin
  43246. pTDefRegMap(@Self)^.&set := $00000040;
  43247. end;
  43248. procedure TCVR_CVRCON.clearCVROE; inline;
  43249. begin
  43250. pTDefRegMap(@Self)^.clr := $00000040;
  43251. end;
  43252. procedure TCVR_CVRCON.setCVROE(thebits : TBits_1); inline;
  43253. begin
  43254. if thebits = 0 then
  43255. pTDefRegMap(@Self)^.clr := $00000040
  43256. else
  43257. pTDefRegMap(@Self)^.&set := $00000040;
  43258. end;
  43259. function TCVR_CVRCON.getCVROE : TBits_1; inline;
  43260. begin
  43261. getCVROE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  43262. end;
  43263. procedure TCVR_CVRCON.setBGSEL(thebits : TBits_2); inline;
  43264. begin
  43265. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  43266. end;
  43267. function TCVR_CVRCON.getBGSEL : TBits_2; inline;
  43268. begin
  43269. getBGSEL := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  43270. end;
  43271. procedure TCVR_CVRCON.setVREFSEL; inline;
  43272. begin
  43273. pTDefRegMap(@Self)^.&set := $00000400;
  43274. end;
  43275. procedure TCVR_CVRCON.clearVREFSEL; inline;
  43276. begin
  43277. pTDefRegMap(@Self)^.clr := $00000400;
  43278. end;
  43279. procedure TCVR_CVRCON.setVREFSEL(thebits : TBits_1); inline;
  43280. begin
  43281. if thebits = 0 then
  43282. pTDefRegMap(@Self)^.clr := $00000400
  43283. else
  43284. pTDefRegMap(@Self)^.&set := $00000400;
  43285. end;
  43286. function TCVR_CVRCON.getVREFSEL : TBits_1; inline;
  43287. begin
  43288. getVREFSEL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  43289. end;
  43290. procedure TCVR_CVRCON.setON; inline;
  43291. begin
  43292. pTDefRegMap(@Self)^.&set := $00008000;
  43293. end;
  43294. procedure TCVR_CVRCON.clearON; inline;
  43295. begin
  43296. pTDefRegMap(@Self)^.clr := $00008000;
  43297. end;
  43298. procedure TCVR_CVRCON.setON(thebits : TBits_1); inline;
  43299. begin
  43300. if thebits = 0 then
  43301. pTDefRegMap(@Self)^.clr := $00008000
  43302. else
  43303. pTDefRegMap(@Self)^.&set := $00008000;
  43304. end;
  43305. function TCVR_CVRCON.getON : TBits_1; inline;
  43306. begin
  43307. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  43308. end;
  43309. procedure TCVR_CVRCON.setCVR0; inline;
  43310. begin
  43311. pTDefRegMap(@Self)^.&set := $00000001;
  43312. end;
  43313. procedure TCVR_CVRCON.clearCVR0; inline;
  43314. begin
  43315. pTDefRegMap(@Self)^.clr := $00000001;
  43316. end;
  43317. procedure TCVR_CVRCON.setCVR0(thebits : TBits_1); inline;
  43318. begin
  43319. if thebits = 0 then
  43320. pTDefRegMap(@Self)^.clr := $00000001
  43321. else
  43322. pTDefRegMap(@Self)^.&set := $00000001;
  43323. end;
  43324. function TCVR_CVRCON.getCVR0 : TBits_1; inline;
  43325. begin
  43326. getCVR0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  43327. end;
  43328. procedure TCVR_CVRCON.setCVR1; inline;
  43329. begin
  43330. pTDefRegMap(@Self)^.&set := $00000002;
  43331. end;
  43332. procedure TCVR_CVRCON.clearCVR1; inline;
  43333. begin
  43334. pTDefRegMap(@Self)^.clr := $00000002;
  43335. end;
  43336. procedure TCVR_CVRCON.setCVR1(thebits : TBits_1); inline;
  43337. begin
  43338. if thebits = 0 then
  43339. pTDefRegMap(@Self)^.clr := $00000002
  43340. else
  43341. pTDefRegMap(@Self)^.&set := $00000002;
  43342. end;
  43343. function TCVR_CVRCON.getCVR1 : TBits_1; inline;
  43344. begin
  43345. getCVR1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  43346. end;
  43347. procedure TCVR_CVRCON.setCVR2; inline;
  43348. begin
  43349. pTDefRegMap(@Self)^.&set := $00000004;
  43350. end;
  43351. procedure TCVR_CVRCON.clearCVR2; inline;
  43352. begin
  43353. pTDefRegMap(@Self)^.clr := $00000004;
  43354. end;
  43355. procedure TCVR_CVRCON.setCVR2(thebits : TBits_1); inline;
  43356. begin
  43357. if thebits = 0 then
  43358. pTDefRegMap(@Self)^.clr := $00000004
  43359. else
  43360. pTDefRegMap(@Self)^.&set := $00000004;
  43361. end;
  43362. function TCVR_CVRCON.getCVR2 : TBits_1; inline;
  43363. begin
  43364. getCVR2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  43365. end;
  43366. procedure TCVR_CVRCON.setCVR3; inline;
  43367. begin
  43368. pTDefRegMap(@Self)^.&set := $00000008;
  43369. end;
  43370. procedure TCVR_CVRCON.clearCVR3; inline;
  43371. begin
  43372. pTDefRegMap(@Self)^.clr := $00000008;
  43373. end;
  43374. procedure TCVR_CVRCON.setCVR3(thebits : TBits_1); inline;
  43375. begin
  43376. if thebits = 0 then
  43377. pTDefRegMap(@Self)^.clr := $00000008
  43378. else
  43379. pTDefRegMap(@Self)^.&set := $00000008;
  43380. end;
  43381. function TCVR_CVRCON.getCVR3 : TBits_1; inline;
  43382. begin
  43383. getCVR3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  43384. end;
  43385. procedure TCVR_CVRCON.setBGSEL0; inline;
  43386. begin
  43387. pTDefRegMap(@Self)^.&set := $00000100;
  43388. end;
  43389. procedure TCVR_CVRCON.clearBGSEL0; inline;
  43390. begin
  43391. pTDefRegMap(@Self)^.clr := $00000100;
  43392. end;
  43393. procedure TCVR_CVRCON.setBGSEL0(thebits : TBits_1); inline;
  43394. begin
  43395. if thebits = 0 then
  43396. pTDefRegMap(@Self)^.clr := $00000100
  43397. else
  43398. pTDefRegMap(@Self)^.&set := $00000100;
  43399. end;
  43400. function TCVR_CVRCON.getBGSEL0 : TBits_1; inline;
  43401. begin
  43402. getBGSEL0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  43403. end;
  43404. procedure TCVR_CVRCON.setBGSEL1; inline;
  43405. begin
  43406. pTDefRegMap(@Self)^.&set := $00000200;
  43407. end;
  43408. procedure TCVR_CVRCON.clearBGSEL1; inline;
  43409. begin
  43410. pTDefRegMap(@Self)^.clr := $00000200;
  43411. end;
  43412. procedure TCVR_CVRCON.setBGSEL1(thebits : TBits_1); inline;
  43413. begin
  43414. if thebits = 0 then
  43415. pTDefRegMap(@Self)^.clr := $00000200
  43416. else
  43417. pTDefRegMap(@Self)^.&set := $00000200;
  43418. end;
  43419. function TCVR_CVRCON.getBGSEL1 : TBits_1; inline;
  43420. begin
  43421. getBGSEL1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  43422. end;
  43423. procedure TCVR_CVRCON.setw(thebits : TBits_32); inline;
  43424. begin
  43425. pTDefRegMap(@Self)^.val := thebits;
  43426. end;
  43427. function TCVR_CVRCON.getw : TBits_32; inline;
  43428. begin
  43429. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  43430. end;
  43431. procedure TCMP_CM1CON.setCCH(thebits : TBits_2); inline;
  43432. begin
  43433. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  43434. end;
  43435. function TCMP_CM1CON.getCCH : TBits_2; inline;
  43436. begin
  43437. getCCH := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  43438. end;
  43439. procedure TCMP_CM1CON.setCREF; inline;
  43440. begin
  43441. pTDefRegMap(@Self)^.&set := $00000010;
  43442. end;
  43443. procedure TCMP_CM1CON.clearCREF; inline;
  43444. begin
  43445. pTDefRegMap(@Self)^.clr := $00000010;
  43446. end;
  43447. procedure TCMP_CM1CON.setCREF(thebits : TBits_1); inline;
  43448. begin
  43449. if thebits = 0 then
  43450. pTDefRegMap(@Self)^.clr := $00000010
  43451. else
  43452. pTDefRegMap(@Self)^.&set := $00000010;
  43453. end;
  43454. function TCMP_CM1CON.getCREF : TBits_1; inline;
  43455. begin
  43456. getCREF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  43457. end;
  43458. procedure TCMP_CM1CON.setEVPOL(thebits : TBits_2); inline;
  43459. begin
  43460. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  43461. end;
  43462. function TCMP_CM1CON.getEVPOL : TBits_2; inline;
  43463. begin
  43464. getEVPOL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  43465. end;
  43466. procedure TCMP_CM1CON.setCOUT; inline;
  43467. begin
  43468. pTDefRegMap(@Self)^.&set := $00000100;
  43469. end;
  43470. procedure TCMP_CM1CON.clearCOUT; inline;
  43471. begin
  43472. pTDefRegMap(@Self)^.clr := $00000100;
  43473. end;
  43474. procedure TCMP_CM1CON.setCOUT(thebits : TBits_1); inline;
  43475. begin
  43476. if thebits = 0 then
  43477. pTDefRegMap(@Self)^.clr := $00000100
  43478. else
  43479. pTDefRegMap(@Self)^.&set := $00000100;
  43480. end;
  43481. function TCMP_CM1CON.getCOUT : TBits_1; inline;
  43482. begin
  43483. getCOUT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  43484. end;
  43485. procedure TCMP_CM1CON.setCPOL; inline;
  43486. begin
  43487. pTDefRegMap(@Self)^.&set := $00002000;
  43488. end;
  43489. procedure TCMP_CM1CON.clearCPOL; inline;
  43490. begin
  43491. pTDefRegMap(@Self)^.clr := $00002000;
  43492. end;
  43493. procedure TCMP_CM1CON.setCPOL(thebits : TBits_1); inline;
  43494. begin
  43495. if thebits = 0 then
  43496. pTDefRegMap(@Self)^.clr := $00002000
  43497. else
  43498. pTDefRegMap(@Self)^.&set := $00002000;
  43499. end;
  43500. function TCMP_CM1CON.getCPOL : TBits_1; inline;
  43501. begin
  43502. getCPOL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  43503. end;
  43504. procedure TCMP_CM1CON.setCOE; inline;
  43505. begin
  43506. pTDefRegMap(@Self)^.&set := $00004000;
  43507. end;
  43508. procedure TCMP_CM1CON.clearCOE; inline;
  43509. begin
  43510. pTDefRegMap(@Self)^.clr := $00004000;
  43511. end;
  43512. procedure TCMP_CM1CON.setCOE(thebits : TBits_1); inline;
  43513. begin
  43514. if thebits = 0 then
  43515. pTDefRegMap(@Self)^.clr := $00004000
  43516. else
  43517. pTDefRegMap(@Self)^.&set := $00004000;
  43518. end;
  43519. function TCMP_CM1CON.getCOE : TBits_1; inline;
  43520. begin
  43521. getCOE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  43522. end;
  43523. procedure TCMP_CM1CON.setON; inline;
  43524. begin
  43525. pTDefRegMap(@Self)^.&set := $00008000;
  43526. end;
  43527. procedure TCMP_CM1CON.clearON; inline;
  43528. begin
  43529. pTDefRegMap(@Self)^.clr := $00008000;
  43530. end;
  43531. procedure TCMP_CM1CON.setON(thebits : TBits_1); inline;
  43532. begin
  43533. if thebits = 0 then
  43534. pTDefRegMap(@Self)^.clr := $00008000
  43535. else
  43536. pTDefRegMap(@Self)^.&set := $00008000;
  43537. end;
  43538. function TCMP_CM1CON.getON : TBits_1; inline;
  43539. begin
  43540. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  43541. end;
  43542. procedure TCMP_CM1CON.setCCH0; inline;
  43543. begin
  43544. pTDefRegMap(@Self)^.&set := $00000001;
  43545. end;
  43546. procedure TCMP_CM1CON.clearCCH0; inline;
  43547. begin
  43548. pTDefRegMap(@Self)^.clr := $00000001;
  43549. end;
  43550. procedure TCMP_CM1CON.setCCH0(thebits : TBits_1); inline;
  43551. begin
  43552. if thebits = 0 then
  43553. pTDefRegMap(@Self)^.clr := $00000001
  43554. else
  43555. pTDefRegMap(@Self)^.&set := $00000001;
  43556. end;
  43557. function TCMP_CM1CON.getCCH0 : TBits_1; inline;
  43558. begin
  43559. getCCH0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  43560. end;
  43561. procedure TCMP_CM1CON.setCCH1; inline;
  43562. begin
  43563. pTDefRegMap(@Self)^.&set := $00000002;
  43564. end;
  43565. procedure TCMP_CM1CON.clearCCH1; inline;
  43566. begin
  43567. pTDefRegMap(@Self)^.clr := $00000002;
  43568. end;
  43569. procedure TCMP_CM1CON.setCCH1(thebits : TBits_1); inline;
  43570. begin
  43571. if thebits = 0 then
  43572. pTDefRegMap(@Self)^.clr := $00000002
  43573. else
  43574. pTDefRegMap(@Self)^.&set := $00000002;
  43575. end;
  43576. function TCMP_CM1CON.getCCH1 : TBits_1; inline;
  43577. begin
  43578. getCCH1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  43579. end;
  43580. procedure TCMP_CM1CON.setEVPOL0; inline;
  43581. begin
  43582. pTDefRegMap(@Self)^.&set := $00000040;
  43583. end;
  43584. procedure TCMP_CM1CON.clearEVPOL0; inline;
  43585. begin
  43586. pTDefRegMap(@Self)^.clr := $00000040;
  43587. end;
  43588. procedure TCMP_CM1CON.setEVPOL0(thebits : TBits_1); inline;
  43589. begin
  43590. if thebits = 0 then
  43591. pTDefRegMap(@Self)^.clr := $00000040
  43592. else
  43593. pTDefRegMap(@Self)^.&set := $00000040;
  43594. end;
  43595. function TCMP_CM1CON.getEVPOL0 : TBits_1; inline;
  43596. begin
  43597. getEVPOL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  43598. end;
  43599. procedure TCMP_CM1CON.setEVPOL1; inline;
  43600. begin
  43601. pTDefRegMap(@Self)^.&set := $00000080;
  43602. end;
  43603. procedure TCMP_CM1CON.clearEVPOL1; inline;
  43604. begin
  43605. pTDefRegMap(@Self)^.clr := $00000080;
  43606. end;
  43607. procedure TCMP_CM1CON.setEVPOL1(thebits : TBits_1); inline;
  43608. begin
  43609. if thebits = 0 then
  43610. pTDefRegMap(@Self)^.clr := $00000080
  43611. else
  43612. pTDefRegMap(@Self)^.&set := $00000080;
  43613. end;
  43614. function TCMP_CM1CON.getEVPOL1 : TBits_1; inline;
  43615. begin
  43616. getEVPOL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  43617. end;
  43618. procedure TCMP_CM1CON.setw(thebits : TBits_32); inline;
  43619. begin
  43620. pTDefRegMap(@Self)^.val := thebits;
  43621. end;
  43622. function TCMP_CM1CON.getw : TBits_32; inline;
  43623. begin
  43624. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  43625. end;
  43626. procedure TCMP_CM2CON.setCCH(thebits : TBits_2); inline;
  43627. begin
  43628. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  43629. end;
  43630. function TCMP_CM2CON.getCCH : TBits_2; inline;
  43631. begin
  43632. getCCH := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  43633. end;
  43634. procedure TCMP_CM2CON.setCREF; inline;
  43635. begin
  43636. pTDefRegMap(@Self)^.&set := $00000010;
  43637. end;
  43638. procedure TCMP_CM2CON.clearCREF; inline;
  43639. begin
  43640. pTDefRegMap(@Self)^.clr := $00000010;
  43641. end;
  43642. procedure TCMP_CM2CON.setCREF(thebits : TBits_1); inline;
  43643. begin
  43644. if thebits = 0 then
  43645. pTDefRegMap(@Self)^.clr := $00000010
  43646. else
  43647. pTDefRegMap(@Self)^.&set := $00000010;
  43648. end;
  43649. function TCMP_CM2CON.getCREF : TBits_1; inline;
  43650. begin
  43651. getCREF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  43652. end;
  43653. procedure TCMP_CM2CON.setEVPOL(thebits : TBits_2); inline;
  43654. begin
  43655. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  43656. end;
  43657. function TCMP_CM2CON.getEVPOL : TBits_2; inline;
  43658. begin
  43659. getEVPOL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  43660. end;
  43661. procedure TCMP_CM2CON.setCOUT; inline;
  43662. begin
  43663. pTDefRegMap(@Self)^.&set := $00000100;
  43664. end;
  43665. procedure TCMP_CM2CON.clearCOUT; inline;
  43666. begin
  43667. pTDefRegMap(@Self)^.clr := $00000100;
  43668. end;
  43669. procedure TCMP_CM2CON.setCOUT(thebits : TBits_1); inline;
  43670. begin
  43671. if thebits = 0 then
  43672. pTDefRegMap(@Self)^.clr := $00000100
  43673. else
  43674. pTDefRegMap(@Self)^.&set := $00000100;
  43675. end;
  43676. function TCMP_CM2CON.getCOUT : TBits_1; inline;
  43677. begin
  43678. getCOUT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  43679. end;
  43680. procedure TCMP_CM2CON.setCPOL; inline;
  43681. begin
  43682. pTDefRegMap(@Self)^.&set := $00002000;
  43683. end;
  43684. procedure TCMP_CM2CON.clearCPOL; inline;
  43685. begin
  43686. pTDefRegMap(@Self)^.clr := $00002000;
  43687. end;
  43688. procedure TCMP_CM2CON.setCPOL(thebits : TBits_1); inline;
  43689. begin
  43690. if thebits = 0 then
  43691. pTDefRegMap(@Self)^.clr := $00002000
  43692. else
  43693. pTDefRegMap(@Self)^.&set := $00002000;
  43694. end;
  43695. function TCMP_CM2CON.getCPOL : TBits_1; inline;
  43696. begin
  43697. getCPOL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  43698. end;
  43699. procedure TCMP_CM2CON.setCOE; inline;
  43700. begin
  43701. pTDefRegMap(@Self)^.&set := $00004000;
  43702. end;
  43703. procedure TCMP_CM2CON.clearCOE; inline;
  43704. begin
  43705. pTDefRegMap(@Self)^.clr := $00004000;
  43706. end;
  43707. procedure TCMP_CM2CON.setCOE(thebits : TBits_1); inline;
  43708. begin
  43709. if thebits = 0 then
  43710. pTDefRegMap(@Self)^.clr := $00004000
  43711. else
  43712. pTDefRegMap(@Self)^.&set := $00004000;
  43713. end;
  43714. function TCMP_CM2CON.getCOE : TBits_1; inline;
  43715. begin
  43716. getCOE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  43717. end;
  43718. procedure TCMP_CM2CON.setON; inline;
  43719. begin
  43720. pTDefRegMap(@Self)^.&set := $00008000;
  43721. end;
  43722. procedure TCMP_CM2CON.clearON; inline;
  43723. begin
  43724. pTDefRegMap(@Self)^.clr := $00008000;
  43725. end;
  43726. procedure TCMP_CM2CON.setON(thebits : TBits_1); inline;
  43727. begin
  43728. if thebits = 0 then
  43729. pTDefRegMap(@Self)^.clr := $00008000
  43730. else
  43731. pTDefRegMap(@Self)^.&set := $00008000;
  43732. end;
  43733. function TCMP_CM2CON.getON : TBits_1; inline;
  43734. begin
  43735. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  43736. end;
  43737. procedure TCMP_CM2CON.setCCH0; inline;
  43738. begin
  43739. pTDefRegMap(@Self)^.&set := $00000001;
  43740. end;
  43741. procedure TCMP_CM2CON.clearCCH0; inline;
  43742. begin
  43743. pTDefRegMap(@Self)^.clr := $00000001;
  43744. end;
  43745. procedure TCMP_CM2CON.setCCH0(thebits : TBits_1); inline;
  43746. begin
  43747. if thebits = 0 then
  43748. pTDefRegMap(@Self)^.clr := $00000001
  43749. else
  43750. pTDefRegMap(@Self)^.&set := $00000001;
  43751. end;
  43752. function TCMP_CM2CON.getCCH0 : TBits_1; inline;
  43753. begin
  43754. getCCH0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  43755. end;
  43756. procedure TCMP_CM2CON.setCCH1; inline;
  43757. begin
  43758. pTDefRegMap(@Self)^.&set := $00000002;
  43759. end;
  43760. procedure TCMP_CM2CON.clearCCH1; inline;
  43761. begin
  43762. pTDefRegMap(@Self)^.clr := $00000002;
  43763. end;
  43764. procedure TCMP_CM2CON.setCCH1(thebits : TBits_1); inline;
  43765. begin
  43766. if thebits = 0 then
  43767. pTDefRegMap(@Self)^.clr := $00000002
  43768. else
  43769. pTDefRegMap(@Self)^.&set := $00000002;
  43770. end;
  43771. function TCMP_CM2CON.getCCH1 : TBits_1; inline;
  43772. begin
  43773. getCCH1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  43774. end;
  43775. procedure TCMP_CM2CON.setEVPOL0; inline;
  43776. begin
  43777. pTDefRegMap(@Self)^.&set := $00000040;
  43778. end;
  43779. procedure TCMP_CM2CON.clearEVPOL0; inline;
  43780. begin
  43781. pTDefRegMap(@Self)^.clr := $00000040;
  43782. end;
  43783. procedure TCMP_CM2CON.setEVPOL0(thebits : TBits_1); inline;
  43784. begin
  43785. if thebits = 0 then
  43786. pTDefRegMap(@Self)^.clr := $00000040
  43787. else
  43788. pTDefRegMap(@Self)^.&set := $00000040;
  43789. end;
  43790. function TCMP_CM2CON.getEVPOL0 : TBits_1; inline;
  43791. begin
  43792. getEVPOL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  43793. end;
  43794. procedure TCMP_CM2CON.setEVPOL1; inline;
  43795. begin
  43796. pTDefRegMap(@Self)^.&set := $00000080;
  43797. end;
  43798. procedure TCMP_CM2CON.clearEVPOL1; inline;
  43799. begin
  43800. pTDefRegMap(@Self)^.clr := $00000080;
  43801. end;
  43802. procedure TCMP_CM2CON.setEVPOL1(thebits : TBits_1); inline;
  43803. begin
  43804. if thebits = 0 then
  43805. pTDefRegMap(@Self)^.clr := $00000080
  43806. else
  43807. pTDefRegMap(@Self)^.&set := $00000080;
  43808. end;
  43809. function TCMP_CM2CON.getEVPOL1 : TBits_1; inline;
  43810. begin
  43811. getEVPOL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  43812. end;
  43813. procedure TCMP_CM2CON.setw(thebits : TBits_32); inline;
  43814. begin
  43815. pTDefRegMap(@Self)^.val := thebits;
  43816. end;
  43817. function TCMP_CM2CON.getw : TBits_32; inline;
  43818. begin
  43819. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  43820. end;
  43821. procedure TCMP_CMSTAT.setC1OUT; inline;
  43822. begin
  43823. pTDefRegMap(@Self)^.&set := $00000001;
  43824. end;
  43825. procedure TCMP_CMSTAT.clearC1OUT; inline;
  43826. begin
  43827. pTDefRegMap(@Self)^.clr := $00000001;
  43828. end;
  43829. procedure TCMP_CMSTAT.setC1OUT(thebits : TBits_1); inline;
  43830. begin
  43831. if thebits = 0 then
  43832. pTDefRegMap(@Self)^.clr := $00000001
  43833. else
  43834. pTDefRegMap(@Self)^.&set := $00000001;
  43835. end;
  43836. function TCMP_CMSTAT.getC1OUT : TBits_1; inline;
  43837. begin
  43838. getC1OUT := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  43839. end;
  43840. procedure TCMP_CMSTAT.setC2OUT; inline;
  43841. begin
  43842. pTDefRegMap(@Self)^.&set := $00000002;
  43843. end;
  43844. procedure TCMP_CMSTAT.clearC2OUT; inline;
  43845. begin
  43846. pTDefRegMap(@Self)^.clr := $00000002;
  43847. end;
  43848. procedure TCMP_CMSTAT.setC2OUT(thebits : TBits_1); inline;
  43849. begin
  43850. if thebits = 0 then
  43851. pTDefRegMap(@Self)^.clr := $00000002
  43852. else
  43853. pTDefRegMap(@Self)^.&set := $00000002;
  43854. end;
  43855. function TCMP_CMSTAT.getC2OUT : TBits_1; inline;
  43856. begin
  43857. getC2OUT := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  43858. end;
  43859. procedure TCMP_CMSTAT.setSIDL; inline;
  43860. begin
  43861. pTDefRegMap(@Self)^.&set := $00002000;
  43862. end;
  43863. procedure TCMP_CMSTAT.clearSIDL; inline;
  43864. begin
  43865. pTDefRegMap(@Self)^.clr := $00002000;
  43866. end;
  43867. procedure TCMP_CMSTAT.setSIDL(thebits : TBits_1); inline;
  43868. begin
  43869. if thebits = 0 then
  43870. pTDefRegMap(@Self)^.clr := $00002000
  43871. else
  43872. pTDefRegMap(@Self)^.&set := $00002000;
  43873. end;
  43874. function TCMP_CMSTAT.getSIDL : TBits_1; inline;
  43875. begin
  43876. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  43877. end;
  43878. procedure TCMP_CMSTAT.setw(thebits : TBits_32); inline;
  43879. begin
  43880. pTDefRegMap(@Self)^.val := thebits;
  43881. end;
  43882. function TCMP_CMSTAT.getw : TBits_32; inline;
  43883. begin
  43884. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  43885. end;
  43886. procedure TOSC_OSCCON.setOSWEN; inline;
  43887. begin
  43888. pTDefRegMap(@Self)^.&set := $00000001;
  43889. end;
  43890. procedure TOSC_OSCCON.clearOSWEN; inline;
  43891. begin
  43892. pTDefRegMap(@Self)^.clr := $00000001;
  43893. end;
  43894. procedure TOSC_OSCCON.setOSWEN(thebits : TBits_1); inline;
  43895. begin
  43896. if thebits = 0 then
  43897. pTDefRegMap(@Self)^.clr := $00000001
  43898. else
  43899. pTDefRegMap(@Self)^.&set := $00000001;
  43900. end;
  43901. function TOSC_OSCCON.getOSWEN : TBits_1; inline;
  43902. begin
  43903. getOSWEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  43904. end;
  43905. procedure TOSC_OSCCON.setSOSCEN; inline;
  43906. begin
  43907. pTDefRegMap(@Self)^.&set := $00000002;
  43908. end;
  43909. procedure TOSC_OSCCON.clearSOSCEN; inline;
  43910. begin
  43911. pTDefRegMap(@Self)^.clr := $00000002;
  43912. end;
  43913. procedure TOSC_OSCCON.setSOSCEN(thebits : TBits_1); inline;
  43914. begin
  43915. if thebits = 0 then
  43916. pTDefRegMap(@Self)^.clr := $00000002
  43917. else
  43918. pTDefRegMap(@Self)^.&set := $00000002;
  43919. end;
  43920. function TOSC_OSCCON.getSOSCEN : TBits_1; inline;
  43921. begin
  43922. getSOSCEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  43923. end;
  43924. procedure TOSC_OSCCON.setUFRCEN; inline;
  43925. begin
  43926. pTDefRegMap(@Self)^.&set := $00000004;
  43927. end;
  43928. procedure TOSC_OSCCON.clearUFRCEN; inline;
  43929. begin
  43930. pTDefRegMap(@Self)^.clr := $00000004;
  43931. end;
  43932. procedure TOSC_OSCCON.setUFRCEN(thebits : TBits_1); inline;
  43933. begin
  43934. if thebits = 0 then
  43935. pTDefRegMap(@Self)^.clr := $00000004
  43936. else
  43937. pTDefRegMap(@Self)^.&set := $00000004;
  43938. end;
  43939. function TOSC_OSCCON.getUFRCEN : TBits_1; inline;
  43940. begin
  43941. getUFRCEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  43942. end;
  43943. procedure TOSC_OSCCON.setCF; inline;
  43944. begin
  43945. pTDefRegMap(@Self)^.&set := $00000008;
  43946. end;
  43947. procedure TOSC_OSCCON.clearCF; inline;
  43948. begin
  43949. pTDefRegMap(@Self)^.clr := $00000008;
  43950. end;
  43951. procedure TOSC_OSCCON.setCF(thebits : TBits_1); inline;
  43952. begin
  43953. if thebits = 0 then
  43954. pTDefRegMap(@Self)^.clr := $00000008
  43955. else
  43956. pTDefRegMap(@Self)^.&set := $00000008;
  43957. end;
  43958. function TOSC_OSCCON.getCF : TBits_1; inline;
  43959. begin
  43960. getCF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  43961. end;
  43962. procedure TOSC_OSCCON.setSLPEN; inline;
  43963. begin
  43964. pTDefRegMap(@Self)^.&set := $00000010;
  43965. end;
  43966. procedure TOSC_OSCCON.clearSLPEN; inline;
  43967. begin
  43968. pTDefRegMap(@Self)^.clr := $00000010;
  43969. end;
  43970. procedure TOSC_OSCCON.setSLPEN(thebits : TBits_1); inline;
  43971. begin
  43972. if thebits = 0 then
  43973. pTDefRegMap(@Self)^.clr := $00000010
  43974. else
  43975. pTDefRegMap(@Self)^.&set := $00000010;
  43976. end;
  43977. function TOSC_OSCCON.getSLPEN : TBits_1; inline;
  43978. begin
  43979. getSLPEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  43980. end;
  43981. procedure TOSC_OSCCON.setSLOCK; inline;
  43982. begin
  43983. pTDefRegMap(@Self)^.&set := $00000020;
  43984. end;
  43985. procedure TOSC_OSCCON.clearSLOCK; inline;
  43986. begin
  43987. pTDefRegMap(@Self)^.clr := $00000020;
  43988. end;
  43989. procedure TOSC_OSCCON.setSLOCK(thebits : TBits_1); inline;
  43990. begin
  43991. if thebits = 0 then
  43992. pTDefRegMap(@Self)^.clr := $00000020
  43993. else
  43994. pTDefRegMap(@Self)^.&set := $00000020;
  43995. end;
  43996. function TOSC_OSCCON.getSLOCK : TBits_1; inline;
  43997. begin
  43998. getSLOCK := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  43999. end;
  44000. procedure TOSC_OSCCON.setULOCK; inline;
  44001. begin
  44002. pTDefRegMap(@Self)^.&set := $00000040;
  44003. end;
  44004. procedure TOSC_OSCCON.clearULOCK; inline;
  44005. begin
  44006. pTDefRegMap(@Self)^.clr := $00000040;
  44007. end;
  44008. procedure TOSC_OSCCON.setULOCK(thebits : TBits_1); inline;
  44009. begin
  44010. if thebits = 0 then
  44011. pTDefRegMap(@Self)^.clr := $00000040
  44012. else
  44013. pTDefRegMap(@Self)^.&set := $00000040;
  44014. end;
  44015. function TOSC_OSCCON.getULOCK : TBits_1; inline;
  44016. begin
  44017. getULOCK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  44018. end;
  44019. procedure TOSC_OSCCON.setCLKLOCK; inline;
  44020. begin
  44021. pTDefRegMap(@Self)^.&set := $00000080;
  44022. end;
  44023. procedure TOSC_OSCCON.clearCLKLOCK; inline;
  44024. begin
  44025. pTDefRegMap(@Self)^.clr := $00000080;
  44026. end;
  44027. procedure TOSC_OSCCON.setCLKLOCK(thebits : TBits_1); inline;
  44028. begin
  44029. if thebits = 0 then
  44030. pTDefRegMap(@Self)^.clr := $00000080
  44031. else
  44032. pTDefRegMap(@Self)^.&set := $00000080;
  44033. end;
  44034. function TOSC_OSCCON.getCLKLOCK : TBits_1; inline;
  44035. begin
  44036. getCLKLOCK := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  44037. end;
  44038. procedure TOSC_OSCCON.setNOSC(thebits : TBits_3); inline;
  44039. begin
  44040. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF8FF or ( thebits shl 8 );
  44041. end;
  44042. function TOSC_OSCCON.getNOSC : TBits_3; inline;
  44043. begin
  44044. getNOSC := (pTDefRegMap(@Self)^.val and $00000700) shr 8;
  44045. end;
  44046. procedure TOSC_OSCCON.setCOSC(thebits : TBits_3); inline;
  44047. begin
  44048. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF8FFF or ( thebits shl 12 );
  44049. end;
  44050. function TOSC_OSCCON.getCOSC : TBits_3; inline;
  44051. begin
  44052. getCOSC := (pTDefRegMap(@Self)^.val and $00007000) shr 12;
  44053. end;
  44054. procedure TOSC_OSCCON.setPLLMULT(thebits : TBits_3); inline;
  44055. begin
  44056. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF8FFFF or ( thebits shl 16 );
  44057. end;
  44058. function TOSC_OSCCON.getPLLMULT : TBits_3; inline;
  44059. begin
  44060. getPLLMULT := (pTDefRegMap(@Self)^.val and $00070000) shr 16;
  44061. end;
  44062. procedure TOSC_OSCCON.setPBDIV(thebits : TBits_2); inline;
  44063. begin
  44064. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE7FFFF or ( thebits shl 19 );
  44065. end;
  44066. function TOSC_OSCCON.getPBDIV : TBits_2; inline;
  44067. begin
  44068. getPBDIV := (pTDefRegMap(@Self)^.val and $00180000) shr 19;
  44069. end;
  44070. procedure TOSC_OSCCON.setSOSCRDY; inline;
  44071. begin
  44072. pTDefRegMap(@Self)^.&set := $00400000;
  44073. end;
  44074. procedure TOSC_OSCCON.clearSOSCRDY; inline;
  44075. begin
  44076. pTDefRegMap(@Self)^.clr := $00400000;
  44077. end;
  44078. procedure TOSC_OSCCON.setSOSCRDY(thebits : TBits_1); inline;
  44079. begin
  44080. if thebits = 0 then
  44081. pTDefRegMap(@Self)^.clr := $00400000
  44082. else
  44083. pTDefRegMap(@Self)^.&set := $00400000;
  44084. end;
  44085. function TOSC_OSCCON.getSOSCRDY : TBits_1; inline;
  44086. begin
  44087. getSOSCRDY := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  44088. end;
  44089. procedure TOSC_OSCCON.setFRCDIV(thebits : TBits_3); inline;
  44090. begin
  44091. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  44092. end;
  44093. function TOSC_OSCCON.getFRCDIV : TBits_3; inline;
  44094. begin
  44095. getFRCDIV := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  44096. end;
  44097. procedure TOSC_OSCCON.setPLLODIV(thebits : TBits_3); inline;
  44098. begin
  44099. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $C7FFFFFF or ( thebits shl 27 );
  44100. end;
  44101. function TOSC_OSCCON.getPLLODIV : TBits_3; inline;
  44102. begin
  44103. getPLLODIV := (pTDefRegMap(@Self)^.val and $38000000) shr 27;
  44104. end;
  44105. procedure TOSC_OSCCON.setNOSC0; inline;
  44106. begin
  44107. pTDefRegMap(@Self)^.&set := $00000100;
  44108. end;
  44109. procedure TOSC_OSCCON.clearNOSC0; inline;
  44110. begin
  44111. pTDefRegMap(@Self)^.clr := $00000100;
  44112. end;
  44113. procedure TOSC_OSCCON.setNOSC0(thebits : TBits_1); inline;
  44114. begin
  44115. if thebits = 0 then
  44116. pTDefRegMap(@Self)^.clr := $00000100
  44117. else
  44118. pTDefRegMap(@Self)^.&set := $00000100;
  44119. end;
  44120. function TOSC_OSCCON.getNOSC0 : TBits_1; inline;
  44121. begin
  44122. getNOSC0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  44123. end;
  44124. procedure TOSC_OSCCON.setNOSC1; inline;
  44125. begin
  44126. pTDefRegMap(@Self)^.&set := $00000200;
  44127. end;
  44128. procedure TOSC_OSCCON.clearNOSC1; inline;
  44129. begin
  44130. pTDefRegMap(@Self)^.clr := $00000200;
  44131. end;
  44132. procedure TOSC_OSCCON.setNOSC1(thebits : TBits_1); inline;
  44133. begin
  44134. if thebits = 0 then
  44135. pTDefRegMap(@Self)^.clr := $00000200
  44136. else
  44137. pTDefRegMap(@Self)^.&set := $00000200;
  44138. end;
  44139. function TOSC_OSCCON.getNOSC1 : TBits_1; inline;
  44140. begin
  44141. getNOSC1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  44142. end;
  44143. procedure TOSC_OSCCON.setNOSC2; inline;
  44144. begin
  44145. pTDefRegMap(@Self)^.&set := $00000400;
  44146. end;
  44147. procedure TOSC_OSCCON.clearNOSC2; inline;
  44148. begin
  44149. pTDefRegMap(@Self)^.clr := $00000400;
  44150. end;
  44151. procedure TOSC_OSCCON.setNOSC2(thebits : TBits_1); inline;
  44152. begin
  44153. if thebits = 0 then
  44154. pTDefRegMap(@Self)^.clr := $00000400
  44155. else
  44156. pTDefRegMap(@Self)^.&set := $00000400;
  44157. end;
  44158. function TOSC_OSCCON.getNOSC2 : TBits_1; inline;
  44159. begin
  44160. getNOSC2 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  44161. end;
  44162. procedure TOSC_OSCCON.setCOSC0; inline;
  44163. begin
  44164. pTDefRegMap(@Self)^.&set := $00001000;
  44165. end;
  44166. procedure TOSC_OSCCON.clearCOSC0; inline;
  44167. begin
  44168. pTDefRegMap(@Self)^.clr := $00001000;
  44169. end;
  44170. procedure TOSC_OSCCON.setCOSC0(thebits : TBits_1); inline;
  44171. begin
  44172. if thebits = 0 then
  44173. pTDefRegMap(@Self)^.clr := $00001000
  44174. else
  44175. pTDefRegMap(@Self)^.&set := $00001000;
  44176. end;
  44177. function TOSC_OSCCON.getCOSC0 : TBits_1; inline;
  44178. begin
  44179. getCOSC0 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  44180. end;
  44181. procedure TOSC_OSCCON.setCOSC1; inline;
  44182. begin
  44183. pTDefRegMap(@Self)^.&set := $00002000;
  44184. end;
  44185. procedure TOSC_OSCCON.clearCOSC1; inline;
  44186. begin
  44187. pTDefRegMap(@Self)^.clr := $00002000;
  44188. end;
  44189. procedure TOSC_OSCCON.setCOSC1(thebits : TBits_1); inline;
  44190. begin
  44191. if thebits = 0 then
  44192. pTDefRegMap(@Self)^.clr := $00002000
  44193. else
  44194. pTDefRegMap(@Self)^.&set := $00002000;
  44195. end;
  44196. function TOSC_OSCCON.getCOSC1 : TBits_1; inline;
  44197. begin
  44198. getCOSC1 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  44199. end;
  44200. procedure TOSC_OSCCON.setCOSC2; inline;
  44201. begin
  44202. pTDefRegMap(@Self)^.&set := $00004000;
  44203. end;
  44204. procedure TOSC_OSCCON.clearCOSC2; inline;
  44205. begin
  44206. pTDefRegMap(@Self)^.clr := $00004000;
  44207. end;
  44208. procedure TOSC_OSCCON.setCOSC2(thebits : TBits_1); inline;
  44209. begin
  44210. if thebits = 0 then
  44211. pTDefRegMap(@Self)^.clr := $00004000
  44212. else
  44213. pTDefRegMap(@Self)^.&set := $00004000;
  44214. end;
  44215. function TOSC_OSCCON.getCOSC2 : TBits_1; inline;
  44216. begin
  44217. getCOSC2 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  44218. end;
  44219. procedure TOSC_OSCCON.setPLLMULT0; inline;
  44220. begin
  44221. pTDefRegMap(@Self)^.&set := $00010000;
  44222. end;
  44223. procedure TOSC_OSCCON.clearPLLMULT0; inline;
  44224. begin
  44225. pTDefRegMap(@Self)^.clr := $00010000;
  44226. end;
  44227. procedure TOSC_OSCCON.setPLLMULT0(thebits : TBits_1); inline;
  44228. begin
  44229. if thebits = 0 then
  44230. pTDefRegMap(@Self)^.clr := $00010000
  44231. else
  44232. pTDefRegMap(@Self)^.&set := $00010000;
  44233. end;
  44234. function TOSC_OSCCON.getPLLMULT0 : TBits_1; inline;
  44235. begin
  44236. getPLLMULT0 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  44237. end;
  44238. procedure TOSC_OSCCON.setPLLMULT1; inline;
  44239. begin
  44240. pTDefRegMap(@Self)^.&set := $00020000;
  44241. end;
  44242. procedure TOSC_OSCCON.clearPLLMULT1; inline;
  44243. begin
  44244. pTDefRegMap(@Self)^.clr := $00020000;
  44245. end;
  44246. procedure TOSC_OSCCON.setPLLMULT1(thebits : TBits_1); inline;
  44247. begin
  44248. if thebits = 0 then
  44249. pTDefRegMap(@Self)^.clr := $00020000
  44250. else
  44251. pTDefRegMap(@Self)^.&set := $00020000;
  44252. end;
  44253. function TOSC_OSCCON.getPLLMULT1 : TBits_1; inline;
  44254. begin
  44255. getPLLMULT1 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  44256. end;
  44257. procedure TOSC_OSCCON.setPLLMULT2; inline;
  44258. begin
  44259. pTDefRegMap(@Self)^.&set := $00040000;
  44260. end;
  44261. procedure TOSC_OSCCON.clearPLLMULT2; inline;
  44262. begin
  44263. pTDefRegMap(@Self)^.clr := $00040000;
  44264. end;
  44265. procedure TOSC_OSCCON.setPLLMULT2(thebits : TBits_1); inline;
  44266. begin
  44267. if thebits = 0 then
  44268. pTDefRegMap(@Self)^.clr := $00040000
  44269. else
  44270. pTDefRegMap(@Self)^.&set := $00040000;
  44271. end;
  44272. function TOSC_OSCCON.getPLLMULT2 : TBits_1; inline;
  44273. begin
  44274. getPLLMULT2 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  44275. end;
  44276. procedure TOSC_OSCCON.setPBDIV0; inline;
  44277. begin
  44278. pTDefRegMap(@Self)^.&set := $00080000;
  44279. end;
  44280. procedure TOSC_OSCCON.clearPBDIV0; inline;
  44281. begin
  44282. pTDefRegMap(@Self)^.clr := $00080000;
  44283. end;
  44284. procedure TOSC_OSCCON.setPBDIV0(thebits : TBits_1); inline;
  44285. begin
  44286. if thebits = 0 then
  44287. pTDefRegMap(@Self)^.clr := $00080000
  44288. else
  44289. pTDefRegMap(@Self)^.&set := $00080000;
  44290. end;
  44291. function TOSC_OSCCON.getPBDIV0 : TBits_1; inline;
  44292. begin
  44293. getPBDIV0 := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  44294. end;
  44295. procedure TOSC_OSCCON.setPBDIV1; inline;
  44296. begin
  44297. pTDefRegMap(@Self)^.&set := $00100000;
  44298. end;
  44299. procedure TOSC_OSCCON.clearPBDIV1; inline;
  44300. begin
  44301. pTDefRegMap(@Self)^.clr := $00100000;
  44302. end;
  44303. procedure TOSC_OSCCON.setPBDIV1(thebits : TBits_1); inline;
  44304. begin
  44305. if thebits = 0 then
  44306. pTDefRegMap(@Self)^.clr := $00100000
  44307. else
  44308. pTDefRegMap(@Self)^.&set := $00100000;
  44309. end;
  44310. function TOSC_OSCCON.getPBDIV1 : TBits_1; inline;
  44311. begin
  44312. getPBDIV1 := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  44313. end;
  44314. procedure TOSC_OSCCON.setFRCDIV0; inline;
  44315. begin
  44316. pTDefRegMap(@Self)^.&set := $01000000;
  44317. end;
  44318. procedure TOSC_OSCCON.clearFRCDIV0; inline;
  44319. begin
  44320. pTDefRegMap(@Self)^.clr := $01000000;
  44321. end;
  44322. procedure TOSC_OSCCON.setFRCDIV0(thebits : TBits_1); inline;
  44323. begin
  44324. if thebits = 0 then
  44325. pTDefRegMap(@Self)^.clr := $01000000
  44326. else
  44327. pTDefRegMap(@Self)^.&set := $01000000;
  44328. end;
  44329. function TOSC_OSCCON.getFRCDIV0 : TBits_1; inline;
  44330. begin
  44331. getFRCDIV0 := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  44332. end;
  44333. procedure TOSC_OSCCON.setFRCDIV1; inline;
  44334. begin
  44335. pTDefRegMap(@Self)^.&set := $02000000;
  44336. end;
  44337. procedure TOSC_OSCCON.clearFRCDIV1; inline;
  44338. begin
  44339. pTDefRegMap(@Self)^.clr := $02000000;
  44340. end;
  44341. procedure TOSC_OSCCON.setFRCDIV1(thebits : TBits_1); inline;
  44342. begin
  44343. if thebits = 0 then
  44344. pTDefRegMap(@Self)^.clr := $02000000
  44345. else
  44346. pTDefRegMap(@Self)^.&set := $02000000;
  44347. end;
  44348. function TOSC_OSCCON.getFRCDIV1 : TBits_1; inline;
  44349. begin
  44350. getFRCDIV1 := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  44351. end;
  44352. procedure TOSC_OSCCON.setFRCDIV2; inline;
  44353. begin
  44354. pTDefRegMap(@Self)^.&set := $04000000;
  44355. end;
  44356. procedure TOSC_OSCCON.clearFRCDIV2; inline;
  44357. begin
  44358. pTDefRegMap(@Self)^.clr := $04000000;
  44359. end;
  44360. procedure TOSC_OSCCON.setFRCDIV2(thebits : TBits_1); inline;
  44361. begin
  44362. if thebits = 0 then
  44363. pTDefRegMap(@Self)^.clr := $04000000
  44364. else
  44365. pTDefRegMap(@Self)^.&set := $04000000;
  44366. end;
  44367. function TOSC_OSCCON.getFRCDIV2 : TBits_1; inline;
  44368. begin
  44369. getFRCDIV2 := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  44370. end;
  44371. procedure TOSC_OSCCON.setPLLODIV0; inline;
  44372. begin
  44373. pTDefRegMap(@Self)^.&set := $08000000;
  44374. end;
  44375. procedure TOSC_OSCCON.clearPLLODIV0; inline;
  44376. begin
  44377. pTDefRegMap(@Self)^.clr := $08000000;
  44378. end;
  44379. procedure TOSC_OSCCON.setPLLODIV0(thebits : TBits_1); inline;
  44380. begin
  44381. if thebits = 0 then
  44382. pTDefRegMap(@Self)^.clr := $08000000
  44383. else
  44384. pTDefRegMap(@Self)^.&set := $08000000;
  44385. end;
  44386. function TOSC_OSCCON.getPLLODIV0 : TBits_1; inline;
  44387. begin
  44388. getPLLODIV0 := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  44389. end;
  44390. procedure TOSC_OSCCON.setPLLODIV1; inline;
  44391. begin
  44392. pTDefRegMap(@Self)^.&set := $10000000;
  44393. end;
  44394. procedure TOSC_OSCCON.clearPLLODIV1; inline;
  44395. begin
  44396. pTDefRegMap(@Self)^.clr := $10000000;
  44397. end;
  44398. procedure TOSC_OSCCON.setPLLODIV1(thebits : TBits_1); inline;
  44399. begin
  44400. if thebits = 0 then
  44401. pTDefRegMap(@Self)^.clr := $10000000
  44402. else
  44403. pTDefRegMap(@Self)^.&set := $10000000;
  44404. end;
  44405. function TOSC_OSCCON.getPLLODIV1 : TBits_1; inline;
  44406. begin
  44407. getPLLODIV1 := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  44408. end;
  44409. procedure TOSC_OSCCON.setPLLODIV2; inline;
  44410. begin
  44411. pTDefRegMap(@Self)^.&set := $20000000;
  44412. end;
  44413. procedure TOSC_OSCCON.clearPLLODIV2; inline;
  44414. begin
  44415. pTDefRegMap(@Self)^.clr := $20000000;
  44416. end;
  44417. procedure TOSC_OSCCON.setPLLODIV2(thebits : TBits_1); inline;
  44418. begin
  44419. if thebits = 0 then
  44420. pTDefRegMap(@Self)^.clr := $20000000
  44421. else
  44422. pTDefRegMap(@Self)^.&set := $20000000;
  44423. end;
  44424. function TOSC_OSCCON.getPLLODIV2 : TBits_1; inline;
  44425. begin
  44426. getPLLODIV2 := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  44427. end;
  44428. procedure TOSC_OSCCON.setw(thebits : TBits_32); inline;
  44429. begin
  44430. pTDefRegMap(@Self)^.val := thebits;
  44431. end;
  44432. function TOSC_OSCCON.getw : TBits_32; inline;
  44433. begin
  44434. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  44435. end;
  44436. procedure TOSC_OSCTUN.setTUN(thebits : TBits_6); inline;
  44437. begin
  44438. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC0 or ( thebits shl 0 );
  44439. end;
  44440. function TOSC_OSCTUN.getTUN : TBits_6; inline;
  44441. begin
  44442. getTUN := (pTDefRegMap(@Self)^.val and $0000003F) shr 0;
  44443. end;
  44444. procedure TOSC_OSCTUN.setTUN0; inline;
  44445. begin
  44446. pTDefRegMap(@Self)^.&set := $00000001;
  44447. end;
  44448. procedure TOSC_OSCTUN.clearTUN0; inline;
  44449. begin
  44450. pTDefRegMap(@Self)^.clr := $00000001;
  44451. end;
  44452. procedure TOSC_OSCTUN.setTUN0(thebits : TBits_1); inline;
  44453. begin
  44454. if thebits = 0 then
  44455. pTDefRegMap(@Self)^.clr := $00000001
  44456. else
  44457. pTDefRegMap(@Self)^.&set := $00000001;
  44458. end;
  44459. function TOSC_OSCTUN.getTUN0 : TBits_1; inline;
  44460. begin
  44461. getTUN0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  44462. end;
  44463. procedure TOSC_OSCTUN.setTUN1; inline;
  44464. begin
  44465. pTDefRegMap(@Self)^.&set := $00000002;
  44466. end;
  44467. procedure TOSC_OSCTUN.clearTUN1; inline;
  44468. begin
  44469. pTDefRegMap(@Self)^.clr := $00000002;
  44470. end;
  44471. procedure TOSC_OSCTUN.setTUN1(thebits : TBits_1); inline;
  44472. begin
  44473. if thebits = 0 then
  44474. pTDefRegMap(@Self)^.clr := $00000002
  44475. else
  44476. pTDefRegMap(@Self)^.&set := $00000002;
  44477. end;
  44478. function TOSC_OSCTUN.getTUN1 : TBits_1; inline;
  44479. begin
  44480. getTUN1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  44481. end;
  44482. procedure TOSC_OSCTUN.setTUN2; inline;
  44483. begin
  44484. pTDefRegMap(@Self)^.&set := $00000004;
  44485. end;
  44486. procedure TOSC_OSCTUN.clearTUN2; inline;
  44487. begin
  44488. pTDefRegMap(@Self)^.clr := $00000004;
  44489. end;
  44490. procedure TOSC_OSCTUN.setTUN2(thebits : TBits_1); inline;
  44491. begin
  44492. if thebits = 0 then
  44493. pTDefRegMap(@Self)^.clr := $00000004
  44494. else
  44495. pTDefRegMap(@Self)^.&set := $00000004;
  44496. end;
  44497. function TOSC_OSCTUN.getTUN2 : TBits_1; inline;
  44498. begin
  44499. getTUN2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  44500. end;
  44501. procedure TOSC_OSCTUN.setTUN3; inline;
  44502. begin
  44503. pTDefRegMap(@Self)^.&set := $00000008;
  44504. end;
  44505. procedure TOSC_OSCTUN.clearTUN3; inline;
  44506. begin
  44507. pTDefRegMap(@Self)^.clr := $00000008;
  44508. end;
  44509. procedure TOSC_OSCTUN.setTUN3(thebits : TBits_1); inline;
  44510. begin
  44511. if thebits = 0 then
  44512. pTDefRegMap(@Self)^.clr := $00000008
  44513. else
  44514. pTDefRegMap(@Self)^.&set := $00000008;
  44515. end;
  44516. function TOSC_OSCTUN.getTUN3 : TBits_1; inline;
  44517. begin
  44518. getTUN3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  44519. end;
  44520. procedure TOSC_OSCTUN.setTUN4; inline;
  44521. begin
  44522. pTDefRegMap(@Self)^.&set := $00000010;
  44523. end;
  44524. procedure TOSC_OSCTUN.clearTUN4; inline;
  44525. begin
  44526. pTDefRegMap(@Self)^.clr := $00000010;
  44527. end;
  44528. procedure TOSC_OSCTUN.setTUN4(thebits : TBits_1); inline;
  44529. begin
  44530. if thebits = 0 then
  44531. pTDefRegMap(@Self)^.clr := $00000010
  44532. else
  44533. pTDefRegMap(@Self)^.&set := $00000010;
  44534. end;
  44535. function TOSC_OSCTUN.getTUN4 : TBits_1; inline;
  44536. begin
  44537. getTUN4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  44538. end;
  44539. procedure TOSC_OSCTUN.setTUN5; inline;
  44540. begin
  44541. pTDefRegMap(@Self)^.&set := $00000020;
  44542. end;
  44543. procedure TOSC_OSCTUN.clearTUN5; inline;
  44544. begin
  44545. pTDefRegMap(@Self)^.clr := $00000020;
  44546. end;
  44547. procedure TOSC_OSCTUN.setTUN5(thebits : TBits_1); inline;
  44548. begin
  44549. if thebits = 0 then
  44550. pTDefRegMap(@Self)^.clr := $00000020
  44551. else
  44552. pTDefRegMap(@Self)^.&set := $00000020;
  44553. end;
  44554. function TOSC_OSCTUN.getTUN5 : TBits_1; inline;
  44555. begin
  44556. getTUN5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  44557. end;
  44558. procedure TOSC_OSCTUN.setw(thebits : TBits_32); inline;
  44559. begin
  44560. pTDefRegMap(@Self)^.val := thebits;
  44561. end;
  44562. function TOSC_OSCTUN.getw : TBits_32; inline;
  44563. begin
  44564. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  44565. end;
  44566. procedure TNVM_NVMCON.setNVMOP(thebits : TBits_4); inline;
  44567. begin
  44568. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  44569. end;
  44570. function TNVM_NVMCON.getNVMOP : TBits_4; inline;
  44571. begin
  44572. getNVMOP := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  44573. end;
  44574. procedure TNVM_NVMCON.setLVDSTAT; inline;
  44575. begin
  44576. pTDefRegMap(@Self)^.&set := $00000800;
  44577. end;
  44578. procedure TNVM_NVMCON.clearLVDSTAT; inline;
  44579. begin
  44580. pTDefRegMap(@Self)^.clr := $00000800;
  44581. end;
  44582. procedure TNVM_NVMCON.setLVDSTAT(thebits : TBits_1); inline;
  44583. begin
  44584. if thebits = 0 then
  44585. pTDefRegMap(@Self)^.clr := $00000800
  44586. else
  44587. pTDefRegMap(@Self)^.&set := $00000800;
  44588. end;
  44589. function TNVM_NVMCON.getLVDSTAT : TBits_1; inline;
  44590. begin
  44591. getLVDSTAT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  44592. end;
  44593. procedure TNVM_NVMCON.setLVDERR; inline;
  44594. begin
  44595. pTDefRegMap(@Self)^.&set := $00001000;
  44596. end;
  44597. procedure TNVM_NVMCON.clearLVDERR; inline;
  44598. begin
  44599. pTDefRegMap(@Self)^.clr := $00001000;
  44600. end;
  44601. procedure TNVM_NVMCON.setLVDERR(thebits : TBits_1); inline;
  44602. begin
  44603. if thebits = 0 then
  44604. pTDefRegMap(@Self)^.clr := $00001000
  44605. else
  44606. pTDefRegMap(@Self)^.&set := $00001000;
  44607. end;
  44608. function TNVM_NVMCON.getLVDERR : TBits_1; inline;
  44609. begin
  44610. getLVDERR := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  44611. end;
  44612. procedure TNVM_NVMCON.setWRERR; inline;
  44613. begin
  44614. pTDefRegMap(@Self)^.&set := $00002000;
  44615. end;
  44616. procedure TNVM_NVMCON.clearWRERR; inline;
  44617. begin
  44618. pTDefRegMap(@Self)^.clr := $00002000;
  44619. end;
  44620. procedure TNVM_NVMCON.setWRERR(thebits : TBits_1); inline;
  44621. begin
  44622. if thebits = 0 then
  44623. pTDefRegMap(@Self)^.clr := $00002000
  44624. else
  44625. pTDefRegMap(@Self)^.&set := $00002000;
  44626. end;
  44627. function TNVM_NVMCON.getWRERR : TBits_1; inline;
  44628. begin
  44629. getWRERR := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  44630. end;
  44631. procedure TNVM_NVMCON.setWREN; inline;
  44632. begin
  44633. pTDefRegMap(@Self)^.&set := $00004000;
  44634. end;
  44635. procedure TNVM_NVMCON.clearWREN; inline;
  44636. begin
  44637. pTDefRegMap(@Self)^.clr := $00004000;
  44638. end;
  44639. procedure TNVM_NVMCON.setWREN(thebits : TBits_1); inline;
  44640. begin
  44641. if thebits = 0 then
  44642. pTDefRegMap(@Self)^.clr := $00004000
  44643. else
  44644. pTDefRegMap(@Self)^.&set := $00004000;
  44645. end;
  44646. function TNVM_NVMCON.getWREN : TBits_1; inline;
  44647. begin
  44648. getWREN := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  44649. end;
  44650. procedure TNVM_NVMCON.setWR; inline;
  44651. begin
  44652. pTDefRegMap(@Self)^.&set := $00008000;
  44653. end;
  44654. procedure TNVM_NVMCON.clearWR; inline;
  44655. begin
  44656. pTDefRegMap(@Self)^.clr := $00008000;
  44657. end;
  44658. procedure TNVM_NVMCON.setWR(thebits : TBits_1); inline;
  44659. begin
  44660. if thebits = 0 then
  44661. pTDefRegMap(@Self)^.clr := $00008000
  44662. else
  44663. pTDefRegMap(@Self)^.&set := $00008000;
  44664. end;
  44665. function TNVM_NVMCON.getWR : TBits_1; inline;
  44666. begin
  44667. getWR := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  44668. end;
  44669. procedure TNVM_NVMCON.setNVMOP0; inline;
  44670. begin
  44671. pTDefRegMap(@Self)^.&set := $00000001;
  44672. end;
  44673. procedure TNVM_NVMCON.clearNVMOP0; inline;
  44674. begin
  44675. pTDefRegMap(@Self)^.clr := $00000001;
  44676. end;
  44677. procedure TNVM_NVMCON.setNVMOP0(thebits : TBits_1); inline;
  44678. begin
  44679. if thebits = 0 then
  44680. pTDefRegMap(@Self)^.clr := $00000001
  44681. else
  44682. pTDefRegMap(@Self)^.&set := $00000001;
  44683. end;
  44684. function TNVM_NVMCON.getNVMOP0 : TBits_1; inline;
  44685. begin
  44686. getNVMOP0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  44687. end;
  44688. procedure TNVM_NVMCON.setNVMOP1; inline;
  44689. begin
  44690. pTDefRegMap(@Self)^.&set := $00000002;
  44691. end;
  44692. procedure TNVM_NVMCON.clearNVMOP1; inline;
  44693. begin
  44694. pTDefRegMap(@Self)^.clr := $00000002;
  44695. end;
  44696. procedure TNVM_NVMCON.setNVMOP1(thebits : TBits_1); inline;
  44697. begin
  44698. if thebits = 0 then
  44699. pTDefRegMap(@Self)^.clr := $00000002
  44700. else
  44701. pTDefRegMap(@Self)^.&set := $00000002;
  44702. end;
  44703. function TNVM_NVMCON.getNVMOP1 : TBits_1; inline;
  44704. begin
  44705. getNVMOP1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  44706. end;
  44707. procedure TNVM_NVMCON.setNVMOP2; inline;
  44708. begin
  44709. pTDefRegMap(@Self)^.&set := $00000004;
  44710. end;
  44711. procedure TNVM_NVMCON.clearNVMOP2; inline;
  44712. begin
  44713. pTDefRegMap(@Self)^.clr := $00000004;
  44714. end;
  44715. procedure TNVM_NVMCON.setNVMOP2(thebits : TBits_1); inline;
  44716. begin
  44717. if thebits = 0 then
  44718. pTDefRegMap(@Self)^.clr := $00000004
  44719. else
  44720. pTDefRegMap(@Self)^.&set := $00000004;
  44721. end;
  44722. function TNVM_NVMCON.getNVMOP2 : TBits_1; inline;
  44723. begin
  44724. getNVMOP2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  44725. end;
  44726. procedure TNVM_NVMCON.setNVMOP3; inline;
  44727. begin
  44728. pTDefRegMap(@Self)^.&set := $00000008;
  44729. end;
  44730. procedure TNVM_NVMCON.clearNVMOP3; inline;
  44731. begin
  44732. pTDefRegMap(@Self)^.clr := $00000008;
  44733. end;
  44734. procedure TNVM_NVMCON.setNVMOP3(thebits : TBits_1); inline;
  44735. begin
  44736. if thebits = 0 then
  44737. pTDefRegMap(@Self)^.clr := $00000008
  44738. else
  44739. pTDefRegMap(@Self)^.&set := $00000008;
  44740. end;
  44741. function TNVM_NVMCON.getNVMOP3 : TBits_1; inline;
  44742. begin
  44743. getNVMOP3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  44744. end;
  44745. procedure TNVM_NVMCON.setPROGOP(thebits : TBits_4); inline;
  44746. begin
  44747. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  44748. end;
  44749. function TNVM_NVMCON.getPROGOP : TBits_4; inline;
  44750. begin
  44751. getPROGOP := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  44752. end;
  44753. procedure TNVM_NVMCON.setPROGOP0; inline;
  44754. begin
  44755. pTDefRegMap(@Self)^.&set := $00000001;
  44756. end;
  44757. procedure TNVM_NVMCON.clearPROGOP0; inline;
  44758. begin
  44759. pTDefRegMap(@Self)^.clr := $00000001;
  44760. end;
  44761. procedure TNVM_NVMCON.setPROGOP0(thebits : TBits_1); inline;
  44762. begin
  44763. if thebits = 0 then
  44764. pTDefRegMap(@Self)^.clr := $00000001
  44765. else
  44766. pTDefRegMap(@Self)^.&set := $00000001;
  44767. end;
  44768. function TNVM_NVMCON.getPROGOP0 : TBits_1; inline;
  44769. begin
  44770. getPROGOP0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  44771. end;
  44772. procedure TNVM_NVMCON.setPROGOP1; inline;
  44773. begin
  44774. pTDefRegMap(@Self)^.&set := $00000002;
  44775. end;
  44776. procedure TNVM_NVMCON.clearPROGOP1; inline;
  44777. begin
  44778. pTDefRegMap(@Self)^.clr := $00000002;
  44779. end;
  44780. procedure TNVM_NVMCON.setPROGOP1(thebits : TBits_1); inline;
  44781. begin
  44782. if thebits = 0 then
  44783. pTDefRegMap(@Self)^.clr := $00000002
  44784. else
  44785. pTDefRegMap(@Self)^.&set := $00000002;
  44786. end;
  44787. function TNVM_NVMCON.getPROGOP1 : TBits_1; inline;
  44788. begin
  44789. getPROGOP1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  44790. end;
  44791. procedure TNVM_NVMCON.setPROGOP2; inline;
  44792. begin
  44793. pTDefRegMap(@Self)^.&set := $00000004;
  44794. end;
  44795. procedure TNVM_NVMCON.clearPROGOP2; inline;
  44796. begin
  44797. pTDefRegMap(@Self)^.clr := $00000004;
  44798. end;
  44799. procedure TNVM_NVMCON.setPROGOP2(thebits : TBits_1); inline;
  44800. begin
  44801. if thebits = 0 then
  44802. pTDefRegMap(@Self)^.clr := $00000004
  44803. else
  44804. pTDefRegMap(@Self)^.&set := $00000004;
  44805. end;
  44806. function TNVM_NVMCON.getPROGOP2 : TBits_1; inline;
  44807. begin
  44808. getPROGOP2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  44809. end;
  44810. procedure TNVM_NVMCON.setPROGOP3; inline;
  44811. begin
  44812. pTDefRegMap(@Self)^.&set := $00000008;
  44813. end;
  44814. procedure TNVM_NVMCON.clearPROGOP3; inline;
  44815. begin
  44816. pTDefRegMap(@Self)^.clr := $00000008;
  44817. end;
  44818. procedure TNVM_NVMCON.setPROGOP3(thebits : TBits_1); inline;
  44819. begin
  44820. if thebits = 0 then
  44821. pTDefRegMap(@Self)^.clr := $00000008
  44822. else
  44823. pTDefRegMap(@Self)^.&set := $00000008;
  44824. end;
  44825. function TNVM_NVMCON.getPROGOP3 : TBits_1; inline;
  44826. begin
  44827. getPROGOP3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  44828. end;
  44829. procedure TNVM_NVMCON.setw(thebits : TBits_32); inline;
  44830. begin
  44831. pTDefRegMap(@Self)^.val := thebits;
  44832. end;
  44833. function TNVM_NVMCON.getw : TBits_32; inline;
  44834. begin
  44835. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  44836. end;
  44837. procedure TRCON_RCON.setPOR; inline;
  44838. begin
  44839. pTDefRegMap(@Self)^.&set := $00000001;
  44840. end;
  44841. procedure TRCON_RCON.clearPOR; inline;
  44842. begin
  44843. pTDefRegMap(@Self)^.clr := $00000001;
  44844. end;
  44845. procedure TRCON_RCON.setPOR(thebits : TBits_1); inline;
  44846. begin
  44847. if thebits = 0 then
  44848. pTDefRegMap(@Self)^.clr := $00000001
  44849. else
  44850. pTDefRegMap(@Self)^.&set := $00000001;
  44851. end;
  44852. function TRCON_RCON.getPOR : TBits_1; inline;
  44853. begin
  44854. getPOR := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  44855. end;
  44856. procedure TRCON_RCON.setBOR; inline;
  44857. begin
  44858. pTDefRegMap(@Self)^.&set := $00000002;
  44859. end;
  44860. procedure TRCON_RCON.clearBOR; inline;
  44861. begin
  44862. pTDefRegMap(@Self)^.clr := $00000002;
  44863. end;
  44864. procedure TRCON_RCON.setBOR(thebits : TBits_1); inline;
  44865. begin
  44866. if thebits = 0 then
  44867. pTDefRegMap(@Self)^.clr := $00000002
  44868. else
  44869. pTDefRegMap(@Self)^.&set := $00000002;
  44870. end;
  44871. function TRCON_RCON.getBOR : TBits_1; inline;
  44872. begin
  44873. getBOR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  44874. end;
  44875. procedure TRCON_RCON.setIDLE; inline;
  44876. begin
  44877. pTDefRegMap(@Self)^.&set := $00000004;
  44878. end;
  44879. procedure TRCON_RCON.clearIDLE; inline;
  44880. begin
  44881. pTDefRegMap(@Self)^.clr := $00000004;
  44882. end;
  44883. procedure TRCON_RCON.setIDLE(thebits : TBits_1); inline;
  44884. begin
  44885. if thebits = 0 then
  44886. pTDefRegMap(@Self)^.clr := $00000004
  44887. else
  44888. pTDefRegMap(@Self)^.&set := $00000004;
  44889. end;
  44890. function TRCON_RCON.getIDLE : TBits_1; inline;
  44891. begin
  44892. getIDLE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  44893. end;
  44894. procedure TRCON_RCON.setSLEEP; inline;
  44895. begin
  44896. pTDefRegMap(@Self)^.&set := $00000008;
  44897. end;
  44898. procedure TRCON_RCON.clearSLEEP; inline;
  44899. begin
  44900. pTDefRegMap(@Self)^.clr := $00000008;
  44901. end;
  44902. procedure TRCON_RCON.setSLEEP(thebits : TBits_1); inline;
  44903. begin
  44904. if thebits = 0 then
  44905. pTDefRegMap(@Self)^.clr := $00000008
  44906. else
  44907. pTDefRegMap(@Self)^.&set := $00000008;
  44908. end;
  44909. function TRCON_RCON.getSLEEP : TBits_1; inline;
  44910. begin
  44911. getSLEEP := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  44912. end;
  44913. procedure TRCON_RCON.setWDTO; inline;
  44914. begin
  44915. pTDefRegMap(@Self)^.&set := $00000010;
  44916. end;
  44917. procedure TRCON_RCON.clearWDTO; inline;
  44918. begin
  44919. pTDefRegMap(@Self)^.clr := $00000010;
  44920. end;
  44921. procedure TRCON_RCON.setWDTO(thebits : TBits_1); inline;
  44922. begin
  44923. if thebits = 0 then
  44924. pTDefRegMap(@Self)^.clr := $00000010
  44925. else
  44926. pTDefRegMap(@Self)^.&set := $00000010;
  44927. end;
  44928. function TRCON_RCON.getWDTO : TBits_1; inline;
  44929. begin
  44930. getWDTO := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  44931. end;
  44932. procedure TRCON_RCON.setSWR; inline;
  44933. begin
  44934. pTDefRegMap(@Self)^.&set := $00000040;
  44935. end;
  44936. procedure TRCON_RCON.clearSWR; inline;
  44937. begin
  44938. pTDefRegMap(@Self)^.clr := $00000040;
  44939. end;
  44940. procedure TRCON_RCON.setSWR(thebits : TBits_1); inline;
  44941. begin
  44942. if thebits = 0 then
  44943. pTDefRegMap(@Self)^.clr := $00000040
  44944. else
  44945. pTDefRegMap(@Self)^.&set := $00000040;
  44946. end;
  44947. function TRCON_RCON.getSWR : TBits_1; inline;
  44948. begin
  44949. getSWR := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  44950. end;
  44951. procedure TRCON_RCON.setEXTR; inline;
  44952. begin
  44953. pTDefRegMap(@Self)^.&set := $00000080;
  44954. end;
  44955. procedure TRCON_RCON.clearEXTR; inline;
  44956. begin
  44957. pTDefRegMap(@Self)^.clr := $00000080;
  44958. end;
  44959. procedure TRCON_RCON.setEXTR(thebits : TBits_1); inline;
  44960. begin
  44961. if thebits = 0 then
  44962. pTDefRegMap(@Self)^.clr := $00000080
  44963. else
  44964. pTDefRegMap(@Self)^.&set := $00000080;
  44965. end;
  44966. function TRCON_RCON.getEXTR : TBits_1; inline;
  44967. begin
  44968. getEXTR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  44969. end;
  44970. procedure TRCON_RCON.setVREGS; inline;
  44971. begin
  44972. pTDefRegMap(@Self)^.&set := $00000100;
  44973. end;
  44974. procedure TRCON_RCON.clearVREGS; inline;
  44975. begin
  44976. pTDefRegMap(@Self)^.clr := $00000100;
  44977. end;
  44978. procedure TRCON_RCON.setVREGS(thebits : TBits_1); inline;
  44979. begin
  44980. if thebits = 0 then
  44981. pTDefRegMap(@Self)^.clr := $00000100
  44982. else
  44983. pTDefRegMap(@Self)^.&set := $00000100;
  44984. end;
  44985. function TRCON_RCON.getVREGS : TBits_1; inline;
  44986. begin
  44987. getVREGS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  44988. end;
  44989. procedure TRCON_RCON.setCMR; inline;
  44990. begin
  44991. pTDefRegMap(@Self)^.&set := $00000200;
  44992. end;
  44993. procedure TRCON_RCON.clearCMR; inline;
  44994. begin
  44995. pTDefRegMap(@Self)^.clr := $00000200;
  44996. end;
  44997. procedure TRCON_RCON.setCMR(thebits : TBits_1); inline;
  44998. begin
  44999. if thebits = 0 then
  45000. pTDefRegMap(@Self)^.clr := $00000200
  45001. else
  45002. pTDefRegMap(@Self)^.&set := $00000200;
  45003. end;
  45004. function TRCON_RCON.getCMR : TBits_1; inline;
  45005. begin
  45006. getCMR := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  45007. end;
  45008. procedure TRCON_RCON.setw(thebits : TBits_32); inline;
  45009. begin
  45010. pTDefRegMap(@Self)^.val := thebits;
  45011. end;
  45012. function TRCON_RCON.getw : TBits_32; inline;
  45013. begin
  45014. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  45015. end;
  45016. procedure TRCON_RSWRST.setSWRST; inline;
  45017. begin
  45018. pTDefRegMap(@Self)^.&set := $00000001;
  45019. end;
  45020. procedure TRCON_RSWRST.clearSWRST; inline;
  45021. begin
  45022. pTDefRegMap(@Self)^.clr := $00000001;
  45023. end;
  45024. procedure TRCON_RSWRST.setSWRST(thebits : TBits_1); inline;
  45025. begin
  45026. if thebits = 0 then
  45027. pTDefRegMap(@Self)^.clr := $00000001
  45028. else
  45029. pTDefRegMap(@Self)^.&set := $00000001;
  45030. end;
  45031. function TRCON_RSWRST.getSWRST : TBits_1; inline;
  45032. begin
  45033. getSWRST := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  45034. end;
  45035. procedure TRCON_RSWRST.setw(thebits : TBits_32); inline;
  45036. begin
  45037. pTDefRegMap(@Self)^.val := thebits;
  45038. end;
  45039. function TRCON_RSWRST.getw : TBits_32; inline;
  45040. begin
  45041. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  45042. end;
  45043. procedure TINT_INTCON.setINT0EP; inline;
  45044. begin
  45045. pTDefRegMap(@Self)^.&set := $00000001;
  45046. end;
  45047. procedure TINT_INTCON.clearINT0EP; inline;
  45048. begin
  45049. pTDefRegMap(@Self)^.clr := $00000001;
  45050. end;
  45051. procedure TINT_INTCON.setINT0EP(thebits : TBits_1); inline;
  45052. begin
  45053. if thebits = 0 then
  45054. pTDefRegMap(@Self)^.clr := $00000001
  45055. else
  45056. pTDefRegMap(@Self)^.&set := $00000001;
  45057. end;
  45058. function TINT_INTCON.getINT0EP : TBits_1; inline;
  45059. begin
  45060. getINT0EP := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  45061. end;
  45062. procedure TINT_INTCON.setINT1EP; inline;
  45063. begin
  45064. pTDefRegMap(@Self)^.&set := $00000002;
  45065. end;
  45066. procedure TINT_INTCON.clearINT1EP; inline;
  45067. begin
  45068. pTDefRegMap(@Self)^.clr := $00000002;
  45069. end;
  45070. procedure TINT_INTCON.setINT1EP(thebits : TBits_1); inline;
  45071. begin
  45072. if thebits = 0 then
  45073. pTDefRegMap(@Self)^.clr := $00000002
  45074. else
  45075. pTDefRegMap(@Self)^.&set := $00000002;
  45076. end;
  45077. function TINT_INTCON.getINT1EP : TBits_1; inline;
  45078. begin
  45079. getINT1EP := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  45080. end;
  45081. procedure TINT_INTCON.setINT2EP; inline;
  45082. begin
  45083. pTDefRegMap(@Self)^.&set := $00000004;
  45084. end;
  45085. procedure TINT_INTCON.clearINT2EP; inline;
  45086. begin
  45087. pTDefRegMap(@Self)^.clr := $00000004;
  45088. end;
  45089. procedure TINT_INTCON.setINT2EP(thebits : TBits_1); inline;
  45090. begin
  45091. if thebits = 0 then
  45092. pTDefRegMap(@Self)^.clr := $00000004
  45093. else
  45094. pTDefRegMap(@Self)^.&set := $00000004;
  45095. end;
  45096. function TINT_INTCON.getINT2EP : TBits_1; inline;
  45097. begin
  45098. getINT2EP := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  45099. end;
  45100. procedure TINT_INTCON.setINT3EP; inline;
  45101. begin
  45102. pTDefRegMap(@Self)^.&set := $00000008;
  45103. end;
  45104. procedure TINT_INTCON.clearINT3EP; inline;
  45105. begin
  45106. pTDefRegMap(@Self)^.clr := $00000008;
  45107. end;
  45108. procedure TINT_INTCON.setINT3EP(thebits : TBits_1); inline;
  45109. begin
  45110. if thebits = 0 then
  45111. pTDefRegMap(@Self)^.clr := $00000008
  45112. else
  45113. pTDefRegMap(@Self)^.&set := $00000008;
  45114. end;
  45115. function TINT_INTCON.getINT3EP : TBits_1; inline;
  45116. begin
  45117. getINT3EP := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  45118. end;
  45119. procedure TINT_INTCON.setINT4EP; inline;
  45120. begin
  45121. pTDefRegMap(@Self)^.&set := $00000010;
  45122. end;
  45123. procedure TINT_INTCON.clearINT4EP; inline;
  45124. begin
  45125. pTDefRegMap(@Self)^.clr := $00000010;
  45126. end;
  45127. procedure TINT_INTCON.setINT4EP(thebits : TBits_1); inline;
  45128. begin
  45129. if thebits = 0 then
  45130. pTDefRegMap(@Self)^.clr := $00000010
  45131. else
  45132. pTDefRegMap(@Self)^.&set := $00000010;
  45133. end;
  45134. function TINT_INTCON.getINT4EP : TBits_1; inline;
  45135. begin
  45136. getINT4EP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  45137. end;
  45138. procedure TINT_INTCON.setTPC(thebits : TBits_3); inline;
  45139. begin
  45140. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF8FF or ( thebits shl 8 );
  45141. end;
  45142. function TINT_INTCON.getTPC : TBits_3; inline;
  45143. begin
  45144. getTPC := (pTDefRegMap(@Self)^.val and $00000700) shr 8;
  45145. end;
  45146. procedure TINT_INTCON.setMVEC; inline;
  45147. begin
  45148. pTDefRegMap(@Self)^.&set := $00001000;
  45149. end;
  45150. procedure TINT_INTCON.clearMVEC; inline;
  45151. begin
  45152. pTDefRegMap(@Self)^.clr := $00001000;
  45153. end;
  45154. procedure TINT_INTCON.setMVEC(thebits : TBits_1); inline;
  45155. begin
  45156. if thebits = 0 then
  45157. pTDefRegMap(@Self)^.clr := $00001000
  45158. else
  45159. pTDefRegMap(@Self)^.&set := $00001000;
  45160. end;
  45161. function TINT_INTCON.getMVEC : TBits_1; inline;
  45162. begin
  45163. getMVEC := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  45164. end;
  45165. procedure TINT_INTCON.setFRZ; inline;
  45166. begin
  45167. pTDefRegMap(@Self)^.&set := $00004000;
  45168. end;
  45169. procedure TINT_INTCON.clearFRZ; inline;
  45170. begin
  45171. pTDefRegMap(@Self)^.clr := $00004000;
  45172. end;
  45173. procedure TINT_INTCON.setFRZ(thebits : TBits_1); inline;
  45174. begin
  45175. if thebits = 0 then
  45176. pTDefRegMap(@Self)^.clr := $00004000
  45177. else
  45178. pTDefRegMap(@Self)^.&set := $00004000;
  45179. end;
  45180. function TINT_INTCON.getFRZ : TBits_1; inline;
  45181. begin
  45182. getFRZ := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  45183. end;
  45184. procedure TINT_INTCON.setSS0; inline;
  45185. begin
  45186. pTDefRegMap(@Self)^.&set := $00010000;
  45187. end;
  45188. procedure TINT_INTCON.clearSS0; inline;
  45189. begin
  45190. pTDefRegMap(@Self)^.clr := $00010000;
  45191. end;
  45192. procedure TINT_INTCON.setSS0(thebits : TBits_1); inline;
  45193. begin
  45194. if thebits = 0 then
  45195. pTDefRegMap(@Self)^.clr := $00010000
  45196. else
  45197. pTDefRegMap(@Self)^.&set := $00010000;
  45198. end;
  45199. function TINT_INTCON.getSS0 : TBits_1; inline;
  45200. begin
  45201. getSS0 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  45202. end;
  45203. procedure TINT_INTCON.setw(thebits : TBits_32); inline;
  45204. begin
  45205. pTDefRegMap(@Self)^.val := thebits;
  45206. end;
  45207. function TINT_INTCON.getw : TBits_32; inline;
  45208. begin
  45209. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  45210. end;
  45211. procedure TINT_IFS0.setCTIF; inline;
  45212. begin
  45213. pTDefRegMap(@Self)^.&set := $00000001;
  45214. end;
  45215. procedure TINT_IFS0.clearCTIF; inline;
  45216. begin
  45217. pTDefRegMap(@Self)^.clr := $00000001;
  45218. end;
  45219. procedure TINT_IFS0.setCTIF(thebits : TBits_1); inline;
  45220. begin
  45221. if thebits = 0 then
  45222. pTDefRegMap(@Self)^.clr := $00000001
  45223. else
  45224. pTDefRegMap(@Self)^.&set := $00000001;
  45225. end;
  45226. function TINT_IFS0.getCTIF : TBits_1; inline;
  45227. begin
  45228. getCTIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  45229. end;
  45230. procedure TINT_IFS0.setCS0IF; inline;
  45231. begin
  45232. pTDefRegMap(@Self)^.&set := $00000002;
  45233. end;
  45234. procedure TINT_IFS0.clearCS0IF; inline;
  45235. begin
  45236. pTDefRegMap(@Self)^.clr := $00000002;
  45237. end;
  45238. procedure TINT_IFS0.setCS0IF(thebits : TBits_1); inline;
  45239. begin
  45240. if thebits = 0 then
  45241. pTDefRegMap(@Self)^.clr := $00000002
  45242. else
  45243. pTDefRegMap(@Self)^.&set := $00000002;
  45244. end;
  45245. function TINT_IFS0.getCS0IF : TBits_1; inline;
  45246. begin
  45247. getCS0IF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  45248. end;
  45249. procedure TINT_IFS0.setCS1IF; inline;
  45250. begin
  45251. pTDefRegMap(@Self)^.&set := $00000004;
  45252. end;
  45253. procedure TINT_IFS0.clearCS1IF; inline;
  45254. begin
  45255. pTDefRegMap(@Self)^.clr := $00000004;
  45256. end;
  45257. procedure TINT_IFS0.setCS1IF(thebits : TBits_1); inline;
  45258. begin
  45259. if thebits = 0 then
  45260. pTDefRegMap(@Self)^.clr := $00000004
  45261. else
  45262. pTDefRegMap(@Self)^.&set := $00000004;
  45263. end;
  45264. function TINT_IFS0.getCS1IF : TBits_1; inline;
  45265. begin
  45266. getCS1IF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  45267. end;
  45268. procedure TINT_IFS0.setINT0IF; inline;
  45269. begin
  45270. pTDefRegMap(@Self)^.&set := $00000008;
  45271. end;
  45272. procedure TINT_IFS0.clearINT0IF; inline;
  45273. begin
  45274. pTDefRegMap(@Self)^.clr := $00000008;
  45275. end;
  45276. procedure TINT_IFS0.setINT0IF(thebits : TBits_1); inline;
  45277. begin
  45278. if thebits = 0 then
  45279. pTDefRegMap(@Self)^.clr := $00000008
  45280. else
  45281. pTDefRegMap(@Self)^.&set := $00000008;
  45282. end;
  45283. function TINT_IFS0.getINT0IF : TBits_1; inline;
  45284. begin
  45285. getINT0IF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  45286. end;
  45287. procedure TINT_IFS0.setT1IF; inline;
  45288. begin
  45289. pTDefRegMap(@Self)^.&set := $00000010;
  45290. end;
  45291. procedure TINT_IFS0.clearT1IF; inline;
  45292. begin
  45293. pTDefRegMap(@Self)^.clr := $00000010;
  45294. end;
  45295. procedure TINT_IFS0.setT1IF(thebits : TBits_1); inline;
  45296. begin
  45297. if thebits = 0 then
  45298. pTDefRegMap(@Self)^.clr := $00000010
  45299. else
  45300. pTDefRegMap(@Self)^.&set := $00000010;
  45301. end;
  45302. function TINT_IFS0.getT1IF : TBits_1; inline;
  45303. begin
  45304. getT1IF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  45305. end;
  45306. procedure TINT_IFS0.setIC1IF; inline;
  45307. begin
  45308. pTDefRegMap(@Self)^.&set := $00000020;
  45309. end;
  45310. procedure TINT_IFS0.clearIC1IF; inline;
  45311. begin
  45312. pTDefRegMap(@Self)^.clr := $00000020;
  45313. end;
  45314. procedure TINT_IFS0.setIC1IF(thebits : TBits_1); inline;
  45315. begin
  45316. if thebits = 0 then
  45317. pTDefRegMap(@Self)^.clr := $00000020
  45318. else
  45319. pTDefRegMap(@Self)^.&set := $00000020;
  45320. end;
  45321. function TINT_IFS0.getIC1IF : TBits_1; inline;
  45322. begin
  45323. getIC1IF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  45324. end;
  45325. procedure TINT_IFS0.setOC1IF; inline;
  45326. begin
  45327. pTDefRegMap(@Self)^.&set := $00000040;
  45328. end;
  45329. procedure TINT_IFS0.clearOC1IF; inline;
  45330. begin
  45331. pTDefRegMap(@Self)^.clr := $00000040;
  45332. end;
  45333. procedure TINT_IFS0.setOC1IF(thebits : TBits_1); inline;
  45334. begin
  45335. if thebits = 0 then
  45336. pTDefRegMap(@Self)^.clr := $00000040
  45337. else
  45338. pTDefRegMap(@Self)^.&set := $00000040;
  45339. end;
  45340. function TINT_IFS0.getOC1IF : TBits_1; inline;
  45341. begin
  45342. getOC1IF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  45343. end;
  45344. procedure TINT_IFS0.setINT1IF; inline;
  45345. begin
  45346. pTDefRegMap(@Self)^.&set := $00000080;
  45347. end;
  45348. procedure TINT_IFS0.clearINT1IF; inline;
  45349. begin
  45350. pTDefRegMap(@Self)^.clr := $00000080;
  45351. end;
  45352. procedure TINT_IFS0.setINT1IF(thebits : TBits_1); inline;
  45353. begin
  45354. if thebits = 0 then
  45355. pTDefRegMap(@Self)^.clr := $00000080
  45356. else
  45357. pTDefRegMap(@Self)^.&set := $00000080;
  45358. end;
  45359. function TINT_IFS0.getINT1IF : TBits_1; inline;
  45360. begin
  45361. getINT1IF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  45362. end;
  45363. procedure TINT_IFS0.setT2IF; inline;
  45364. begin
  45365. pTDefRegMap(@Self)^.&set := $00000100;
  45366. end;
  45367. procedure TINT_IFS0.clearT2IF; inline;
  45368. begin
  45369. pTDefRegMap(@Self)^.clr := $00000100;
  45370. end;
  45371. procedure TINT_IFS0.setT2IF(thebits : TBits_1); inline;
  45372. begin
  45373. if thebits = 0 then
  45374. pTDefRegMap(@Self)^.clr := $00000100
  45375. else
  45376. pTDefRegMap(@Self)^.&set := $00000100;
  45377. end;
  45378. function TINT_IFS0.getT2IF : TBits_1; inline;
  45379. begin
  45380. getT2IF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  45381. end;
  45382. procedure TINT_IFS0.setIC2IF; inline;
  45383. begin
  45384. pTDefRegMap(@Self)^.&set := $00000200;
  45385. end;
  45386. procedure TINT_IFS0.clearIC2IF; inline;
  45387. begin
  45388. pTDefRegMap(@Self)^.clr := $00000200;
  45389. end;
  45390. procedure TINT_IFS0.setIC2IF(thebits : TBits_1); inline;
  45391. begin
  45392. if thebits = 0 then
  45393. pTDefRegMap(@Self)^.clr := $00000200
  45394. else
  45395. pTDefRegMap(@Self)^.&set := $00000200;
  45396. end;
  45397. function TINT_IFS0.getIC2IF : TBits_1; inline;
  45398. begin
  45399. getIC2IF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  45400. end;
  45401. procedure TINT_IFS0.setOC2IF; inline;
  45402. begin
  45403. pTDefRegMap(@Self)^.&set := $00000400;
  45404. end;
  45405. procedure TINT_IFS0.clearOC2IF; inline;
  45406. begin
  45407. pTDefRegMap(@Self)^.clr := $00000400;
  45408. end;
  45409. procedure TINT_IFS0.setOC2IF(thebits : TBits_1); inline;
  45410. begin
  45411. if thebits = 0 then
  45412. pTDefRegMap(@Self)^.clr := $00000400
  45413. else
  45414. pTDefRegMap(@Self)^.&set := $00000400;
  45415. end;
  45416. function TINT_IFS0.getOC2IF : TBits_1; inline;
  45417. begin
  45418. getOC2IF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  45419. end;
  45420. procedure TINT_IFS0.setINT2IF; inline;
  45421. begin
  45422. pTDefRegMap(@Self)^.&set := $00000800;
  45423. end;
  45424. procedure TINT_IFS0.clearINT2IF; inline;
  45425. begin
  45426. pTDefRegMap(@Self)^.clr := $00000800;
  45427. end;
  45428. procedure TINT_IFS0.setINT2IF(thebits : TBits_1); inline;
  45429. begin
  45430. if thebits = 0 then
  45431. pTDefRegMap(@Self)^.clr := $00000800
  45432. else
  45433. pTDefRegMap(@Self)^.&set := $00000800;
  45434. end;
  45435. function TINT_IFS0.getINT2IF : TBits_1; inline;
  45436. begin
  45437. getINT2IF := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  45438. end;
  45439. procedure TINT_IFS0.setT3IF; inline;
  45440. begin
  45441. pTDefRegMap(@Self)^.&set := $00001000;
  45442. end;
  45443. procedure TINT_IFS0.clearT3IF; inline;
  45444. begin
  45445. pTDefRegMap(@Self)^.clr := $00001000;
  45446. end;
  45447. procedure TINT_IFS0.setT3IF(thebits : TBits_1); inline;
  45448. begin
  45449. if thebits = 0 then
  45450. pTDefRegMap(@Self)^.clr := $00001000
  45451. else
  45452. pTDefRegMap(@Self)^.&set := $00001000;
  45453. end;
  45454. function TINT_IFS0.getT3IF : TBits_1; inline;
  45455. begin
  45456. getT3IF := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  45457. end;
  45458. procedure TINT_IFS0.setIC3IF; inline;
  45459. begin
  45460. pTDefRegMap(@Self)^.&set := $00002000;
  45461. end;
  45462. procedure TINT_IFS0.clearIC3IF; inline;
  45463. begin
  45464. pTDefRegMap(@Self)^.clr := $00002000;
  45465. end;
  45466. procedure TINT_IFS0.setIC3IF(thebits : TBits_1); inline;
  45467. begin
  45468. if thebits = 0 then
  45469. pTDefRegMap(@Self)^.clr := $00002000
  45470. else
  45471. pTDefRegMap(@Self)^.&set := $00002000;
  45472. end;
  45473. function TINT_IFS0.getIC3IF : TBits_1; inline;
  45474. begin
  45475. getIC3IF := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  45476. end;
  45477. procedure TINT_IFS0.setOC3IF; inline;
  45478. begin
  45479. pTDefRegMap(@Self)^.&set := $00004000;
  45480. end;
  45481. procedure TINT_IFS0.clearOC3IF; inline;
  45482. begin
  45483. pTDefRegMap(@Self)^.clr := $00004000;
  45484. end;
  45485. procedure TINT_IFS0.setOC3IF(thebits : TBits_1); inline;
  45486. begin
  45487. if thebits = 0 then
  45488. pTDefRegMap(@Self)^.clr := $00004000
  45489. else
  45490. pTDefRegMap(@Self)^.&set := $00004000;
  45491. end;
  45492. function TINT_IFS0.getOC3IF : TBits_1; inline;
  45493. begin
  45494. getOC3IF := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  45495. end;
  45496. procedure TINT_IFS0.setINT3IF; inline;
  45497. begin
  45498. pTDefRegMap(@Self)^.&set := $00008000;
  45499. end;
  45500. procedure TINT_IFS0.clearINT3IF; inline;
  45501. begin
  45502. pTDefRegMap(@Self)^.clr := $00008000;
  45503. end;
  45504. procedure TINT_IFS0.setINT3IF(thebits : TBits_1); inline;
  45505. begin
  45506. if thebits = 0 then
  45507. pTDefRegMap(@Self)^.clr := $00008000
  45508. else
  45509. pTDefRegMap(@Self)^.&set := $00008000;
  45510. end;
  45511. function TINT_IFS0.getINT3IF : TBits_1; inline;
  45512. begin
  45513. getINT3IF := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  45514. end;
  45515. procedure TINT_IFS0.setT4IF; inline;
  45516. begin
  45517. pTDefRegMap(@Self)^.&set := $00010000;
  45518. end;
  45519. procedure TINT_IFS0.clearT4IF; inline;
  45520. begin
  45521. pTDefRegMap(@Self)^.clr := $00010000;
  45522. end;
  45523. procedure TINT_IFS0.setT4IF(thebits : TBits_1); inline;
  45524. begin
  45525. if thebits = 0 then
  45526. pTDefRegMap(@Self)^.clr := $00010000
  45527. else
  45528. pTDefRegMap(@Self)^.&set := $00010000;
  45529. end;
  45530. function TINT_IFS0.getT4IF : TBits_1; inline;
  45531. begin
  45532. getT4IF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  45533. end;
  45534. procedure TINT_IFS0.setIC4IF; inline;
  45535. begin
  45536. pTDefRegMap(@Self)^.&set := $00020000;
  45537. end;
  45538. procedure TINT_IFS0.clearIC4IF; inline;
  45539. begin
  45540. pTDefRegMap(@Self)^.clr := $00020000;
  45541. end;
  45542. procedure TINT_IFS0.setIC4IF(thebits : TBits_1); inline;
  45543. begin
  45544. if thebits = 0 then
  45545. pTDefRegMap(@Self)^.clr := $00020000
  45546. else
  45547. pTDefRegMap(@Self)^.&set := $00020000;
  45548. end;
  45549. function TINT_IFS0.getIC4IF : TBits_1; inline;
  45550. begin
  45551. getIC4IF := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  45552. end;
  45553. procedure TINT_IFS0.setOC4IF; inline;
  45554. begin
  45555. pTDefRegMap(@Self)^.&set := $00040000;
  45556. end;
  45557. procedure TINT_IFS0.clearOC4IF; inline;
  45558. begin
  45559. pTDefRegMap(@Self)^.clr := $00040000;
  45560. end;
  45561. procedure TINT_IFS0.setOC4IF(thebits : TBits_1); inline;
  45562. begin
  45563. if thebits = 0 then
  45564. pTDefRegMap(@Self)^.clr := $00040000
  45565. else
  45566. pTDefRegMap(@Self)^.&set := $00040000;
  45567. end;
  45568. function TINT_IFS0.getOC4IF : TBits_1; inline;
  45569. begin
  45570. getOC4IF := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  45571. end;
  45572. procedure TINT_IFS0.setINT4IF; inline;
  45573. begin
  45574. pTDefRegMap(@Self)^.&set := $00080000;
  45575. end;
  45576. procedure TINT_IFS0.clearINT4IF; inline;
  45577. begin
  45578. pTDefRegMap(@Self)^.clr := $00080000;
  45579. end;
  45580. procedure TINT_IFS0.setINT4IF(thebits : TBits_1); inline;
  45581. begin
  45582. if thebits = 0 then
  45583. pTDefRegMap(@Self)^.clr := $00080000
  45584. else
  45585. pTDefRegMap(@Self)^.&set := $00080000;
  45586. end;
  45587. function TINT_IFS0.getINT4IF : TBits_1; inline;
  45588. begin
  45589. getINT4IF := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  45590. end;
  45591. procedure TINT_IFS0.setT5IF; inline;
  45592. begin
  45593. pTDefRegMap(@Self)^.&set := $00100000;
  45594. end;
  45595. procedure TINT_IFS0.clearT5IF; inline;
  45596. begin
  45597. pTDefRegMap(@Self)^.clr := $00100000;
  45598. end;
  45599. procedure TINT_IFS0.setT5IF(thebits : TBits_1); inline;
  45600. begin
  45601. if thebits = 0 then
  45602. pTDefRegMap(@Self)^.clr := $00100000
  45603. else
  45604. pTDefRegMap(@Self)^.&set := $00100000;
  45605. end;
  45606. function TINT_IFS0.getT5IF : TBits_1; inline;
  45607. begin
  45608. getT5IF := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  45609. end;
  45610. procedure TINT_IFS0.setIC5IF; inline;
  45611. begin
  45612. pTDefRegMap(@Self)^.&set := $00200000;
  45613. end;
  45614. procedure TINT_IFS0.clearIC5IF; inline;
  45615. begin
  45616. pTDefRegMap(@Self)^.clr := $00200000;
  45617. end;
  45618. procedure TINT_IFS0.setIC5IF(thebits : TBits_1); inline;
  45619. begin
  45620. if thebits = 0 then
  45621. pTDefRegMap(@Self)^.clr := $00200000
  45622. else
  45623. pTDefRegMap(@Self)^.&set := $00200000;
  45624. end;
  45625. function TINT_IFS0.getIC5IF : TBits_1; inline;
  45626. begin
  45627. getIC5IF := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  45628. end;
  45629. procedure TINT_IFS0.setOC5IF; inline;
  45630. begin
  45631. pTDefRegMap(@Self)^.&set := $00400000;
  45632. end;
  45633. procedure TINT_IFS0.clearOC5IF; inline;
  45634. begin
  45635. pTDefRegMap(@Self)^.clr := $00400000;
  45636. end;
  45637. procedure TINT_IFS0.setOC5IF(thebits : TBits_1); inline;
  45638. begin
  45639. if thebits = 0 then
  45640. pTDefRegMap(@Self)^.clr := $00400000
  45641. else
  45642. pTDefRegMap(@Self)^.&set := $00400000;
  45643. end;
  45644. function TINT_IFS0.getOC5IF : TBits_1; inline;
  45645. begin
  45646. getOC5IF := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  45647. end;
  45648. procedure TINT_IFS0.setU1EIF; inline;
  45649. begin
  45650. pTDefRegMap(@Self)^.&set := $04000000;
  45651. end;
  45652. procedure TINT_IFS0.clearU1EIF; inline;
  45653. begin
  45654. pTDefRegMap(@Self)^.clr := $04000000;
  45655. end;
  45656. procedure TINT_IFS0.setU1EIF(thebits : TBits_1); inline;
  45657. begin
  45658. if thebits = 0 then
  45659. pTDefRegMap(@Self)^.clr := $04000000
  45660. else
  45661. pTDefRegMap(@Self)^.&set := $04000000;
  45662. end;
  45663. function TINT_IFS0.getU1EIF : TBits_1; inline;
  45664. begin
  45665. getU1EIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  45666. end;
  45667. procedure TINT_IFS0.setU1RXIF; inline;
  45668. begin
  45669. pTDefRegMap(@Self)^.&set := $08000000;
  45670. end;
  45671. procedure TINT_IFS0.clearU1RXIF; inline;
  45672. begin
  45673. pTDefRegMap(@Self)^.clr := $08000000;
  45674. end;
  45675. procedure TINT_IFS0.setU1RXIF(thebits : TBits_1); inline;
  45676. begin
  45677. if thebits = 0 then
  45678. pTDefRegMap(@Self)^.clr := $08000000
  45679. else
  45680. pTDefRegMap(@Self)^.&set := $08000000;
  45681. end;
  45682. function TINT_IFS0.getU1RXIF : TBits_1; inline;
  45683. begin
  45684. getU1RXIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  45685. end;
  45686. procedure TINT_IFS0.setU1TXIF; inline;
  45687. begin
  45688. pTDefRegMap(@Self)^.&set := $10000000;
  45689. end;
  45690. procedure TINT_IFS0.clearU1TXIF; inline;
  45691. begin
  45692. pTDefRegMap(@Self)^.clr := $10000000;
  45693. end;
  45694. procedure TINT_IFS0.setU1TXIF(thebits : TBits_1); inline;
  45695. begin
  45696. if thebits = 0 then
  45697. pTDefRegMap(@Self)^.clr := $10000000
  45698. else
  45699. pTDefRegMap(@Self)^.&set := $10000000;
  45700. end;
  45701. function TINT_IFS0.getU1TXIF : TBits_1; inline;
  45702. begin
  45703. getU1TXIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  45704. end;
  45705. procedure TINT_IFS0.setI2C1BIF; inline;
  45706. begin
  45707. pTDefRegMap(@Self)^.&set := $20000000;
  45708. end;
  45709. procedure TINT_IFS0.clearI2C1BIF; inline;
  45710. begin
  45711. pTDefRegMap(@Self)^.clr := $20000000;
  45712. end;
  45713. procedure TINT_IFS0.setI2C1BIF(thebits : TBits_1); inline;
  45714. begin
  45715. if thebits = 0 then
  45716. pTDefRegMap(@Self)^.clr := $20000000
  45717. else
  45718. pTDefRegMap(@Self)^.&set := $20000000;
  45719. end;
  45720. function TINT_IFS0.getI2C1BIF : TBits_1; inline;
  45721. begin
  45722. getI2C1BIF := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  45723. end;
  45724. procedure TINT_IFS0.setI2C1SIF; inline;
  45725. begin
  45726. pTDefRegMap(@Self)^.&set := $40000000;
  45727. end;
  45728. procedure TINT_IFS0.clearI2C1SIF; inline;
  45729. begin
  45730. pTDefRegMap(@Self)^.clr := $40000000;
  45731. end;
  45732. procedure TINT_IFS0.setI2C1SIF(thebits : TBits_1); inline;
  45733. begin
  45734. if thebits = 0 then
  45735. pTDefRegMap(@Self)^.clr := $40000000
  45736. else
  45737. pTDefRegMap(@Self)^.&set := $40000000;
  45738. end;
  45739. function TINT_IFS0.getI2C1SIF : TBits_1; inline;
  45740. begin
  45741. getI2C1SIF := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  45742. end;
  45743. procedure TINT_IFS0.setI2C1MIF; inline;
  45744. begin
  45745. pTDefRegMap(@Self)^.&set := $80000000;
  45746. end;
  45747. procedure TINT_IFS0.clearI2C1MIF; inline;
  45748. begin
  45749. pTDefRegMap(@Self)^.clr := $80000000;
  45750. end;
  45751. procedure TINT_IFS0.setI2C1MIF(thebits : TBits_1); inline;
  45752. begin
  45753. if thebits = 0 then
  45754. pTDefRegMap(@Self)^.clr := $80000000
  45755. else
  45756. pTDefRegMap(@Self)^.&set := $80000000;
  45757. end;
  45758. function TINT_IFS0.getI2C1MIF : TBits_1; inline;
  45759. begin
  45760. getI2C1MIF := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  45761. end;
  45762. procedure TINT_IFS0.setU1AEIF; inline;
  45763. begin
  45764. pTDefRegMap(@Self)^.&set := $04000000;
  45765. end;
  45766. procedure TINT_IFS0.clearU1AEIF; inline;
  45767. begin
  45768. pTDefRegMap(@Self)^.clr := $04000000;
  45769. end;
  45770. procedure TINT_IFS0.setU1AEIF(thebits : TBits_1); inline;
  45771. begin
  45772. if thebits = 0 then
  45773. pTDefRegMap(@Self)^.clr := $04000000
  45774. else
  45775. pTDefRegMap(@Self)^.&set := $04000000;
  45776. end;
  45777. function TINT_IFS0.getU1AEIF : TBits_1; inline;
  45778. begin
  45779. getU1AEIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  45780. end;
  45781. procedure TINT_IFS0.setU1ARXIF; inline;
  45782. begin
  45783. pTDefRegMap(@Self)^.&set := $08000000;
  45784. end;
  45785. procedure TINT_IFS0.clearU1ARXIF; inline;
  45786. begin
  45787. pTDefRegMap(@Self)^.clr := $08000000;
  45788. end;
  45789. procedure TINT_IFS0.setU1ARXIF(thebits : TBits_1); inline;
  45790. begin
  45791. if thebits = 0 then
  45792. pTDefRegMap(@Self)^.clr := $08000000
  45793. else
  45794. pTDefRegMap(@Self)^.&set := $08000000;
  45795. end;
  45796. function TINT_IFS0.getU1ARXIF : TBits_1; inline;
  45797. begin
  45798. getU1ARXIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  45799. end;
  45800. procedure TINT_IFS0.setU1ATXIF; inline;
  45801. begin
  45802. pTDefRegMap(@Self)^.&set := $10000000;
  45803. end;
  45804. procedure TINT_IFS0.clearU1ATXIF; inline;
  45805. begin
  45806. pTDefRegMap(@Self)^.clr := $10000000;
  45807. end;
  45808. procedure TINT_IFS0.setU1ATXIF(thebits : TBits_1); inline;
  45809. begin
  45810. if thebits = 0 then
  45811. pTDefRegMap(@Self)^.clr := $10000000
  45812. else
  45813. pTDefRegMap(@Self)^.&set := $10000000;
  45814. end;
  45815. function TINT_IFS0.getU1ATXIF : TBits_1; inline;
  45816. begin
  45817. getU1ATXIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  45818. end;
  45819. procedure TINT_IFS0.setSPI3EIF; inline;
  45820. begin
  45821. pTDefRegMap(@Self)^.&set := $04000000;
  45822. end;
  45823. procedure TINT_IFS0.clearSPI3EIF; inline;
  45824. begin
  45825. pTDefRegMap(@Self)^.clr := $04000000;
  45826. end;
  45827. procedure TINT_IFS0.setSPI3EIF(thebits : TBits_1); inline;
  45828. begin
  45829. if thebits = 0 then
  45830. pTDefRegMap(@Self)^.clr := $04000000
  45831. else
  45832. pTDefRegMap(@Self)^.&set := $04000000;
  45833. end;
  45834. function TINT_IFS0.getSPI3EIF : TBits_1; inline;
  45835. begin
  45836. getSPI3EIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  45837. end;
  45838. procedure TINT_IFS0.setSPI3RXIF; inline;
  45839. begin
  45840. pTDefRegMap(@Self)^.&set := $08000000;
  45841. end;
  45842. procedure TINT_IFS0.clearSPI3RXIF; inline;
  45843. begin
  45844. pTDefRegMap(@Self)^.clr := $08000000;
  45845. end;
  45846. procedure TINT_IFS0.setSPI3RXIF(thebits : TBits_1); inline;
  45847. begin
  45848. if thebits = 0 then
  45849. pTDefRegMap(@Self)^.clr := $08000000
  45850. else
  45851. pTDefRegMap(@Self)^.&set := $08000000;
  45852. end;
  45853. function TINT_IFS0.getSPI3RXIF : TBits_1; inline;
  45854. begin
  45855. getSPI3RXIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  45856. end;
  45857. procedure TINT_IFS0.setSPI3TXIF; inline;
  45858. begin
  45859. pTDefRegMap(@Self)^.&set := $10000000;
  45860. end;
  45861. procedure TINT_IFS0.clearSPI3TXIF; inline;
  45862. begin
  45863. pTDefRegMap(@Self)^.clr := $10000000;
  45864. end;
  45865. procedure TINT_IFS0.setSPI3TXIF(thebits : TBits_1); inline;
  45866. begin
  45867. if thebits = 0 then
  45868. pTDefRegMap(@Self)^.clr := $10000000
  45869. else
  45870. pTDefRegMap(@Self)^.&set := $10000000;
  45871. end;
  45872. function TINT_IFS0.getSPI3TXIF : TBits_1; inline;
  45873. begin
  45874. getSPI3TXIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  45875. end;
  45876. procedure TINT_IFS0.setSPI1AEIF; inline;
  45877. begin
  45878. pTDefRegMap(@Self)^.&set := $04000000;
  45879. end;
  45880. procedure TINT_IFS0.clearSPI1AEIF; inline;
  45881. begin
  45882. pTDefRegMap(@Self)^.clr := $04000000;
  45883. end;
  45884. procedure TINT_IFS0.setSPI1AEIF(thebits : TBits_1); inline;
  45885. begin
  45886. if thebits = 0 then
  45887. pTDefRegMap(@Self)^.clr := $04000000
  45888. else
  45889. pTDefRegMap(@Self)^.&set := $04000000;
  45890. end;
  45891. function TINT_IFS0.getSPI1AEIF : TBits_1; inline;
  45892. begin
  45893. getSPI1AEIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  45894. end;
  45895. procedure TINT_IFS0.setSPI1ARXIF; inline;
  45896. begin
  45897. pTDefRegMap(@Self)^.&set := $08000000;
  45898. end;
  45899. procedure TINT_IFS0.clearSPI1ARXIF; inline;
  45900. begin
  45901. pTDefRegMap(@Self)^.clr := $08000000;
  45902. end;
  45903. procedure TINT_IFS0.setSPI1ARXIF(thebits : TBits_1); inline;
  45904. begin
  45905. if thebits = 0 then
  45906. pTDefRegMap(@Self)^.clr := $08000000
  45907. else
  45908. pTDefRegMap(@Self)^.&set := $08000000;
  45909. end;
  45910. function TINT_IFS0.getSPI1ARXIF : TBits_1; inline;
  45911. begin
  45912. getSPI1ARXIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  45913. end;
  45914. procedure TINT_IFS0.setSPI1ATXIF; inline;
  45915. begin
  45916. pTDefRegMap(@Self)^.&set := $10000000;
  45917. end;
  45918. procedure TINT_IFS0.clearSPI1ATXIF; inline;
  45919. begin
  45920. pTDefRegMap(@Self)^.clr := $10000000;
  45921. end;
  45922. procedure TINT_IFS0.setSPI1ATXIF(thebits : TBits_1); inline;
  45923. begin
  45924. if thebits = 0 then
  45925. pTDefRegMap(@Self)^.clr := $10000000
  45926. else
  45927. pTDefRegMap(@Self)^.&set := $10000000;
  45928. end;
  45929. function TINT_IFS0.getSPI1ATXIF : TBits_1; inline;
  45930. begin
  45931. getSPI1ATXIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  45932. end;
  45933. procedure TINT_IFS0.setI2C3BIF; inline;
  45934. begin
  45935. pTDefRegMap(@Self)^.&set := $04000000;
  45936. end;
  45937. procedure TINT_IFS0.clearI2C3BIF; inline;
  45938. begin
  45939. pTDefRegMap(@Self)^.clr := $04000000;
  45940. end;
  45941. procedure TINT_IFS0.setI2C3BIF(thebits : TBits_1); inline;
  45942. begin
  45943. if thebits = 0 then
  45944. pTDefRegMap(@Self)^.clr := $04000000
  45945. else
  45946. pTDefRegMap(@Self)^.&set := $04000000;
  45947. end;
  45948. function TINT_IFS0.getI2C3BIF : TBits_1; inline;
  45949. begin
  45950. getI2C3BIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  45951. end;
  45952. procedure TINT_IFS0.setI2C3SIF; inline;
  45953. begin
  45954. pTDefRegMap(@Self)^.&set := $08000000;
  45955. end;
  45956. procedure TINT_IFS0.clearI2C3SIF; inline;
  45957. begin
  45958. pTDefRegMap(@Self)^.clr := $08000000;
  45959. end;
  45960. procedure TINT_IFS0.setI2C3SIF(thebits : TBits_1); inline;
  45961. begin
  45962. if thebits = 0 then
  45963. pTDefRegMap(@Self)^.clr := $08000000
  45964. else
  45965. pTDefRegMap(@Self)^.&set := $08000000;
  45966. end;
  45967. function TINT_IFS0.getI2C3SIF : TBits_1; inline;
  45968. begin
  45969. getI2C3SIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  45970. end;
  45971. procedure TINT_IFS0.setI2C3MIF; inline;
  45972. begin
  45973. pTDefRegMap(@Self)^.&set := $10000000;
  45974. end;
  45975. procedure TINT_IFS0.clearI2C3MIF; inline;
  45976. begin
  45977. pTDefRegMap(@Self)^.clr := $10000000;
  45978. end;
  45979. procedure TINT_IFS0.setI2C3MIF(thebits : TBits_1); inline;
  45980. begin
  45981. if thebits = 0 then
  45982. pTDefRegMap(@Self)^.clr := $10000000
  45983. else
  45984. pTDefRegMap(@Self)^.&set := $10000000;
  45985. end;
  45986. function TINT_IFS0.getI2C3MIF : TBits_1; inline;
  45987. begin
  45988. getI2C3MIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  45989. end;
  45990. procedure TINT_IFS0.setI2C1ABIF; inline;
  45991. begin
  45992. pTDefRegMap(@Self)^.&set := $04000000;
  45993. end;
  45994. procedure TINT_IFS0.clearI2C1ABIF; inline;
  45995. begin
  45996. pTDefRegMap(@Self)^.clr := $04000000;
  45997. end;
  45998. procedure TINT_IFS0.setI2C1ABIF(thebits : TBits_1); inline;
  45999. begin
  46000. if thebits = 0 then
  46001. pTDefRegMap(@Self)^.clr := $04000000
  46002. else
  46003. pTDefRegMap(@Self)^.&set := $04000000;
  46004. end;
  46005. function TINT_IFS0.getI2C1ABIF : TBits_1; inline;
  46006. begin
  46007. getI2C1ABIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  46008. end;
  46009. procedure TINT_IFS0.setI2C1ASIF; inline;
  46010. begin
  46011. pTDefRegMap(@Self)^.&set := $08000000;
  46012. end;
  46013. procedure TINT_IFS0.clearI2C1ASIF; inline;
  46014. begin
  46015. pTDefRegMap(@Self)^.clr := $08000000;
  46016. end;
  46017. procedure TINT_IFS0.setI2C1ASIF(thebits : TBits_1); inline;
  46018. begin
  46019. if thebits = 0 then
  46020. pTDefRegMap(@Self)^.clr := $08000000
  46021. else
  46022. pTDefRegMap(@Self)^.&set := $08000000;
  46023. end;
  46024. function TINT_IFS0.getI2C1ASIF : TBits_1; inline;
  46025. begin
  46026. getI2C1ASIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  46027. end;
  46028. procedure TINT_IFS0.setI2C1AMIF; inline;
  46029. begin
  46030. pTDefRegMap(@Self)^.&set := $10000000;
  46031. end;
  46032. procedure TINT_IFS0.clearI2C1AMIF; inline;
  46033. begin
  46034. pTDefRegMap(@Self)^.clr := $10000000;
  46035. end;
  46036. procedure TINT_IFS0.setI2C1AMIF(thebits : TBits_1); inline;
  46037. begin
  46038. if thebits = 0 then
  46039. pTDefRegMap(@Self)^.clr := $10000000
  46040. else
  46041. pTDefRegMap(@Self)^.&set := $10000000;
  46042. end;
  46043. function TINT_IFS0.getI2C1AMIF : TBits_1; inline;
  46044. begin
  46045. getI2C1AMIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  46046. end;
  46047. procedure TINT_IFS0.setw(thebits : TBits_32); inline;
  46048. begin
  46049. pTDefRegMap(@Self)^.val := thebits;
  46050. end;
  46051. function TINT_IFS0.getw : TBits_32; inline;
  46052. begin
  46053. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  46054. end;
  46055. procedure TINT_IFS1.setCNIF; inline;
  46056. begin
  46057. pTDefRegMap(@Self)^.&set := $00000001;
  46058. end;
  46059. procedure TINT_IFS1.clearCNIF; inline;
  46060. begin
  46061. pTDefRegMap(@Self)^.clr := $00000001;
  46062. end;
  46063. procedure TINT_IFS1.setCNIF(thebits : TBits_1); inline;
  46064. begin
  46065. if thebits = 0 then
  46066. pTDefRegMap(@Self)^.clr := $00000001
  46067. else
  46068. pTDefRegMap(@Self)^.&set := $00000001;
  46069. end;
  46070. function TINT_IFS1.getCNIF : TBits_1; inline;
  46071. begin
  46072. getCNIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  46073. end;
  46074. procedure TINT_IFS1.setAD1IF; inline;
  46075. begin
  46076. pTDefRegMap(@Self)^.&set := $00000002;
  46077. end;
  46078. procedure TINT_IFS1.clearAD1IF; inline;
  46079. begin
  46080. pTDefRegMap(@Self)^.clr := $00000002;
  46081. end;
  46082. procedure TINT_IFS1.setAD1IF(thebits : TBits_1); inline;
  46083. begin
  46084. if thebits = 0 then
  46085. pTDefRegMap(@Self)^.clr := $00000002
  46086. else
  46087. pTDefRegMap(@Self)^.&set := $00000002;
  46088. end;
  46089. function TINT_IFS1.getAD1IF : TBits_1; inline;
  46090. begin
  46091. getAD1IF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  46092. end;
  46093. procedure TINT_IFS1.setPMPIF; inline;
  46094. begin
  46095. pTDefRegMap(@Self)^.&set := $00000004;
  46096. end;
  46097. procedure TINT_IFS1.clearPMPIF; inline;
  46098. begin
  46099. pTDefRegMap(@Self)^.clr := $00000004;
  46100. end;
  46101. procedure TINT_IFS1.setPMPIF(thebits : TBits_1); inline;
  46102. begin
  46103. if thebits = 0 then
  46104. pTDefRegMap(@Self)^.clr := $00000004
  46105. else
  46106. pTDefRegMap(@Self)^.&set := $00000004;
  46107. end;
  46108. function TINT_IFS1.getPMPIF : TBits_1; inline;
  46109. begin
  46110. getPMPIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  46111. end;
  46112. procedure TINT_IFS1.setCMP1IF; inline;
  46113. begin
  46114. pTDefRegMap(@Self)^.&set := $00000008;
  46115. end;
  46116. procedure TINT_IFS1.clearCMP1IF; inline;
  46117. begin
  46118. pTDefRegMap(@Self)^.clr := $00000008;
  46119. end;
  46120. procedure TINT_IFS1.setCMP1IF(thebits : TBits_1); inline;
  46121. begin
  46122. if thebits = 0 then
  46123. pTDefRegMap(@Self)^.clr := $00000008
  46124. else
  46125. pTDefRegMap(@Self)^.&set := $00000008;
  46126. end;
  46127. function TINT_IFS1.getCMP1IF : TBits_1; inline;
  46128. begin
  46129. getCMP1IF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  46130. end;
  46131. procedure TINT_IFS1.setCMP2IF; inline;
  46132. begin
  46133. pTDefRegMap(@Self)^.&set := $00000010;
  46134. end;
  46135. procedure TINT_IFS1.clearCMP2IF; inline;
  46136. begin
  46137. pTDefRegMap(@Self)^.clr := $00000010;
  46138. end;
  46139. procedure TINT_IFS1.setCMP2IF(thebits : TBits_1); inline;
  46140. begin
  46141. if thebits = 0 then
  46142. pTDefRegMap(@Self)^.clr := $00000010
  46143. else
  46144. pTDefRegMap(@Self)^.&set := $00000010;
  46145. end;
  46146. function TINT_IFS1.getCMP2IF : TBits_1; inline;
  46147. begin
  46148. getCMP2IF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  46149. end;
  46150. procedure TINT_IFS1.setU3EIF; inline;
  46151. begin
  46152. pTDefRegMap(@Self)^.&set := $00000020;
  46153. end;
  46154. procedure TINT_IFS1.clearU3EIF; inline;
  46155. begin
  46156. pTDefRegMap(@Self)^.clr := $00000020;
  46157. end;
  46158. procedure TINT_IFS1.setU3EIF(thebits : TBits_1); inline;
  46159. begin
  46160. if thebits = 0 then
  46161. pTDefRegMap(@Self)^.clr := $00000020
  46162. else
  46163. pTDefRegMap(@Self)^.&set := $00000020;
  46164. end;
  46165. function TINT_IFS1.getU3EIF : TBits_1; inline;
  46166. begin
  46167. getU3EIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  46168. end;
  46169. procedure TINT_IFS1.setU3RXIF; inline;
  46170. begin
  46171. pTDefRegMap(@Self)^.&set := $00000040;
  46172. end;
  46173. procedure TINT_IFS1.clearU3RXIF; inline;
  46174. begin
  46175. pTDefRegMap(@Self)^.clr := $00000040;
  46176. end;
  46177. procedure TINT_IFS1.setU3RXIF(thebits : TBits_1); inline;
  46178. begin
  46179. if thebits = 0 then
  46180. pTDefRegMap(@Self)^.clr := $00000040
  46181. else
  46182. pTDefRegMap(@Self)^.&set := $00000040;
  46183. end;
  46184. function TINT_IFS1.getU3RXIF : TBits_1; inline;
  46185. begin
  46186. getU3RXIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  46187. end;
  46188. procedure TINT_IFS1.setU3TXIF; inline;
  46189. begin
  46190. pTDefRegMap(@Self)^.&set := $00000080;
  46191. end;
  46192. procedure TINT_IFS1.clearU3TXIF; inline;
  46193. begin
  46194. pTDefRegMap(@Self)^.clr := $00000080;
  46195. end;
  46196. procedure TINT_IFS1.setU3TXIF(thebits : TBits_1); inline;
  46197. begin
  46198. if thebits = 0 then
  46199. pTDefRegMap(@Self)^.clr := $00000080
  46200. else
  46201. pTDefRegMap(@Self)^.&set := $00000080;
  46202. end;
  46203. function TINT_IFS1.getU3TXIF : TBits_1; inline;
  46204. begin
  46205. getU3TXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  46206. end;
  46207. procedure TINT_IFS1.setU2EIF; inline;
  46208. begin
  46209. pTDefRegMap(@Self)^.&set := $00000100;
  46210. end;
  46211. procedure TINT_IFS1.clearU2EIF; inline;
  46212. begin
  46213. pTDefRegMap(@Self)^.clr := $00000100;
  46214. end;
  46215. procedure TINT_IFS1.setU2EIF(thebits : TBits_1); inline;
  46216. begin
  46217. if thebits = 0 then
  46218. pTDefRegMap(@Self)^.clr := $00000100
  46219. else
  46220. pTDefRegMap(@Self)^.&set := $00000100;
  46221. end;
  46222. function TINT_IFS1.getU2EIF : TBits_1; inline;
  46223. begin
  46224. getU2EIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  46225. end;
  46226. procedure TINT_IFS1.setU2RXIF; inline;
  46227. begin
  46228. pTDefRegMap(@Self)^.&set := $00000200;
  46229. end;
  46230. procedure TINT_IFS1.clearU2RXIF; inline;
  46231. begin
  46232. pTDefRegMap(@Self)^.clr := $00000200;
  46233. end;
  46234. procedure TINT_IFS1.setU2RXIF(thebits : TBits_1); inline;
  46235. begin
  46236. if thebits = 0 then
  46237. pTDefRegMap(@Self)^.clr := $00000200
  46238. else
  46239. pTDefRegMap(@Self)^.&set := $00000200;
  46240. end;
  46241. function TINT_IFS1.getU2RXIF : TBits_1; inline;
  46242. begin
  46243. getU2RXIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  46244. end;
  46245. procedure TINT_IFS1.setU2TXIF; inline;
  46246. begin
  46247. pTDefRegMap(@Self)^.&set := $00000400;
  46248. end;
  46249. procedure TINT_IFS1.clearU2TXIF; inline;
  46250. begin
  46251. pTDefRegMap(@Self)^.clr := $00000400;
  46252. end;
  46253. procedure TINT_IFS1.setU2TXIF(thebits : TBits_1); inline;
  46254. begin
  46255. if thebits = 0 then
  46256. pTDefRegMap(@Self)^.clr := $00000400
  46257. else
  46258. pTDefRegMap(@Self)^.&set := $00000400;
  46259. end;
  46260. function TINT_IFS1.getU2TXIF : TBits_1; inline;
  46261. begin
  46262. getU2TXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  46263. end;
  46264. procedure TINT_IFS1.setFSCMIF; inline;
  46265. begin
  46266. pTDefRegMap(@Self)^.&set := $00004000;
  46267. end;
  46268. procedure TINT_IFS1.clearFSCMIF; inline;
  46269. begin
  46270. pTDefRegMap(@Self)^.clr := $00004000;
  46271. end;
  46272. procedure TINT_IFS1.setFSCMIF(thebits : TBits_1); inline;
  46273. begin
  46274. if thebits = 0 then
  46275. pTDefRegMap(@Self)^.clr := $00004000
  46276. else
  46277. pTDefRegMap(@Self)^.&set := $00004000;
  46278. end;
  46279. function TINT_IFS1.getFSCMIF : TBits_1; inline;
  46280. begin
  46281. getFSCMIF := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  46282. end;
  46283. procedure TINT_IFS1.setRTCCIF; inline;
  46284. begin
  46285. pTDefRegMap(@Self)^.&set := $00008000;
  46286. end;
  46287. procedure TINT_IFS1.clearRTCCIF; inline;
  46288. begin
  46289. pTDefRegMap(@Self)^.clr := $00008000;
  46290. end;
  46291. procedure TINT_IFS1.setRTCCIF(thebits : TBits_1); inline;
  46292. begin
  46293. if thebits = 0 then
  46294. pTDefRegMap(@Self)^.clr := $00008000
  46295. else
  46296. pTDefRegMap(@Self)^.&set := $00008000;
  46297. end;
  46298. function TINT_IFS1.getRTCCIF : TBits_1; inline;
  46299. begin
  46300. getRTCCIF := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  46301. end;
  46302. procedure TINT_IFS1.setDMA0IF; inline;
  46303. begin
  46304. pTDefRegMap(@Self)^.&set := $00010000;
  46305. end;
  46306. procedure TINT_IFS1.clearDMA0IF; inline;
  46307. begin
  46308. pTDefRegMap(@Self)^.clr := $00010000;
  46309. end;
  46310. procedure TINT_IFS1.setDMA0IF(thebits : TBits_1); inline;
  46311. begin
  46312. if thebits = 0 then
  46313. pTDefRegMap(@Self)^.clr := $00010000
  46314. else
  46315. pTDefRegMap(@Self)^.&set := $00010000;
  46316. end;
  46317. function TINT_IFS1.getDMA0IF : TBits_1; inline;
  46318. begin
  46319. getDMA0IF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  46320. end;
  46321. procedure TINT_IFS1.setDMA1IF; inline;
  46322. begin
  46323. pTDefRegMap(@Self)^.&set := $00020000;
  46324. end;
  46325. procedure TINT_IFS1.clearDMA1IF; inline;
  46326. begin
  46327. pTDefRegMap(@Self)^.clr := $00020000;
  46328. end;
  46329. procedure TINT_IFS1.setDMA1IF(thebits : TBits_1); inline;
  46330. begin
  46331. if thebits = 0 then
  46332. pTDefRegMap(@Self)^.clr := $00020000
  46333. else
  46334. pTDefRegMap(@Self)^.&set := $00020000;
  46335. end;
  46336. function TINT_IFS1.getDMA1IF : TBits_1; inline;
  46337. begin
  46338. getDMA1IF := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  46339. end;
  46340. procedure TINT_IFS1.setDMA2IF; inline;
  46341. begin
  46342. pTDefRegMap(@Self)^.&set := $00040000;
  46343. end;
  46344. procedure TINT_IFS1.clearDMA2IF; inline;
  46345. begin
  46346. pTDefRegMap(@Self)^.clr := $00040000;
  46347. end;
  46348. procedure TINT_IFS1.setDMA2IF(thebits : TBits_1); inline;
  46349. begin
  46350. if thebits = 0 then
  46351. pTDefRegMap(@Self)^.clr := $00040000
  46352. else
  46353. pTDefRegMap(@Self)^.&set := $00040000;
  46354. end;
  46355. function TINT_IFS1.getDMA2IF : TBits_1; inline;
  46356. begin
  46357. getDMA2IF := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  46358. end;
  46359. procedure TINT_IFS1.setDMA3IF; inline;
  46360. begin
  46361. pTDefRegMap(@Self)^.&set := $00080000;
  46362. end;
  46363. procedure TINT_IFS1.clearDMA3IF; inline;
  46364. begin
  46365. pTDefRegMap(@Self)^.clr := $00080000;
  46366. end;
  46367. procedure TINT_IFS1.setDMA3IF(thebits : TBits_1); inline;
  46368. begin
  46369. if thebits = 0 then
  46370. pTDefRegMap(@Self)^.clr := $00080000
  46371. else
  46372. pTDefRegMap(@Self)^.&set := $00080000;
  46373. end;
  46374. function TINT_IFS1.getDMA3IF : TBits_1; inline;
  46375. begin
  46376. getDMA3IF := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  46377. end;
  46378. procedure TINT_IFS1.setFCEIF; inline;
  46379. begin
  46380. pTDefRegMap(@Self)^.&set := $01000000;
  46381. end;
  46382. procedure TINT_IFS1.clearFCEIF; inline;
  46383. begin
  46384. pTDefRegMap(@Self)^.clr := $01000000;
  46385. end;
  46386. procedure TINT_IFS1.setFCEIF(thebits : TBits_1); inline;
  46387. begin
  46388. if thebits = 0 then
  46389. pTDefRegMap(@Self)^.clr := $01000000
  46390. else
  46391. pTDefRegMap(@Self)^.&set := $01000000;
  46392. end;
  46393. function TINT_IFS1.getFCEIF : TBits_1; inline;
  46394. begin
  46395. getFCEIF := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  46396. end;
  46397. procedure TINT_IFS1.setUSBIF; inline;
  46398. begin
  46399. pTDefRegMap(@Self)^.&set := $02000000;
  46400. end;
  46401. procedure TINT_IFS1.clearUSBIF; inline;
  46402. begin
  46403. pTDefRegMap(@Self)^.clr := $02000000;
  46404. end;
  46405. procedure TINT_IFS1.setUSBIF(thebits : TBits_1); inline;
  46406. begin
  46407. if thebits = 0 then
  46408. pTDefRegMap(@Self)^.clr := $02000000
  46409. else
  46410. pTDefRegMap(@Self)^.&set := $02000000;
  46411. end;
  46412. function TINT_IFS1.getUSBIF : TBits_1; inline;
  46413. begin
  46414. getUSBIF := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  46415. end;
  46416. procedure TINT_IFS1.setCAN1IF; inline;
  46417. begin
  46418. pTDefRegMap(@Self)^.&set := $04000000;
  46419. end;
  46420. procedure TINT_IFS1.clearCAN1IF; inline;
  46421. begin
  46422. pTDefRegMap(@Self)^.clr := $04000000;
  46423. end;
  46424. procedure TINT_IFS1.setCAN1IF(thebits : TBits_1); inline;
  46425. begin
  46426. if thebits = 0 then
  46427. pTDefRegMap(@Self)^.clr := $04000000
  46428. else
  46429. pTDefRegMap(@Self)^.&set := $04000000;
  46430. end;
  46431. function TINT_IFS1.getCAN1IF : TBits_1; inline;
  46432. begin
  46433. getCAN1IF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  46434. end;
  46435. procedure TINT_IFS1.setIC1EIF; inline;
  46436. begin
  46437. pTDefRegMap(@Self)^.&set := $20000000;
  46438. end;
  46439. procedure TINT_IFS1.clearIC1EIF; inline;
  46440. begin
  46441. pTDefRegMap(@Self)^.clr := $20000000;
  46442. end;
  46443. procedure TINT_IFS1.setIC1EIF(thebits : TBits_1); inline;
  46444. begin
  46445. if thebits = 0 then
  46446. pTDefRegMap(@Self)^.clr := $20000000
  46447. else
  46448. pTDefRegMap(@Self)^.&set := $20000000;
  46449. end;
  46450. function TINT_IFS1.getIC1EIF : TBits_1; inline;
  46451. begin
  46452. getIC1EIF := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  46453. end;
  46454. procedure TINT_IFS1.setIC2EIF; inline;
  46455. begin
  46456. pTDefRegMap(@Self)^.&set := $40000000;
  46457. end;
  46458. procedure TINT_IFS1.clearIC2EIF; inline;
  46459. begin
  46460. pTDefRegMap(@Self)^.clr := $40000000;
  46461. end;
  46462. procedure TINT_IFS1.setIC2EIF(thebits : TBits_1); inline;
  46463. begin
  46464. if thebits = 0 then
  46465. pTDefRegMap(@Self)^.clr := $40000000
  46466. else
  46467. pTDefRegMap(@Self)^.&set := $40000000;
  46468. end;
  46469. function TINT_IFS1.getIC2EIF : TBits_1; inline;
  46470. begin
  46471. getIC2EIF := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  46472. end;
  46473. procedure TINT_IFS1.setIC3EIF; inline;
  46474. begin
  46475. pTDefRegMap(@Self)^.&set := $80000000;
  46476. end;
  46477. procedure TINT_IFS1.clearIC3EIF; inline;
  46478. begin
  46479. pTDefRegMap(@Self)^.clr := $80000000;
  46480. end;
  46481. procedure TINT_IFS1.setIC3EIF(thebits : TBits_1); inline;
  46482. begin
  46483. if thebits = 0 then
  46484. pTDefRegMap(@Self)^.clr := $80000000
  46485. else
  46486. pTDefRegMap(@Self)^.&set := $80000000;
  46487. end;
  46488. function TINT_IFS1.getIC3EIF : TBits_1; inline;
  46489. begin
  46490. getIC3EIF := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  46491. end;
  46492. procedure TINT_IFS1.setU2AEIF; inline;
  46493. begin
  46494. pTDefRegMap(@Self)^.&set := $00000020;
  46495. end;
  46496. procedure TINT_IFS1.clearU2AEIF; inline;
  46497. begin
  46498. pTDefRegMap(@Self)^.clr := $00000020;
  46499. end;
  46500. procedure TINT_IFS1.setU2AEIF(thebits : TBits_1); inline;
  46501. begin
  46502. if thebits = 0 then
  46503. pTDefRegMap(@Self)^.clr := $00000020
  46504. else
  46505. pTDefRegMap(@Self)^.&set := $00000020;
  46506. end;
  46507. function TINT_IFS1.getU2AEIF : TBits_1; inline;
  46508. begin
  46509. getU2AEIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  46510. end;
  46511. procedure TINT_IFS1.setU2ARXIF; inline;
  46512. begin
  46513. pTDefRegMap(@Self)^.&set := $00000040;
  46514. end;
  46515. procedure TINT_IFS1.clearU2ARXIF; inline;
  46516. begin
  46517. pTDefRegMap(@Self)^.clr := $00000040;
  46518. end;
  46519. procedure TINT_IFS1.setU2ARXIF(thebits : TBits_1); inline;
  46520. begin
  46521. if thebits = 0 then
  46522. pTDefRegMap(@Self)^.clr := $00000040
  46523. else
  46524. pTDefRegMap(@Self)^.&set := $00000040;
  46525. end;
  46526. function TINT_IFS1.getU2ARXIF : TBits_1; inline;
  46527. begin
  46528. getU2ARXIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  46529. end;
  46530. procedure TINT_IFS1.setU2ATXIF; inline;
  46531. begin
  46532. pTDefRegMap(@Self)^.&set := $00000080;
  46533. end;
  46534. procedure TINT_IFS1.clearU2ATXIF; inline;
  46535. begin
  46536. pTDefRegMap(@Self)^.clr := $00000080;
  46537. end;
  46538. procedure TINT_IFS1.setU2ATXIF(thebits : TBits_1); inline;
  46539. begin
  46540. if thebits = 0 then
  46541. pTDefRegMap(@Self)^.clr := $00000080
  46542. else
  46543. pTDefRegMap(@Self)^.&set := $00000080;
  46544. end;
  46545. function TINT_IFS1.getU2ATXIF : TBits_1; inline;
  46546. begin
  46547. getU2ATXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  46548. end;
  46549. procedure TINT_IFS1.setU3AEIF; inline;
  46550. begin
  46551. pTDefRegMap(@Self)^.&set := $00000100;
  46552. end;
  46553. procedure TINT_IFS1.clearU3AEIF; inline;
  46554. begin
  46555. pTDefRegMap(@Self)^.clr := $00000100;
  46556. end;
  46557. procedure TINT_IFS1.setU3AEIF(thebits : TBits_1); inline;
  46558. begin
  46559. if thebits = 0 then
  46560. pTDefRegMap(@Self)^.clr := $00000100
  46561. else
  46562. pTDefRegMap(@Self)^.&set := $00000100;
  46563. end;
  46564. function TINT_IFS1.getU3AEIF : TBits_1; inline;
  46565. begin
  46566. getU3AEIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  46567. end;
  46568. procedure TINT_IFS1.setU3ARXIF; inline;
  46569. begin
  46570. pTDefRegMap(@Self)^.&set := $00000200;
  46571. end;
  46572. procedure TINT_IFS1.clearU3ARXIF; inline;
  46573. begin
  46574. pTDefRegMap(@Self)^.clr := $00000200;
  46575. end;
  46576. procedure TINT_IFS1.setU3ARXIF(thebits : TBits_1); inline;
  46577. begin
  46578. if thebits = 0 then
  46579. pTDefRegMap(@Self)^.clr := $00000200
  46580. else
  46581. pTDefRegMap(@Self)^.&set := $00000200;
  46582. end;
  46583. function TINT_IFS1.getU3ARXIF : TBits_1; inline;
  46584. begin
  46585. getU3ARXIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  46586. end;
  46587. procedure TINT_IFS1.setU3ATXIF; inline;
  46588. begin
  46589. pTDefRegMap(@Self)^.&set := $00000400;
  46590. end;
  46591. procedure TINT_IFS1.clearU3ATXIF; inline;
  46592. begin
  46593. pTDefRegMap(@Self)^.clr := $00000400;
  46594. end;
  46595. procedure TINT_IFS1.setU3ATXIF(thebits : TBits_1); inline;
  46596. begin
  46597. if thebits = 0 then
  46598. pTDefRegMap(@Self)^.clr := $00000400
  46599. else
  46600. pTDefRegMap(@Self)^.&set := $00000400;
  46601. end;
  46602. function TINT_IFS1.getU3ATXIF : TBits_1; inline;
  46603. begin
  46604. getU3ATXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  46605. end;
  46606. procedure TINT_IFS1.setSPI2EIF; inline;
  46607. begin
  46608. pTDefRegMap(@Self)^.&set := $00000020;
  46609. end;
  46610. procedure TINT_IFS1.clearSPI2EIF; inline;
  46611. begin
  46612. pTDefRegMap(@Self)^.clr := $00000020;
  46613. end;
  46614. procedure TINT_IFS1.setSPI2EIF(thebits : TBits_1); inline;
  46615. begin
  46616. if thebits = 0 then
  46617. pTDefRegMap(@Self)^.clr := $00000020
  46618. else
  46619. pTDefRegMap(@Self)^.&set := $00000020;
  46620. end;
  46621. function TINT_IFS1.getSPI2EIF : TBits_1; inline;
  46622. begin
  46623. getSPI2EIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  46624. end;
  46625. procedure TINT_IFS1.setSPI2RXIF; inline;
  46626. begin
  46627. pTDefRegMap(@Self)^.&set := $00000040;
  46628. end;
  46629. procedure TINT_IFS1.clearSPI2RXIF; inline;
  46630. begin
  46631. pTDefRegMap(@Self)^.clr := $00000040;
  46632. end;
  46633. procedure TINT_IFS1.setSPI2RXIF(thebits : TBits_1); inline;
  46634. begin
  46635. if thebits = 0 then
  46636. pTDefRegMap(@Self)^.clr := $00000040
  46637. else
  46638. pTDefRegMap(@Self)^.&set := $00000040;
  46639. end;
  46640. function TINT_IFS1.getSPI2RXIF : TBits_1; inline;
  46641. begin
  46642. getSPI2RXIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  46643. end;
  46644. procedure TINT_IFS1.setSPI2TXIF; inline;
  46645. begin
  46646. pTDefRegMap(@Self)^.&set := $00000080;
  46647. end;
  46648. procedure TINT_IFS1.clearSPI2TXIF; inline;
  46649. begin
  46650. pTDefRegMap(@Self)^.clr := $00000080;
  46651. end;
  46652. procedure TINT_IFS1.setSPI2TXIF(thebits : TBits_1); inline;
  46653. begin
  46654. if thebits = 0 then
  46655. pTDefRegMap(@Self)^.clr := $00000080
  46656. else
  46657. pTDefRegMap(@Self)^.&set := $00000080;
  46658. end;
  46659. function TINT_IFS1.getSPI2TXIF : TBits_1; inline;
  46660. begin
  46661. getSPI2TXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  46662. end;
  46663. procedure TINT_IFS1.setSPI4EIF; inline;
  46664. begin
  46665. pTDefRegMap(@Self)^.&set := $00000100;
  46666. end;
  46667. procedure TINT_IFS1.clearSPI4EIF; inline;
  46668. begin
  46669. pTDefRegMap(@Self)^.clr := $00000100;
  46670. end;
  46671. procedure TINT_IFS1.setSPI4EIF(thebits : TBits_1); inline;
  46672. begin
  46673. if thebits = 0 then
  46674. pTDefRegMap(@Self)^.clr := $00000100
  46675. else
  46676. pTDefRegMap(@Self)^.&set := $00000100;
  46677. end;
  46678. function TINT_IFS1.getSPI4EIF : TBits_1; inline;
  46679. begin
  46680. getSPI4EIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  46681. end;
  46682. procedure TINT_IFS1.setSPI4RXIF; inline;
  46683. begin
  46684. pTDefRegMap(@Self)^.&set := $00000200;
  46685. end;
  46686. procedure TINT_IFS1.clearSPI4RXIF; inline;
  46687. begin
  46688. pTDefRegMap(@Self)^.clr := $00000200;
  46689. end;
  46690. procedure TINT_IFS1.setSPI4RXIF(thebits : TBits_1); inline;
  46691. begin
  46692. if thebits = 0 then
  46693. pTDefRegMap(@Self)^.clr := $00000200
  46694. else
  46695. pTDefRegMap(@Self)^.&set := $00000200;
  46696. end;
  46697. function TINT_IFS1.getSPI4RXIF : TBits_1; inline;
  46698. begin
  46699. getSPI4RXIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  46700. end;
  46701. procedure TINT_IFS1.setSPI4TXIF; inline;
  46702. begin
  46703. pTDefRegMap(@Self)^.&set := $00000400;
  46704. end;
  46705. procedure TINT_IFS1.clearSPI4TXIF; inline;
  46706. begin
  46707. pTDefRegMap(@Self)^.clr := $00000400;
  46708. end;
  46709. procedure TINT_IFS1.setSPI4TXIF(thebits : TBits_1); inline;
  46710. begin
  46711. if thebits = 0 then
  46712. pTDefRegMap(@Self)^.clr := $00000400
  46713. else
  46714. pTDefRegMap(@Self)^.&set := $00000400;
  46715. end;
  46716. function TINT_IFS1.getSPI4TXIF : TBits_1; inline;
  46717. begin
  46718. getSPI4TXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  46719. end;
  46720. procedure TINT_IFS1.setSPI2AEIF; inline;
  46721. begin
  46722. pTDefRegMap(@Self)^.&set := $00000020;
  46723. end;
  46724. procedure TINT_IFS1.clearSPI2AEIF; inline;
  46725. begin
  46726. pTDefRegMap(@Self)^.clr := $00000020;
  46727. end;
  46728. procedure TINT_IFS1.setSPI2AEIF(thebits : TBits_1); inline;
  46729. begin
  46730. if thebits = 0 then
  46731. pTDefRegMap(@Self)^.clr := $00000020
  46732. else
  46733. pTDefRegMap(@Self)^.&set := $00000020;
  46734. end;
  46735. function TINT_IFS1.getSPI2AEIF : TBits_1; inline;
  46736. begin
  46737. getSPI2AEIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  46738. end;
  46739. procedure TINT_IFS1.setSPI2ARXIF; inline;
  46740. begin
  46741. pTDefRegMap(@Self)^.&set := $00000040;
  46742. end;
  46743. procedure TINT_IFS1.clearSPI2ARXIF; inline;
  46744. begin
  46745. pTDefRegMap(@Self)^.clr := $00000040;
  46746. end;
  46747. procedure TINT_IFS1.setSPI2ARXIF(thebits : TBits_1); inline;
  46748. begin
  46749. if thebits = 0 then
  46750. pTDefRegMap(@Self)^.clr := $00000040
  46751. else
  46752. pTDefRegMap(@Self)^.&set := $00000040;
  46753. end;
  46754. function TINT_IFS1.getSPI2ARXIF : TBits_1; inline;
  46755. begin
  46756. getSPI2ARXIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  46757. end;
  46758. procedure TINT_IFS1.setSPI2ATXIF; inline;
  46759. begin
  46760. pTDefRegMap(@Self)^.&set := $00000080;
  46761. end;
  46762. procedure TINT_IFS1.clearSPI2ATXIF; inline;
  46763. begin
  46764. pTDefRegMap(@Self)^.clr := $00000080;
  46765. end;
  46766. procedure TINT_IFS1.setSPI2ATXIF(thebits : TBits_1); inline;
  46767. begin
  46768. if thebits = 0 then
  46769. pTDefRegMap(@Self)^.clr := $00000080
  46770. else
  46771. pTDefRegMap(@Self)^.&set := $00000080;
  46772. end;
  46773. function TINT_IFS1.getSPI2ATXIF : TBits_1; inline;
  46774. begin
  46775. getSPI2ATXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  46776. end;
  46777. procedure TINT_IFS1.setSPI3AEIF; inline;
  46778. begin
  46779. pTDefRegMap(@Self)^.&set := $00000100;
  46780. end;
  46781. procedure TINT_IFS1.clearSPI3AEIF; inline;
  46782. begin
  46783. pTDefRegMap(@Self)^.clr := $00000100;
  46784. end;
  46785. procedure TINT_IFS1.setSPI3AEIF(thebits : TBits_1); inline;
  46786. begin
  46787. if thebits = 0 then
  46788. pTDefRegMap(@Self)^.clr := $00000100
  46789. else
  46790. pTDefRegMap(@Self)^.&set := $00000100;
  46791. end;
  46792. function TINT_IFS1.getSPI3AEIF : TBits_1; inline;
  46793. begin
  46794. getSPI3AEIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  46795. end;
  46796. procedure TINT_IFS1.setSPI3ARXIF; inline;
  46797. begin
  46798. pTDefRegMap(@Self)^.&set := $00000200;
  46799. end;
  46800. procedure TINT_IFS1.clearSPI3ARXIF; inline;
  46801. begin
  46802. pTDefRegMap(@Self)^.clr := $00000200;
  46803. end;
  46804. procedure TINT_IFS1.setSPI3ARXIF(thebits : TBits_1); inline;
  46805. begin
  46806. if thebits = 0 then
  46807. pTDefRegMap(@Self)^.clr := $00000200
  46808. else
  46809. pTDefRegMap(@Self)^.&set := $00000200;
  46810. end;
  46811. function TINT_IFS1.getSPI3ARXIF : TBits_1; inline;
  46812. begin
  46813. getSPI3ARXIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  46814. end;
  46815. procedure TINT_IFS1.setSPI3ATXIF; inline;
  46816. begin
  46817. pTDefRegMap(@Self)^.&set := $00000400;
  46818. end;
  46819. procedure TINT_IFS1.clearSPI3ATXIF; inline;
  46820. begin
  46821. pTDefRegMap(@Self)^.clr := $00000400;
  46822. end;
  46823. procedure TINT_IFS1.setSPI3ATXIF(thebits : TBits_1); inline;
  46824. begin
  46825. if thebits = 0 then
  46826. pTDefRegMap(@Self)^.clr := $00000400
  46827. else
  46828. pTDefRegMap(@Self)^.&set := $00000400;
  46829. end;
  46830. function TINT_IFS1.getSPI3ATXIF : TBits_1; inline;
  46831. begin
  46832. getSPI3ATXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  46833. end;
  46834. procedure TINT_IFS1.setI2C4BIF; inline;
  46835. begin
  46836. pTDefRegMap(@Self)^.&set := $00000020;
  46837. end;
  46838. procedure TINT_IFS1.clearI2C4BIF; inline;
  46839. begin
  46840. pTDefRegMap(@Self)^.clr := $00000020;
  46841. end;
  46842. procedure TINT_IFS1.setI2C4BIF(thebits : TBits_1); inline;
  46843. begin
  46844. if thebits = 0 then
  46845. pTDefRegMap(@Self)^.clr := $00000020
  46846. else
  46847. pTDefRegMap(@Self)^.&set := $00000020;
  46848. end;
  46849. function TINT_IFS1.getI2C4BIF : TBits_1; inline;
  46850. begin
  46851. getI2C4BIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  46852. end;
  46853. procedure TINT_IFS1.setI2C4SIF; inline;
  46854. begin
  46855. pTDefRegMap(@Self)^.&set := $00000040;
  46856. end;
  46857. procedure TINT_IFS1.clearI2C4SIF; inline;
  46858. begin
  46859. pTDefRegMap(@Self)^.clr := $00000040;
  46860. end;
  46861. procedure TINT_IFS1.setI2C4SIF(thebits : TBits_1); inline;
  46862. begin
  46863. if thebits = 0 then
  46864. pTDefRegMap(@Self)^.clr := $00000040
  46865. else
  46866. pTDefRegMap(@Self)^.&set := $00000040;
  46867. end;
  46868. function TINT_IFS1.getI2C4SIF : TBits_1; inline;
  46869. begin
  46870. getI2C4SIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  46871. end;
  46872. procedure TINT_IFS1.setI2C4MIF; inline;
  46873. begin
  46874. pTDefRegMap(@Self)^.&set := $00000080;
  46875. end;
  46876. procedure TINT_IFS1.clearI2C4MIF; inline;
  46877. begin
  46878. pTDefRegMap(@Self)^.clr := $00000080;
  46879. end;
  46880. procedure TINT_IFS1.setI2C4MIF(thebits : TBits_1); inline;
  46881. begin
  46882. if thebits = 0 then
  46883. pTDefRegMap(@Self)^.clr := $00000080
  46884. else
  46885. pTDefRegMap(@Self)^.&set := $00000080;
  46886. end;
  46887. function TINT_IFS1.getI2C4MIF : TBits_1; inline;
  46888. begin
  46889. getI2C4MIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  46890. end;
  46891. procedure TINT_IFS1.setI2C5BIF; inline;
  46892. begin
  46893. pTDefRegMap(@Self)^.&set := $00000100;
  46894. end;
  46895. procedure TINT_IFS1.clearI2C5BIF; inline;
  46896. begin
  46897. pTDefRegMap(@Self)^.clr := $00000100;
  46898. end;
  46899. procedure TINT_IFS1.setI2C5BIF(thebits : TBits_1); inline;
  46900. begin
  46901. if thebits = 0 then
  46902. pTDefRegMap(@Self)^.clr := $00000100
  46903. else
  46904. pTDefRegMap(@Self)^.&set := $00000100;
  46905. end;
  46906. function TINT_IFS1.getI2C5BIF : TBits_1; inline;
  46907. begin
  46908. getI2C5BIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  46909. end;
  46910. procedure TINT_IFS1.setI2C5SIF; inline;
  46911. begin
  46912. pTDefRegMap(@Self)^.&set := $00000200;
  46913. end;
  46914. procedure TINT_IFS1.clearI2C5SIF; inline;
  46915. begin
  46916. pTDefRegMap(@Self)^.clr := $00000200;
  46917. end;
  46918. procedure TINT_IFS1.setI2C5SIF(thebits : TBits_1); inline;
  46919. begin
  46920. if thebits = 0 then
  46921. pTDefRegMap(@Self)^.clr := $00000200
  46922. else
  46923. pTDefRegMap(@Self)^.&set := $00000200;
  46924. end;
  46925. function TINT_IFS1.getI2C5SIF : TBits_1; inline;
  46926. begin
  46927. getI2C5SIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  46928. end;
  46929. procedure TINT_IFS1.setI2C5MIF; inline;
  46930. begin
  46931. pTDefRegMap(@Self)^.&set := $00000400;
  46932. end;
  46933. procedure TINT_IFS1.clearI2C5MIF; inline;
  46934. begin
  46935. pTDefRegMap(@Self)^.clr := $00000400;
  46936. end;
  46937. procedure TINT_IFS1.setI2C5MIF(thebits : TBits_1); inline;
  46938. begin
  46939. if thebits = 0 then
  46940. pTDefRegMap(@Self)^.clr := $00000400
  46941. else
  46942. pTDefRegMap(@Self)^.&set := $00000400;
  46943. end;
  46944. function TINT_IFS1.getI2C5MIF : TBits_1; inline;
  46945. begin
  46946. getI2C5MIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  46947. end;
  46948. procedure TINT_IFS1.setI2C2ABIF; inline;
  46949. begin
  46950. pTDefRegMap(@Self)^.&set := $00000020;
  46951. end;
  46952. procedure TINT_IFS1.clearI2C2ABIF; inline;
  46953. begin
  46954. pTDefRegMap(@Self)^.clr := $00000020;
  46955. end;
  46956. procedure TINT_IFS1.setI2C2ABIF(thebits : TBits_1); inline;
  46957. begin
  46958. if thebits = 0 then
  46959. pTDefRegMap(@Self)^.clr := $00000020
  46960. else
  46961. pTDefRegMap(@Self)^.&set := $00000020;
  46962. end;
  46963. function TINT_IFS1.getI2C2ABIF : TBits_1; inline;
  46964. begin
  46965. getI2C2ABIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  46966. end;
  46967. procedure TINT_IFS1.setI2C2ASIF; inline;
  46968. begin
  46969. pTDefRegMap(@Self)^.&set := $00000040;
  46970. end;
  46971. procedure TINT_IFS1.clearI2C2ASIF; inline;
  46972. begin
  46973. pTDefRegMap(@Self)^.clr := $00000040;
  46974. end;
  46975. procedure TINT_IFS1.setI2C2ASIF(thebits : TBits_1); inline;
  46976. begin
  46977. if thebits = 0 then
  46978. pTDefRegMap(@Self)^.clr := $00000040
  46979. else
  46980. pTDefRegMap(@Self)^.&set := $00000040;
  46981. end;
  46982. function TINT_IFS1.getI2C2ASIF : TBits_1; inline;
  46983. begin
  46984. getI2C2ASIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  46985. end;
  46986. procedure TINT_IFS1.setI2C2AMIF; inline;
  46987. begin
  46988. pTDefRegMap(@Self)^.&set := $00000080;
  46989. end;
  46990. procedure TINT_IFS1.clearI2C2AMIF; inline;
  46991. begin
  46992. pTDefRegMap(@Self)^.clr := $00000080;
  46993. end;
  46994. procedure TINT_IFS1.setI2C2AMIF(thebits : TBits_1); inline;
  46995. begin
  46996. if thebits = 0 then
  46997. pTDefRegMap(@Self)^.clr := $00000080
  46998. else
  46999. pTDefRegMap(@Self)^.&set := $00000080;
  47000. end;
  47001. function TINT_IFS1.getI2C2AMIF : TBits_1; inline;
  47002. begin
  47003. getI2C2AMIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  47004. end;
  47005. procedure TINT_IFS1.setI2C3ABIF; inline;
  47006. begin
  47007. pTDefRegMap(@Self)^.&set := $00000100;
  47008. end;
  47009. procedure TINT_IFS1.clearI2C3ABIF; inline;
  47010. begin
  47011. pTDefRegMap(@Self)^.clr := $00000100;
  47012. end;
  47013. procedure TINT_IFS1.setI2C3ABIF(thebits : TBits_1); inline;
  47014. begin
  47015. if thebits = 0 then
  47016. pTDefRegMap(@Self)^.clr := $00000100
  47017. else
  47018. pTDefRegMap(@Self)^.&set := $00000100;
  47019. end;
  47020. function TINT_IFS1.getI2C3ABIF : TBits_1; inline;
  47021. begin
  47022. getI2C3ABIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  47023. end;
  47024. procedure TINT_IFS1.setI2C3ASIF; inline;
  47025. begin
  47026. pTDefRegMap(@Self)^.&set := $00000200;
  47027. end;
  47028. procedure TINT_IFS1.clearI2C3ASIF; inline;
  47029. begin
  47030. pTDefRegMap(@Self)^.clr := $00000200;
  47031. end;
  47032. procedure TINT_IFS1.setI2C3ASIF(thebits : TBits_1); inline;
  47033. begin
  47034. if thebits = 0 then
  47035. pTDefRegMap(@Self)^.clr := $00000200
  47036. else
  47037. pTDefRegMap(@Self)^.&set := $00000200;
  47038. end;
  47039. function TINT_IFS1.getI2C3ASIF : TBits_1; inline;
  47040. begin
  47041. getI2C3ASIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  47042. end;
  47043. procedure TINT_IFS1.setI2C3AMIF; inline;
  47044. begin
  47045. pTDefRegMap(@Self)^.&set := $00000400;
  47046. end;
  47047. procedure TINT_IFS1.clearI2C3AMIF; inline;
  47048. begin
  47049. pTDefRegMap(@Self)^.clr := $00000400;
  47050. end;
  47051. procedure TINT_IFS1.setI2C3AMIF(thebits : TBits_1); inline;
  47052. begin
  47053. if thebits = 0 then
  47054. pTDefRegMap(@Self)^.clr := $00000400
  47055. else
  47056. pTDefRegMap(@Self)^.&set := $00000400;
  47057. end;
  47058. function TINT_IFS1.getI2C3AMIF : TBits_1; inline;
  47059. begin
  47060. getI2C3AMIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  47061. end;
  47062. procedure TINT_IFS1.setw(thebits : TBits_32); inline;
  47063. begin
  47064. pTDefRegMap(@Self)^.val := thebits;
  47065. end;
  47066. function TINT_IFS1.getw : TBits_32; inline;
  47067. begin
  47068. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  47069. end;
  47070. procedure TINT_IFS2.setIC4EIF; inline;
  47071. begin
  47072. pTDefRegMap(@Self)^.&set := $00000001;
  47073. end;
  47074. procedure TINT_IFS2.clearIC4EIF; inline;
  47075. begin
  47076. pTDefRegMap(@Self)^.clr := $00000001;
  47077. end;
  47078. procedure TINT_IFS2.setIC4EIF(thebits : TBits_1); inline;
  47079. begin
  47080. if thebits = 0 then
  47081. pTDefRegMap(@Self)^.clr := $00000001
  47082. else
  47083. pTDefRegMap(@Self)^.&set := $00000001;
  47084. end;
  47085. function TINT_IFS2.getIC4EIF : TBits_1; inline;
  47086. begin
  47087. getIC4EIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  47088. end;
  47089. procedure TINT_IFS2.setIC5EIF; inline;
  47090. begin
  47091. pTDefRegMap(@Self)^.&set := $00000002;
  47092. end;
  47093. procedure TINT_IFS2.clearIC5EIF; inline;
  47094. begin
  47095. pTDefRegMap(@Self)^.clr := $00000002;
  47096. end;
  47097. procedure TINT_IFS2.setIC5EIF(thebits : TBits_1); inline;
  47098. begin
  47099. if thebits = 0 then
  47100. pTDefRegMap(@Self)^.clr := $00000002
  47101. else
  47102. pTDefRegMap(@Self)^.&set := $00000002;
  47103. end;
  47104. function TINT_IFS2.getIC5EIF : TBits_1; inline;
  47105. begin
  47106. getIC5EIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  47107. end;
  47108. procedure TINT_IFS2.setPMPEIF; inline;
  47109. begin
  47110. pTDefRegMap(@Self)^.&set := $00000004;
  47111. end;
  47112. procedure TINT_IFS2.clearPMPEIF; inline;
  47113. begin
  47114. pTDefRegMap(@Self)^.clr := $00000004;
  47115. end;
  47116. procedure TINT_IFS2.setPMPEIF(thebits : TBits_1); inline;
  47117. begin
  47118. if thebits = 0 then
  47119. pTDefRegMap(@Self)^.clr := $00000004
  47120. else
  47121. pTDefRegMap(@Self)^.&set := $00000004;
  47122. end;
  47123. function TINT_IFS2.getPMPEIF : TBits_1; inline;
  47124. begin
  47125. getPMPEIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  47126. end;
  47127. procedure TINT_IFS2.setU1BEIF; inline;
  47128. begin
  47129. pTDefRegMap(@Self)^.&set := $00000008;
  47130. end;
  47131. procedure TINT_IFS2.clearU1BEIF; inline;
  47132. begin
  47133. pTDefRegMap(@Self)^.clr := $00000008;
  47134. end;
  47135. procedure TINT_IFS2.setU1BEIF(thebits : TBits_1); inline;
  47136. begin
  47137. if thebits = 0 then
  47138. pTDefRegMap(@Self)^.clr := $00000008
  47139. else
  47140. pTDefRegMap(@Self)^.&set := $00000008;
  47141. end;
  47142. function TINT_IFS2.getU1BEIF : TBits_1; inline;
  47143. begin
  47144. getU1BEIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  47145. end;
  47146. procedure TINT_IFS2.setU1BRXIF; inline;
  47147. begin
  47148. pTDefRegMap(@Self)^.&set := $00000010;
  47149. end;
  47150. procedure TINT_IFS2.clearU1BRXIF; inline;
  47151. begin
  47152. pTDefRegMap(@Self)^.clr := $00000010;
  47153. end;
  47154. procedure TINT_IFS2.setU1BRXIF(thebits : TBits_1); inline;
  47155. begin
  47156. if thebits = 0 then
  47157. pTDefRegMap(@Self)^.clr := $00000010
  47158. else
  47159. pTDefRegMap(@Self)^.&set := $00000010;
  47160. end;
  47161. function TINT_IFS2.getU1BRXIF : TBits_1; inline;
  47162. begin
  47163. getU1BRXIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  47164. end;
  47165. procedure TINT_IFS2.setU1BTXIF; inline;
  47166. begin
  47167. pTDefRegMap(@Self)^.&set := $00000020;
  47168. end;
  47169. procedure TINT_IFS2.clearU1BTXIF; inline;
  47170. begin
  47171. pTDefRegMap(@Self)^.clr := $00000020;
  47172. end;
  47173. procedure TINT_IFS2.setU1BTXIF(thebits : TBits_1); inline;
  47174. begin
  47175. if thebits = 0 then
  47176. pTDefRegMap(@Self)^.clr := $00000020
  47177. else
  47178. pTDefRegMap(@Self)^.&set := $00000020;
  47179. end;
  47180. function TINT_IFS2.getU1BTXIF : TBits_1; inline;
  47181. begin
  47182. getU1BTXIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  47183. end;
  47184. procedure TINT_IFS2.setU2BEIF; inline;
  47185. begin
  47186. pTDefRegMap(@Self)^.&set := $00000040;
  47187. end;
  47188. procedure TINT_IFS2.clearU2BEIF; inline;
  47189. begin
  47190. pTDefRegMap(@Self)^.clr := $00000040;
  47191. end;
  47192. procedure TINT_IFS2.setU2BEIF(thebits : TBits_1); inline;
  47193. begin
  47194. if thebits = 0 then
  47195. pTDefRegMap(@Self)^.clr := $00000040
  47196. else
  47197. pTDefRegMap(@Self)^.&set := $00000040;
  47198. end;
  47199. function TINT_IFS2.getU2BEIF : TBits_1; inline;
  47200. begin
  47201. getU2BEIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  47202. end;
  47203. procedure TINT_IFS2.setU2BRXIF; inline;
  47204. begin
  47205. pTDefRegMap(@Self)^.&set := $00000080;
  47206. end;
  47207. procedure TINT_IFS2.clearU2BRXIF; inline;
  47208. begin
  47209. pTDefRegMap(@Self)^.clr := $00000080;
  47210. end;
  47211. procedure TINT_IFS2.setU2BRXIF(thebits : TBits_1); inline;
  47212. begin
  47213. if thebits = 0 then
  47214. pTDefRegMap(@Self)^.clr := $00000080
  47215. else
  47216. pTDefRegMap(@Self)^.&set := $00000080;
  47217. end;
  47218. function TINT_IFS2.getU2BRXIF : TBits_1; inline;
  47219. begin
  47220. getU2BRXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  47221. end;
  47222. procedure TINT_IFS2.setU2BTXIF; inline;
  47223. begin
  47224. pTDefRegMap(@Self)^.&set := $00000100;
  47225. end;
  47226. procedure TINT_IFS2.clearU2BTXIF; inline;
  47227. begin
  47228. pTDefRegMap(@Self)^.clr := $00000100;
  47229. end;
  47230. procedure TINT_IFS2.setU2BTXIF(thebits : TBits_1); inline;
  47231. begin
  47232. if thebits = 0 then
  47233. pTDefRegMap(@Self)^.clr := $00000100
  47234. else
  47235. pTDefRegMap(@Self)^.&set := $00000100;
  47236. end;
  47237. function TINT_IFS2.getU2BTXIF : TBits_1; inline;
  47238. begin
  47239. getU2BTXIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  47240. end;
  47241. procedure TINT_IFS2.setU3BEIF; inline;
  47242. begin
  47243. pTDefRegMap(@Self)^.&set := $00000200;
  47244. end;
  47245. procedure TINT_IFS2.clearU3BEIF; inline;
  47246. begin
  47247. pTDefRegMap(@Self)^.clr := $00000200;
  47248. end;
  47249. procedure TINT_IFS2.setU3BEIF(thebits : TBits_1); inline;
  47250. begin
  47251. if thebits = 0 then
  47252. pTDefRegMap(@Self)^.clr := $00000200
  47253. else
  47254. pTDefRegMap(@Self)^.&set := $00000200;
  47255. end;
  47256. function TINT_IFS2.getU3BEIF : TBits_1; inline;
  47257. begin
  47258. getU3BEIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  47259. end;
  47260. procedure TINT_IFS2.setU3BRXIF; inline;
  47261. begin
  47262. pTDefRegMap(@Self)^.&set := $00000400;
  47263. end;
  47264. procedure TINT_IFS2.clearU3BRXIF; inline;
  47265. begin
  47266. pTDefRegMap(@Self)^.clr := $00000400;
  47267. end;
  47268. procedure TINT_IFS2.setU3BRXIF(thebits : TBits_1); inline;
  47269. begin
  47270. if thebits = 0 then
  47271. pTDefRegMap(@Self)^.clr := $00000400
  47272. else
  47273. pTDefRegMap(@Self)^.&set := $00000400;
  47274. end;
  47275. function TINT_IFS2.getU3BRXIF : TBits_1; inline;
  47276. begin
  47277. getU3BRXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  47278. end;
  47279. procedure TINT_IFS2.setU3BTXIF; inline;
  47280. begin
  47281. pTDefRegMap(@Self)^.&set := $00000800;
  47282. end;
  47283. procedure TINT_IFS2.clearU3BTXIF; inline;
  47284. begin
  47285. pTDefRegMap(@Self)^.clr := $00000800;
  47286. end;
  47287. procedure TINT_IFS2.setU3BTXIF(thebits : TBits_1); inline;
  47288. begin
  47289. if thebits = 0 then
  47290. pTDefRegMap(@Self)^.clr := $00000800
  47291. else
  47292. pTDefRegMap(@Self)^.&set := $00000800;
  47293. end;
  47294. function TINT_IFS2.getU3BTXIF : TBits_1; inline;
  47295. begin
  47296. getU3BTXIF := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  47297. end;
  47298. procedure TINT_IFS2.setU4EIF; inline;
  47299. begin
  47300. pTDefRegMap(@Self)^.&set := $00000008;
  47301. end;
  47302. procedure TINT_IFS2.clearU4EIF; inline;
  47303. begin
  47304. pTDefRegMap(@Self)^.clr := $00000008;
  47305. end;
  47306. procedure TINT_IFS2.setU4EIF(thebits : TBits_1); inline;
  47307. begin
  47308. if thebits = 0 then
  47309. pTDefRegMap(@Self)^.clr := $00000008
  47310. else
  47311. pTDefRegMap(@Self)^.&set := $00000008;
  47312. end;
  47313. function TINT_IFS2.getU4EIF : TBits_1; inline;
  47314. begin
  47315. getU4EIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  47316. end;
  47317. procedure TINT_IFS2.setU4RXIF; inline;
  47318. begin
  47319. pTDefRegMap(@Self)^.&set := $00000010;
  47320. end;
  47321. procedure TINT_IFS2.clearU4RXIF; inline;
  47322. begin
  47323. pTDefRegMap(@Self)^.clr := $00000010;
  47324. end;
  47325. procedure TINT_IFS2.setU4RXIF(thebits : TBits_1); inline;
  47326. begin
  47327. if thebits = 0 then
  47328. pTDefRegMap(@Self)^.clr := $00000010
  47329. else
  47330. pTDefRegMap(@Self)^.&set := $00000010;
  47331. end;
  47332. function TINT_IFS2.getU4RXIF : TBits_1; inline;
  47333. begin
  47334. getU4RXIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  47335. end;
  47336. procedure TINT_IFS2.setU4TXIF; inline;
  47337. begin
  47338. pTDefRegMap(@Self)^.&set := $00000020;
  47339. end;
  47340. procedure TINT_IFS2.clearU4TXIF; inline;
  47341. begin
  47342. pTDefRegMap(@Self)^.clr := $00000020;
  47343. end;
  47344. procedure TINT_IFS2.setU4TXIF(thebits : TBits_1); inline;
  47345. begin
  47346. if thebits = 0 then
  47347. pTDefRegMap(@Self)^.clr := $00000020
  47348. else
  47349. pTDefRegMap(@Self)^.&set := $00000020;
  47350. end;
  47351. function TINT_IFS2.getU4TXIF : TBits_1; inline;
  47352. begin
  47353. getU4TXIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  47354. end;
  47355. procedure TINT_IFS2.setU6EIF; inline;
  47356. begin
  47357. pTDefRegMap(@Self)^.&set := $00000040;
  47358. end;
  47359. procedure TINT_IFS2.clearU6EIF; inline;
  47360. begin
  47361. pTDefRegMap(@Self)^.clr := $00000040;
  47362. end;
  47363. procedure TINT_IFS2.setU6EIF(thebits : TBits_1); inline;
  47364. begin
  47365. if thebits = 0 then
  47366. pTDefRegMap(@Self)^.clr := $00000040
  47367. else
  47368. pTDefRegMap(@Self)^.&set := $00000040;
  47369. end;
  47370. function TINT_IFS2.getU6EIF : TBits_1; inline;
  47371. begin
  47372. getU6EIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  47373. end;
  47374. procedure TINT_IFS2.setU6RXIF; inline;
  47375. begin
  47376. pTDefRegMap(@Self)^.&set := $00000080;
  47377. end;
  47378. procedure TINT_IFS2.clearU6RXIF; inline;
  47379. begin
  47380. pTDefRegMap(@Self)^.clr := $00000080;
  47381. end;
  47382. procedure TINT_IFS2.setU6RXIF(thebits : TBits_1); inline;
  47383. begin
  47384. if thebits = 0 then
  47385. pTDefRegMap(@Self)^.clr := $00000080
  47386. else
  47387. pTDefRegMap(@Self)^.&set := $00000080;
  47388. end;
  47389. function TINT_IFS2.getU6RXIF : TBits_1; inline;
  47390. begin
  47391. getU6RXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  47392. end;
  47393. procedure TINT_IFS2.setU6TXIF; inline;
  47394. begin
  47395. pTDefRegMap(@Self)^.&set := $00000100;
  47396. end;
  47397. procedure TINT_IFS2.clearU6TXIF; inline;
  47398. begin
  47399. pTDefRegMap(@Self)^.clr := $00000100;
  47400. end;
  47401. procedure TINT_IFS2.setU6TXIF(thebits : TBits_1); inline;
  47402. begin
  47403. if thebits = 0 then
  47404. pTDefRegMap(@Self)^.clr := $00000100
  47405. else
  47406. pTDefRegMap(@Self)^.&set := $00000100;
  47407. end;
  47408. function TINT_IFS2.getU6TXIF : TBits_1; inline;
  47409. begin
  47410. getU6TXIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  47411. end;
  47412. procedure TINT_IFS2.setU5EIF; inline;
  47413. begin
  47414. pTDefRegMap(@Self)^.&set := $00000200;
  47415. end;
  47416. procedure TINT_IFS2.clearU5EIF; inline;
  47417. begin
  47418. pTDefRegMap(@Self)^.clr := $00000200;
  47419. end;
  47420. procedure TINT_IFS2.setU5EIF(thebits : TBits_1); inline;
  47421. begin
  47422. if thebits = 0 then
  47423. pTDefRegMap(@Self)^.clr := $00000200
  47424. else
  47425. pTDefRegMap(@Self)^.&set := $00000200;
  47426. end;
  47427. function TINT_IFS2.getU5EIF : TBits_1; inline;
  47428. begin
  47429. getU5EIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  47430. end;
  47431. procedure TINT_IFS2.setU5RXIF; inline;
  47432. begin
  47433. pTDefRegMap(@Self)^.&set := $00000400;
  47434. end;
  47435. procedure TINT_IFS2.clearU5RXIF; inline;
  47436. begin
  47437. pTDefRegMap(@Self)^.clr := $00000400;
  47438. end;
  47439. procedure TINT_IFS2.setU5RXIF(thebits : TBits_1); inline;
  47440. begin
  47441. if thebits = 0 then
  47442. pTDefRegMap(@Self)^.clr := $00000400
  47443. else
  47444. pTDefRegMap(@Self)^.&set := $00000400;
  47445. end;
  47446. function TINT_IFS2.getU5RXIF : TBits_1; inline;
  47447. begin
  47448. getU5RXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  47449. end;
  47450. procedure TINT_IFS2.setU5TXIF; inline;
  47451. begin
  47452. pTDefRegMap(@Self)^.&set := $00000800;
  47453. end;
  47454. procedure TINT_IFS2.clearU5TXIF; inline;
  47455. begin
  47456. pTDefRegMap(@Self)^.clr := $00000800;
  47457. end;
  47458. procedure TINT_IFS2.setU5TXIF(thebits : TBits_1); inline;
  47459. begin
  47460. if thebits = 0 then
  47461. pTDefRegMap(@Self)^.clr := $00000800
  47462. else
  47463. pTDefRegMap(@Self)^.&set := $00000800;
  47464. end;
  47465. function TINT_IFS2.getU5TXIF : TBits_1; inline;
  47466. begin
  47467. getU5TXIF := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  47468. end;
  47469. procedure TINT_IFS2.setw(thebits : TBits_32); inline;
  47470. begin
  47471. pTDefRegMap(@Self)^.val := thebits;
  47472. end;
  47473. function TINT_IFS2.getw : TBits_32; inline;
  47474. begin
  47475. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  47476. end;
  47477. procedure TINT_IEC0.setCTIE; inline;
  47478. begin
  47479. pTDefRegMap(@Self)^.&set := $00000001;
  47480. end;
  47481. procedure TINT_IEC0.clearCTIE; inline;
  47482. begin
  47483. pTDefRegMap(@Self)^.clr := $00000001;
  47484. end;
  47485. procedure TINT_IEC0.setCTIE(thebits : TBits_1); inline;
  47486. begin
  47487. if thebits = 0 then
  47488. pTDefRegMap(@Self)^.clr := $00000001
  47489. else
  47490. pTDefRegMap(@Self)^.&set := $00000001;
  47491. end;
  47492. function TINT_IEC0.getCTIE : TBits_1; inline;
  47493. begin
  47494. getCTIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  47495. end;
  47496. procedure TINT_IEC0.setCS0IE; inline;
  47497. begin
  47498. pTDefRegMap(@Self)^.&set := $00000002;
  47499. end;
  47500. procedure TINT_IEC0.clearCS0IE; inline;
  47501. begin
  47502. pTDefRegMap(@Self)^.clr := $00000002;
  47503. end;
  47504. procedure TINT_IEC0.setCS0IE(thebits : TBits_1); inline;
  47505. begin
  47506. if thebits = 0 then
  47507. pTDefRegMap(@Self)^.clr := $00000002
  47508. else
  47509. pTDefRegMap(@Self)^.&set := $00000002;
  47510. end;
  47511. function TINT_IEC0.getCS0IE : TBits_1; inline;
  47512. begin
  47513. getCS0IE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  47514. end;
  47515. procedure TINT_IEC0.setCS1IE; inline;
  47516. begin
  47517. pTDefRegMap(@Self)^.&set := $00000004;
  47518. end;
  47519. procedure TINT_IEC0.clearCS1IE; inline;
  47520. begin
  47521. pTDefRegMap(@Self)^.clr := $00000004;
  47522. end;
  47523. procedure TINT_IEC0.setCS1IE(thebits : TBits_1); inline;
  47524. begin
  47525. if thebits = 0 then
  47526. pTDefRegMap(@Self)^.clr := $00000004
  47527. else
  47528. pTDefRegMap(@Self)^.&set := $00000004;
  47529. end;
  47530. function TINT_IEC0.getCS1IE : TBits_1; inline;
  47531. begin
  47532. getCS1IE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  47533. end;
  47534. procedure TINT_IEC0.setINT0IE; inline;
  47535. begin
  47536. pTDefRegMap(@Self)^.&set := $00000008;
  47537. end;
  47538. procedure TINT_IEC0.clearINT0IE; inline;
  47539. begin
  47540. pTDefRegMap(@Self)^.clr := $00000008;
  47541. end;
  47542. procedure TINT_IEC0.setINT0IE(thebits : TBits_1); inline;
  47543. begin
  47544. if thebits = 0 then
  47545. pTDefRegMap(@Self)^.clr := $00000008
  47546. else
  47547. pTDefRegMap(@Self)^.&set := $00000008;
  47548. end;
  47549. function TINT_IEC0.getINT0IE : TBits_1; inline;
  47550. begin
  47551. getINT0IE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  47552. end;
  47553. procedure TINT_IEC0.setT1IE; inline;
  47554. begin
  47555. pTDefRegMap(@Self)^.&set := $00000010;
  47556. end;
  47557. procedure TINT_IEC0.clearT1IE; inline;
  47558. begin
  47559. pTDefRegMap(@Self)^.clr := $00000010;
  47560. end;
  47561. procedure TINT_IEC0.setT1IE(thebits : TBits_1); inline;
  47562. begin
  47563. if thebits = 0 then
  47564. pTDefRegMap(@Self)^.clr := $00000010
  47565. else
  47566. pTDefRegMap(@Self)^.&set := $00000010;
  47567. end;
  47568. function TINT_IEC0.getT1IE : TBits_1; inline;
  47569. begin
  47570. getT1IE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  47571. end;
  47572. procedure TINT_IEC0.setIC1IE; inline;
  47573. begin
  47574. pTDefRegMap(@Self)^.&set := $00000020;
  47575. end;
  47576. procedure TINT_IEC0.clearIC1IE; inline;
  47577. begin
  47578. pTDefRegMap(@Self)^.clr := $00000020;
  47579. end;
  47580. procedure TINT_IEC0.setIC1IE(thebits : TBits_1); inline;
  47581. begin
  47582. if thebits = 0 then
  47583. pTDefRegMap(@Self)^.clr := $00000020
  47584. else
  47585. pTDefRegMap(@Self)^.&set := $00000020;
  47586. end;
  47587. function TINT_IEC0.getIC1IE : TBits_1; inline;
  47588. begin
  47589. getIC1IE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  47590. end;
  47591. procedure TINT_IEC0.setOC1IE; inline;
  47592. begin
  47593. pTDefRegMap(@Self)^.&set := $00000040;
  47594. end;
  47595. procedure TINT_IEC0.clearOC1IE; inline;
  47596. begin
  47597. pTDefRegMap(@Self)^.clr := $00000040;
  47598. end;
  47599. procedure TINT_IEC0.setOC1IE(thebits : TBits_1); inline;
  47600. begin
  47601. if thebits = 0 then
  47602. pTDefRegMap(@Self)^.clr := $00000040
  47603. else
  47604. pTDefRegMap(@Self)^.&set := $00000040;
  47605. end;
  47606. function TINT_IEC0.getOC1IE : TBits_1; inline;
  47607. begin
  47608. getOC1IE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  47609. end;
  47610. procedure TINT_IEC0.setINT1IE; inline;
  47611. begin
  47612. pTDefRegMap(@Self)^.&set := $00000080;
  47613. end;
  47614. procedure TINT_IEC0.clearINT1IE; inline;
  47615. begin
  47616. pTDefRegMap(@Self)^.clr := $00000080;
  47617. end;
  47618. procedure TINT_IEC0.setINT1IE(thebits : TBits_1); inline;
  47619. begin
  47620. if thebits = 0 then
  47621. pTDefRegMap(@Self)^.clr := $00000080
  47622. else
  47623. pTDefRegMap(@Self)^.&set := $00000080;
  47624. end;
  47625. function TINT_IEC0.getINT1IE : TBits_1; inline;
  47626. begin
  47627. getINT1IE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  47628. end;
  47629. procedure TINT_IEC0.setT2IE; inline;
  47630. begin
  47631. pTDefRegMap(@Self)^.&set := $00000100;
  47632. end;
  47633. procedure TINT_IEC0.clearT2IE; inline;
  47634. begin
  47635. pTDefRegMap(@Self)^.clr := $00000100;
  47636. end;
  47637. procedure TINT_IEC0.setT2IE(thebits : TBits_1); inline;
  47638. begin
  47639. if thebits = 0 then
  47640. pTDefRegMap(@Self)^.clr := $00000100
  47641. else
  47642. pTDefRegMap(@Self)^.&set := $00000100;
  47643. end;
  47644. function TINT_IEC0.getT2IE : TBits_1; inline;
  47645. begin
  47646. getT2IE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  47647. end;
  47648. procedure TINT_IEC0.setIC2IE; inline;
  47649. begin
  47650. pTDefRegMap(@Self)^.&set := $00000200;
  47651. end;
  47652. procedure TINT_IEC0.clearIC2IE; inline;
  47653. begin
  47654. pTDefRegMap(@Self)^.clr := $00000200;
  47655. end;
  47656. procedure TINT_IEC0.setIC2IE(thebits : TBits_1); inline;
  47657. begin
  47658. if thebits = 0 then
  47659. pTDefRegMap(@Self)^.clr := $00000200
  47660. else
  47661. pTDefRegMap(@Self)^.&set := $00000200;
  47662. end;
  47663. function TINT_IEC0.getIC2IE : TBits_1; inline;
  47664. begin
  47665. getIC2IE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  47666. end;
  47667. procedure TINT_IEC0.setOC2IE; inline;
  47668. begin
  47669. pTDefRegMap(@Self)^.&set := $00000400;
  47670. end;
  47671. procedure TINT_IEC0.clearOC2IE; inline;
  47672. begin
  47673. pTDefRegMap(@Self)^.clr := $00000400;
  47674. end;
  47675. procedure TINT_IEC0.setOC2IE(thebits : TBits_1); inline;
  47676. begin
  47677. if thebits = 0 then
  47678. pTDefRegMap(@Self)^.clr := $00000400
  47679. else
  47680. pTDefRegMap(@Self)^.&set := $00000400;
  47681. end;
  47682. function TINT_IEC0.getOC2IE : TBits_1; inline;
  47683. begin
  47684. getOC2IE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  47685. end;
  47686. procedure TINT_IEC0.setINT2IE; inline;
  47687. begin
  47688. pTDefRegMap(@Self)^.&set := $00000800;
  47689. end;
  47690. procedure TINT_IEC0.clearINT2IE; inline;
  47691. begin
  47692. pTDefRegMap(@Self)^.clr := $00000800;
  47693. end;
  47694. procedure TINT_IEC0.setINT2IE(thebits : TBits_1); inline;
  47695. begin
  47696. if thebits = 0 then
  47697. pTDefRegMap(@Self)^.clr := $00000800
  47698. else
  47699. pTDefRegMap(@Self)^.&set := $00000800;
  47700. end;
  47701. function TINT_IEC0.getINT2IE : TBits_1; inline;
  47702. begin
  47703. getINT2IE := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  47704. end;
  47705. procedure TINT_IEC0.setT3IE; inline;
  47706. begin
  47707. pTDefRegMap(@Self)^.&set := $00001000;
  47708. end;
  47709. procedure TINT_IEC0.clearT3IE; inline;
  47710. begin
  47711. pTDefRegMap(@Self)^.clr := $00001000;
  47712. end;
  47713. procedure TINT_IEC0.setT3IE(thebits : TBits_1); inline;
  47714. begin
  47715. if thebits = 0 then
  47716. pTDefRegMap(@Self)^.clr := $00001000
  47717. else
  47718. pTDefRegMap(@Self)^.&set := $00001000;
  47719. end;
  47720. function TINT_IEC0.getT3IE : TBits_1; inline;
  47721. begin
  47722. getT3IE := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  47723. end;
  47724. procedure TINT_IEC0.setIC3IE; inline;
  47725. begin
  47726. pTDefRegMap(@Self)^.&set := $00002000;
  47727. end;
  47728. procedure TINT_IEC0.clearIC3IE; inline;
  47729. begin
  47730. pTDefRegMap(@Self)^.clr := $00002000;
  47731. end;
  47732. procedure TINT_IEC0.setIC3IE(thebits : TBits_1); inline;
  47733. begin
  47734. if thebits = 0 then
  47735. pTDefRegMap(@Self)^.clr := $00002000
  47736. else
  47737. pTDefRegMap(@Self)^.&set := $00002000;
  47738. end;
  47739. function TINT_IEC0.getIC3IE : TBits_1; inline;
  47740. begin
  47741. getIC3IE := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  47742. end;
  47743. procedure TINT_IEC0.setOC3IE; inline;
  47744. begin
  47745. pTDefRegMap(@Self)^.&set := $00004000;
  47746. end;
  47747. procedure TINT_IEC0.clearOC3IE; inline;
  47748. begin
  47749. pTDefRegMap(@Self)^.clr := $00004000;
  47750. end;
  47751. procedure TINT_IEC0.setOC3IE(thebits : TBits_1); inline;
  47752. begin
  47753. if thebits = 0 then
  47754. pTDefRegMap(@Self)^.clr := $00004000
  47755. else
  47756. pTDefRegMap(@Self)^.&set := $00004000;
  47757. end;
  47758. function TINT_IEC0.getOC3IE : TBits_1; inline;
  47759. begin
  47760. getOC3IE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  47761. end;
  47762. procedure TINT_IEC0.setINT3IE; inline;
  47763. begin
  47764. pTDefRegMap(@Self)^.&set := $00008000;
  47765. end;
  47766. procedure TINT_IEC0.clearINT3IE; inline;
  47767. begin
  47768. pTDefRegMap(@Self)^.clr := $00008000;
  47769. end;
  47770. procedure TINT_IEC0.setINT3IE(thebits : TBits_1); inline;
  47771. begin
  47772. if thebits = 0 then
  47773. pTDefRegMap(@Self)^.clr := $00008000
  47774. else
  47775. pTDefRegMap(@Self)^.&set := $00008000;
  47776. end;
  47777. function TINT_IEC0.getINT3IE : TBits_1; inline;
  47778. begin
  47779. getINT3IE := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  47780. end;
  47781. procedure TINT_IEC0.setT4IE; inline;
  47782. begin
  47783. pTDefRegMap(@Self)^.&set := $00010000;
  47784. end;
  47785. procedure TINT_IEC0.clearT4IE; inline;
  47786. begin
  47787. pTDefRegMap(@Self)^.clr := $00010000;
  47788. end;
  47789. procedure TINT_IEC0.setT4IE(thebits : TBits_1); inline;
  47790. begin
  47791. if thebits = 0 then
  47792. pTDefRegMap(@Self)^.clr := $00010000
  47793. else
  47794. pTDefRegMap(@Self)^.&set := $00010000;
  47795. end;
  47796. function TINT_IEC0.getT4IE : TBits_1; inline;
  47797. begin
  47798. getT4IE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  47799. end;
  47800. procedure TINT_IEC0.setIC4IE; inline;
  47801. begin
  47802. pTDefRegMap(@Self)^.&set := $00020000;
  47803. end;
  47804. procedure TINT_IEC0.clearIC4IE; inline;
  47805. begin
  47806. pTDefRegMap(@Self)^.clr := $00020000;
  47807. end;
  47808. procedure TINT_IEC0.setIC4IE(thebits : TBits_1); inline;
  47809. begin
  47810. if thebits = 0 then
  47811. pTDefRegMap(@Self)^.clr := $00020000
  47812. else
  47813. pTDefRegMap(@Self)^.&set := $00020000;
  47814. end;
  47815. function TINT_IEC0.getIC4IE : TBits_1; inline;
  47816. begin
  47817. getIC4IE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  47818. end;
  47819. procedure TINT_IEC0.setOC4IE; inline;
  47820. begin
  47821. pTDefRegMap(@Self)^.&set := $00040000;
  47822. end;
  47823. procedure TINT_IEC0.clearOC4IE; inline;
  47824. begin
  47825. pTDefRegMap(@Self)^.clr := $00040000;
  47826. end;
  47827. procedure TINT_IEC0.setOC4IE(thebits : TBits_1); inline;
  47828. begin
  47829. if thebits = 0 then
  47830. pTDefRegMap(@Self)^.clr := $00040000
  47831. else
  47832. pTDefRegMap(@Self)^.&set := $00040000;
  47833. end;
  47834. function TINT_IEC0.getOC4IE : TBits_1; inline;
  47835. begin
  47836. getOC4IE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  47837. end;
  47838. procedure TINT_IEC0.setINT4IE; inline;
  47839. begin
  47840. pTDefRegMap(@Self)^.&set := $00080000;
  47841. end;
  47842. procedure TINT_IEC0.clearINT4IE; inline;
  47843. begin
  47844. pTDefRegMap(@Self)^.clr := $00080000;
  47845. end;
  47846. procedure TINT_IEC0.setINT4IE(thebits : TBits_1); inline;
  47847. begin
  47848. if thebits = 0 then
  47849. pTDefRegMap(@Self)^.clr := $00080000
  47850. else
  47851. pTDefRegMap(@Self)^.&set := $00080000;
  47852. end;
  47853. function TINT_IEC0.getINT4IE : TBits_1; inline;
  47854. begin
  47855. getINT4IE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  47856. end;
  47857. procedure TINT_IEC0.setT5IE; inline;
  47858. begin
  47859. pTDefRegMap(@Self)^.&set := $00100000;
  47860. end;
  47861. procedure TINT_IEC0.clearT5IE; inline;
  47862. begin
  47863. pTDefRegMap(@Self)^.clr := $00100000;
  47864. end;
  47865. procedure TINT_IEC0.setT5IE(thebits : TBits_1); inline;
  47866. begin
  47867. if thebits = 0 then
  47868. pTDefRegMap(@Self)^.clr := $00100000
  47869. else
  47870. pTDefRegMap(@Self)^.&set := $00100000;
  47871. end;
  47872. function TINT_IEC0.getT5IE : TBits_1; inline;
  47873. begin
  47874. getT5IE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  47875. end;
  47876. procedure TINT_IEC0.setIC5IE; inline;
  47877. begin
  47878. pTDefRegMap(@Self)^.&set := $00200000;
  47879. end;
  47880. procedure TINT_IEC0.clearIC5IE; inline;
  47881. begin
  47882. pTDefRegMap(@Self)^.clr := $00200000;
  47883. end;
  47884. procedure TINT_IEC0.setIC5IE(thebits : TBits_1); inline;
  47885. begin
  47886. if thebits = 0 then
  47887. pTDefRegMap(@Self)^.clr := $00200000
  47888. else
  47889. pTDefRegMap(@Self)^.&set := $00200000;
  47890. end;
  47891. function TINT_IEC0.getIC5IE : TBits_1; inline;
  47892. begin
  47893. getIC5IE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  47894. end;
  47895. procedure TINT_IEC0.setOC5IE; inline;
  47896. begin
  47897. pTDefRegMap(@Self)^.&set := $00400000;
  47898. end;
  47899. procedure TINT_IEC0.clearOC5IE; inline;
  47900. begin
  47901. pTDefRegMap(@Self)^.clr := $00400000;
  47902. end;
  47903. procedure TINT_IEC0.setOC5IE(thebits : TBits_1); inline;
  47904. begin
  47905. if thebits = 0 then
  47906. pTDefRegMap(@Self)^.clr := $00400000
  47907. else
  47908. pTDefRegMap(@Self)^.&set := $00400000;
  47909. end;
  47910. function TINT_IEC0.getOC5IE : TBits_1; inline;
  47911. begin
  47912. getOC5IE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  47913. end;
  47914. procedure TINT_IEC0.setU1EIE; inline;
  47915. begin
  47916. pTDefRegMap(@Self)^.&set := $04000000;
  47917. end;
  47918. procedure TINT_IEC0.clearU1EIE; inline;
  47919. begin
  47920. pTDefRegMap(@Self)^.clr := $04000000;
  47921. end;
  47922. procedure TINT_IEC0.setU1EIE(thebits : TBits_1); inline;
  47923. begin
  47924. if thebits = 0 then
  47925. pTDefRegMap(@Self)^.clr := $04000000
  47926. else
  47927. pTDefRegMap(@Self)^.&set := $04000000;
  47928. end;
  47929. function TINT_IEC0.getU1EIE : TBits_1; inline;
  47930. begin
  47931. getU1EIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  47932. end;
  47933. procedure TINT_IEC0.setU1RXIE; inline;
  47934. begin
  47935. pTDefRegMap(@Self)^.&set := $08000000;
  47936. end;
  47937. procedure TINT_IEC0.clearU1RXIE; inline;
  47938. begin
  47939. pTDefRegMap(@Self)^.clr := $08000000;
  47940. end;
  47941. procedure TINT_IEC0.setU1RXIE(thebits : TBits_1); inline;
  47942. begin
  47943. if thebits = 0 then
  47944. pTDefRegMap(@Self)^.clr := $08000000
  47945. else
  47946. pTDefRegMap(@Self)^.&set := $08000000;
  47947. end;
  47948. function TINT_IEC0.getU1RXIE : TBits_1; inline;
  47949. begin
  47950. getU1RXIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  47951. end;
  47952. procedure TINT_IEC0.setU1TXIE; inline;
  47953. begin
  47954. pTDefRegMap(@Self)^.&set := $10000000;
  47955. end;
  47956. procedure TINT_IEC0.clearU1TXIE; inline;
  47957. begin
  47958. pTDefRegMap(@Self)^.clr := $10000000;
  47959. end;
  47960. procedure TINT_IEC0.setU1TXIE(thebits : TBits_1); inline;
  47961. begin
  47962. if thebits = 0 then
  47963. pTDefRegMap(@Self)^.clr := $10000000
  47964. else
  47965. pTDefRegMap(@Self)^.&set := $10000000;
  47966. end;
  47967. function TINT_IEC0.getU1TXIE : TBits_1; inline;
  47968. begin
  47969. getU1TXIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  47970. end;
  47971. procedure TINT_IEC0.setI2C1BIE; inline;
  47972. begin
  47973. pTDefRegMap(@Self)^.&set := $20000000;
  47974. end;
  47975. procedure TINT_IEC0.clearI2C1BIE; inline;
  47976. begin
  47977. pTDefRegMap(@Self)^.clr := $20000000;
  47978. end;
  47979. procedure TINT_IEC0.setI2C1BIE(thebits : TBits_1); inline;
  47980. begin
  47981. if thebits = 0 then
  47982. pTDefRegMap(@Self)^.clr := $20000000
  47983. else
  47984. pTDefRegMap(@Self)^.&set := $20000000;
  47985. end;
  47986. function TINT_IEC0.getI2C1BIE : TBits_1; inline;
  47987. begin
  47988. getI2C1BIE := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  47989. end;
  47990. procedure TINT_IEC0.setI2C1SIE; inline;
  47991. begin
  47992. pTDefRegMap(@Self)^.&set := $40000000;
  47993. end;
  47994. procedure TINT_IEC0.clearI2C1SIE; inline;
  47995. begin
  47996. pTDefRegMap(@Self)^.clr := $40000000;
  47997. end;
  47998. procedure TINT_IEC0.setI2C1SIE(thebits : TBits_1); inline;
  47999. begin
  48000. if thebits = 0 then
  48001. pTDefRegMap(@Self)^.clr := $40000000
  48002. else
  48003. pTDefRegMap(@Self)^.&set := $40000000;
  48004. end;
  48005. function TINT_IEC0.getI2C1SIE : TBits_1; inline;
  48006. begin
  48007. getI2C1SIE := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  48008. end;
  48009. procedure TINT_IEC0.setI2C1MIE; inline;
  48010. begin
  48011. pTDefRegMap(@Self)^.&set := $80000000;
  48012. end;
  48013. procedure TINT_IEC0.clearI2C1MIE; inline;
  48014. begin
  48015. pTDefRegMap(@Self)^.clr := $80000000;
  48016. end;
  48017. procedure TINT_IEC0.setI2C1MIE(thebits : TBits_1); inline;
  48018. begin
  48019. if thebits = 0 then
  48020. pTDefRegMap(@Self)^.clr := $80000000
  48021. else
  48022. pTDefRegMap(@Self)^.&set := $80000000;
  48023. end;
  48024. function TINT_IEC0.getI2C1MIE : TBits_1; inline;
  48025. begin
  48026. getI2C1MIE := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  48027. end;
  48028. procedure TINT_IEC0.setU1AEIE; inline;
  48029. begin
  48030. pTDefRegMap(@Self)^.&set := $04000000;
  48031. end;
  48032. procedure TINT_IEC0.clearU1AEIE; inline;
  48033. begin
  48034. pTDefRegMap(@Self)^.clr := $04000000;
  48035. end;
  48036. procedure TINT_IEC0.setU1AEIE(thebits : TBits_1); inline;
  48037. begin
  48038. if thebits = 0 then
  48039. pTDefRegMap(@Self)^.clr := $04000000
  48040. else
  48041. pTDefRegMap(@Self)^.&set := $04000000;
  48042. end;
  48043. function TINT_IEC0.getU1AEIE : TBits_1; inline;
  48044. begin
  48045. getU1AEIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  48046. end;
  48047. procedure TINT_IEC0.setU1ARXIE; inline;
  48048. begin
  48049. pTDefRegMap(@Self)^.&set := $08000000;
  48050. end;
  48051. procedure TINT_IEC0.clearU1ARXIE; inline;
  48052. begin
  48053. pTDefRegMap(@Self)^.clr := $08000000;
  48054. end;
  48055. procedure TINT_IEC0.setU1ARXIE(thebits : TBits_1); inline;
  48056. begin
  48057. if thebits = 0 then
  48058. pTDefRegMap(@Self)^.clr := $08000000
  48059. else
  48060. pTDefRegMap(@Self)^.&set := $08000000;
  48061. end;
  48062. function TINT_IEC0.getU1ARXIE : TBits_1; inline;
  48063. begin
  48064. getU1ARXIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  48065. end;
  48066. procedure TINT_IEC0.setU1ATXIE; inline;
  48067. begin
  48068. pTDefRegMap(@Self)^.&set := $10000000;
  48069. end;
  48070. procedure TINT_IEC0.clearU1ATXIE; inline;
  48071. begin
  48072. pTDefRegMap(@Self)^.clr := $10000000;
  48073. end;
  48074. procedure TINT_IEC0.setU1ATXIE(thebits : TBits_1); inline;
  48075. begin
  48076. if thebits = 0 then
  48077. pTDefRegMap(@Self)^.clr := $10000000
  48078. else
  48079. pTDefRegMap(@Self)^.&set := $10000000;
  48080. end;
  48081. function TINT_IEC0.getU1ATXIE : TBits_1; inline;
  48082. begin
  48083. getU1ATXIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  48084. end;
  48085. procedure TINT_IEC0.setSPI3EIE; inline;
  48086. begin
  48087. pTDefRegMap(@Self)^.&set := $04000000;
  48088. end;
  48089. procedure TINT_IEC0.clearSPI3EIE; inline;
  48090. begin
  48091. pTDefRegMap(@Self)^.clr := $04000000;
  48092. end;
  48093. procedure TINT_IEC0.setSPI3EIE(thebits : TBits_1); inline;
  48094. begin
  48095. if thebits = 0 then
  48096. pTDefRegMap(@Self)^.clr := $04000000
  48097. else
  48098. pTDefRegMap(@Self)^.&set := $04000000;
  48099. end;
  48100. function TINT_IEC0.getSPI3EIE : TBits_1; inline;
  48101. begin
  48102. getSPI3EIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  48103. end;
  48104. procedure TINT_IEC0.setSPI3RXIE; inline;
  48105. begin
  48106. pTDefRegMap(@Self)^.&set := $08000000;
  48107. end;
  48108. procedure TINT_IEC0.clearSPI3RXIE; inline;
  48109. begin
  48110. pTDefRegMap(@Self)^.clr := $08000000;
  48111. end;
  48112. procedure TINT_IEC0.setSPI3RXIE(thebits : TBits_1); inline;
  48113. begin
  48114. if thebits = 0 then
  48115. pTDefRegMap(@Self)^.clr := $08000000
  48116. else
  48117. pTDefRegMap(@Self)^.&set := $08000000;
  48118. end;
  48119. function TINT_IEC0.getSPI3RXIE : TBits_1; inline;
  48120. begin
  48121. getSPI3RXIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  48122. end;
  48123. procedure TINT_IEC0.setSPI3TXIE; inline;
  48124. begin
  48125. pTDefRegMap(@Self)^.&set := $10000000;
  48126. end;
  48127. procedure TINT_IEC0.clearSPI3TXIE; inline;
  48128. begin
  48129. pTDefRegMap(@Self)^.clr := $10000000;
  48130. end;
  48131. procedure TINT_IEC0.setSPI3TXIE(thebits : TBits_1); inline;
  48132. begin
  48133. if thebits = 0 then
  48134. pTDefRegMap(@Self)^.clr := $10000000
  48135. else
  48136. pTDefRegMap(@Self)^.&set := $10000000;
  48137. end;
  48138. function TINT_IEC0.getSPI3TXIE : TBits_1; inline;
  48139. begin
  48140. getSPI3TXIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  48141. end;
  48142. procedure TINT_IEC0.setSPI1AEIE; inline;
  48143. begin
  48144. pTDefRegMap(@Self)^.&set := $04000000;
  48145. end;
  48146. procedure TINT_IEC0.clearSPI1AEIE; inline;
  48147. begin
  48148. pTDefRegMap(@Self)^.clr := $04000000;
  48149. end;
  48150. procedure TINT_IEC0.setSPI1AEIE(thebits : TBits_1); inline;
  48151. begin
  48152. if thebits = 0 then
  48153. pTDefRegMap(@Self)^.clr := $04000000
  48154. else
  48155. pTDefRegMap(@Self)^.&set := $04000000;
  48156. end;
  48157. function TINT_IEC0.getSPI1AEIE : TBits_1; inline;
  48158. begin
  48159. getSPI1AEIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  48160. end;
  48161. procedure TINT_IEC0.setSPI1ARXIE; inline;
  48162. begin
  48163. pTDefRegMap(@Self)^.&set := $08000000;
  48164. end;
  48165. procedure TINT_IEC0.clearSPI1ARXIE; inline;
  48166. begin
  48167. pTDefRegMap(@Self)^.clr := $08000000;
  48168. end;
  48169. procedure TINT_IEC0.setSPI1ARXIE(thebits : TBits_1); inline;
  48170. begin
  48171. if thebits = 0 then
  48172. pTDefRegMap(@Self)^.clr := $08000000
  48173. else
  48174. pTDefRegMap(@Self)^.&set := $08000000;
  48175. end;
  48176. function TINT_IEC0.getSPI1ARXIE : TBits_1; inline;
  48177. begin
  48178. getSPI1ARXIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  48179. end;
  48180. procedure TINT_IEC0.setSPI1ATXIE; inline;
  48181. begin
  48182. pTDefRegMap(@Self)^.&set := $10000000;
  48183. end;
  48184. procedure TINT_IEC0.clearSPI1ATXIE; inline;
  48185. begin
  48186. pTDefRegMap(@Self)^.clr := $10000000;
  48187. end;
  48188. procedure TINT_IEC0.setSPI1ATXIE(thebits : TBits_1); inline;
  48189. begin
  48190. if thebits = 0 then
  48191. pTDefRegMap(@Self)^.clr := $10000000
  48192. else
  48193. pTDefRegMap(@Self)^.&set := $10000000;
  48194. end;
  48195. function TINT_IEC0.getSPI1ATXIE : TBits_1; inline;
  48196. begin
  48197. getSPI1ATXIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  48198. end;
  48199. procedure TINT_IEC0.setI2C3BIE; inline;
  48200. begin
  48201. pTDefRegMap(@Self)^.&set := $04000000;
  48202. end;
  48203. procedure TINT_IEC0.clearI2C3BIE; inline;
  48204. begin
  48205. pTDefRegMap(@Self)^.clr := $04000000;
  48206. end;
  48207. procedure TINT_IEC0.setI2C3BIE(thebits : TBits_1); inline;
  48208. begin
  48209. if thebits = 0 then
  48210. pTDefRegMap(@Self)^.clr := $04000000
  48211. else
  48212. pTDefRegMap(@Self)^.&set := $04000000;
  48213. end;
  48214. function TINT_IEC0.getI2C3BIE : TBits_1; inline;
  48215. begin
  48216. getI2C3BIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  48217. end;
  48218. procedure TINT_IEC0.setI2C3SIE; inline;
  48219. begin
  48220. pTDefRegMap(@Self)^.&set := $08000000;
  48221. end;
  48222. procedure TINT_IEC0.clearI2C3SIE; inline;
  48223. begin
  48224. pTDefRegMap(@Self)^.clr := $08000000;
  48225. end;
  48226. procedure TINT_IEC0.setI2C3SIE(thebits : TBits_1); inline;
  48227. begin
  48228. if thebits = 0 then
  48229. pTDefRegMap(@Self)^.clr := $08000000
  48230. else
  48231. pTDefRegMap(@Self)^.&set := $08000000;
  48232. end;
  48233. function TINT_IEC0.getI2C3SIE : TBits_1; inline;
  48234. begin
  48235. getI2C3SIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  48236. end;
  48237. procedure TINT_IEC0.setI2C3MIE; inline;
  48238. begin
  48239. pTDefRegMap(@Self)^.&set := $10000000;
  48240. end;
  48241. procedure TINT_IEC0.clearI2C3MIE; inline;
  48242. begin
  48243. pTDefRegMap(@Self)^.clr := $10000000;
  48244. end;
  48245. procedure TINT_IEC0.setI2C3MIE(thebits : TBits_1); inline;
  48246. begin
  48247. if thebits = 0 then
  48248. pTDefRegMap(@Self)^.clr := $10000000
  48249. else
  48250. pTDefRegMap(@Self)^.&set := $10000000;
  48251. end;
  48252. function TINT_IEC0.getI2C3MIE : TBits_1; inline;
  48253. begin
  48254. getI2C3MIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  48255. end;
  48256. procedure TINT_IEC0.setI2C1ABIE; inline;
  48257. begin
  48258. pTDefRegMap(@Self)^.&set := $04000000;
  48259. end;
  48260. procedure TINT_IEC0.clearI2C1ABIE; inline;
  48261. begin
  48262. pTDefRegMap(@Self)^.clr := $04000000;
  48263. end;
  48264. procedure TINT_IEC0.setI2C1ABIE(thebits : TBits_1); inline;
  48265. begin
  48266. if thebits = 0 then
  48267. pTDefRegMap(@Self)^.clr := $04000000
  48268. else
  48269. pTDefRegMap(@Self)^.&set := $04000000;
  48270. end;
  48271. function TINT_IEC0.getI2C1ABIE : TBits_1; inline;
  48272. begin
  48273. getI2C1ABIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  48274. end;
  48275. procedure TINT_IEC0.setI2C1ASIE; inline;
  48276. begin
  48277. pTDefRegMap(@Self)^.&set := $08000000;
  48278. end;
  48279. procedure TINT_IEC0.clearI2C1ASIE; inline;
  48280. begin
  48281. pTDefRegMap(@Self)^.clr := $08000000;
  48282. end;
  48283. procedure TINT_IEC0.setI2C1ASIE(thebits : TBits_1); inline;
  48284. begin
  48285. if thebits = 0 then
  48286. pTDefRegMap(@Self)^.clr := $08000000
  48287. else
  48288. pTDefRegMap(@Self)^.&set := $08000000;
  48289. end;
  48290. function TINT_IEC0.getI2C1ASIE : TBits_1; inline;
  48291. begin
  48292. getI2C1ASIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  48293. end;
  48294. procedure TINT_IEC0.setI2C1AMIE; inline;
  48295. begin
  48296. pTDefRegMap(@Self)^.&set := $10000000;
  48297. end;
  48298. procedure TINT_IEC0.clearI2C1AMIE; inline;
  48299. begin
  48300. pTDefRegMap(@Self)^.clr := $10000000;
  48301. end;
  48302. procedure TINT_IEC0.setI2C1AMIE(thebits : TBits_1); inline;
  48303. begin
  48304. if thebits = 0 then
  48305. pTDefRegMap(@Self)^.clr := $10000000
  48306. else
  48307. pTDefRegMap(@Self)^.&set := $10000000;
  48308. end;
  48309. function TINT_IEC0.getI2C1AMIE : TBits_1; inline;
  48310. begin
  48311. getI2C1AMIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  48312. end;
  48313. procedure TINT_IEC0.setw(thebits : TBits_32); inline;
  48314. begin
  48315. pTDefRegMap(@Self)^.val := thebits;
  48316. end;
  48317. function TINT_IEC0.getw : TBits_32; inline;
  48318. begin
  48319. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  48320. end;
  48321. procedure TINT_IEC1.setCNIE; inline;
  48322. begin
  48323. pTDefRegMap(@Self)^.&set := $00000001;
  48324. end;
  48325. procedure TINT_IEC1.clearCNIE; inline;
  48326. begin
  48327. pTDefRegMap(@Self)^.clr := $00000001;
  48328. end;
  48329. procedure TINT_IEC1.setCNIE(thebits : TBits_1); inline;
  48330. begin
  48331. if thebits = 0 then
  48332. pTDefRegMap(@Self)^.clr := $00000001
  48333. else
  48334. pTDefRegMap(@Self)^.&set := $00000001;
  48335. end;
  48336. function TINT_IEC1.getCNIE : TBits_1; inline;
  48337. begin
  48338. getCNIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  48339. end;
  48340. procedure TINT_IEC1.setAD1IE; inline;
  48341. begin
  48342. pTDefRegMap(@Self)^.&set := $00000002;
  48343. end;
  48344. procedure TINT_IEC1.clearAD1IE; inline;
  48345. begin
  48346. pTDefRegMap(@Self)^.clr := $00000002;
  48347. end;
  48348. procedure TINT_IEC1.setAD1IE(thebits : TBits_1); inline;
  48349. begin
  48350. if thebits = 0 then
  48351. pTDefRegMap(@Self)^.clr := $00000002
  48352. else
  48353. pTDefRegMap(@Self)^.&set := $00000002;
  48354. end;
  48355. function TINT_IEC1.getAD1IE : TBits_1; inline;
  48356. begin
  48357. getAD1IE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  48358. end;
  48359. procedure TINT_IEC1.setPMPIE; inline;
  48360. begin
  48361. pTDefRegMap(@Self)^.&set := $00000004;
  48362. end;
  48363. procedure TINT_IEC1.clearPMPIE; inline;
  48364. begin
  48365. pTDefRegMap(@Self)^.clr := $00000004;
  48366. end;
  48367. procedure TINT_IEC1.setPMPIE(thebits : TBits_1); inline;
  48368. begin
  48369. if thebits = 0 then
  48370. pTDefRegMap(@Self)^.clr := $00000004
  48371. else
  48372. pTDefRegMap(@Self)^.&set := $00000004;
  48373. end;
  48374. function TINT_IEC1.getPMPIE : TBits_1; inline;
  48375. begin
  48376. getPMPIE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  48377. end;
  48378. procedure TINT_IEC1.setCMP1IE; inline;
  48379. begin
  48380. pTDefRegMap(@Self)^.&set := $00000008;
  48381. end;
  48382. procedure TINT_IEC1.clearCMP1IE; inline;
  48383. begin
  48384. pTDefRegMap(@Self)^.clr := $00000008;
  48385. end;
  48386. procedure TINT_IEC1.setCMP1IE(thebits : TBits_1); inline;
  48387. begin
  48388. if thebits = 0 then
  48389. pTDefRegMap(@Self)^.clr := $00000008
  48390. else
  48391. pTDefRegMap(@Self)^.&set := $00000008;
  48392. end;
  48393. function TINT_IEC1.getCMP1IE : TBits_1; inline;
  48394. begin
  48395. getCMP1IE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  48396. end;
  48397. procedure TINT_IEC1.setCMP2IE; inline;
  48398. begin
  48399. pTDefRegMap(@Self)^.&set := $00000010;
  48400. end;
  48401. procedure TINT_IEC1.clearCMP2IE; inline;
  48402. begin
  48403. pTDefRegMap(@Self)^.clr := $00000010;
  48404. end;
  48405. procedure TINT_IEC1.setCMP2IE(thebits : TBits_1); inline;
  48406. begin
  48407. if thebits = 0 then
  48408. pTDefRegMap(@Self)^.clr := $00000010
  48409. else
  48410. pTDefRegMap(@Self)^.&set := $00000010;
  48411. end;
  48412. function TINT_IEC1.getCMP2IE : TBits_1; inline;
  48413. begin
  48414. getCMP2IE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  48415. end;
  48416. procedure TINT_IEC1.setU3EIE; inline;
  48417. begin
  48418. pTDefRegMap(@Self)^.&set := $00000020;
  48419. end;
  48420. procedure TINT_IEC1.clearU3EIE; inline;
  48421. begin
  48422. pTDefRegMap(@Self)^.clr := $00000020;
  48423. end;
  48424. procedure TINT_IEC1.setU3EIE(thebits : TBits_1); inline;
  48425. begin
  48426. if thebits = 0 then
  48427. pTDefRegMap(@Self)^.clr := $00000020
  48428. else
  48429. pTDefRegMap(@Self)^.&set := $00000020;
  48430. end;
  48431. function TINT_IEC1.getU3EIE : TBits_1; inline;
  48432. begin
  48433. getU3EIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  48434. end;
  48435. procedure TINT_IEC1.setU3RXIE; inline;
  48436. begin
  48437. pTDefRegMap(@Self)^.&set := $00000040;
  48438. end;
  48439. procedure TINT_IEC1.clearU3RXIE; inline;
  48440. begin
  48441. pTDefRegMap(@Self)^.clr := $00000040;
  48442. end;
  48443. procedure TINT_IEC1.setU3RXIE(thebits : TBits_1); inline;
  48444. begin
  48445. if thebits = 0 then
  48446. pTDefRegMap(@Self)^.clr := $00000040
  48447. else
  48448. pTDefRegMap(@Self)^.&set := $00000040;
  48449. end;
  48450. function TINT_IEC1.getU3RXIE : TBits_1; inline;
  48451. begin
  48452. getU3RXIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  48453. end;
  48454. procedure TINT_IEC1.setU3TXIE; inline;
  48455. begin
  48456. pTDefRegMap(@Self)^.&set := $00000080;
  48457. end;
  48458. procedure TINT_IEC1.clearU3TXIE; inline;
  48459. begin
  48460. pTDefRegMap(@Self)^.clr := $00000080;
  48461. end;
  48462. procedure TINT_IEC1.setU3TXIE(thebits : TBits_1); inline;
  48463. begin
  48464. if thebits = 0 then
  48465. pTDefRegMap(@Self)^.clr := $00000080
  48466. else
  48467. pTDefRegMap(@Self)^.&set := $00000080;
  48468. end;
  48469. function TINT_IEC1.getU3TXIE : TBits_1; inline;
  48470. begin
  48471. getU3TXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  48472. end;
  48473. procedure TINT_IEC1.setU2EIE; inline;
  48474. begin
  48475. pTDefRegMap(@Self)^.&set := $00000100;
  48476. end;
  48477. procedure TINT_IEC1.clearU2EIE; inline;
  48478. begin
  48479. pTDefRegMap(@Self)^.clr := $00000100;
  48480. end;
  48481. procedure TINT_IEC1.setU2EIE(thebits : TBits_1); inline;
  48482. begin
  48483. if thebits = 0 then
  48484. pTDefRegMap(@Self)^.clr := $00000100
  48485. else
  48486. pTDefRegMap(@Self)^.&set := $00000100;
  48487. end;
  48488. function TINT_IEC1.getU2EIE : TBits_1; inline;
  48489. begin
  48490. getU2EIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  48491. end;
  48492. procedure TINT_IEC1.setU2RXIE; inline;
  48493. begin
  48494. pTDefRegMap(@Self)^.&set := $00000200;
  48495. end;
  48496. procedure TINT_IEC1.clearU2RXIE; inline;
  48497. begin
  48498. pTDefRegMap(@Self)^.clr := $00000200;
  48499. end;
  48500. procedure TINT_IEC1.setU2RXIE(thebits : TBits_1); inline;
  48501. begin
  48502. if thebits = 0 then
  48503. pTDefRegMap(@Self)^.clr := $00000200
  48504. else
  48505. pTDefRegMap(@Self)^.&set := $00000200;
  48506. end;
  48507. function TINT_IEC1.getU2RXIE : TBits_1; inline;
  48508. begin
  48509. getU2RXIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  48510. end;
  48511. procedure TINT_IEC1.setU2TXIE; inline;
  48512. begin
  48513. pTDefRegMap(@Self)^.&set := $00000400;
  48514. end;
  48515. procedure TINT_IEC1.clearU2TXIE; inline;
  48516. begin
  48517. pTDefRegMap(@Self)^.clr := $00000400;
  48518. end;
  48519. procedure TINT_IEC1.setU2TXIE(thebits : TBits_1); inline;
  48520. begin
  48521. if thebits = 0 then
  48522. pTDefRegMap(@Self)^.clr := $00000400
  48523. else
  48524. pTDefRegMap(@Self)^.&set := $00000400;
  48525. end;
  48526. function TINT_IEC1.getU2TXIE : TBits_1; inline;
  48527. begin
  48528. getU2TXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  48529. end;
  48530. procedure TINT_IEC1.setFSCMIE; inline;
  48531. begin
  48532. pTDefRegMap(@Self)^.&set := $00004000;
  48533. end;
  48534. procedure TINT_IEC1.clearFSCMIE; inline;
  48535. begin
  48536. pTDefRegMap(@Self)^.clr := $00004000;
  48537. end;
  48538. procedure TINT_IEC1.setFSCMIE(thebits : TBits_1); inline;
  48539. begin
  48540. if thebits = 0 then
  48541. pTDefRegMap(@Self)^.clr := $00004000
  48542. else
  48543. pTDefRegMap(@Self)^.&set := $00004000;
  48544. end;
  48545. function TINT_IEC1.getFSCMIE : TBits_1; inline;
  48546. begin
  48547. getFSCMIE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  48548. end;
  48549. procedure TINT_IEC1.setRTCCIE; inline;
  48550. begin
  48551. pTDefRegMap(@Self)^.&set := $00008000;
  48552. end;
  48553. procedure TINT_IEC1.clearRTCCIE; inline;
  48554. begin
  48555. pTDefRegMap(@Self)^.clr := $00008000;
  48556. end;
  48557. procedure TINT_IEC1.setRTCCIE(thebits : TBits_1); inline;
  48558. begin
  48559. if thebits = 0 then
  48560. pTDefRegMap(@Self)^.clr := $00008000
  48561. else
  48562. pTDefRegMap(@Self)^.&set := $00008000;
  48563. end;
  48564. function TINT_IEC1.getRTCCIE : TBits_1; inline;
  48565. begin
  48566. getRTCCIE := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  48567. end;
  48568. procedure TINT_IEC1.setDMA0IE; inline;
  48569. begin
  48570. pTDefRegMap(@Self)^.&set := $00010000;
  48571. end;
  48572. procedure TINT_IEC1.clearDMA0IE; inline;
  48573. begin
  48574. pTDefRegMap(@Self)^.clr := $00010000;
  48575. end;
  48576. procedure TINT_IEC1.setDMA0IE(thebits : TBits_1); inline;
  48577. begin
  48578. if thebits = 0 then
  48579. pTDefRegMap(@Self)^.clr := $00010000
  48580. else
  48581. pTDefRegMap(@Self)^.&set := $00010000;
  48582. end;
  48583. function TINT_IEC1.getDMA0IE : TBits_1; inline;
  48584. begin
  48585. getDMA0IE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  48586. end;
  48587. procedure TINT_IEC1.setDMA1IE; inline;
  48588. begin
  48589. pTDefRegMap(@Self)^.&set := $00020000;
  48590. end;
  48591. procedure TINT_IEC1.clearDMA1IE; inline;
  48592. begin
  48593. pTDefRegMap(@Self)^.clr := $00020000;
  48594. end;
  48595. procedure TINT_IEC1.setDMA1IE(thebits : TBits_1); inline;
  48596. begin
  48597. if thebits = 0 then
  48598. pTDefRegMap(@Self)^.clr := $00020000
  48599. else
  48600. pTDefRegMap(@Self)^.&set := $00020000;
  48601. end;
  48602. function TINT_IEC1.getDMA1IE : TBits_1; inline;
  48603. begin
  48604. getDMA1IE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  48605. end;
  48606. procedure TINT_IEC1.setDMA2IE; inline;
  48607. begin
  48608. pTDefRegMap(@Self)^.&set := $00040000;
  48609. end;
  48610. procedure TINT_IEC1.clearDMA2IE; inline;
  48611. begin
  48612. pTDefRegMap(@Self)^.clr := $00040000;
  48613. end;
  48614. procedure TINT_IEC1.setDMA2IE(thebits : TBits_1); inline;
  48615. begin
  48616. if thebits = 0 then
  48617. pTDefRegMap(@Self)^.clr := $00040000
  48618. else
  48619. pTDefRegMap(@Self)^.&set := $00040000;
  48620. end;
  48621. function TINT_IEC1.getDMA2IE : TBits_1; inline;
  48622. begin
  48623. getDMA2IE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  48624. end;
  48625. procedure TINT_IEC1.setDMA3IE; inline;
  48626. begin
  48627. pTDefRegMap(@Self)^.&set := $00080000;
  48628. end;
  48629. procedure TINT_IEC1.clearDMA3IE; inline;
  48630. begin
  48631. pTDefRegMap(@Self)^.clr := $00080000;
  48632. end;
  48633. procedure TINT_IEC1.setDMA3IE(thebits : TBits_1); inline;
  48634. begin
  48635. if thebits = 0 then
  48636. pTDefRegMap(@Self)^.clr := $00080000
  48637. else
  48638. pTDefRegMap(@Self)^.&set := $00080000;
  48639. end;
  48640. function TINT_IEC1.getDMA3IE : TBits_1; inline;
  48641. begin
  48642. getDMA3IE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  48643. end;
  48644. procedure TINT_IEC1.setFCEIE; inline;
  48645. begin
  48646. pTDefRegMap(@Self)^.&set := $01000000;
  48647. end;
  48648. procedure TINT_IEC1.clearFCEIE; inline;
  48649. begin
  48650. pTDefRegMap(@Self)^.clr := $01000000;
  48651. end;
  48652. procedure TINT_IEC1.setFCEIE(thebits : TBits_1); inline;
  48653. begin
  48654. if thebits = 0 then
  48655. pTDefRegMap(@Self)^.clr := $01000000
  48656. else
  48657. pTDefRegMap(@Self)^.&set := $01000000;
  48658. end;
  48659. function TINT_IEC1.getFCEIE : TBits_1; inline;
  48660. begin
  48661. getFCEIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  48662. end;
  48663. procedure TINT_IEC1.setUSBIE; inline;
  48664. begin
  48665. pTDefRegMap(@Self)^.&set := $02000000;
  48666. end;
  48667. procedure TINT_IEC1.clearUSBIE; inline;
  48668. begin
  48669. pTDefRegMap(@Self)^.clr := $02000000;
  48670. end;
  48671. procedure TINT_IEC1.setUSBIE(thebits : TBits_1); inline;
  48672. begin
  48673. if thebits = 0 then
  48674. pTDefRegMap(@Self)^.clr := $02000000
  48675. else
  48676. pTDefRegMap(@Self)^.&set := $02000000;
  48677. end;
  48678. function TINT_IEC1.getUSBIE : TBits_1; inline;
  48679. begin
  48680. getUSBIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  48681. end;
  48682. procedure TINT_IEC1.setCAN1IE; inline;
  48683. begin
  48684. pTDefRegMap(@Self)^.&set := $04000000;
  48685. end;
  48686. procedure TINT_IEC1.clearCAN1IE; inline;
  48687. begin
  48688. pTDefRegMap(@Self)^.clr := $04000000;
  48689. end;
  48690. procedure TINT_IEC1.setCAN1IE(thebits : TBits_1); inline;
  48691. begin
  48692. if thebits = 0 then
  48693. pTDefRegMap(@Self)^.clr := $04000000
  48694. else
  48695. pTDefRegMap(@Self)^.&set := $04000000;
  48696. end;
  48697. function TINT_IEC1.getCAN1IE : TBits_1; inline;
  48698. begin
  48699. getCAN1IE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  48700. end;
  48701. procedure TINT_IEC1.setIC1EIE; inline;
  48702. begin
  48703. pTDefRegMap(@Self)^.&set := $20000000;
  48704. end;
  48705. procedure TINT_IEC1.clearIC1EIE; inline;
  48706. begin
  48707. pTDefRegMap(@Self)^.clr := $20000000;
  48708. end;
  48709. procedure TINT_IEC1.setIC1EIE(thebits : TBits_1); inline;
  48710. begin
  48711. if thebits = 0 then
  48712. pTDefRegMap(@Self)^.clr := $20000000
  48713. else
  48714. pTDefRegMap(@Self)^.&set := $20000000;
  48715. end;
  48716. function TINT_IEC1.getIC1EIE : TBits_1; inline;
  48717. begin
  48718. getIC1EIE := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  48719. end;
  48720. procedure TINT_IEC1.setIC2EIE; inline;
  48721. begin
  48722. pTDefRegMap(@Self)^.&set := $40000000;
  48723. end;
  48724. procedure TINT_IEC1.clearIC2EIE; inline;
  48725. begin
  48726. pTDefRegMap(@Self)^.clr := $40000000;
  48727. end;
  48728. procedure TINT_IEC1.setIC2EIE(thebits : TBits_1); inline;
  48729. begin
  48730. if thebits = 0 then
  48731. pTDefRegMap(@Self)^.clr := $40000000
  48732. else
  48733. pTDefRegMap(@Self)^.&set := $40000000;
  48734. end;
  48735. function TINT_IEC1.getIC2EIE : TBits_1; inline;
  48736. begin
  48737. getIC2EIE := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  48738. end;
  48739. procedure TINT_IEC1.setIC3EIE; inline;
  48740. begin
  48741. pTDefRegMap(@Self)^.&set := $80000000;
  48742. end;
  48743. procedure TINT_IEC1.clearIC3EIE; inline;
  48744. begin
  48745. pTDefRegMap(@Self)^.clr := $80000000;
  48746. end;
  48747. procedure TINT_IEC1.setIC3EIE(thebits : TBits_1); inline;
  48748. begin
  48749. if thebits = 0 then
  48750. pTDefRegMap(@Self)^.clr := $80000000
  48751. else
  48752. pTDefRegMap(@Self)^.&set := $80000000;
  48753. end;
  48754. function TINT_IEC1.getIC3EIE : TBits_1; inline;
  48755. begin
  48756. getIC3EIE := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  48757. end;
  48758. procedure TINT_IEC1.setU2AEIE; inline;
  48759. begin
  48760. pTDefRegMap(@Self)^.&set := $00000020;
  48761. end;
  48762. procedure TINT_IEC1.clearU2AEIE; inline;
  48763. begin
  48764. pTDefRegMap(@Self)^.clr := $00000020;
  48765. end;
  48766. procedure TINT_IEC1.setU2AEIE(thebits : TBits_1); inline;
  48767. begin
  48768. if thebits = 0 then
  48769. pTDefRegMap(@Self)^.clr := $00000020
  48770. else
  48771. pTDefRegMap(@Self)^.&set := $00000020;
  48772. end;
  48773. function TINT_IEC1.getU2AEIE : TBits_1; inline;
  48774. begin
  48775. getU2AEIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  48776. end;
  48777. procedure TINT_IEC1.setU2ARXIE; inline;
  48778. begin
  48779. pTDefRegMap(@Self)^.&set := $00000040;
  48780. end;
  48781. procedure TINT_IEC1.clearU2ARXIE; inline;
  48782. begin
  48783. pTDefRegMap(@Self)^.clr := $00000040;
  48784. end;
  48785. procedure TINT_IEC1.setU2ARXIE(thebits : TBits_1); inline;
  48786. begin
  48787. if thebits = 0 then
  48788. pTDefRegMap(@Self)^.clr := $00000040
  48789. else
  48790. pTDefRegMap(@Self)^.&set := $00000040;
  48791. end;
  48792. function TINT_IEC1.getU2ARXIE : TBits_1; inline;
  48793. begin
  48794. getU2ARXIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  48795. end;
  48796. procedure TINT_IEC1.setU2ATXIE; inline;
  48797. begin
  48798. pTDefRegMap(@Self)^.&set := $00000080;
  48799. end;
  48800. procedure TINT_IEC1.clearU2ATXIE; inline;
  48801. begin
  48802. pTDefRegMap(@Self)^.clr := $00000080;
  48803. end;
  48804. procedure TINT_IEC1.setU2ATXIE(thebits : TBits_1); inline;
  48805. begin
  48806. if thebits = 0 then
  48807. pTDefRegMap(@Self)^.clr := $00000080
  48808. else
  48809. pTDefRegMap(@Self)^.&set := $00000080;
  48810. end;
  48811. function TINT_IEC1.getU2ATXIE : TBits_1; inline;
  48812. begin
  48813. getU2ATXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  48814. end;
  48815. procedure TINT_IEC1.setU3AEIE; inline;
  48816. begin
  48817. pTDefRegMap(@Self)^.&set := $00000100;
  48818. end;
  48819. procedure TINT_IEC1.clearU3AEIE; inline;
  48820. begin
  48821. pTDefRegMap(@Self)^.clr := $00000100;
  48822. end;
  48823. procedure TINT_IEC1.setU3AEIE(thebits : TBits_1); inline;
  48824. begin
  48825. if thebits = 0 then
  48826. pTDefRegMap(@Self)^.clr := $00000100
  48827. else
  48828. pTDefRegMap(@Self)^.&set := $00000100;
  48829. end;
  48830. function TINT_IEC1.getU3AEIE : TBits_1; inline;
  48831. begin
  48832. getU3AEIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  48833. end;
  48834. procedure TINT_IEC1.setU3ARXIE; inline;
  48835. begin
  48836. pTDefRegMap(@Self)^.&set := $00000200;
  48837. end;
  48838. procedure TINT_IEC1.clearU3ARXIE; inline;
  48839. begin
  48840. pTDefRegMap(@Self)^.clr := $00000200;
  48841. end;
  48842. procedure TINT_IEC1.setU3ARXIE(thebits : TBits_1); inline;
  48843. begin
  48844. if thebits = 0 then
  48845. pTDefRegMap(@Self)^.clr := $00000200
  48846. else
  48847. pTDefRegMap(@Self)^.&set := $00000200;
  48848. end;
  48849. function TINT_IEC1.getU3ARXIE : TBits_1; inline;
  48850. begin
  48851. getU3ARXIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  48852. end;
  48853. procedure TINT_IEC1.setU3ATXIE; inline;
  48854. begin
  48855. pTDefRegMap(@Self)^.&set := $00000400;
  48856. end;
  48857. procedure TINT_IEC1.clearU3ATXIE; inline;
  48858. begin
  48859. pTDefRegMap(@Self)^.clr := $00000400;
  48860. end;
  48861. procedure TINT_IEC1.setU3ATXIE(thebits : TBits_1); inline;
  48862. begin
  48863. if thebits = 0 then
  48864. pTDefRegMap(@Self)^.clr := $00000400
  48865. else
  48866. pTDefRegMap(@Self)^.&set := $00000400;
  48867. end;
  48868. function TINT_IEC1.getU3ATXIE : TBits_1; inline;
  48869. begin
  48870. getU3ATXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  48871. end;
  48872. procedure TINT_IEC1.setSPI2EIE; inline;
  48873. begin
  48874. pTDefRegMap(@Self)^.&set := $00000020;
  48875. end;
  48876. procedure TINT_IEC1.clearSPI2EIE; inline;
  48877. begin
  48878. pTDefRegMap(@Self)^.clr := $00000020;
  48879. end;
  48880. procedure TINT_IEC1.setSPI2EIE(thebits : TBits_1); inline;
  48881. begin
  48882. if thebits = 0 then
  48883. pTDefRegMap(@Self)^.clr := $00000020
  48884. else
  48885. pTDefRegMap(@Self)^.&set := $00000020;
  48886. end;
  48887. function TINT_IEC1.getSPI2EIE : TBits_1; inline;
  48888. begin
  48889. getSPI2EIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  48890. end;
  48891. procedure TINT_IEC1.setSPI2RXIE; inline;
  48892. begin
  48893. pTDefRegMap(@Self)^.&set := $00000040;
  48894. end;
  48895. procedure TINT_IEC1.clearSPI2RXIE; inline;
  48896. begin
  48897. pTDefRegMap(@Self)^.clr := $00000040;
  48898. end;
  48899. procedure TINT_IEC1.setSPI2RXIE(thebits : TBits_1); inline;
  48900. begin
  48901. if thebits = 0 then
  48902. pTDefRegMap(@Self)^.clr := $00000040
  48903. else
  48904. pTDefRegMap(@Self)^.&set := $00000040;
  48905. end;
  48906. function TINT_IEC1.getSPI2RXIE : TBits_1; inline;
  48907. begin
  48908. getSPI2RXIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  48909. end;
  48910. procedure TINT_IEC1.setSPI2TXIE; inline;
  48911. begin
  48912. pTDefRegMap(@Self)^.&set := $00000080;
  48913. end;
  48914. procedure TINT_IEC1.clearSPI2TXIE; inline;
  48915. begin
  48916. pTDefRegMap(@Self)^.clr := $00000080;
  48917. end;
  48918. procedure TINT_IEC1.setSPI2TXIE(thebits : TBits_1); inline;
  48919. begin
  48920. if thebits = 0 then
  48921. pTDefRegMap(@Self)^.clr := $00000080
  48922. else
  48923. pTDefRegMap(@Self)^.&set := $00000080;
  48924. end;
  48925. function TINT_IEC1.getSPI2TXIE : TBits_1; inline;
  48926. begin
  48927. getSPI2TXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  48928. end;
  48929. procedure TINT_IEC1.setSPI4EIE; inline;
  48930. begin
  48931. pTDefRegMap(@Self)^.&set := $00000100;
  48932. end;
  48933. procedure TINT_IEC1.clearSPI4EIE; inline;
  48934. begin
  48935. pTDefRegMap(@Self)^.clr := $00000100;
  48936. end;
  48937. procedure TINT_IEC1.setSPI4EIE(thebits : TBits_1); inline;
  48938. begin
  48939. if thebits = 0 then
  48940. pTDefRegMap(@Self)^.clr := $00000100
  48941. else
  48942. pTDefRegMap(@Self)^.&set := $00000100;
  48943. end;
  48944. function TINT_IEC1.getSPI4EIE : TBits_1; inline;
  48945. begin
  48946. getSPI4EIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  48947. end;
  48948. procedure TINT_IEC1.setSPI4RXIE; inline;
  48949. begin
  48950. pTDefRegMap(@Self)^.&set := $00000200;
  48951. end;
  48952. procedure TINT_IEC1.clearSPI4RXIE; inline;
  48953. begin
  48954. pTDefRegMap(@Self)^.clr := $00000200;
  48955. end;
  48956. procedure TINT_IEC1.setSPI4RXIE(thebits : TBits_1); inline;
  48957. begin
  48958. if thebits = 0 then
  48959. pTDefRegMap(@Self)^.clr := $00000200
  48960. else
  48961. pTDefRegMap(@Self)^.&set := $00000200;
  48962. end;
  48963. function TINT_IEC1.getSPI4RXIE : TBits_1; inline;
  48964. begin
  48965. getSPI4RXIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  48966. end;
  48967. procedure TINT_IEC1.setSPI4TXIE; inline;
  48968. begin
  48969. pTDefRegMap(@Self)^.&set := $00000400;
  48970. end;
  48971. procedure TINT_IEC1.clearSPI4TXIE; inline;
  48972. begin
  48973. pTDefRegMap(@Self)^.clr := $00000400;
  48974. end;
  48975. procedure TINT_IEC1.setSPI4TXIE(thebits : TBits_1); inline;
  48976. begin
  48977. if thebits = 0 then
  48978. pTDefRegMap(@Self)^.clr := $00000400
  48979. else
  48980. pTDefRegMap(@Self)^.&set := $00000400;
  48981. end;
  48982. function TINT_IEC1.getSPI4TXIE : TBits_1; inline;
  48983. begin
  48984. getSPI4TXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  48985. end;
  48986. procedure TINT_IEC1.setSPI2AEIE; inline;
  48987. begin
  48988. pTDefRegMap(@Self)^.&set := $00000020;
  48989. end;
  48990. procedure TINT_IEC1.clearSPI2AEIE; inline;
  48991. begin
  48992. pTDefRegMap(@Self)^.clr := $00000020;
  48993. end;
  48994. procedure TINT_IEC1.setSPI2AEIE(thebits : TBits_1); inline;
  48995. begin
  48996. if thebits = 0 then
  48997. pTDefRegMap(@Self)^.clr := $00000020
  48998. else
  48999. pTDefRegMap(@Self)^.&set := $00000020;
  49000. end;
  49001. function TINT_IEC1.getSPI2AEIE : TBits_1; inline;
  49002. begin
  49003. getSPI2AEIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  49004. end;
  49005. procedure TINT_IEC1.setSPI2ARXIE; inline;
  49006. begin
  49007. pTDefRegMap(@Self)^.&set := $00000040;
  49008. end;
  49009. procedure TINT_IEC1.clearSPI2ARXIE; inline;
  49010. begin
  49011. pTDefRegMap(@Self)^.clr := $00000040;
  49012. end;
  49013. procedure TINT_IEC1.setSPI2ARXIE(thebits : TBits_1); inline;
  49014. begin
  49015. if thebits = 0 then
  49016. pTDefRegMap(@Self)^.clr := $00000040
  49017. else
  49018. pTDefRegMap(@Self)^.&set := $00000040;
  49019. end;
  49020. function TINT_IEC1.getSPI2ARXIE : TBits_1; inline;
  49021. begin
  49022. getSPI2ARXIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  49023. end;
  49024. procedure TINT_IEC1.setSPI2ATXIE; inline;
  49025. begin
  49026. pTDefRegMap(@Self)^.&set := $00000080;
  49027. end;
  49028. procedure TINT_IEC1.clearSPI2ATXIE; inline;
  49029. begin
  49030. pTDefRegMap(@Self)^.clr := $00000080;
  49031. end;
  49032. procedure TINT_IEC1.setSPI2ATXIE(thebits : TBits_1); inline;
  49033. begin
  49034. if thebits = 0 then
  49035. pTDefRegMap(@Self)^.clr := $00000080
  49036. else
  49037. pTDefRegMap(@Self)^.&set := $00000080;
  49038. end;
  49039. function TINT_IEC1.getSPI2ATXIE : TBits_1; inline;
  49040. begin
  49041. getSPI2ATXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  49042. end;
  49043. procedure TINT_IEC1.setSPI3AEIE; inline;
  49044. begin
  49045. pTDefRegMap(@Self)^.&set := $00000100;
  49046. end;
  49047. procedure TINT_IEC1.clearSPI3AEIE; inline;
  49048. begin
  49049. pTDefRegMap(@Self)^.clr := $00000100;
  49050. end;
  49051. procedure TINT_IEC1.setSPI3AEIE(thebits : TBits_1); inline;
  49052. begin
  49053. if thebits = 0 then
  49054. pTDefRegMap(@Self)^.clr := $00000100
  49055. else
  49056. pTDefRegMap(@Self)^.&set := $00000100;
  49057. end;
  49058. function TINT_IEC1.getSPI3AEIE : TBits_1; inline;
  49059. begin
  49060. getSPI3AEIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  49061. end;
  49062. procedure TINT_IEC1.setSPI3ARXIE; inline;
  49063. begin
  49064. pTDefRegMap(@Self)^.&set := $00000200;
  49065. end;
  49066. procedure TINT_IEC1.clearSPI3ARXIE; inline;
  49067. begin
  49068. pTDefRegMap(@Self)^.clr := $00000200;
  49069. end;
  49070. procedure TINT_IEC1.setSPI3ARXIE(thebits : TBits_1); inline;
  49071. begin
  49072. if thebits = 0 then
  49073. pTDefRegMap(@Self)^.clr := $00000200
  49074. else
  49075. pTDefRegMap(@Self)^.&set := $00000200;
  49076. end;
  49077. function TINT_IEC1.getSPI3ARXIE : TBits_1; inline;
  49078. begin
  49079. getSPI3ARXIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  49080. end;
  49081. procedure TINT_IEC1.setSPI3ATXIE; inline;
  49082. begin
  49083. pTDefRegMap(@Self)^.&set := $00000400;
  49084. end;
  49085. procedure TINT_IEC1.clearSPI3ATXIE; inline;
  49086. begin
  49087. pTDefRegMap(@Self)^.clr := $00000400;
  49088. end;
  49089. procedure TINT_IEC1.setSPI3ATXIE(thebits : TBits_1); inline;
  49090. begin
  49091. if thebits = 0 then
  49092. pTDefRegMap(@Self)^.clr := $00000400
  49093. else
  49094. pTDefRegMap(@Self)^.&set := $00000400;
  49095. end;
  49096. function TINT_IEC1.getSPI3ATXIE : TBits_1; inline;
  49097. begin
  49098. getSPI3ATXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  49099. end;
  49100. procedure TINT_IEC1.setI2C4BIE; inline;
  49101. begin
  49102. pTDefRegMap(@Self)^.&set := $00000020;
  49103. end;
  49104. procedure TINT_IEC1.clearI2C4BIE; inline;
  49105. begin
  49106. pTDefRegMap(@Self)^.clr := $00000020;
  49107. end;
  49108. procedure TINT_IEC1.setI2C4BIE(thebits : TBits_1); inline;
  49109. begin
  49110. if thebits = 0 then
  49111. pTDefRegMap(@Self)^.clr := $00000020
  49112. else
  49113. pTDefRegMap(@Self)^.&set := $00000020;
  49114. end;
  49115. function TINT_IEC1.getI2C4BIE : TBits_1; inline;
  49116. begin
  49117. getI2C4BIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  49118. end;
  49119. procedure TINT_IEC1.setI2C4SIE; inline;
  49120. begin
  49121. pTDefRegMap(@Self)^.&set := $00000040;
  49122. end;
  49123. procedure TINT_IEC1.clearI2C4SIE; inline;
  49124. begin
  49125. pTDefRegMap(@Self)^.clr := $00000040;
  49126. end;
  49127. procedure TINT_IEC1.setI2C4SIE(thebits : TBits_1); inline;
  49128. begin
  49129. if thebits = 0 then
  49130. pTDefRegMap(@Self)^.clr := $00000040
  49131. else
  49132. pTDefRegMap(@Self)^.&set := $00000040;
  49133. end;
  49134. function TINT_IEC1.getI2C4SIE : TBits_1; inline;
  49135. begin
  49136. getI2C4SIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  49137. end;
  49138. procedure TINT_IEC1.setI2C4MIE; inline;
  49139. begin
  49140. pTDefRegMap(@Self)^.&set := $00000080;
  49141. end;
  49142. procedure TINT_IEC1.clearI2C4MIE; inline;
  49143. begin
  49144. pTDefRegMap(@Self)^.clr := $00000080;
  49145. end;
  49146. procedure TINT_IEC1.setI2C4MIE(thebits : TBits_1); inline;
  49147. begin
  49148. if thebits = 0 then
  49149. pTDefRegMap(@Self)^.clr := $00000080
  49150. else
  49151. pTDefRegMap(@Self)^.&set := $00000080;
  49152. end;
  49153. function TINT_IEC1.getI2C4MIE : TBits_1; inline;
  49154. begin
  49155. getI2C4MIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  49156. end;
  49157. procedure TINT_IEC1.setI2C5BIE; inline;
  49158. begin
  49159. pTDefRegMap(@Self)^.&set := $00000100;
  49160. end;
  49161. procedure TINT_IEC1.clearI2C5BIE; inline;
  49162. begin
  49163. pTDefRegMap(@Self)^.clr := $00000100;
  49164. end;
  49165. procedure TINT_IEC1.setI2C5BIE(thebits : TBits_1); inline;
  49166. begin
  49167. if thebits = 0 then
  49168. pTDefRegMap(@Self)^.clr := $00000100
  49169. else
  49170. pTDefRegMap(@Self)^.&set := $00000100;
  49171. end;
  49172. function TINT_IEC1.getI2C5BIE : TBits_1; inline;
  49173. begin
  49174. getI2C5BIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  49175. end;
  49176. procedure TINT_IEC1.setI2C5SIE; inline;
  49177. begin
  49178. pTDefRegMap(@Self)^.&set := $00000200;
  49179. end;
  49180. procedure TINT_IEC1.clearI2C5SIE; inline;
  49181. begin
  49182. pTDefRegMap(@Self)^.clr := $00000200;
  49183. end;
  49184. procedure TINT_IEC1.setI2C5SIE(thebits : TBits_1); inline;
  49185. begin
  49186. if thebits = 0 then
  49187. pTDefRegMap(@Self)^.clr := $00000200
  49188. else
  49189. pTDefRegMap(@Self)^.&set := $00000200;
  49190. end;
  49191. function TINT_IEC1.getI2C5SIE : TBits_1; inline;
  49192. begin
  49193. getI2C5SIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  49194. end;
  49195. procedure TINT_IEC1.setI2C5MIE; inline;
  49196. begin
  49197. pTDefRegMap(@Self)^.&set := $00000400;
  49198. end;
  49199. procedure TINT_IEC1.clearI2C5MIE; inline;
  49200. begin
  49201. pTDefRegMap(@Self)^.clr := $00000400;
  49202. end;
  49203. procedure TINT_IEC1.setI2C5MIE(thebits : TBits_1); inline;
  49204. begin
  49205. if thebits = 0 then
  49206. pTDefRegMap(@Self)^.clr := $00000400
  49207. else
  49208. pTDefRegMap(@Self)^.&set := $00000400;
  49209. end;
  49210. function TINT_IEC1.getI2C5MIE : TBits_1; inline;
  49211. begin
  49212. getI2C5MIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  49213. end;
  49214. procedure TINT_IEC1.setI2C2ABIE; inline;
  49215. begin
  49216. pTDefRegMap(@Self)^.&set := $00000020;
  49217. end;
  49218. procedure TINT_IEC1.clearI2C2ABIE; inline;
  49219. begin
  49220. pTDefRegMap(@Self)^.clr := $00000020;
  49221. end;
  49222. procedure TINT_IEC1.setI2C2ABIE(thebits : TBits_1); inline;
  49223. begin
  49224. if thebits = 0 then
  49225. pTDefRegMap(@Self)^.clr := $00000020
  49226. else
  49227. pTDefRegMap(@Self)^.&set := $00000020;
  49228. end;
  49229. function TINT_IEC1.getI2C2ABIE : TBits_1; inline;
  49230. begin
  49231. getI2C2ABIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  49232. end;
  49233. procedure TINT_IEC1.setI2C2ASIE; inline;
  49234. begin
  49235. pTDefRegMap(@Self)^.&set := $00000040;
  49236. end;
  49237. procedure TINT_IEC1.clearI2C2ASIE; inline;
  49238. begin
  49239. pTDefRegMap(@Self)^.clr := $00000040;
  49240. end;
  49241. procedure TINT_IEC1.setI2C2ASIE(thebits : TBits_1); inline;
  49242. begin
  49243. if thebits = 0 then
  49244. pTDefRegMap(@Self)^.clr := $00000040
  49245. else
  49246. pTDefRegMap(@Self)^.&set := $00000040;
  49247. end;
  49248. function TINT_IEC1.getI2C2ASIE : TBits_1; inline;
  49249. begin
  49250. getI2C2ASIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  49251. end;
  49252. procedure TINT_IEC1.setI2C2AMIE; inline;
  49253. begin
  49254. pTDefRegMap(@Self)^.&set := $00000080;
  49255. end;
  49256. procedure TINT_IEC1.clearI2C2AMIE; inline;
  49257. begin
  49258. pTDefRegMap(@Self)^.clr := $00000080;
  49259. end;
  49260. procedure TINT_IEC1.setI2C2AMIE(thebits : TBits_1); inline;
  49261. begin
  49262. if thebits = 0 then
  49263. pTDefRegMap(@Self)^.clr := $00000080
  49264. else
  49265. pTDefRegMap(@Self)^.&set := $00000080;
  49266. end;
  49267. function TINT_IEC1.getI2C2AMIE : TBits_1; inline;
  49268. begin
  49269. getI2C2AMIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  49270. end;
  49271. procedure TINT_IEC1.setI2C3ABIE; inline;
  49272. begin
  49273. pTDefRegMap(@Self)^.&set := $00000100;
  49274. end;
  49275. procedure TINT_IEC1.clearI2C3ABIE; inline;
  49276. begin
  49277. pTDefRegMap(@Self)^.clr := $00000100;
  49278. end;
  49279. procedure TINT_IEC1.setI2C3ABIE(thebits : TBits_1); inline;
  49280. begin
  49281. if thebits = 0 then
  49282. pTDefRegMap(@Self)^.clr := $00000100
  49283. else
  49284. pTDefRegMap(@Self)^.&set := $00000100;
  49285. end;
  49286. function TINT_IEC1.getI2C3ABIE : TBits_1; inline;
  49287. begin
  49288. getI2C3ABIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  49289. end;
  49290. procedure TINT_IEC1.setI2C3ASIE; inline;
  49291. begin
  49292. pTDefRegMap(@Self)^.&set := $00000200;
  49293. end;
  49294. procedure TINT_IEC1.clearI2C3ASIE; inline;
  49295. begin
  49296. pTDefRegMap(@Self)^.clr := $00000200;
  49297. end;
  49298. procedure TINT_IEC1.setI2C3ASIE(thebits : TBits_1); inline;
  49299. begin
  49300. if thebits = 0 then
  49301. pTDefRegMap(@Self)^.clr := $00000200
  49302. else
  49303. pTDefRegMap(@Self)^.&set := $00000200;
  49304. end;
  49305. function TINT_IEC1.getI2C3ASIE : TBits_1; inline;
  49306. begin
  49307. getI2C3ASIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  49308. end;
  49309. procedure TINT_IEC1.setI2C3AMIE; inline;
  49310. begin
  49311. pTDefRegMap(@Self)^.&set := $00000400;
  49312. end;
  49313. procedure TINT_IEC1.clearI2C3AMIE; inline;
  49314. begin
  49315. pTDefRegMap(@Self)^.clr := $00000400;
  49316. end;
  49317. procedure TINT_IEC1.setI2C3AMIE(thebits : TBits_1); inline;
  49318. begin
  49319. if thebits = 0 then
  49320. pTDefRegMap(@Self)^.clr := $00000400
  49321. else
  49322. pTDefRegMap(@Self)^.&set := $00000400;
  49323. end;
  49324. function TINT_IEC1.getI2C3AMIE : TBits_1; inline;
  49325. begin
  49326. getI2C3AMIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  49327. end;
  49328. procedure TINT_IEC1.setw(thebits : TBits_32); inline;
  49329. begin
  49330. pTDefRegMap(@Self)^.val := thebits;
  49331. end;
  49332. function TINT_IEC1.getw : TBits_32; inline;
  49333. begin
  49334. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  49335. end;
  49336. procedure TINT_IEC2.setIC4EIE; inline;
  49337. begin
  49338. pTDefRegMap(@Self)^.&set := $00000001;
  49339. end;
  49340. procedure TINT_IEC2.clearIC4EIE; inline;
  49341. begin
  49342. pTDefRegMap(@Self)^.clr := $00000001;
  49343. end;
  49344. procedure TINT_IEC2.setIC4EIE(thebits : TBits_1); inline;
  49345. begin
  49346. if thebits = 0 then
  49347. pTDefRegMap(@Self)^.clr := $00000001
  49348. else
  49349. pTDefRegMap(@Self)^.&set := $00000001;
  49350. end;
  49351. function TINT_IEC2.getIC4EIE : TBits_1; inline;
  49352. begin
  49353. getIC4EIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  49354. end;
  49355. procedure TINT_IEC2.setIC5EIE; inline;
  49356. begin
  49357. pTDefRegMap(@Self)^.&set := $00000002;
  49358. end;
  49359. procedure TINT_IEC2.clearIC5EIE; inline;
  49360. begin
  49361. pTDefRegMap(@Self)^.clr := $00000002;
  49362. end;
  49363. procedure TINT_IEC2.setIC5EIE(thebits : TBits_1); inline;
  49364. begin
  49365. if thebits = 0 then
  49366. pTDefRegMap(@Self)^.clr := $00000002
  49367. else
  49368. pTDefRegMap(@Self)^.&set := $00000002;
  49369. end;
  49370. function TINT_IEC2.getIC5EIE : TBits_1; inline;
  49371. begin
  49372. getIC5EIE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  49373. end;
  49374. procedure TINT_IEC2.setPMPEIE; inline;
  49375. begin
  49376. pTDefRegMap(@Self)^.&set := $00000004;
  49377. end;
  49378. procedure TINT_IEC2.clearPMPEIE; inline;
  49379. begin
  49380. pTDefRegMap(@Self)^.clr := $00000004;
  49381. end;
  49382. procedure TINT_IEC2.setPMPEIE(thebits : TBits_1); inline;
  49383. begin
  49384. if thebits = 0 then
  49385. pTDefRegMap(@Self)^.clr := $00000004
  49386. else
  49387. pTDefRegMap(@Self)^.&set := $00000004;
  49388. end;
  49389. function TINT_IEC2.getPMPEIE : TBits_1; inline;
  49390. begin
  49391. getPMPEIE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  49392. end;
  49393. procedure TINT_IEC2.setU1BEIE; inline;
  49394. begin
  49395. pTDefRegMap(@Self)^.&set := $00000008;
  49396. end;
  49397. procedure TINT_IEC2.clearU1BEIE; inline;
  49398. begin
  49399. pTDefRegMap(@Self)^.clr := $00000008;
  49400. end;
  49401. procedure TINT_IEC2.setU1BEIE(thebits : TBits_1); inline;
  49402. begin
  49403. if thebits = 0 then
  49404. pTDefRegMap(@Self)^.clr := $00000008
  49405. else
  49406. pTDefRegMap(@Self)^.&set := $00000008;
  49407. end;
  49408. function TINT_IEC2.getU1BEIE : TBits_1; inline;
  49409. begin
  49410. getU1BEIE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  49411. end;
  49412. procedure TINT_IEC2.setU1BRXIE; inline;
  49413. begin
  49414. pTDefRegMap(@Self)^.&set := $00000010;
  49415. end;
  49416. procedure TINT_IEC2.clearU1BRXIE; inline;
  49417. begin
  49418. pTDefRegMap(@Self)^.clr := $00000010;
  49419. end;
  49420. procedure TINT_IEC2.setU1BRXIE(thebits : TBits_1); inline;
  49421. begin
  49422. if thebits = 0 then
  49423. pTDefRegMap(@Self)^.clr := $00000010
  49424. else
  49425. pTDefRegMap(@Self)^.&set := $00000010;
  49426. end;
  49427. function TINT_IEC2.getU1BRXIE : TBits_1; inline;
  49428. begin
  49429. getU1BRXIE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  49430. end;
  49431. procedure TINT_IEC2.setU1BTXIE; inline;
  49432. begin
  49433. pTDefRegMap(@Self)^.&set := $00000020;
  49434. end;
  49435. procedure TINT_IEC2.clearU1BTXIE; inline;
  49436. begin
  49437. pTDefRegMap(@Self)^.clr := $00000020;
  49438. end;
  49439. procedure TINT_IEC2.setU1BTXIE(thebits : TBits_1); inline;
  49440. begin
  49441. if thebits = 0 then
  49442. pTDefRegMap(@Self)^.clr := $00000020
  49443. else
  49444. pTDefRegMap(@Self)^.&set := $00000020;
  49445. end;
  49446. function TINT_IEC2.getU1BTXIE : TBits_1; inline;
  49447. begin
  49448. getU1BTXIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  49449. end;
  49450. procedure TINT_IEC2.setU2BEIE; inline;
  49451. begin
  49452. pTDefRegMap(@Self)^.&set := $00000040;
  49453. end;
  49454. procedure TINT_IEC2.clearU2BEIE; inline;
  49455. begin
  49456. pTDefRegMap(@Self)^.clr := $00000040;
  49457. end;
  49458. procedure TINT_IEC2.setU2BEIE(thebits : TBits_1); inline;
  49459. begin
  49460. if thebits = 0 then
  49461. pTDefRegMap(@Self)^.clr := $00000040
  49462. else
  49463. pTDefRegMap(@Self)^.&set := $00000040;
  49464. end;
  49465. function TINT_IEC2.getU2BEIE : TBits_1; inline;
  49466. begin
  49467. getU2BEIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  49468. end;
  49469. procedure TINT_IEC2.setU2BRXIE; inline;
  49470. begin
  49471. pTDefRegMap(@Self)^.&set := $00000080;
  49472. end;
  49473. procedure TINT_IEC2.clearU2BRXIE; inline;
  49474. begin
  49475. pTDefRegMap(@Self)^.clr := $00000080;
  49476. end;
  49477. procedure TINT_IEC2.setU2BRXIE(thebits : TBits_1); inline;
  49478. begin
  49479. if thebits = 0 then
  49480. pTDefRegMap(@Self)^.clr := $00000080
  49481. else
  49482. pTDefRegMap(@Self)^.&set := $00000080;
  49483. end;
  49484. function TINT_IEC2.getU2BRXIE : TBits_1; inline;
  49485. begin
  49486. getU2BRXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  49487. end;
  49488. procedure TINT_IEC2.setU2BTXIE; inline;
  49489. begin
  49490. pTDefRegMap(@Self)^.&set := $00000100;
  49491. end;
  49492. procedure TINT_IEC2.clearU2BTXIE; inline;
  49493. begin
  49494. pTDefRegMap(@Self)^.clr := $00000100;
  49495. end;
  49496. procedure TINT_IEC2.setU2BTXIE(thebits : TBits_1); inline;
  49497. begin
  49498. if thebits = 0 then
  49499. pTDefRegMap(@Self)^.clr := $00000100
  49500. else
  49501. pTDefRegMap(@Self)^.&set := $00000100;
  49502. end;
  49503. function TINT_IEC2.getU2BTXIE : TBits_1; inline;
  49504. begin
  49505. getU2BTXIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  49506. end;
  49507. procedure TINT_IEC2.setU3BEIE; inline;
  49508. begin
  49509. pTDefRegMap(@Self)^.&set := $00000200;
  49510. end;
  49511. procedure TINT_IEC2.clearU3BEIE; inline;
  49512. begin
  49513. pTDefRegMap(@Self)^.clr := $00000200;
  49514. end;
  49515. procedure TINT_IEC2.setU3BEIE(thebits : TBits_1); inline;
  49516. begin
  49517. if thebits = 0 then
  49518. pTDefRegMap(@Self)^.clr := $00000200
  49519. else
  49520. pTDefRegMap(@Self)^.&set := $00000200;
  49521. end;
  49522. function TINT_IEC2.getU3BEIE : TBits_1; inline;
  49523. begin
  49524. getU3BEIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  49525. end;
  49526. procedure TINT_IEC2.setU3BRXIE; inline;
  49527. begin
  49528. pTDefRegMap(@Self)^.&set := $00000400;
  49529. end;
  49530. procedure TINT_IEC2.clearU3BRXIE; inline;
  49531. begin
  49532. pTDefRegMap(@Self)^.clr := $00000400;
  49533. end;
  49534. procedure TINT_IEC2.setU3BRXIE(thebits : TBits_1); inline;
  49535. begin
  49536. if thebits = 0 then
  49537. pTDefRegMap(@Self)^.clr := $00000400
  49538. else
  49539. pTDefRegMap(@Self)^.&set := $00000400;
  49540. end;
  49541. function TINT_IEC2.getU3BRXIE : TBits_1; inline;
  49542. begin
  49543. getU3BRXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  49544. end;
  49545. procedure TINT_IEC2.setU3BTXIE; inline;
  49546. begin
  49547. pTDefRegMap(@Self)^.&set := $00000800;
  49548. end;
  49549. procedure TINT_IEC2.clearU3BTXIE; inline;
  49550. begin
  49551. pTDefRegMap(@Self)^.clr := $00000800;
  49552. end;
  49553. procedure TINT_IEC2.setU3BTXIE(thebits : TBits_1); inline;
  49554. begin
  49555. if thebits = 0 then
  49556. pTDefRegMap(@Self)^.clr := $00000800
  49557. else
  49558. pTDefRegMap(@Self)^.&set := $00000800;
  49559. end;
  49560. function TINT_IEC2.getU3BTXIE : TBits_1; inline;
  49561. begin
  49562. getU3BTXIE := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  49563. end;
  49564. procedure TINT_IEC2.setU4EIE; inline;
  49565. begin
  49566. pTDefRegMap(@Self)^.&set := $00000008;
  49567. end;
  49568. procedure TINT_IEC2.clearU4EIE; inline;
  49569. begin
  49570. pTDefRegMap(@Self)^.clr := $00000008;
  49571. end;
  49572. procedure TINT_IEC2.setU4EIE(thebits : TBits_1); inline;
  49573. begin
  49574. if thebits = 0 then
  49575. pTDefRegMap(@Self)^.clr := $00000008
  49576. else
  49577. pTDefRegMap(@Self)^.&set := $00000008;
  49578. end;
  49579. function TINT_IEC2.getU4EIE : TBits_1; inline;
  49580. begin
  49581. getU4EIE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  49582. end;
  49583. procedure TINT_IEC2.setU4RXIE; inline;
  49584. begin
  49585. pTDefRegMap(@Self)^.&set := $00000010;
  49586. end;
  49587. procedure TINT_IEC2.clearU4RXIE; inline;
  49588. begin
  49589. pTDefRegMap(@Self)^.clr := $00000010;
  49590. end;
  49591. procedure TINT_IEC2.setU4RXIE(thebits : TBits_1); inline;
  49592. begin
  49593. if thebits = 0 then
  49594. pTDefRegMap(@Self)^.clr := $00000010
  49595. else
  49596. pTDefRegMap(@Self)^.&set := $00000010;
  49597. end;
  49598. function TINT_IEC2.getU4RXIE : TBits_1; inline;
  49599. begin
  49600. getU4RXIE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  49601. end;
  49602. procedure TINT_IEC2.setU4TXIE; inline;
  49603. begin
  49604. pTDefRegMap(@Self)^.&set := $00000020;
  49605. end;
  49606. procedure TINT_IEC2.clearU4TXIE; inline;
  49607. begin
  49608. pTDefRegMap(@Self)^.clr := $00000020;
  49609. end;
  49610. procedure TINT_IEC2.setU4TXIE(thebits : TBits_1); inline;
  49611. begin
  49612. if thebits = 0 then
  49613. pTDefRegMap(@Self)^.clr := $00000020
  49614. else
  49615. pTDefRegMap(@Self)^.&set := $00000020;
  49616. end;
  49617. function TINT_IEC2.getU4TXIE : TBits_1; inline;
  49618. begin
  49619. getU4TXIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  49620. end;
  49621. procedure TINT_IEC2.setU6EIE; inline;
  49622. begin
  49623. pTDefRegMap(@Self)^.&set := $00000040;
  49624. end;
  49625. procedure TINT_IEC2.clearU6EIE; inline;
  49626. begin
  49627. pTDefRegMap(@Self)^.clr := $00000040;
  49628. end;
  49629. procedure TINT_IEC2.setU6EIE(thebits : TBits_1); inline;
  49630. begin
  49631. if thebits = 0 then
  49632. pTDefRegMap(@Self)^.clr := $00000040
  49633. else
  49634. pTDefRegMap(@Self)^.&set := $00000040;
  49635. end;
  49636. function TINT_IEC2.getU6EIE : TBits_1; inline;
  49637. begin
  49638. getU6EIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  49639. end;
  49640. procedure TINT_IEC2.setU6RXIE; inline;
  49641. begin
  49642. pTDefRegMap(@Self)^.&set := $00000080;
  49643. end;
  49644. procedure TINT_IEC2.clearU6RXIE; inline;
  49645. begin
  49646. pTDefRegMap(@Self)^.clr := $00000080;
  49647. end;
  49648. procedure TINT_IEC2.setU6RXIE(thebits : TBits_1); inline;
  49649. begin
  49650. if thebits = 0 then
  49651. pTDefRegMap(@Self)^.clr := $00000080
  49652. else
  49653. pTDefRegMap(@Self)^.&set := $00000080;
  49654. end;
  49655. function TINT_IEC2.getU6RXIE : TBits_1; inline;
  49656. begin
  49657. getU6RXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  49658. end;
  49659. procedure TINT_IEC2.setU6TXIE; inline;
  49660. begin
  49661. pTDefRegMap(@Self)^.&set := $00000100;
  49662. end;
  49663. procedure TINT_IEC2.clearU6TXIE; inline;
  49664. begin
  49665. pTDefRegMap(@Self)^.clr := $00000100;
  49666. end;
  49667. procedure TINT_IEC2.setU6TXIE(thebits : TBits_1); inline;
  49668. begin
  49669. if thebits = 0 then
  49670. pTDefRegMap(@Self)^.clr := $00000100
  49671. else
  49672. pTDefRegMap(@Self)^.&set := $00000100;
  49673. end;
  49674. function TINT_IEC2.getU6TXIE : TBits_1; inline;
  49675. begin
  49676. getU6TXIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  49677. end;
  49678. procedure TINT_IEC2.setU5EIE; inline;
  49679. begin
  49680. pTDefRegMap(@Self)^.&set := $00000200;
  49681. end;
  49682. procedure TINT_IEC2.clearU5EIE; inline;
  49683. begin
  49684. pTDefRegMap(@Self)^.clr := $00000200;
  49685. end;
  49686. procedure TINT_IEC2.setU5EIE(thebits : TBits_1); inline;
  49687. begin
  49688. if thebits = 0 then
  49689. pTDefRegMap(@Self)^.clr := $00000200
  49690. else
  49691. pTDefRegMap(@Self)^.&set := $00000200;
  49692. end;
  49693. function TINT_IEC2.getU5EIE : TBits_1; inline;
  49694. begin
  49695. getU5EIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  49696. end;
  49697. procedure TINT_IEC2.setU5RXIE; inline;
  49698. begin
  49699. pTDefRegMap(@Self)^.&set := $00000400;
  49700. end;
  49701. procedure TINT_IEC2.clearU5RXIE; inline;
  49702. begin
  49703. pTDefRegMap(@Self)^.clr := $00000400;
  49704. end;
  49705. procedure TINT_IEC2.setU5RXIE(thebits : TBits_1); inline;
  49706. begin
  49707. if thebits = 0 then
  49708. pTDefRegMap(@Self)^.clr := $00000400
  49709. else
  49710. pTDefRegMap(@Self)^.&set := $00000400;
  49711. end;
  49712. function TINT_IEC2.getU5RXIE : TBits_1; inline;
  49713. begin
  49714. getU5RXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  49715. end;
  49716. procedure TINT_IEC2.setU5TXIE; inline;
  49717. begin
  49718. pTDefRegMap(@Self)^.&set := $00000800;
  49719. end;
  49720. procedure TINT_IEC2.clearU5TXIE; inline;
  49721. begin
  49722. pTDefRegMap(@Self)^.clr := $00000800;
  49723. end;
  49724. procedure TINT_IEC2.setU5TXIE(thebits : TBits_1); inline;
  49725. begin
  49726. if thebits = 0 then
  49727. pTDefRegMap(@Self)^.clr := $00000800
  49728. else
  49729. pTDefRegMap(@Self)^.&set := $00000800;
  49730. end;
  49731. function TINT_IEC2.getU5TXIE : TBits_1; inline;
  49732. begin
  49733. getU5TXIE := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  49734. end;
  49735. procedure TINT_IEC2.setw(thebits : TBits_32); inline;
  49736. begin
  49737. pTDefRegMap(@Self)^.val := thebits;
  49738. end;
  49739. function TINT_IEC2.getw : TBits_32; inline;
  49740. begin
  49741. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  49742. end;
  49743. procedure TINT_IPC0.setCTIS(thebits : TBits_2); inline;
  49744. begin
  49745. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  49746. end;
  49747. function TINT_IPC0.getCTIS : TBits_2; inline;
  49748. begin
  49749. getCTIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  49750. end;
  49751. procedure TINT_IPC0.setCTIP(thebits : TBits_3); inline;
  49752. begin
  49753. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  49754. end;
  49755. function TINT_IPC0.getCTIP : TBits_3; inline;
  49756. begin
  49757. getCTIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  49758. end;
  49759. procedure TINT_IPC0.setCS0IS(thebits : TBits_2); inline;
  49760. begin
  49761. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  49762. end;
  49763. function TINT_IPC0.getCS0IS : TBits_2; inline;
  49764. begin
  49765. getCS0IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  49766. end;
  49767. procedure TINT_IPC0.setCS0IP(thebits : TBits_3); inline;
  49768. begin
  49769. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  49770. end;
  49771. function TINT_IPC0.getCS0IP : TBits_3; inline;
  49772. begin
  49773. getCS0IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  49774. end;
  49775. procedure TINT_IPC0.setCS1IS(thebits : TBits_2); inline;
  49776. begin
  49777. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  49778. end;
  49779. function TINT_IPC0.getCS1IS : TBits_2; inline;
  49780. begin
  49781. getCS1IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  49782. end;
  49783. procedure TINT_IPC0.setCS1IP(thebits : TBits_3); inline;
  49784. begin
  49785. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  49786. end;
  49787. function TINT_IPC0.getCS1IP : TBits_3; inline;
  49788. begin
  49789. getCS1IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  49790. end;
  49791. procedure TINT_IPC0.setINT0IS(thebits : TBits_2); inline;
  49792. begin
  49793. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  49794. end;
  49795. function TINT_IPC0.getINT0IS : TBits_2; inline;
  49796. begin
  49797. getINT0IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  49798. end;
  49799. procedure TINT_IPC0.setINT0IP(thebits : TBits_3); inline;
  49800. begin
  49801. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  49802. end;
  49803. function TINT_IPC0.getINT0IP : TBits_3; inline;
  49804. begin
  49805. getINT0IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  49806. end;
  49807. procedure TINT_IPC0.setw(thebits : TBits_32); inline;
  49808. begin
  49809. pTDefRegMap(@Self)^.val := thebits;
  49810. end;
  49811. function TINT_IPC0.getw : TBits_32; inline;
  49812. begin
  49813. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  49814. end;
  49815. procedure TINT_IPC1.setT1IS(thebits : TBits_2); inline;
  49816. begin
  49817. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  49818. end;
  49819. function TINT_IPC1.getT1IS : TBits_2; inline;
  49820. begin
  49821. getT1IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  49822. end;
  49823. procedure TINT_IPC1.setT1IP(thebits : TBits_3); inline;
  49824. begin
  49825. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  49826. end;
  49827. function TINT_IPC1.getT1IP : TBits_3; inline;
  49828. begin
  49829. getT1IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  49830. end;
  49831. procedure TINT_IPC1.setIC1IS(thebits : TBits_2); inline;
  49832. begin
  49833. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  49834. end;
  49835. function TINT_IPC1.getIC1IS : TBits_2; inline;
  49836. begin
  49837. getIC1IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  49838. end;
  49839. procedure TINT_IPC1.setIC1IP(thebits : TBits_3); inline;
  49840. begin
  49841. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  49842. end;
  49843. function TINT_IPC1.getIC1IP : TBits_3; inline;
  49844. begin
  49845. getIC1IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  49846. end;
  49847. procedure TINT_IPC1.setOC1IS(thebits : TBits_2); inline;
  49848. begin
  49849. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  49850. end;
  49851. function TINT_IPC1.getOC1IS : TBits_2; inline;
  49852. begin
  49853. getOC1IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  49854. end;
  49855. procedure TINT_IPC1.setOC1IP(thebits : TBits_3); inline;
  49856. begin
  49857. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  49858. end;
  49859. function TINT_IPC1.getOC1IP : TBits_3; inline;
  49860. begin
  49861. getOC1IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  49862. end;
  49863. procedure TINT_IPC1.setINT1IS(thebits : TBits_2); inline;
  49864. begin
  49865. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  49866. end;
  49867. function TINT_IPC1.getINT1IS : TBits_2; inline;
  49868. begin
  49869. getINT1IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  49870. end;
  49871. procedure TINT_IPC1.setINT1IP(thebits : TBits_3); inline;
  49872. begin
  49873. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  49874. end;
  49875. function TINT_IPC1.getINT1IP : TBits_3; inline;
  49876. begin
  49877. getINT1IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  49878. end;
  49879. procedure TINT_IPC1.setw(thebits : TBits_32); inline;
  49880. begin
  49881. pTDefRegMap(@Self)^.val := thebits;
  49882. end;
  49883. function TINT_IPC1.getw : TBits_32; inline;
  49884. begin
  49885. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  49886. end;
  49887. procedure TINT_IPC2.setT2IS(thebits : TBits_2); inline;
  49888. begin
  49889. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  49890. end;
  49891. function TINT_IPC2.getT2IS : TBits_2; inline;
  49892. begin
  49893. getT2IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  49894. end;
  49895. procedure TINT_IPC2.setT2IP(thebits : TBits_3); inline;
  49896. begin
  49897. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  49898. end;
  49899. function TINT_IPC2.getT2IP : TBits_3; inline;
  49900. begin
  49901. getT2IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  49902. end;
  49903. procedure TINT_IPC2.setIC2IS(thebits : TBits_2); inline;
  49904. begin
  49905. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  49906. end;
  49907. function TINT_IPC2.getIC2IS : TBits_2; inline;
  49908. begin
  49909. getIC2IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  49910. end;
  49911. procedure TINT_IPC2.setIC2IP(thebits : TBits_3); inline;
  49912. begin
  49913. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  49914. end;
  49915. function TINT_IPC2.getIC2IP : TBits_3; inline;
  49916. begin
  49917. getIC2IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  49918. end;
  49919. procedure TINT_IPC2.setOC2IS(thebits : TBits_2); inline;
  49920. begin
  49921. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  49922. end;
  49923. function TINT_IPC2.getOC2IS : TBits_2; inline;
  49924. begin
  49925. getOC2IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  49926. end;
  49927. procedure TINT_IPC2.setOC2IP(thebits : TBits_3); inline;
  49928. begin
  49929. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  49930. end;
  49931. function TINT_IPC2.getOC2IP : TBits_3; inline;
  49932. begin
  49933. getOC2IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  49934. end;
  49935. procedure TINT_IPC2.setINT2IS(thebits : TBits_2); inline;
  49936. begin
  49937. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  49938. end;
  49939. function TINT_IPC2.getINT2IS : TBits_2; inline;
  49940. begin
  49941. getINT2IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  49942. end;
  49943. procedure TINT_IPC2.setINT2IP(thebits : TBits_3); inline;
  49944. begin
  49945. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  49946. end;
  49947. function TINT_IPC2.getINT2IP : TBits_3; inline;
  49948. begin
  49949. getINT2IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  49950. end;
  49951. procedure TINT_IPC2.setw(thebits : TBits_32); inline;
  49952. begin
  49953. pTDefRegMap(@Self)^.val := thebits;
  49954. end;
  49955. function TINT_IPC2.getw : TBits_32; inline;
  49956. begin
  49957. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  49958. end;
  49959. procedure TINT_IPC3.setT3IS(thebits : TBits_2); inline;
  49960. begin
  49961. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  49962. end;
  49963. function TINT_IPC3.getT3IS : TBits_2; inline;
  49964. begin
  49965. getT3IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  49966. end;
  49967. procedure TINT_IPC3.setT3IP(thebits : TBits_3); inline;
  49968. begin
  49969. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  49970. end;
  49971. function TINT_IPC3.getT3IP : TBits_3; inline;
  49972. begin
  49973. getT3IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  49974. end;
  49975. procedure TINT_IPC3.setIC3IS(thebits : TBits_2); inline;
  49976. begin
  49977. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  49978. end;
  49979. function TINT_IPC3.getIC3IS : TBits_2; inline;
  49980. begin
  49981. getIC3IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  49982. end;
  49983. procedure TINT_IPC3.setIC3IP(thebits : TBits_3); inline;
  49984. begin
  49985. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  49986. end;
  49987. function TINT_IPC3.getIC3IP : TBits_3; inline;
  49988. begin
  49989. getIC3IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  49990. end;
  49991. procedure TINT_IPC3.setOC3IS(thebits : TBits_2); inline;
  49992. begin
  49993. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  49994. end;
  49995. function TINT_IPC3.getOC3IS : TBits_2; inline;
  49996. begin
  49997. getOC3IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  49998. end;
  49999. procedure TINT_IPC3.setOC3IP(thebits : TBits_3); inline;
  50000. begin
  50001. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  50002. end;
  50003. function TINT_IPC3.getOC3IP : TBits_3; inline;
  50004. begin
  50005. getOC3IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  50006. end;
  50007. procedure TINT_IPC3.setINT3IS(thebits : TBits_2); inline;
  50008. begin
  50009. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  50010. end;
  50011. function TINT_IPC3.getINT3IS : TBits_2; inline;
  50012. begin
  50013. getINT3IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  50014. end;
  50015. procedure TINT_IPC3.setINT3IP(thebits : TBits_3); inline;
  50016. begin
  50017. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  50018. end;
  50019. function TINT_IPC3.getINT3IP : TBits_3; inline;
  50020. begin
  50021. getINT3IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  50022. end;
  50023. procedure TINT_IPC3.setw(thebits : TBits_32); inline;
  50024. begin
  50025. pTDefRegMap(@Self)^.val := thebits;
  50026. end;
  50027. function TINT_IPC3.getw : TBits_32; inline;
  50028. begin
  50029. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  50030. end;
  50031. procedure TINT_IPC4.setT4IS(thebits : TBits_2); inline;
  50032. begin
  50033. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  50034. end;
  50035. function TINT_IPC4.getT4IS : TBits_2; inline;
  50036. begin
  50037. getT4IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  50038. end;
  50039. procedure TINT_IPC4.setT4IP(thebits : TBits_3); inline;
  50040. begin
  50041. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  50042. end;
  50043. function TINT_IPC4.getT4IP : TBits_3; inline;
  50044. begin
  50045. getT4IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  50046. end;
  50047. procedure TINT_IPC4.setIC4IS(thebits : TBits_2); inline;
  50048. begin
  50049. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  50050. end;
  50051. function TINT_IPC4.getIC4IS : TBits_2; inline;
  50052. begin
  50053. getIC4IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  50054. end;
  50055. procedure TINT_IPC4.setIC4IP(thebits : TBits_3); inline;
  50056. begin
  50057. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  50058. end;
  50059. function TINT_IPC4.getIC4IP : TBits_3; inline;
  50060. begin
  50061. getIC4IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  50062. end;
  50063. procedure TINT_IPC4.setOC4IS(thebits : TBits_2); inline;
  50064. begin
  50065. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  50066. end;
  50067. function TINT_IPC4.getOC4IS : TBits_2; inline;
  50068. begin
  50069. getOC4IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  50070. end;
  50071. procedure TINT_IPC4.setOC4IP(thebits : TBits_3); inline;
  50072. begin
  50073. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  50074. end;
  50075. function TINT_IPC4.getOC4IP : TBits_3; inline;
  50076. begin
  50077. getOC4IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  50078. end;
  50079. procedure TINT_IPC4.setINT4IS(thebits : TBits_2); inline;
  50080. begin
  50081. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  50082. end;
  50083. function TINT_IPC4.getINT4IS : TBits_2; inline;
  50084. begin
  50085. getINT4IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  50086. end;
  50087. procedure TINT_IPC4.setINT4IP(thebits : TBits_3); inline;
  50088. begin
  50089. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  50090. end;
  50091. function TINT_IPC4.getINT4IP : TBits_3; inline;
  50092. begin
  50093. getINT4IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  50094. end;
  50095. procedure TINT_IPC4.setw(thebits : TBits_32); inline;
  50096. begin
  50097. pTDefRegMap(@Self)^.val := thebits;
  50098. end;
  50099. function TINT_IPC4.getw : TBits_32; inline;
  50100. begin
  50101. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  50102. end;
  50103. procedure TINT_IPC5.setT5IS(thebits : TBits_2); inline;
  50104. begin
  50105. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  50106. end;
  50107. function TINT_IPC5.getT5IS : TBits_2; inline;
  50108. begin
  50109. getT5IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  50110. end;
  50111. procedure TINT_IPC5.setT5IP(thebits : TBits_3); inline;
  50112. begin
  50113. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  50114. end;
  50115. function TINT_IPC5.getT5IP : TBits_3; inline;
  50116. begin
  50117. getT5IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  50118. end;
  50119. procedure TINT_IPC5.setIC5IS(thebits : TBits_2); inline;
  50120. begin
  50121. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  50122. end;
  50123. function TINT_IPC5.getIC5IS : TBits_2; inline;
  50124. begin
  50125. getIC5IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  50126. end;
  50127. procedure TINT_IPC5.setIC5IP(thebits : TBits_3); inline;
  50128. begin
  50129. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  50130. end;
  50131. function TINT_IPC5.getIC5IP : TBits_3; inline;
  50132. begin
  50133. getIC5IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  50134. end;
  50135. procedure TINT_IPC5.setOC5IS(thebits : TBits_2); inline;
  50136. begin
  50137. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  50138. end;
  50139. function TINT_IPC5.getOC5IS : TBits_2; inline;
  50140. begin
  50141. getOC5IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  50142. end;
  50143. procedure TINT_IPC5.setOC5IP(thebits : TBits_3); inline;
  50144. begin
  50145. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  50146. end;
  50147. function TINT_IPC5.getOC5IP : TBits_3; inline;
  50148. begin
  50149. getOC5IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  50150. end;
  50151. procedure TINT_IPC5.setw(thebits : TBits_32); inline;
  50152. begin
  50153. pTDefRegMap(@Self)^.val := thebits;
  50154. end;
  50155. function TINT_IPC5.getw : TBits_32; inline;
  50156. begin
  50157. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  50158. end;
  50159. procedure TINT_IPC6.setU1IS(thebits : TBits_2); inline;
  50160. begin
  50161. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  50162. end;
  50163. function TINT_IPC6.getU1IS : TBits_2; inline;
  50164. begin
  50165. getU1IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  50166. end;
  50167. procedure TINT_IPC6.setU1IP(thebits : TBits_3); inline;
  50168. begin
  50169. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  50170. end;
  50171. function TINT_IPC6.getU1IP : TBits_3; inline;
  50172. begin
  50173. getU1IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  50174. end;
  50175. procedure TINT_IPC6.setI2C1IS(thebits : TBits_2); inline;
  50176. begin
  50177. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  50178. end;
  50179. function TINT_IPC6.getI2C1IS : TBits_2; inline;
  50180. begin
  50181. getI2C1IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  50182. end;
  50183. procedure TINT_IPC6.setI2C1IP(thebits : TBits_3); inline;
  50184. begin
  50185. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  50186. end;
  50187. function TINT_IPC6.getI2C1IP : TBits_3; inline;
  50188. begin
  50189. getI2C1IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  50190. end;
  50191. procedure TINT_IPC6.setCNIS(thebits : TBits_2); inline;
  50192. begin
  50193. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  50194. end;
  50195. function TINT_IPC6.getCNIS : TBits_2; inline;
  50196. begin
  50197. getCNIS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  50198. end;
  50199. procedure TINT_IPC6.setCNIP(thebits : TBits_3); inline;
  50200. begin
  50201. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  50202. end;
  50203. function TINT_IPC6.getCNIP : TBits_3; inline;
  50204. begin
  50205. getCNIP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  50206. end;
  50207. procedure TINT_IPC6.setAD1IS(thebits : TBits_2); inline;
  50208. begin
  50209. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  50210. end;
  50211. function TINT_IPC6.getAD1IS : TBits_2; inline;
  50212. begin
  50213. getAD1IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  50214. end;
  50215. procedure TINT_IPC6.setAD1IP(thebits : TBits_3); inline;
  50216. begin
  50217. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  50218. end;
  50219. function TINT_IPC6.getAD1IP : TBits_3; inline;
  50220. begin
  50221. getAD1IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  50222. end;
  50223. procedure TINT_IPC6.setU1AIS(thebits : TBits_2); inline;
  50224. begin
  50225. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  50226. end;
  50227. function TINT_IPC6.getU1AIS : TBits_2; inline;
  50228. begin
  50229. getU1AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  50230. end;
  50231. procedure TINT_IPC6.setU1AIP(thebits : TBits_3); inline;
  50232. begin
  50233. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  50234. end;
  50235. function TINT_IPC6.getU1AIP : TBits_3; inline;
  50236. begin
  50237. getU1AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  50238. end;
  50239. procedure TINT_IPC6.setSPI3IS(thebits : TBits_2); inline;
  50240. begin
  50241. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  50242. end;
  50243. function TINT_IPC6.getSPI3IS : TBits_2; inline;
  50244. begin
  50245. getSPI3IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  50246. end;
  50247. procedure TINT_IPC6.setSPI3IP(thebits : TBits_3); inline;
  50248. begin
  50249. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  50250. end;
  50251. function TINT_IPC6.getSPI3IP : TBits_3; inline;
  50252. begin
  50253. getSPI3IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  50254. end;
  50255. procedure TINT_IPC6.setSPI1AIS(thebits : TBits_2); inline;
  50256. begin
  50257. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  50258. end;
  50259. function TINT_IPC6.getSPI1AIS : TBits_2; inline;
  50260. begin
  50261. getSPI1AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  50262. end;
  50263. procedure TINT_IPC6.setSPI1AIP(thebits : TBits_3); inline;
  50264. begin
  50265. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  50266. end;
  50267. function TINT_IPC6.getSPI1AIP : TBits_3; inline;
  50268. begin
  50269. getSPI1AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  50270. end;
  50271. procedure TINT_IPC6.setI2C3IS(thebits : TBits_2); inline;
  50272. begin
  50273. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  50274. end;
  50275. function TINT_IPC6.getI2C3IS : TBits_2; inline;
  50276. begin
  50277. getI2C3IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  50278. end;
  50279. procedure TINT_IPC6.setI2C3IP(thebits : TBits_3); inline;
  50280. begin
  50281. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  50282. end;
  50283. function TINT_IPC6.getI2C3IP : TBits_3; inline;
  50284. begin
  50285. getI2C3IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  50286. end;
  50287. procedure TINT_IPC6.setI2C1AIS(thebits : TBits_2); inline;
  50288. begin
  50289. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  50290. end;
  50291. function TINT_IPC6.getI2C1AIS : TBits_2; inline;
  50292. begin
  50293. getI2C1AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  50294. end;
  50295. procedure TINT_IPC6.setI2C1AIP(thebits : TBits_3); inline;
  50296. begin
  50297. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  50298. end;
  50299. function TINT_IPC6.getI2C1AIP : TBits_3; inline;
  50300. begin
  50301. getI2C1AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  50302. end;
  50303. procedure TINT_IPC6.setw(thebits : TBits_32); inline;
  50304. begin
  50305. pTDefRegMap(@Self)^.val := thebits;
  50306. end;
  50307. function TINT_IPC6.getw : TBits_32; inline;
  50308. begin
  50309. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  50310. end;
  50311. procedure TINT_IPC7.setPMPIS(thebits : TBits_2); inline;
  50312. begin
  50313. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  50314. end;
  50315. function TINT_IPC7.getPMPIS : TBits_2; inline;
  50316. begin
  50317. getPMPIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  50318. end;
  50319. procedure TINT_IPC7.setPMPIP(thebits : TBits_3); inline;
  50320. begin
  50321. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  50322. end;
  50323. function TINT_IPC7.getPMPIP : TBits_3; inline;
  50324. begin
  50325. getPMPIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  50326. end;
  50327. procedure TINT_IPC7.setCMP1IS(thebits : TBits_2); inline;
  50328. begin
  50329. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  50330. end;
  50331. function TINT_IPC7.getCMP1IS : TBits_2; inline;
  50332. begin
  50333. getCMP1IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  50334. end;
  50335. procedure TINT_IPC7.setCMP1IP(thebits : TBits_3); inline;
  50336. begin
  50337. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  50338. end;
  50339. function TINT_IPC7.getCMP1IP : TBits_3; inline;
  50340. begin
  50341. getCMP1IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  50342. end;
  50343. procedure TINT_IPC7.setCMP2IS(thebits : TBits_2); inline;
  50344. begin
  50345. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  50346. end;
  50347. function TINT_IPC7.getCMP2IS : TBits_2; inline;
  50348. begin
  50349. getCMP2IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  50350. end;
  50351. procedure TINT_IPC7.setCMP2IP(thebits : TBits_3); inline;
  50352. begin
  50353. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  50354. end;
  50355. function TINT_IPC7.getCMP2IP : TBits_3; inline;
  50356. begin
  50357. getCMP2IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  50358. end;
  50359. procedure TINT_IPC7.setU3IS(thebits : TBits_2); inline;
  50360. begin
  50361. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  50362. end;
  50363. function TINT_IPC7.getU3IS : TBits_2; inline;
  50364. begin
  50365. getU3IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  50366. end;
  50367. procedure TINT_IPC7.setU3IP(thebits : TBits_3); inline;
  50368. begin
  50369. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  50370. end;
  50371. function TINT_IPC7.getU3IP : TBits_3; inline;
  50372. begin
  50373. getU3IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  50374. end;
  50375. procedure TINT_IPC7.setU2AIS(thebits : TBits_2); inline;
  50376. begin
  50377. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  50378. end;
  50379. function TINT_IPC7.getU2AIS : TBits_2; inline;
  50380. begin
  50381. getU2AIS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  50382. end;
  50383. procedure TINT_IPC7.setU2AIP(thebits : TBits_3); inline;
  50384. begin
  50385. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  50386. end;
  50387. function TINT_IPC7.getU2AIP : TBits_3; inline;
  50388. begin
  50389. getU2AIP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  50390. end;
  50391. procedure TINT_IPC7.setSPI2IS(thebits : TBits_2); inline;
  50392. begin
  50393. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  50394. end;
  50395. function TINT_IPC7.getSPI2IS : TBits_2; inline;
  50396. begin
  50397. getSPI2IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  50398. end;
  50399. procedure TINT_IPC7.setSPI2IP(thebits : TBits_3); inline;
  50400. begin
  50401. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  50402. end;
  50403. function TINT_IPC7.getSPI2IP : TBits_3; inline;
  50404. begin
  50405. getSPI2IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  50406. end;
  50407. procedure TINT_IPC7.setSPI2AIS(thebits : TBits_2); inline;
  50408. begin
  50409. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  50410. end;
  50411. function TINT_IPC7.getSPI2AIS : TBits_2; inline;
  50412. begin
  50413. getSPI2AIS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  50414. end;
  50415. procedure TINT_IPC7.setSPI2AIP(thebits : TBits_3); inline;
  50416. begin
  50417. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  50418. end;
  50419. function TINT_IPC7.getSPI2AIP : TBits_3; inline;
  50420. begin
  50421. getSPI2AIP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  50422. end;
  50423. procedure TINT_IPC7.setI2C4IS(thebits : TBits_2); inline;
  50424. begin
  50425. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  50426. end;
  50427. function TINT_IPC7.getI2C4IS : TBits_2; inline;
  50428. begin
  50429. getI2C4IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  50430. end;
  50431. procedure TINT_IPC7.setI2C4IP(thebits : TBits_3); inline;
  50432. begin
  50433. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  50434. end;
  50435. function TINT_IPC7.getI2C4IP : TBits_3; inline;
  50436. begin
  50437. getI2C4IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  50438. end;
  50439. procedure TINT_IPC7.setI2C2AIS(thebits : TBits_2); inline;
  50440. begin
  50441. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  50442. end;
  50443. function TINT_IPC7.getI2C2AIS : TBits_2; inline;
  50444. begin
  50445. getI2C2AIS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  50446. end;
  50447. procedure TINT_IPC7.setI2C2AIP(thebits : TBits_3); inline;
  50448. begin
  50449. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  50450. end;
  50451. function TINT_IPC7.getI2C2AIP : TBits_3; inline;
  50452. begin
  50453. getI2C2AIP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  50454. end;
  50455. procedure TINT_IPC7.setw(thebits : TBits_32); inline;
  50456. begin
  50457. pTDefRegMap(@Self)^.val := thebits;
  50458. end;
  50459. function TINT_IPC7.getw : TBits_32; inline;
  50460. begin
  50461. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  50462. end;
  50463. procedure TINT_IPC8.setU2IS(thebits : TBits_2); inline;
  50464. begin
  50465. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  50466. end;
  50467. function TINT_IPC8.getU2IS : TBits_2; inline;
  50468. begin
  50469. getU2IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  50470. end;
  50471. procedure TINT_IPC8.setU2IP(thebits : TBits_3); inline;
  50472. begin
  50473. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  50474. end;
  50475. function TINT_IPC8.getU2IP : TBits_3; inline;
  50476. begin
  50477. getU2IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  50478. end;
  50479. procedure TINT_IPC8.setFSCMIS(thebits : TBits_2); inline;
  50480. begin
  50481. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  50482. end;
  50483. function TINT_IPC8.getFSCMIS : TBits_2; inline;
  50484. begin
  50485. getFSCMIS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  50486. end;
  50487. procedure TINT_IPC8.setFSCMIP(thebits : TBits_3); inline;
  50488. begin
  50489. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  50490. end;
  50491. function TINT_IPC8.getFSCMIP : TBits_3; inline;
  50492. begin
  50493. getFSCMIP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  50494. end;
  50495. procedure TINT_IPC8.setRTCCIS(thebits : TBits_2); inline;
  50496. begin
  50497. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  50498. end;
  50499. function TINT_IPC8.getRTCCIS : TBits_2; inline;
  50500. begin
  50501. getRTCCIS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  50502. end;
  50503. procedure TINT_IPC8.setRTCCIP(thebits : TBits_3); inline;
  50504. begin
  50505. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  50506. end;
  50507. function TINT_IPC8.getRTCCIP : TBits_3; inline;
  50508. begin
  50509. getRTCCIP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  50510. end;
  50511. procedure TINT_IPC8.setU3AIS(thebits : TBits_2); inline;
  50512. begin
  50513. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  50514. end;
  50515. function TINT_IPC8.getU3AIS : TBits_2; inline;
  50516. begin
  50517. getU3AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  50518. end;
  50519. procedure TINT_IPC8.setU3AIP(thebits : TBits_3); inline;
  50520. begin
  50521. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  50522. end;
  50523. function TINT_IPC8.getU3AIP : TBits_3; inline;
  50524. begin
  50525. getU3AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  50526. end;
  50527. procedure TINT_IPC8.setSPI4IS(thebits : TBits_2); inline;
  50528. begin
  50529. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  50530. end;
  50531. function TINT_IPC8.getSPI4IS : TBits_2; inline;
  50532. begin
  50533. getSPI4IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  50534. end;
  50535. procedure TINT_IPC8.setSPI4IP(thebits : TBits_3); inline;
  50536. begin
  50537. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  50538. end;
  50539. function TINT_IPC8.getSPI4IP : TBits_3; inline;
  50540. begin
  50541. getSPI4IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  50542. end;
  50543. procedure TINT_IPC8.setSPI3AIS(thebits : TBits_2); inline;
  50544. begin
  50545. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  50546. end;
  50547. function TINT_IPC8.getSPI3AIS : TBits_2; inline;
  50548. begin
  50549. getSPI3AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  50550. end;
  50551. procedure TINT_IPC8.setSPI3AIP(thebits : TBits_3); inline;
  50552. begin
  50553. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  50554. end;
  50555. function TINT_IPC8.getSPI3AIP : TBits_3; inline;
  50556. begin
  50557. getSPI3AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  50558. end;
  50559. procedure TINT_IPC8.setI2C5IS(thebits : TBits_2); inline;
  50560. begin
  50561. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  50562. end;
  50563. function TINT_IPC8.getI2C5IS : TBits_2; inline;
  50564. begin
  50565. getI2C5IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  50566. end;
  50567. procedure TINT_IPC8.setI2C5IP(thebits : TBits_3); inline;
  50568. begin
  50569. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  50570. end;
  50571. function TINT_IPC8.getI2C5IP : TBits_3; inline;
  50572. begin
  50573. getI2C5IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  50574. end;
  50575. procedure TINT_IPC8.setI2C3AIS(thebits : TBits_2); inline;
  50576. begin
  50577. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  50578. end;
  50579. function TINT_IPC8.getI2C3AIS : TBits_2; inline;
  50580. begin
  50581. getI2C3AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  50582. end;
  50583. procedure TINT_IPC8.setI2C3AIP(thebits : TBits_3); inline;
  50584. begin
  50585. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  50586. end;
  50587. function TINT_IPC8.getI2C3AIP : TBits_3; inline;
  50588. begin
  50589. getI2C3AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  50590. end;
  50591. procedure TINT_IPC8.setw(thebits : TBits_32); inline;
  50592. begin
  50593. pTDefRegMap(@Self)^.val := thebits;
  50594. end;
  50595. function TINT_IPC8.getw : TBits_32; inline;
  50596. begin
  50597. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  50598. end;
  50599. procedure TINT_IPC9.setDMA0IS(thebits : TBits_2); inline;
  50600. begin
  50601. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  50602. end;
  50603. function TINT_IPC9.getDMA0IS : TBits_2; inline;
  50604. begin
  50605. getDMA0IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  50606. end;
  50607. procedure TINT_IPC9.setDMA0IP(thebits : TBits_3); inline;
  50608. begin
  50609. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  50610. end;
  50611. function TINT_IPC9.getDMA0IP : TBits_3; inline;
  50612. begin
  50613. getDMA0IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  50614. end;
  50615. procedure TINT_IPC9.setDMA1IS(thebits : TBits_2); inline;
  50616. begin
  50617. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  50618. end;
  50619. function TINT_IPC9.getDMA1IS : TBits_2; inline;
  50620. begin
  50621. getDMA1IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  50622. end;
  50623. procedure TINT_IPC9.setDMA1IP(thebits : TBits_3); inline;
  50624. begin
  50625. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  50626. end;
  50627. function TINT_IPC9.getDMA1IP : TBits_3; inline;
  50628. begin
  50629. getDMA1IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  50630. end;
  50631. procedure TINT_IPC9.setDMA2IS(thebits : TBits_2); inline;
  50632. begin
  50633. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  50634. end;
  50635. function TINT_IPC9.getDMA2IS : TBits_2; inline;
  50636. begin
  50637. getDMA2IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  50638. end;
  50639. procedure TINT_IPC9.setDMA2IP(thebits : TBits_3); inline;
  50640. begin
  50641. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  50642. end;
  50643. function TINT_IPC9.getDMA2IP : TBits_3; inline;
  50644. begin
  50645. getDMA2IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  50646. end;
  50647. procedure TINT_IPC9.setDMA3IS(thebits : TBits_2); inline;
  50648. begin
  50649. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  50650. end;
  50651. function TINT_IPC9.getDMA3IS : TBits_2; inline;
  50652. begin
  50653. getDMA3IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  50654. end;
  50655. procedure TINT_IPC9.setDMA3IP(thebits : TBits_3); inline;
  50656. begin
  50657. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  50658. end;
  50659. function TINT_IPC9.getDMA3IP : TBits_3; inline;
  50660. begin
  50661. getDMA3IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  50662. end;
  50663. procedure TINT_IPC9.setw(thebits : TBits_32); inline;
  50664. begin
  50665. pTDefRegMap(@Self)^.val := thebits;
  50666. end;
  50667. function TINT_IPC9.getw : TBits_32; inline;
  50668. begin
  50669. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  50670. end;
  50671. procedure TINT_IPC11.setFCEIS(thebits : TBits_2); inline;
  50672. begin
  50673. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  50674. end;
  50675. function TINT_IPC11.getFCEIS : TBits_2; inline;
  50676. begin
  50677. getFCEIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  50678. end;
  50679. procedure TINT_IPC11.setFCEIP(thebits : TBits_3); inline;
  50680. begin
  50681. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  50682. end;
  50683. function TINT_IPC11.getFCEIP : TBits_3; inline;
  50684. begin
  50685. getFCEIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  50686. end;
  50687. procedure TINT_IPC11.setUSBIS(thebits : TBits_2); inline;
  50688. begin
  50689. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  50690. end;
  50691. function TINT_IPC11.getUSBIS : TBits_2; inline;
  50692. begin
  50693. getUSBIS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  50694. end;
  50695. procedure TINT_IPC11.setUSBIP(thebits : TBits_3); inline;
  50696. begin
  50697. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  50698. end;
  50699. function TINT_IPC11.getUSBIP : TBits_3; inline;
  50700. begin
  50701. getUSBIP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  50702. end;
  50703. procedure TINT_IPC11.setCAN1IS(thebits : TBits_2); inline;
  50704. begin
  50705. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  50706. end;
  50707. function TINT_IPC11.getCAN1IS : TBits_2; inline;
  50708. begin
  50709. getCAN1IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  50710. end;
  50711. procedure TINT_IPC11.setCAN1IP(thebits : TBits_3); inline;
  50712. begin
  50713. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  50714. end;
  50715. function TINT_IPC11.getCAN1IP : TBits_3; inline;
  50716. begin
  50717. getCAN1IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  50718. end;
  50719. procedure TINT_IPC11.setw(thebits : TBits_32); inline;
  50720. begin
  50721. pTDefRegMap(@Self)^.val := thebits;
  50722. end;
  50723. function TINT_IPC11.getw : TBits_32; inline;
  50724. begin
  50725. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  50726. end;
  50727. procedure TINT_IPC12.setU4IS(thebits : TBits_2); inline;
  50728. begin
  50729. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  50730. end;
  50731. function TINT_IPC12.getU4IS : TBits_2; inline;
  50732. begin
  50733. getU4IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  50734. end;
  50735. procedure TINT_IPC12.setU4IP(thebits : TBits_3); inline;
  50736. begin
  50737. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  50738. end;
  50739. function TINT_IPC12.getU4IP : TBits_3; inline;
  50740. begin
  50741. getU4IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  50742. end;
  50743. procedure TINT_IPC12.setU6IS(thebits : TBits_2); inline;
  50744. begin
  50745. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  50746. end;
  50747. function TINT_IPC12.getU6IS : TBits_2; inline;
  50748. begin
  50749. getU6IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  50750. end;
  50751. procedure TINT_IPC12.setU6IP(thebits : TBits_3); inline;
  50752. begin
  50753. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  50754. end;
  50755. function TINT_IPC12.getU6IP : TBits_3; inline;
  50756. begin
  50757. getU6IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  50758. end;
  50759. procedure TINT_IPC12.setU5IS(thebits : TBits_2); inline;
  50760. begin
  50761. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  50762. end;
  50763. function TINT_IPC12.getU5IS : TBits_2; inline;
  50764. begin
  50765. getU5IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  50766. end;
  50767. procedure TINT_IPC12.setU5IP(thebits : TBits_3); inline;
  50768. begin
  50769. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  50770. end;
  50771. function TINT_IPC12.getU5IP : TBits_3; inline;
  50772. begin
  50773. getU5IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  50774. end;
  50775. procedure TINT_IPC12.setU1BIS(thebits : TBits_2); inline;
  50776. begin
  50777. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  50778. end;
  50779. function TINT_IPC12.getU1BIS : TBits_2; inline;
  50780. begin
  50781. getU1BIS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  50782. end;
  50783. procedure TINT_IPC12.setU1BIP(thebits : TBits_3); inline;
  50784. begin
  50785. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  50786. end;
  50787. function TINT_IPC12.getU1BIP : TBits_3; inline;
  50788. begin
  50789. getU1BIP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  50790. end;
  50791. procedure TINT_IPC12.setU2BIS(thebits : TBits_2); inline;
  50792. begin
  50793. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  50794. end;
  50795. function TINT_IPC12.getU2BIS : TBits_2; inline;
  50796. begin
  50797. getU2BIS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  50798. end;
  50799. procedure TINT_IPC12.setU2BIP(thebits : TBits_3); inline;
  50800. begin
  50801. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  50802. end;
  50803. function TINT_IPC12.getU2BIP : TBits_3; inline;
  50804. begin
  50805. getU2BIP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  50806. end;
  50807. procedure TINT_IPC12.setU3BIS(thebits : TBits_2); inline;
  50808. begin
  50809. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  50810. end;
  50811. function TINT_IPC12.getU3BIS : TBits_2; inline;
  50812. begin
  50813. getU3BIS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  50814. end;
  50815. procedure TINT_IPC12.setU3BIP(thebits : TBits_3); inline;
  50816. begin
  50817. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  50818. end;
  50819. function TINT_IPC12.getU3BIP : TBits_3; inline;
  50820. begin
  50821. getU3BIP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  50822. end;
  50823. procedure TINT_IPC12.setw(thebits : TBits_32); inline;
  50824. begin
  50825. pTDefRegMap(@Self)^.val := thebits;
  50826. end;
  50827. function TINT_IPC12.getw : TBits_32; inline;
  50828. begin
  50829. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  50830. end;
  50831. procedure TBMX_BMXCON.setBMXARB(thebits : TBits_3); inline;
  50832. begin
  50833. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  50834. end;
  50835. function TBMX_BMXCON.getBMXARB : TBits_3; inline;
  50836. begin
  50837. getBMXARB := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  50838. end;
  50839. procedure TBMX_BMXCON.setBMXWSDRM; inline;
  50840. begin
  50841. pTDefRegMap(@Self)^.&set := $00000040;
  50842. end;
  50843. procedure TBMX_BMXCON.clearBMXWSDRM; inline;
  50844. begin
  50845. pTDefRegMap(@Self)^.clr := $00000040;
  50846. end;
  50847. procedure TBMX_BMXCON.setBMXWSDRM(thebits : TBits_1); inline;
  50848. begin
  50849. if thebits = 0 then
  50850. pTDefRegMap(@Self)^.clr := $00000040
  50851. else
  50852. pTDefRegMap(@Self)^.&set := $00000040;
  50853. end;
  50854. function TBMX_BMXCON.getBMXWSDRM : TBits_1; inline;
  50855. begin
  50856. getBMXWSDRM := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  50857. end;
  50858. procedure TBMX_BMXCON.setBMXERRIS; inline;
  50859. begin
  50860. pTDefRegMap(@Self)^.&set := $00010000;
  50861. end;
  50862. procedure TBMX_BMXCON.clearBMXERRIS; inline;
  50863. begin
  50864. pTDefRegMap(@Self)^.clr := $00010000;
  50865. end;
  50866. procedure TBMX_BMXCON.setBMXERRIS(thebits : TBits_1); inline;
  50867. begin
  50868. if thebits = 0 then
  50869. pTDefRegMap(@Self)^.clr := $00010000
  50870. else
  50871. pTDefRegMap(@Self)^.&set := $00010000;
  50872. end;
  50873. function TBMX_BMXCON.getBMXERRIS : TBits_1; inline;
  50874. begin
  50875. getBMXERRIS := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  50876. end;
  50877. procedure TBMX_BMXCON.setBMXERRDS; inline;
  50878. begin
  50879. pTDefRegMap(@Self)^.&set := $00020000;
  50880. end;
  50881. procedure TBMX_BMXCON.clearBMXERRDS; inline;
  50882. begin
  50883. pTDefRegMap(@Self)^.clr := $00020000;
  50884. end;
  50885. procedure TBMX_BMXCON.setBMXERRDS(thebits : TBits_1); inline;
  50886. begin
  50887. if thebits = 0 then
  50888. pTDefRegMap(@Self)^.clr := $00020000
  50889. else
  50890. pTDefRegMap(@Self)^.&set := $00020000;
  50891. end;
  50892. function TBMX_BMXCON.getBMXERRDS : TBits_1; inline;
  50893. begin
  50894. getBMXERRDS := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  50895. end;
  50896. procedure TBMX_BMXCON.setBMXERRDMA; inline;
  50897. begin
  50898. pTDefRegMap(@Self)^.&set := $00040000;
  50899. end;
  50900. procedure TBMX_BMXCON.clearBMXERRDMA; inline;
  50901. begin
  50902. pTDefRegMap(@Self)^.clr := $00040000;
  50903. end;
  50904. procedure TBMX_BMXCON.setBMXERRDMA(thebits : TBits_1); inline;
  50905. begin
  50906. if thebits = 0 then
  50907. pTDefRegMap(@Self)^.clr := $00040000
  50908. else
  50909. pTDefRegMap(@Self)^.&set := $00040000;
  50910. end;
  50911. function TBMX_BMXCON.getBMXERRDMA : TBits_1; inline;
  50912. begin
  50913. getBMXERRDMA := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  50914. end;
  50915. procedure TBMX_BMXCON.setBMXERRICD; inline;
  50916. begin
  50917. pTDefRegMap(@Self)^.&set := $00080000;
  50918. end;
  50919. procedure TBMX_BMXCON.clearBMXERRICD; inline;
  50920. begin
  50921. pTDefRegMap(@Self)^.clr := $00080000;
  50922. end;
  50923. procedure TBMX_BMXCON.setBMXERRICD(thebits : TBits_1); inline;
  50924. begin
  50925. if thebits = 0 then
  50926. pTDefRegMap(@Self)^.clr := $00080000
  50927. else
  50928. pTDefRegMap(@Self)^.&set := $00080000;
  50929. end;
  50930. function TBMX_BMXCON.getBMXERRICD : TBits_1; inline;
  50931. begin
  50932. getBMXERRICD := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  50933. end;
  50934. procedure TBMX_BMXCON.setBMXERRIXI; inline;
  50935. begin
  50936. pTDefRegMap(@Self)^.&set := $00100000;
  50937. end;
  50938. procedure TBMX_BMXCON.clearBMXERRIXI; inline;
  50939. begin
  50940. pTDefRegMap(@Self)^.clr := $00100000;
  50941. end;
  50942. procedure TBMX_BMXCON.setBMXERRIXI(thebits : TBits_1); inline;
  50943. begin
  50944. if thebits = 0 then
  50945. pTDefRegMap(@Self)^.clr := $00100000
  50946. else
  50947. pTDefRegMap(@Self)^.&set := $00100000;
  50948. end;
  50949. function TBMX_BMXCON.getBMXERRIXI : TBits_1; inline;
  50950. begin
  50951. getBMXERRIXI := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  50952. end;
  50953. procedure TBMX_BMXCON.setBMXCHEDMA; inline;
  50954. begin
  50955. pTDefRegMap(@Self)^.&set := $04000000;
  50956. end;
  50957. procedure TBMX_BMXCON.clearBMXCHEDMA; inline;
  50958. begin
  50959. pTDefRegMap(@Self)^.clr := $04000000;
  50960. end;
  50961. procedure TBMX_BMXCON.setBMXCHEDMA(thebits : TBits_1); inline;
  50962. begin
  50963. if thebits = 0 then
  50964. pTDefRegMap(@Self)^.clr := $04000000
  50965. else
  50966. pTDefRegMap(@Self)^.&set := $04000000;
  50967. end;
  50968. function TBMX_BMXCON.getBMXCHEDMA : TBits_1; inline;
  50969. begin
  50970. getBMXCHEDMA := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  50971. end;
  50972. procedure TBMX_BMXCON.setw(thebits : TBits_32); inline;
  50973. begin
  50974. pTDefRegMap(@Self)^.val := thebits;
  50975. end;
  50976. function TBMX_BMXCON.getw : TBits_32; inline;
  50977. begin
  50978. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  50979. end;
  50980. procedure TDMAC_DMACON.setDMABUSY; inline;
  50981. begin
  50982. pTDefRegMap(@Self)^.&set := $00000800;
  50983. end;
  50984. procedure TDMAC_DMACON.clearDMABUSY; inline;
  50985. begin
  50986. pTDefRegMap(@Self)^.clr := $00000800;
  50987. end;
  50988. procedure TDMAC_DMACON.setDMABUSY(thebits : TBits_1); inline;
  50989. begin
  50990. if thebits = 0 then
  50991. pTDefRegMap(@Self)^.clr := $00000800
  50992. else
  50993. pTDefRegMap(@Self)^.&set := $00000800;
  50994. end;
  50995. function TDMAC_DMACON.getDMABUSY : TBits_1; inline;
  50996. begin
  50997. getDMABUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  50998. end;
  50999. procedure TDMAC_DMACON.setSUSPEND; inline;
  51000. begin
  51001. pTDefRegMap(@Self)^.&set := $00001000;
  51002. end;
  51003. procedure TDMAC_DMACON.clearSUSPEND; inline;
  51004. begin
  51005. pTDefRegMap(@Self)^.clr := $00001000;
  51006. end;
  51007. procedure TDMAC_DMACON.setSUSPEND(thebits : TBits_1); inline;
  51008. begin
  51009. if thebits = 0 then
  51010. pTDefRegMap(@Self)^.clr := $00001000
  51011. else
  51012. pTDefRegMap(@Self)^.&set := $00001000;
  51013. end;
  51014. function TDMAC_DMACON.getSUSPEND : TBits_1; inline;
  51015. begin
  51016. getSUSPEND := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  51017. end;
  51018. procedure TDMAC_DMACON.setON; inline;
  51019. begin
  51020. pTDefRegMap(@Self)^.&set := $00008000;
  51021. end;
  51022. procedure TDMAC_DMACON.clearON; inline;
  51023. begin
  51024. pTDefRegMap(@Self)^.clr := $00008000;
  51025. end;
  51026. procedure TDMAC_DMACON.setON(thebits : TBits_1); inline;
  51027. begin
  51028. if thebits = 0 then
  51029. pTDefRegMap(@Self)^.clr := $00008000
  51030. else
  51031. pTDefRegMap(@Self)^.&set := $00008000;
  51032. end;
  51033. function TDMAC_DMACON.getON : TBits_1; inline;
  51034. begin
  51035. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  51036. end;
  51037. procedure TDMAC_DMACON.setw(thebits : TBits_32); inline;
  51038. begin
  51039. pTDefRegMap(@Self)^.val := thebits;
  51040. end;
  51041. function TDMAC_DMACON.getw : TBits_32; inline;
  51042. begin
  51043. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51044. end;
  51045. procedure TDMAC_DMASTAT.setDMACH(thebits : TBits_3); inline;
  51046. begin
  51047. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  51048. end;
  51049. function TDMAC_DMASTAT.getDMACH : TBits_3; inline;
  51050. begin
  51051. getDMACH := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  51052. end;
  51053. procedure TDMAC_DMASTAT.setRDWR; inline;
  51054. begin
  51055. pTDefRegMap(@Self)^.&set := $00000008;
  51056. end;
  51057. procedure TDMAC_DMASTAT.clearRDWR; inline;
  51058. begin
  51059. pTDefRegMap(@Self)^.clr := $00000008;
  51060. end;
  51061. procedure TDMAC_DMASTAT.setRDWR(thebits : TBits_1); inline;
  51062. begin
  51063. if thebits = 0 then
  51064. pTDefRegMap(@Self)^.clr := $00000008
  51065. else
  51066. pTDefRegMap(@Self)^.&set := $00000008;
  51067. end;
  51068. function TDMAC_DMASTAT.getRDWR : TBits_1; inline;
  51069. begin
  51070. getRDWR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  51071. end;
  51072. procedure TDMAC_DMASTAT.setw(thebits : TBits_32); inline;
  51073. begin
  51074. pTDefRegMap(@Self)^.val := thebits;
  51075. end;
  51076. function TDMAC_DMASTAT.getw : TBits_32; inline;
  51077. begin
  51078. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51079. end;
  51080. procedure TDMAC_DCRCCON.setCRCCH(thebits : TBits_3); inline;
  51081. begin
  51082. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  51083. end;
  51084. function TDMAC_DCRCCON.getCRCCH : TBits_3; inline;
  51085. begin
  51086. getCRCCH := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  51087. end;
  51088. procedure TDMAC_DCRCCON.setCRCTYP; inline;
  51089. begin
  51090. pTDefRegMap(@Self)^.&set := $00000020;
  51091. end;
  51092. procedure TDMAC_DCRCCON.clearCRCTYP; inline;
  51093. begin
  51094. pTDefRegMap(@Self)^.clr := $00000020;
  51095. end;
  51096. procedure TDMAC_DCRCCON.setCRCTYP(thebits : TBits_1); inline;
  51097. begin
  51098. if thebits = 0 then
  51099. pTDefRegMap(@Self)^.clr := $00000020
  51100. else
  51101. pTDefRegMap(@Self)^.&set := $00000020;
  51102. end;
  51103. function TDMAC_DCRCCON.getCRCTYP : TBits_1; inline;
  51104. begin
  51105. getCRCTYP := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  51106. end;
  51107. procedure TDMAC_DCRCCON.setCRCAPP; inline;
  51108. begin
  51109. pTDefRegMap(@Self)^.&set := $00000040;
  51110. end;
  51111. procedure TDMAC_DCRCCON.clearCRCAPP; inline;
  51112. begin
  51113. pTDefRegMap(@Self)^.clr := $00000040;
  51114. end;
  51115. procedure TDMAC_DCRCCON.setCRCAPP(thebits : TBits_1); inline;
  51116. begin
  51117. if thebits = 0 then
  51118. pTDefRegMap(@Self)^.clr := $00000040
  51119. else
  51120. pTDefRegMap(@Self)^.&set := $00000040;
  51121. end;
  51122. function TDMAC_DCRCCON.getCRCAPP : TBits_1; inline;
  51123. begin
  51124. getCRCAPP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  51125. end;
  51126. procedure TDMAC_DCRCCON.setCRCEN; inline;
  51127. begin
  51128. pTDefRegMap(@Self)^.&set := $00000080;
  51129. end;
  51130. procedure TDMAC_DCRCCON.clearCRCEN; inline;
  51131. begin
  51132. pTDefRegMap(@Self)^.clr := $00000080;
  51133. end;
  51134. procedure TDMAC_DCRCCON.setCRCEN(thebits : TBits_1); inline;
  51135. begin
  51136. if thebits = 0 then
  51137. pTDefRegMap(@Self)^.clr := $00000080
  51138. else
  51139. pTDefRegMap(@Self)^.&set := $00000080;
  51140. end;
  51141. function TDMAC_DCRCCON.getCRCEN : TBits_1; inline;
  51142. begin
  51143. getCRCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  51144. end;
  51145. procedure TDMAC_DCRCCON.setPLEN(thebits : TBits_5); inline;
  51146. begin
  51147. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  51148. end;
  51149. function TDMAC_DCRCCON.getPLEN : TBits_5; inline;
  51150. begin
  51151. getPLEN := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  51152. end;
  51153. procedure TDMAC_DCRCCON.setBITO; inline;
  51154. begin
  51155. pTDefRegMap(@Self)^.&set := $01000000;
  51156. end;
  51157. procedure TDMAC_DCRCCON.clearBITO; inline;
  51158. begin
  51159. pTDefRegMap(@Self)^.clr := $01000000;
  51160. end;
  51161. procedure TDMAC_DCRCCON.setBITO(thebits : TBits_1); inline;
  51162. begin
  51163. if thebits = 0 then
  51164. pTDefRegMap(@Self)^.clr := $01000000
  51165. else
  51166. pTDefRegMap(@Self)^.&set := $01000000;
  51167. end;
  51168. function TDMAC_DCRCCON.getBITO : TBits_1; inline;
  51169. begin
  51170. getBITO := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  51171. end;
  51172. procedure TDMAC_DCRCCON.setWBO; inline;
  51173. begin
  51174. pTDefRegMap(@Self)^.&set := $08000000;
  51175. end;
  51176. procedure TDMAC_DCRCCON.clearWBO; inline;
  51177. begin
  51178. pTDefRegMap(@Self)^.clr := $08000000;
  51179. end;
  51180. procedure TDMAC_DCRCCON.setWBO(thebits : TBits_1); inline;
  51181. begin
  51182. if thebits = 0 then
  51183. pTDefRegMap(@Self)^.clr := $08000000
  51184. else
  51185. pTDefRegMap(@Self)^.&set := $08000000;
  51186. end;
  51187. function TDMAC_DCRCCON.getWBO : TBits_1; inline;
  51188. begin
  51189. getWBO := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  51190. end;
  51191. procedure TDMAC_DCRCCON.setBYTO(thebits : TBits_2); inline;
  51192. begin
  51193. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $CFFFFFFF or ( thebits shl 28 );
  51194. end;
  51195. function TDMAC_DCRCCON.getBYTO : TBits_2; inline;
  51196. begin
  51197. getBYTO := (pTDefRegMap(@Self)^.val and $30000000) shr 28;
  51198. end;
  51199. procedure TDMAC_DCRCCON.setw(thebits : TBits_32); inline;
  51200. begin
  51201. pTDefRegMap(@Self)^.val := thebits;
  51202. end;
  51203. function TDMAC_DCRCCON.getw : TBits_32; inline;
  51204. begin
  51205. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51206. end;
  51207. procedure TDMAC0_DCH0CON.setCHPRI(thebits : TBits_2); inline;
  51208. begin
  51209. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51210. end;
  51211. function TDMAC0_DCH0CON.getCHPRI : TBits_2; inline;
  51212. begin
  51213. getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51214. end;
  51215. procedure TDMAC0_DCH0CON.setCHEDET; inline;
  51216. begin
  51217. pTDefRegMap(@Self)^.&set := $00000004;
  51218. end;
  51219. procedure TDMAC0_DCH0CON.clearCHEDET; inline;
  51220. begin
  51221. pTDefRegMap(@Self)^.clr := $00000004;
  51222. end;
  51223. procedure TDMAC0_DCH0CON.setCHEDET(thebits : TBits_1); inline;
  51224. begin
  51225. if thebits = 0 then
  51226. pTDefRegMap(@Self)^.clr := $00000004
  51227. else
  51228. pTDefRegMap(@Self)^.&set := $00000004;
  51229. end;
  51230. function TDMAC0_DCH0CON.getCHEDET : TBits_1; inline;
  51231. begin
  51232. getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  51233. end;
  51234. procedure TDMAC0_DCH0CON.setCHAEN; inline;
  51235. begin
  51236. pTDefRegMap(@Self)^.&set := $00000010;
  51237. end;
  51238. procedure TDMAC0_DCH0CON.clearCHAEN; inline;
  51239. begin
  51240. pTDefRegMap(@Self)^.clr := $00000010;
  51241. end;
  51242. procedure TDMAC0_DCH0CON.setCHAEN(thebits : TBits_1); inline;
  51243. begin
  51244. if thebits = 0 then
  51245. pTDefRegMap(@Self)^.clr := $00000010
  51246. else
  51247. pTDefRegMap(@Self)^.&set := $00000010;
  51248. end;
  51249. function TDMAC0_DCH0CON.getCHAEN : TBits_1; inline;
  51250. begin
  51251. getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  51252. end;
  51253. procedure TDMAC0_DCH0CON.setCHCHN; inline;
  51254. begin
  51255. pTDefRegMap(@Self)^.&set := $00000020;
  51256. end;
  51257. procedure TDMAC0_DCH0CON.clearCHCHN; inline;
  51258. begin
  51259. pTDefRegMap(@Self)^.clr := $00000020;
  51260. end;
  51261. procedure TDMAC0_DCH0CON.setCHCHN(thebits : TBits_1); inline;
  51262. begin
  51263. if thebits = 0 then
  51264. pTDefRegMap(@Self)^.clr := $00000020
  51265. else
  51266. pTDefRegMap(@Self)^.&set := $00000020;
  51267. end;
  51268. function TDMAC0_DCH0CON.getCHCHN : TBits_1; inline;
  51269. begin
  51270. getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  51271. end;
  51272. procedure TDMAC0_DCH0CON.setCHAED; inline;
  51273. begin
  51274. pTDefRegMap(@Self)^.&set := $00000040;
  51275. end;
  51276. procedure TDMAC0_DCH0CON.clearCHAED; inline;
  51277. begin
  51278. pTDefRegMap(@Self)^.clr := $00000040;
  51279. end;
  51280. procedure TDMAC0_DCH0CON.setCHAED(thebits : TBits_1); inline;
  51281. begin
  51282. if thebits = 0 then
  51283. pTDefRegMap(@Self)^.clr := $00000040
  51284. else
  51285. pTDefRegMap(@Self)^.&set := $00000040;
  51286. end;
  51287. function TDMAC0_DCH0CON.getCHAED : TBits_1; inline;
  51288. begin
  51289. getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  51290. end;
  51291. procedure TDMAC0_DCH0CON.setCHEN; inline;
  51292. begin
  51293. pTDefRegMap(@Self)^.&set := $00000080;
  51294. end;
  51295. procedure TDMAC0_DCH0CON.clearCHEN; inline;
  51296. begin
  51297. pTDefRegMap(@Self)^.clr := $00000080;
  51298. end;
  51299. procedure TDMAC0_DCH0CON.setCHEN(thebits : TBits_1); inline;
  51300. begin
  51301. if thebits = 0 then
  51302. pTDefRegMap(@Self)^.clr := $00000080
  51303. else
  51304. pTDefRegMap(@Self)^.&set := $00000080;
  51305. end;
  51306. function TDMAC0_DCH0CON.getCHEN : TBits_1; inline;
  51307. begin
  51308. getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  51309. end;
  51310. procedure TDMAC0_DCH0CON.setCHCHNS; inline;
  51311. begin
  51312. pTDefRegMap(@Self)^.&set := $00000100;
  51313. end;
  51314. procedure TDMAC0_DCH0CON.clearCHCHNS; inline;
  51315. begin
  51316. pTDefRegMap(@Self)^.clr := $00000100;
  51317. end;
  51318. procedure TDMAC0_DCH0CON.setCHCHNS(thebits : TBits_1); inline;
  51319. begin
  51320. if thebits = 0 then
  51321. pTDefRegMap(@Self)^.clr := $00000100
  51322. else
  51323. pTDefRegMap(@Self)^.&set := $00000100;
  51324. end;
  51325. function TDMAC0_DCH0CON.getCHCHNS : TBits_1; inline;
  51326. begin
  51327. getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  51328. end;
  51329. procedure TDMAC0_DCH0CON.setCHBUSY; inline;
  51330. begin
  51331. pTDefRegMap(@Self)^.&set := $00008000;
  51332. end;
  51333. procedure TDMAC0_DCH0CON.clearCHBUSY; inline;
  51334. begin
  51335. pTDefRegMap(@Self)^.clr := $00008000;
  51336. end;
  51337. procedure TDMAC0_DCH0CON.setCHBUSY(thebits : TBits_1); inline;
  51338. begin
  51339. if thebits = 0 then
  51340. pTDefRegMap(@Self)^.clr := $00008000
  51341. else
  51342. pTDefRegMap(@Self)^.&set := $00008000;
  51343. end;
  51344. function TDMAC0_DCH0CON.getCHBUSY : TBits_1; inline;
  51345. begin
  51346. getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  51347. end;
  51348. procedure TDMAC0_DCH0CON.setw(thebits : TBits_32); inline;
  51349. begin
  51350. pTDefRegMap(@Self)^.val := thebits;
  51351. end;
  51352. function TDMAC0_DCH0CON.getw : TBits_32; inline;
  51353. begin
  51354. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51355. end;
  51356. procedure TDMAC0_DCH0ECON.setAIRQEN; inline;
  51357. begin
  51358. pTDefRegMap(@Self)^.&set := $00000008;
  51359. end;
  51360. procedure TDMAC0_DCH0ECON.clearAIRQEN; inline;
  51361. begin
  51362. pTDefRegMap(@Self)^.clr := $00000008;
  51363. end;
  51364. procedure TDMAC0_DCH0ECON.setAIRQEN(thebits : TBits_1); inline;
  51365. begin
  51366. if thebits = 0 then
  51367. pTDefRegMap(@Self)^.clr := $00000008
  51368. else
  51369. pTDefRegMap(@Self)^.&set := $00000008;
  51370. end;
  51371. function TDMAC0_DCH0ECON.getAIRQEN : TBits_1; inline;
  51372. begin
  51373. getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  51374. end;
  51375. procedure TDMAC0_DCH0ECON.setSIRQEN; inline;
  51376. begin
  51377. pTDefRegMap(@Self)^.&set := $00000010;
  51378. end;
  51379. procedure TDMAC0_DCH0ECON.clearSIRQEN; inline;
  51380. begin
  51381. pTDefRegMap(@Self)^.clr := $00000010;
  51382. end;
  51383. procedure TDMAC0_DCH0ECON.setSIRQEN(thebits : TBits_1); inline;
  51384. begin
  51385. if thebits = 0 then
  51386. pTDefRegMap(@Self)^.clr := $00000010
  51387. else
  51388. pTDefRegMap(@Self)^.&set := $00000010;
  51389. end;
  51390. function TDMAC0_DCH0ECON.getSIRQEN : TBits_1; inline;
  51391. begin
  51392. getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  51393. end;
  51394. procedure TDMAC0_DCH0ECON.setPATEN; inline;
  51395. begin
  51396. pTDefRegMap(@Self)^.&set := $00000020;
  51397. end;
  51398. procedure TDMAC0_DCH0ECON.clearPATEN; inline;
  51399. begin
  51400. pTDefRegMap(@Self)^.clr := $00000020;
  51401. end;
  51402. procedure TDMAC0_DCH0ECON.setPATEN(thebits : TBits_1); inline;
  51403. begin
  51404. if thebits = 0 then
  51405. pTDefRegMap(@Self)^.clr := $00000020
  51406. else
  51407. pTDefRegMap(@Self)^.&set := $00000020;
  51408. end;
  51409. function TDMAC0_DCH0ECON.getPATEN : TBits_1; inline;
  51410. begin
  51411. getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  51412. end;
  51413. procedure TDMAC0_DCH0ECON.setCABORT; inline;
  51414. begin
  51415. pTDefRegMap(@Self)^.&set := $00000040;
  51416. end;
  51417. procedure TDMAC0_DCH0ECON.clearCABORT; inline;
  51418. begin
  51419. pTDefRegMap(@Self)^.clr := $00000040;
  51420. end;
  51421. procedure TDMAC0_DCH0ECON.setCABORT(thebits : TBits_1); inline;
  51422. begin
  51423. if thebits = 0 then
  51424. pTDefRegMap(@Self)^.clr := $00000040
  51425. else
  51426. pTDefRegMap(@Self)^.&set := $00000040;
  51427. end;
  51428. function TDMAC0_DCH0ECON.getCABORT : TBits_1; inline;
  51429. begin
  51430. getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  51431. end;
  51432. procedure TDMAC0_DCH0ECON.setCFORCE; inline;
  51433. begin
  51434. pTDefRegMap(@Self)^.&set := $00000080;
  51435. end;
  51436. procedure TDMAC0_DCH0ECON.clearCFORCE; inline;
  51437. begin
  51438. pTDefRegMap(@Self)^.clr := $00000080;
  51439. end;
  51440. procedure TDMAC0_DCH0ECON.setCFORCE(thebits : TBits_1); inline;
  51441. begin
  51442. if thebits = 0 then
  51443. pTDefRegMap(@Self)^.clr := $00000080
  51444. else
  51445. pTDefRegMap(@Self)^.&set := $00000080;
  51446. end;
  51447. function TDMAC0_DCH0ECON.getCFORCE : TBits_1; inline;
  51448. begin
  51449. getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  51450. end;
  51451. procedure TDMAC0_DCH0ECON.setCHSIRQ(thebits : TBits_8); inline;
  51452. begin
  51453. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  51454. end;
  51455. function TDMAC0_DCH0ECON.getCHSIRQ : TBits_8; inline;
  51456. begin
  51457. getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  51458. end;
  51459. procedure TDMAC0_DCH0ECON.setCHAIRQ(thebits : TBits_8); inline;
  51460. begin
  51461. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  51462. end;
  51463. function TDMAC0_DCH0ECON.getCHAIRQ : TBits_8; inline;
  51464. begin
  51465. getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  51466. end;
  51467. procedure TDMAC0_DCH0ECON.setw(thebits : TBits_32); inline;
  51468. begin
  51469. pTDefRegMap(@Self)^.val := thebits;
  51470. end;
  51471. function TDMAC0_DCH0ECON.getw : TBits_32; inline;
  51472. begin
  51473. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51474. end;
  51475. procedure TDMAC0_DCH0INT.setCHERIF; inline;
  51476. begin
  51477. pTDefRegMap(@Self)^.&set := $00000001;
  51478. end;
  51479. procedure TDMAC0_DCH0INT.clearCHERIF; inline;
  51480. begin
  51481. pTDefRegMap(@Self)^.clr := $00000001;
  51482. end;
  51483. procedure TDMAC0_DCH0INT.setCHERIF(thebits : TBits_1); inline;
  51484. begin
  51485. if thebits = 0 then
  51486. pTDefRegMap(@Self)^.clr := $00000001
  51487. else
  51488. pTDefRegMap(@Self)^.&set := $00000001;
  51489. end;
  51490. function TDMAC0_DCH0INT.getCHERIF : TBits_1; inline;
  51491. begin
  51492. getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  51493. end;
  51494. procedure TDMAC0_DCH0INT.setCHTAIF; inline;
  51495. begin
  51496. pTDefRegMap(@Self)^.&set := $00000002;
  51497. end;
  51498. procedure TDMAC0_DCH0INT.clearCHTAIF; inline;
  51499. begin
  51500. pTDefRegMap(@Self)^.clr := $00000002;
  51501. end;
  51502. procedure TDMAC0_DCH0INT.setCHTAIF(thebits : TBits_1); inline;
  51503. begin
  51504. if thebits = 0 then
  51505. pTDefRegMap(@Self)^.clr := $00000002
  51506. else
  51507. pTDefRegMap(@Self)^.&set := $00000002;
  51508. end;
  51509. function TDMAC0_DCH0INT.getCHTAIF : TBits_1; inline;
  51510. begin
  51511. getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  51512. end;
  51513. procedure TDMAC0_DCH0INT.setCHCCIF; inline;
  51514. begin
  51515. pTDefRegMap(@Self)^.&set := $00000004;
  51516. end;
  51517. procedure TDMAC0_DCH0INT.clearCHCCIF; inline;
  51518. begin
  51519. pTDefRegMap(@Self)^.clr := $00000004;
  51520. end;
  51521. procedure TDMAC0_DCH0INT.setCHCCIF(thebits : TBits_1); inline;
  51522. begin
  51523. if thebits = 0 then
  51524. pTDefRegMap(@Self)^.clr := $00000004
  51525. else
  51526. pTDefRegMap(@Self)^.&set := $00000004;
  51527. end;
  51528. function TDMAC0_DCH0INT.getCHCCIF : TBits_1; inline;
  51529. begin
  51530. getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  51531. end;
  51532. procedure TDMAC0_DCH0INT.setCHBCIF; inline;
  51533. begin
  51534. pTDefRegMap(@Self)^.&set := $00000008;
  51535. end;
  51536. procedure TDMAC0_DCH0INT.clearCHBCIF; inline;
  51537. begin
  51538. pTDefRegMap(@Self)^.clr := $00000008;
  51539. end;
  51540. procedure TDMAC0_DCH0INT.setCHBCIF(thebits : TBits_1); inline;
  51541. begin
  51542. if thebits = 0 then
  51543. pTDefRegMap(@Self)^.clr := $00000008
  51544. else
  51545. pTDefRegMap(@Self)^.&set := $00000008;
  51546. end;
  51547. function TDMAC0_DCH0INT.getCHBCIF : TBits_1; inline;
  51548. begin
  51549. getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  51550. end;
  51551. procedure TDMAC0_DCH0INT.setCHDHIF; inline;
  51552. begin
  51553. pTDefRegMap(@Self)^.&set := $00000010;
  51554. end;
  51555. procedure TDMAC0_DCH0INT.clearCHDHIF; inline;
  51556. begin
  51557. pTDefRegMap(@Self)^.clr := $00000010;
  51558. end;
  51559. procedure TDMAC0_DCH0INT.setCHDHIF(thebits : TBits_1); inline;
  51560. begin
  51561. if thebits = 0 then
  51562. pTDefRegMap(@Self)^.clr := $00000010
  51563. else
  51564. pTDefRegMap(@Self)^.&set := $00000010;
  51565. end;
  51566. function TDMAC0_DCH0INT.getCHDHIF : TBits_1; inline;
  51567. begin
  51568. getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  51569. end;
  51570. procedure TDMAC0_DCH0INT.setCHDDIF; inline;
  51571. begin
  51572. pTDefRegMap(@Self)^.&set := $00000020;
  51573. end;
  51574. procedure TDMAC0_DCH0INT.clearCHDDIF; inline;
  51575. begin
  51576. pTDefRegMap(@Self)^.clr := $00000020;
  51577. end;
  51578. procedure TDMAC0_DCH0INT.setCHDDIF(thebits : TBits_1); inline;
  51579. begin
  51580. if thebits = 0 then
  51581. pTDefRegMap(@Self)^.clr := $00000020
  51582. else
  51583. pTDefRegMap(@Self)^.&set := $00000020;
  51584. end;
  51585. function TDMAC0_DCH0INT.getCHDDIF : TBits_1; inline;
  51586. begin
  51587. getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  51588. end;
  51589. procedure TDMAC0_DCH0INT.setCHSHIF; inline;
  51590. begin
  51591. pTDefRegMap(@Self)^.&set := $00000040;
  51592. end;
  51593. procedure TDMAC0_DCH0INT.clearCHSHIF; inline;
  51594. begin
  51595. pTDefRegMap(@Self)^.clr := $00000040;
  51596. end;
  51597. procedure TDMAC0_DCH0INT.setCHSHIF(thebits : TBits_1); inline;
  51598. begin
  51599. if thebits = 0 then
  51600. pTDefRegMap(@Self)^.clr := $00000040
  51601. else
  51602. pTDefRegMap(@Self)^.&set := $00000040;
  51603. end;
  51604. function TDMAC0_DCH0INT.getCHSHIF : TBits_1; inline;
  51605. begin
  51606. getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  51607. end;
  51608. procedure TDMAC0_DCH0INT.setCHSDIF; inline;
  51609. begin
  51610. pTDefRegMap(@Self)^.&set := $00000080;
  51611. end;
  51612. procedure TDMAC0_DCH0INT.clearCHSDIF; inline;
  51613. begin
  51614. pTDefRegMap(@Self)^.clr := $00000080;
  51615. end;
  51616. procedure TDMAC0_DCH0INT.setCHSDIF(thebits : TBits_1); inline;
  51617. begin
  51618. if thebits = 0 then
  51619. pTDefRegMap(@Self)^.clr := $00000080
  51620. else
  51621. pTDefRegMap(@Self)^.&set := $00000080;
  51622. end;
  51623. function TDMAC0_DCH0INT.getCHSDIF : TBits_1; inline;
  51624. begin
  51625. getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  51626. end;
  51627. procedure TDMAC0_DCH0INT.setCHERIE; inline;
  51628. begin
  51629. pTDefRegMap(@Self)^.&set := $00010000;
  51630. end;
  51631. procedure TDMAC0_DCH0INT.clearCHERIE; inline;
  51632. begin
  51633. pTDefRegMap(@Self)^.clr := $00010000;
  51634. end;
  51635. procedure TDMAC0_DCH0INT.setCHERIE(thebits : TBits_1); inline;
  51636. begin
  51637. if thebits = 0 then
  51638. pTDefRegMap(@Self)^.clr := $00010000
  51639. else
  51640. pTDefRegMap(@Self)^.&set := $00010000;
  51641. end;
  51642. function TDMAC0_DCH0INT.getCHERIE : TBits_1; inline;
  51643. begin
  51644. getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  51645. end;
  51646. procedure TDMAC0_DCH0INT.setCHTAIE; inline;
  51647. begin
  51648. pTDefRegMap(@Self)^.&set := $00020000;
  51649. end;
  51650. procedure TDMAC0_DCH0INT.clearCHTAIE; inline;
  51651. begin
  51652. pTDefRegMap(@Self)^.clr := $00020000;
  51653. end;
  51654. procedure TDMAC0_DCH0INT.setCHTAIE(thebits : TBits_1); inline;
  51655. begin
  51656. if thebits = 0 then
  51657. pTDefRegMap(@Self)^.clr := $00020000
  51658. else
  51659. pTDefRegMap(@Self)^.&set := $00020000;
  51660. end;
  51661. function TDMAC0_DCH0INT.getCHTAIE : TBits_1; inline;
  51662. begin
  51663. getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  51664. end;
  51665. procedure TDMAC0_DCH0INT.setCHCCIE; inline;
  51666. begin
  51667. pTDefRegMap(@Self)^.&set := $00040000;
  51668. end;
  51669. procedure TDMAC0_DCH0INT.clearCHCCIE; inline;
  51670. begin
  51671. pTDefRegMap(@Self)^.clr := $00040000;
  51672. end;
  51673. procedure TDMAC0_DCH0INT.setCHCCIE(thebits : TBits_1); inline;
  51674. begin
  51675. if thebits = 0 then
  51676. pTDefRegMap(@Self)^.clr := $00040000
  51677. else
  51678. pTDefRegMap(@Self)^.&set := $00040000;
  51679. end;
  51680. function TDMAC0_DCH0INT.getCHCCIE : TBits_1; inline;
  51681. begin
  51682. getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  51683. end;
  51684. procedure TDMAC0_DCH0INT.setCHBCIE; inline;
  51685. begin
  51686. pTDefRegMap(@Self)^.&set := $00080000;
  51687. end;
  51688. procedure TDMAC0_DCH0INT.clearCHBCIE; inline;
  51689. begin
  51690. pTDefRegMap(@Self)^.clr := $00080000;
  51691. end;
  51692. procedure TDMAC0_DCH0INT.setCHBCIE(thebits : TBits_1); inline;
  51693. begin
  51694. if thebits = 0 then
  51695. pTDefRegMap(@Self)^.clr := $00080000
  51696. else
  51697. pTDefRegMap(@Self)^.&set := $00080000;
  51698. end;
  51699. function TDMAC0_DCH0INT.getCHBCIE : TBits_1; inline;
  51700. begin
  51701. getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  51702. end;
  51703. procedure TDMAC0_DCH0INT.setCHDHIE; inline;
  51704. begin
  51705. pTDefRegMap(@Self)^.&set := $00100000;
  51706. end;
  51707. procedure TDMAC0_DCH0INT.clearCHDHIE; inline;
  51708. begin
  51709. pTDefRegMap(@Self)^.clr := $00100000;
  51710. end;
  51711. procedure TDMAC0_DCH0INT.setCHDHIE(thebits : TBits_1); inline;
  51712. begin
  51713. if thebits = 0 then
  51714. pTDefRegMap(@Self)^.clr := $00100000
  51715. else
  51716. pTDefRegMap(@Self)^.&set := $00100000;
  51717. end;
  51718. function TDMAC0_DCH0INT.getCHDHIE : TBits_1; inline;
  51719. begin
  51720. getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  51721. end;
  51722. procedure TDMAC0_DCH0INT.setCHDDIE; inline;
  51723. begin
  51724. pTDefRegMap(@Self)^.&set := $00200000;
  51725. end;
  51726. procedure TDMAC0_DCH0INT.clearCHDDIE; inline;
  51727. begin
  51728. pTDefRegMap(@Self)^.clr := $00200000;
  51729. end;
  51730. procedure TDMAC0_DCH0INT.setCHDDIE(thebits : TBits_1); inline;
  51731. begin
  51732. if thebits = 0 then
  51733. pTDefRegMap(@Self)^.clr := $00200000
  51734. else
  51735. pTDefRegMap(@Self)^.&set := $00200000;
  51736. end;
  51737. function TDMAC0_DCH0INT.getCHDDIE : TBits_1; inline;
  51738. begin
  51739. getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  51740. end;
  51741. procedure TDMAC0_DCH0INT.setCHSHIE; inline;
  51742. begin
  51743. pTDefRegMap(@Self)^.&set := $00400000;
  51744. end;
  51745. procedure TDMAC0_DCH0INT.clearCHSHIE; inline;
  51746. begin
  51747. pTDefRegMap(@Self)^.clr := $00400000;
  51748. end;
  51749. procedure TDMAC0_DCH0INT.setCHSHIE(thebits : TBits_1); inline;
  51750. begin
  51751. if thebits = 0 then
  51752. pTDefRegMap(@Self)^.clr := $00400000
  51753. else
  51754. pTDefRegMap(@Self)^.&set := $00400000;
  51755. end;
  51756. function TDMAC0_DCH0INT.getCHSHIE : TBits_1; inline;
  51757. begin
  51758. getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  51759. end;
  51760. procedure TDMAC0_DCH0INT.setCHSDIE; inline;
  51761. begin
  51762. pTDefRegMap(@Self)^.&set := $00800000;
  51763. end;
  51764. procedure TDMAC0_DCH0INT.clearCHSDIE; inline;
  51765. begin
  51766. pTDefRegMap(@Self)^.clr := $00800000;
  51767. end;
  51768. procedure TDMAC0_DCH0INT.setCHSDIE(thebits : TBits_1); inline;
  51769. begin
  51770. if thebits = 0 then
  51771. pTDefRegMap(@Self)^.clr := $00800000
  51772. else
  51773. pTDefRegMap(@Self)^.&set := $00800000;
  51774. end;
  51775. function TDMAC0_DCH0INT.getCHSDIE : TBits_1; inline;
  51776. begin
  51777. getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  51778. end;
  51779. procedure TDMAC0_DCH0INT.setw(thebits : TBits_32); inline;
  51780. begin
  51781. pTDefRegMap(@Self)^.val := thebits;
  51782. end;
  51783. function TDMAC0_DCH0INT.getw : TBits_32; inline;
  51784. begin
  51785. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51786. end;
  51787. procedure TDMAC1_DCH1CON.setCHPRI(thebits : TBits_2); inline;
  51788. begin
  51789. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  51790. end;
  51791. function TDMAC1_DCH1CON.getCHPRI : TBits_2; inline;
  51792. begin
  51793. getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  51794. end;
  51795. procedure TDMAC1_DCH1CON.setCHEDET; inline;
  51796. begin
  51797. pTDefRegMap(@Self)^.&set := $00000004;
  51798. end;
  51799. procedure TDMAC1_DCH1CON.clearCHEDET; inline;
  51800. begin
  51801. pTDefRegMap(@Self)^.clr := $00000004;
  51802. end;
  51803. procedure TDMAC1_DCH1CON.setCHEDET(thebits : TBits_1); inline;
  51804. begin
  51805. if thebits = 0 then
  51806. pTDefRegMap(@Self)^.clr := $00000004
  51807. else
  51808. pTDefRegMap(@Self)^.&set := $00000004;
  51809. end;
  51810. function TDMAC1_DCH1CON.getCHEDET : TBits_1; inline;
  51811. begin
  51812. getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  51813. end;
  51814. procedure TDMAC1_DCH1CON.setCHAEN; inline;
  51815. begin
  51816. pTDefRegMap(@Self)^.&set := $00000010;
  51817. end;
  51818. procedure TDMAC1_DCH1CON.clearCHAEN; inline;
  51819. begin
  51820. pTDefRegMap(@Self)^.clr := $00000010;
  51821. end;
  51822. procedure TDMAC1_DCH1CON.setCHAEN(thebits : TBits_1); inline;
  51823. begin
  51824. if thebits = 0 then
  51825. pTDefRegMap(@Self)^.clr := $00000010
  51826. else
  51827. pTDefRegMap(@Self)^.&set := $00000010;
  51828. end;
  51829. function TDMAC1_DCH1CON.getCHAEN : TBits_1; inline;
  51830. begin
  51831. getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  51832. end;
  51833. procedure TDMAC1_DCH1CON.setCHCHN; inline;
  51834. begin
  51835. pTDefRegMap(@Self)^.&set := $00000020;
  51836. end;
  51837. procedure TDMAC1_DCH1CON.clearCHCHN; inline;
  51838. begin
  51839. pTDefRegMap(@Self)^.clr := $00000020;
  51840. end;
  51841. procedure TDMAC1_DCH1CON.setCHCHN(thebits : TBits_1); inline;
  51842. begin
  51843. if thebits = 0 then
  51844. pTDefRegMap(@Self)^.clr := $00000020
  51845. else
  51846. pTDefRegMap(@Self)^.&set := $00000020;
  51847. end;
  51848. function TDMAC1_DCH1CON.getCHCHN : TBits_1; inline;
  51849. begin
  51850. getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  51851. end;
  51852. procedure TDMAC1_DCH1CON.setCHAED; inline;
  51853. begin
  51854. pTDefRegMap(@Self)^.&set := $00000040;
  51855. end;
  51856. procedure TDMAC1_DCH1CON.clearCHAED; inline;
  51857. begin
  51858. pTDefRegMap(@Self)^.clr := $00000040;
  51859. end;
  51860. procedure TDMAC1_DCH1CON.setCHAED(thebits : TBits_1); inline;
  51861. begin
  51862. if thebits = 0 then
  51863. pTDefRegMap(@Self)^.clr := $00000040
  51864. else
  51865. pTDefRegMap(@Self)^.&set := $00000040;
  51866. end;
  51867. function TDMAC1_DCH1CON.getCHAED : TBits_1; inline;
  51868. begin
  51869. getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  51870. end;
  51871. procedure TDMAC1_DCH1CON.setCHEN; inline;
  51872. begin
  51873. pTDefRegMap(@Self)^.&set := $00000080;
  51874. end;
  51875. procedure TDMAC1_DCH1CON.clearCHEN; inline;
  51876. begin
  51877. pTDefRegMap(@Self)^.clr := $00000080;
  51878. end;
  51879. procedure TDMAC1_DCH1CON.setCHEN(thebits : TBits_1); inline;
  51880. begin
  51881. if thebits = 0 then
  51882. pTDefRegMap(@Self)^.clr := $00000080
  51883. else
  51884. pTDefRegMap(@Self)^.&set := $00000080;
  51885. end;
  51886. function TDMAC1_DCH1CON.getCHEN : TBits_1; inline;
  51887. begin
  51888. getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  51889. end;
  51890. procedure TDMAC1_DCH1CON.setCHCHNS; inline;
  51891. begin
  51892. pTDefRegMap(@Self)^.&set := $00000100;
  51893. end;
  51894. procedure TDMAC1_DCH1CON.clearCHCHNS; inline;
  51895. begin
  51896. pTDefRegMap(@Self)^.clr := $00000100;
  51897. end;
  51898. procedure TDMAC1_DCH1CON.setCHCHNS(thebits : TBits_1); inline;
  51899. begin
  51900. if thebits = 0 then
  51901. pTDefRegMap(@Self)^.clr := $00000100
  51902. else
  51903. pTDefRegMap(@Self)^.&set := $00000100;
  51904. end;
  51905. function TDMAC1_DCH1CON.getCHCHNS : TBits_1; inline;
  51906. begin
  51907. getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  51908. end;
  51909. procedure TDMAC1_DCH1CON.setCHBUSY; inline;
  51910. begin
  51911. pTDefRegMap(@Self)^.&set := $00008000;
  51912. end;
  51913. procedure TDMAC1_DCH1CON.clearCHBUSY; inline;
  51914. begin
  51915. pTDefRegMap(@Self)^.clr := $00008000;
  51916. end;
  51917. procedure TDMAC1_DCH1CON.setCHBUSY(thebits : TBits_1); inline;
  51918. begin
  51919. if thebits = 0 then
  51920. pTDefRegMap(@Self)^.clr := $00008000
  51921. else
  51922. pTDefRegMap(@Self)^.&set := $00008000;
  51923. end;
  51924. function TDMAC1_DCH1CON.getCHBUSY : TBits_1; inline;
  51925. begin
  51926. getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  51927. end;
  51928. procedure TDMAC1_DCH1CON.setw(thebits : TBits_32); inline;
  51929. begin
  51930. pTDefRegMap(@Self)^.val := thebits;
  51931. end;
  51932. function TDMAC1_DCH1CON.getw : TBits_32; inline;
  51933. begin
  51934. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51935. end;
  51936. procedure TDMAC1_DCH1ECON.setAIRQEN; inline;
  51937. begin
  51938. pTDefRegMap(@Self)^.&set := $00000008;
  51939. end;
  51940. procedure TDMAC1_DCH1ECON.clearAIRQEN; inline;
  51941. begin
  51942. pTDefRegMap(@Self)^.clr := $00000008;
  51943. end;
  51944. procedure TDMAC1_DCH1ECON.setAIRQEN(thebits : TBits_1); inline;
  51945. begin
  51946. if thebits = 0 then
  51947. pTDefRegMap(@Self)^.clr := $00000008
  51948. else
  51949. pTDefRegMap(@Self)^.&set := $00000008;
  51950. end;
  51951. function TDMAC1_DCH1ECON.getAIRQEN : TBits_1; inline;
  51952. begin
  51953. getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  51954. end;
  51955. procedure TDMAC1_DCH1ECON.setSIRQEN; inline;
  51956. begin
  51957. pTDefRegMap(@Self)^.&set := $00000010;
  51958. end;
  51959. procedure TDMAC1_DCH1ECON.clearSIRQEN; inline;
  51960. begin
  51961. pTDefRegMap(@Self)^.clr := $00000010;
  51962. end;
  51963. procedure TDMAC1_DCH1ECON.setSIRQEN(thebits : TBits_1); inline;
  51964. begin
  51965. if thebits = 0 then
  51966. pTDefRegMap(@Self)^.clr := $00000010
  51967. else
  51968. pTDefRegMap(@Self)^.&set := $00000010;
  51969. end;
  51970. function TDMAC1_DCH1ECON.getSIRQEN : TBits_1; inline;
  51971. begin
  51972. getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  51973. end;
  51974. procedure TDMAC1_DCH1ECON.setPATEN; inline;
  51975. begin
  51976. pTDefRegMap(@Self)^.&set := $00000020;
  51977. end;
  51978. procedure TDMAC1_DCH1ECON.clearPATEN; inline;
  51979. begin
  51980. pTDefRegMap(@Self)^.clr := $00000020;
  51981. end;
  51982. procedure TDMAC1_DCH1ECON.setPATEN(thebits : TBits_1); inline;
  51983. begin
  51984. if thebits = 0 then
  51985. pTDefRegMap(@Self)^.clr := $00000020
  51986. else
  51987. pTDefRegMap(@Self)^.&set := $00000020;
  51988. end;
  51989. function TDMAC1_DCH1ECON.getPATEN : TBits_1; inline;
  51990. begin
  51991. getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  51992. end;
  51993. procedure TDMAC1_DCH1ECON.setCABORT; inline;
  51994. begin
  51995. pTDefRegMap(@Self)^.&set := $00000040;
  51996. end;
  51997. procedure TDMAC1_DCH1ECON.clearCABORT; inline;
  51998. begin
  51999. pTDefRegMap(@Self)^.clr := $00000040;
  52000. end;
  52001. procedure TDMAC1_DCH1ECON.setCABORT(thebits : TBits_1); inline;
  52002. begin
  52003. if thebits = 0 then
  52004. pTDefRegMap(@Self)^.clr := $00000040
  52005. else
  52006. pTDefRegMap(@Self)^.&set := $00000040;
  52007. end;
  52008. function TDMAC1_DCH1ECON.getCABORT : TBits_1; inline;
  52009. begin
  52010. getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  52011. end;
  52012. procedure TDMAC1_DCH1ECON.setCFORCE; inline;
  52013. begin
  52014. pTDefRegMap(@Self)^.&set := $00000080;
  52015. end;
  52016. procedure TDMAC1_DCH1ECON.clearCFORCE; inline;
  52017. begin
  52018. pTDefRegMap(@Self)^.clr := $00000080;
  52019. end;
  52020. procedure TDMAC1_DCH1ECON.setCFORCE(thebits : TBits_1); inline;
  52021. begin
  52022. if thebits = 0 then
  52023. pTDefRegMap(@Self)^.clr := $00000080
  52024. else
  52025. pTDefRegMap(@Self)^.&set := $00000080;
  52026. end;
  52027. function TDMAC1_DCH1ECON.getCFORCE : TBits_1; inline;
  52028. begin
  52029. getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  52030. end;
  52031. procedure TDMAC1_DCH1ECON.setCHSIRQ(thebits : TBits_8); inline;
  52032. begin
  52033. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  52034. end;
  52035. function TDMAC1_DCH1ECON.getCHSIRQ : TBits_8; inline;
  52036. begin
  52037. getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  52038. end;
  52039. procedure TDMAC1_DCH1ECON.setCHAIRQ(thebits : TBits_8); inline;
  52040. begin
  52041. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  52042. end;
  52043. function TDMAC1_DCH1ECON.getCHAIRQ : TBits_8; inline;
  52044. begin
  52045. getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  52046. end;
  52047. procedure TDMAC1_DCH1ECON.setw(thebits : TBits_32); inline;
  52048. begin
  52049. pTDefRegMap(@Self)^.val := thebits;
  52050. end;
  52051. function TDMAC1_DCH1ECON.getw : TBits_32; inline;
  52052. begin
  52053. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52054. end;
  52055. procedure TDMAC1_DCH1INT.setCHERIF; inline;
  52056. begin
  52057. pTDefRegMap(@Self)^.&set := $00000001;
  52058. end;
  52059. procedure TDMAC1_DCH1INT.clearCHERIF; inline;
  52060. begin
  52061. pTDefRegMap(@Self)^.clr := $00000001;
  52062. end;
  52063. procedure TDMAC1_DCH1INT.setCHERIF(thebits : TBits_1); inline;
  52064. begin
  52065. if thebits = 0 then
  52066. pTDefRegMap(@Self)^.clr := $00000001
  52067. else
  52068. pTDefRegMap(@Self)^.&set := $00000001;
  52069. end;
  52070. function TDMAC1_DCH1INT.getCHERIF : TBits_1; inline;
  52071. begin
  52072. getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  52073. end;
  52074. procedure TDMAC1_DCH1INT.setCHTAIF; inline;
  52075. begin
  52076. pTDefRegMap(@Self)^.&set := $00000002;
  52077. end;
  52078. procedure TDMAC1_DCH1INT.clearCHTAIF; inline;
  52079. begin
  52080. pTDefRegMap(@Self)^.clr := $00000002;
  52081. end;
  52082. procedure TDMAC1_DCH1INT.setCHTAIF(thebits : TBits_1); inline;
  52083. begin
  52084. if thebits = 0 then
  52085. pTDefRegMap(@Self)^.clr := $00000002
  52086. else
  52087. pTDefRegMap(@Self)^.&set := $00000002;
  52088. end;
  52089. function TDMAC1_DCH1INT.getCHTAIF : TBits_1; inline;
  52090. begin
  52091. getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  52092. end;
  52093. procedure TDMAC1_DCH1INT.setCHCCIF; inline;
  52094. begin
  52095. pTDefRegMap(@Self)^.&set := $00000004;
  52096. end;
  52097. procedure TDMAC1_DCH1INT.clearCHCCIF; inline;
  52098. begin
  52099. pTDefRegMap(@Self)^.clr := $00000004;
  52100. end;
  52101. procedure TDMAC1_DCH1INT.setCHCCIF(thebits : TBits_1); inline;
  52102. begin
  52103. if thebits = 0 then
  52104. pTDefRegMap(@Self)^.clr := $00000004
  52105. else
  52106. pTDefRegMap(@Self)^.&set := $00000004;
  52107. end;
  52108. function TDMAC1_DCH1INT.getCHCCIF : TBits_1; inline;
  52109. begin
  52110. getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  52111. end;
  52112. procedure TDMAC1_DCH1INT.setCHBCIF; inline;
  52113. begin
  52114. pTDefRegMap(@Self)^.&set := $00000008;
  52115. end;
  52116. procedure TDMAC1_DCH1INT.clearCHBCIF; inline;
  52117. begin
  52118. pTDefRegMap(@Self)^.clr := $00000008;
  52119. end;
  52120. procedure TDMAC1_DCH1INT.setCHBCIF(thebits : TBits_1); inline;
  52121. begin
  52122. if thebits = 0 then
  52123. pTDefRegMap(@Self)^.clr := $00000008
  52124. else
  52125. pTDefRegMap(@Self)^.&set := $00000008;
  52126. end;
  52127. function TDMAC1_DCH1INT.getCHBCIF : TBits_1; inline;
  52128. begin
  52129. getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  52130. end;
  52131. procedure TDMAC1_DCH1INT.setCHDHIF; inline;
  52132. begin
  52133. pTDefRegMap(@Self)^.&set := $00000010;
  52134. end;
  52135. procedure TDMAC1_DCH1INT.clearCHDHIF; inline;
  52136. begin
  52137. pTDefRegMap(@Self)^.clr := $00000010;
  52138. end;
  52139. procedure TDMAC1_DCH1INT.setCHDHIF(thebits : TBits_1); inline;
  52140. begin
  52141. if thebits = 0 then
  52142. pTDefRegMap(@Self)^.clr := $00000010
  52143. else
  52144. pTDefRegMap(@Self)^.&set := $00000010;
  52145. end;
  52146. function TDMAC1_DCH1INT.getCHDHIF : TBits_1; inline;
  52147. begin
  52148. getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  52149. end;
  52150. procedure TDMAC1_DCH1INT.setCHDDIF; inline;
  52151. begin
  52152. pTDefRegMap(@Self)^.&set := $00000020;
  52153. end;
  52154. procedure TDMAC1_DCH1INT.clearCHDDIF; inline;
  52155. begin
  52156. pTDefRegMap(@Self)^.clr := $00000020;
  52157. end;
  52158. procedure TDMAC1_DCH1INT.setCHDDIF(thebits : TBits_1); inline;
  52159. begin
  52160. if thebits = 0 then
  52161. pTDefRegMap(@Self)^.clr := $00000020
  52162. else
  52163. pTDefRegMap(@Self)^.&set := $00000020;
  52164. end;
  52165. function TDMAC1_DCH1INT.getCHDDIF : TBits_1; inline;
  52166. begin
  52167. getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  52168. end;
  52169. procedure TDMAC1_DCH1INT.setCHSHIF; inline;
  52170. begin
  52171. pTDefRegMap(@Self)^.&set := $00000040;
  52172. end;
  52173. procedure TDMAC1_DCH1INT.clearCHSHIF; inline;
  52174. begin
  52175. pTDefRegMap(@Self)^.clr := $00000040;
  52176. end;
  52177. procedure TDMAC1_DCH1INT.setCHSHIF(thebits : TBits_1); inline;
  52178. begin
  52179. if thebits = 0 then
  52180. pTDefRegMap(@Self)^.clr := $00000040
  52181. else
  52182. pTDefRegMap(@Self)^.&set := $00000040;
  52183. end;
  52184. function TDMAC1_DCH1INT.getCHSHIF : TBits_1; inline;
  52185. begin
  52186. getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  52187. end;
  52188. procedure TDMAC1_DCH1INT.setCHSDIF; inline;
  52189. begin
  52190. pTDefRegMap(@Self)^.&set := $00000080;
  52191. end;
  52192. procedure TDMAC1_DCH1INT.clearCHSDIF; inline;
  52193. begin
  52194. pTDefRegMap(@Self)^.clr := $00000080;
  52195. end;
  52196. procedure TDMAC1_DCH1INT.setCHSDIF(thebits : TBits_1); inline;
  52197. begin
  52198. if thebits = 0 then
  52199. pTDefRegMap(@Self)^.clr := $00000080
  52200. else
  52201. pTDefRegMap(@Self)^.&set := $00000080;
  52202. end;
  52203. function TDMAC1_DCH1INT.getCHSDIF : TBits_1; inline;
  52204. begin
  52205. getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  52206. end;
  52207. procedure TDMAC1_DCH1INT.setCHERIE; inline;
  52208. begin
  52209. pTDefRegMap(@Self)^.&set := $00010000;
  52210. end;
  52211. procedure TDMAC1_DCH1INT.clearCHERIE; inline;
  52212. begin
  52213. pTDefRegMap(@Self)^.clr := $00010000;
  52214. end;
  52215. procedure TDMAC1_DCH1INT.setCHERIE(thebits : TBits_1); inline;
  52216. begin
  52217. if thebits = 0 then
  52218. pTDefRegMap(@Self)^.clr := $00010000
  52219. else
  52220. pTDefRegMap(@Self)^.&set := $00010000;
  52221. end;
  52222. function TDMAC1_DCH1INT.getCHERIE : TBits_1; inline;
  52223. begin
  52224. getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  52225. end;
  52226. procedure TDMAC1_DCH1INT.setCHTAIE; inline;
  52227. begin
  52228. pTDefRegMap(@Self)^.&set := $00020000;
  52229. end;
  52230. procedure TDMAC1_DCH1INT.clearCHTAIE; inline;
  52231. begin
  52232. pTDefRegMap(@Self)^.clr := $00020000;
  52233. end;
  52234. procedure TDMAC1_DCH1INT.setCHTAIE(thebits : TBits_1); inline;
  52235. begin
  52236. if thebits = 0 then
  52237. pTDefRegMap(@Self)^.clr := $00020000
  52238. else
  52239. pTDefRegMap(@Self)^.&set := $00020000;
  52240. end;
  52241. function TDMAC1_DCH1INT.getCHTAIE : TBits_1; inline;
  52242. begin
  52243. getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  52244. end;
  52245. procedure TDMAC1_DCH1INT.setCHCCIE; inline;
  52246. begin
  52247. pTDefRegMap(@Self)^.&set := $00040000;
  52248. end;
  52249. procedure TDMAC1_DCH1INT.clearCHCCIE; inline;
  52250. begin
  52251. pTDefRegMap(@Self)^.clr := $00040000;
  52252. end;
  52253. procedure TDMAC1_DCH1INT.setCHCCIE(thebits : TBits_1); inline;
  52254. begin
  52255. if thebits = 0 then
  52256. pTDefRegMap(@Self)^.clr := $00040000
  52257. else
  52258. pTDefRegMap(@Self)^.&set := $00040000;
  52259. end;
  52260. function TDMAC1_DCH1INT.getCHCCIE : TBits_1; inline;
  52261. begin
  52262. getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  52263. end;
  52264. procedure TDMAC1_DCH1INT.setCHBCIE; inline;
  52265. begin
  52266. pTDefRegMap(@Self)^.&set := $00080000;
  52267. end;
  52268. procedure TDMAC1_DCH1INT.clearCHBCIE; inline;
  52269. begin
  52270. pTDefRegMap(@Self)^.clr := $00080000;
  52271. end;
  52272. procedure TDMAC1_DCH1INT.setCHBCIE(thebits : TBits_1); inline;
  52273. begin
  52274. if thebits = 0 then
  52275. pTDefRegMap(@Self)^.clr := $00080000
  52276. else
  52277. pTDefRegMap(@Self)^.&set := $00080000;
  52278. end;
  52279. function TDMAC1_DCH1INT.getCHBCIE : TBits_1; inline;
  52280. begin
  52281. getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  52282. end;
  52283. procedure TDMAC1_DCH1INT.setCHDHIE; inline;
  52284. begin
  52285. pTDefRegMap(@Self)^.&set := $00100000;
  52286. end;
  52287. procedure TDMAC1_DCH1INT.clearCHDHIE; inline;
  52288. begin
  52289. pTDefRegMap(@Self)^.clr := $00100000;
  52290. end;
  52291. procedure TDMAC1_DCH1INT.setCHDHIE(thebits : TBits_1); inline;
  52292. begin
  52293. if thebits = 0 then
  52294. pTDefRegMap(@Self)^.clr := $00100000
  52295. else
  52296. pTDefRegMap(@Self)^.&set := $00100000;
  52297. end;
  52298. function TDMAC1_DCH1INT.getCHDHIE : TBits_1; inline;
  52299. begin
  52300. getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  52301. end;
  52302. procedure TDMAC1_DCH1INT.setCHDDIE; inline;
  52303. begin
  52304. pTDefRegMap(@Self)^.&set := $00200000;
  52305. end;
  52306. procedure TDMAC1_DCH1INT.clearCHDDIE; inline;
  52307. begin
  52308. pTDefRegMap(@Self)^.clr := $00200000;
  52309. end;
  52310. procedure TDMAC1_DCH1INT.setCHDDIE(thebits : TBits_1); inline;
  52311. begin
  52312. if thebits = 0 then
  52313. pTDefRegMap(@Self)^.clr := $00200000
  52314. else
  52315. pTDefRegMap(@Self)^.&set := $00200000;
  52316. end;
  52317. function TDMAC1_DCH1INT.getCHDDIE : TBits_1; inline;
  52318. begin
  52319. getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  52320. end;
  52321. procedure TDMAC1_DCH1INT.setCHSHIE; inline;
  52322. begin
  52323. pTDefRegMap(@Self)^.&set := $00400000;
  52324. end;
  52325. procedure TDMAC1_DCH1INT.clearCHSHIE; inline;
  52326. begin
  52327. pTDefRegMap(@Self)^.clr := $00400000;
  52328. end;
  52329. procedure TDMAC1_DCH1INT.setCHSHIE(thebits : TBits_1); inline;
  52330. begin
  52331. if thebits = 0 then
  52332. pTDefRegMap(@Self)^.clr := $00400000
  52333. else
  52334. pTDefRegMap(@Self)^.&set := $00400000;
  52335. end;
  52336. function TDMAC1_DCH1INT.getCHSHIE : TBits_1; inline;
  52337. begin
  52338. getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  52339. end;
  52340. procedure TDMAC1_DCH1INT.setCHSDIE; inline;
  52341. begin
  52342. pTDefRegMap(@Self)^.&set := $00800000;
  52343. end;
  52344. procedure TDMAC1_DCH1INT.clearCHSDIE; inline;
  52345. begin
  52346. pTDefRegMap(@Self)^.clr := $00800000;
  52347. end;
  52348. procedure TDMAC1_DCH1INT.setCHSDIE(thebits : TBits_1); inline;
  52349. begin
  52350. if thebits = 0 then
  52351. pTDefRegMap(@Self)^.clr := $00800000
  52352. else
  52353. pTDefRegMap(@Self)^.&set := $00800000;
  52354. end;
  52355. function TDMAC1_DCH1INT.getCHSDIE : TBits_1; inline;
  52356. begin
  52357. getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  52358. end;
  52359. procedure TDMAC1_DCH1INT.setw(thebits : TBits_32); inline;
  52360. begin
  52361. pTDefRegMap(@Self)^.val := thebits;
  52362. end;
  52363. function TDMAC1_DCH1INT.getw : TBits_32; inline;
  52364. begin
  52365. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52366. end;
  52367. procedure TDMAC2_DCH2CON.setCHPRI(thebits : TBits_2); inline;
  52368. begin
  52369. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  52370. end;
  52371. function TDMAC2_DCH2CON.getCHPRI : TBits_2; inline;
  52372. begin
  52373. getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  52374. end;
  52375. procedure TDMAC2_DCH2CON.setCHEDET; inline;
  52376. begin
  52377. pTDefRegMap(@Self)^.&set := $00000004;
  52378. end;
  52379. procedure TDMAC2_DCH2CON.clearCHEDET; inline;
  52380. begin
  52381. pTDefRegMap(@Self)^.clr := $00000004;
  52382. end;
  52383. procedure TDMAC2_DCH2CON.setCHEDET(thebits : TBits_1); inline;
  52384. begin
  52385. if thebits = 0 then
  52386. pTDefRegMap(@Self)^.clr := $00000004
  52387. else
  52388. pTDefRegMap(@Self)^.&set := $00000004;
  52389. end;
  52390. function TDMAC2_DCH2CON.getCHEDET : TBits_1; inline;
  52391. begin
  52392. getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  52393. end;
  52394. procedure TDMAC2_DCH2CON.setCHAEN; inline;
  52395. begin
  52396. pTDefRegMap(@Self)^.&set := $00000010;
  52397. end;
  52398. procedure TDMAC2_DCH2CON.clearCHAEN; inline;
  52399. begin
  52400. pTDefRegMap(@Self)^.clr := $00000010;
  52401. end;
  52402. procedure TDMAC2_DCH2CON.setCHAEN(thebits : TBits_1); inline;
  52403. begin
  52404. if thebits = 0 then
  52405. pTDefRegMap(@Self)^.clr := $00000010
  52406. else
  52407. pTDefRegMap(@Self)^.&set := $00000010;
  52408. end;
  52409. function TDMAC2_DCH2CON.getCHAEN : TBits_1; inline;
  52410. begin
  52411. getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  52412. end;
  52413. procedure TDMAC2_DCH2CON.setCHCHN; inline;
  52414. begin
  52415. pTDefRegMap(@Self)^.&set := $00000020;
  52416. end;
  52417. procedure TDMAC2_DCH2CON.clearCHCHN; inline;
  52418. begin
  52419. pTDefRegMap(@Self)^.clr := $00000020;
  52420. end;
  52421. procedure TDMAC2_DCH2CON.setCHCHN(thebits : TBits_1); inline;
  52422. begin
  52423. if thebits = 0 then
  52424. pTDefRegMap(@Self)^.clr := $00000020
  52425. else
  52426. pTDefRegMap(@Self)^.&set := $00000020;
  52427. end;
  52428. function TDMAC2_DCH2CON.getCHCHN : TBits_1; inline;
  52429. begin
  52430. getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  52431. end;
  52432. procedure TDMAC2_DCH2CON.setCHAED; inline;
  52433. begin
  52434. pTDefRegMap(@Self)^.&set := $00000040;
  52435. end;
  52436. procedure TDMAC2_DCH2CON.clearCHAED; inline;
  52437. begin
  52438. pTDefRegMap(@Self)^.clr := $00000040;
  52439. end;
  52440. procedure TDMAC2_DCH2CON.setCHAED(thebits : TBits_1); inline;
  52441. begin
  52442. if thebits = 0 then
  52443. pTDefRegMap(@Self)^.clr := $00000040
  52444. else
  52445. pTDefRegMap(@Self)^.&set := $00000040;
  52446. end;
  52447. function TDMAC2_DCH2CON.getCHAED : TBits_1; inline;
  52448. begin
  52449. getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  52450. end;
  52451. procedure TDMAC2_DCH2CON.setCHEN; inline;
  52452. begin
  52453. pTDefRegMap(@Self)^.&set := $00000080;
  52454. end;
  52455. procedure TDMAC2_DCH2CON.clearCHEN; inline;
  52456. begin
  52457. pTDefRegMap(@Self)^.clr := $00000080;
  52458. end;
  52459. procedure TDMAC2_DCH2CON.setCHEN(thebits : TBits_1); inline;
  52460. begin
  52461. if thebits = 0 then
  52462. pTDefRegMap(@Self)^.clr := $00000080
  52463. else
  52464. pTDefRegMap(@Self)^.&set := $00000080;
  52465. end;
  52466. function TDMAC2_DCH2CON.getCHEN : TBits_1; inline;
  52467. begin
  52468. getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  52469. end;
  52470. procedure TDMAC2_DCH2CON.setCHCHNS; inline;
  52471. begin
  52472. pTDefRegMap(@Self)^.&set := $00000100;
  52473. end;
  52474. procedure TDMAC2_DCH2CON.clearCHCHNS; inline;
  52475. begin
  52476. pTDefRegMap(@Self)^.clr := $00000100;
  52477. end;
  52478. procedure TDMAC2_DCH2CON.setCHCHNS(thebits : TBits_1); inline;
  52479. begin
  52480. if thebits = 0 then
  52481. pTDefRegMap(@Self)^.clr := $00000100
  52482. else
  52483. pTDefRegMap(@Self)^.&set := $00000100;
  52484. end;
  52485. function TDMAC2_DCH2CON.getCHCHNS : TBits_1; inline;
  52486. begin
  52487. getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  52488. end;
  52489. procedure TDMAC2_DCH2CON.setCHBUSY; inline;
  52490. begin
  52491. pTDefRegMap(@Self)^.&set := $00008000;
  52492. end;
  52493. procedure TDMAC2_DCH2CON.clearCHBUSY; inline;
  52494. begin
  52495. pTDefRegMap(@Self)^.clr := $00008000;
  52496. end;
  52497. procedure TDMAC2_DCH2CON.setCHBUSY(thebits : TBits_1); inline;
  52498. begin
  52499. if thebits = 0 then
  52500. pTDefRegMap(@Self)^.clr := $00008000
  52501. else
  52502. pTDefRegMap(@Self)^.&set := $00008000;
  52503. end;
  52504. function TDMAC2_DCH2CON.getCHBUSY : TBits_1; inline;
  52505. begin
  52506. getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  52507. end;
  52508. procedure TDMAC2_DCH2CON.setw(thebits : TBits_32); inline;
  52509. begin
  52510. pTDefRegMap(@Self)^.val := thebits;
  52511. end;
  52512. function TDMAC2_DCH2CON.getw : TBits_32; inline;
  52513. begin
  52514. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52515. end;
  52516. procedure TDMAC2_DCH2ECON.setAIRQEN; inline;
  52517. begin
  52518. pTDefRegMap(@Self)^.&set := $00000008;
  52519. end;
  52520. procedure TDMAC2_DCH2ECON.clearAIRQEN; inline;
  52521. begin
  52522. pTDefRegMap(@Self)^.clr := $00000008;
  52523. end;
  52524. procedure TDMAC2_DCH2ECON.setAIRQEN(thebits : TBits_1); inline;
  52525. begin
  52526. if thebits = 0 then
  52527. pTDefRegMap(@Self)^.clr := $00000008
  52528. else
  52529. pTDefRegMap(@Self)^.&set := $00000008;
  52530. end;
  52531. function TDMAC2_DCH2ECON.getAIRQEN : TBits_1; inline;
  52532. begin
  52533. getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  52534. end;
  52535. procedure TDMAC2_DCH2ECON.setSIRQEN; inline;
  52536. begin
  52537. pTDefRegMap(@Self)^.&set := $00000010;
  52538. end;
  52539. procedure TDMAC2_DCH2ECON.clearSIRQEN; inline;
  52540. begin
  52541. pTDefRegMap(@Self)^.clr := $00000010;
  52542. end;
  52543. procedure TDMAC2_DCH2ECON.setSIRQEN(thebits : TBits_1); inline;
  52544. begin
  52545. if thebits = 0 then
  52546. pTDefRegMap(@Self)^.clr := $00000010
  52547. else
  52548. pTDefRegMap(@Self)^.&set := $00000010;
  52549. end;
  52550. function TDMAC2_DCH2ECON.getSIRQEN : TBits_1; inline;
  52551. begin
  52552. getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  52553. end;
  52554. procedure TDMAC2_DCH2ECON.setPATEN; inline;
  52555. begin
  52556. pTDefRegMap(@Self)^.&set := $00000020;
  52557. end;
  52558. procedure TDMAC2_DCH2ECON.clearPATEN; inline;
  52559. begin
  52560. pTDefRegMap(@Self)^.clr := $00000020;
  52561. end;
  52562. procedure TDMAC2_DCH2ECON.setPATEN(thebits : TBits_1); inline;
  52563. begin
  52564. if thebits = 0 then
  52565. pTDefRegMap(@Self)^.clr := $00000020
  52566. else
  52567. pTDefRegMap(@Self)^.&set := $00000020;
  52568. end;
  52569. function TDMAC2_DCH2ECON.getPATEN : TBits_1; inline;
  52570. begin
  52571. getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  52572. end;
  52573. procedure TDMAC2_DCH2ECON.setCABORT; inline;
  52574. begin
  52575. pTDefRegMap(@Self)^.&set := $00000040;
  52576. end;
  52577. procedure TDMAC2_DCH2ECON.clearCABORT; inline;
  52578. begin
  52579. pTDefRegMap(@Self)^.clr := $00000040;
  52580. end;
  52581. procedure TDMAC2_DCH2ECON.setCABORT(thebits : TBits_1); inline;
  52582. begin
  52583. if thebits = 0 then
  52584. pTDefRegMap(@Self)^.clr := $00000040
  52585. else
  52586. pTDefRegMap(@Self)^.&set := $00000040;
  52587. end;
  52588. function TDMAC2_DCH2ECON.getCABORT : TBits_1; inline;
  52589. begin
  52590. getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  52591. end;
  52592. procedure TDMAC2_DCH2ECON.setCFORCE; inline;
  52593. begin
  52594. pTDefRegMap(@Self)^.&set := $00000080;
  52595. end;
  52596. procedure TDMAC2_DCH2ECON.clearCFORCE; inline;
  52597. begin
  52598. pTDefRegMap(@Self)^.clr := $00000080;
  52599. end;
  52600. procedure TDMAC2_DCH2ECON.setCFORCE(thebits : TBits_1); inline;
  52601. begin
  52602. if thebits = 0 then
  52603. pTDefRegMap(@Self)^.clr := $00000080
  52604. else
  52605. pTDefRegMap(@Self)^.&set := $00000080;
  52606. end;
  52607. function TDMAC2_DCH2ECON.getCFORCE : TBits_1; inline;
  52608. begin
  52609. getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  52610. end;
  52611. procedure TDMAC2_DCH2ECON.setCHSIRQ(thebits : TBits_8); inline;
  52612. begin
  52613. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  52614. end;
  52615. function TDMAC2_DCH2ECON.getCHSIRQ : TBits_8; inline;
  52616. begin
  52617. getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  52618. end;
  52619. procedure TDMAC2_DCH2ECON.setCHAIRQ(thebits : TBits_8); inline;
  52620. begin
  52621. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  52622. end;
  52623. function TDMAC2_DCH2ECON.getCHAIRQ : TBits_8; inline;
  52624. begin
  52625. getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  52626. end;
  52627. procedure TDMAC2_DCH2ECON.setw(thebits : TBits_32); inline;
  52628. begin
  52629. pTDefRegMap(@Self)^.val := thebits;
  52630. end;
  52631. function TDMAC2_DCH2ECON.getw : TBits_32; inline;
  52632. begin
  52633. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52634. end;
  52635. procedure TDMAC2_DCH2INT.setCHERIF; inline;
  52636. begin
  52637. pTDefRegMap(@Self)^.&set := $00000001;
  52638. end;
  52639. procedure TDMAC2_DCH2INT.clearCHERIF; inline;
  52640. begin
  52641. pTDefRegMap(@Self)^.clr := $00000001;
  52642. end;
  52643. procedure TDMAC2_DCH2INT.setCHERIF(thebits : TBits_1); inline;
  52644. begin
  52645. if thebits = 0 then
  52646. pTDefRegMap(@Self)^.clr := $00000001
  52647. else
  52648. pTDefRegMap(@Self)^.&set := $00000001;
  52649. end;
  52650. function TDMAC2_DCH2INT.getCHERIF : TBits_1; inline;
  52651. begin
  52652. getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  52653. end;
  52654. procedure TDMAC2_DCH2INT.setCHTAIF; inline;
  52655. begin
  52656. pTDefRegMap(@Self)^.&set := $00000002;
  52657. end;
  52658. procedure TDMAC2_DCH2INT.clearCHTAIF; inline;
  52659. begin
  52660. pTDefRegMap(@Self)^.clr := $00000002;
  52661. end;
  52662. procedure TDMAC2_DCH2INT.setCHTAIF(thebits : TBits_1); inline;
  52663. begin
  52664. if thebits = 0 then
  52665. pTDefRegMap(@Self)^.clr := $00000002
  52666. else
  52667. pTDefRegMap(@Self)^.&set := $00000002;
  52668. end;
  52669. function TDMAC2_DCH2INT.getCHTAIF : TBits_1; inline;
  52670. begin
  52671. getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  52672. end;
  52673. procedure TDMAC2_DCH2INT.setCHCCIF; inline;
  52674. begin
  52675. pTDefRegMap(@Self)^.&set := $00000004;
  52676. end;
  52677. procedure TDMAC2_DCH2INT.clearCHCCIF; inline;
  52678. begin
  52679. pTDefRegMap(@Self)^.clr := $00000004;
  52680. end;
  52681. procedure TDMAC2_DCH2INT.setCHCCIF(thebits : TBits_1); inline;
  52682. begin
  52683. if thebits = 0 then
  52684. pTDefRegMap(@Self)^.clr := $00000004
  52685. else
  52686. pTDefRegMap(@Self)^.&set := $00000004;
  52687. end;
  52688. function TDMAC2_DCH2INT.getCHCCIF : TBits_1; inline;
  52689. begin
  52690. getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  52691. end;
  52692. procedure TDMAC2_DCH2INT.setCHBCIF; inline;
  52693. begin
  52694. pTDefRegMap(@Self)^.&set := $00000008;
  52695. end;
  52696. procedure TDMAC2_DCH2INT.clearCHBCIF; inline;
  52697. begin
  52698. pTDefRegMap(@Self)^.clr := $00000008;
  52699. end;
  52700. procedure TDMAC2_DCH2INT.setCHBCIF(thebits : TBits_1); inline;
  52701. begin
  52702. if thebits = 0 then
  52703. pTDefRegMap(@Self)^.clr := $00000008
  52704. else
  52705. pTDefRegMap(@Self)^.&set := $00000008;
  52706. end;
  52707. function TDMAC2_DCH2INT.getCHBCIF : TBits_1; inline;
  52708. begin
  52709. getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  52710. end;
  52711. procedure TDMAC2_DCH2INT.setCHDHIF; inline;
  52712. begin
  52713. pTDefRegMap(@Self)^.&set := $00000010;
  52714. end;
  52715. procedure TDMAC2_DCH2INT.clearCHDHIF; inline;
  52716. begin
  52717. pTDefRegMap(@Self)^.clr := $00000010;
  52718. end;
  52719. procedure TDMAC2_DCH2INT.setCHDHIF(thebits : TBits_1); inline;
  52720. begin
  52721. if thebits = 0 then
  52722. pTDefRegMap(@Self)^.clr := $00000010
  52723. else
  52724. pTDefRegMap(@Self)^.&set := $00000010;
  52725. end;
  52726. function TDMAC2_DCH2INT.getCHDHIF : TBits_1; inline;
  52727. begin
  52728. getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  52729. end;
  52730. procedure TDMAC2_DCH2INT.setCHDDIF; inline;
  52731. begin
  52732. pTDefRegMap(@Self)^.&set := $00000020;
  52733. end;
  52734. procedure TDMAC2_DCH2INT.clearCHDDIF; inline;
  52735. begin
  52736. pTDefRegMap(@Self)^.clr := $00000020;
  52737. end;
  52738. procedure TDMAC2_DCH2INT.setCHDDIF(thebits : TBits_1); inline;
  52739. begin
  52740. if thebits = 0 then
  52741. pTDefRegMap(@Self)^.clr := $00000020
  52742. else
  52743. pTDefRegMap(@Self)^.&set := $00000020;
  52744. end;
  52745. function TDMAC2_DCH2INT.getCHDDIF : TBits_1; inline;
  52746. begin
  52747. getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  52748. end;
  52749. procedure TDMAC2_DCH2INT.setCHSHIF; inline;
  52750. begin
  52751. pTDefRegMap(@Self)^.&set := $00000040;
  52752. end;
  52753. procedure TDMAC2_DCH2INT.clearCHSHIF; inline;
  52754. begin
  52755. pTDefRegMap(@Self)^.clr := $00000040;
  52756. end;
  52757. procedure TDMAC2_DCH2INT.setCHSHIF(thebits : TBits_1); inline;
  52758. begin
  52759. if thebits = 0 then
  52760. pTDefRegMap(@Self)^.clr := $00000040
  52761. else
  52762. pTDefRegMap(@Self)^.&set := $00000040;
  52763. end;
  52764. function TDMAC2_DCH2INT.getCHSHIF : TBits_1; inline;
  52765. begin
  52766. getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  52767. end;
  52768. procedure TDMAC2_DCH2INT.setCHSDIF; inline;
  52769. begin
  52770. pTDefRegMap(@Self)^.&set := $00000080;
  52771. end;
  52772. procedure TDMAC2_DCH2INT.clearCHSDIF; inline;
  52773. begin
  52774. pTDefRegMap(@Self)^.clr := $00000080;
  52775. end;
  52776. procedure TDMAC2_DCH2INT.setCHSDIF(thebits : TBits_1); inline;
  52777. begin
  52778. if thebits = 0 then
  52779. pTDefRegMap(@Self)^.clr := $00000080
  52780. else
  52781. pTDefRegMap(@Self)^.&set := $00000080;
  52782. end;
  52783. function TDMAC2_DCH2INT.getCHSDIF : TBits_1; inline;
  52784. begin
  52785. getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  52786. end;
  52787. procedure TDMAC2_DCH2INT.setCHERIE; inline;
  52788. begin
  52789. pTDefRegMap(@Self)^.&set := $00010000;
  52790. end;
  52791. procedure TDMAC2_DCH2INT.clearCHERIE; inline;
  52792. begin
  52793. pTDefRegMap(@Self)^.clr := $00010000;
  52794. end;
  52795. procedure TDMAC2_DCH2INT.setCHERIE(thebits : TBits_1); inline;
  52796. begin
  52797. if thebits = 0 then
  52798. pTDefRegMap(@Self)^.clr := $00010000
  52799. else
  52800. pTDefRegMap(@Self)^.&set := $00010000;
  52801. end;
  52802. function TDMAC2_DCH2INT.getCHERIE : TBits_1; inline;
  52803. begin
  52804. getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  52805. end;
  52806. procedure TDMAC2_DCH2INT.setCHTAIE; inline;
  52807. begin
  52808. pTDefRegMap(@Self)^.&set := $00020000;
  52809. end;
  52810. procedure TDMAC2_DCH2INT.clearCHTAIE; inline;
  52811. begin
  52812. pTDefRegMap(@Self)^.clr := $00020000;
  52813. end;
  52814. procedure TDMAC2_DCH2INT.setCHTAIE(thebits : TBits_1); inline;
  52815. begin
  52816. if thebits = 0 then
  52817. pTDefRegMap(@Self)^.clr := $00020000
  52818. else
  52819. pTDefRegMap(@Self)^.&set := $00020000;
  52820. end;
  52821. function TDMAC2_DCH2INT.getCHTAIE : TBits_1; inline;
  52822. begin
  52823. getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  52824. end;
  52825. procedure TDMAC2_DCH2INT.setCHCCIE; inline;
  52826. begin
  52827. pTDefRegMap(@Self)^.&set := $00040000;
  52828. end;
  52829. procedure TDMAC2_DCH2INT.clearCHCCIE; inline;
  52830. begin
  52831. pTDefRegMap(@Self)^.clr := $00040000;
  52832. end;
  52833. procedure TDMAC2_DCH2INT.setCHCCIE(thebits : TBits_1); inline;
  52834. begin
  52835. if thebits = 0 then
  52836. pTDefRegMap(@Self)^.clr := $00040000
  52837. else
  52838. pTDefRegMap(@Self)^.&set := $00040000;
  52839. end;
  52840. function TDMAC2_DCH2INT.getCHCCIE : TBits_1; inline;
  52841. begin
  52842. getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  52843. end;
  52844. procedure TDMAC2_DCH2INT.setCHBCIE; inline;
  52845. begin
  52846. pTDefRegMap(@Self)^.&set := $00080000;
  52847. end;
  52848. procedure TDMAC2_DCH2INT.clearCHBCIE; inline;
  52849. begin
  52850. pTDefRegMap(@Self)^.clr := $00080000;
  52851. end;
  52852. procedure TDMAC2_DCH2INT.setCHBCIE(thebits : TBits_1); inline;
  52853. begin
  52854. if thebits = 0 then
  52855. pTDefRegMap(@Self)^.clr := $00080000
  52856. else
  52857. pTDefRegMap(@Self)^.&set := $00080000;
  52858. end;
  52859. function TDMAC2_DCH2INT.getCHBCIE : TBits_1; inline;
  52860. begin
  52861. getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  52862. end;
  52863. procedure TDMAC2_DCH2INT.setCHDHIE; inline;
  52864. begin
  52865. pTDefRegMap(@Self)^.&set := $00100000;
  52866. end;
  52867. procedure TDMAC2_DCH2INT.clearCHDHIE; inline;
  52868. begin
  52869. pTDefRegMap(@Self)^.clr := $00100000;
  52870. end;
  52871. procedure TDMAC2_DCH2INT.setCHDHIE(thebits : TBits_1); inline;
  52872. begin
  52873. if thebits = 0 then
  52874. pTDefRegMap(@Self)^.clr := $00100000
  52875. else
  52876. pTDefRegMap(@Self)^.&set := $00100000;
  52877. end;
  52878. function TDMAC2_DCH2INT.getCHDHIE : TBits_1; inline;
  52879. begin
  52880. getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  52881. end;
  52882. procedure TDMAC2_DCH2INT.setCHDDIE; inline;
  52883. begin
  52884. pTDefRegMap(@Self)^.&set := $00200000;
  52885. end;
  52886. procedure TDMAC2_DCH2INT.clearCHDDIE; inline;
  52887. begin
  52888. pTDefRegMap(@Self)^.clr := $00200000;
  52889. end;
  52890. procedure TDMAC2_DCH2INT.setCHDDIE(thebits : TBits_1); inline;
  52891. begin
  52892. if thebits = 0 then
  52893. pTDefRegMap(@Self)^.clr := $00200000
  52894. else
  52895. pTDefRegMap(@Self)^.&set := $00200000;
  52896. end;
  52897. function TDMAC2_DCH2INT.getCHDDIE : TBits_1; inline;
  52898. begin
  52899. getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  52900. end;
  52901. procedure TDMAC2_DCH2INT.setCHSHIE; inline;
  52902. begin
  52903. pTDefRegMap(@Self)^.&set := $00400000;
  52904. end;
  52905. procedure TDMAC2_DCH2INT.clearCHSHIE; inline;
  52906. begin
  52907. pTDefRegMap(@Self)^.clr := $00400000;
  52908. end;
  52909. procedure TDMAC2_DCH2INT.setCHSHIE(thebits : TBits_1); inline;
  52910. begin
  52911. if thebits = 0 then
  52912. pTDefRegMap(@Self)^.clr := $00400000
  52913. else
  52914. pTDefRegMap(@Self)^.&set := $00400000;
  52915. end;
  52916. function TDMAC2_DCH2INT.getCHSHIE : TBits_1; inline;
  52917. begin
  52918. getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  52919. end;
  52920. procedure TDMAC2_DCH2INT.setCHSDIE; inline;
  52921. begin
  52922. pTDefRegMap(@Self)^.&set := $00800000;
  52923. end;
  52924. procedure TDMAC2_DCH2INT.clearCHSDIE; inline;
  52925. begin
  52926. pTDefRegMap(@Self)^.clr := $00800000;
  52927. end;
  52928. procedure TDMAC2_DCH2INT.setCHSDIE(thebits : TBits_1); inline;
  52929. begin
  52930. if thebits = 0 then
  52931. pTDefRegMap(@Self)^.clr := $00800000
  52932. else
  52933. pTDefRegMap(@Self)^.&set := $00800000;
  52934. end;
  52935. function TDMAC2_DCH2INT.getCHSDIE : TBits_1; inline;
  52936. begin
  52937. getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  52938. end;
  52939. procedure TDMAC2_DCH2INT.setw(thebits : TBits_32); inline;
  52940. begin
  52941. pTDefRegMap(@Self)^.val := thebits;
  52942. end;
  52943. function TDMAC2_DCH2INT.getw : TBits_32; inline;
  52944. begin
  52945. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52946. end;
  52947. procedure TDMAC3_DCH3CON.setCHPRI(thebits : TBits_2); inline;
  52948. begin
  52949. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  52950. end;
  52951. function TDMAC3_DCH3CON.getCHPRI : TBits_2; inline;
  52952. begin
  52953. getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  52954. end;
  52955. procedure TDMAC3_DCH3CON.setCHEDET; inline;
  52956. begin
  52957. pTDefRegMap(@Self)^.&set := $00000004;
  52958. end;
  52959. procedure TDMAC3_DCH3CON.clearCHEDET; inline;
  52960. begin
  52961. pTDefRegMap(@Self)^.clr := $00000004;
  52962. end;
  52963. procedure TDMAC3_DCH3CON.setCHEDET(thebits : TBits_1); inline;
  52964. begin
  52965. if thebits = 0 then
  52966. pTDefRegMap(@Self)^.clr := $00000004
  52967. else
  52968. pTDefRegMap(@Self)^.&set := $00000004;
  52969. end;
  52970. function TDMAC3_DCH3CON.getCHEDET : TBits_1; inline;
  52971. begin
  52972. getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  52973. end;
  52974. procedure TDMAC3_DCH3CON.setCHAEN; inline;
  52975. begin
  52976. pTDefRegMap(@Self)^.&set := $00000010;
  52977. end;
  52978. procedure TDMAC3_DCH3CON.clearCHAEN; inline;
  52979. begin
  52980. pTDefRegMap(@Self)^.clr := $00000010;
  52981. end;
  52982. procedure TDMAC3_DCH3CON.setCHAEN(thebits : TBits_1); inline;
  52983. begin
  52984. if thebits = 0 then
  52985. pTDefRegMap(@Self)^.clr := $00000010
  52986. else
  52987. pTDefRegMap(@Self)^.&set := $00000010;
  52988. end;
  52989. function TDMAC3_DCH3CON.getCHAEN : TBits_1; inline;
  52990. begin
  52991. getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  52992. end;
  52993. procedure TDMAC3_DCH3CON.setCHCHN; inline;
  52994. begin
  52995. pTDefRegMap(@Self)^.&set := $00000020;
  52996. end;
  52997. procedure TDMAC3_DCH3CON.clearCHCHN; inline;
  52998. begin
  52999. pTDefRegMap(@Self)^.clr := $00000020;
  53000. end;
  53001. procedure TDMAC3_DCH3CON.setCHCHN(thebits : TBits_1); inline;
  53002. begin
  53003. if thebits = 0 then
  53004. pTDefRegMap(@Self)^.clr := $00000020
  53005. else
  53006. pTDefRegMap(@Self)^.&set := $00000020;
  53007. end;
  53008. function TDMAC3_DCH3CON.getCHCHN : TBits_1; inline;
  53009. begin
  53010. getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  53011. end;
  53012. procedure TDMAC3_DCH3CON.setCHAED; inline;
  53013. begin
  53014. pTDefRegMap(@Self)^.&set := $00000040;
  53015. end;
  53016. procedure TDMAC3_DCH3CON.clearCHAED; inline;
  53017. begin
  53018. pTDefRegMap(@Self)^.clr := $00000040;
  53019. end;
  53020. procedure TDMAC3_DCH3CON.setCHAED(thebits : TBits_1); inline;
  53021. begin
  53022. if thebits = 0 then
  53023. pTDefRegMap(@Self)^.clr := $00000040
  53024. else
  53025. pTDefRegMap(@Self)^.&set := $00000040;
  53026. end;
  53027. function TDMAC3_DCH3CON.getCHAED : TBits_1; inline;
  53028. begin
  53029. getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  53030. end;
  53031. procedure TDMAC3_DCH3CON.setCHEN; inline;
  53032. begin
  53033. pTDefRegMap(@Self)^.&set := $00000080;
  53034. end;
  53035. procedure TDMAC3_DCH3CON.clearCHEN; inline;
  53036. begin
  53037. pTDefRegMap(@Self)^.clr := $00000080;
  53038. end;
  53039. procedure TDMAC3_DCH3CON.setCHEN(thebits : TBits_1); inline;
  53040. begin
  53041. if thebits = 0 then
  53042. pTDefRegMap(@Self)^.clr := $00000080
  53043. else
  53044. pTDefRegMap(@Self)^.&set := $00000080;
  53045. end;
  53046. function TDMAC3_DCH3CON.getCHEN : TBits_1; inline;
  53047. begin
  53048. getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  53049. end;
  53050. procedure TDMAC3_DCH3CON.setCHCHNS; inline;
  53051. begin
  53052. pTDefRegMap(@Self)^.&set := $00000100;
  53053. end;
  53054. procedure TDMAC3_DCH3CON.clearCHCHNS; inline;
  53055. begin
  53056. pTDefRegMap(@Self)^.clr := $00000100;
  53057. end;
  53058. procedure TDMAC3_DCH3CON.setCHCHNS(thebits : TBits_1); inline;
  53059. begin
  53060. if thebits = 0 then
  53061. pTDefRegMap(@Self)^.clr := $00000100
  53062. else
  53063. pTDefRegMap(@Self)^.&set := $00000100;
  53064. end;
  53065. function TDMAC3_DCH3CON.getCHCHNS : TBits_1; inline;
  53066. begin
  53067. getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  53068. end;
  53069. procedure TDMAC3_DCH3CON.setCHBUSY; inline;
  53070. begin
  53071. pTDefRegMap(@Self)^.&set := $00008000;
  53072. end;
  53073. procedure TDMAC3_DCH3CON.clearCHBUSY; inline;
  53074. begin
  53075. pTDefRegMap(@Self)^.clr := $00008000;
  53076. end;
  53077. procedure TDMAC3_DCH3CON.setCHBUSY(thebits : TBits_1); inline;
  53078. begin
  53079. if thebits = 0 then
  53080. pTDefRegMap(@Self)^.clr := $00008000
  53081. else
  53082. pTDefRegMap(@Self)^.&set := $00008000;
  53083. end;
  53084. function TDMAC3_DCH3CON.getCHBUSY : TBits_1; inline;
  53085. begin
  53086. getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  53087. end;
  53088. procedure TDMAC3_DCH3CON.setw(thebits : TBits_32); inline;
  53089. begin
  53090. pTDefRegMap(@Self)^.val := thebits;
  53091. end;
  53092. function TDMAC3_DCH3CON.getw : TBits_32; inline;
  53093. begin
  53094. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  53095. end;
  53096. procedure TDMAC3_DCH3ECON.setAIRQEN; inline;
  53097. begin
  53098. pTDefRegMap(@Self)^.&set := $00000008;
  53099. end;
  53100. procedure TDMAC3_DCH3ECON.clearAIRQEN; inline;
  53101. begin
  53102. pTDefRegMap(@Self)^.clr := $00000008;
  53103. end;
  53104. procedure TDMAC3_DCH3ECON.setAIRQEN(thebits : TBits_1); inline;
  53105. begin
  53106. if thebits = 0 then
  53107. pTDefRegMap(@Self)^.clr := $00000008
  53108. else
  53109. pTDefRegMap(@Self)^.&set := $00000008;
  53110. end;
  53111. function TDMAC3_DCH3ECON.getAIRQEN : TBits_1; inline;
  53112. begin
  53113. getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  53114. end;
  53115. procedure TDMAC3_DCH3ECON.setSIRQEN; inline;
  53116. begin
  53117. pTDefRegMap(@Self)^.&set := $00000010;
  53118. end;
  53119. procedure TDMAC3_DCH3ECON.clearSIRQEN; inline;
  53120. begin
  53121. pTDefRegMap(@Self)^.clr := $00000010;
  53122. end;
  53123. procedure TDMAC3_DCH3ECON.setSIRQEN(thebits : TBits_1); inline;
  53124. begin
  53125. if thebits = 0 then
  53126. pTDefRegMap(@Self)^.clr := $00000010
  53127. else
  53128. pTDefRegMap(@Self)^.&set := $00000010;
  53129. end;
  53130. function TDMAC3_DCH3ECON.getSIRQEN : TBits_1; inline;
  53131. begin
  53132. getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  53133. end;
  53134. procedure TDMAC3_DCH3ECON.setPATEN; inline;
  53135. begin
  53136. pTDefRegMap(@Self)^.&set := $00000020;
  53137. end;
  53138. procedure TDMAC3_DCH3ECON.clearPATEN; inline;
  53139. begin
  53140. pTDefRegMap(@Self)^.clr := $00000020;
  53141. end;
  53142. procedure TDMAC3_DCH3ECON.setPATEN(thebits : TBits_1); inline;
  53143. begin
  53144. if thebits = 0 then
  53145. pTDefRegMap(@Self)^.clr := $00000020
  53146. else
  53147. pTDefRegMap(@Self)^.&set := $00000020;
  53148. end;
  53149. function TDMAC3_DCH3ECON.getPATEN : TBits_1; inline;
  53150. begin
  53151. getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  53152. end;
  53153. procedure TDMAC3_DCH3ECON.setCABORT; inline;
  53154. begin
  53155. pTDefRegMap(@Self)^.&set := $00000040;
  53156. end;
  53157. procedure TDMAC3_DCH3ECON.clearCABORT; inline;
  53158. begin
  53159. pTDefRegMap(@Self)^.clr := $00000040;
  53160. end;
  53161. procedure TDMAC3_DCH3ECON.setCABORT(thebits : TBits_1); inline;
  53162. begin
  53163. if thebits = 0 then
  53164. pTDefRegMap(@Self)^.clr := $00000040
  53165. else
  53166. pTDefRegMap(@Self)^.&set := $00000040;
  53167. end;
  53168. function TDMAC3_DCH3ECON.getCABORT : TBits_1; inline;
  53169. begin
  53170. getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  53171. end;
  53172. procedure TDMAC3_DCH3ECON.setCFORCE; inline;
  53173. begin
  53174. pTDefRegMap(@Self)^.&set := $00000080;
  53175. end;
  53176. procedure TDMAC3_DCH3ECON.clearCFORCE; inline;
  53177. begin
  53178. pTDefRegMap(@Self)^.clr := $00000080;
  53179. end;
  53180. procedure TDMAC3_DCH3ECON.setCFORCE(thebits : TBits_1); inline;
  53181. begin
  53182. if thebits = 0 then
  53183. pTDefRegMap(@Self)^.clr := $00000080
  53184. else
  53185. pTDefRegMap(@Self)^.&set := $00000080;
  53186. end;
  53187. function TDMAC3_DCH3ECON.getCFORCE : TBits_1; inline;
  53188. begin
  53189. getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  53190. end;
  53191. procedure TDMAC3_DCH3ECON.setCHSIRQ(thebits : TBits_8); inline;
  53192. begin
  53193. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  53194. end;
  53195. function TDMAC3_DCH3ECON.getCHSIRQ : TBits_8; inline;
  53196. begin
  53197. getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  53198. end;
  53199. procedure TDMAC3_DCH3ECON.setCHAIRQ(thebits : TBits_8); inline;
  53200. begin
  53201. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  53202. end;
  53203. function TDMAC3_DCH3ECON.getCHAIRQ : TBits_8; inline;
  53204. begin
  53205. getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  53206. end;
  53207. procedure TDMAC3_DCH3ECON.setw(thebits : TBits_32); inline;
  53208. begin
  53209. pTDefRegMap(@Self)^.val := thebits;
  53210. end;
  53211. function TDMAC3_DCH3ECON.getw : TBits_32; inline;
  53212. begin
  53213. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  53214. end;
  53215. procedure TDMAC3_DCH3INT.setCHERIF; inline;
  53216. begin
  53217. pTDefRegMap(@Self)^.&set := $00000001;
  53218. end;
  53219. procedure TDMAC3_DCH3INT.clearCHERIF; inline;
  53220. begin
  53221. pTDefRegMap(@Self)^.clr := $00000001;
  53222. end;
  53223. procedure TDMAC3_DCH3INT.setCHERIF(thebits : TBits_1); inline;
  53224. begin
  53225. if thebits = 0 then
  53226. pTDefRegMap(@Self)^.clr := $00000001
  53227. else
  53228. pTDefRegMap(@Self)^.&set := $00000001;
  53229. end;
  53230. function TDMAC3_DCH3INT.getCHERIF : TBits_1; inline;
  53231. begin
  53232. getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  53233. end;
  53234. procedure TDMAC3_DCH3INT.setCHTAIF; inline;
  53235. begin
  53236. pTDefRegMap(@Self)^.&set := $00000002;
  53237. end;
  53238. procedure TDMAC3_DCH3INT.clearCHTAIF; inline;
  53239. begin
  53240. pTDefRegMap(@Self)^.clr := $00000002;
  53241. end;
  53242. procedure TDMAC3_DCH3INT.setCHTAIF(thebits : TBits_1); inline;
  53243. begin
  53244. if thebits = 0 then
  53245. pTDefRegMap(@Self)^.clr := $00000002
  53246. else
  53247. pTDefRegMap(@Self)^.&set := $00000002;
  53248. end;
  53249. function TDMAC3_DCH3INT.getCHTAIF : TBits_1; inline;
  53250. begin
  53251. getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  53252. end;
  53253. procedure TDMAC3_DCH3INT.setCHCCIF; inline;
  53254. begin
  53255. pTDefRegMap(@Self)^.&set := $00000004;
  53256. end;
  53257. procedure TDMAC3_DCH3INT.clearCHCCIF; inline;
  53258. begin
  53259. pTDefRegMap(@Self)^.clr := $00000004;
  53260. end;
  53261. procedure TDMAC3_DCH3INT.setCHCCIF(thebits : TBits_1); inline;
  53262. begin
  53263. if thebits = 0 then
  53264. pTDefRegMap(@Self)^.clr := $00000004
  53265. else
  53266. pTDefRegMap(@Self)^.&set := $00000004;
  53267. end;
  53268. function TDMAC3_DCH3INT.getCHCCIF : TBits_1; inline;
  53269. begin
  53270. getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  53271. end;
  53272. procedure TDMAC3_DCH3INT.setCHBCIF; inline;
  53273. begin
  53274. pTDefRegMap(@Self)^.&set := $00000008;
  53275. end;
  53276. procedure TDMAC3_DCH3INT.clearCHBCIF; inline;
  53277. begin
  53278. pTDefRegMap(@Self)^.clr := $00000008;
  53279. end;
  53280. procedure TDMAC3_DCH3INT.setCHBCIF(thebits : TBits_1); inline;
  53281. begin
  53282. if thebits = 0 then
  53283. pTDefRegMap(@Self)^.clr := $00000008
  53284. else
  53285. pTDefRegMap(@Self)^.&set := $00000008;
  53286. end;
  53287. function TDMAC3_DCH3INT.getCHBCIF : TBits_1; inline;
  53288. begin
  53289. getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  53290. end;
  53291. procedure TDMAC3_DCH3INT.setCHDHIF; inline;
  53292. begin
  53293. pTDefRegMap(@Self)^.&set := $00000010;
  53294. end;
  53295. procedure TDMAC3_DCH3INT.clearCHDHIF; inline;
  53296. begin
  53297. pTDefRegMap(@Self)^.clr := $00000010;
  53298. end;
  53299. procedure TDMAC3_DCH3INT.setCHDHIF(thebits : TBits_1); inline;
  53300. begin
  53301. if thebits = 0 then
  53302. pTDefRegMap(@Self)^.clr := $00000010
  53303. else
  53304. pTDefRegMap(@Self)^.&set := $00000010;
  53305. end;
  53306. function TDMAC3_DCH3INT.getCHDHIF : TBits_1; inline;
  53307. begin
  53308. getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  53309. end;
  53310. procedure TDMAC3_DCH3INT.setCHDDIF; inline;
  53311. begin
  53312. pTDefRegMap(@Self)^.&set := $00000020;
  53313. end;
  53314. procedure TDMAC3_DCH3INT.clearCHDDIF; inline;
  53315. begin
  53316. pTDefRegMap(@Self)^.clr := $00000020;
  53317. end;
  53318. procedure TDMAC3_DCH3INT.setCHDDIF(thebits : TBits_1); inline;
  53319. begin
  53320. if thebits = 0 then
  53321. pTDefRegMap(@Self)^.clr := $00000020
  53322. else
  53323. pTDefRegMap(@Self)^.&set := $00000020;
  53324. end;
  53325. function TDMAC3_DCH3INT.getCHDDIF : TBits_1; inline;
  53326. begin
  53327. getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  53328. end;
  53329. procedure TDMAC3_DCH3INT.setCHSHIF; inline;
  53330. begin
  53331. pTDefRegMap(@Self)^.&set := $00000040;
  53332. end;
  53333. procedure TDMAC3_DCH3INT.clearCHSHIF; inline;
  53334. begin
  53335. pTDefRegMap(@Self)^.clr := $00000040;
  53336. end;
  53337. procedure TDMAC3_DCH3INT.setCHSHIF(thebits : TBits_1); inline;
  53338. begin
  53339. if thebits = 0 then
  53340. pTDefRegMap(@Self)^.clr := $00000040
  53341. else
  53342. pTDefRegMap(@Self)^.&set := $00000040;
  53343. end;
  53344. function TDMAC3_DCH3INT.getCHSHIF : TBits_1; inline;
  53345. begin
  53346. getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  53347. end;
  53348. procedure TDMAC3_DCH3INT.setCHSDIF; inline;
  53349. begin
  53350. pTDefRegMap(@Self)^.&set := $00000080;
  53351. end;
  53352. procedure TDMAC3_DCH3INT.clearCHSDIF; inline;
  53353. begin
  53354. pTDefRegMap(@Self)^.clr := $00000080;
  53355. end;
  53356. procedure TDMAC3_DCH3INT.setCHSDIF(thebits : TBits_1); inline;
  53357. begin
  53358. if thebits = 0 then
  53359. pTDefRegMap(@Self)^.clr := $00000080
  53360. else
  53361. pTDefRegMap(@Self)^.&set := $00000080;
  53362. end;
  53363. function TDMAC3_DCH3INT.getCHSDIF : TBits_1; inline;
  53364. begin
  53365. getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  53366. end;
  53367. procedure TDMAC3_DCH3INT.setCHERIE; inline;
  53368. begin
  53369. pTDefRegMap(@Self)^.&set := $00010000;
  53370. end;
  53371. procedure TDMAC3_DCH3INT.clearCHERIE; inline;
  53372. begin
  53373. pTDefRegMap(@Self)^.clr := $00010000;
  53374. end;
  53375. procedure TDMAC3_DCH3INT.setCHERIE(thebits : TBits_1); inline;
  53376. begin
  53377. if thebits = 0 then
  53378. pTDefRegMap(@Self)^.clr := $00010000
  53379. else
  53380. pTDefRegMap(@Self)^.&set := $00010000;
  53381. end;
  53382. function TDMAC3_DCH3INT.getCHERIE : TBits_1; inline;
  53383. begin
  53384. getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  53385. end;
  53386. procedure TDMAC3_DCH3INT.setCHTAIE; inline;
  53387. begin
  53388. pTDefRegMap(@Self)^.&set := $00020000;
  53389. end;
  53390. procedure TDMAC3_DCH3INT.clearCHTAIE; inline;
  53391. begin
  53392. pTDefRegMap(@Self)^.clr := $00020000;
  53393. end;
  53394. procedure TDMAC3_DCH3INT.setCHTAIE(thebits : TBits_1); inline;
  53395. begin
  53396. if thebits = 0 then
  53397. pTDefRegMap(@Self)^.clr := $00020000
  53398. else
  53399. pTDefRegMap(@Self)^.&set := $00020000;
  53400. end;
  53401. function TDMAC3_DCH3INT.getCHTAIE : TBits_1; inline;
  53402. begin
  53403. getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  53404. end;
  53405. procedure TDMAC3_DCH3INT.setCHCCIE; inline;
  53406. begin
  53407. pTDefRegMap(@Self)^.&set := $00040000;
  53408. end;
  53409. procedure TDMAC3_DCH3INT.clearCHCCIE; inline;
  53410. begin
  53411. pTDefRegMap(@Self)^.clr := $00040000;
  53412. end;
  53413. procedure TDMAC3_DCH3INT.setCHCCIE(thebits : TBits_1); inline;
  53414. begin
  53415. if thebits = 0 then
  53416. pTDefRegMap(@Self)^.clr := $00040000
  53417. else
  53418. pTDefRegMap(@Self)^.&set := $00040000;
  53419. end;
  53420. function TDMAC3_DCH3INT.getCHCCIE : TBits_1; inline;
  53421. begin
  53422. getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  53423. end;
  53424. procedure TDMAC3_DCH3INT.setCHBCIE; inline;
  53425. begin
  53426. pTDefRegMap(@Self)^.&set := $00080000;
  53427. end;
  53428. procedure TDMAC3_DCH3INT.clearCHBCIE; inline;
  53429. begin
  53430. pTDefRegMap(@Self)^.clr := $00080000;
  53431. end;
  53432. procedure TDMAC3_DCH3INT.setCHBCIE(thebits : TBits_1); inline;
  53433. begin
  53434. if thebits = 0 then
  53435. pTDefRegMap(@Self)^.clr := $00080000
  53436. else
  53437. pTDefRegMap(@Self)^.&set := $00080000;
  53438. end;
  53439. function TDMAC3_DCH3INT.getCHBCIE : TBits_1; inline;
  53440. begin
  53441. getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  53442. end;
  53443. procedure TDMAC3_DCH3INT.setCHDHIE; inline;
  53444. begin
  53445. pTDefRegMap(@Self)^.&set := $00100000;
  53446. end;
  53447. procedure TDMAC3_DCH3INT.clearCHDHIE; inline;
  53448. begin
  53449. pTDefRegMap(@Self)^.clr := $00100000;
  53450. end;
  53451. procedure TDMAC3_DCH3INT.setCHDHIE(thebits : TBits_1); inline;
  53452. begin
  53453. if thebits = 0 then
  53454. pTDefRegMap(@Self)^.clr := $00100000
  53455. else
  53456. pTDefRegMap(@Self)^.&set := $00100000;
  53457. end;
  53458. function TDMAC3_DCH3INT.getCHDHIE : TBits_1; inline;
  53459. begin
  53460. getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  53461. end;
  53462. procedure TDMAC3_DCH3INT.setCHDDIE; inline;
  53463. begin
  53464. pTDefRegMap(@Self)^.&set := $00200000;
  53465. end;
  53466. procedure TDMAC3_DCH3INT.clearCHDDIE; inline;
  53467. begin
  53468. pTDefRegMap(@Self)^.clr := $00200000;
  53469. end;
  53470. procedure TDMAC3_DCH3INT.setCHDDIE(thebits : TBits_1); inline;
  53471. begin
  53472. if thebits = 0 then
  53473. pTDefRegMap(@Self)^.clr := $00200000
  53474. else
  53475. pTDefRegMap(@Self)^.&set := $00200000;
  53476. end;
  53477. function TDMAC3_DCH3INT.getCHDDIE : TBits_1; inline;
  53478. begin
  53479. getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  53480. end;
  53481. procedure TDMAC3_DCH3INT.setCHSHIE; inline;
  53482. begin
  53483. pTDefRegMap(@Self)^.&set := $00400000;
  53484. end;
  53485. procedure TDMAC3_DCH3INT.clearCHSHIE; inline;
  53486. begin
  53487. pTDefRegMap(@Self)^.clr := $00400000;
  53488. end;
  53489. procedure TDMAC3_DCH3INT.setCHSHIE(thebits : TBits_1); inline;
  53490. begin
  53491. if thebits = 0 then
  53492. pTDefRegMap(@Self)^.clr := $00400000
  53493. else
  53494. pTDefRegMap(@Self)^.&set := $00400000;
  53495. end;
  53496. function TDMAC3_DCH3INT.getCHSHIE : TBits_1; inline;
  53497. begin
  53498. getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  53499. end;
  53500. procedure TDMAC3_DCH3INT.setCHSDIE; inline;
  53501. begin
  53502. pTDefRegMap(@Self)^.&set := $00800000;
  53503. end;
  53504. procedure TDMAC3_DCH3INT.clearCHSDIE; inline;
  53505. begin
  53506. pTDefRegMap(@Self)^.clr := $00800000;
  53507. end;
  53508. procedure TDMAC3_DCH3INT.setCHSDIE(thebits : TBits_1); inline;
  53509. begin
  53510. if thebits = 0 then
  53511. pTDefRegMap(@Self)^.clr := $00800000
  53512. else
  53513. pTDefRegMap(@Self)^.&set := $00800000;
  53514. end;
  53515. function TDMAC3_DCH3INT.getCHSDIE : TBits_1; inline;
  53516. begin
  53517. getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  53518. end;
  53519. procedure TDMAC3_DCH3INT.setw(thebits : TBits_32); inline;
  53520. begin
  53521. pTDefRegMap(@Self)^.val := thebits;
  53522. end;
  53523. function TDMAC3_DCH3INT.getw : TBits_32; inline;
  53524. begin
  53525. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  53526. end;
  53527. procedure TPCACHE_CHECON.setPFMWS(thebits : TBits_3); inline;
  53528. begin
  53529. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  53530. end;
  53531. function TPCACHE_CHECON.getPFMWS : TBits_3; inline;
  53532. begin
  53533. getPFMWS := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  53534. end;
  53535. procedure TPCACHE_CHECON.setPREFEN(thebits : TBits_2); inline;
  53536. begin
  53537. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFCF or ( thebits shl 4 );
  53538. end;
  53539. function TPCACHE_CHECON.getPREFEN : TBits_2; inline;
  53540. begin
  53541. getPREFEN := (pTDefRegMap(@Self)^.val and $00000030) shr 4;
  53542. end;
  53543. procedure TPCACHE_CHECON.setDCSZ(thebits : TBits_2); inline;
  53544. begin
  53545. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  53546. end;
  53547. function TPCACHE_CHECON.getDCSZ : TBits_2; inline;
  53548. begin
  53549. getDCSZ := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  53550. end;
  53551. procedure TPCACHE_CHECON.setCHECOH; inline;
  53552. begin
  53553. pTDefRegMap(@Self)^.&set := $00010000;
  53554. end;
  53555. procedure TPCACHE_CHECON.clearCHECOH; inline;
  53556. begin
  53557. pTDefRegMap(@Self)^.clr := $00010000;
  53558. end;
  53559. procedure TPCACHE_CHECON.setCHECOH(thebits : TBits_1); inline;
  53560. begin
  53561. if thebits = 0 then
  53562. pTDefRegMap(@Self)^.clr := $00010000
  53563. else
  53564. pTDefRegMap(@Self)^.&set := $00010000;
  53565. end;
  53566. function TPCACHE_CHECON.getCHECOH : TBits_1; inline;
  53567. begin
  53568. getCHECOH := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  53569. end;
  53570. procedure TPCACHE_CHECON.setw(thebits : TBits_32); inline;
  53571. begin
  53572. pTDefRegMap(@Self)^.val := thebits;
  53573. end;
  53574. function TPCACHE_CHECON.getw : TBits_32; inline;
  53575. begin
  53576. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  53577. end;
  53578. procedure TPCACHE_CHETAG.setLTYPE; inline;
  53579. begin
  53580. pTDefRegMap(@Self)^.&set := $00000002;
  53581. end;
  53582. procedure TPCACHE_CHETAG.clearLTYPE; inline;
  53583. begin
  53584. pTDefRegMap(@Self)^.clr := $00000002;
  53585. end;
  53586. procedure TPCACHE_CHETAG.setLTYPE(thebits : TBits_1); inline;
  53587. begin
  53588. if thebits = 0 then
  53589. pTDefRegMap(@Self)^.clr := $00000002
  53590. else
  53591. pTDefRegMap(@Self)^.&set := $00000002;
  53592. end;
  53593. function TPCACHE_CHETAG.getLTYPE : TBits_1; inline;
  53594. begin
  53595. getLTYPE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  53596. end;
  53597. procedure TPCACHE_CHETAG.setLLOCK; inline;
  53598. begin
  53599. pTDefRegMap(@Self)^.&set := $00000004;
  53600. end;
  53601. procedure TPCACHE_CHETAG.clearLLOCK; inline;
  53602. begin
  53603. pTDefRegMap(@Self)^.clr := $00000004;
  53604. end;
  53605. procedure TPCACHE_CHETAG.setLLOCK(thebits : TBits_1); inline;
  53606. begin
  53607. if thebits = 0 then
  53608. pTDefRegMap(@Self)^.clr := $00000004
  53609. else
  53610. pTDefRegMap(@Self)^.&set := $00000004;
  53611. end;
  53612. function TPCACHE_CHETAG.getLLOCK : TBits_1; inline;
  53613. begin
  53614. getLLOCK := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  53615. end;
  53616. procedure TPCACHE_CHETAG.setLVALID; inline;
  53617. begin
  53618. pTDefRegMap(@Self)^.&set := $00000008;
  53619. end;
  53620. procedure TPCACHE_CHETAG.clearLVALID; inline;
  53621. begin
  53622. pTDefRegMap(@Self)^.clr := $00000008;
  53623. end;
  53624. procedure TPCACHE_CHETAG.setLVALID(thebits : TBits_1); inline;
  53625. begin
  53626. if thebits = 0 then
  53627. pTDefRegMap(@Self)^.clr := $00000008
  53628. else
  53629. pTDefRegMap(@Self)^.&set := $00000008;
  53630. end;
  53631. function TPCACHE_CHETAG.getLVALID : TBits_1; inline;
  53632. begin
  53633. getLVALID := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  53634. end;
  53635. procedure TPCACHE_CHETAG.setLTAG(thebits : TBits_20); inline;
  53636. begin
  53637. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00000F or ( thebits shl 4 );
  53638. end;
  53639. function TPCACHE_CHETAG.getLTAG : TBits_20; inline;
  53640. begin
  53641. getLTAG := (pTDefRegMap(@Self)^.val and $00FFFFF0) shr 4;
  53642. end;
  53643. procedure TPCACHE_CHETAG.setLTAGBOOT; inline;
  53644. begin
  53645. pTDefRegMap(@Self)^.&set := $80000000;
  53646. end;
  53647. procedure TPCACHE_CHETAG.clearLTAGBOOT; inline;
  53648. begin
  53649. pTDefRegMap(@Self)^.clr := $80000000;
  53650. end;
  53651. procedure TPCACHE_CHETAG.setLTAGBOOT(thebits : TBits_1); inline;
  53652. begin
  53653. if thebits = 0 then
  53654. pTDefRegMap(@Self)^.clr := $80000000
  53655. else
  53656. pTDefRegMap(@Self)^.&set := $80000000;
  53657. end;
  53658. function TPCACHE_CHETAG.getLTAGBOOT : TBits_1; inline;
  53659. begin
  53660. getLTAGBOOT := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  53661. end;
  53662. procedure TPCACHE_CHETAG.setw(thebits : TBits_32); inline;
  53663. begin
  53664. pTDefRegMap(@Self)^.val := thebits;
  53665. end;
  53666. function TPCACHE_CHETAG.getw : TBits_32; inline;
  53667. begin
  53668. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  53669. end;
  53670. procedure TUSB_U1IR.setURSTIF_DETACHIF; inline;
  53671. begin
  53672. pTDefRegMap(@Self)^.&set := $00000001;
  53673. end;
  53674. procedure TUSB_U1IR.clearURSTIF_DETACHIF; inline;
  53675. begin
  53676. pTDefRegMap(@Self)^.clr := $00000001;
  53677. end;
  53678. procedure TUSB_U1IR.setURSTIF_DETACHIF(thebits : TBits_1); inline;
  53679. begin
  53680. if thebits = 0 then
  53681. pTDefRegMap(@Self)^.clr := $00000001
  53682. else
  53683. pTDefRegMap(@Self)^.&set := $00000001;
  53684. end;
  53685. function TUSB_U1IR.getURSTIF_DETACHIF : TBits_1; inline;
  53686. begin
  53687. getURSTIF_DETACHIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  53688. end;
  53689. procedure TUSB_U1IR.setUERRIF; inline;
  53690. begin
  53691. pTDefRegMap(@Self)^.&set := $00000002;
  53692. end;
  53693. procedure TUSB_U1IR.clearUERRIF; inline;
  53694. begin
  53695. pTDefRegMap(@Self)^.clr := $00000002;
  53696. end;
  53697. procedure TUSB_U1IR.setUERRIF(thebits : TBits_1); inline;
  53698. begin
  53699. if thebits = 0 then
  53700. pTDefRegMap(@Self)^.clr := $00000002
  53701. else
  53702. pTDefRegMap(@Self)^.&set := $00000002;
  53703. end;
  53704. function TUSB_U1IR.getUERRIF : TBits_1; inline;
  53705. begin
  53706. getUERRIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  53707. end;
  53708. procedure TUSB_U1IR.setSOFIF; inline;
  53709. begin
  53710. pTDefRegMap(@Self)^.&set := $00000004;
  53711. end;
  53712. procedure TUSB_U1IR.clearSOFIF; inline;
  53713. begin
  53714. pTDefRegMap(@Self)^.clr := $00000004;
  53715. end;
  53716. procedure TUSB_U1IR.setSOFIF(thebits : TBits_1); inline;
  53717. begin
  53718. if thebits = 0 then
  53719. pTDefRegMap(@Self)^.clr := $00000004
  53720. else
  53721. pTDefRegMap(@Self)^.&set := $00000004;
  53722. end;
  53723. function TUSB_U1IR.getSOFIF : TBits_1; inline;
  53724. begin
  53725. getSOFIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  53726. end;
  53727. procedure TUSB_U1IR.setTRNIF; inline;
  53728. begin
  53729. pTDefRegMap(@Self)^.&set := $00000008;
  53730. end;
  53731. procedure TUSB_U1IR.clearTRNIF; inline;
  53732. begin
  53733. pTDefRegMap(@Self)^.clr := $00000008;
  53734. end;
  53735. procedure TUSB_U1IR.setTRNIF(thebits : TBits_1); inline;
  53736. begin
  53737. if thebits = 0 then
  53738. pTDefRegMap(@Self)^.clr := $00000008
  53739. else
  53740. pTDefRegMap(@Self)^.&set := $00000008;
  53741. end;
  53742. function TUSB_U1IR.getTRNIF : TBits_1; inline;
  53743. begin
  53744. getTRNIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  53745. end;
  53746. procedure TUSB_U1IR.setIDLEIF; inline;
  53747. begin
  53748. pTDefRegMap(@Self)^.&set := $00000010;
  53749. end;
  53750. procedure TUSB_U1IR.clearIDLEIF; inline;
  53751. begin
  53752. pTDefRegMap(@Self)^.clr := $00000010;
  53753. end;
  53754. procedure TUSB_U1IR.setIDLEIF(thebits : TBits_1); inline;
  53755. begin
  53756. if thebits = 0 then
  53757. pTDefRegMap(@Self)^.clr := $00000010
  53758. else
  53759. pTDefRegMap(@Self)^.&set := $00000010;
  53760. end;
  53761. function TUSB_U1IR.getIDLEIF : TBits_1; inline;
  53762. begin
  53763. getIDLEIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  53764. end;
  53765. procedure TUSB_U1IR.setRESUMEIF; inline;
  53766. begin
  53767. pTDefRegMap(@Self)^.&set := $00000020;
  53768. end;
  53769. procedure TUSB_U1IR.clearRESUMEIF; inline;
  53770. begin
  53771. pTDefRegMap(@Self)^.clr := $00000020;
  53772. end;
  53773. procedure TUSB_U1IR.setRESUMEIF(thebits : TBits_1); inline;
  53774. begin
  53775. if thebits = 0 then
  53776. pTDefRegMap(@Self)^.clr := $00000020
  53777. else
  53778. pTDefRegMap(@Self)^.&set := $00000020;
  53779. end;
  53780. function TUSB_U1IR.getRESUMEIF : TBits_1; inline;
  53781. begin
  53782. getRESUMEIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  53783. end;
  53784. procedure TUSB_U1IR.setATTACHIF; inline;
  53785. begin
  53786. pTDefRegMap(@Self)^.&set := $00000040;
  53787. end;
  53788. procedure TUSB_U1IR.clearATTACHIF; inline;
  53789. begin
  53790. pTDefRegMap(@Self)^.clr := $00000040;
  53791. end;
  53792. procedure TUSB_U1IR.setATTACHIF(thebits : TBits_1); inline;
  53793. begin
  53794. if thebits = 0 then
  53795. pTDefRegMap(@Self)^.clr := $00000040
  53796. else
  53797. pTDefRegMap(@Self)^.&set := $00000040;
  53798. end;
  53799. function TUSB_U1IR.getATTACHIF : TBits_1; inline;
  53800. begin
  53801. getATTACHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  53802. end;
  53803. procedure TUSB_U1IR.setSTALLIF; inline;
  53804. begin
  53805. pTDefRegMap(@Self)^.&set := $00000080;
  53806. end;
  53807. procedure TUSB_U1IR.clearSTALLIF; inline;
  53808. begin
  53809. pTDefRegMap(@Self)^.clr := $00000080;
  53810. end;
  53811. procedure TUSB_U1IR.setSTALLIF(thebits : TBits_1); inline;
  53812. begin
  53813. if thebits = 0 then
  53814. pTDefRegMap(@Self)^.clr := $00000080
  53815. else
  53816. pTDefRegMap(@Self)^.&set := $00000080;
  53817. end;
  53818. function TUSB_U1IR.getSTALLIF : TBits_1; inline;
  53819. begin
  53820. getSTALLIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  53821. end;
  53822. procedure TUSB_U1IR.setDETACHIF; inline;
  53823. begin
  53824. pTDefRegMap(@Self)^.&set := $00000001;
  53825. end;
  53826. procedure TUSB_U1IR.clearDETACHIF; inline;
  53827. begin
  53828. pTDefRegMap(@Self)^.clr := $00000001;
  53829. end;
  53830. procedure TUSB_U1IR.setDETACHIF(thebits : TBits_1); inline;
  53831. begin
  53832. if thebits = 0 then
  53833. pTDefRegMap(@Self)^.clr := $00000001
  53834. else
  53835. pTDefRegMap(@Self)^.&set := $00000001;
  53836. end;
  53837. function TUSB_U1IR.getDETACHIF : TBits_1; inline;
  53838. begin
  53839. getDETACHIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  53840. end;
  53841. procedure TUSB_U1IR.setURSTIF; inline;
  53842. begin
  53843. pTDefRegMap(@Self)^.&set := $00000001;
  53844. end;
  53845. procedure TUSB_U1IR.clearURSTIF; inline;
  53846. begin
  53847. pTDefRegMap(@Self)^.clr := $00000001;
  53848. end;
  53849. procedure TUSB_U1IR.setURSTIF(thebits : TBits_1); inline;
  53850. begin
  53851. if thebits = 0 then
  53852. pTDefRegMap(@Self)^.clr := $00000001
  53853. else
  53854. pTDefRegMap(@Self)^.&set := $00000001;
  53855. end;
  53856. function TUSB_U1IR.getURSTIF : TBits_1; inline;
  53857. begin
  53858. getURSTIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  53859. end;
  53860. procedure TUSB_U1IE.setURSTIE_DETACHIE; inline;
  53861. begin
  53862. pTDefRegMap(@Self)^.&set := $00000001;
  53863. end;
  53864. procedure TUSB_U1IE.clearURSTIE_DETACHIE; inline;
  53865. begin
  53866. pTDefRegMap(@Self)^.clr := $00000001;
  53867. end;
  53868. procedure TUSB_U1IE.setURSTIE_DETACHIE(thebits : TBits_1); inline;
  53869. begin
  53870. if thebits = 0 then
  53871. pTDefRegMap(@Self)^.clr := $00000001
  53872. else
  53873. pTDefRegMap(@Self)^.&set := $00000001;
  53874. end;
  53875. function TUSB_U1IE.getURSTIE_DETACHIE : TBits_1; inline;
  53876. begin
  53877. getURSTIE_DETACHIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  53878. end;
  53879. procedure TUSB_U1IE.setUERRIE; inline;
  53880. begin
  53881. pTDefRegMap(@Self)^.&set := $00000002;
  53882. end;
  53883. procedure TUSB_U1IE.clearUERRIE; inline;
  53884. begin
  53885. pTDefRegMap(@Self)^.clr := $00000002;
  53886. end;
  53887. procedure TUSB_U1IE.setUERRIE(thebits : TBits_1); inline;
  53888. begin
  53889. if thebits = 0 then
  53890. pTDefRegMap(@Self)^.clr := $00000002
  53891. else
  53892. pTDefRegMap(@Self)^.&set := $00000002;
  53893. end;
  53894. function TUSB_U1IE.getUERRIE : TBits_1; inline;
  53895. begin
  53896. getUERRIE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  53897. end;
  53898. procedure TUSB_U1IE.setSOFIE; inline;
  53899. begin
  53900. pTDefRegMap(@Self)^.&set := $00000004;
  53901. end;
  53902. procedure TUSB_U1IE.clearSOFIE; inline;
  53903. begin
  53904. pTDefRegMap(@Self)^.clr := $00000004;
  53905. end;
  53906. procedure TUSB_U1IE.setSOFIE(thebits : TBits_1); inline;
  53907. begin
  53908. if thebits = 0 then
  53909. pTDefRegMap(@Self)^.clr := $00000004
  53910. else
  53911. pTDefRegMap(@Self)^.&set := $00000004;
  53912. end;
  53913. function TUSB_U1IE.getSOFIE : TBits_1; inline;
  53914. begin
  53915. getSOFIE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  53916. end;
  53917. procedure TUSB_U1IE.setTRNIE; inline;
  53918. begin
  53919. pTDefRegMap(@Self)^.&set := $00000008;
  53920. end;
  53921. procedure TUSB_U1IE.clearTRNIE; inline;
  53922. begin
  53923. pTDefRegMap(@Self)^.clr := $00000008;
  53924. end;
  53925. procedure TUSB_U1IE.setTRNIE(thebits : TBits_1); inline;
  53926. begin
  53927. if thebits = 0 then
  53928. pTDefRegMap(@Self)^.clr := $00000008
  53929. else
  53930. pTDefRegMap(@Self)^.&set := $00000008;
  53931. end;
  53932. function TUSB_U1IE.getTRNIE : TBits_1; inline;
  53933. begin
  53934. getTRNIE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  53935. end;
  53936. procedure TUSB_U1IE.setIDLEIE; inline;
  53937. begin
  53938. pTDefRegMap(@Self)^.&set := $00000010;
  53939. end;
  53940. procedure TUSB_U1IE.clearIDLEIE; inline;
  53941. begin
  53942. pTDefRegMap(@Self)^.clr := $00000010;
  53943. end;
  53944. procedure TUSB_U1IE.setIDLEIE(thebits : TBits_1); inline;
  53945. begin
  53946. if thebits = 0 then
  53947. pTDefRegMap(@Self)^.clr := $00000010
  53948. else
  53949. pTDefRegMap(@Self)^.&set := $00000010;
  53950. end;
  53951. function TUSB_U1IE.getIDLEIE : TBits_1; inline;
  53952. begin
  53953. getIDLEIE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  53954. end;
  53955. procedure TUSB_U1IE.setRESUMEIE; inline;
  53956. begin
  53957. pTDefRegMap(@Self)^.&set := $00000020;
  53958. end;
  53959. procedure TUSB_U1IE.clearRESUMEIE; inline;
  53960. begin
  53961. pTDefRegMap(@Self)^.clr := $00000020;
  53962. end;
  53963. procedure TUSB_U1IE.setRESUMEIE(thebits : TBits_1); inline;
  53964. begin
  53965. if thebits = 0 then
  53966. pTDefRegMap(@Self)^.clr := $00000020
  53967. else
  53968. pTDefRegMap(@Self)^.&set := $00000020;
  53969. end;
  53970. function TUSB_U1IE.getRESUMEIE : TBits_1; inline;
  53971. begin
  53972. getRESUMEIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  53973. end;
  53974. procedure TUSB_U1IE.setATTACHIE; inline;
  53975. begin
  53976. pTDefRegMap(@Self)^.&set := $00000040;
  53977. end;
  53978. procedure TUSB_U1IE.clearATTACHIE; inline;
  53979. begin
  53980. pTDefRegMap(@Self)^.clr := $00000040;
  53981. end;
  53982. procedure TUSB_U1IE.setATTACHIE(thebits : TBits_1); inline;
  53983. begin
  53984. if thebits = 0 then
  53985. pTDefRegMap(@Self)^.clr := $00000040
  53986. else
  53987. pTDefRegMap(@Self)^.&set := $00000040;
  53988. end;
  53989. function TUSB_U1IE.getATTACHIE : TBits_1; inline;
  53990. begin
  53991. getATTACHIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  53992. end;
  53993. procedure TUSB_U1IE.setSTALLIE; inline;
  53994. begin
  53995. pTDefRegMap(@Self)^.&set := $00000080;
  53996. end;
  53997. procedure TUSB_U1IE.clearSTALLIE; inline;
  53998. begin
  53999. pTDefRegMap(@Self)^.clr := $00000080;
  54000. end;
  54001. procedure TUSB_U1IE.setSTALLIE(thebits : TBits_1); inline;
  54002. begin
  54003. if thebits = 0 then
  54004. pTDefRegMap(@Self)^.clr := $00000080
  54005. else
  54006. pTDefRegMap(@Self)^.&set := $00000080;
  54007. end;
  54008. function TUSB_U1IE.getSTALLIE : TBits_1; inline;
  54009. begin
  54010. getSTALLIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  54011. end;
  54012. procedure TUSB_U1IE.setDETACHIE; inline;
  54013. begin
  54014. pTDefRegMap(@Self)^.&set := $00000001;
  54015. end;
  54016. procedure TUSB_U1IE.clearDETACHIE; inline;
  54017. begin
  54018. pTDefRegMap(@Self)^.clr := $00000001;
  54019. end;
  54020. procedure TUSB_U1IE.setDETACHIE(thebits : TBits_1); inline;
  54021. begin
  54022. if thebits = 0 then
  54023. pTDefRegMap(@Self)^.clr := $00000001
  54024. else
  54025. pTDefRegMap(@Self)^.&set := $00000001;
  54026. end;
  54027. function TUSB_U1IE.getDETACHIE : TBits_1; inline;
  54028. begin
  54029. getDETACHIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  54030. end;
  54031. procedure TUSB_U1IE.setURSTIE; inline;
  54032. begin
  54033. pTDefRegMap(@Self)^.&set := $00000001;
  54034. end;
  54035. procedure TUSB_U1IE.clearURSTIE; inline;
  54036. begin
  54037. pTDefRegMap(@Self)^.clr := $00000001;
  54038. end;
  54039. procedure TUSB_U1IE.setURSTIE(thebits : TBits_1); inline;
  54040. begin
  54041. if thebits = 0 then
  54042. pTDefRegMap(@Self)^.clr := $00000001
  54043. else
  54044. pTDefRegMap(@Self)^.&set := $00000001;
  54045. end;
  54046. function TUSB_U1IE.getURSTIE : TBits_1; inline;
  54047. begin
  54048. getURSTIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  54049. end;
  54050. procedure TUSB_U1EIR.setPIDEF; inline;
  54051. begin
  54052. pTDefRegMap(@Self)^.&set := $00000001;
  54053. end;
  54054. procedure TUSB_U1EIR.clearPIDEF; inline;
  54055. begin
  54056. pTDefRegMap(@Self)^.clr := $00000001;
  54057. end;
  54058. procedure TUSB_U1EIR.setPIDEF(thebits : TBits_1); inline;
  54059. begin
  54060. if thebits = 0 then
  54061. pTDefRegMap(@Self)^.clr := $00000001
  54062. else
  54063. pTDefRegMap(@Self)^.&set := $00000001;
  54064. end;
  54065. function TUSB_U1EIR.getPIDEF : TBits_1; inline;
  54066. begin
  54067. getPIDEF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  54068. end;
  54069. procedure TUSB_U1EIR.setCRC5EF_EOFEF; inline;
  54070. begin
  54071. pTDefRegMap(@Self)^.&set := $00000002;
  54072. end;
  54073. procedure TUSB_U1EIR.clearCRC5EF_EOFEF; inline;
  54074. begin
  54075. pTDefRegMap(@Self)^.clr := $00000002;
  54076. end;
  54077. procedure TUSB_U1EIR.setCRC5EF_EOFEF(thebits : TBits_1); inline;
  54078. begin
  54079. if thebits = 0 then
  54080. pTDefRegMap(@Self)^.clr := $00000002
  54081. else
  54082. pTDefRegMap(@Self)^.&set := $00000002;
  54083. end;
  54084. function TUSB_U1EIR.getCRC5EF_EOFEF : TBits_1; inline;
  54085. begin
  54086. getCRC5EF_EOFEF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  54087. end;
  54088. procedure TUSB_U1EIR.setCRC16EF; inline;
  54089. begin
  54090. pTDefRegMap(@Self)^.&set := $00000004;
  54091. end;
  54092. procedure TUSB_U1EIR.clearCRC16EF; inline;
  54093. begin
  54094. pTDefRegMap(@Self)^.clr := $00000004;
  54095. end;
  54096. procedure TUSB_U1EIR.setCRC16EF(thebits : TBits_1); inline;
  54097. begin
  54098. if thebits = 0 then
  54099. pTDefRegMap(@Self)^.clr := $00000004
  54100. else
  54101. pTDefRegMap(@Self)^.&set := $00000004;
  54102. end;
  54103. function TUSB_U1EIR.getCRC16EF : TBits_1; inline;
  54104. begin
  54105. getCRC16EF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  54106. end;
  54107. procedure TUSB_U1EIR.setDFN8EF; inline;
  54108. begin
  54109. pTDefRegMap(@Self)^.&set := $00000008;
  54110. end;
  54111. procedure TUSB_U1EIR.clearDFN8EF; inline;
  54112. begin
  54113. pTDefRegMap(@Self)^.clr := $00000008;
  54114. end;
  54115. procedure TUSB_U1EIR.setDFN8EF(thebits : TBits_1); inline;
  54116. begin
  54117. if thebits = 0 then
  54118. pTDefRegMap(@Self)^.clr := $00000008
  54119. else
  54120. pTDefRegMap(@Self)^.&set := $00000008;
  54121. end;
  54122. function TUSB_U1EIR.getDFN8EF : TBits_1; inline;
  54123. begin
  54124. getDFN8EF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  54125. end;
  54126. procedure TUSB_U1EIR.setBTOEF; inline;
  54127. begin
  54128. pTDefRegMap(@Self)^.&set := $00000010;
  54129. end;
  54130. procedure TUSB_U1EIR.clearBTOEF; inline;
  54131. begin
  54132. pTDefRegMap(@Self)^.clr := $00000010;
  54133. end;
  54134. procedure TUSB_U1EIR.setBTOEF(thebits : TBits_1); inline;
  54135. begin
  54136. if thebits = 0 then
  54137. pTDefRegMap(@Self)^.clr := $00000010
  54138. else
  54139. pTDefRegMap(@Self)^.&set := $00000010;
  54140. end;
  54141. function TUSB_U1EIR.getBTOEF : TBits_1; inline;
  54142. begin
  54143. getBTOEF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  54144. end;
  54145. procedure TUSB_U1EIR.setDMAEF; inline;
  54146. begin
  54147. pTDefRegMap(@Self)^.&set := $00000020;
  54148. end;
  54149. procedure TUSB_U1EIR.clearDMAEF; inline;
  54150. begin
  54151. pTDefRegMap(@Self)^.clr := $00000020;
  54152. end;
  54153. procedure TUSB_U1EIR.setDMAEF(thebits : TBits_1); inline;
  54154. begin
  54155. if thebits = 0 then
  54156. pTDefRegMap(@Self)^.clr := $00000020
  54157. else
  54158. pTDefRegMap(@Self)^.&set := $00000020;
  54159. end;
  54160. function TUSB_U1EIR.getDMAEF : TBits_1; inline;
  54161. begin
  54162. getDMAEF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  54163. end;
  54164. procedure TUSB_U1EIR.setBMXEF; inline;
  54165. begin
  54166. pTDefRegMap(@Self)^.&set := $00000040;
  54167. end;
  54168. procedure TUSB_U1EIR.clearBMXEF; inline;
  54169. begin
  54170. pTDefRegMap(@Self)^.clr := $00000040;
  54171. end;
  54172. procedure TUSB_U1EIR.setBMXEF(thebits : TBits_1); inline;
  54173. begin
  54174. if thebits = 0 then
  54175. pTDefRegMap(@Self)^.clr := $00000040
  54176. else
  54177. pTDefRegMap(@Self)^.&set := $00000040;
  54178. end;
  54179. function TUSB_U1EIR.getBMXEF : TBits_1; inline;
  54180. begin
  54181. getBMXEF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  54182. end;
  54183. procedure TUSB_U1EIR.setBTSEF; inline;
  54184. begin
  54185. pTDefRegMap(@Self)^.&set := $00000080;
  54186. end;
  54187. procedure TUSB_U1EIR.clearBTSEF; inline;
  54188. begin
  54189. pTDefRegMap(@Self)^.clr := $00000080;
  54190. end;
  54191. procedure TUSB_U1EIR.setBTSEF(thebits : TBits_1); inline;
  54192. begin
  54193. if thebits = 0 then
  54194. pTDefRegMap(@Self)^.clr := $00000080
  54195. else
  54196. pTDefRegMap(@Self)^.&set := $00000080;
  54197. end;
  54198. function TUSB_U1EIR.getBTSEF : TBits_1; inline;
  54199. begin
  54200. getBTSEF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  54201. end;
  54202. procedure TUSB_U1EIR.setCRC5EF; inline;
  54203. begin
  54204. pTDefRegMap(@Self)^.&set := $00000002;
  54205. end;
  54206. procedure TUSB_U1EIR.clearCRC5EF; inline;
  54207. begin
  54208. pTDefRegMap(@Self)^.clr := $00000002;
  54209. end;
  54210. procedure TUSB_U1EIR.setCRC5EF(thebits : TBits_1); inline;
  54211. begin
  54212. if thebits = 0 then
  54213. pTDefRegMap(@Self)^.clr := $00000002
  54214. else
  54215. pTDefRegMap(@Self)^.&set := $00000002;
  54216. end;
  54217. function TUSB_U1EIR.getCRC5EF : TBits_1; inline;
  54218. begin
  54219. getCRC5EF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  54220. end;
  54221. procedure TUSB_U1EIR.setEOFEF; inline;
  54222. begin
  54223. pTDefRegMap(@Self)^.&set := $00000002;
  54224. end;
  54225. procedure TUSB_U1EIR.clearEOFEF; inline;
  54226. begin
  54227. pTDefRegMap(@Self)^.clr := $00000002;
  54228. end;
  54229. procedure TUSB_U1EIR.setEOFEF(thebits : TBits_1); inline;
  54230. begin
  54231. if thebits = 0 then
  54232. pTDefRegMap(@Self)^.clr := $00000002
  54233. else
  54234. pTDefRegMap(@Self)^.&set := $00000002;
  54235. end;
  54236. function TUSB_U1EIR.getEOFEF : TBits_1; inline;
  54237. begin
  54238. getEOFEF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  54239. end;
  54240. procedure TUSB_U1EIE.setPIDEE; inline;
  54241. begin
  54242. pTDefRegMap(@Self)^.&set := $00000001;
  54243. end;
  54244. procedure TUSB_U1EIE.clearPIDEE; inline;
  54245. begin
  54246. pTDefRegMap(@Self)^.clr := $00000001;
  54247. end;
  54248. procedure TUSB_U1EIE.setPIDEE(thebits : TBits_1); inline;
  54249. begin
  54250. if thebits = 0 then
  54251. pTDefRegMap(@Self)^.clr := $00000001
  54252. else
  54253. pTDefRegMap(@Self)^.&set := $00000001;
  54254. end;
  54255. function TUSB_U1EIE.getPIDEE : TBits_1; inline;
  54256. begin
  54257. getPIDEE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  54258. end;
  54259. procedure TUSB_U1EIE.setCRC5EE_EOFEE; inline;
  54260. begin
  54261. pTDefRegMap(@Self)^.&set := $00000002;
  54262. end;
  54263. procedure TUSB_U1EIE.clearCRC5EE_EOFEE; inline;
  54264. begin
  54265. pTDefRegMap(@Self)^.clr := $00000002;
  54266. end;
  54267. procedure TUSB_U1EIE.setCRC5EE_EOFEE(thebits : TBits_1); inline;
  54268. begin
  54269. if thebits = 0 then
  54270. pTDefRegMap(@Self)^.clr := $00000002
  54271. else
  54272. pTDefRegMap(@Self)^.&set := $00000002;
  54273. end;
  54274. function TUSB_U1EIE.getCRC5EE_EOFEE : TBits_1; inline;
  54275. begin
  54276. getCRC5EE_EOFEE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  54277. end;
  54278. procedure TUSB_U1EIE.setCRC16EE; inline;
  54279. begin
  54280. pTDefRegMap(@Self)^.&set := $00000004;
  54281. end;
  54282. procedure TUSB_U1EIE.clearCRC16EE; inline;
  54283. begin
  54284. pTDefRegMap(@Self)^.clr := $00000004;
  54285. end;
  54286. procedure TUSB_U1EIE.setCRC16EE(thebits : TBits_1); inline;
  54287. begin
  54288. if thebits = 0 then
  54289. pTDefRegMap(@Self)^.clr := $00000004
  54290. else
  54291. pTDefRegMap(@Self)^.&set := $00000004;
  54292. end;
  54293. function TUSB_U1EIE.getCRC16EE : TBits_1; inline;
  54294. begin
  54295. getCRC16EE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  54296. end;
  54297. procedure TUSB_U1EIE.setDFN8EE; inline;
  54298. begin
  54299. pTDefRegMap(@Self)^.&set := $00000008;
  54300. end;
  54301. procedure TUSB_U1EIE.clearDFN8EE; inline;
  54302. begin
  54303. pTDefRegMap(@Self)^.clr := $00000008;
  54304. end;
  54305. procedure TUSB_U1EIE.setDFN8EE(thebits : TBits_1); inline;
  54306. begin
  54307. if thebits = 0 then
  54308. pTDefRegMap(@Self)^.clr := $00000008
  54309. else
  54310. pTDefRegMap(@Self)^.&set := $00000008;
  54311. end;
  54312. function TUSB_U1EIE.getDFN8EE : TBits_1; inline;
  54313. begin
  54314. getDFN8EE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  54315. end;
  54316. procedure TUSB_U1EIE.setBTOEE; inline;
  54317. begin
  54318. pTDefRegMap(@Self)^.&set := $00000010;
  54319. end;
  54320. procedure TUSB_U1EIE.clearBTOEE; inline;
  54321. begin
  54322. pTDefRegMap(@Self)^.clr := $00000010;
  54323. end;
  54324. procedure TUSB_U1EIE.setBTOEE(thebits : TBits_1); inline;
  54325. begin
  54326. if thebits = 0 then
  54327. pTDefRegMap(@Self)^.clr := $00000010
  54328. else
  54329. pTDefRegMap(@Self)^.&set := $00000010;
  54330. end;
  54331. function TUSB_U1EIE.getBTOEE : TBits_1; inline;
  54332. begin
  54333. getBTOEE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  54334. end;
  54335. procedure TUSB_U1EIE.setDMAEE; inline;
  54336. begin
  54337. pTDefRegMap(@Self)^.&set := $00000020;
  54338. end;
  54339. procedure TUSB_U1EIE.clearDMAEE; inline;
  54340. begin
  54341. pTDefRegMap(@Self)^.clr := $00000020;
  54342. end;
  54343. procedure TUSB_U1EIE.setDMAEE(thebits : TBits_1); inline;
  54344. begin
  54345. if thebits = 0 then
  54346. pTDefRegMap(@Self)^.clr := $00000020
  54347. else
  54348. pTDefRegMap(@Self)^.&set := $00000020;
  54349. end;
  54350. function TUSB_U1EIE.getDMAEE : TBits_1; inline;
  54351. begin
  54352. getDMAEE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  54353. end;
  54354. procedure TUSB_U1EIE.setBMXEE; inline;
  54355. begin
  54356. pTDefRegMap(@Self)^.&set := $00000040;
  54357. end;
  54358. procedure TUSB_U1EIE.clearBMXEE; inline;
  54359. begin
  54360. pTDefRegMap(@Self)^.clr := $00000040;
  54361. end;
  54362. procedure TUSB_U1EIE.setBMXEE(thebits : TBits_1); inline;
  54363. begin
  54364. if thebits = 0 then
  54365. pTDefRegMap(@Self)^.clr := $00000040
  54366. else
  54367. pTDefRegMap(@Self)^.&set := $00000040;
  54368. end;
  54369. function TUSB_U1EIE.getBMXEE : TBits_1; inline;
  54370. begin
  54371. getBMXEE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  54372. end;
  54373. procedure TUSB_U1EIE.setBTSEE; inline;
  54374. begin
  54375. pTDefRegMap(@Self)^.&set := $00000080;
  54376. end;
  54377. procedure TUSB_U1EIE.clearBTSEE; inline;
  54378. begin
  54379. pTDefRegMap(@Self)^.clr := $00000080;
  54380. end;
  54381. procedure TUSB_U1EIE.setBTSEE(thebits : TBits_1); inline;
  54382. begin
  54383. if thebits = 0 then
  54384. pTDefRegMap(@Self)^.clr := $00000080
  54385. else
  54386. pTDefRegMap(@Self)^.&set := $00000080;
  54387. end;
  54388. function TUSB_U1EIE.getBTSEE : TBits_1; inline;
  54389. begin
  54390. getBTSEE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  54391. end;
  54392. procedure TUSB_U1EIE.setCRC5EE; inline;
  54393. begin
  54394. pTDefRegMap(@Self)^.&set := $00000002;
  54395. end;
  54396. procedure TUSB_U1EIE.clearCRC5EE; inline;
  54397. begin
  54398. pTDefRegMap(@Self)^.clr := $00000002;
  54399. end;
  54400. procedure TUSB_U1EIE.setCRC5EE(thebits : TBits_1); inline;
  54401. begin
  54402. if thebits = 0 then
  54403. pTDefRegMap(@Self)^.clr := $00000002
  54404. else
  54405. pTDefRegMap(@Self)^.&set := $00000002;
  54406. end;
  54407. function TUSB_U1EIE.getCRC5EE : TBits_1; inline;
  54408. begin
  54409. getCRC5EE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  54410. end;
  54411. procedure TUSB_U1EIE.setEOFEE; inline;
  54412. begin
  54413. pTDefRegMap(@Self)^.&set := $00000002;
  54414. end;
  54415. procedure TUSB_U1EIE.clearEOFEE; inline;
  54416. begin
  54417. pTDefRegMap(@Self)^.clr := $00000002;
  54418. end;
  54419. procedure TUSB_U1EIE.setEOFEE(thebits : TBits_1); inline;
  54420. begin
  54421. if thebits = 0 then
  54422. pTDefRegMap(@Self)^.clr := $00000002
  54423. else
  54424. pTDefRegMap(@Self)^.&set := $00000002;
  54425. end;
  54426. function TUSB_U1EIE.getEOFEE : TBits_1; inline;
  54427. begin
  54428. getEOFEE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  54429. end;
  54430. procedure TUSB_U1STAT.setPPBI; inline;
  54431. begin
  54432. pTDefRegMap(@Self)^.&set := $00000004;
  54433. end;
  54434. procedure TUSB_U1STAT.clearPPBI; inline;
  54435. begin
  54436. pTDefRegMap(@Self)^.clr := $00000004;
  54437. end;
  54438. procedure TUSB_U1STAT.setPPBI(thebits : TBits_1); inline;
  54439. begin
  54440. if thebits = 0 then
  54441. pTDefRegMap(@Self)^.clr := $00000004
  54442. else
  54443. pTDefRegMap(@Self)^.&set := $00000004;
  54444. end;
  54445. function TUSB_U1STAT.getPPBI : TBits_1; inline;
  54446. begin
  54447. getPPBI := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  54448. end;
  54449. procedure TUSB_U1STAT.setDIR; inline;
  54450. begin
  54451. pTDefRegMap(@Self)^.&set := $00000008;
  54452. end;
  54453. procedure TUSB_U1STAT.clearDIR; inline;
  54454. begin
  54455. pTDefRegMap(@Self)^.clr := $00000008;
  54456. end;
  54457. procedure TUSB_U1STAT.setDIR(thebits : TBits_1); inline;
  54458. begin
  54459. if thebits = 0 then
  54460. pTDefRegMap(@Self)^.clr := $00000008
  54461. else
  54462. pTDefRegMap(@Self)^.&set := $00000008;
  54463. end;
  54464. function TUSB_U1STAT.getDIR : TBits_1; inline;
  54465. begin
  54466. getDIR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  54467. end;
  54468. procedure TUSB_U1STAT.setENDPT(thebits : TBits_4); inline;
  54469. begin
  54470. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF0F or ( thebits shl 4 );
  54471. end;
  54472. function TUSB_U1STAT.getENDPT : TBits_4; inline;
  54473. begin
  54474. getENDPT := (pTDefRegMap(@Self)^.val and $000000F0) shr 4;
  54475. end;
  54476. procedure TUSB_U1STAT.setENDPT0; inline;
  54477. begin
  54478. pTDefRegMap(@Self)^.&set := $00000010;
  54479. end;
  54480. procedure TUSB_U1STAT.clearENDPT0; inline;
  54481. begin
  54482. pTDefRegMap(@Self)^.clr := $00000010;
  54483. end;
  54484. procedure TUSB_U1STAT.setENDPT0(thebits : TBits_1); inline;
  54485. begin
  54486. if thebits = 0 then
  54487. pTDefRegMap(@Self)^.clr := $00000010
  54488. else
  54489. pTDefRegMap(@Self)^.&set := $00000010;
  54490. end;
  54491. function TUSB_U1STAT.getENDPT0 : TBits_1; inline;
  54492. begin
  54493. getENDPT0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  54494. end;
  54495. procedure TUSB_U1STAT.setENDPT1; inline;
  54496. begin
  54497. pTDefRegMap(@Self)^.&set := $00000020;
  54498. end;
  54499. procedure TUSB_U1STAT.clearENDPT1; inline;
  54500. begin
  54501. pTDefRegMap(@Self)^.clr := $00000020;
  54502. end;
  54503. procedure TUSB_U1STAT.setENDPT1(thebits : TBits_1); inline;
  54504. begin
  54505. if thebits = 0 then
  54506. pTDefRegMap(@Self)^.clr := $00000020
  54507. else
  54508. pTDefRegMap(@Self)^.&set := $00000020;
  54509. end;
  54510. function TUSB_U1STAT.getENDPT1 : TBits_1; inline;
  54511. begin
  54512. getENDPT1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  54513. end;
  54514. procedure TUSB_U1STAT.setENDPT2; inline;
  54515. begin
  54516. pTDefRegMap(@Self)^.&set := $00000040;
  54517. end;
  54518. procedure TUSB_U1STAT.clearENDPT2; inline;
  54519. begin
  54520. pTDefRegMap(@Self)^.clr := $00000040;
  54521. end;
  54522. procedure TUSB_U1STAT.setENDPT2(thebits : TBits_1); inline;
  54523. begin
  54524. if thebits = 0 then
  54525. pTDefRegMap(@Self)^.clr := $00000040
  54526. else
  54527. pTDefRegMap(@Self)^.&set := $00000040;
  54528. end;
  54529. function TUSB_U1STAT.getENDPT2 : TBits_1; inline;
  54530. begin
  54531. getENDPT2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  54532. end;
  54533. procedure TUSB_U1STAT.setENDPT3; inline;
  54534. begin
  54535. pTDefRegMap(@Self)^.&set := $00000080;
  54536. end;
  54537. procedure TUSB_U1STAT.clearENDPT3; inline;
  54538. begin
  54539. pTDefRegMap(@Self)^.clr := $00000080;
  54540. end;
  54541. procedure TUSB_U1STAT.setENDPT3(thebits : TBits_1); inline;
  54542. begin
  54543. if thebits = 0 then
  54544. pTDefRegMap(@Self)^.clr := $00000080
  54545. else
  54546. pTDefRegMap(@Self)^.&set := $00000080;
  54547. end;
  54548. function TUSB_U1STAT.getENDPT3 : TBits_1; inline;
  54549. begin
  54550. getENDPT3 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  54551. end;
  54552. procedure TUSB_U1CON.setUSBEN_SOFEN; inline;
  54553. begin
  54554. pTDefRegMap(@Self)^.&set := $00000001;
  54555. end;
  54556. procedure TUSB_U1CON.clearUSBEN_SOFEN; inline;
  54557. begin
  54558. pTDefRegMap(@Self)^.clr := $00000001;
  54559. end;
  54560. procedure TUSB_U1CON.setUSBEN_SOFEN(thebits : TBits_1); inline;
  54561. begin
  54562. if thebits = 0 then
  54563. pTDefRegMap(@Self)^.clr := $00000001
  54564. else
  54565. pTDefRegMap(@Self)^.&set := $00000001;
  54566. end;
  54567. function TUSB_U1CON.getUSBEN_SOFEN : TBits_1; inline;
  54568. begin
  54569. getUSBEN_SOFEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  54570. end;
  54571. procedure TUSB_U1CON.setPPBRST; inline;
  54572. begin
  54573. pTDefRegMap(@Self)^.&set := $00000002;
  54574. end;
  54575. procedure TUSB_U1CON.clearPPBRST; inline;
  54576. begin
  54577. pTDefRegMap(@Self)^.clr := $00000002;
  54578. end;
  54579. procedure TUSB_U1CON.setPPBRST(thebits : TBits_1); inline;
  54580. begin
  54581. if thebits = 0 then
  54582. pTDefRegMap(@Self)^.clr := $00000002
  54583. else
  54584. pTDefRegMap(@Self)^.&set := $00000002;
  54585. end;
  54586. function TUSB_U1CON.getPPBRST : TBits_1; inline;
  54587. begin
  54588. getPPBRST := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  54589. end;
  54590. procedure TUSB_U1CON.setRESUME; inline;
  54591. begin
  54592. pTDefRegMap(@Self)^.&set := $00000004;
  54593. end;
  54594. procedure TUSB_U1CON.clearRESUME; inline;
  54595. begin
  54596. pTDefRegMap(@Self)^.clr := $00000004;
  54597. end;
  54598. procedure TUSB_U1CON.setRESUME(thebits : TBits_1); inline;
  54599. begin
  54600. if thebits = 0 then
  54601. pTDefRegMap(@Self)^.clr := $00000004
  54602. else
  54603. pTDefRegMap(@Self)^.&set := $00000004;
  54604. end;
  54605. function TUSB_U1CON.getRESUME : TBits_1; inline;
  54606. begin
  54607. getRESUME := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  54608. end;
  54609. procedure TUSB_U1CON.setHOSTEN; inline;
  54610. begin
  54611. pTDefRegMap(@Self)^.&set := $00000008;
  54612. end;
  54613. procedure TUSB_U1CON.clearHOSTEN; inline;
  54614. begin
  54615. pTDefRegMap(@Self)^.clr := $00000008;
  54616. end;
  54617. procedure TUSB_U1CON.setHOSTEN(thebits : TBits_1); inline;
  54618. begin
  54619. if thebits = 0 then
  54620. pTDefRegMap(@Self)^.clr := $00000008
  54621. else
  54622. pTDefRegMap(@Self)^.&set := $00000008;
  54623. end;
  54624. function TUSB_U1CON.getHOSTEN : TBits_1; inline;
  54625. begin
  54626. getHOSTEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  54627. end;
  54628. procedure TUSB_U1CON.setUSBRST; inline;
  54629. begin
  54630. pTDefRegMap(@Self)^.&set := $00000010;
  54631. end;
  54632. procedure TUSB_U1CON.clearUSBRST; inline;
  54633. begin
  54634. pTDefRegMap(@Self)^.clr := $00000010;
  54635. end;
  54636. procedure TUSB_U1CON.setUSBRST(thebits : TBits_1); inline;
  54637. begin
  54638. if thebits = 0 then
  54639. pTDefRegMap(@Self)^.clr := $00000010
  54640. else
  54641. pTDefRegMap(@Self)^.&set := $00000010;
  54642. end;
  54643. function TUSB_U1CON.getUSBRST : TBits_1; inline;
  54644. begin
  54645. getUSBRST := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  54646. end;
  54647. procedure TUSB_U1CON.setPKTDIS_TOKBUSY; inline;
  54648. begin
  54649. pTDefRegMap(@Self)^.&set := $00000020;
  54650. end;
  54651. procedure TUSB_U1CON.clearPKTDIS_TOKBUSY; inline;
  54652. begin
  54653. pTDefRegMap(@Self)^.clr := $00000020;
  54654. end;
  54655. procedure TUSB_U1CON.setPKTDIS_TOKBUSY(thebits : TBits_1); inline;
  54656. begin
  54657. if thebits = 0 then
  54658. pTDefRegMap(@Self)^.clr := $00000020
  54659. else
  54660. pTDefRegMap(@Self)^.&set := $00000020;
  54661. end;
  54662. function TUSB_U1CON.getPKTDIS_TOKBUSY : TBits_1; inline;
  54663. begin
  54664. getPKTDIS_TOKBUSY := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  54665. end;
  54666. procedure TUSB_U1CON.setSE0; inline;
  54667. begin
  54668. pTDefRegMap(@Self)^.&set := $00000040;
  54669. end;
  54670. procedure TUSB_U1CON.clearSE0; inline;
  54671. begin
  54672. pTDefRegMap(@Self)^.clr := $00000040;
  54673. end;
  54674. procedure TUSB_U1CON.setSE0(thebits : TBits_1); inline;
  54675. begin
  54676. if thebits = 0 then
  54677. pTDefRegMap(@Self)^.clr := $00000040
  54678. else
  54679. pTDefRegMap(@Self)^.&set := $00000040;
  54680. end;
  54681. function TUSB_U1CON.getSE0 : TBits_1; inline;
  54682. begin
  54683. getSE0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  54684. end;
  54685. procedure TUSB_U1CON.setJSTATE; inline;
  54686. begin
  54687. pTDefRegMap(@Self)^.&set := $00000080;
  54688. end;
  54689. procedure TUSB_U1CON.clearJSTATE; inline;
  54690. begin
  54691. pTDefRegMap(@Self)^.clr := $00000080;
  54692. end;
  54693. procedure TUSB_U1CON.setJSTATE(thebits : TBits_1); inline;
  54694. begin
  54695. if thebits = 0 then
  54696. pTDefRegMap(@Self)^.clr := $00000080
  54697. else
  54698. pTDefRegMap(@Self)^.&set := $00000080;
  54699. end;
  54700. function TUSB_U1CON.getJSTATE : TBits_1; inline;
  54701. begin
  54702. getJSTATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  54703. end;
  54704. procedure TUSB_U1CON.setUSBEN; inline;
  54705. begin
  54706. pTDefRegMap(@Self)^.&set := $00000001;
  54707. end;
  54708. procedure TUSB_U1CON.clearUSBEN; inline;
  54709. begin
  54710. pTDefRegMap(@Self)^.clr := $00000001;
  54711. end;
  54712. procedure TUSB_U1CON.setUSBEN(thebits : TBits_1); inline;
  54713. begin
  54714. if thebits = 0 then
  54715. pTDefRegMap(@Self)^.clr := $00000001
  54716. else
  54717. pTDefRegMap(@Self)^.&set := $00000001;
  54718. end;
  54719. function TUSB_U1CON.getUSBEN : TBits_1; inline;
  54720. begin
  54721. getUSBEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  54722. end;
  54723. procedure TUSB_U1CON.setSOFEN; inline;
  54724. begin
  54725. pTDefRegMap(@Self)^.&set := $00000001;
  54726. end;
  54727. procedure TUSB_U1CON.clearSOFEN; inline;
  54728. begin
  54729. pTDefRegMap(@Self)^.clr := $00000001;
  54730. end;
  54731. procedure TUSB_U1CON.setSOFEN(thebits : TBits_1); inline;
  54732. begin
  54733. if thebits = 0 then
  54734. pTDefRegMap(@Self)^.clr := $00000001
  54735. else
  54736. pTDefRegMap(@Self)^.&set := $00000001;
  54737. end;
  54738. function TUSB_U1CON.getSOFEN : TBits_1; inline;
  54739. begin
  54740. getSOFEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  54741. end;
  54742. procedure TUSB_U1CON.setPKTDIS; inline;
  54743. begin
  54744. pTDefRegMap(@Self)^.&set := $00000020;
  54745. end;
  54746. procedure TUSB_U1CON.clearPKTDIS; inline;
  54747. begin
  54748. pTDefRegMap(@Self)^.clr := $00000020;
  54749. end;
  54750. procedure TUSB_U1CON.setPKTDIS(thebits : TBits_1); inline;
  54751. begin
  54752. if thebits = 0 then
  54753. pTDefRegMap(@Self)^.clr := $00000020
  54754. else
  54755. pTDefRegMap(@Self)^.&set := $00000020;
  54756. end;
  54757. function TUSB_U1CON.getPKTDIS : TBits_1; inline;
  54758. begin
  54759. getPKTDIS := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  54760. end;
  54761. procedure TUSB_U1CON.setTOKBUSY; inline;
  54762. begin
  54763. pTDefRegMap(@Self)^.&set := $00000020;
  54764. end;
  54765. procedure TUSB_U1CON.clearTOKBUSY; inline;
  54766. begin
  54767. pTDefRegMap(@Self)^.clr := $00000020;
  54768. end;
  54769. procedure TUSB_U1CON.setTOKBUSY(thebits : TBits_1); inline;
  54770. begin
  54771. if thebits = 0 then
  54772. pTDefRegMap(@Self)^.clr := $00000020
  54773. else
  54774. pTDefRegMap(@Self)^.&set := $00000020;
  54775. end;
  54776. function TUSB_U1CON.getTOKBUSY : TBits_1; inline;
  54777. begin
  54778. getTOKBUSY := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  54779. end;
  54780. procedure TUSB_U1ADDR.setDEVADDR(thebits : TBits_7); inline;
  54781. begin
  54782. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF80 or ( thebits shl 0 );
  54783. end;
  54784. function TUSB_U1ADDR.getDEVADDR : TBits_7; inline;
  54785. begin
  54786. getDEVADDR := (pTDefRegMap(@Self)^.val and $0000007F) shr 0;
  54787. end;
  54788. procedure TUSB_U1ADDR.setLSPDEN; inline;
  54789. begin
  54790. pTDefRegMap(@Self)^.&set := $00000080;
  54791. end;
  54792. procedure TUSB_U1ADDR.clearLSPDEN; inline;
  54793. begin
  54794. pTDefRegMap(@Self)^.clr := $00000080;
  54795. end;
  54796. procedure TUSB_U1ADDR.setLSPDEN(thebits : TBits_1); inline;
  54797. begin
  54798. if thebits = 0 then
  54799. pTDefRegMap(@Self)^.clr := $00000080
  54800. else
  54801. pTDefRegMap(@Self)^.&set := $00000080;
  54802. end;
  54803. function TUSB_U1ADDR.getLSPDEN : TBits_1; inline;
  54804. begin
  54805. getLSPDEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  54806. end;
  54807. procedure TUSB_U1ADDR.setDEVADDR0; inline;
  54808. begin
  54809. pTDefRegMap(@Self)^.&set := $00000001;
  54810. end;
  54811. procedure TUSB_U1ADDR.clearDEVADDR0; inline;
  54812. begin
  54813. pTDefRegMap(@Self)^.clr := $00000001;
  54814. end;
  54815. procedure TUSB_U1ADDR.setDEVADDR0(thebits : TBits_1); inline;
  54816. begin
  54817. if thebits = 0 then
  54818. pTDefRegMap(@Self)^.clr := $00000001
  54819. else
  54820. pTDefRegMap(@Self)^.&set := $00000001;
  54821. end;
  54822. function TUSB_U1ADDR.getDEVADDR0 : TBits_1; inline;
  54823. begin
  54824. getDEVADDR0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  54825. end;
  54826. procedure TUSB_U1ADDR.setDEVADDR1; inline;
  54827. begin
  54828. pTDefRegMap(@Self)^.&set := $00000002;
  54829. end;
  54830. procedure TUSB_U1ADDR.clearDEVADDR1; inline;
  54831. begin
  54832. pTDefRegMap(@Self)^.clr := $00000002;
  54833. end;
  54834. procedure TUSB_U1ADDR.setDEVADDR1(thebits : TBits_1); inline;
  54835. begin
  54836. if thebits = 0 then
  54837. pTDefRegMap(@Self)^.clr := $00000002
  54838. else
  54839. pTDefRegMap(@Self)^.&set := $00000002;
  54840. end;
  54841. function TUSB_U1ADDR.getDEVADDR1 : TBits_1; inline;
  54842. begin
  54843. getDEVADDR1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  54844. end;
  54845. procedure TUSB_U1ADDR.setDEVADDR2; inline;
  54846. begin
  54847. pTDefRegMap(@Self)^.&set := $00000004;
  54848. end;
  54849. procedure TUSB_U1ADDR.clearDEVADDR2; inline;
  54850. begin
  54851. pTDefRegMap(@Self)^.clr := $00000004;
  54852. end;
  54853. procedure TUSB_U1ADDR.setDEVADDR2(thebits : TBits_1); inline;
  54854. begin
  54855. if thebits = 0 then
  54856. pTDefRegMap(@Self)^.clr := $00000004
  54857. else
  54858. pTDefRegMap(@Self)^.&set := $00000004;
  54859. end;
  54860. function TUSB_U1ADDR.getDEVADDR2 : TBits_1; inline;
  54861. begin
  54862. getDEVADDR2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  54863. end;
  54864. procedure TUSB_U1ADDR.setDEVADDR3; inline;
  54865. begin
  54866. pTDefRegMap(@Self)^.&set := $00000008;
  54867. end;
  54868. procedure TUSB_U1ADDR.clearDEVADDR3; inline;
  54869. begin
  54870. pTDefRegMap(@Self)^.clr := $00000008;
  54871. end;
  54872. procedure TUSB_U1ADDR.setDEVADDR3(thebits : TBits_1); inline;
  54873. begin
  54874. if thebits = 0 then
  54875. pTDefRegMap(@Self)^.clr := $00000008
  54876. else
  54877. pTDefRegMap(@Self)^.&set := $00000008;
  54878. end;
  54879. function TUSB_U1ADDR.getDEVADDR3 : TBits_1; inline;
  54880. begin
  54881. getDEVADDR3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  54882. end;
  54883. procedure TUSB_U1ADDR.setDEVADDR4; inline;
  54884. begin
  54885. pTDefRegMap(@Self)^.&set := $00000010;
  54886. end;
  54887. procedure TUSB_U1ADDR.clearDEVADDR4; inline;
  54888. begin
  54889. pTDefRegMap(@Self)^.clr := $00000010;
  54890. end;
  54891. procedure TUSB_U1ADDR.setDEVADDR4(thebits : TBits_1); inline;
  54892. begin
  54893. if thebits = 0 then
  54894. pTDefRegMap(@Self)^.clr := $00000010
  54895. else
  54896. pTDefRegMap(@Self)^.&set := $00000010;
  54897. end;
  54898. function TUSB_U1ADDR.getDEVADDR4 : TBits_1; inline;
  54899. begin
  54900. getDEVADDR4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  54901. end;
  54902. procedure TUSB_U1ADDR.setDEVADDR5; inline;
  54903. begin
  54904. pTDefRegMap(@Self)^.&set := $00000020;
  54905. end;
  54906. procedure TUSB_U1ADDR.clearDEVADDR5; inline;
  54907. begin
  54908. pTDefRegMap(@Self)^.clr := $00000020;
  54909. end;
  54910. procedure TUSB_U1ADDR.setDEVADDR5(thebits : TBits_1); inline;
  54911. begin
  54912. if thebits = 0 then
  54913. pTDefRegMap(@Self)^.clr := $00000020
  54914. else
  54915. pTDefRegMap(@Self)^.&set := $00000020;
  54916. end;
  54917. function TUSB_U1ADDR.getDEVADDR5 : TBits_1; inline;
  54918. begin
  54919. getDEVADDR5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  54920. end;
  54921. procedure TUSB_U1ADDR.setDEVADDR6; inline;
  54922. begin
  54923. pTDefRegMap(@Self)^.&set := $00000040;
  54924. end;
  54925. procedure TUSB_U1ADDR.clearDEVADDR6; inline;
  54926. begin
  54927. pTDefRegMap(@Self)^.clr := $00000040;
  54928. end;
  54929. procedure TUSB_U1ADDR.setDEVADDR6(thebits : TBits_1); inline;
  54930. begin
  54931. if thebits = 0 then
  54932. pTDefRegMap(@Self)^.clr := $00000040
  54933. else
  54934. pTDefRegMap(@Self)^.&set := $00000040;
  54935. end;
  54936. function TUSB_U1ADDR.getDEVADDR6 : TBits_1; inline;
  54937. begin
  54938. getDEVADDR6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  54939. end;
  54940. procedure TUSB_U1FRML.setFRML(thebits : TBits_8); inline;
  54941. begin
  54942. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  54943. end;
  54944. function TUSB_U1FRML.getFRML : TBits_8; inline;
  54945. begin
  54946. getFRML := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  54947. end;
  54948. procedure TUSB_U1FRML.setFRM0; inline;
  54949. begin
  54950. pTDefRegMap(@Self)^.&set := $00000001;
  54951. end;
  54952. procedure TUSB_U1FRML.clearFRM0; inline;
  54953. begin
  54954. pTDefRegMap(@Self)^.clr := $00000001;
  54955. end;
  54956. procedure TUSB_U1FRML.setFRM0(thebits : TBits_1); inline;
  54957. begin
  54958. if thebits = 0 then
  54959. pTDefRegMap(@Self)^.clr := $00000001
  54960. else
  54961. pTDefRegMap(@Self)^.&set := $00000001;
  54962. end;
  54963. function TUSB_U1FRML.getFRM0 : TBits_1; inline;
  54964. begin
  54965. getFRM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  54966. end;
  54967. procedure TUSB_U1FRML.setFRM1; inline;
  54968. begin
  54969. pTDefRegMap(@Self)^.&set := $00000002;
  54970. end;
  54971. procedure TUSB_U1FRML.clearFRM1; inline;
  54972. begin
  54973. pTDefRegMap(@Self)^.clr := $00000002;
  54974. end;
  54975. procedure TUSB_U1FRML.setFRM1(thebits : TBits_1); inline;
  54976. begin
  54977. if thebits = 0 then
  54978. pTDefRegMap(@Self)^.clr := $00000002
  54979. else
  54980. pTDefRegMap(@Self)^.&set := $00000002;
  54981. end;
  54982. function TUSB_U1FRML.getFRM1 : TBits_1; inline;
  54983. begin
  54984. getFRM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  54985. end;
  54986. procedure TUSB_U1FRML.setFRM2; inline;
  54987. begin
  54988. pTDefRegMap(@Self)^.&set := $00000004;
  54989. end;
  54990. procedure TUSB_U1FRML.clearFRM2; inline;
  54991. begin
  54992. pTDefRegMap(@Self)^.clr := $00000004;
  54993. end;
  54994. procedure TUSB_U1FRML.setFRM2(thebits : TBits_1); inline;
  54995. begin
  54996. if thebits = 0 then
  54997. pTDefRegMap(@Self)^.clr := $00000004
  54998. else
  54999. pTDefRegMap(@Self)^.&set := $00000004;
  55000. end;
  55001. function TUSB_U1FRML.getFRM2 : TBits_1; inline;
  55002. begin
  55003. getFRM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  55004. end;
  55005. procedure TUSB_U1FRML.setFRM3; inline;
  55006. begin
  55007. pTDefRegMap(@Self)^.&set := $00000008;
  55008. end;
  55009. procedure TUSB_U1FRML.clearFRM3; inline;
  55010. begin
  55011. pTDefRegMap(@Self)^.clr := $00000008;
  55012. end;
  55013. procedure TUSB_U1FRML.setFRM3(thebits : TBits_1); inline;
  55014. begin
  55015. if thebits = 0 then
  55016. pTDefRegMap(@Self)^.clr := $00000008
  55017. else
  55018. pTDefRegMap(@Self)^.&set := $00000008;
  55019. end;
  55020. function TUSB_U1FRML.getFRM3 : TBits_1; inline;
  55021. begin
  55022. getFRM3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  55023. end;
  55024. procedure TUSB_U1FRML.setFRM4; inline;
  55025. begin
  55026. pTDefRegMap(@Self)^.&set := $00000010;
  55027. end;
  55028. procedure TUSB_U1FRML.clearFRM4; inline;
  55029. begin
  55030. pTDefRegMap(@Self)^.clr := $00000010;
  55031. end;
  55032. procedure TUSB_U1FRML.setFRM4(thebits : TBits_1); inline;
  55033. begin
  55034. if thebits = 0 then
  55035. pTDefRegMap(@Self)^.clr := $00000010
  55036. else
  55037. pTDefRegMap(@Self)^.&set := $00000010;
  55038. end;
  55039. function TUSB_U1FRML.getFRM4 : TBits_1; inline;
  55040. begin
  55041. getFRM4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  55042. end;
  55043. procedure TUSB_U1FRML.setFRM5; inline;
  55044. begin
  55045. pTDefRegMap(@Self)^.&set := $00000020;
  55046. end;
  55047. procedure TUSB_U1FRML.clearFRM5; inline;
  55048. begin
  55049. pTDefRegMap(@Self)^.clr := $00000020;
  55050. end;
  55051. procedure TUSB_U1FRML.setFRM5(thebits : TBits_1); inline;
  55052. begin
  55053. if thebits = 0 then
  55054. pTDefRegMap(@Self)^.clr := $00000020
  55055. else
  55056. pTDefRegMap(@Self)^.&set := $00000020;
  55057. end;
  55058. function TUSB_U1FRML.getFRM5 : TBits_1; inline;
  55059. begin
  55060. getFRM5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  55061. end;
  55062. procedure TUSB_U1FRML.setFRM6; inline;
  55063. begin
  55064. pTDefRegMap(@Self)^.&set := $00000040;
  55065. end;
  55066. procedure TUSB_U1FRML.clearFRM6; inline;
  55067. begin
  55068. pTDefRegMap(@Self)^.clr := $00000040;
  55069. end;
  55070. procedure TUSB_U1FRML.setFRM6(thebits : TBits_1); inline;
  55071. begin
  55072. if thebits = 0 then
  55073. pTDefRegMap(@Self)^.clr := $00000040
  55074. else
  55075. pTDefRegMap(@Self)^.&set := $00000040;
  55076. end;
  55077. function TUSB_U1FRML.getFRM6 : TBits_1; inline;
  55078. begin
  55079. getFRM6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  55080. end;
  55081. procedure TUSB_U1FRML.setFRM7; inline;
  55082. begin
  55083. pTDefRegMap(@Self)^.&set := $00000080;
  55084. end;
  55085. procedure TUSB_U1FRML.clearFRM7; inline;
  55086. begin
  55087. pTDefRegMap(@Self)^.clr := $00000080;
  55088. end;
  55089. procedure TUSB_U1FRML.setFRM7(thebits : TBits_1); inline;
  55090. begin
  55091. if thebits = 0 then
  55092. pTDefRegMap(@Self)^.clr := $00000080
  55093. else
  55094. pTDefRegMap(@Self)^.&set := $00000080;
  55095. end;
  55096. function TUSB_U1FRML.getFRM7 : TBits_1; inline;
  55097. begin
  55098. getFRM7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  55099. end;
  55100. procedure TUSB_U1FRMH.setFRMH(thebits : TBits_3); inline;
  55101. begin
  55102. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  55103. end;
  55104. function TUSB_U1FRMH.getFRMH : TBits_3; inline;
  55105. begin
  55106. getFRMH := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  55107. end;
  55108. procedure TUSB_U1FRMH.setFRM8; inline;
  55109. begin
  55110. pTDefRegMap(@Self)^.&set := $00000001;
  55111. end;
  55112. procedure TUSB_U1FRMH.clearFRM8; inline;
  55113. begin
  55114. pTDefRegMap(@Self)^.clr := $00000001;
  55115. end;
  55116. procedure TUSB_U1FRMH.setFRM8(thebits : TBits_1); inline;
  55117. begin
  55118. if thebits = 0 then
  55119. pTDefRegMap(@Self)^.clr := $00000001
  55120. else
  55121. pTDefRegMap(@Self)^.&set := $00000001;
  55122. end;
  55123. function TUSB_U1FRMH.getFRM8 : TBits_1; inline;
  55124. begin
  55125. getFRM8 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  55126. end;
  55127. procedure TUSB_U1FRMH.setFRM9; inline;
  55128. begin
  55129. pTDefRegMap(@Self)^.&set := $00000002;
  55130. end;
  55131. procedure TUSB_U1FRMH.clearFRM9; inline;
  55132. begin
  55133. pTDefRegMap(@Self)^.clr := $00000002;
  55134. end;
  55135. procedure TUSB_U1FRMH.setFRM9(thebits : TBits_1); inline;
  55136. begin
  55137. if thebits = 0 then
  55138. pTDefRegMap(@Self)^.clr := $00000002
  55139. else
  55140. pTDefRegMap(@Self)^.&set := $00000002;
  55141. end;
  55142. function TUSB_U1FRMH.getFRM9 : TBits_1; inline;
  55143. begin
  55144. getFRM9 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  55145. end;
  55146. procedure TUSB_U1FRMH.setFRM10; inline;
  55147. begin
  55148. pTDefRegMap(@Self)^.&set := $00000004;
  55149. end;
  55150. procedure TUSB_U1FRMH.clearFRM10; inline;
  55151. begin
  55152. pTDefRegMap(@Self)^.clr := $00000004;
  55153. end;
  55154. procedure TUSB_U1FRMH.setFRM10(thebits : TBits_1); inline;
  55155. begin
  55156. if thebits = 0 then
  55157. pTDefRegMap(@Self)^.clr := $00000004
  55158. else
  55159. pTDefRegMap(@Self)^.&set := $00000004;
  55160. end;
  55161. function TUSB_U1FRMH.getFRM10 : TBits_1; inline;
  55162. begin
  55163. getFRM10 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  55164. end;
  55165. procedure TUSB_U1TOK.setEP(thebits : TBits_4); inline;
  55166. begin
  55167. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  55168. end;
  55169. function TUSB_U1TOK.getEP : TBits_4; inline;
  55170. begin
  55171. getEP := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  55172. end;
  55173. procedure TUSB_U1TOK.setPID(thebits : TBits_4); inline;
  55174. begin
  55175. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF0F or ( thebits shl 4 );
  55176. end;
  55177. function TUSB_U1TOK.getPID : TBits_4; inline;
  55178. begin
  55179. getPID := (pTDefRegMap(@Self)^.val and $000000F0) shr 4;
  55180. end;
  55181. procedure TUSB_U1TOK.setEP0; inline;
  55182. begin
  55183. pTDefRegMap(@Self)^.&set := $00000001;
  55184. end;
  55185. procedure TUSB_U1TOK.clearEP0; inline;
  55186. begin
  55187. pTDefRegMap(@Self)^.clr := $00000001;
  55188. end;
  55189. procedure TUSB_U1TOK.setEP0(thebits : TBits_1); inline;
  55190. begin
  55191. if thebits = 0 then
  55192. pTDefRegMap(@Self)^.clr := $00000001
  55193. else
  55194. pTDefRegMap(@Self)^.&set := $00000001;
  55195. end;
  55196. function TUSB_U1TOK.getEP0 : TBits_1; inline;
  55197. begin
  55198. getEP0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  55199. end;
  55200. procedure TUSB_U1TOK.setEP1; inline;
  55201. begin
  55202. pTDefRegMap(@Self)^.&set := $00000002;
  55203. end;
  55204. procedure TUSB_U1TOK.clearEP1; inline;
  55205. begin
  55206. pTDefRegMap(@Self)^.clr := $00000002;
  55207. end;
  55208. procedure TUSB_U1TOK.setEP1(thebits : TBits_1); inline;
  55209. begin
  55210. if thebits = 0 then
  55211. pTDefRegMap(@Self)^.clr := $00000002
  55212. else
  55213. pTDefRegMap(@Self)^.&set := $00000002;
  55214. end;
  55215. function TUSB_U1TOK.getEP1 : TBits_1; inline;
  55216. begin
  55217. getEP1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  55218. end;
  55219. procedure TUSB_U1TOK.setEP2; inline;
  55220. begin
  55221. pTDefRegMap(@Self)^.&set := $00000004;
  55222. end;
  55223. procedure TUSB_U1TOK.clearEP2; inline;
  55224. begin
  55225. pTDefRegMap(@Self)^.clr := $00000004;
  55226. end;
  55227. procedure TUSB_U1TOK.setEP2(thebits : TBits_1); inline;
  55228. begin
  55229. if thebits = 0 then
  55230. pTDefRegMap(@Self)^.clr := $00000004
  55231. else
  55232. pTDefRegMap(@Self)^.&set := $00000004;
  55233. end;
  55234. function TUSB_U1TOK.getEP2 : TBits_1; inline;
  55235. begin
  55236. getEP2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  55237. end;
  55238. procedure TUSB_U1TOK.setEP3; inline;
  55239. begin
  55240. pTDefRegMap(@Self)^.&set := $00000008;
  55241. end;
  55242. procedure TUSB_U1TOK.clearEP3; inline;
  55243. begin
  55244. pTDefRegMap(@Self)^.clr := $00000008;
  55245. end;
  55246. procedure TUSB_U1TOK.setEP3(thebits : TBits_1); inline;
  55247. begin
  55248. if thebits = 0 then
  55249. pTDefRegMap(@Self)^.clr := $00000008
  55250. else
  55251. pTDefRegMap(@Self)^.&set := $00000008;
  55252. end;
  55253. function TUSB_U1TOK.getEP3 : TBits_1; inline;
  55254. begin
  55255. getEP3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  55256. end;
  55257. procedure TUSB_U1TOK.setPID0; inline;
  55258. begin
  55259. pTDefRegMap(@Self)^.&set := $00000010;
  55260. end;
  55261. procedure TUSB_U1TOK.clearPID0; inline;
  55262. begin
  55263. pTDefRegMap(@Self)^.clr := $00000010;
  55264. end;
  55265. procedure TUSB_U1TOK.setPID0(thebits : TBits_1); inline;
  55266. begin
  55267. if thebits = 0 then
  55268. pTDefRegMap(@Self)^.clr := $00000010
  55269. else
  55270. pTDefRegMap(@Self)^.&set := $00000010;
  55271. end;
  55272. function TUSB_U1TOK.getPID0 : TBits_1; inline;
  55273. begin
  55274. getPID0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  55275. end;
  55276. procedure TUSB_U1TOK.setPID1; inline;
  55277. begin
  55278. pTDefRegMap(@Self)^.&set := $00000020;
  55279. end;
  55280. procedure TUSB_U1TOK.clearPID1; inline;
  55281. begin
  55282. pTDefRegMap(@Self)^.clr := $00000020;
  55283. end;
  55284. procedure TUSB_U1TOK.setPID1(thebits : TBits_1); inline;
  55285. begin
  55286. if thebits = 0 then
  55287. pTDefRegMap(@Self)^.clr := $00000020
  55288. else
  55289. pTDefRegMap(@Self)^.&set := $00000020;
  55290. end;
  55291. function TUSB_U1TOK.getPID1 : TBits_1; inline;
  55292. begin
  55293. getPID1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  55294. end;
  55295. procedure TUSB_U1TOK.setPID2; inline;
  55296. begin
  55297. pTDefRegMap(@Self)^.&set := $00000040;
  55298. end;
  55299. procedure TUSB_U1TOK.clearPID2; inline;
  55300. begin
  55301. pTDefRegMap(@Self)^.clr := $00000040;
  55302. end;
  55303. procedure TUSB_U1TOK.setPID2(thebits : TBits_1); inline;
  55304. begin
  55305. if thebits = 0 then
  55306. pTDefRegMap(@Self)^.clr := $00000040
  55307. else
  55308. pTDefRegMap(@Self)^.&set := $00000040;
  55309. end;
  55310. function TUSB_U1TOK.getPID2 : TBits_1; inline;
  55311. begin
  55312. getPID2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  55313. end;
  55314. procedure TUSB_U1TOK.setPID3; inline;
  55315. begin
  55316. pTDefRegMap(@Self)^.&set := $00000080;
  55317. end;
  55318. procedure TUSB_U1TOK.clearPID3; inline;
  55319. begin
  55320. pTDefRegMap(@Self)^.clr := $00000080;
  55321. end;
  55322. procedure TUSB_U1TOK.setPID3(thebits : TBits_1); inline;
  55323. begin
  55324. if thebits = 0 then
  55325. pTDefRegMap(@Self)^.clr := $00000080
  55326. else
  55327. pTDefRegMap(@Self)^.&set := $00000080;
  55328. end;
  55329. function TUSB_U1TOK.getPID3 : TBits_1; inline;
  55330. begin
  55331. getPID3 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  55332. end;
  55333. procedure TPORTB_TRISB.setTRISB0; inline;
  55334. begin
  55335. pTDefRegMap(@Self)^.&set := $00000001;
  55336. end;
  55337. procedure TPORTB_TRISB.clearTRISB0; inline;
  55338. begin
  55339. pTDefRegMap(@Self)^.clr := $00000001;
  55340. end;
  55341. procedure TPORTB_TRISB.setTRISB0(thebits : TBits_1); inline;
  55342. begin
  55343. if thebits = 0 then
  55344. pTDefRegMap(@Self)^.clr := $00000001
  55345. else
  55346. pTDefRegMap(@Self)^.&set := $00000001;
  55347. end;
  55348. function TPORTB_TRISB.getTRISB0 : TBits_1; inline;
  55349. begin
  55350. getTRISB0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  55351. end;
  55352. procedure TPORTB_TRISB.setTRISB1; inline;
  55353. begin
  55354. pTDefRegMap(@Self)^.&set := $00000002;
  55355. end;
  55356. procedure TPORTB_TRISB.clearTRISB1; inline;
  55357. begin
  55358. pTDefRegMap(@Self)^.clr := $00000002;
  55359. end;
  55360. procedure TPORTB_TRISB.setTRISB1(thebits : TBits_1); inline;
  55361. begin
  55362. if thebits = 0 then
  55363. pTDefRegMap(@Self)^.clr := $00000002
  55364. else
  55365. pTDefRegMap(@Self)^.&set := $00000002;
  55366. end;
  55367. function TPORTB_TRISB.getTRISB1 : TBits_1; inline;
  55368. begin
  55369. getTRISB1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  55370. end;
  55371. procedure TPORTB_TRISB.setTRISB2; inline;
  55372. begin
  55373. pTDefRegMap(@Self)^.&set := $00000004;
  55374. end;
  55375. procedure TPORTB_TRISB.clearTRISB2; inline;
  55376. begin
  55377. pTDefRegMap(@Self)^.clr := $00000004;
  55378. end;
  55379. procedure TPORTB_TRISB.setTRISB2(thebits : TBits_1); inline;
  55380. begin
  55381. if thebits = 0 then
  55382. pTDefRegMap(@Self)^.clr := $00000004
  55383. else
  55384. pTDefRegMap(@Self)^.&set := $00000004;
  55385. end;
  55386. function TPORTB_TRISB.getTRISB2 : TBits_1; inline;
  55387. begin
  55388. getTRISB2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  55389. end;
  55390. procedure TPORTB_TRISB.setTRISB3; inline;
  55391. begin
  55392. pTDefRegMap(@Self)^.&set := $00000008;
  55393. end;
  55394. procedure TPORTB_TRISB.clearTRISB3; inline;
  55395. begin
  55396. pTDefRegMap(@Self)^.clr := $00000008;
  55397. end;
  55398. procedure TPORTB_TRISB.setTRISB3(thebits : TBits_1); inline;
  55399. begin
  55400. if thebits = 0 then
  55401. pTDefRegMap(@Self)^.clr := $00000008
  55402. else
  55403. pTDefRegMap(@Self)^.&set := $00000008;
  55404. end;
  55405. function TPORTB_TRISB.getTRISB3 : TBits_1; inline;
  55406. begin
  55407. getTRISB3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  55408. end;
  55409. procedure TPORTB_TRISB.setTRISB4; inline;
  55410. begin
  55411. pTDefRegMap(@Self)^.&set := $00000010;
  55412. end;
  55413. procedure TPORTB_TRISB.clearTRISB4; inline;
  55414. begin
  55415. pTDefRegMap(@Self)^.clr := $00000010;
  55416. end;
  55417. procedure TPORTB_TRISB.setTRISB4(thebits : TBits_1); inline;
  55418. begin
  55419. if thebits = 0 then
  55420. pTDefRegMap(@Self)^.clr := $00000010
  55421. else
  55422. pTDefRegMap(@Self)^.&set := $00000010;
  55423. end;
  55424. function TPORTB_TRISB.getTRISB4 : TBits_1; inline;
  55425. begin
  55426. getTRISB4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  55427. end;
  55428. procedure TPORTB_TRISB.setTRISB5; inline;
  55429. begin
  55430. pTDefRegMap(@Self)^.&set := $00000020;
  55431. end;
  55432. procedure TPORTB_TRISB.clearTRISB5; inline;
  55433. begin
  55434. pTDefRegMap(@Self)^.clr := $00000020;
  55435. end;
  55436. procedure TPORTB_TRISB.setTRISB5(thebits : TBits_1); inline;
  55437. begin
  55438. if thebits = 0 then
  55439. pTDefRegMap(@Self)^.clr := $00000020
  55440. else
  55441. pTDefRegMap(@Self)^.&set := $00000020;
  55442. end;
  55443. function TPORTB_TRISB.getTRISB5 : TBits_1; inline;
  55444. begin
  55445. getTRISB5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  55446. end;
  55447. procedure TPORTB_TRISB.setTRISB6; inline;
  55448. begin
  55449. pTDefRegMap(@Self)^.&set := $00000040;
  55450. end;
  55451. procedure TPORTB_TRISB.clearTRISB6; inline;
  55452. begin
  55453. pTDefRegMap(@Self)^.clr := $00000040;
  55454. end;
  55455. procedure TPORTB_TRISB.setTRISB6(thebits : TBits_1); inline;
  55456. begin
  55457. if thebits = 0 then
  55458. pTDefRegMap(@Self)^.clr := $00000040
  55459. else
  55460. pTDefRegMap(@Self)^.&set := $00000040;
  55461. end;
  55462. function TPORTB_TRISB.getTRISB6 : TBits_1; inline;
  55463. begin
  55464. getTRISB6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  55465. end;
  55466. procedure TPORTB_TRISB.setTRISB7; inline;
  55467. begin
  55468. pTDefRegMap(@Self)^.&set := $00000080;
  55469. end;
  55470. procedure TPORTB_TRISB.clearTRISB7; inline;
  55471. begin
  55472. pTDefRegMap(@Self)^.clr := $00000080;
  55473. end;
  55474. procedure TPORTB_TRISB.setTRISB7(thebits : TBits_1); inline;
  55475. begin
  55476. if thebits = 0 then
  55477. pTDefRegMap(@Self)^.clr := $00000080
  55478. else
  55479. pTDefRegMap(@Self)^.&set := $00000080;
  55480. end;
  55481. function TPORTB_TRISB.getTRISB7 : TBits_1; inline;
  55482. begin
  55483. getTRISB7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  55484. end;
  55485. procedure TPORTB_TRISB.setTRISB8; inline;
  55486. begin
  55487. pTDefRegMap(@Self)^.&set := $00000100;
  55488. end;
  55489. procedure TPORTB_TRISB.clearTRISB8; inline;
  55490. begin
  55491. pTDefRegMap(@Self)^.clr := $00000100;
  55492. end;
  55493. procedure TPORTB_TRISB.setTRISB8(thebits : TBits_1); inline;
  55494. begin
  55495. if thebits = 0 then
  55496. pTDefRegMap(@Self)^.clr := $00000100
  55497. else
  55498. pTDefRegMap(@Self)^.&set := $00000100;
  55499. end;
  55500. function TPORTB_TRISB.getTRISB8 : TBits_1; inline;
  55501. begin
  55502. getTRISB8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  55503. end;
  55504. procedure TPORTB_TRISB.setTRISB9; inline;
  55505. begin
  55506. pTDefRegMap(@Self)^.&set := $00000200;
  55507. end;
  55508. procedure TPORTB_TRISB.clearTRISB9; inline;
  55509. begin
  55510. pTDefRegMap(@Self)^.clr := $00000200;
  55511. end;
  55512. procedure TPORTB_TRISB.setTRISB9(thebits : TBits_1); inline;
  55513. begin
  55514. if thebits = 0 then
  55515. pTDefRegMap(@Self)^.clr := $00000200
  55516. else
  55517. pTDefRegMap(@Self)^.&set := $00000200;
  55518. end;
  55519. function TPORTB_TRISB.getTRISB9 : TBits_1; inline;
  55520. begin
  55521. getTRISB9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  55522. end;
  55523. procedure TPORTB_TRISB.setTRISB10; inline;
  55524. begin
  55525. pTDefRegMap(@Self)^.&set := $00000400;
  55526. end;
  55527. procedure TPORTB_TRISB.clearTRISB10; inline;
  55528. begin
  55529. pTDefRegMap(@Self)^.clr := $00000400;
  55530. end;
  55531. procedure TPORTB_TRISB.setTRISB10(thebits : TBits_1); inline;
  55532. begin
  55533. if thebits = 0 then
  55534. pTDefRegMap(@Self)^.clr := $00000400
  55535. else
  55536. pTDefRegMap(@Self)^.&set := $00000400;
  55537. end;
  55538. function TPORTB_TRISB.getTRISB10 : TBits_1; inline;
  55539. begin
  55540. getTRISB10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  55541. end;
  55542. procedure TPORTB_TRISB.setTRISB11; inline;
  55543. begin
  55544. pTDefRegMap(@Self)^.&set := $00000800;
  55545. end;
  55546. procedure TPORTB_TRISB.clearTRISB11; inline;
  55547. begin
  55548. pTDefRegMap(@Self)^.clr := $00000800;
  55549. end;
  55550. procedure TPORTB_TRISB.setTRISB11(thebits : TBits_1); inline;
  55551. begin
  55552. if thebits = 0 then
  55553. pTDefRegMap(@Self)^.clr := $00000800
  55554. else
  55555. pTDefRegMap(@Self)^.&set := $00000800;
  55556. end;
  55557. function TPORTB_TRISB.getTRISB11 : TBits_1; inline;
  55558. begin
  55559. getTRISB11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  55560. end;
  55561. procedure TPORTB_TRISB.setTRISB12; inline;
  55562. begin
  55563. pTDefRegMap(@Self)^.&set := $00001000;
  55564. end;
  55565. procedure TPORTB_TRISB.clearTRISB12; inline;
  55566. begin
  55567. pTDefRegMap(@Self)^.clr := $00001000;
  55568. end;
  55569. procedure TPORTB_TRISB.setTRISB12(thebits : TBits_1); inline;
  55570. begin
  55571. if thebits = 0 then
  55572. pTDefRegMap(@Self)^.clr := $00001000
  55573. else
  55574. pTDefRegMap(@Self)^.&set := $00001000;
  55575. end;
  55576. function TPORTB_TRISB.getTRISB12 : TBits_1; inline;
  55577. begin
  55578. getTRISB12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  55579. end;
  55580. procedure TPORTB_TRISB.setTRISB13; inline;
  55581. begin
  55582. pTDefRegMap(@Self)^.&set := $00002000;
  55583. end;
  55584. procedure TPORTB_TRISB.clearTRISB13; inline;
  55585. begin
  55586. pTDefRegMap(@Self)^.clr := $00002000;
  55587. end;
  55588. procedure TPORTB_TRISB.setTRISB13(thebits : TBits_1); inline;
  55589. begin
  55590. if thebits = 0 then
  55591. pTDefRegMap(@Self)^.clr := $00002000
  55592. else
  55593. pTDefRegMap(@Self)^.&set := $00002000;
  55594. end;
  55595. function TPORTB_TRISB.getTRISB13 : TBits_1; inline;
  55596. begin
  55597. getTRISB13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  55598. end;
  55599. procedure TPORTB_TRISB.setTRISB14; inline;
  55600. begin
  55601. pTDefRegMap(@Self)^.&set := $00004000;
  55602. end;
  55603. procedure TPORTB_TRISB.clearTRISB14; inline;
  55604. begin
  55605. pTDefRegMap(@Self)^.clr := $00004000;
  55606. end;
  55607. procedure TPORTB_TRISB.setTRISB14(thebits : TBits_1); inline;
  55608. begin
  55609. if thebits = 0 then
  55610. pTDefRegMap(@Self)^.clr := $00004000
  55611. else
  55612. pTDefRegMap(@Self)^.&set := $00004000;
  55613. end;
  55614. function TPORTB_TRISB.getTRISB14 : TBits_1; inline;
  55615. begin
  55616. getTRISB14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  55617. end;
  55618. procedure TPORTB_TRISB.setTRISB15; inline;
  55619. begin
  55620. pTDefRegMap(@Self)^.&set := $00008000;
  55621. end;
  55622. procedure TPORTB_TRISB.clearTRISB15; inline;
  55623. begin
  55624. pTDefRegMap(@Self)^.clr := $00008000;
  55625. end;
  55626. procedure TPORTB_TRISB.setTRISB15(thebits : TBits_1); inline;
  55627. begin
  55628. if thebits = 0 then
  55629. pTDefRegMap(@Self)^.clr := $00008000
  55630. else
  55631. pTDefRegMap(@Self)^.&set := $00008000;
  55632. end;
  55633. function TPORTB_TRISB.getTRISB15 : TBits_1; inline;
  55634. begin
  55635. getTRISB15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  55636. end;
  55637. procedure TPORTB_TRISB.setw(thebits : TBits_32); inline;
  55638. begin
  55639. pTDefRegMap(@Self)^.val := thebits;
  55640. end;
  55641. function TPORTB_TRISB.getw : TBits_32; inline;
  55642. begin
  55643. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  55644. end;
  55645. procedure TPORTB_PORTB.setRB0; inline;
  55646. begin
  55647. pTDefRegMap(@Self)^.&set := $00000001;
  55648. end;
  55649. procedure TPORTB_PORTB.clearRB0; inline;
  55650. begin
  55651. pTDefRegMap(@Self)^.clr := $00000001;
  55652. end;
  55653. procedure TPORTB_PORTB.setRB0(thebits : TBits_1); inline;
  55654. begin
  55655. if thebits = 0 then
  55656. pTDefRegMap(@Self)^.clr := $00000001
  55657. else
  55658. pTDefRegMap(@Self)^.&set := $00000001;
  55659. end;
  55660. function TPORTB_PORTB.getRB0 : TBits_1; inline;
  55661. begin
  55662. getRB0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  55663. end;
  55664. procedure TPORTB_PORTB.setRB1; inline;
  55665. begin
  55666. pTDefRegMap(@Self)^.&set := $00000002;
  55667. end;
  55668. procedure TPORTB_PORTB.clearRB1; inline;
  55669. begin
  55670. pTDefRegMap(@Self)^.clr := $00000002;
  55671. end;
  55672. procedure TPORTB_PORTB.setRB1(thebits : TBits_1); inline;
  55673. begin
  55674. if thebits = 0 then
  55675. pTDefRegMap(@Self)^.clr := $00000002
  55676. else
  55677. pTDefRegMap(@Self)^.&set := $00000002;
  55678. end;
  55679. function TPORTB_PORTB.getRB1 : TBits_1; inline;
  55680. begin
  55681. getRB1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  55682. end;
  55683. procedure TPORTB_PORTB.setRB2; inline;
  55684. begin
  55685. pTDefRegMap(@Self)^.&set := $00000004;
  55686. end;
  55687. procedure TPORTB_PORTB.clearRB2; inline;
  55688. begin
  55689. pTDefRegMap(@Self)^.clr := $00000004;
  55690. end;
  55691. procedure TPORTB_PORTB.setRB2(thebits : TBits_1); inline;
  55692. begin
  55693. if thebits = 0 then
  55694. pTDefRegMap(@Self)^.clr := $00000004
  55695. else
  55696. pTDefRegMap(@Self)^.&set := $00000004;
  55697. end;
  55698. function TPORTB_PORTB.getRB2 : TBits_1; inline;
  55699. begin
  55700. getRB2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  55701. end;
  55702. procedure TPORTB_PORTB.setRB3; inline;
  55703. begin
  55704. pTDefRegMap(@Self)^.&set := $00000008;
  55705. end;
  55706. procedure TPORTB_PORTB.clearRB3; inline;
  55707. begin
  55708. pTDefRegMap(@Self)^.clr := $00000008;
  55709. end;
  55710. procedure TPORTB_PORTB.setRB3(thebits : TBits_1); inline;
  55711. begin
  55712. if thebits = 0 then
  55713. pTDefRegMap(@Self)^.clr := $00000008
  55714. else
  55715. pTDefRegMap(@Self)^.&set := $00000008;
  55716. end;
  55717. function TPORTB_PORTB.getRB3 : TBits_1; inline;
  55718. begin
  55719. getRB3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  55720. end;
  55721. procedure TPORTB_PORTB.setRB4; inline;
  55722. begin
  55723. pTDefRegMap(@Self)^.&set := $00000010;
  55724. end;
  55725. procedure TPORTB_PORTB.clearRB4; inline;
  55726. begin
  55727. pTDefRegMap(@Self)^.clr := $00000010;
  55728. end;
  55729. procedure TPORTB_PORTB.setRB4(thebits : TBits_1); inline;
  55730. begin
  55731. if thebits = 0 then
  55732. pTDefRegMap(@Self)^.clr := $00000010
  55733. else
  55734. pTDefRegMap(@Self)^.&set := $00000010;
  55735. end;
  55736. function TPORTB_PORTB.getRB4 : TBits_1; inline;
  55737. begin
  55738. getRB4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  55739. end;
  55740. procedure TPORTB_PORTB.setRB5; inline;
  55741. begin
  55742. pTDefRegMap(@Self)^.&set := $00000020;
  55743. end;
  55744. procedure TPORTB_PORTB.clearRB5; inline;
  55745. begin
  55746. pTDefRegMap(@Self)^.clr := $00000020;
  55747. end;
  55748. procedure TPORTB_PORTB.setRB5(thebits : TBits_1); inline;
  55749. begin
  55750. if thebits = 0 then
  55751. pTDefRegMap(@Self)^.clr := $00000020
  55752. else
  55753. pTDefRegMap(@Self)^.&set := $00000020;
  55754. end;
  55755. function TPORTB_PORTB.getRB5 : TBits_1; inline;
  55756. begin
  55757. getRB5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  55758. end;
  55759. procedure TPORTB_PORTB.setRB6; inline;
  55760. begin
  55761. pTDefRegMap(@Self)^.&set := $00000040;
  55762. end;
  55763. procedure TPORTB_PORTB.clearRB6; inline;
  55764. begin
  55765. pTDefRegMap(@Self)^.clr := $00000040;
  55766. end;
  55767. procedure TPORTB_PORTB.setRB6(thebits : TBits_1); inline;
  55768. begin
  55769. if thebits = 0 then
  55770. pTDefRegMap(@Self)^.clr := $00000040
  55771. else
  55772. pTDefRegMap(@Self)^.&set := $00000040;
  55773. end;
  55774. function TPORTB_PORTB.getRB6 : TBits_1; inline;
  55775. begin
  55776. getRB6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  55777. end;
  55778. procedure TPORTB_PORTB.setRB7; inline;
  55779. begin
  55780. pTDefRegMap(@Self)^.&set := $00000080;
  55781. end;
  55782. procedure TPORTB_PORTB.clearRB7; inline;
  55783. begin
  55784. pTDefRegMap(@Self)^.clr := $00000080;
  55785. end;
  55786. procedure TPORTB_PORTB.setRB7(thebits : TBits_1); inline;
  55787. begin
  55788. if thebits = 0 then
  55789. pTDefRegMap(@Self)^.clr := $00000080
  55790. else
  55791. pTDefRegMap(@Self)^.&set := $00000080;
  55792. end;
  55793. function TPORTB_PORTB.getRB7 : TBits_1; inline;
  55794. begin
  55795. getRB7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  55796. end;
  55797. procedure TPORTB_PORTB.setRB8; inline;
  55798. begin
  55799. pTDefRegMap(@Self)^.&set := $00000100;
  55800. end;
  55801. procedure TPORTB_PORTB.clearRB8; inline;
  55802. begin
  55803. pTDefRegMap(@Self)^.clr := $00000100;
  55804. end;
  55805. procedure TPORTB_PORTB.setRB8(thebits : TBits_1); inline;
  55806. begin
  55807. if thebits = 0 then
  55808. pTDefRegMap(@Self)^.clr := $00000100
  55809. else
  55810. pTDefRegMap(@Self)^.&set := $00000100;
  55811. end;
  55812. function TPORTB_PORTB.getRB8 : TBits_1; inline;
  55813. begin
  55814. getRB8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  55815. end;
  55816. procedure TPORTB_PORTB.setRB9; inline;
  55817. begin
  55818. pTDefRegMap(@Self)^.&set := $00000200;
  55819. end;
  55820. procedure TPORTB_PORTB.clearRB9; inline;
  55821. begin
  55822. pTDefRegMap(@Self)^.clr := $00000200;
  55823. end;
  55824. procedure TPORTB_PORTB.setRB9(thebits : TBits_1); inline;
  55825. begin
  55826. if thebits = 0 then
  55827. pTDefRegMap(@Self)^.clr := $00000200
  55828. else
  55829. pTDefRegMap(@Self)^.&set := $00000200;
  55830. end;
  55831. function TPORTB_PORTB.getRB9 : TBits_1; inline;
  55832. begin
  55833. getRB9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  55834. end;
  55835. procedure TPORTB_PORTB.setRB10; inline;
  55836. begin
  55837. pTDefRegMap(@Self)^.&set := $00000400;
  55838. end;
  55839. procedure TPORTB_PORTB.clearRB10; inline;
  55840. begin
  55841. pTDefRegMap(@Self)^.clr := $00000400;
  55842. end;
  55843. procedure TPORTB_PORTB.setRB10(thebits : TBits_1); inline;
  55844. begin
  55845. if thebits = 0 then
  55846. pTDefRegMap(@Self)^.clr := $00000400
  55847. else
  55848. pTDefRegMap(@Self)^.&set := $00000400;
  55849. end;
  55850. function TPORTB_PORTB.getRB10 : TBits_1; inline;
  55851. begin
  55852. getRB10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  55853. end;
  55854. procedure TPORTB_PORTB.setRB11; inline;
  55855. begin
  55856. pTDefRegMap(@Self)^.&set := $00000800;
  55857. end;
  55858. procedure TPORTB_PORTB.clearRB11; inline;
  55859. begin
  55860. pTDefRegMap(@Self)^.clr := $00000800;
  55861. end;
  55862. procedure TPORTB_PORTB.setRB11(thebits : TBits_1); inline;
  55863. begin
  55864. if thebits = 0 then
  55865. pTDefRegMap(@Self)^.clr := $00000800
  55866. else
  55867. pTDefRegMap(@Self)^.&set := $00000800;
  55868. end;
  55869. function TPORTB_PORTB.getRB11 : TBits_1; inline;
  55870. begin
  55871. getRB11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  55872. end;
  55873. procedure TPORTB_PORTB.setRB12; inline;
  55874. begin
  55875. pTDefRegMap(@Self)^.&set := $00001000;
  55876. end;
  55877. procedure TPORTB_PORTB.clearRB12; inline;
  55878. begin
  55879. pTDefRegMap(@Self)^.clr := $00001000;
  55880. end;
  55881. procedure TPORTB_PORTB.setRB12(thebits : TBits_1); inline;
  55882. begin
  55883. if thebits = 0 then
  55884. pTDefRegMap(@Self)^.clr := $00001000
  55885. else
  55886. pTDefRegMap(@Self)^.&set := $00001000;
  55887. end;
  55888. function TPORTB_PORTB.getRB12 : TBits_1; inline;
  55889. begin
  55890. getRB12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  55891. end;
  55892. procedure TPORTB_PORTB.setRB13; inline;
  55893. begin
  55894. pTDefRegMap(@Self)^.&set := $00002000;
  55895. end;
  55896. procedure TPORTB_PORTB.clearRB13; inline;
  55897. begin
  55898. pTDefRegMap(@Self)^.clr := $00002000;
  55899. end;
  55900. procedure TPORTB_PORTB.setRB13(thebits : TBits_1); inline;
  55901. begin
  55902. if thebits = 0 then
  55903. pTDefRegMap(@Self)^.clr := $00002000
  55904. else
  55905. pTDefRegMap(@Self)^.&set := $00002000;
  55906. end;
  55907. function TPORTB_PORTB.getRB13 : TBits_1; inline;
  55908. begin
  55909. getRB13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  55910. end;
  55911. procedure TPORTB_PORTB.setRB14; inline;
  55912. begin
  55913. pTDefRegMap(@Self)^.&set := $00004000;
  55914. end;
  55915. procedure TPORTB_PORTB.clearRB14; inline;
  55916. begin
  55917. pTDefRegMap(@Self)^.clr := $00004000;
  55918. end;
  55919. procedure TPORTB_PORTB.setRB14(thebits : TBits_1); inline;
  55920. begin
  55921. if thebits = 0 then
  55922. pTDefRegMap(@Self)^.clr := $00004000
  55923. else
  55924. pTDefRegMap(@Self)^.&set := $00004000;
  55925. end;
  55926. function TPORTB_PORTB.getRB14 : TBits_1; inline;
  55927. begin
  55928. getRB14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  55929. end;
  55930. procedure TPORTB_PORTB.setRB15; inline;
  55931. begin
  55932. pTDefRegMap(@Self)^.&set := $00008000;
  55933. end;
  55934. procedure TPORTB_PORTB.clearRB15; inline;
  55935. begin
  55936. pTDefRegMap(@Self)^.clr := $00008000;
  55937. end;
  55938. procedure TPORTB_PORTB.setRB15(thebits : TBits_1); inline;
  55939. begin
  55940. if thebits = 0 then
  55941. pTDefRegMap(@Self)^.clr := $00008000
  55942. else
  55943. pTDefRegMap(@Self)^.&set := $00008000;
  55944. end;
  55945. function TPORTB_PORTB.getRB15 : TBits_1; inline;
  55946. begin
  55947. getRB15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  55948. end;
  55949. procedure TPORTB_PORTB.setw(thebits : TBits_32); inline;
  55950. begin
  55951. pTDefRegMap(@Self)^.val := thebits;
  55952. end;
  55953. function TPORTB_PORTB.getw : TBits_32; inline;
  55954. begin
  55955. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  55956. end;
  55957. procedure TPORTB_LATB.setLATB0; inline;
  55958. begin
  55959. pTDefRegMap(@Self)^.&set := $00000001;
  55960. end;
  55961. procedure TPORTB_LATB.clearLATB0; inline;
  55962. begin
  55963. pTDefRegMap(@Self)^.clr := $00000001;
  55964. end;
  55965. procedure TPORTB_LATB.setLATB0(thebits : TBits_1); inline;
  55966. begin
  55967. if thebits = 0 then
  55968. pTDefRegMap(@Self)^.clr := $00000001
  55969. else
  55970. pTDefRegMap(@Self)^.&set := $00000001;
  55971. end;
  55972. function TPORTB_LATB.getLATB0 : TBits_1; inline;
  55973. begin
  55974. getLATB0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  55975. end;
  55976. procedure TPORTB_LATB.setLATB1; inline;
  55977. begin
  55978. pTDefRegMap(@Self)^.&set := $00000002;
  55979. end;
  55980. procedure TPORTB_LATB.clearLATB1; inline;
  55981. begin
  55982. pTDefRegMap(@Self)^.clr := $00000002;
  55983. end;
  55984. procedure TPORTB_LATB.setLATB1(thebits : TBits_1); inline;
  55985. begin
  55986. if thebits = 0 then
  55987. pTDefRegMap(@Self)^.clr := $00000002
  55988. else
  55989. pTDefRegMap(@Self)^.&set := $00000002;
  55990. end;
  55991. function TPORTB_LATB.getLATB1 : TBits_1; inline;
  55992. begin
  55993. getLATB1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  55994. end;
  55995. procedure TPORTB_LATB.setLATB2; inline;
  55996. begin
  55997. pTDefRegMap(@Self)^.&set := $00000004;
  55998. end;
  55999. procedure TPORTB_LATB.clearLATB2; inline;
  56000. begin
  56001. pTDefRegMap(@Self)^.clr := $00000004;
  56002. end;
  56003. procedure TPORTB_LATB.setLATB2(thebits : TBits_1); inline;
  56004. begin
  56005. if thebits = 0 then
  56006. pTDefRegMap(@Self)^.clr := $00000004
  56007. else
  56008. pTDefRegMap(@Self)^.&set := $00000004;
  56009. end;
  56010. function TPORTB_LATB.getLATB2 : TBits_1; inline;
  56011. begin
  56012. getLATB2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  56013. end;
  56014. procedure TPORTB_LATB.setLATB3; inline;
  56015. begin
  56016. pTDefRegMap(@Self)^.&set := $00000008;
  56017. end;
  56018. procedure TPORTB_LATB.clearLATB3; inline;
  56019. begin
  56020. pTDefRegMap(@Self)^.clr := $00000008;
  56021. end;
  56022. procedure TPORTB_LATB.setLATB3(thebits : TBits_1); inline;
  56023. begin
  56024. if thebits = 0 then
  56025. pTDefRegMap(@Self)^.clr := $00000008
  56026. else
  56027. pTDefRegMap(@Self)^.&set := $00000008;
  56028. end;
  56029. function TPORTB_LATB.getLATB3 : TBits_1; inline;
  56030. begin
  56031. getLATB3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  56032. end;
  56033. procedure TPORTB_LATB.setLATB4; inline;
  56034. begin
  56035. pTDefRegMap(@Self)^.&set := $00000010;
  56036. end;
  56037. procedure TPORTB_LATB.clearLATB4; inline;
  56038. begin
  56039. pTDefRegMap(@Self)^.clr := $00000010;
  56040. end;
  56041. procedure TPORTB_LATB.setLATB4(thebits : TBits_1); inline;
  56042. begin
  56043. if thebits = 0 then
  56044. pTDefRegMap(@Self)^.clr := $00000010
  56045. else
  56046. pTDefRegMap(@Self)^.&set := $00000010;
  56047. end;
  56048. function TPORTB_LATB.getLATB4 : TBits_1; inline;
  56049. begin
  56050. getLATB4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  56051. end;
  56052. procedure TPORTB_LATB.setLATB5; inline;
  56053. begin
  56054. pTDefRegMap(@Self)^.&set := $00000020;
  56055. end;
  56056. procedure TPORTB_LATB.clearLATB5; inline;
  56057. begin
  56058. pTDefRegMap(@Self)^.clr := $00000020;
  56059. end;
  56060. procedure TPORTB_LATB.setLATB5(thebits : TBits_1); inline;
  56061. begin
  56062. if thebits = 0 then
  56063. pTDefRegMap(@Self)^.clr := $00000020
  56064. else
  56065. pTDefRegMap(@Self)^.&set := $00000020;
  56066. end;
  56067. function TPORTB_LATB.getLATB5 : TBits_1; inline;
  56068. begin
  56069. getLATB5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  56070. end;
  56071. procedure TPORTB_LATB.setLATB6; inline;
  56072. begin
  56073. pTDefRegMap(@Self)^.&set := $00000040;
  56074. end;
  56075. procedure TPORTB_LATB.clearLATB6; inline;
  56076. begin
  56077. pTDefRegMap(@Self)^.clr := $00000040;
  56078. end;
  56079. procedure TPORTB_LATB.setLATB6(thebits : TBits_1); inline;
  56080. begin
  56081. if thebits = 0 then
  56082. pTDefRegMap(@Self)^.clr := $00000040
  56083. else
  56084. pTDefRegMap(@Self)^.&set := $00000040;
  56085. end;
  56086. function TPORTB_LATB.getLATB6 : TBits_1; inline;
  56087. begin
  56088. getLATB6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  56089. end;
  56090. procedure TPORTB_LATB.setLATB7; inline;
  56091. begin
  56092. pTDefRegMap(@Self)^.&set := $00000080;
  56093. end;
  56094. procedure TPORTB_LATB.clearLATB7; inline;
  56095. begin
  56096. pTDefRegMap(@Self)^.clr := $00000080;
  56097. end;
  56098. procedure TPORTB_LATB.setLATB7(thebits : TBits_1); inline;
  56099. begin
  56100. if thebits = 0 then
  56101. pTDefRegMap(@Self)^.clr := $00000080
  56102. else
  56103. pTDefRegMap(@Self)^.&set := $00000080;
  56104. end;
  56105. function TPORTB_LATB.getLATB7 : TBits_1; inline;
  56106. begin
  56107. getLATB7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  56108. end;
  56109. procedure TPORTB_LATB.setLATB8; inline;
  56110. begin
  56111. pTDefRegMap(@Self)^.&set := $00000100;
  56112. end;
  56113. procedure TPORTB_LATB.clearLATB8; inline;
  56114. begin
  56115. pTDefRegMap(@Self)^.clr := $00000100;
  56116. end;
  56117. procedure TPORTB_LATB.setLATB8(thebits : TBits_1); inline;
  56118. begin
  56119. if thebits = 0 then
  56120. pTDefRegMap(@Self)^.clr := $00000100
  56121. else
  56122. pTDefRegMap(@Self)^.&set := $00000100;
  56123. end;
  56124. function TPORTB_LATB.getLATB8 : TBits_1; inline;
  56125. begin
  56126. getLATB8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  56127. end;
  56128. procedure TPORTB_LATB.setLATB9; inline;
  56129. begin
  56130. pTDefRegMap(@Self)^.&set := $00000200;
  56131. end;
  56132. procedure TPORTB_LATB.clearLATB9; inline;
  56133. begin
  56134. pTDefRegMap(@Self)^.clr := $00000200;
  56135. end;
  56136. procedure TPORTB_LATB.setLATB9(thebits : TBits_1); inline;
  56137. begin
  56138. if thebits = 0 then
  56139. pTDefRegMap(@Self)^.clr := $00000200
  56140. else
  56141. pTDefRegMap(@Self)^.&set := $00000200;
  56142. end;
  56143. function TPORTB_LATB.getLATB9 : TBits_1; inline;
  56144. begin
  56145. getLATB9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  56146. end;
  56147. procedure TPORTB_LATB.setLATB10; inline;
  56148. begin
  56149. pTDefRegMap(@Self)^.&set := $00000400;
  56150. end;
  56151. procedure TPORTB_LATB.clearLATB10; inline;
  56152. begin
  56153. pTDefRegMap(@Self)^.clr := $00000400;
  56154. end;
  56155. procedure TPORTB_LATB.setLATB10(thebits : TBits_1); inline;
  56156. begin
  56157. if thebits = 0 then
  56158. pTDefRegMap(@Self)^.clr := $00000400
  56159. else
  56160. pTDefRegMap(@Self)^.&set := $00000400;
  56161. end;
  56162. function TPORTB_LATB.getLATB10 : TBits_1; inline;
  56163. begin
  56164. getLATB10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  56165. end;
  56166. procedure TPORTB_LATB.setLATB11; inline;
  56167. begin
  56168. pTDefRegMap(@Self)^.&set := $00000800;
  56169. end;
  56170. procedure TPORTB_LATB.clearLATB11; inline;
  56171. begin
  56172. pTDefRegMap(@Self)^.clr := $00000800;
  56173. end;
  56174. procedure TPORTB_LATB.setLATB11(thebits : TBits_1); inline;
  56175. begin
  56176. if thebits = 0 then
  56177. pTDefRegMap(@Self)^.clr := $00000800
  56178. else
  56179. pTDefRegMap(@Self)^.&set := $00000800;
  56180. end;
  56181. function TPORTB_LATB.getLATB11 : TBits_1; inline;
  56182. begin
  56183. getLATB11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  56184. end;
  56185. procedure TPORTB_LATB.setLATB12; inline;
  56186. begin
  56187. pTDefRegMap(@Self)^.&set := $00001000;
  56188. end;
  56189. procedure TPORTB_LATB.clearLATB12; inline;
  56190. begin
  56191. pTDefRegMap(@Self)^.clr := $00001000;
  56192. end;
  56193. procedure TPORTB_LATB.setLATB12(thebits : TBits_1); inline;
  56194. begin
  56195. if thebits = 0 then
  56196. pTDefRegMap(@Self)^.clr := $00001000
  56197. else
  56198. pTDefRegMap(@Self)^.&set := $00001000;
  56199. end;
  56200. function TPORTB_LATB.getLATB12 : TBits_1; inline;
  56201. begin
  56202. getLATB12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  56203. end;
  56204. procedure TPORTB_LATB.setLATB13; inline;
  56205. begin
  56206. pTDefRegMap(@Self)^.&set := $00002000;
  56207. end;
  56208. procedure TPORTB_LATB.clearLATB13; inline;
  56209. begin
  56210. pTDefRegMap(@Self)^.clr := $00002000;
  56211. end;
  56212. procedure TPORTB_LATB.setLATB13(thebits : TBits_1); inline;
  56213. begin
  56214. if thebits = 0 then
  56215. pTDefRegMap(@Self)^.clr := $00002000
  56216. else
  56217. pTDefRegMap(@Self)^.&set := $00002000;
  56218. end;
  56219. function TPORTB_LATB.getLATB13 : TBits_1; inline;
  56220. begin
  56221. getLATB13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  56222. end;
  56223. procedure TPORTB_LATB.setLATB14; inline;
  56224. begin
  56225. pTDefRegMap(@Self)^.&set := $00004000;
  56226. end;
  56227. procedure TPORTB_LATB.clearLATB14; inline;
  56228. begin
  56229. pTDefRegMap(@Self)^.clr := $00004000;
  56230. end;
  56231. procedure TPORTB_LATB.setLATB14(thebits : TBits_1); inline;
  56232. begin
  56233. if thebits = 0 then
  56234. pTDefRegMap(@Self)^.clr := $00004000
  56235. else
  56236. pTDefRegMap(@Self)^.&set := $00004000;
  56237. end;
  56238. function TPORTB_LATB.getLATB14 : TBits_1; inline;
  56239. begin
  56240. getLATB14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  56241. end;
  56242. procedure TPORTB_LATB.setLATB15; inline;
  56243. begin
  56244. pTDefRegMap(@Self)^.&set := $00008000;
  56245. end;
  56246. procedure TPORTB_LATB.clearLATB15; inline;
  56247. begin
  56248. pTDefRegMap(@Self)^.clr := $00008000;
  56249. end;
  56250. procedure TPORTB_LATB.setLATB15(thebits : TBits_1); inline;
  56251. begin
  56252. if thebits = 0 then
  56253. pTDefRegMap(@Self)^.clr := $00008000
  56254. else
  56255. pTDefRegMap(@Self)^.&set := $00008000;
  56256. end;
  56257. function TPORTB_LATB.getLATB15 : TBits_1; inline;
  56258. begin
  56259. getLATB15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  56260. end;
  56261. procedure TPORTB_LATB.setw(thebits : TBits_32); inline;
  56262. begin
  56263. pTDefRegMap(@Self)^.val := thebits;
  56264. end;
  56265. function TPORTB_LATB.getw : TBits_32; inline;
  56266. begin
  56267. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  56268. end;
  56269. procedure TPORTB_ODCB.setODCB0; inline;
  56270. begin
  56271. pTDefRegMap(@Self)^.&set := $00000001;
  56272. end;
  56273. procedure TPORTB_ODCB.clearODCB0; inline;
  56274. begin
  56275. pTDefRegMap(@Self)^.clr := $00000001;
  56276. end;
  56277. procedure TPORTB_ODCB.setODCB0(thebits : TBits_1); inline;
  56278. begin
  56279. if thebits = 0 then
  56280. pTDefRegMap(@Self)^.clr := $00000001
  56281. else
  56282. pTDefRegMap(@Self)^.&set := $00000001;
  56283. end;
  56284. function TPORTB_ODCB.getODCB0 : TBits_1; inline;
  56285. begin
  56286. getODCB0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  56287. end;
  56288. procedure TPORTB_ODCB.setODCB1; inline;
  56289. begin
  56290. pTDefRegMap(@Self)^.&set := $00000002;
  56291. end;
  56292. procedure TPORTB_ODCB.clearODCB1; inline;
  56293. begin
  56294. pTDefRegMap(@Self)^.clr := $00000002;
  56295. end;
  56296. procedure TPORTB_ODCB.setODCB1(thebits : TBits_1); inline;
  56297. begin
  56298. if thebits = 0 then
  56299. pTDefRegMap(@Self)^.clr := $00000002
  56300. else
  56301. pTDefRegMap(@Self)^.&set := $00000002;
  56302. end;
  56303. function TPORTB_ODCB.getODCB1 : TBits_1; inline;
  56304. begin
  56305. getODCB1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  56306. end;
  56307. procedure TPORTB_ODCB.setODCB2; inline;
  56308. begin
  56309. pTDefRegMap(@Self)^.&set := $00000004;
  56310. end;
  56311. procedure TPORTB_ODCB.clearODCB2; inline;
  56312. begin
  56313. pTDefRegMap(@Self)^.clr := $00000004;
  56314. end;
  56315. procedure TPORTB_ODCB.setODCB2(thebits : TBits_1); inline;
  56316. begin
  56317. if thebits = 0 then
  56318. pTDefRegMap(@Self)^.clr := $00000004
  56319. else
  56320. pTDefRegMap(@Self)^.&set := $00000004;
  56321. end;
  56322. function TPORTB_ODCB.getODCB2 : TBits_1; inline;
  56323. begin
  56324. getODCB2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  56325. end;
  56326. procedure TPORTB_ODCB.setODCB3; inline;
  56327. begin
  56328. pTDefRegMap(@Self)^.&set := $00000008;
  56329. end;
  56330. procedure TPORTB_ODCB.clearODCB3; inline;
  56331. begin
  56332. pTDefRegMap(@Self)^.clr := $00000008;
  56333. end;
  56334. procedure TPORTB_ODCB.setODCB3(thebits : TBits_1); inline;
  56335. begin
  56336. if thebits = 0 then
  56337. pTDefRegMap(@Self)^.clr := $00000008
  56338. else
  56339. pTDefRegMap(@Self)^.&set := $00000008;
  56340. end;
  56341. function TPORTB_ODCB.getODCB3 : TBits_1; inline;
  56342. begin
  56343. getODCB3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  56344. end;
  56345. procedure TPORTB_ODCB.setODCB4; inline;
  56346. begin
  56347. pTDefRegMap(@Self)^.&set := $00000010;
  56348. end;
  56349. procedure TPORTB_ODCB.clearODCB4; inline;
  56350. begin
  56351. pTDefRegMap(@Self)^.clr := $00000010;
  56352. end;
  56353. procedure TPORTB_ODCB.setODCB4(thebits : TBits_1); inline;
  56354. begin
  56355. if thebits = 0 then
  56356. pTDefRegMap(@Self)^.clr := $00000010
  56357. else
  56358. pTDefRegMap(@Self)^.&set := $00000010;
  56359. end;
  56360. function TPORTB_ODCB.getODCB4 : TBits_1; inline;
  56361. begin
  56362. getODCB4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  56363. end;
  56364. procedure TPORTB_ODCB.setODCB5; inline;
  56365. begin
  56366. pTDefRegMap(@Self)^.&set := $00000020;
  56367. end;
  56368. procedure TPORTB_ODCB.clearODCB5; inline;
  56369. begin
  56370. pTDefRegMap(@Self)^.clr := $00000020;
  56371. end;
  56372. procedure TPORTB_ODCB.setODCB5(thebits : TBits_1); inline;
  56373. begin
  56374. if thebits = 0 then
  56375. pTDefRegMap(@Self)^.clr := $00000020
  56376. else
  56377. pTDefRegMap(@Self)^.&set := $00000020;
  56378. end;
  56379. function TPORTB_ODCB.getODCB5 : TBits_1; inline;
  56380. begin
  56381. getODCB5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  56382. end;
  56383. procedure TPORTB_ODCB.setODCB6; inline;
  56384. begin
  56385. pTDefRegMap(@Self)^.&set := $00000040;
  56386. end;
  56387. procedure TPORTB_ODCB.clearODCB6; inline;
  56388. begin
  56389. pTDefRegMap(@Self)^.clr := $00000040;
  56390. end;
  56391. procedure TPORTB_ODCB.setODCB6(thebits : TBits_1); inline;
  56392. begin
  56393. if thebits = 0 then
  56394. pTDefRegMap(@Self)^.clr := $00000040
  56395. else
  56396. pTDefRegMap(@Self)^.&set := $00000040;
  56397. end;
  56398. function TPORTB_ODCB.getODCB6 : TBits_1; inline;
  56399. begin
  56400. getODCB6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  56401. end;
  56402. procedure TPORTB_ODCB.setODCB7; inline;
  56403. begin
  56404. pTDefRegMap(@Self)^.&set := $00000080;
  56405. end;
  56406. procedure TPORTB_ODCB.clearODCB7; inline;
  56407. begin
  56408. pTDefRegMap(@Self)^.clr := $00000080;
  56409. end;
  56410. procedure TPORTB_ODCB.setODCB7(thebits : TBits_1); inline;
  56411. begin
  56412. if thebits = 0 then
  56413. pTDefRegMap(@Self)^.clr := $00000080
  56414. else
  56415. pTDefRegMap(@Self)^.&set := $00000080;
  56416. end;
  56417. function TPORTB_ODCB.getODCB7 : TBits_1; inline;
  56418. begin
  56419. getODCB7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  56420. end;
  56421. procedure TPORTB_ODCB.setODCB8; inline;
  56422. begin
  56423. pTDefRegMap(@Self)^.&set := $00000100;
  56424. end;
  56425. procedure TPORTB_ODCB.clearODCB8; inline;
  56426. begin
  56427. pTDefRegMap(@Self)^.clr := $00000100;
  56428. end;
  56429. procedure TPORTB_ODCB.setODCB8(thebits : TBits_1); inline;
  56430. begin
  56431. if thebits = 0 then
  56432. pTDefRegMap(@Self)^.clr := $00000100
  56433. else
  56434. pTDefRegMap(@Self)^.&set := $00000100;
  56435. end;
  56436. function TPORTB_ODCB.getODCB8 : TBits_1; inline;
  56437. begin
  56438. getODCB8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  56439. end;
  56440. procedure TPORTB_ODCB.setODCB9; inline;
  56441. begin
  56442. pTDefRegMap(@Self)^.&set := $00000200;
  56443. end;
  56444. procedure TPORTB_ODCB.clearODCB9; inline;
  56445. begin
  56446. pTDefRegMap(@Self)^.clr := $00000200;
  56447. end;
  56448. procedure TPORTB_ODCB.setODCB9(thebits : TBits_1); inline;
  56449. begin
  56450. if thebits = 0 then
  56451. pTDefRegMap(@Self)^.clr := $00000200
  56452. else
  56453. pTDefRegMap(@Self)^.&set := $00000200;
  56454. end;
  56455. function TPORTB_ODCB.getODCB9 : TBits_1; inline;
  56456. begin
  56457. getODCB9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  56458. end;
  56459. procedure TPORTB_ODCB.setODCB10; inline;
  56460. begin
  56461. pTDefRegMap(@Self)^.&set := $00000400;
  56462. end;
  56463. procedure TPORTB_ODCB.clearODCB10; inline;
  56464. begin
  56465. pTDefRegMap(@Self)^.clr := $00000400;
  56466. end;
  56467. procedure TPORTB_ODCB.setODCB10(thebits : TBits_1); inline;
  56468. begin
  56469. if thebits = 0 then
  56470. pTDefRegMap(@Self)^.clr := $00000400
  56471. else
  56472. pTDefRegMap(@Self)^.&set := $00000400;
  56473. end;
  56474. function TPORTB_ODCB.getODCB10 : TBits_1; inline;
  56475. begin
  56476. getODCB10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  56477. end;
  56478. procedure TPORTB_ODCB.setODCB11; inline;
  56479. begin
  56480. pTDefRegMap(@Self)^.&set := $00000800;
  56481. end;
  56482. procedure TPORTB_ODCB.clearODCB11; inline;
  56483. begin
  56484. pTDefRegMap(@Self)^.clr := $00000800;
  56485. end;
  56486. procedure TPORTB_ODCB.setODCB11(thebits : TBits_1); inline;
  56487. begin
  56488. if thebits = 0 then
  56489. pTDefRegMap(@Self)^.clr := $00000800
  56490. else
  56491. pTDefRegMap(@Self)^.&set := $00000800;
  56492. end;
  56493. function TPORTB_ODCB.getODCB11 : TBits_1; inline;
  56494. begin
  56495. getODCB11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  56496. end;
  56497. procedure TPORTB_ODCB.setODCB12; inline;
  56498. begin
  56499. pTDefRegMap(@Self)^.&set := $00001000;
  56500. end;
  56501. procedure TPORTB_ODCB.clearODCB12; inline;
  56502. begin
  56503. pTDefRegMap(@Self)^.clr := $00001000;
  56504. end;
  56505. procedure TPORTB_ODCB.setODCB12(thebits : TBits_1); inline;
  56506. begin
  56507. if thebits = 0 then
  56508. pTDefRegMap(@Self)^.clr := $00001000
  56509. else
  56510. pTDefRegMap(@Self)^.&set := $00001000;
  56511. end;
  56512. function TPORTB_ODCB.getODCB12 : TBits_1; inline;
  56513. begin
  56514. getODCB12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  56515. end;
  56516. procedure TPORTB_ODCB.setODCB13; inline;
  56517. begin
  56518. pTDefRegMap(@Self)^.&set := $00002000;
  56519. end;
  56520. procedure TPORTB_ODCB.clearODCB13; inline;
  56521. begin
  56522. pTDefRegMap(@Self)^.clr := $00002000;
  56523. end;
  56524. procedure TPORTB_ODCB.setODCB13(thebits : TBits_1); inline;
  56525. begin
  56526. if thebits = 0 then
  56527. pTDefRegMap(@Self)^.clr := $00002000
  56528. else
  56529. pTDefRegMap(@Self)^.&set := $00002000;
  56530. end;
  56531. function TPORTB_ODCB.getODCB13 : TBits_1; inline;
  56532. begin
  56533. getODCB13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  56534. end;
  56535. procedure TPORTB_ODCB.setODCB14; inline;
  56536. begin
  56537. pTDefRegMap(@Self)^.&set := $00004000;
  56538. end;
  56539. procedure TPORTB_ODCB.clearODCB14; inline;
  56540. begin
  56541. pTDefRegMap(@Self)^.clr := $00004000;
  56542. end;
  56543. procedure TPORTB_ODCB.setODCB14(thebits : TBits_1); inline;
  56544. begin
  56545. if thebits = 0 then
  56546. pTDefRegMap(@Self)^.clr := $00004000
  56547. else
  56548. pTDefRegMap(@Self)^.&set := $00004000;
  56549. end;
  56550. function TPORTB_ODCB.getODCB14 : TBits_1; inline;
  56551. begin
  56552. getODCB14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  56553. end;
  56554. procedure TPORTB_ODCB.setODCB15; inline;
  56555. begin
  56556. pTDefRegMap(@Self)^.&set := $00008000;
  56557. end;
  56558. procedure TPORTB_ODCB.clearODCB15; inline;
  56559. begin
  56560. pTDefRegMap(@Self)^.clr := $00008000;
  56561. end;
  56562. procedure TPORTB_ODCB.setODCB15(thebits : TBits_1); inline;
  56563. begin
  56564. if thebits = 0 then
  56565. pTDefRegMap(@Self)^.clr := $00008000
  56566. else
  56567. pTDefRegMap(@Self)^.&set := $00008000;
  56568. end;
  56569. function TPORTB_ODCB.getODCB15 : TBits_1; inline;
  56570. begin
  56571. getODCB15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  56572. end;
  56573. procedure TPORTB_ODCB.setw(thebits : TBits_32); inline;
  56574. begin
  56575. pTDefRegMap(@Self)^.val := thebits;
  56576. end;
  56577. function TPORTB_ODCB.getw : TBits_32; inline;
  56578. begin
  56579. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  56580. end;
  56581. procedure TPORTC_TRISC.setTRISC12; inline;
  56582. begin
  56583. pTDefRegMap(@Self)^.&set := $00001000;
  56584. end;
  56585. procedure TPORTC_TRISC.clearTRISC12; inline;
  56586. begin
  56587. pTDefRegMap(@Self)^.clr := $00001000;
  56588. end;
  56589. procedure TPORTC_TRISC.setTRISC12(thebits : TBits_1); inline;
  56590. begin
  56591. if thebits = 0 then
  56592. pTDefRegMap(@Self)^.clr := $00001000
  56593. else
  56594. pTDefRegMap(@Self)^.&set := $00001000;
  56595. end;
  56596. function TPORTC_TRISC.getTRISC12 : TBits_1; inline;
  56597. begin
  56598. getTRISC12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  56599. end;
  56600. procedure TPORTC_TRISC.setTRISC13; inline;
  56601. begin
  56602. pTDefRegMap(@Self)^.&set := $00002000;
  56603. end;
  56604. procedure TPORTC_TRISC.clearTRISC13; inline;
  56605. begin
  56606. pTDefRegMap(@Self)^.clr := $00002000;
  56607. end;
  56608. procedure TPORTC_TRISC.setTRISC13(thebits : TBits_1); inline;
  56609. begin
  56610. if thebits = 0 then
  56611. pTDefRegMap(@Self)^.clr := $00002000
  56612. else
  56613. pTDefRegMap(@Self)^.&set := $00002000;
  56614. end;
  56615. function TPORTC_TRISC.getTRISC13 : TBits_1; inline;
  56616. begin
  56617. getTRISC13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  56618. end;
  56619. procedure TPORTC_TRISC.setTRISC14; inline;
  56620. begin
  56621. pTDefRegMap(@Self)^.&set := $00004000;
  56622. end;
  56623. procedure TPORTC_TRISC.clearTRISC14; inline;
  56624. begin
  56625. pTDefRegMap(@Self)^.clr := $00004000;
  56626. end;
  56627. procedure TPORTC_TRISC.setTRISC14(thebits : TBits_1); inline;
  56628. begin
  56629. if thebits = 0 then
  56630. pTDefRegMap(@Self)^.clr := $00004000
  56631. else
  56632. pTDefRegMap(@Self)^.&set := $00004000;
  56633. end;
  56634. function TPORTC_TRISC.getTRISC14 : TBits_1; inline;
  56635. begin
  56636. getTRISC14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  56637. end;
  56638. procedure TPORTC_TRISC.setTRISC15; inline;
  56639. begin
  56640. pTDefRegMap(@Self)^.&set := $00008000;
  56641. end;
  56642. procedure TPORTC_TRISC.clearTRISC15; inline;
  56643. begin
  56644. pTDefRegMap(@Self)^.clr := $00008000;
  56645. end;
  56646. procedure TPORTC_TRISC.setTRISC15(thebits : TBits_1); inline;
  56647. begin
  56648. if thebits = 0 then
  56649. pTDefRegMap(@Self)^.clr := $00008000
  56650. else
  56651. pTDefRegMap(@Self)^.&set := $00008000;
  56652. end;
  56653. function TPORTC_TRISC.getTRISC15 : TBits_1; inline;
  56654. begin
  56655. getTRISC15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  56656. end;
  56657. procedure TPORTC_TRISC.setw(thebits : TBits_32); inline;
  56658. begin
  56659. pTDefRegMap(@Self)^.val := thebits;
  56660. end;
  56661. function TPORTC_TRISC.getw : TBits_32; inline;
  56662. begin
  56663. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  56664. end;
  56665. procedure TPORTC_PORTC.setRC12; inline;
  56666. begin
  56667. pTDefRegMap(@Self)^.&set := $00001000;
  56668. end;
  56669. procedure TPORTC_PORTC.clearRC12; inline;
  56670. begin
  56671. pTDefRegMap(@Self)^.clr := $00001000;
  56672. end;
  56673. procedure TPORTC_PORTC.setRC12(thebits : TBits_1); inline;
  56674. begin
  56675. if thebits = 0 then
  56676. pTDefRegMap(@Self)^.clr := $00001000
  56677. else
  56678. pTDefRegMap(@Self)^.&set := $00001000;
  56679. end;
  56680. function TPORTC_PORTC.getRC12 : TBits_1; inline;
  56681. begin
  56682. getRC12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  56683. end;
  56684. procedure TPORTC_PORTC.setRC13; inline;
  56685. begin
  56686. pTDefRegMap(@Self)^.&set := $00002000;
  56687. end;
  56688. procedure TPORTC_PORTC.clearRC13; inline;
  56689. begin
  56690. pTDefRegMap(@Self)^.clr := $00002000;
  56691. end;
  56692. procedure TPORTC_PORTC.setRC13(thebits : TBits_1); inline;
  56693. begin
  56694. if thebits = 0 then
  56695. pTDefRegMap(@Self)^.clr := $00002000
  56696. else
  56697. pTDefRegMap(@Self)^.&set := $00002000;
  56698. end;
  56699. function TPORTC_PORTC.getRC13 : TBits_1; inline;
  56700. begin
  56701. getRC13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  56702. end;
  56703. procedure TPORTC_PORTC.setRC14; inline;
  56704. begin
  56705. pTDefRegMap(@Self)^.&set := $00004000;
  56706. end;
  56707. procedure TPORTC_PORTC.clearRC14; inline;
  56708. begin
  56709. pTDefRegMap(@Self)^.clr := $00004000;
  56710. end;
  56711. procedure TPORTC_PORTC.setRC14(thebits : TBits_1); inline;
  56712. begin
  56713. if thebits = 0 then
  56714. pTDefRegMap(@Self)^.clr := $00004000
  56715. else
  56716. pTDefRegMap(@Self)^.&set := $00004000;
  56717. end;
  56718. function TPORTC_PORTC.getRC14 : TBits_1; inline;
  56719. begin
  56720. getRC14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  56721. end;
  56722. procedure TPORTC_PORTC.setRC15; inline;
  56723. begin
  56724. pTDefRegMap(@Self)^.&set := $00008000;
  56725. end;
  56726. procedure TPORTC_PORTC.clearRC15; inline;
  56727. begin
  56728. pTDefRegMap(@Self)^.clr := $00008000;
  56729. end;
  56730. procedure TPORTC_PORTC.setRC15(thebits : TBits_1); inline;
  56731. begin
  56732. if thebits = 0 then
  56733. pTDefRegMap(@Self)^.clr := $00008000
  56734. else
  56735. pTDefRegMap(@Self)^.&set := $00008000;
  56736. end;
  56737. function TPORTC_PORTC.getRC15 : TBits_1; inline;
  56738. begin
  56739. getRC15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  56740. end;
  56741. procedure TPORTC_PORTC.setw(thebits : TBits_32); inline;
  56742. begin
  56743. pTDefRegMap(@Self)^.val := thebits;
  56744. end;
  56745. function TPORTC_PORTC.getw : TBits_32; inline;
  56746. begin
  56747. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  56748. end;
  56749. procedure TPORTC_LATC.setLATC12; inline;
  56750. begin
  56751. pTDefRegMap(@Self)^.&set := $00001000;
  56752. end;
  56753. procedure TPORTC_LATC.clearLATC12; inline;
  56754. begin
  56755. pTDefRegMap(@Self)^.clr := $00001000;
  56756. end;
  56757. procedure TPORTC_LATC.setLATC12(thebits : TBits_1); inline;
  56758. begin
  56759. if thebits = 0 then
  56760. pTDefRegMap(@Self)^.clr := $00001000
  56761. else
  56762. pTDefRegMap(@Self)^.&set := $00001000;
  56763. end;
  56764. function TPORTC_LATC.getLATC12 : TBits_1; inline;
  56765. begin
  56766. getLATC12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  56767. end;
  56768. procedure TPORTC_LATC.setLATC13; inline;
  56769. begin
  56770. pTDefRegMap(@Self)^.&set := $00002000;
  56771. end;
  56772. procedure TPORTC_LATC.clearLATC13; inline;
  56773. begin
  56774. pTDefRegMap(@Self)^.clr := $00002000;
  56775. end;
  56776. procedure TPORTC_LATC.setLATC13(thebits : TBits_1); inline;
  56777. begin
  56778. if thebits = 0 then
  56779. pTDefRegMap(@Self)^.clr := $00002000
  56780. else
  56781. pTDefRegMap(@Self)^.&set := $00002000;
  56782. end;
  56783. function TPORTC_LATC.getLATC13 : TBits_1; inline;
  56784. begin
  56785. getLATC13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  56786. end;
  56787. procedure TPORTC_LATC.setLATC14; inline;
  56788. begin
  56789. pTDefRegMap(@Self)^.&set := $00004000;
  56790. end;
  56791. procedure TPORTC_LATC.clearLATC14; inline;
  56792. begin
  56793. pTDefRegMap(@Self)^.clr := $00004000;
  56794. end;
  56795. procedure TPORTC_LATC.setLATC14(thebits : TBits_1); inline;
  56796. begin
  56797. if thebits = 0 then
  56798. pTDefRegMap(@Self)^.clr := $00004000
  56799. else
  56800. pTDefRegMap(@Self)^.&set := $00004000;
  56801. end;
  56802. function TPORTC_LATC.getLATC14 : TBits_1; inline;
  56803. begin
  56804. getLATC14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  56805. end;
  56806. procedure TPORTC_LATC.setLATC15; inline;
  56807. begin
  56808. pTDefRegMap(@Self)^.&set := $00008000;
  56809. end;
  56810. procedure TPORTC_LATC.clearLATC15; inline;
  56811. begin
  56812. pTDefRegMap(@Self)^.clr := $00008000;
  56813. end;
  56814. procedure TPORTC_LATC.setLATC15(thebits : TBits_1); inline;
  56815. begin
  56816. if thebits = 0 then
  56817. pTDefRegMap(@Self)^.clr := $00008000
  56818. else
  56819. pTDefRegMap(@Self)^.&set := $00008000;
  56820. end;
  56821. function TPORTC_LATC.getLATC15 : TBits_1; inline;
  56822. begin
  56823. getLATC15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  56824. end;
  56825. procedure TPORTC_LATC.setw(thebits : TBits_32); inline;
  56826. begin
  56827. pTDefRegMap(@Self)^.val := thebits;
  56828. end;
  56829. function TPORTC_LATC.getw : TBits_32; inline;
  56830. begin
  56831. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  56832. end;
  56833. procedure TPORTC_ODCC.setODCC12; inline;
  56834. begin
  56835. pTDefRegMap(@Self)^.&set := $00001000;
  56836. end;
  56837. procedure TPORTC_ODCC.clearODCC12; inline;
  56838. begin
  56839. pTDefRegMap(@Self)^.clr := $00001000;
  56840. end;
  56841. procedure TPORTC_ODCC.setODCC12(thebits : TBits_1); inline;
  56842. begin
  56843. if thebits = 0 then
  56844. pTDefRegMap(@Self)^.clr := $00001000
  56845. else
  56846. pTDefRegMap(@Self)^.&set := $00001000;
  56847. end;
  56848. function TPORTC_ODCC.getODCC12 : TBits_1; inline;
  56849. begin
  56850. getODCC12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  56851. end;
  56852. procedure TPORTC_ODCC.setODCC13; inline;
  56853. begin
  56854. pTDefRegMap(@Self)^.&set := $00002000;
  56855. end;
  56856. procedure TPORTC_ODCC.clearODCC13; inline;
  56857. begin
  56858. pTDefRegMap(@Self)^.clr := $00002000;
  56859. end;
  56860. procedure TPORTC_ODCC.setODCC13(thebits : TBits_1); inline;
  56861. begin
  56862. if thebits = 0 then
  56863. pTDefRegMap(@Self)^.clr := $00002000
  56864. else
  56865. pTDefRegMap(@Self)^.&set := $00002000;
  56866. end;
  56867. function TPORTC_ODCC.getODCC13 : TBits_1; inline;
  56868. begin
  56869. getODCC13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  56870. end;
  56871. procedure TPORTC_ODCC.setODCC14; inline;
  56872. begin
  56873. pTDefRegMap(@Self)^.&set := $00004000;
  56874. end;
  56875. procedure TPORTC_ODCC.clearODCC14; inline;
  56876. begin
  56877. pTDefRegMap(@Self)^.clr := $00004000;
  56878. end;
  56879. procedure TPORTC_ODCC.setODCC14(thebits : TBits_1); inline;
  56880. begin
  56881. if thebits = 0 then
  56882. pTDefRegMap(@Self)^.clr := $00004000
  56883. else
  56884. pTDefRegMap(@Self)^.&set := $00004000;
  56885. end;
  56886. function TPORTC_ODCC.getODCC14 : TBits_1; inline;
  56887. begin
  56888. getODCC14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  56889. end;
  56890. procedure TPORTC_ODCC.setODCC15; inline;
  56891. begin
  56892. pTDefRegMap(@Self)^.&set := $00008000;
  56893. end;
  56894. procedure TPORTC_ODCC.clearODCC15; inline;
  56895. begin
  56896. pTDefRegMap(@Self)^.clr := $00008000;
  56897. end;
  56898. procedure TPORTC_ODCC.setODCC15(thebits : TBits_1); inline;
  56899. begin
  56900. if thebits = 0 then
  56901. pTDefRegMap(@Self)^.clr := $00008000
  56902. else
  56903. pTDefRegMap(@Self)^.&set := $00008000;
  56904. end;
  56905. function TPORTC_ODCC.getODCC15 : TBits_1; inline;
  56906. begin
  56907. getODCC15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  56908. end;
  56909. procedure TPORTC_ODCC.setw(thebits : TBits_32); inline;
  56910. begin
  56911. pTDefRegMap(@Self)^.val := thebits;
  56912. end;
  56913. function TPORTC_ODCC.getw : TBits_32; inline;
  56914. begin
  56915. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  56916. end;
  56917. procedure TPORTD_TRISD.setTRISD0; inline;
  56918. begin
  56919. pTDefRegMap(@Self)^.&set := $00000001;
  56920. end;
  56921. procedure TPORTD_TRISD.clearTRISD0; inline;
  56922. begin
  56923. pTDefRegMap(@Self)^.clr := $00000001;
  56924. end;
  56925. procedure TPORTD_TRISD.setTRISD0(thebits : TBits_1); inline;
  56926. begin
  56927. if thebits = 0 then
  56928. pTDefRegMap(@Self)^.clr := $00000001
  56929. else
  56930. pTDefRegMap(@Self)^.&set := $00000001;
  56931. end;
  56932. function TPORTD_TRISD.getTRISD0 : TBits_1; inline;
  56933. begin
  56934. getTRISD0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  56935. end;
  56936. procedure TPORTD_TRISD.setTRISD1; inline;
  56937. begin
  56938. pTDefRegMap(@Self)^.&set := $00000002;
  56939. end;
  56940. procedure TPORTD_TRISD.clearTRISD1; inline;
  56941. begin
  56942. pTDefRegMap(@Self)^.clr := $00000002;
  56943. end;
  56944. procedure TPORTD_TRISD.setTRISD1(thebits : TBits_1); inline;
  56945. begin
  56946. if thebits = 0 then
  56947. pTDefRegMap(@Self)^.clr := $00000002
  56948. else
  56949. pTDefRegMap(@Self)^.&set := $00000002;
  56950. end;
  56951. function TPORTD_TRISD.getTRISD1 : TBits_1; inline;
  56952. begin
  56953. getTRISD1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  56954. end;
  56955. procedure TPORTD_TRISD.setTRISD2; inline;
  56956. begin
  56957. pTDefRegMap(@Self)^.&set := $00000004;
  56958. end;
  56959. procedure TPORTD_TRISD.clearTRISD2; inline;
  56960. begin
  56961. pTDefRegMap(@Self)^.clr := $00000004;
  56962. end;
  56963. procedure TPORTD_TRISD.setTRISD2(thebits : TBits_1); inline;
  56964. begin
  56965. if thebits = 0 then
  56966. pTDefRegMap(@Self)^.clr := $00000004
  56967. else
  56968. pTDefRegMap(@Self)^.&set := $00000004;
  56969. end;
  56970. function TPORTD_TRISD.getTRISD2 : TBits_1; inline;
  56971. begin
  56972. getTRISD2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  56973. end;
  56974. procedure TPORTD_TRISD.setTRISD3; inline;
  56975. begin
  56976. pTDefRegMap(@Self)^.&set := $00000008;
  56977. end;
  56978. procedure TPORTD_TRISD.clearTRISD3; inline;
  56979. begin
  56980. pTDefRegMap(@Self)^.clr := $00000008;
  56981. end;
  56982. procedure TPORTD_TRISD.setTRISD3(thebits : TBits_1); inline;
  56983. begin
  56984. if thebits = 0 then
  56985. pTDefRegMap(@Self)^.clr := $00000008
  56986. else
  56987. pTDefRegMap(@Self)^.&set := $00000008;
  56988. end;
  56989. function TPORTD_TRISD.getTRISD3 : TBits_1; inline;
  56990. begin
  56991. getTRISD3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  56992. end;
  56993. procedure TPORTD_TRISD.setTRISD4; inline;
  56994. begin
  56995. pTDefRegMap(@Self)^.&set := $00000010;
  56996. end;
  56997. procedure TPORTD_TRISD.clearTRISD4; inline;
  56998. begin
  56999. pTDefRegMap(@Self)^.clr := $00000010;
  57000. end;
  57001. procedure TPORTD_TRISD.setTRISD4(thebits : TBits_1); inline;
  57002. begin
  57003. if thebits = 0 then
  57004. pTDefRegMap(@Self)^.clr := $00000010
  57005. else
  57006. pTDefRegMap(@Self)^.&set := $00000010;
  57007. end;
  57008. function TPORTD_TRISD.getTRISD4 : TBits_1; inline;
  57009. begin
  57010. getTRISD4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  57011. end;
  57012. procedure TPORTD_TRISD.setTRISD5; inline;
  57013. begin
  57014. pTDefRegMap(@Self)^.&set := $00000020;
  57015. end;
  57016. procedure TPORTD_TRISD.clearTRISD5; inline;
  57017. begin
  57018. pTDefRegMap(@Self)^.clr := $00000020;
  57019. end;
  57020. procedure TPORTD_TRISD.setTRISD5(thebits : TBits_1); inline;
  57021. begin
  57022. if thebits = 0 then
  57023. pTDefRegMap(@Self)^.clr := $00000020
  57024. else
  57025. pTDefRegMap(@Self)^.&set := $00000020;
  57026. end;
  57027. function TPORTD_TRISD.getTRISD5 : TBits_1; inline;
  57028. begin
  57029. getTRISD5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  57030. end;
  57031. procedure TPORTD_TRISD.setTRISD6; inline;
  57032. begin
  57033. pTDefRegMap(@Self)^.&set := $00000040;
  57034. end;
  57035. procedure TPORTD_TRISD.clearTRISD6; inline;
  57036. begin
  57037. pTDefRegMap(@Self)^.clr := $00000040;
  57038. end;
  57039. procedure TPORTD_TRISD.setTRISD6(thebits : TBits_1); inline;
  57040. begin
  57041. if thebits = 0 then
  57042. pTDefRegMap(@Self)^.clr := $00000040
  57043. else
  57044. pTDefRegMap(@Self)^.&set := $00000040;
  57045. end;
  57046. function TPORTD_TRISD.getTRISD6 : TBits_1; inline;
  57047. begin
  57048. getTRISD6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  57049. end;
  57050. procedure TPORTD_TRISD.setTRISD7; inline;
  57051. begin
  57052. pTDefRegMap(@Self)^.&set := $00000080;
  57053. end;
  57054. procedure TPORTD_TRISD.clearTRISD7; inline;
  57055. begin
  57056. pTDefRegMap(@Self)^.clr := $00000080;
  57057. end;
  57058. procedure TPORTD_TRISD.setTRISD7(thebits : TBits_1); inline;
  57059. begin
  57060. if thebits = 0 then
  57061. pTDefRegMap(@Self)^.clr := $00000080
  57062. else
  57063. pTDefRegMap(@Self)^.&set := $00000080;
  57064. end;
  57065. function TPORTD_TRISD.getTRISD7 : TBits_1; inline;
  57066. begin
  57067. getTRISD7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  57068. end;
  57069. procedure TPORTD_TRISD.setTRISD8; inline;
  57070. begin
  57071. pTDefRegMap(@Self)^.&set := $00000100;
  57072. end;
  57073. procedure TPORTD_TRISD.clearTRISD8; inline;
  57074. begin
  57075. pTDefRegMap(@Self)^.clr := $00000100;
  57076. end;
  57077. procedure TPORTD_TRISD.setTRISD8(thebits : TBits_1); inline;
  57078. begin
  57079. if thebits = 0 then
  57080. pTDefRegMap(@Self)^.clr := $00000100
  57081. else
  57082. pTDefRegMap(@Self)^.&set := $00000100;
  57083. end;
  57084. function TPORTD_TRISD.getTRISD8 : TBits_1; inline;
  57085. begin
  57086. getTRISD8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  57087. end;
  57088. procedure TPORTD_TRISD.setTRISD9; inline;
  57089. begin
  57090. pTDefRegMap(@Self)^.&set := $00000200;
  57091. end;
  57092. procedure TPORTD_TRISD.clearTRISD9; inline;
  57093. begin
  57094. pTDefRegMap(@Self)^.clr := $00000200;
  57095. end;
  57096. procedure TPORTD_TRISD.setTRISD9(thebits : TBits_1); inline;
  57097. begin
  57098. if thebits = 0 then
  57099. pTDefRegMap(@Self)^.clr := $00000200
  57100. else
  57101. pTDefRegMap(@Self)^.&set := $00000200;
  57102. end;
  57103. function TPORTD_TRISD.getTRISD9 : TBits_1; inline;
  57104. begin
  57105. getTRISD9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  57106. end;
  57107. procedure TPORTD_TRISD.setTRISD10; inline;
  57108. begin
  57109. pTDefRegMap(@Self)^.&set := $00000400;
  57110. end;
  57111. procedure TPORTD_TRISD.clearTRISD10; inline;
  57112. begin
  57113. pTDefRegMap(@Self)^.clr := $00000400;
  57114. end;
  57115. procedure TPORTD_TRISD.setTRISD10(thebits : TBits_1); inline;
  57116. begin
  57117. if thebits = 0 then
  57118. pTDefRegMap(@Self)^.clr := $00000400
  57119. else
  57120. pTDefRegMap(@Self)^.&set := $00000400;
  57121. end;
  57122. function TPORTD_TRISD.getTRISD10 : TBits_1; inline;
  57123. begin
  57124. getTRISD10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  57125. end;
  57126. procedure TPORTD_TRISD.setTRISD11; inline;
  57127. begin
  57128. pTDefRegMap(@Self)^.&set := $00000800;
  57129. end;
  57130. procedure TPORTD_TRISD.clearTRISD11; inline;
  57131. begin
  57132. pTDefRegMap(@Self)^.clr := $00000800;
  57133. end;
  57134. procedure TPORTD_TRISD.setTRISD11(thebits : TBits_1); inline;
  57135. begin
  57136. if thebits = 0 then
  57137. pTDefRegMap(@Self)^.clr := $00000800
  57138. else
  57139. pTDefRegMap(@Self)^.&set := $00000800;
  57140. end;
  57141. function TPORTD_TRISD.getTRISD11 : TBits_1; inline;
  57142. begin
  57143. getTRISD11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  57144. end;
  57145. procedure TPORTD_TRISD.setw(thebits : TBits_32); inline;
  57146. begin
  57147. pTDefRegMap(@Self)^.val := thebits;
  57148. end;
  57149. function TPORTD_TRISD.getw : TBits_32; inline;
  57150. begin
  57151. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  57152. end;
  57153. procedure TPORTD_PORTD.setRD0; inline;
  57154. begin
  57155. pTDefRegMap(@Self)^.&set := $00000001;
  57156. end;
  57157. procedure TPORTD_PORTD.clearRD0; inline;
  57158. begin
  57159. pTDefRegMap(@Self)^.clr := $00000001;
  57160. end;
  57161. procedure TPORTD_PORTD.setRD0(thebits : TBits_1); inline;
  57162. begin
  57163. if thebits = 0 then
  57164. pTDefRegMap(@Self)^.clr := $00000001
  57165. else
  57166. pTDefRegMap(@Self)^.&set := $00000001;
  57167. end;
  57168. function TPORTD_PORTD.getRD0 : TBits_1; inline;
  57169. begin
  57170. getRD0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  57171. end;
  57172. procedure TPORTD_PORTD.setRD1; inline;
  57173. begin
  57174. pTDefRegMap(@Self)^.&set := $00000002;
  57175. end;
  57176. procedure TPORTD_PORTD.clearRD1; inline;
  57177. begin
  57178. pTDefRegMap(@Self)^.clr := $00000002;
  57179. end;
  57180. procedure TPORTD_PORTD.setRD1(thebits : TBits_1); inline;
  57181. begin
  57182. if thebits = 0 then
  57183. pTDefRegMap(@Self)^.clr := $00000002
  57184. else
  57185. pTDefRegMap(@Self)^.&set := $00000002;
  57186. end;
  57187. function TPORTD_PORTD.getRD1 : TBits_1; inline;
  57188. begin
  57189. getRD1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  57190. end;
  57191. procedure TPORTD_PORTD.setRD2; inline;
  57192. begin
  57193. pTDefRegMap(@Self)^.&set := $00000004;
  57194. end;
  57195. procedure TPORTD_PORTD.clearRD2; inline;
  57196. begin
  57197. pTDefRegMap(@Self)^.clr := $00000004;
  57198. end;
  57199. procedure TPORTD_PORTD.setRD2(thebits : TBits_1); inline;
  57200. begin
  57201. if thebits = 0 then
  57202. pTDefRegMap(@Self)^.clr := $00000004
  57203. else
  57204. pTDefRegMap(@Self)^.&set := $00000004;
  57205. end;
  57206. function TPORTD_PORTD.getRD2 : TBits_1; inline;
  57207. begin
  57208. getRD2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  57209. end;
  57210. procedure TPORTD_PORTD.setRD3; inline;
  57211. begin
  57212. pTDefRegMap(@Self)^.&set := $00000008;
  57213. end;
  57214. procedure TPORTD_PORTD.clearRD3; inline;
  57215. begin
  57216. pTDefRegMap(@Self)^.clr := $00000008;
  57217. end;
  57218. procedure TPORTD_PORTD.setRD3(thebits : TBits_1); inline;
  57219. begin
  57220. if thebits = 0 then
  57221. pTDefRegMap(@Self)^.clr := $00000008
  57222. else
  57223. pTDefRegMap(@Self)^.&set := $00000008;
  57224. end;
  57225. function TPORTD_PORTD.getRD3 : TBits_1; inline;
  57226. begin
  57227. getRD3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  57228. end;
  57229. procedure TPORTD_PORTD.setRD4; inline;
  57230. begin
  57231. pTDefRegMap(@Self)^.&set := $00000010;
  57232. end;
  57233. procedure TPORTD_PORTD.clearRD4; inline;
  57234. begin
  57235. pTDefRegMap(@Self)^.clr := $00000010;
  57236. end;
  57237. procedure TPORTD_PORTD.setRD4(thebits : TBits_1); inline;
  57238. begin
  57239. if thebits = 0 then
  57240. pTDefRegMap(@Self)^.clr := $00000010
  57241. else
  57242. pTDefRegMap(@Self)^.&set := $00000010;
  57243. end;
  57244. function TPORTD_PORTD.getRD4 : TBits_1; inline;
  57245. begin
  57246. getRD4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  57247. end;
  57248. procedure TPORTD_PORTD.setRD5; inline;
  57249. begin
  57250. pTDefRegMap(@Self)^.&set := $00000020;
  57251. end;
  57252. procedure TPORTD_PORTD.clearRD5; inline;
  57253. begin
  57254. pTDefRegMap(@Self)^.clr := $00000020;
  57255. end;
  57256. procedure TPORTD_PORTD.setRD5(thebits : TBits_1); inline;
  57257. begin
  57258. if thebits = 0 then
  57259. pTDefRegMap(@Self)^.clr := $00000020
  57260. else
  57261. pTDefRegMap(@Self)^.&set := $00000020;
  57262. end;
  57263. function TPORTD_PORTD.getRD5 : TBits_1; inline;
  57264. begin
  57265. getRD5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  57266. end;
  57267. procedure TPORTD_PORTD.setRD6; inline;
  57268. begin
  57269. pTDefRegMap(@Self)^.&set := $00000040;
  57270. end;
  57271. procedure TPORTD_PORTD.clearRD6; inline;
  57272. begin
  57273. pTDefRegMap(@Self)^.clr := $00000040;
  57274. end;
  57275. procedure TPORTD_PORTD.setRD6(thebits : TBits_1); inline;
  57276. begin
  57277. if thebits = 0 then
  57278. pTDefRegMap(@Self)^.clr := $00000040
  57279. else
  57280. pTDefRegMap(@Self)^.&set := $00000040;
  57281. end;
  57282. function TPORTD_PORTD.getRD6 : TBits_1; inline;
  57283. begin
  57284. getRD6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  57285. end;
  57286. procedure TPORTD_PORTD.setRD7; inline;
  57287. begin
  57288. pTDefRegMap(@Self)^.&set := $00000080;
  57289. end;
  57290. procedure TPORTD_PORTD.clearRD7; inline;
  57291. begin
  57292. pTDefRegMap(@Self)^.clr := $00000080;
  57293. end;
  57294. procedure TPORTD_PORTD.setRD7(thebits : TBits_1); inline;
  57295. begin
  57296. if thebits = 0 then
  57297. pTDefRegMap(@Self)^.clr := $00000080
  57298. else
  57299. pTDefRegMap(@Self)^.&set := $00000080;
  57300. end;
  57301. function TPORTD_PORTD.getRD7 : TBits_1; inline;
  57302. begin
  57303. getRD7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  57304. end;
  57305. procedure TPORTD_PORTD.setRD8; inline;
  57306. begin
  57307. pTDefRegMap(@Self)^.&set := $00000100;
  57308. end;
  57309. procedure TPORTD_PORTD.clearRD8; inline;
  57310. begin
  57311. pTDefRegMap(@Self)^.clr := $00000100;
  57312. end;
  57313. procedure TPORTD_PORTD.setRD8(thebits : TBits_1); inline;
  57314. begin
  57315. if thebits = 0 then
  57316. pTDefRegMap(@Self)^.clr := $00000100
  57317. else
  57318. pTDefRegMap(@Self)^.&set := $00000100;
  57319. end;
  57320. function TPORTD_PORTD.getRD8 : TBits_1; inline;
  57321. begin
  57322. getRD8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  57323. end;
  57324. procedure TPORTD_PORTD.setRD9; inline;
  57325. begin
  57326. pTDefRegMap(@Self)^.&set := $00000200;
  57327. end;
  57328. procedure TPORTD_PORTD.clearRD9; inline;
  57329. begin
  57330. pTDefRegMap(@Self)^.clr := $00000200;
  57331. end;
  57332. procedure TPORTD_PORTD.setRD9(thebits : TBits_1); inline;
  57333. begin
  57334. if thebits = 0 then
  57335. pTDefRegMap(@Self)^.clr := $00000200
  57336. else
  57337. pTDefRegMap(@Self)^.&set := $00000200;
  57338. end;
  57339. function TPORTD_PORTD.getRD9 : TBits_1; inline;
  57340. begin
  57341. getRD9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  57342. end;
  57343. procedure TPORTD_PORTD.setRD10; inline;
  57344. begin
  57345. pTDefRegMap(@Self)^.&set := $00000400;
  57346. end;
  57347. procedure TPORTD_PORTD.clearRD10; inline;
  57348. begin
  57349. pTDefRegMap(@Self)^.clr := $00000400;
  57350. end;
  57351. procedure TPORTD_PORTD.setRD10(thebits : TBits_1); inline;
  57352. begin
  57353. if thebits = 0 then
  57354. pTDefRegMap(@Self)^.clr := $00000400
  57355. else
  57356. pTDefRegMap(@Self)^.&set := $00000400;
  57357. end;
  57358. function TPORTD_PORTD.getRD10 : TBits_1; inline;
  57359. begin
  57360. getRD10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  57361. end;
  57362. procedure TPORTD_PORTD.setRD11; inline;
  57363. begin
  57364. pTDefRegMap(@Self)^.&set := $00000800;
  57365. end;
  57366. procedure TPORTD_PORTD.clearRD11; inline;
  57367. begin
  57368. pTDefRegMap(@Self)^.clr := $00000800;
  57369. end;
  57370. procedure TPORTD_PORTD.setRD11(thebits : TBits_1); inline;
  57371. begin
  57372. if thebits = 0 then
  57373. pTDefRegMap(@Self)^.clr := $00000800
  57374. else
  57375. pTDefRegMap(@Self)^.&set := $00000800;
  57376. end;
  57377. function TPORTD_PORTD.getRD11 : TBits_1; inline;
  57378. begin
  57379. getRD11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  57380. end;
  57381. procedure TPORTD_PORTD.setw(thebits : TBits_32); inline;
  57382. begin
  57383. pTDefRegMap(@Self)^.val := thebits;
  57384. end;
  57385. function TPORTD_PORTD.getw : TBits_32; inline;
  57386. begin
  57387. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  57388. end;
  57389. procedure TPORTD_LATD.setLATD0; inline;
  57390. begin
  57391. pTDefRegMap(@Self)^.&set := $00000001;
  57392. end;
  57393. procedure TPORTD_LATD.clearLATD0; inline;
  57394. begin
  57395. pTDefRegMap(@Self)^.clr := $00000001;
  57396. end;
  57397. procedure TPORTD_LATD.setLATD0(thebits : TBits_1); inline;
  57398. begin
  57399. if thebits = 0 then
  57400. pTDefRegMap(@Self)^.clr := $00000001
  57401. else
  57402. pTDefRegMap(@Self)^.&set := $00000001;
  57403. end;
  57404. function TPORTD_LATD.getLATD0 : TBits_1; inline;
  57405. begin
  57406. getLATD0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  57407. end;
  57408. procedure TPORTD_LATD.setLATD1; inline;
  57409. begin
  57410. pTDefRegMap(@Self)^.&set := $00000002;
  57411. end;
  57412. procedure TPORTD_LATD.clearLATD1; inline;
  57413. begin
  57414. pTDefRegMap(@Self)^.clr := $00000002;
  57415. end;
  57416. procedure TPORTD_LATD.setLATD1(thebits : TBits_1); inline;
  57417. begin
  57418. if thebits = 0 then
  57419. pTDefRegMap(@Self)^.clr := $00000002
  57420. else
  57421. pTDefRegMap(@Self)^.&set := $00000002;
  57422. end;
  57423. function TPORTD_LATD.getLATD1 : TBits_1; inline;
  57424. begin
  57425. getLATD1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  57426. end;
  57427. procedure TPORTD_LATD.setLATD2; inline;
  57428. begin
  57429. pTDefRegMap(@Self)^.&set := $00000004;
  57430. end;
  57431. procedure TPORTD_LATD.clearLATD2; inline;
  57432. begin
  57433. pTDefRegMap(@Self)^.clr := $00000004;
  57434. end;
  57435. procedure TPORTD_LATD.setLATD2(thebits : TBits_1); inline;
  57436. begin
  57437. if thebits = 0 then
  57438. pTDefRegMap(@Self)^.clr := $00000004
  57439. else
  57440. pTDefRegMap(@Self)^.&set := $00000004;
  57441. end;
  57442. function TPORTD_LATD.getLATD2 : TBits_1; inline;
  57443. begin
  57444. getLATD2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  57445. end;
  57446. procedure TPORTD_LATD.setLATD3; inline;
  57447. begin
  57448. pTDefRegMap(@Self)^.&set := $00000008;
  57449. end;
  57450. procedure TPORTD_LATD.clearLATD3; inline;
  57451. begin
  57452. pTDefRegMap(@Self)^.clr := $00000008;
  57453. end;
  57454. procedure TPORTD_LATD.setLATD3(thebits : TBits_1); inline;
  57455. begin
  57456. if thebits = 0 then
  57457. pTDefRegMap(@Self)^.clr := $00000008
  57458. else
  57459. pTDefRegMap(@Self)^.&set := $00000008;
  57460. end;
  57461. function TPORTD_LATD.getLATD3 : TBits_1; inline;
  57462. begin
  57463. getLATD3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  57464. end;
  57465. procedure TPORTD_LATD.setLATD4; inline;
  57466. begin
  57467. pTDefRegMap(@Self)^.&set := $00000010;
  57468. end;
  57469. procedure TPORTD_LATD.clearLATD4; inline;
  57470. begin
  57471. pTDefRegMap(@Self)^.clr := $00000010;
  57472. end;
  57473. procedure TPORTD_LATD.setLATD4(thebits : TBits_1); inline;
  57474. begin
  57475. if thebits = 0 then
  57476. pTDefRegMap(@Self)^.clr := $00000010
  57477. else
  57478. pTDefRegMap(@Self)^.&set := $00000010;
  57479. end;
  57480. function TPORTD_LATD.getLATD4 : TBits_1; inline;
  57481. begin
  57482. getLATD4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  57483. end;
  57484. procedure TPORTD_LATD.setLATD5; inline;
  57485. begin
  57486. pTDefRegMap(@Self)^.&set := $00000020;
  57487. end;
  57488. procedure TPORTD_LATD.clearLATD5; inline;
  57489. begin
  57490. pTDefRegMap(@Self)^.clr := $00000020;
  57491. end;
  57492. procedure TPORTD_LATD.setLATD5(thebits : TBits_1); inline;
  57493. begin
  57494. if thebits = 0 then
  57495. pTDefRegMap(@Self)^.clr := $00000020
  57496. else
  57497. pTDefRegMap(@Self)^.&set := $00000020;
  57498. end;
  57499. function TPORTD_LATD.getLATD5 : TBits_1; inline;
  57500. begin
  57501. getLATD5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  57502. end;
  57503. procedure TPORTD_LATD.setLATD6; inline;
  57504. begin
  57505. pTDefRegMap(@Self)^.&set := $00000040;
  57506. end;
  57507. procedure TPORTD_LATD.clearLATD6; inline;
  57508. begin
  57509. pTDefRegMap(@Self)^.clr := $00000040;
  57510. end;
  57511. procedure TPORTD_LATD.setLATD6(thebits : TBits_1); inline;
  57512. begin
  57513. if thebits = 0 then
  57514. pTDefRegMap(@Self)^.clr := $00000040
  57515. else
  57516. pTDefRegMap(@Self)^.&set := $00000040;
  57517. end;
  57518. function TPORTD_LATD.getLATD6 : TBits_1; inline;
  57519. begin
  57520. getLATD6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  57521. end;
  57522. procedure TPORTD_LATD.setLATD7; inline;
  57523. begin
  57524. pTDefRegMap(@Self)^.&set := $00000080;
  57525. end;
  57526. procedure TPORTD_LATD.clearLATD7; inline;
  57527. begin
  57528. pTDefRegMap(@Self)^.clr := $00000080;
  57529. end;
  57530. procedure TPORTD_LATD.setLATD7(thebits : TBits_1); inline;
  57531. begin
  57532. if thebits = 0 then
  57533. pTDefRegMap(@Self)^.clr := $00000080
  57534. else
  57535. pTDefRegMap(@Self)^.&set := $00000080;
  57536. end;
  57537. function TPORTD_LATD.getLATD7 : TBits_1; inline;
  57538. begin
  57539. getLATD7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  57540. end;
  57541. procedure TPORTD_LATD.setLATD8; inline;
  57542. begin
  57543. pTDefRegMap(@Self)^.&set := $00000100;
  57544. end;
  57545. procedure TPORTD_LATD.clearLATD8; inline;
  57546. begin
  57547. pTDefRegMap(@Self)^.clr := $00000100;
  57548. end;
  57549. procedure TPORTD_LATD.setLATD8(thebits : TBits_1); inline;
  57550. begin
  57551. if thebits = 0 then
  57552. pTDefRegMap(@Self)^.clr := $00000100
  57553. else
  57554. pTDefRegMap(@Self)^.&set := $00000100;
  57555. end;
  57556. function TPORTD_LATD.getLATD8 : TBits_1; inline;
  57557. begin
  57558. getLATD8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  57559. end;
  57560. procedure TPORTD_LATD.setLATD9; inline;
  57561. begin
  57562. pTDefRegMap(@Self)^.&set := $00000200;
  57563. end;
  57564. procedure TPORTD_LATD.clearLATD9; inline;
  57565. begin
  57566. pTDefRegMap(@Self)^.clr := $00000200;
  57567. end;
  57568. procedure TPORTD_LATD.setLATD9(thebits : TBits_1); inline;
  57569. begin
  57570. if thebits = 0 then
  57571. pTDefRegMap(@Self)^.clr := $00000200
  57572. else
  57573. pTDefRegMap(@Self)^.&set := $00000200;
  57574. end;
  57575. function TPORTD_LATD.getLATD9 : TBits_1; inline;
  57576. begin
  57577. getLATD9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  57578. end;
  57579. procedure TPORTD_LATD.setLATD10; inline;
  57580. begin
  57581. pTDefRegMap(@Self)^.&set := $00000400;
  57582. end;
  57583. procedure TPORTD_LATD.clearLATD10; inline;
  57584. begin
  57585. pTDefRegMap(@Self)^.clr := $00000400;
  57586. end;
  57587. procedure TPORTD_LATD.setLATD10(thebits : TBits_1); inline;
  57588. begin
  57589. if thebits = 0 then
  57590. pTDefRegMap(@Self)^.clr := $00000400
  57591. else
  57592. pTDefRegMap(@Self)^.&set := $00000400;
  57593. end;
  57594. function TPORTD_LATD.getLATD10 : TBits_1; inline;
  57595. begin
  57596. getLATD10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  57597. end;
  57598. procedure TPORTD_LATD.setLATD11; inline;
  57599. begin
  57600. pTDefRegMap(@Self)^.&set := $00000800;
  57601. end;
  57602. procedure TPORTD_LATD.clearLATD11; inline;
  57603. begin
  57604. pTDefRegMap(@Self)^.clr := $00000800;
  57605. end;
  57606. procedure TPORTD_LATD.setLATD11(thebits : TBits_1); inline;
  57607. begin
  57608. if thebits = 0 then
  57609. pTDefRegMap(@Self)^.clr := $00000800
  57610. else
  57611. pTDefRegMap(@Self)^.&set := $00000800;
  57612. end;
  57613. function TPORTD_LATD.getLATD11 : TBits_1; inline;
  57614. begin
  57615. getLATD11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  57616. end;
  57617. procedure TPORTD_LATD.setw(thebits : TBits_32); inline;
  57618. begin
  57619. pTDefRegMap(@Self)^.val := thebits;
  57620. end;
  57621. function TPORTD_LATD.getw : TBits_32; inline;
  57622. begin
  57623. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  57624. end;
  57625. procedure TPORTD_ODCD.setODCD0; inline;
  57626. begin
  57627. pTDefRegMap(@Self)^.&set := $00000001;
  57628. end;
  57629. procedure TPORTD_ODCD.clearODCD0; inline;
  57630. begin
  57631. pTDefRegMap(@Self)^.clr := $00000001;
  57632. end;
  57633. procedure TPORTD_ODCD.setODCD0(thebits : TBits_1); inline;
  57634. begin
  57635. if thebits = 0 then
  57636. pTDefRegMap(@Self)^.clr := $00000001
  57637. else
  57638. pTDefRegMap(@Self)^.&set := $00000001;
  57639. end;
  57640. function TPORTD_ODCD.getODCD0 : TBits_1; inline;
  57641. begin
  57642. getODCD0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  57643. end;
  57644. procedure TPORTD_ODCD.setODCD1; inline;
  57645. begin
  57646. pTDefRegMap(@Self)^.&set := $00000002;
  57647. end;
  57648. procedure TPORTD_ODCD.clearODCD1; inline;
  57649. begin
  57650. pTDefRegMap(@Self)^.clr := $00000002;
  57651. end;
  57652. procedure TPORTD_ODCD.setODCD1(thebits : TBits_1); inline;
  57653. begin
  57654. if thebits = 0 then
  57655. pTDefRegMap(@Self)^.clr := $00000002
  57656. else
  57657. pTDefRegMap(@Self)^.&set := $00000002;
  57658. end;
  57659. function TPORTD_ODCD.getODCD1 : TBits_1; inline;
  57660. begin
  57661. getODCD1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  57662. end;
  57663. procedure TPORTD_ODCD.setODCD2; inline;
  57664. begin
  57665. pTDefRegMap(@Self)^.&set := $00000004;
  57666. end;
  57667. procedure TPORTD_ODCD.clearODCD2; inline;
  57668. begin
  57669. pTDefRegMap(@Self)^.clr := $00000004;
  57670. end;
  57671. procedure TPORTD_ODCD.setODCD2(thebits : TBits_1); inline;
  57672. begin
  57673. if thebits = 0 then
  57674. pTDefRegMap(@Self)^.clr := $00000004
  57675. else
  57676. pTDefRegMap(@Self)^.&set := $00000004;
  57677. end;
  57678. function TPORTD_ODCD.getODCD2 : TBits_1; inline;
  57679. begin
  57680. getODCD2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  57681. end;
  57682. procedure TPORTD_ODCD.setODCD3; inline;
  57683. begin
  57684. pTDefRegMap(@Self)^.&set := $00000008;
  57685. end;
  57686. procedure TPORTD_ODCD.clearODCD3; inline;
  57687. begin
  57688. pTDefRegMap(@Self)^.clr := $00000008;
  57689. end;
  57690. procedure TPORTD_ODCD.setODCD3(thebits : TBits_1); inline;
  57691. begin
  57692. if thebits = 0 then
  57693. pTDefRegMap(@Self)^.clr := $00000008
  57694. else
  57695. pTDefRegMap(@Self)^.&set := $00000008;
  57696. end;
  57697. function TPORTD_ODCD.getODCD3 : TBits_1; inline;
  57698. begin
  57699. getODCD3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  57700. end;
  57701. procedure TPORTD_ODCD.setODCD4; inline;
  57702. begin
  57703. pTDefRegMap(@Self)^.&set := $00000010;
  57704. end;
  57705. procedure TPORTD_ODCD.clearODCD4; inline;
  57706. begin
  57707. pTDefRegMap(@Self)^.clr := $00000010;
  57708. end;
  57709. procedure TPORTD_ODCD.setODCD4(thebits : TBits_1); inline;
  57710. begin
  57711. if thebits = 0 then
  57712. pTDefRegMap(@Self)^.clr := $00000010
  57713. else
  57714. pTDefRegMap(@Self)^.&set := $00000010;
  57715. end;
  57716. function TPORTD_ODCD.getODCD4 : TBits_1; inline;
  57717. begin
  57718. getODCD4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  57719. end;
  57720. procedure TPORTD_ODCD.setODCD5; inline;
  57721. begin
  57722. pTDefRegMap(@Self)^.&set := $00000020;
  57723. end;
  57724. procedure TPORTD_ODCD.clearODCD5; inline;
  57725. begin
  57726. pTDefRegMap(@Self)^.clr := $00000020;
  57727. end;
  57728. procedure TPORTD_ODCD.setODCD5(thebits : TBits_1); inline;
  57729. begin
  57730. if thebits = 0 then
  57731. pTDefRegMap(@Self)^.clr := $00000020
  57732. else
  57733. pTDefRegMap(@Self)^.&set := $00000020;
  57734. end;
  57735. function TPORTD_ODCD.getODCD5 : TBits_1; inline;
  57736. begin
  57737. getODCD5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  57738. end;
  57739. procedure TPORTD_ODCD.setODCD6; inline;
  57740. begin
  57741. pTDefRegMap(@Self)^.&set := $00000040;
  57742. end;
  57743. procedure TPORTD_ODCD.clearODCD6; inline;
  57744. begin
  57745. pTDefRegMap(@Self)^.clr := $00000040;
  57746. end;
  57747. procedure TPORTD_ODCD.setODCD6(thebits : TBits_1); inline;
  57748. begin
  57749. if thebits = 0 then
  57750. pTDefRegMap(@Self)^.clr := $00000040
  57751. else
  57752. pTDefRegMap(@Self)^.&set := $00000040;
  57753. end;
  57754. function TPORTD_ODCD.getODCD6 : TBits_1; inline;
  57755. begin
  57756. getODCD6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  57757. end;
  57758. procedure TPORTD_ODCD.setODCD7; inline;
  57759. begin
  57760. pTDefRegMap(@Self)^.&set := $00000080;
  57761. end;
  57762. procedure TPORTD_ODCD.clearODCD7; inline;
  57763. begin
  57764. pTDefRegMap(@Self)^.clr := $00000080;
  57765. end;
  57766. procedure TPORTD_ODCD.setODCD7(thebits : TBits_1); inline;
  57767. begin
  57768. if thebits = 0 then
  57769. pTDefRegMap(@Self)^.clr := $00000080
  57770. else
  57771. pTDefRegMap(@Self)^.&set := $00000080;
  57772. end;
  57773. function TPORTD_ODCD.getODCD7 : TBits_1; inline;
  57774. begin
  57775. getODCD7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  57776. end;
  57777. procedure TPORTD_ODCD.setODCD8; inline;
  57778. begin
  57779. pTDefRegMap(@Self)^.&set := $00000100;
  57780. end;
  57781. procedure TPORTD_ODCD.clearODCD8; inline;
  57782. begin
  57783. pTDefRegMap(@Self)^.clr := $00000100;
  57784. end;
  57785. procedure TPORTD_ODCD.setODCD8(thebits : TBits_1); inline;
  57786. begin
  57787. if thebits = 0 then
  57788. pTDefRegMap(@Self)^.clr := $00000100
  57789. else
  57790. pTDefRegMap(@Self)^.&set := $00000100;
  57791. end;
  57792. function TPORTD_ODCD.getODCD8 : TBits_1; inline;
  57793. begin
  57794. getODCD8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  57795. end;
  57796. procedure TPORTD_ODCD.setODCD9; inline;
  57797. begin
  57798. pTDefRegMap(@Self)^.&set := $00000200;
  57799. end;
  57800. procedure TPORTD_ODCD.clearODCD9; inline;
  57801. begin
  57802. pTDefRegMap(@Self)^.clr := $00000200;
  57803. end;
  57804. procedure TPORTD_ODCD.setODCD9(thebits : TBits_1); inline;
  57805. begin
  57806. if thebits = 0 then
  57807. pTDefRegMap(@Self)^.clr := $00000200
  57808. else
  57809. pTDefRegMap(@Self)^.&set := $00000200;
  57810. end;
  57811. function TPORTD_ODCD.getODCD9 : TBits_1; inline;
  57812. begin
  57813. getODCD9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  57814. end;
  57815. procedure TPORTD_ODCD.setODCD10; inline;
  57816. begin
  57817. pTDefRegMap(@Self)^.&set := $00000400;
  57818. end;
  57819. procedure TPORTD_ODCD.clearODCD10; inline;
  57820. begin
  57821. pTDefRegMap(@Self)^.clr := $00000400;
  57822. end;
  57823. procedure TPORTD_ODCD.setODCD10(thebits : TBits_1); inline;
  57824. begin
  57825. if thebits = 0 then
  57826. pTDefRegMap(@Self)^.clr := $00000400
  57827. else
  57828. pTDefRegMap(@Self)^.&set := $00000400;
  57829. end;
  57830. function TPORTD_ODCD.getODCD10 : TBits_1; inline;
  57831. begin
  57832. getODCD10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  57833. end;
  57834. procedure TPORTD_ODCD.setODCD11; inline;
  57835. begin
  57836. pTDefRegMap(@Self)^.&set := $00000800;
  57837. end;
  57838. procedure TPORTD_ODCD.clearODCD11; inline;
  57839. begin
  57840. pTDefRegMap(@Self)^.clr := $00000800;
  57841. end;
  57842. procedure TPORTD_ODCD.setODCD11(thebits : TBits_1); inline;
  57843. begin
  57844. if thebits = 0 then
  57845. pTDefRegMap(@Self)^.clr := $00000800
  57846. else
  57847. pTDefRegMap(@Self)^.&set := $00000800;
  57848. end;
  57849. function TPORTD_ODCD.getODCD11 : TBits_1; inline;
  57850. begin
  57851. getODCD11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  57852. end;
  57853. procedure TPORTD_ODCD.setw(thebits : TBits_32); inline;
  57854. begin
  57855. pTDefRegMap(@Self)^.val := thebits;
  57856. end;
  57857. function TPORTD_ODCD.getw : TBits_32; inline;
  57858. begin
  57859. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  57860. end;
  57861. procedure TPORTE_TRISE.setTRISE0; inline;
  57862. begin
  57863. pTDefRegMap(@Self)^.&set := $00000001;
  57864. end;
  57865. procedure TPORTE_TRISE.clearTRISE0; inline;
  57866. begin
  57867. pTDefRegMap(@Self)^.clr := $00000001;
  57868. end;
  57869. procedure TPORTE_TRISE.setTRISE0(thebits : TBits_1); inline;
  57870. begin
  57871. if thebits = 0 then
  57872. pTDefRegMap(@Self)^.clr := $00000001
  57873. else
  57874. pTDefRegMap(@Self)^.&set := $00000001;
  57875. end;
  57876. function TPORTE_TRISE.getTRISE0 : TBits_1; inline;
  57877. begin
  57878. getTRISE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  57879. end;
  57880. procedure TPORTE_TRISE.setTRISE1; inline;
  57881. begin
  57882. pTDefRegMap(@Self)^.&set := $00000002;
  57883. end;
  57884. procedure TPORTE_TRISE.clearTRISE1; inline;
  57885. begin
  57886. pTDefRegMap(@Self)^.clr := $00000002;
  57887. end;
  57888. procedure TPORTE_TRISE.setTRISE1(thebits : TBits_1); inline;
  57889. begin
  57890. if thebits = 0 then
  57891. pTDefRegMap(@Self)^.clr := $00000002
  57892. else
  57893. pTDefRegMap(@Self)^.&set := $00000002;
  57894. end;
  57895. function TPORTE_TRISE.getTRISE1 : TBits_1; inline;
  57896. begin
  57897. getTRISE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  57898. end;
  57899. procedure TPORTE_TRISE.setTRISE2; inline;
  57900. begin
  57901. pTDefRegMap(@Self)^.&set := $00000004;
  57902. end;
  57903. procedure TPORTE_TRISE.clearTRISE2; inline;
  57904. begin
  57905. pTDefRegMap(@Self)^.clr := $00000004;
  57906. end;
  57907. procedure TPORTE_TRISE.setTRISE2(thebits : TBits_1); inline;
  57908. begin
  57909. if thebits = 0 then
  57910. pTDefRegMap(@Self)^.clr := $00000004
  57911. else
  57912. pTDefRegMap(@Self)^.&set := $00000004;
  57913. end;
  57914. function TPORTE_TRISE.getTRISE2 : TBits_1; inline;
  57915. begin
  57916. getTRISE2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  57917. end;
  57918. procedure TPORTE_TRISE.setTRISE3; inline;
  57919. begin
  57920. pTDefRegMap(@Self)^.&set := $00000008;
  57921. end;
  57922. procedure TPORTE_TRISE.clearTRISE3; inline;
  57923. begin
  57924. pTDefRegMap(@Self)^.clr := $00000008;
  57925. end;
  57926. procedure TPORTE_TRISE.setTRISE3(thebits : TBits_1); inline;
  57927. begin
  57928. if thebits = 0 then
  57929. pTDefRegMap(@Self)^.clr := $00000008
  57930. else
  57931. pTDefRegMap(@Self)^.&set := $00000008;
  57932. end;
  57933. function TPORTE_TRISE.getTRISE3 : TBits_1; inline;
  57934. begin
  57935. getTRISE3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  57936. end;
  57937. procedure TPORTE_TRISE.setTRISE4; inline;
  57938. begin
  57939. pTDefRegMap(@Self)^.&set := $00000010;
  57940. end;
  57941. procedure TPORTE_TRISE.clearTRISE4; inline;
  57942. begin
  57943. pTDefRegMap(@Self)^.clr := $00000010;
  57944. end;
  57945. procedure TPORTE_TRISE.setTRISE4(thebits : TBits_1); inline;
  57946. begin
  57947. if thebits = 0 then
  57948. pTDefRegMap(@Self)^.clr := $00000010
  57949. else
  57950. pTDefRegMap(@Self)^.&set := $00000010;
  57951. end;
  57952. function TPORTE_TRISE.getTRISE4 : TBits_1; inline;
  57953. begin
  57954. getTRISE4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  57955. end;
  57956. procedure TPORTE_TRISE.setTRISE5; inline;
  57957. begin
  57958. pTDefRegMap(@Self)^.&set := $00000020;
  57959. end;
  57960. procedure TPORTE_TRISE.clearTRISE5; inline;
  57961. begin
  57962. pTDefRegMap(@Self)^.clr := $00000020;
  57963. end;
  57964. procedure TPORTE_TRISE.setTRISE5(thebits : TBits_1); inline;
  57965. begin
  57966. if thebits = 0 then
  57967. pTDefRegMap(@Self)^.clr := $00000020
  57968. else
  57969. pTDefRegMap(@Self)^.&set := $00000020;
  57970. end;
  57971. function TPORTE_TRISE.getTRISE5 : TBits_1; inline;
  57972. begin
  57973. getTRISE5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  57974. end;
  57975. procedure TPORTE_TRISE.setTRISE6; inline;
  57976. begin
  57977. pTDefRegMap(@Self)^.&set := $00000040;
  57978. end;
  57979. procedure TPORTE_TRISE.clearTRISE6; inline;
  57980. begin
  57981. pTDefRegMap(@Self)^.clr := $00000040;
  57982. end;
  57983. procedure TPORTE_TRISE.setTRISE6(thebits : TBits_1); inline;
  57984. begin
  57985. if thebits = 0 then
  57986. pTDefRegMap(@Self)^.clr := $00000040
  57987. else
  57988. pTDefRegMap(@Self)^.&set := $00000040;
  57989. end;
  57990. function TPORTE_TRISE.getTRISE6 : TBits_1; inline;
  57991. begin
  57992. getTRISE6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  57993. end;
  57994. procedure TPORTE_TRISE.setTRISE7; inline;
  57995. begin
  57996. pTDefRegMap(@Self)^.&set := $00000080;
  57997. end;
  57998. procedure TPORTE_TRISE.clearTRISE7; inline;
  57999. begin
  58000. pTDefRegMap(@Self)^.clr := $00000080;
  58001. end;
  58002. procedure TPORTE_TRISE.setTRISE7(thebits : TBits_1); inline;
  58003. begin
  58004. if thebits = 0 then
  58005. pTDefRegMap(@Self)^.clr := $00000080
  58006. else
  58007. pTDefRegMap(@Self)^.&set := $00000080;
  58008. end;
  58009. function TPORTE_TRISE.getTRISE7 : TBits_1; inline;
  58010. begin
  58011. getTRISE7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  58012. end;
  58013. procedure TPORTE_TRISE.setw(thebits : TBits_32); inline;
  58014. begin
  58015. pTDefRegMap(@Self)^.val := thebits;
  58016. end;
  58017. function TPORTE_TRISE.getw : TBits_32; inline;
  58018. begin
  58019. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  58020. end;
  58021. procedure TPORTE_PORTE.setRE0; inline;
  58022. begin
  58023. pTDefRegMap(@Self)^.&set := $00000001;
  58024. end;
  58025. procedure TPORTE_PORTE.clearRE0; inline;
  58026. begin
  58027. pTDefRegMap(@Self)^.clr := $00000001;
  58028. end;
  58029. procedure TPORTE_PORTE.setRE0(thebits : TBits_1); inline;
  58030. begin
  58031. if thebits = 0 then
  58032. pTDefRegMap(@Self)^.clr := $00000001
  58033. else
  58034. pTDefRegMap(@Self)^.&set := $00000001;
  58035. end;
  58036. function TPORTE_PORTE.getRE0 : TBits_1; inline;
  58037. begin
  58038. getRE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  58039. end;
  58040. procedure TPORTE_PORTE.setRE1; inline;
  58041. begin
  58042. pTDefRegMap(@Self)^.&set := $00000002;
  58043. end;
  58044. procedure TPORTE_PORTE.clearRE1; inline;
  58045. begin
  58046. pTDefRegMap(@Self)^.clr := $00000002;
  58047. end;
  58048. procedure TPORTE_PORTE.setRE1(thebits : TBits_1); inline;
  58049. begin
  58050. if thebits = 0 then
  58051. pTDefRegMap(@Self)^.clr := $00000002
  58052. else
  58053. pTDefRegMap(@Self)^.&set := $00000002;
  58054. end;
  58055. function TPORTE_PORTE.getRE1 : TBits_1; inline;
  58056. begin
  58057. getRE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  58058. end;
  58059. procedure TPORTE_PORTE.setRE2; inline;
  58060. begin
  58061. pTDefRegMap(@Self)^.&set := $00000004;
  58062. end;
  58063. procedure TPORTE_PORTE.clearRE2; inline;
  58064. begin
  58065. pTDefRegMap(@Self)^.clr := $00000004;
  58066. end;
  58067. procedure TPORTE_PORTE.setRE2(thebits : TBits_1); inline;
  58068. begin
  58069. if thebits = 0 then
  58070. pTDefRegMap(@Self)^.clr := $00000004
  58071. else
  58072. pTDefRegMap(@Self)^.&set := $00000004;
  58073. end;
  58074. function TPORTE_PORTE.getRE2 : TBits_1; inline;
  58075. begin
  58076. getRE2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  58077. end;
  58078. procedure TPORTE_PORTE.setRE3; inline;
  58079. begin
  58080. pTDefRegMap(@Self)^.&set := $00000008;
  58081. end;
  58082. procedure TPORTE_PORTE.clearRE3; inline;
  58083. begin
  58084. pTDefRegMap(@Self)^.clr := $00000008;
  58085. end;
  58086. procedure TPORTE_PORTE.setRE3(thebits : TBits_1); inline;
  58087. begin
  58088. if thebits = 0 then
  58089. pTDefRegMap(@Self)^.clr := $00000008
  58090. else
  58091. pTDefRegMap(@Self)^.&set := $00000008;
  58092. end;
  58093. function TPORTE_PORTE.getRE3 : TBits_1; inline;
  58094. begin
  58095. getRE3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  58096. end;
  58097. procedure TPORTE_PORTE.setRE4; inline;
  58098. begin
  58099. pTDefRegMap(@Self)^.&set := $00000010;
  58100. end;
  58101. procedure TPORTE_PORTE.clearRE4; inline;
  58102. begin
  58103. pTDefRegMap(@Self)^.clr := $00000010;
  58104. end;
  58105. procedure TPORTE_PORTE.setRE4(thebits : TBits_1); inline;
  58106. begin
  58107. if thebits = 0 then
  58108. pTDefRegMap(@Self)^.clr := $00000010
  58109. else
  58110. pTDefRegMap(@Self)^.&set := $00000010;
  58111. end;
  58112. function TPORTE_PORTE.getRE4 : TBits_1; inline;
  58113. begin
  58114. getRE4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  58115. end;
  58116. procedure TPORTE_PORTE.setRE5; inline;
  58117. begin
  58118. pTDefRegMap(@Self)^.&set := $00000020;
  58119. end;
  58120. procedure TPORTE_PORTE.clearRE5; inline;
  58121. begin
  58122. pTDefRegMap(@Self)^.clr := $00000020;
  58123. end;
  58124. procedure TPORTE_PORTE.setRE5(thebits : TBits_1); inline;
  58125. begin
  58126. if thebits = 0 then
  58127. pTDefRegMap(@Self)^.clr := $00000020
  58128. else
  58129. pTDefRegMap(@Self)^.&set := $00000020;
  58130. end;
  58131. function TPORTE_PORTE.getRE5 : TBits_1; inline;
  58132. begin
  58133. getRE5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  58134. end;
  58135. procedure TPORTE_PORTE.setRE6; inline;
  58136. begin
  58137. pTDefRegMap(@Self)^.&set := $00000040;
  58138. end;
  58139. procedure TPORTE_PORTE.clearRE6; inline;
  58140. begin
  58141. pTDefRegMap(@Self)^.clr := $00000040;
  58142. end;
  58143. procedure TPORTE_PORTE.setRE6(thebits : TBits_1); inline;
  58144. begin
  58145. if thebits = 0 then
  58146. pTDefRegMap(@Self)^.clr := $00000040
  58147. else
  58148. pTDefRegMap(@Self)^.&set := $00000040;
  58149. end;
  58150. function TPORTE_PORTE.getRE6 : TBits_1; inline;
  58151. begin
  58152. getRE6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  58153. end;
  58154. procedure TPORTE_PORTE.setRE7; inline;
  58155. begin
  58156. pTDefRegMap(@Self)^.&set := $00000080;
  58157. end;
  58158. procedure TPORTE_PORTE.clearRE7; inline;
  58159. begin
  58160. pTDefRegMap(@Self)^.clr := $00000080;
  58161. end;
  58162. procedure TPORTE_PORTE.setRE7(thebits : TBits_1); inline;
  58163. begin
  58164. if thebits = 0 then
  58165. pTDefRegMap(@Self)^.clr := $00000080
  58166. else
  58167. pTDefRegMap(@Self)^.&set := $00000080;
  58168. end;
  58169. function TPORTE_PORTE.getRE7 : TBits_1; inline;
  58170. begin
  58171. getRE7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  58172. end;
  58173. procedure TPORTE_PORTE.setw(thebits : TBits_32); inline;
  58174. begin
  58175. pTDefRegMap(@Self)^.val := thebits;
  58176. end;
  58177. function TPORTE_PORTE.getw : TBits_32; inline;
  58178. begin
  58179. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  58180. end;
  58181. procedure TPORTE_LATE.setLATE0; inline;
  58182. begin
  58183. pTDefRegMap(@Self)^.&set := $00000001;
  58184. end;
  58185. procedure TPORTE_LATE.clearLATE0; inline;
  58186. begin
  58187. pTDefRegMap(@Self)^.clr := $00000001;
  58188. end;
  58189. procedure TPORTE_LATE.setLATE0(thebits : TBits_1); inline;
  58190. begin
  58191. if thebits = 0 then
  58192. pTDefRegMap(@Self)^.clr := $00000001
  58193. else
  58194. pTDefRegMap(@Self)^.&set := $00000001;
  58195. end;
  58196. function TPORTE_LATE.getLATE0 : TBits_1; inline;
  58197. begin
  58198. getLATE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  58199. end;
  58200. procedure TPORTE_LATE.setLATE1; inline;
  58201. begin
  58202. pTDefRegMap(@Self)^.&set := $00000002;
  58203. end;
  58204. procedure TPORTE_LATE.clearLATE1; inline;
  58205. begin
  58206. pTDefRegMap(@Self)^.clr := $00000002;
  58207. end;
  58208. procedure TPORTE_LATE.setLATE1(thebits : TBits_1); inline;
  58209. begin
  58210. if thebits = 0 then
  58211. pTDefRegMap(@Self)^.clr := $00000002
  58212. else
  58213. pTDefRegMap(@Self)^.&set := $00000002;
  58214. end;
  58215. function TPORTE_LATE.getLATE1 : TBits_1; inline;
  58216. begin
  58217. getLATE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  58218. end;
  58219. procedure TPORTE_LATE.setLATE2; inline;
  58220. begin
  58221. pTDefRegMap(@Self)^.&set := $00000004;
  58222. end;
  58223. procedure TPORTE_LATE.clearLATE2; inline;
  58224. begin
  58225. pTDefRegMap(@Self)^.clr := $00000004;
  58226. end;
  58227. procedure TPORTE_LATE.setLATE2(thebits : TBits_1); inline;
  58228. begin
  58229. if thebits = 0 then
  58230. pTDefRegMap(@Self)^.clr := $00000004
  58231. else
  58232. pTDefRegMap(@Self)^.&set := $00000004;
  58233. end;
  58234. function TPORTE_LATE.getLATE2 : TBits_1; inline;
  58235. begin
  58236. getLATE2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  58237. end;
  58238. procedure TPORTE_LATE.setLATE3; inline;
  58239. begin
  58240. pTDefRegMap(@Self)^.&set := $00000008;
  58241. end;
  58242. procedure TPORTE_LATE.clearLATE3; inline;
  58243. begin
  58244. pTDefRegMap(@Self)^.clr := $00000008;
  58245. end;
  58246. procedure TPORTE_LATE.setLATE3(thebits : TBits_1); inline;
  58247. begin
  58248. if thebits = 0 then
  58249. pTDefRegMap(@Self)^.clr := $00000008
  58250. else
  58251. pTDefRegMap(@Self)^.&set := $00000008;
  58252. end;
  58253. function TPORTE_LATE.getLATE3 : TBits_1; inline;
  58254. begin
  58255. getLATE3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  58256. end;
  58257. procedure TPORTE_LATE.setLATE4; inline;
  58258. begin
  58259. pTDefRegMap(@Self)^.&set := $00000010;
  58260. end;
  58261. procedure TPORTE_LATE.clearLATE4; inline;
  58262. begin
  58263. pTDefRegMap(@Self)^.clr := $00000010;
  58264. end;
  58265. procedure TPORTE_LATE.setLATE4(thebits : TBits_1); inline;
  58266. begin
  58267. if thebits = 0 then
  58268. pTDefRegMap(@Self)^.clr := $00000010
  58269. else
  58270. pTDefRegMap(@Self)^.&set := $00000010;
  58271. end;
  58272. function TPORTE_LATE.getLATE4 : TBits_1; inline;
  58273. begin
  58274. getLATE4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  58275. end;
  58276. procedure TPORTE_LATE.setLATE5; inline;
  58277. begin
  58278. pTDefRegMap(@Self)^.&set := $00000020;
  58279. end;
  58280. procedure TPORTE_LATE.clearLATE5; inline;
  58281. begin
  58282. pTDefRegMap(@Self)^.clr := $00000020;
  58283. end;
  58284. procedure TPORTE_LATE.setLATE5(thebits : TBits_1); inline;
  58285. begin
  58286. if thebits = 0 then
  58287. pTDefRegMap(@Self)^.clr := $00000020
  58288. else
  58289. pTDefRegMap(@Self)^.&set := $00000020;
  58290. end;
  58291. function TPORTE_LATE.getLATE5 : TBits_1; inline;
  58292. begin
  58293. getLATE5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  58294. end;
  58295. procedure TPORTE_LATE.setLATE6; inline;
  58296. begin
  58297. pTDefRegMap(@Self)^.&set := $00000040;
  58298. end;
  58299. procedure TPORTE_LATE.clearLATE6; inline;
  58300. begin
  58301. pTDefRegMap(@Self)^.clr := $00000040;
  58302. end;
  58303. procedure TPORTE_LATE.setLATE6(thebits : TBits_1); inline;
  58304. begin
  58305. if thebits = 0 then
  58306. pTDefRegMap(@Self)^.clr := $00000040
  58307. else
  58308. pTDefRegMap(@Self)^.&set := $00000040;
  58309. end;
  58310. function TPORTE_LATE.getLATE6 : TBits_1; inline;
  58311. begin
  58312. getLATE6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  58313. end;
  58314. procedure TPORTE_LATE.setLATE7; inline;
  58315. begin
  58316. pTDefRegMap(@Self)^.&set := $00000080;
  58317. end;
  58318. procedure TPORTE_LATE.clearLATE7; inline;
  58319. begin
  58320. pTDefRegMap(@Self)^.clr := $00000080;
  58321. end;
  58322. procedure TPORTE_LATE.setLATE7(thebits : TBits_1); inline;
  58323. begin
  58324. if thebits = 0 then
  58325. pTDefRegMap(@Self)^.clr := $00000080
  58326. else
  58327. pTDefRegMap(@Self)^.&set := $00000080;
  58328. end;
  58329. function TPORTE_LATE.getLATE7 : TBits_1; inline;
  58330. begin
  58331. getLATE7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  58332. end;
  58333. procedure TPORTE_LATE.setw(thebits : TBits_32); inline;
  58334. begin
  58335. pTDefRegMap(@Self)^.val := thebits;
  58336. end;
  58337. function TPORTE_LATE.getw : TBits_32; inline;
  58338. begin
  58339. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  58340. end;
  58341. procedure TPORTE_ODCE.setODCE0; inline;
  58342. begin
  58343. pTDefRegMap(@Self)^.&set := $00000001;
  58344. end;
  58345. procedure TPORTE_ODCE.clearODCE0; inline;
  58346. begin
  58347. pTDefRegMap(@Self)^.clr := $00000001;
  58348. end;
  58349. procedure TPORTE_ODCE.setODCE0(thebits : TBits_1); inline;
  58350. begin
  58351. if thebits = 0 then
  58352. pTDefRegMap(@Self)^.clr := $00000001
  58353. else
  58354. pTDefRegMap(@Self)^.&set := $00000001;
  58355. end;
  58356. function TPORTE_ODCE.getODCE0 : TBits_1; inline;
  58357. begin
  58358. getODCE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  58359. end;
  58360. procedure TPORTE_ODCE.setODCE1; inline;
  58361. begin
  58362. pTDefRegMap(@Self)^.&set := $00000002;
  58363. end;
  58364. procedure TPORTE_ODCE.clearODCE1; inline;
  58365. begin
  58366. pTDefRegMap(@Self)^.clr := $00000002;
  58367. end;
  58368. procedure TPORTE_ODCE.setODCE1(thebits : TBits_1); inline;
  58369. begin
  58370. if thebits = 0 then
  58371. pTDefRegMap(@Self)^.clr := $00000002
  58372. else
  58373. pTDefRegMap(@Self)^.&set := $00000002;
  58374. end;
  58375. function TPORTE_ODCE.getODCE1 : TBits_1; inline;
  58376. begin
  58377. getODCE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  58378. end;
  58379. procedure TPORTE_ODCE.setODCE2; inline;
  58380. begin
  58381. pTDefRegMap(@Self)^.&set := $00000004;
  58382. end;
  58383. procedure TPORTE_ODCE.clearODCE2; inline;
  58384. begin
  58385. pTDefRegMap(@Self)^.clr := $00000004;
  58386. end;
  58387. procedure TPORTE_ODCE.setODCE2(thebits : TBits_1); inline;
  58388. begin
  58389. if thebits = 0 then
  58390. pTDefRegMap(@Self)^.clr := $00000004
  58391. else
  58392. pTDefRegMap(@Self)^.&set := $00000004;
  58393. end;
  58394. function TPORTE_ODCE.getODCE2 : TBits_1; inline;
  58395. begin
  58396. getODCE2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  58397. end;
  58398. procedure TPORTE_ODCE.setODCE3; inline;
  58399. begin
  58400. pTDefRegMap(@Self)^.&set := $00000008;
  58401. end;
  58402. procedure TPORTE_ODCE.clearODCE3; inline;
  58403. begin
  58404. pTDefRegMap(@Self)^.clr := $00000008;
  58405. end;
  58406. procedure TPORTE_ODCE.setODCE3(thebits : TBits_1); inline;
  58407. begin
  58408. if thebits = 0 then
  58409. pTDefRegMap(@Self)^.clr := $00000008
  58410. else
  58411. pTDefRegMap(@Self)^.&set := $00000008;
  58412. end;
  58413. function TPORTE_ODCE.getODCE3 : TBits_1; inline;
  58414. begin
  58415. getODCE3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  58416. end;
  58417. procedure TPORTE_ODCE.setODCE4; inline;
  58418. begin
  58419. pTDefRegMap(@Self)^.&set := $00000010;
  58420. end;
  58421. procedure TPORTE_ODCE.clearODCE4; inline;
  58422. begin
  58423. pTDefRegMap(@Self)^.clr := $00000010;
  58424. end;
  58425. procedure TPORTE_ODCE.setODCE4(thebits : TBits_1); inline;
  58426. begin
  58427. if thebits = 0 then
  58428. pTDefRegMap(@Self)^.clr := $00000010
  58429. else
  58430. pTDefRegMap(@Self)^.&set := $00000010;
  58431. end;
  58432. function TPORTE_ODCE.getODCE4 : TBits_1; inline;
  58433. begin
  58434. getODCE4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  58435. end;
  58436. procedure TPORTE_ODCE.setODCE5; inline;
  58437. begin
  58438. pTDefRegMap(@Self)^.&set := $00000020;
  58439. end;
  58440. procedure TPORTE_ODCE.clearODCE5; inline;
  58441. begin
  58442. pTDefRegMap(@Self)^.clr := $00000020;
  58443. end;
  58444. procedure TPORTE_ODCE.setODCE5(thebits : TBits_1); inline;
  58445. begin
  58446. if thebits = 0 then
  58447. pTDefRegMap(@Self)^.clr := $00000020
  58448. else
  58449. pTDefRegMap(@Self)^.&set := $00000020;
  58450. end;
  58451. function TPORTE_ODCE.getODCE5 : TBits_1; inline;
  58452. begin
  58453. getODCE5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  58454. end;
  58455. procedure TPORTE_ODCE.setODCE6; inline;
  58456. begin
  58457. pTDefRegMap(@Self)^.&set := $00000040;
  58458. end;
  58459. procedure TPORTE_ODCE.clearODCE6; inline;
  58460. begin
  58461. pTDefRegMap(@Self)^.clr := $00000040;
  58462. end;
  58463. procedure TPORTE_ODCE.setODCE6(thebits : TBits_1); inline;
  58464. begin
  58465. if thebits = 0 then
  58466. pTDefRegMap(@Self)^.clr := $00000040
  58467. else
  58468. pTDefRegMap(@Self)^.&set := $00000040;
  58469. end;
  58470. function TPORTE_ODCE.getODCE6 : TBits_1; inline;
  58471. begin
  58472. getODCE6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  58473. end;
  58474. procedure TPORTE_ODCE.setODCE7; inline;
  58475. begin
  58476. pTDefRegMap(@Self)^.&set := $00000080;
  58477. end;
  58478. procedure TPORTE_ODCE.clearODCE7; inline;
  58479. begin
  58480. pTDefRegMap(@Self)^.clr := $00000080;
  58481. end;
  58482. procedure TPORTE_ODCE.setODCE7(thebits : TBits_1); inline;
  58483. begin
  58484. if thebits = 0 then
  58485. pTDefRegMap(@Self)^.clr := $00000080
  58486. else
  58487. pTDefRegMap(@Self)^.&set := $00000080;
  58488. end;
  58489. function TPORTE_ODCE.getODCE7 : TBits_1; inline;
  58490. begin
  58491. getODCE7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  58492. end;
  58493. procedure TPORTE_ODCE.setw(thebits : TBits_32); inline;
  58494. begin
  58495. pTDefRegMap(@Self)^.val := thebits;
  58496. end;
  58497. function TPORTE_ODCE.getw : TBits_32; inline;
  58498. begin
  58499. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  58500. end;
  58501. procedure TPORTF_TRISF.setTRISF0; inline;
  58502. begin
  58503. pTDefRegMap(@Self)^.&set := $00000001;
  58504. end;
  58505. procedure TPORTF_TRISF.clearTRISF0; inline;
  58506. begin
  58507. pTDefRegMap(@Self)^.clr := $00000001;
  58508. end;
  58509. procedure TPORTF_TRISF.setTRISF0(thebits : TBits_1); inline;
  58510. begin
  58511. if thebits = 0 then
  58512. pTDefRegMap(@Self)^.clr := $00000001
  58513. else
  58514. pTDefRegMap(@Self)^.&set := $00000001;
  58515. end;
  58516. function TPORTF_TRISF.getTRISF0 : TBits_1; inline;
  58517. begin
  58518. getTRISF0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  58519. end;
  58520. procedure TPORTF_TRISF.setTRISF1; inline;
  58521. begin
  58522. pTDefRegMap(@Self)^.&set := $00000002;
  58523. end;
  58524. procedure TPORTF_TRISF.clearTRISF1; inline;
  58525. begin
  58526. pTDefRegMap(@Self)^.clr := $00000002;
  58527. end;
  58528. procedure TPORTF_TRISF.setTRISF1(thebits : TBits_1); inline;
  58529. begin
  58530. if thebits = 0 then
  58531. pTDefRegMap(@Self)^.clr := $00000002
  58532. else
  58533. pTDefRegMap(@Self)^.&set := $00000002;
  58534. end;
  58535. function TPORTF_TRISF.getTRISF1 : TBits_1; inline;
  58536. begin
  58537. getTRISF1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  58538. end;
  58539. procedure TPORTF_TRISF.setTRISF2; inline;
  58540. begin
  58541. pTDefRegMap(@Self)^.&set := $00000004;
  58542. end;
  58543. procedure TPORTF_TRISF.clearTRISF2; inline;
  58544. begin
  58545. pTDefRegMap(@Self)^.clr := $00000004;
  58546. end;
  58547. procedure TPORTF_TRISF.setTRISF2(thebits : TBits_1); inline;
  58548. begin
  58549. if thebits = 0 then
  58550. pTDefRegMap(@Self)^.clr := $00000004
  58551. else
  58552. pTDefRegMap(@Self)^.&set := $00000004;
  58553. end;
  58554. function TPORTF_TRISF.getTRISF2 : TBits_1; inline;
  58555. begin
  58556. getTRISF2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  58557. end;
  58558. procedure TPORTF_TRISF.setTRISF3; inline;
  58559. begin
  58560. pTDefRegMap(@Self)^.&set := $00000008;
  58561. end;
  58562. procedure TPORTF_TRISF.clearTRISF3; inline;
  58563. begin
  58564. pTDefRegMap(@Self)^.clr := $00000008;
  58565. end;
  58566. procedure TPORTF_TRISF.setTRISF3(thebits : TBits_1); inline;
  58567. begin
  58568. if thebits = 0 then
  58569. pTDefRegMap(@Self)^.clr := $00000008
  58570. else
  58571. pTDefRegMap(@Self)^.&set := $00000008;
  58572. end;
  58573. function TPORTF_TRISF.getTRISF3 : TBits_1; inline;
  58574. begin
  58575. getTRISF3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  58576. end;
  58577. procedure TPORTF_TRISF.setTRISF4; inline;
  58578. begin
  58579. pTDefRegMap(@Self)^.&set := $00000010;
  58580. end;
  58581. procedure TPORTF_TRISF.clearTRISF4; inline;
  58582. begin
  58583. pTDefRegMap(@Self)^.clr := $00000010;
  58584. end;
  58585. procedure TPORTF_TRISF.setTRISF4(thebits : TBits_1); inline;
  58586. begin
  58587. if thebits = 0 then
  58588. pTDefRegMap(@Self)^.clr := $00000010
  58589. else
  58590. pTDefRegMap(@Self)^.&set := $00000010;
  58591. end;
  58592. function TPORTF_TRISF.getTRISF4 : TBits_1; inline;
  58593. begin
  58594. getTRISF4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  58595. end;
  58596. procedure TPORTF_TRISF.setTRISF5; inline;
  58597. begin
  58598. pTDefRegMap(@Self)^.&set := $00000020;
  58599. end;
  58600. procedure TPORTF_TRISF.clearTRISF5; inline;
  58601. begin
  58602. pTDefRegMap(@Self)^.clr := $00000020;
  58603. end;
  58604. procedure TPORTF_TRISF.setTRISF5(thebits : TBits_1); inline;
  58605. begin
  58606. if thebits = 0 then
  58607. pTDefRegMap(@Self)^.clr := $00000020
  58608. else
  58609. pTDefRegMap(@Self)^.&set := $00000020;
  58610. end;
  58611. function TPORTF_TRISF.getTRISF5 : TBits_1; inline;
  58612. begin
  58613. getTRISF5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  58614. end;
  58615. procedure TPORTF_TRISF.setw(thebits : TBits_32); inline;
  58616. begin
  58617. pTDefRegMap(@Self)^.val := thebits;
  58618. end;
  58619. function TPORTF_TRISF.getw : TBits_32; inline;
  58620. begin
  58621. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  58622. end;
  58623. procedure TPORTF_PORTF.setRF0; inline;
  58624. begin
  58625. pTDefRegMap(@Self)^.&set := $00000001;
  58626. end;
  58627. procedure TPORTF_PORTF.clearRF0; inline;
  58628. begin
  58629. pTDefRegMap(@Self)^.clr := $00000001;
  58630. end;
  58631. procedure TPORTF_PORTF.setRF0(thebits : TBits_1); inline;
  58632. begin
  58633. if thebits = 0 then
  58634. pTDefRegMap(@Self)^.clr := $00000001
  58635. else
  58636. pTDefRegMap(@Self)^.&set := $00000001;
  58637. end;
  58638. function TPORTF_PORTF.getRF0 : TBits_1; inline;
  58639. begin
  58640. getRF0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  58641. end;
  58642. procedure TPORTF_PORTF.setRF1; inline;
  58643. begin
  58644. pTDefRegMap(@Self)^.&set := $00000002;
  58645. end;
  58646. procedure TPORTF_PORTF.clearRF1; inline;
  58647. begin
  58648. pTDefRegMap(@Self)^.clr := $00000002;
  58649. end;
  58650. procedure TPORTF_PORTF.setRF1(thebits : TBits_1); inline;
  58651. begin
  58652. if thebits = 0 then
  58653. pTDefRegMap(@Self)^.clr := $00000002
  58654. else
  58655. pTDefRegMap(@Self)^.&set := $00000002;
  58656. end;
  58657. function TPORTF_PORTF.getRF1 : TBits_1; inline;
  58658. begin
  58659. getRF1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  58660. end;
  58661. procedure TPORTF_PORTF.setRF2; inline;
  58662. begin
  58663. pTDefRegMap(@Self)^.&set := $00000004;
  58664. end;
  58665. procedure TPORTF_PORTF.clearRF2; inline;
  58666. begin
  58667. pTDefRegMap(@Self)^.clr := $00000004;
  58668. end;
  58669. procedure TPORTF_PORTF.setRF2(thebits : TBits_1); inline;
  58670. begin
  58671. if thebits = 0 then
  58672. pTDefRegMap(@Self)^.clr := $00000004
  58673. else
  58674. pTDefRegMap(@Self)^.&set := $00000004;
  58675. end;
  58676. function TPORTF_PORTF.getRF2 : TBits_1; inline;
  58677. begin
  58678. getRF2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  58679. end;
  58680. procedure TPORTF_PORTF.setRF3; inline;
  58681. begin
  58682. pTDefRegMap(@Self)^.&set := $00000008;
  58683. end;
  58684. procedure TPORTF_PORTF.clearRF3; inline;
  58685. begin
  58686. pTDefRegMap(@Self)^.clr := $00000008;
  58687. end;
  58688. procedure TPORTF_PORTF.setRF3(thebits : TBits_1); inline;
  58689. begin
  58690. if thebits = 0 then
  58691. pTDefRegMap(@Self)^.clr := $00000008
  58692. else
  58693. pTDefRegMap(@Self)^.&set := $00000008;
  58694. end;
  58695. function TPORTF_PORTF.getRF3 : TBits_1; inline;
  58696. begin
  58697. getRF3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  58698. end;
  58699. procedure TPORTF_PORTF.setRF4; inline;
  58700. begin
  58701. pTDefRegMap(@Self)^.&set := $00000010;
  58702. end;
  58703. procedure TPORTF_PORTF.clearRF4; inline;
  58704. begin
  58705. pTDefRegMap(@Self)^.clr := $00000010;
  58706. end;
  58707. procedure TPORTF_PORTF.setRF4(thebits : TBits_1); inline;
  58708. begin
  58709. if thebits = 0 then
  58710. pTDefRegMap(@Self)^.clr := $00000010
  58711. else
  58712. pTDefRegMap(@Self)^.&set := $00000010;
  58713. end;
  58714. function TPORTF_PORTF.getRF4 : TBits_1; inline;
  58715. begin
  58716. getRF4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  58717. end;
  58718. procedure TPORTF_PORTF.setRF5; inline;
  58719. begin
  58720. pTDefRegMap(@Self)^.&set := $00000020;
  58721. end;
  58722. procedure TPORTF_PORTF.clearRF5; inline;
  58723. begin
  58724. pTDefRegMap(@Self)^.clr := $00000020;
  58725. end;
  58726. procedure TPORTF_PORTF.setRF5(thebits : TBits_1); inline;
  58727. begin
  58728. if thebits = 0 then
  58729. pTDefRegMap(@Self)^.clr := $00000020
  58730. else
  58731. pTDefRegMap(@Self)^.&set := $00000020;
  58732. end;
  58733. function TPORTF_PORTF.getRF5 : TBits_1; inline;
  58734. begin
  58735. getRF5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  58736. end;
  58737. procedure TPORTF_PORTF.setw(thebits : TBits_32); inline;
  58738. begin
  58739. pTDefRegMap(@Self)^.val := thebits;
  58740. end;
  58741. function TPORTF_PORTF.getw : TBits_32; inline;
  58742. begin
  58743. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  58744. end;
  58745. procedure TPORTF_LATF.setLATF0; inline;
  58746. begin
  58747. pTDefRegMap(@Self)^.&set := $00000001;
  58748. end;
  58749. procedure TPORTF_LATF.clearLATF0; inline;
  58750. begin
  58751. pTDefRegMap(@Self)^.clr := $00000001;
  58752. end;
  58753. procedure TPORTF_LATF.setLATF0(thebits : TBits_1); inline;
  58754. begin
  58755. if thebits = 0 then
  58756. pTDefRegMap(@Self)^.clr := $00000001
  58757. else
  58758. pTDefRegMap(@Self)^.&set := $00000001;
  58759. end;
  58760. function TPORTF_LATF.getLATF0 : TBits_1; inline;
  58761. begin
  58762. getLATF0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  58763. end;
  58764. procedure TPORTF_LATF.setLATF1; inline;
  58765. begin
  58766. pTDefRegMap(@Self)^.&set := $00000002;
  58767. end;
  58768. procedure TPORTF_LATF.clearLATF1; inline;
  58769. begin
  58770. pTDefRegMap(@Self)^.clr := $00000002;
  58771. end;
  58772. procedure TPORTF_LATF.setLATF1(thebits : TBits_1); inline;
  58773. begin
  58774. if thebits = 0 then
  58775. pTDefRegMap(@Self)^.clr := $00000002
  58776. else
  58777. pTDefRegMap(@Self)^.&set := $00000002;
  58778. end;
  58779. function TPORTF_LATF.getLATF1 : TBits_1; inline;
  58780. begin
  58781. getLATF1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  58782. end;
  58783. procedure TPORTF_LATF.setLATF2; inline;
  58784. begin
  58785. pTDefRegMap(@Self)^.&set := $00000004;
  58786. end;
  58787. procedure TPORTF_LATF.clearLATF2; inline;
  58788. begin
  58789. pTDefRegMap(@Self)^.clr := $00000004;
  58790. end;
  58791. procedure TPORTF_LATF.setLATF2(thebits : TBits_1); inline;
  58792. begin
  58793. if thebits = 0 then
  58794. pTDefRegMap(@Self)^.clr := $00000004
  58795. else
  58796. pTDefRegMap(@Self)^.&set := $00000004;
  58797. end;
  58798. function TPORTF_LATF.getLATF2 : TBits_1; inline;
  58799. begin
  58800. getLATF2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  58801. end;
  58802. procedure TPORTF_LATF.setLATF3; inline;
  58803. begin
  58804. pTDefRegMap(@Self)^.&set := $00000008;
  58805. end;
  58806. procedure TPORTF_LATF.clearLATF3; inline;
  58807. begin
  58808. pTDefRegMap(@Self)^.clr := $00000008;
  58809. end;
  58810. procedure TPORTF_LATF.setLATF3(thebits : TBits_1); inline;
  58811. begin
  58812. if thebits = 0 then
  58813. pTDefRegMap(@Self)^.clr := $00000008
  58814. else
  58815. pTDefRegMap(@Self)^.&set := $00000008;
  58816. end;
  58817. function TPORTF_LATF.getLATF3 : TBits_1; inline;
  58818. begin
  58819. getLATF3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  58820. end;
  58821. procedure TPORTF_LATF.setLATF4; inline;
  58822. begin
  58823. pTDefRegMap(@Self)^.&set := $00000010;
  58824. end;
  58825. procedure TPORTF_LATF.clearLATF4; inline;
  58826. begin
  58827. pTDefRegMap(@Self)^.clr := $00000010;
  58828. end;
  58829. procedure TPORTF_LATF.setLATF4(thebits : TBits_1); inline;
  58830. begin
  58831. if thebits = 0 then
  58832. pTDefRegMap(@Self)^.clr := $00000010
  58833. else
  58834. pTDefRegMap(@Self)^.&set := $00000010;
  58835. end;
  58836. function TPORTF_LATF.getLATF4 : TBits_1; inline;
  58837. begin
  58838. getLATF4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  58839. end;
  58840. procedure TPORTF_LATF.setLATF5; inline;
  58841. begin
  58842. pTDefRegMap(@Self)^.&set := $00000020;
  58843. end;
  58844. procedure TPORTF_LATF.clearLATF5; inline;
  58845. begin
  58846. pTDefRegMap(@Self)^.clr := $00000020;
  58847. end;
  58848. procedure TPORTF_LATF.setLATF5(thebits : TBits_1); inline;
  58849. begin
  58850. if thebits = 0 then
  58851. pTDefRegMap(@Self)^.clr := $00000020
  58852. else
  58853. pTDefRegMap(@Self)^.&set := $00000020;
  58854. end;
  58855. function TPORTF_LATF.getLATF5 : TBits_1; inline;
  58856. begin
  58857. getLATF5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  58858. end;
  58859. procedure TPORTF_LATF.setw(thebits : TBits_32); inline;
  58860. begin
  58861. pTDefRegMap(@Self)^.val := thebits;
  58862. end;
  58863. function TPORTF_LATF.getw : TBits_32; inline;
  58864. begin
  58865. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  58866. end;
  58867. procedure TPORTF_ODCF.setODCF0; inline;
  58868. begin
  58869. pTDefRegMap(@Self)^.&set := $00000001;
  58870. end;
  58871. procedure TPORTF_ODCF.clearODCF0; inline;
  58872. begin
  58873. pTDefRegMap(@Self)^.clr := $00000001;
  58874. end;
  58875. procedure TPORTF_ODCF.setODCF0(thebits : TBits_1); inline;
  58876. begin
  58877. if thebits = 0 then
  58878. pTDefRegMap(@Self)^.clr := $00000001
  58879. else
  58880. pTDefRegMap(@Self)^.&set := $00000001;
  58881. end;
  58882. function TPORTF_ODCF.getODCF0 : TBits_1; inline;
  58883. begin
  58884. getODCF0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  58885. end;
  58886. procedure TPORTF_ODCF.setODCF1; inline;
  58887. begin
  58888. pTDefRegMap(@Self)^.&set := $00000002;
  58889. end;
  58890. procedure TPORTF_ODCF.clearODCF1; inline;
  58891. begin
  58892. pTDefRegMap(@Self)^.clr := $00000002;
  58893. end;
  58894. procedure TPORTF_ODCF.setODCF1(thebits : TBits_1); inline;
  58895. begin
  58896. if thebits = 0 then
  58897. pTDefRegMap(@Self)^.clr := $00000002
  58898. else
  58899. pTDefRegMap(@Self)^.&set := $00000002;
  58900. end;
  58901. function TPORTF_ODCF.getODCF1 : TBits_1; inline;
  58902. begin
  58903. getODCF1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  58904. end;
  58905. procedure TPORTF_ODCF.setODCF2; inline;
  58906. begin
  58907. pTDefRegMap(@Self)^.&set := $00000004;
  58908. end;
  58909. procedure TPORTF_ODCF.clearODCF2; inline;
  58910. begin
  58911. pTDefRegMap(@Self)^.clr := $00000004;
  58912. end;
  58913. procedure TPORTF_ODCF.setODCF2(thebits : TBits_1); inline;
  58914. begin
  58915. if thebits = 0 then
  58916. pTDefRegMap(@Self)^.clr := $00000004
  58917. else
  58918. pTDefRegMap(@Self)^.&set := $00000004;
  58919. end;
  58920. function TPORTF_ODCF.getODCF2 : TBits_1; inline;
  58921. begin
  58922. getODCF2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  58923. end;
  58924. procedure TPORTF_ODCF.setODCF3; inline;
  58925. begin
  58926. pTDefRegMap(@Self)^.&set := $00000008;
  58927. end;
  58928. procedure TPORTF_ODCF.clearODCF3; inline;
  58929. begin
  58930. pTDefRegMap(@Self)^.clr := $00000008;
  58931. end;
  58932. procedure TPORTF_ODCF.setODCF3(thebits : TBits_1); inline;
  58933. begin
  58934. if thebits = 0 then
  58935. pTDefRegMap(@Self)^.clr := $00000008
  58936. else
  58937. pTDefRegMap(@Self)^.&set := $00000008;
  58938. end;
  58939. function TPORTF_ODCF.getODCF3 : TBits_1; inline;
  58940. begin
  58941. getODCF3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  58942. end;
  58943. procedure TPORTF_ODCF.setODCF4; inline;
  58944. begin
  58945. pTDefRegMap(@Self)^.&set := $00000010;
  58946. end;
  58947. procedure TPORTF_ODCF.clearODCF4; inline;
  58948. begin
  58949. pTDefRegMap(@Self)^.clr := $00000010;
  58950. end;
  58951. procedure TPORTF_ODCF.setODCF4(thebits : TBits_1); inline;
  58952. begin
  58953. if thebits = 0 then
  58954. pTDefRegMap(@Self)^.clr := $00000010
  58955. else
  58956. pTDefRegMap(@Self)^.&set := $00000010;
  58957. end;
  58958. function TPORTF_ODCF.getODCF4 : TBits_1; inline;
  58959. begin
  58960. getODCF4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  58961. end;
  58962. procedure TPORTF_ODCF.setODCF5; inline;
  58963. begin
  58964. pTDefRegMap(@Self)^.&set := $00000020;
  58965. end;
  58966. procedure TPORTF_ODCF.clearODCF5; inline;
  58967. begin
  58968. pTDefRegMap(@Self)^.clr := $00000020;
  58969. end;
  58970. procedure TPORTF_ODCF.setODCF5(thebits : TBits_1); inline;
  58971. begin
  58972. if thebits = 0 then
  58973. pTDefRegMap(@Self)^.clr := $00000020
  58974. else
  58975. pTDefRegMap(@Self)^.&set := $00000020;
  58976. end;
  58977. function TPORTF_ODCF.getODCF5 : TBits_1; inline;
  58978. begin
  58979. getODCF5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  58980. end;
  58981. procedure TPORTF_ODCF.setw(thebits : TBits_32); inline;
  58982. begin
  58983. pTDefRegMap(@Self)^.val := thebits;
  58984. end;
  58985. function TPORTF_ODCF.getw : TBits_32; inline;
  58986. begin
  58987. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  58988. end;
  58989. procedure TPORTG_TRISG.setTRISG2; inline;
  58990. begin
  58991. pTDefRegMap(@Self)^.&set := $00000004;
  58992. end;
  58993. procedure TPORTG_TRISG.clearTRISG2; inline;
  58994. begin
  58995. pTDefRegMap(@Self)^.clr := $00000004;
  58996. end;
  58997. procedure TPORTG_TRISG.setTRISG2(thebits : TBits_1); inline;
  58998. begin
  58999. if thebits = 0 then
  59000. pTDefRegMap(@Self)^.clr := $00000004
  59001. else
  59002. pTDefRegMap(@Self)^.&set := $00000004;
  59003. end;
  59004. function TPORTG_TRISG.getTRISG2 : TBits_1; inline;
  59005. begin
  59006. getTRISG2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  59007. end;
  59008. procedure TPORTG_TRISG.setTRISG3; inline;
  59009. begin
  59010. pTDefRegMap(@Self)^.&set := $00000008;
  59011. end;
  59012. procedure TPORTG_TRISG.clearTRISG3; inline;
  59013. begin
  59014. pTDefRegMap(@Self)^.clr := $00000008;
  59015. end;
  59016. procedure TPORTG_TRISG.setTRISG3(thebits : TBits_1); inline;
  59017. begin
  59018. if thebits = 0 then
  59019. pTDefRegMap(@Self)^.clr := $00000008
  59020. else
  59021. pTDefRegMap(@Self)^.&set := $00000008;
  59022. end;
  59023. function TPORTG_TRISG.getTRISG3 : TBits_1; inline;
  59024. begin
  59025. getTRISG3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  59026. end;
  59027. procedure TPORTG_TRISG.setTRISG6; inline;
  59028. begin
  59029. pTDefRegMap(@Self)^.&set := $00000040;
  59030. end;
  59031. procedure TPORTG_TRISG.clearTRISG6; inline;
  59032. begin
  59033. pTDefRegMap(@Self)^.clr := $00000040;
  59034. end;
  59035. procedure TPORTG_TRISG.setTRISG6(thebits : TBits_1); inline;
  59036. begin
  59037. if thebits = 0 then
  59038. pTDefRegMap(@Self)^.clr := $00000040
  59039. else
  59040. pTDefRegMap(@Self)^.&set := $00000040;
  59041. end;
  59042. function TPORTG_TRISG.getTRISG6 : TBits_1; inline;
  59043. begin
  59044. getTRISG6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  59045. end;
  59046. procedure TPORTG_TRISG.setTRISG7; inline;
  59047. begin
  59048. pTDefRegMap(@Self)^.&set := $00000080;
  59049. end;
  59050. procedure TPORTG_TRISG.clearTRISG7; inline;
  59051. begin
  59052. pTDefRegMap(@Self)^.clr := $00000080;
  59053. end;
  59054. procedure TPORTG_TRISG.setTRISG7(thebits : TBits_1); inline;
  59055. begin
  59056. if thebits = 0 then
  59057. pTDefRegMap(@Self)^.clr := $00000080
  59058. else
  59059. pTDefRegMap(@Self)^.&set := $00000080;
  59060. end;
  59061. function TPORTG_TRISG.getTRISG7 : TBits_1; inline;
  59062. begin
  59063. getTRISG7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  59064. end;
  59065. procedure TPORTG_TRISG.setTRISG8; inline;
  59066. begin
  59067. pTDefRegMap(@Self)^.&set := $00000100;
  59068. end;
  59069. procedure TPORTG_TRISG.clearTRISG8; inline;
  59070. begin
  59071. pTDefRegMap(@Self)^.clr := $00000100;
  59072. end;
  59073. procedure TPORTG_TRISG.setTRISG8(thebits : TBits_1); inline;
  59074. begin
  59075. if thebits = 0 then
  59076. pTDefRegMap(@Self)^.clr := $00000100
  59077. else
  59078. pTDefRegMap(@Self)^.&set := $00000100;
  59079. end;
  59080. function TPORTG_TRISG.getTRISG8 : TBits_1; inline;
  59081. begin
  59082. getTRISG8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  59083. end;
  59084. procedure TPORTG_TRISG.setTRISG9; inline;
  59085. begin
  59086. pTDefRegMap(@Self)^.&set := $00000200;
  59087. end;
  59088. procedure TPORTG_TRISG.clearTRISG9; inline;
  59089. begin
  59090. pTDefRegMap(@Self)^.clr := $00000200;
  59091. end;
  59092. procedure TPORTG_TRISG.setTRISG9(thebits : TBits_1); inline;
  59093. begin
  59094. if thebits = 0 then
  59095. pTDefRegMap(@Self)^.clr := $00000200
  59096. else
  59097. pTDefRegMap(@Self)^.&set := $00000200;
  59098. end;
  59099. function TPORTG_TRISG.getTRISG9 : TBits_1; inline;
  59100. begin
  59101. getTRISG9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  59102. end;
  59103. procedure TPORTG_TRISG.setw(thebits : TBits_32); inline;
  59104. begin
  59105. pTDefRegMap(@Self)^.val := thebits;
  59106. end;
  59107. function TPORTG_TRISG.getw : TBits_32; inline;
  59108. begin
  59109. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  59110. end;
  59111. procedure TPORTG_PORTG.setRG2; inline;
  59112. begin
  59113. pTDefRegMap(@Self)^.&set := $00000004;
  59114. end;
  59115. procedure TPORTG_PORTG.clearRG2; inline;
  59116. begin
  59117. pTDefRegMap(@Self)^.clr := $00000004;
  59118. end;
  59119. procedure TPORTG_PORTG.setRG2(thebits : TBits_1); inline;
  59120. begin
  59121. if thebits = 0 then
  59122. pTDefRegMap(@Self)^.clr := $00000004
  59123. else
  59124. pTDefRegMap(@Self)^.&set := $00000004;
  59125. end;
  59126. function TPORTG_PORTG.getRG2 : TBits_1; inline;
  59127. begin
  59128. getRG2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  59129. end;
  59130. procedure TPORTG_PORTG.setRG3; inline;
  59131. begin
  59132. pTDefRegMap(@Self)^.&set := $00000008;
  59133. end;
  59134. procedure TPORTG_PORTG.clearRG3; inline;
  59135. begin
  59136. pTDefRegMap(@Self)^.clr := $00000008;
  59137. end;
  59138. procedure TPORTG_PORTG.setRG3(thebits : TBits_1); inline;
  59139. begin
  59140. if thebits = 0 then
  59141. pTDefRegMap(@Self)^.clr := $00000008
  59142. else
  59143. pTDefRegMap(@Self)^.&set := $00000008;
  59144. end;
  59145. function TPORTG_PORTG.getRG3 : TBits_1; inline;
  59146. begin
  59147. getRG3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  59148. end;
  59149. procedure TPORTG_PORTG.setRG6; inline;
  59150. begin
  59151. pTDefRegMap(@Self)^.&set := $00000040;
  59152. end;
  59153. procedure TPORTG_PORTG.clearRG6; inline;
  59154. begin
  59155. pTDefRegMap(@Self)^.clr := $00000040;
  59156. end;
  59157. procedure TPORTG_PORTG.setRG6(thebits : TBits_1); inline;
  59158. begin
  59159. if thebits = 0 then
  59160. pTDefRegMap(@Self)^.clr := $00000040
  59161. else
  59162. pTDefRegMap(@Self)^.&set := $00000040;
  59163. end;
  59164. function TPORTG_PORTG.getRG6 : TBits_1; inline;
  59165. begin
  59166. getRG6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  59167. end;
  59168. procedure TPORTG_PORTG.setRG7; inline;
  59169. begin
  59170. pTDefRegMap(@Self)^.&set := $00000080;
  59171. end;
  59172. procedure TPORTG_PORTG.clearRG7; inline;
  59173. begin
  59174. pTDefRegMap(@Self)^.clr := $00000080;
  59175. end;
  59176. procedure TPORTG_PORTG.setRG7(thebits : TBits_1); inline;
  59177. begin
  59178. if thebits = 0 then
  59179. pTDefRegMap(@Self)^.clr := $00000080
  59180. else
  59181. pTDefRegMap(@Self)^.&set := $00000080;
  59182. end;
  59183. function TPORTG_PORTG.getRG7 : TBits_1; inline;
  59184. begin
  59185. getRG7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  59186. end;
  59187. procedure TPORTG_PORTG.setRG8; inline;
  59188. begin
  59189. pTDefRegMap(@Self)^.&set := $00000100;
  59190. end;
  59191. procedure TPORTG_PORTG.clearRG8; inline;
  59192. begin
  59193. pTDefRegMap(@Self)^.clr := $00000100;
  59194. end;
  59195. procedure TPORTG_PORTG.setRG8(thebits : TBits_1); inline;
  59196. begin
  59197. if thebits = 0 then
  59198. pTDefRegMap(@Self)^.clr := $00000100
  59199. else
  59200. pTDefRegMap(@Self)^.&set := $00000100;
  59201. end;
  59202. function TPORTG_PORTG.getRG8 : TBits_1; inline;
  59203. begin
  59204. getRG8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  59205. end;
  59206. procedure TPORTG_PORTG.setRG9; inline;
  59207. begin
  59208. pTDefRegMap(@Self)^.&set := $00000200;
  59209. end;
  59210. procedure TPORTG_PORTG.clearRG9; inline;
  59211. begin
  59212. pTDefRegMap(@Self)^.clr := $00000200;
  59213. end;
  59214. procedure TPORTG_PORTG.setRG9(thebits : TBits_1); inline;
  59215. begin
  59216. if thebits = 0 then
  59217. pTDefRegMap(@Self)^.clr := $00000200
  59218. else
  59219. pTDefRegMap(@Self)^.&set := $00000200;
  59220. end;
  59221. function TPORTG_PORTG.getRG9 : TBits_1; inline;
  59222. begin
  59223. getRG9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  59224. end;
  59225. procedure TPORTG_PORTG.setw(thebits : TBits_32); inline;
  59226. begin
  59227. pTDefRegMap(@Self)^.val := thebits;
  59228. end;
  59229. function TPORTG_PORTG.getw : TBits_32; inline;
  59230. begin
  59231. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  59232. end;
  59233. procedure TPORTG_LATG.setLATG2; inline;
  59234. begin
  59235. pTDefRegMap(@Self)^.&set := $00000004;
  59236. end;
  59237. procedure TPORTG_LATG.clearLATG2; inline;
  59238. begin
  59239. pTDefRegMap(@Self)^.clr := $00000004;
  59240. end;
  59241. procedure TPORTG_LATG.setLATG2(thebits : TBits_1); inline;
  59242. begin
  59243. if thebits = 0 then
  59244. pTDefRegMap(@Self)^.clr := $00000004
  59245. else
  59246. pTDefRegMap(@Self)^.&set := $00000004;
  59247. end;
  59248. function TPORTG_LATG.getLATG2 : TBits_1; inline;
  59249. begin
  59250. getLATG2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  59251. end;
  59252. procedure TPORTG_LATG.setLATG3; inline;
  59253. begin
  59254. pTDefRegMap(@Self)^.&set := $00000008;
  59255. end;
  59256. procedure TPORTG_LATG.clearLATG3; inline;
  59257. begin
  59258. pTDefRegMap(@Self)^.clr := $00000008;
  59259. end;
  59260. procedure TPORTG_LATG.setLATG3(thebits : TBits_1); inline;
  59261. begin
  59262. if thebits = 0 then
  59263. pTDefRegMap(@Self)^.clr := $00000008
  59264. else
  59265. pTDefRegMap(@Self)^.&set := $00000008;
  59266. end;
  59267. function TPORTG_LATG.getLATG3 : TBits_1; inline;
  59268. begin
  59269. getLATG3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  59270. end;
  59271. procedure TPORTG_LATG.setLATG6; inline;
  59272. begin
  59273. pTDefRegMap(@Self)^.&set := $00000040;
  59274. end;
  59275. procedure TPORTG_LATG.clearLATG6; inline;
  59276. begin
  59277. pTDefRegMap(@Self)^.clr := $00000040;
  59278. end;
  59279. procedure TPORTG_LATG.setLATG6(thebits : TBits_1); inline;
  59280. begin
  59281. if thebits = 0 then
  59282. pTDefRegMap(@Self)^.clr := $00000040
  59283. else
  59284. pTDefRegMap(@Self)^.&set := $00000040;
  59285. end;
  59286. function TPORTG_LATG.getLATG6 : TBits_1; inline;
  59287. begin
  59288. getLATG6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  59289. end;
  59290. procedure TPORTG_LATG.setLATG7; inline;
  59291. begin
  59292. pTDefRegMap(@Self)^.&set := $00000080;
  59293. end;
  59294. procedure TPORTG_LATG.clearLATG7; inline;
  59295. begin
  59296. pTDefRegMap(@Self)^.clr := $00000080;
  59297. end;
  59298. procedure TPORTG_LATG.setLATG7(thebits : TBits_1); inline;
  59299. begin
  59300. if thebits = 0 then
  59301. pTDefRegMap(@Self)^.clr := $00000080
  59302. else
  59303. pTDefRegMap(@Self)^.&set := $00000080;
  59304. end;
  59305. function TPORTG_LATG.getLATG7 : TBits_1; inline;
  59306. begin
  59307. getLATG7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  59308. end;
  59309. procedure TPORTG_LATG.setLATG8; inline;
  59310. begin
  59311. pTDefRegMap(@Self)^.&set := $00000100;
  59312. end;
  59313. procedure TPORTG_LATG.clearLATG8; inline;
  59314. begin
  59315. pTDefRegMap(@Self)^.clr := $00000100;
  59316. end;
  59317. procedure TPORTG_LATG.setLATG8(thebits : TBits_1); inline;
  59318. begin
  59319. if thebits = 0 then
  59320. pTDefRegMap(@Self)^.clr := $00000100
  59321. else
  59322. pTDefRegMap(@Self)^.&set := $00000100;
  59323. end;
  59324. function TPORTG_LATG.getLATG8 : TBits_1; inline;
  59325. begin
  59326. getLATG8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  59327. end;
  59328. procedure TPORTG_LATG.setLATG9; inline;
  59329. begin
  59330. pTDefRegMap(@Self)^.&set := $00000200;
  59331. end;
  59332. procedure TPORTG_LATG.clearLATG9; inline;
  59333. begin
  59334. pTDefRegMap(@Self)^.clr := $00000200;
  59335. end;
  59336. procedure TPORTG_LATG.setLATG9(thebits : TBits_1); inline;
  59337. begin
  59338. if thebits = 0 then
  59339. pTDefRegMap(@Self)^.clr := $00000200
  59340. else
  59341. pTDefRegMap(@Self)^.&set := $00000200;
  59342. end;
  59343. function TPORTG_LATG.getLATG9 : TBits_1; inline;
  59344. begin
  59345. getLATG9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  59346. end;
  59347. procedure TPORTG_LATG.setw(thebits : TBits_32); inline;
  59348. begin
  59349. pTDefRegMap(@Self)^.val := thebits;
  59350. end;
  59351. function TPORTG_LATG.getw : TBits_32; inline;
  59352. begin
  59353. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  59354. end;
  59355. procedure TPORTG_ODCG.setODCG2; inline;
  59356. begin
  59357. pTDefRegMap(@Self)^.&set := $00000004;
  59358. end;
  59359. procedure TPORTG_ODCG.clearODCG2; inline;
  59360. begin
  59361. pTDefRegMap(@Self)^.clr := $00000004;
  59362. end;
  59363. procedure TPORTG_ODCG.setODCG2(thebits : TBits_1); inline;
  59364. begin
  59365. if thebits = 0 then
  59366. pTDefRegMap(@Self)^.clr := $00000004
  59367. else
  59368. pTDefRegMap(@Self)^.&set := $00000004;
  59369. end;
  59370. function TPORTG_ODCG.getODCG2 : TBits_1; inline;
  59371. begin
  59372. getODCG2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  59373. end;
  59374. procedure TPORTG_ODCG.setODCG3; inline;
  59375. begin
  59376. pTDefRegMap(@Self)^.&set := $00000008;
  59377. end;
  59378. procedure TPORTG_ODCG.clearODCG3; inline;
  59379. begin
  59380. pTDefRegMap(@Self)^.clr := $00000008;
  59381. end;
  59382. procedure TPORTG_ODCG.setODCG3(thebits : TBits_1); inline;
  59383. begin
  59384. if thebits = 0 then
  59385. pTDefRegMap(@Self)^.clr := $00000008
  59386. else
  59387. pTDefRegMap(@Self)^.&set := $00000008;
  59388. end;
  59389. function TPORTG_ODCG.getODCG3 : TBits_1; inline;
  59390. begin
  59391. getODCG3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  59392. end;
  59393. procedure TPORTG_ODCG.setODCG6; inline;
  59394. begin
  59395. pTDefRegMap(@Self)^.&set := $00000040;
  59396. end;
  59397. procedure TPORTG_ODCG.clearODCG6; inline;
  59398. begin
  59399. pTDefRegMap(@Self)^.clr := $00000040;
  59400. end;
  59401. procedure TPORTG_ODCG.setODCG6(thebits : TBits_1); inline;
  59402. begin
  59403. if thebits = 0 then
  59404. pTDefRegMap(@Self)^.clr := $00000040
  59405. else
  59406. pTDefRegMap(@Self)^.&set := $00000040;
  59407. end;
  59408. function TPORTG_ODCG.getODCG6 : TBits_1; inline;
  59409. begin
  59410. getODCG6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  59411. end;
  59412. procedure TPORTG_ODCG.setODCG7; inline;
  59413. begin
  59414. pTDefRegMap(@Self)^.&set := $00000080;
  59415. end;
  59416. procedure TPORTG_ODCG.clearODCG7; inline;
  59417. begin
  59418. pTDefRegMap(@Self)^.clr := $00000080;
  59419. end;
  59420. procedure TPORTG_ODCG.setODCG7(thebits : TBits_1); inline;
  59421. begin
  59422. if thebits = 0 then
  59423. pTDefRegMap(@Self)^.clr := $00000080
  59424. else
  59425. pTDefRegMap(@Self)^.&set := $00000080;
  59426. end;
  59427. function TPORTG_ODCG.getODCG7 : TBits_1; inline;
  59428. begin
  59429. getODCG7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  59430. end;
  59431. procedure TPORTG_ODCG.setODCG8; inline;
  59432. begin
  59433. pTDefRegMap(@Self)^.&set := $00000100;
  59434. end;
  59435. procedure TPORTG_ODCG.clearODCG8; inline;
  59436. begin
  59437. pTDefRegMap(@Self)^.clr := $00000100;
  59438. end;
  59439. procedure TPORTG_ODCG.setODCG8(thebits : TBits_1); inline;
  59440. begin
  59441. if thebits = 0 then
  59442. pTDefRegMap(@Self)^.clr := $00000100
  59443. else
  59444. pTDefRegMap(@Self)^.&set := $00000100;
  59445. end;
  59446. function TPORTG_ODCG.getODCG8 : TBits_1; inline;
  59447. begin
  59448. getODCG8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  59449. end;
  59450. procedure TPORTG_ODCG.setODCG9; inline;
  59451. begin
  59452. pTDefRegMap(@Self)^.&set := $00000200;
  59453. end;
  59454. procedure TPORTG_ODCG.clearODCG9; inline;
  59455. begin
  59456. pTDefRegMap(@Self)^.clr := $00000200;
  59457. end;
  59458. procedure TPORTG_ODCG.setODCG9(thebits : TBits_1); inline;
  59459. begin
  59460. if thebits = 0 then
  59461. pTDefRegMap(@Self)^.clr := $00000200
  59462. else
  59463. pTDefRegMap(@Self)^.&set := $00000200;
  59464. end;
  59465. function TPORTG_ODCG.getODCG9 : TBits_1; inline;
  59466. begin
  59467. getODCG9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  59468. end;
  59469. procedure TPORTG_ODCG.setw(thebits : TBits_32); inline;
  59470. begin
  59471. pTDefRegMap(@Self)^.val := thebits;
  59472. end;
  59473. function TPORTG_ODCG.getw : TBits_32; inline;
  59474. begin
  59475. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  59476. end;
  59477. procedure TPORTG_CNCON.setSIDL; inline;
  59478. begin
  59479. pTDefRegMap(@Self)^.&set := $00002000;
  59480. end;
  59481. procedure TPORTG_CNCON.clearSIDL; inline;
  59482. begin
  59483. pTDefRegMap(@Self)^.clr := $00002000;
  59484. end;
  59485. procedure TPORTG_CNCON.setSIDL(thebits : TBits_1); inline;
  59486. begin
  59487. if thebits = 0 then
  59488. pTDefRegMap(@Self)^.clr := $00002000
  59489. else
  59490. pTDefRegMap(@Self)^.&set := $00002000;
  59491. end;
  59492. function TPORTG_CNCON.getSIDL : TBits_1; inline;
  59493. begin
  59494. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  59495. end;
  59496. procedure TPORTG_CNCON.setON; inline;
  59497. begin
  59498. pTDefRegMap(@Self)^.&set := $00008000;
  59499. end;
  59500. procedure TPORTG_CNCON.clearON; inline;
  59501. begin
  59502. pTDefRegMap(@Self)^.clr := $00008000;
  59503. end;
  59504. procedure TPORTG_CNCON.setON(thebits : TBits_1); inline;
  59505. begin
  59506. if thebits = 0 then
  59507. pTDefRegMap(@Self)^.clr := $00008000
  59508. else
  59509. pTDefRegMap(@Self)^.&set := $00008000;
  59510. end;
  59511. function TPORTG_CNCON.getON : TBits_1; inline;
  59512. begin
  59513. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  59514. end;
  59515. procedure TPORTG_CNCON.setw(thebits : TBits_32); inline;
  59516. begin
  59517. pTDefRegMap(@Self)^.val := thebits;
  59518. end;
  59519. function TPORTG_CNCON.getw : TBits_32; inline;
  59520. begin
  59521. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  59522. end;
  59523. procedure TPORTG_CNEN.setCNEN0; inline;
  59524. begin
  59525. pTDefRegMap(@Self)^.&set := $00000001;
  59526. end;
  59527. procedure TPORTG_CNEN.clearCNEN0; inline;
  59528. begin
  59529. pTDefRegMap(@Self)^.clr := $00000001;
  59530. end;
  59531. procedure TPORTG_CNEN.setCNEN0(thebits : TBits_1); inline;
  59532. begin
  59533. if thebits = 0 then
  59534. pTDefRegMap(@Self)^.clr := $00000001
  59535. else
  59536. pTDefRegMap(@Self)^.&set := $00000001;
  59537. end;
  59538. function TPORTG_CNEN.getCNEN0 : TBits_1; inline;
  59539. begin
  59540. getCNEN0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  59541. end;
  59542. procedure TPORTG_CNEN.setCNEN1; inline;
  59543. begin
  59544. pTDefRegMap(@Self)^.&set := $00000002;
  59545. end;
  59546. procedure TPORTG_CNEN.clearCNEN1; inline;
  59547. begin
  59548. pTDefRegMap(@Self)^.clr := $00000002;
  59549. end;
  59550. procedure TPORTG_CNEN.setCNEN1(thebits : TBits_1); inline;
  59551. begin
  59552. if thebits = 0 then
  59553. pTDefRegMap(@Self)^.clr := $00000002
  59554. else
  59555. pTDefRegMap(@Self)^.&set := $00000002;
  59556. end;
  59557. function TPORTG_CNEN.getCNEN1 : TBits_1; inline;
  59558. begin
  59559. getCNEN1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  59560. end;
  59561. procedure TPORTG_CNEN.setCNEN2; inline;
  59562. begin
  59563. pTDefRegMap(@Self)^.&set := $00000004;
  59564. end;
  59565. procedure TPORTG_CNEN.clearCNEN2; inline;
  59566. begin
  59567. pTDefRegMap(@Self)^.clr := $00000004;
  59568. end;
  59569. procedure TPORTG_CNEN.setCNEN2(thebits : TBits_1); inline;
  59570. begin
  59571. if thebits = 0 then
  59572. pTDefRegMap(@Self)^.clr := $00000004
  59573. else
  59574. pTDefRegMap(@Self)^.&set := $00000004;
  59575. end;
  59576. function TPORTG_CNEN.getCNEN2 : TBits_1; inline;
  59577. begin
  59578. getCNEN2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  59579. end;
  59580. procedure TPORTG_CNEN.setCNEN3; inline;
  59581. begin
  59582. pTDefRegMap(@Self)^.&set := $00000008;
  59583. end;
  59584. procedure TPORTG_CNEN.clearCNEN3; inline;
  59585. begin
  59586. pTDefRegMap(@Self)^.clr := $00000008;
  59587. end;
  59588. procedure TPORTG_CNEN.setCNEN3(thebits : TBits_1); inline;
  59589. begin
  59590. if thebits = 0 then
  59591. pTDefRegMap(@Self)^.clr := $00000008
  59592. else
  59593. pTDefRegMap(@Self)^.&set := $00000008;
  59594. end;
  59595. function TPORTG_CNEN.getCNEN3 : TBits_1; inline;
  59596. begin
  59597. getCNEN3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  59598. end;
  59599. procedure TPORTG_CNEN.setCNEN4; inline;
  59600. begin
  59601. pTDefRegMap(@Self)^.&set := $00000010;
  59602. end;
  59603. procedure TPORTG_CNEN.clearCNEN4; inline;
  59604. begin
  59605. pTDefRegMap(@Self)^.clr := $00000010;
  59606. end;
  59607. procedure TPORTG_CNEN.setCNEN4(thebits : TBits_1); inline;
  59608. begin
  59609. if thebits = 0 then
  59610. pTDefRegMap(@Self)^.clr := $00000010
  59611. else
  59612. pTDefRegMap(@Self)^.&set := $00000010;
  59613. end;
  59614. function TPORTG_CNEN.getCNEN4 : TBits_1; inline;
  59615. begin
  59616. getCNEN4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  59617. end;
  59618. procedure TPORTG_CNEN.setCNEN5; inline;
  59619. begin
  59620. pTDefRegMap(@Self)^.&set := $00000020;
  59621. end;
  59622. procedure TPORTG_CNEN.clearCNEN5; inline;
  59623. begin
  59624. pTDefRegMap(@Self)^.clr := $00000020;
  59625. end;
  59626. procedure TPORTG_CNEN.setCNEN5(thebits : TBits_1); inline;
  59627. begin
  59628. if thebits = 0 then
  59629. pTDefRegMap(@Self)^.clr := $00000020
  59630. else
  59631. pTDefRegMap(@Self)^.&set := $00000020;
  59632. end;
  59633. function TPORTG_CNEN.getCNEN5 : TBits_1; inline;
  59634. begin
  59635. getCNEN5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  59636. end;
  59637. procedure TPORTG_CNEN.setCNEN6; inline;
  59638. begin
  59639. pTDefRegMap(@Self)^.&set := $00000040;
  59640. end;
  59641. procedure TPORTG_CNEN.clearCNEN6; inline;
  59642. begin
  59643. pTDefRegMap(@Self)^.clr := $00000040;
  59644. end;
  59645. procedure TPORTG_CNEN.setCNEN6(thebits : TBits_1); inline;
  59646. begin
  59647. if thebits = 0 then
  59648. pTDefRegMap(@Self)^.clr := $00000040
  59649. else
  59650. pTDefRegMap(@Self)^.&set := $00000040;
  59651. end;
  59652. function TPORTG_CNEN.getCNEN6 : TBits_1; inline;
  59653. begin
  59654. getCNEN6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  59655. end;
  59656. procedure TPORTG_CNEN.setCNEN7; inline;
  59657. begin
  59658. pTDefRegMap(@Self)^.&set := $00000080;
  59659. end;
  59660. procedure TPORTG_CNEN.clearCNEN7; inline;
  59661. begin
  59662. pTDefRegMap(@Self)^.clr := $00000080;
  59663. end;
  59664. procedure TPORTG_CNEN.setCNEN7(thebits : TBits_1); inline;
  59665. begin
  59666. if thebits = 0 then
  59667. pTDefRegMap(@Self)^.clr := $00000080
  59668. else
  59669. pTDefRegMap(@Self)^.&set := $00000080;
  59670. end;
  59671. function TPORTG_CNEN.getCNEN7 : TBits_1; inline;
  59672. begin
  59673. getCNEN7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  59674. end;
  59675. procedure TPORTG_CNEN.setCNEN8; inline;
  59676. begin
  59677. pTDefRegMap(@Self)^.&set := $00000100;
  59678. end;
  59679. procedure TPORTG_CNEN.clearCNEN8; inline;
  59680. begin
  59681. pTDefRegMap(@Self)^.clr := $00000100;
  59682. end;
  59683. procedure TPORTG_CNEN.setCNEN8(thebits : TBits_1); inline;
  59684. begin
  59685. if thebits = 0 then
  59686. pTDefRegMap(@Self)^.clr := $00000100
  59687. else
  59688. pTDefRegMap(@Self)^.&set := $00000100;
  59689. end;
  59690. function TPORTG_CNEN.getCNEN8 : TBits_1; inline;
  59691. begin
  59692. getCNEN8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  59693. end;
  59694. procedure TPORTG_CNEN.setCNEN9; inline;
  59695. begin
  59696. pTDefRegMap(@Self)^.&set := $00000200;
  59697. end;
  59698. procedure TPORTG_CNEN.clearCNEN9; inline;
  59699. begin
  59700. pTDefRegMap(@Self)^.clr := $00000200;
  59701. end;
  59702. procedure TPORTG_CNEN.setCNEN9(thebits : TBits_1); inline;
  59703. begin
  59704. if thebits = 0 then
  59705. pTDefRegMap(@Self)^.clr := $00000200
  59706. else
  59707. pTDefRegMap(@Self)^.&set := $00000200;
  59708. end;
  59709. function TPORTG_CNEN.getCNEN9 : TBits_1; inline;
  59710. begin
  59711. getCNEN9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  59712. end;
  59713. procedure TPORTG_CNEN.setCNEN10; inline;
  59714. begin
  59715. pTDefRegMap(@Self)^.&set := $00000400;
  59716. end;
  59717. procedure TPORTG_CNEN.clearCNEN10; inline;
  59718. begin
  59719. pTDefRegMap(@Self)^.clr := $00000400;
  59720. end;
  59721. procedure TPORTG_CNEN.setCNEN10(thebits : TBits_1); inline;
  59722. begin
  59723. if thebits = 0 then
  59724. pTDefRegMap(@Self)^.clr := $00000400
  59725. else
  59726. pTDefRegMap(@Self)^.&set := $00000400;
  59727. end;
  59728. function TPORTG_CNEN.getCNEN10 : TBits_1; inline;
  59729. begin
  59730. getCNEN10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  59731. end;
  59732. procedure TPORTG_CNEN.setCNEN11; inline;
  59733. begin
  59734. pTDefRegMap(@Self)^.&set := $00000800;
  59735. end;
  59736. procedure TPORTG_CNEN.clearCNEN11; inline;
  59737. begin
  59738. pTDefRegMap(@Self)^.clr := $00000800;
  59739. end;
  59740. procedure TPORTG_CNEN.setCNEN11(thebits : TBits_1); inline;
  59741. begin
  59742. if thebits = 0 then
  59743. pTDefRegMap(@Self)^.clr := $00000800
  59744. else
  59745. pTDefRegMap(@Self)^.&set := $00000800;
  59746. end;
  59747. function TPORTG_CNEN.getCNEN11 : TBits_1; inline;
  59748. begin
  59749. getCNEN11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  59750. end;
  59751. procedure TPORTG_CNEN.setCNEN12; inline;
  59752. begin
  59753. pTDefRegMap(@Self)^.&set := $00001000;
  59754. end;
  59755. procedure TPORTG_CNEN.clearCNEN12; inline;
  59756. begin
  59757. pTDefRegMap(@Self)^.clr := $00001000;
  59758. end;
  59759. procedure TPORTG_CNEN.setCNEN12(thebits : TBits_1); inline;
  59760. begin
  59761. if thebits = 0 then
  59762. pTDefRegMap(@Self)^.clr := $00001000
  59763. else
  59764. pTDefRegMap(@Self)^.&set := $00001000;
  59765. end;
  59766. function TPORTG_CNEN.getCNEN12 : TBits_1; inline;
  59767. begin
  59768. getCNEN12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  59769. end;
  59770. procedure TPORTG_CNEN.setCNEN13; inline;
  59771. begin
  59772. pTDefRegMap(@Self)^.&set := $00002000;
  59773. end;
  59774. procedure TPORTG_CNEN.clearCNEN13; inline;
  59775. begin
  59776. pTDefRegMap(@Self)^.clr := $00002000;
  59777. end;
  59778. procedure TPORTG_CNEN.setCNEN13(thebits : TBits_1); inline;
  59779. begin
  59780. if thebits = 0 then
  59781. pTDefRegMap(@Self)^.clr := $00002000
  59782. else
  59783. pTDefRegMap(@Self)^.&set := $00002000;
  59784. end;
  59785. function TPORTG_CNEN.getCNEN13 : TBits_1; inline;
  59786. begin
  59787. getCNEN13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  59788. end;
  59789. procedure TPORTG_CNEN.setCNEN14; inline;
  59790. begin
  59791. pTDefRegMap(@Self)^.&set := $00004000;
  59792. end;
  59793. procedure TPORTG_CNEN.clearCNEN14; inline;
  59794. begin
  59795. pTDefRegMap(@Self)^.clr := $00004000;
  59796. end;
  59797. procedure TPORTG_CNEN.setCNEN14(thebits : TBits_1); inline;
  59798. begin
  59799. if thebits = 0 then
  59800. pTDefRegMap(@Self)^.clr := $00004000
  59801. else
  59802. pTDefRegMap(@Self)^.&set := $00004000;
  59803. end;
  59804. function TPORTG_CNEN.getCNEN14 : TBits_1; inline;
  59805. begin
  59806. getCNEN14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  59807. end;
  59808. procedure TPORTG_CNEN.setCNEN15; inline;
  59809. begin
  59810. pTDefRegMap(@Self)^.&set := $00008000;
  59811. end;
  59812. procedure TPORTG_CNEN.clearCNEN15; inline;
  59813. begin
  59814. pTDefRegMap(@Self)^.clr := $00008000;
  59815. end;
  59816. procedure TPORTG_CNEN.setCNEN15(thebits : TBits_1); inline;
  59817. begin
  59818. if thebits = 0 then
  59819. pTDefRegMap(@Self)^.clr := $00008000
  59820. else
  59821. pTDefRegMap(@Self)^.&set := $00008000;
  59822. end;
  59823. function TPORTG_CNEN.getCNEN15 : TBits_1; inline;
  59824. begin
  59825. getCNEN15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  59826. end;
  59827. procedure TPORTG_CNEN.setCNEN16; inline;
  59828. begin
  59829. pTDefRegMap(@Self)^.&set := $00010000;
  59830. end;
  59831. procedure TPORTG_CNEN.clearCNEN16; inline;
  59832. begin
  59833. pTDefRegMap(@Self)^.clr := $00010000;
  59834. end;
  59835. procedure TPORTG_CNEN.setCNEN16(thebits : TBits_1); inline;
  59836. begin
  59837. if thebits = 0 then
  59838. pTDefRegMap(@Self)^.clr := $00010000
  59839. else
  59840. pTDefRegMap(@Self)^.&set := $00010000;
  59841. end;
  59842. function TPORTG_CNEN.getCNEN16 : TBits_1; inline;
  59843. begin
  59844. getCNEN16 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  59845. end;
  59846. procedure TPORTG_CNEN.setCNEN17; inline;
  59847. begin
  59848. pTDefRegMap(@Self)^.&set := $00020000;
  59849. end;
  59850. procedure TPORTG_CNEN.clearCNEN17; inline;
  59851. begin
  59852. pTDefRegMap(@Self)^.clr := $00020000;
  59853. end;
  59854. procedure TPORTG_CNEN.setCNEN17(thebits : TBits_1); inline;
  59855. begin
  59856. if thebits = 0 then
  59857. pTDefRegMap(@Self)^.clr := $00020000
  59858. else
  59859. pTDefRegMap(@Self)^.&set := $00020000;
  59860. end;
  59861. function TPORTG_CNEN.getCNEN17 : TBits_1; inline;
  59862. begin
  59863. getCNEN17 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  59864. end;
  59865. procedure TPORTG_CNEN.setCNEN18; inline;
  59866. begin
  59867. pTDefRegMap(@Self)^.&set := $00040000;
  59868. end;
  59869. procedure TPORTG_CNEN.clearCNEN18; inline;
  59870. begin
  59871. pTDefRegMap(@Self)^.clr := $00040000;
  59872. end;
  59873. procedure TPORTG_CNEN.setCNEN18(thebits : TBits_1); inline;
  59874. begin
  59875. if thebits = 0 then
  59876. pTDefRegMap(@Self)^.clr := $00040000
  59877. else
  59878. pTDefRegMap(@Self)^.&set := $00040000;
  59879. end;
  59880. function TPORTG_CNEN.getCNEN18 : TBits_1; inline;
  59881. begin
  59882. getCNEN18 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  59883. end;
  59884. procedure TPORTG_CNEN.setw(thebits : TBits_32); inline;
  59885. begin
  59886. pTDefRegMap(@Self)^.val := thebits;
  59887. end;
  59888. function TPORTG_CNEN.getw : TBits_32; inline;
  59889. begin
  59890. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  59891. end;
  59892. procedure TPORTG_CNPUE.setCNPUE0; inline;
  59893. begin
  59894. pTDefRegMap(@Self)^.&set := $00000001;
  59895. end;
  59896. procedure TPORTG_CNPUE.clearCNPUE0; inline;
  59897. begin
  59898. pTDefRegMap(@Self)^.clr := $00000001;
  59899. end;
  59900. procedure TPORTG_CNPUE.setCNPUE0(thebits : TBits_1); inline;
  59901. begin
  59902. if thebits = 0 then
  59903. pTDefRegMap(@Self)^.clr := $00000001
  59904. else
  59905. pTDefRegMap(@Self)^.&set := $00000001;
  59906. end;
  59907. function TPORTG_CNPUE.getCNPUE0 : TBits_1; inline;
  59908. begin
  59909. getCNPUE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  59910. end;
  59911. procedure TPORTG_CNPUE.setCNPUE1; inline;
  59912. begin
  59913. pTDefRegMap(@Self)^.&set := $00000002;
  59914. end;
  59915. procedure TPORTG_CNPUE.clearCNPUE1; inline;
  59916. begin
  59917. pTDefRegMap(@Self)^.clr := $00000002;
  59918. end;
  59919. procedure TPORTG_CNPUE.setCNPUE1(thebits : TBits_1); inline;
  59920. begin
  59921. if thebits = 0 then
  59922. pTDefRegMap(@Self)^.clr := $00000002
  59923. else
  59924. pTDefRegMap(@Self)^.&set := $00000002;
  59925. end;
  59926. function TPORTG_CNPUE.getCNPUE1 : TBits_1; inline;
  59927. begin
  59928. getCNPUE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  59929. end;
  59930. procedure TPORTG_CNPUE.setCNPUE2; inline;
  59931. begin
  59932. pTDefRegMap(@Self)^.&set := $00000004;
  59933. end;
  59934. procedure TPORTG_CNPUE.clearCNPUE2; inline;
  59935. begin
  59936. pTDefRegMap(@Self)^.clr := $00000004;
  59937. end;
  59938. procedure TPORTG_CNPUE.setCNPUE2(thebits : TBits_1); inline;
  59939. begin
  59940. if thebits = 0 then
  59941. pTDefRegMap(@Self)^.clr := $00000004
  59942. else
  59943. pTDefRegMap(@Self)^.&set := $00000004;
  59944. end;
  59945. function TPORTG_CNPUE.getCNPUE2 : TBits_1; inline;
  59946. begin
  59947. getCNPUE2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  59948. end;
  59949. procedure TPORTG_CNPUE.setCNPUE3; inline;
  59950. begin
  59951. pTDefRegMap(@Self)^.&set := $00000008;
  59952. end;
  59953. procedure TPORTG_CNPUE.clearCNPUE3; inline;
  59954. begin
  59955. pTDefRegMap(@Self)^.clr := $00000008;
  59956. end;
  59957. procedure TPORTG_CNPUE.setCNPUE3(thebits : TBits_1); inline;
  59958. begin
  59959. if thebits = 0 then
  59960. pTDefRegMap(@Self)^.clr := $00000008
  59961. else
  59962. pTDefRegMap(@Self)^.&set := $00000008;
  59963. end;
  59964. function TPORTG_CNPUE.getCNPUE3 : TBits_1; inline;
  59965. begin
  59966. getCNPUE3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  59967. end;
  59968. procedure TPORTG_CNPUE.setCNPUE4; inline;
  59969. begin
  59970. pTDefRegMap(@Self)^.&set := $00000010;
  59971. end;
  59972. procedure TPORTG_CNPUE.clearCNPUE4; inline;
  59973. begin
  59974. pTDefRegMap(@Self)^.clr := $00000010;
  59975. end;
  59976. procedure TPORTG_CNPUE.setCNPUE4(thebits : TBits_1); inline;
  59977. begin
  59978. if thebits = 0 then
  59979. pTDefRegMap(@Self)^.clr := $00000010
  59980. else
  59981. pTDefRegMap(@Self)^.&set := $00000010;
  59982. end;
  59983. function TPORTG_CNPUE.getCNPUE4 : TBits_1; inline;
  59984. begin
  59985. getCNPUE4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  59986. end;
  59987. procedure TPORTG_CNPUE.setCNPUE5; inline;
  59988. begin
  59989. pTDefRegMap(@Self)^.&set := $00000020;
  59990. end;
  59991. procedure TPORTG_CNPUE.clearCNPUE5; inline;
  59992. begin
  59993. pTDefRegMap(@Self)^.clr := $00000020;
  59994. end;
  59995. procedure TPORTG_CNPUE.setCNPUE5(thebits : TBits_1); inline;
  59996. begin
  59997. if thebits = 0 then
  59998. pTDefRegMap(@Self)^.clr := $00000020
  59999. else
  60000. pTDefRegMap(@Self)^.&set := $00000020;
  60001. end;
  60002. function TPORTG_CNPUE.getCNPUE5 : TBits_1; inline;
  60003. begin
  60004. getCNPUE5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  60005. end;
  60006. procedure TPORTG_CNPUE.setCNPUE6; inline;
  60007. begin
  60008. pTDefRegMap(@Self)^.&set := $00000040;
  60009. end;
  60010. procedure TPORTG_CNPUE.clearCNPUE6; inline;
  60011. begin
  60012. pTDefRegMap(@Self)^.clr := $00000040;
  60013. end;
  60014. procedure TPORTG_CNPUE.setCNPUE6(thebits : TBits_1); inline;
  60015. begin
  60016. if thebits = 0 then
  60017. pTDefRegMap(@Self)^.clr := $00000040
  60018. else
  60019. pTDefRegMap(@Self)^.&set := $00000040;
  60020. end;
  60021. function TPORTG_CNPUE.getCNPUE6 : TBits_1; inline;
  60022. begin
  60023. getCNPUE6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  60024. end;
  60025. procedure TPORTG_CNPUE.setCNPUE7; inline;
  60026. begin
  60027. pTDefRegMap(@Self)^.&set := $00000080;
  60028. end;
  60029. procedure TPORTG_CNPUE.clearCNPUE7; inline;
  60030. begin
  60031. pTDefRegMap(@Self)^.clr := $00000080;
  60032. end;
  60033. procedure TPORTG_CNPUE.setCNPUE7(thebits : TBits_1); inline;
  60034. begin
  60035. if thebits = 0 then
  60036. pTDefRegMap(@Self)^.clr := $00000080
  60037. else
  60038. pTDefRegMap(@Self)^.&set := $00000080;
  60039. end;
  60040. function TPORTG_CNPUE.getCNPUE7 : TBits_1; inline;
  60041. begin
  60042. getCNPUE7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  60043. end;
  60044. procedure TPORTG_CNPUE.setCNPUE8; inline;
  60045. begin
  60046. pTDefRegMap(@Self)^.&set := $00000100;
  60047. end;
  60048. procedure TPORTG_CNPUE.clearCNPUE8; inline;
  60049. begin
  60050. pTDefRegMap(@Self)^.clr := $00000100;
  60051. end;
  60052. procedure TPORTG_CNPUE.setCNPUE8(thebits : TBits_1); inline;
  60053. begin
  60054. if thebits = 0 then
  60055. pTDefRegMap(@Self)^.clr := $00000100
  60056. else
  60057. pTDefRegMap(@Self)^.&set := $00000100;
  60058. end;
  60059. function TPORTG_CNPUE.getCNPUE8 : TBits_1; inline;
  60060. begin
  60061. getCNPUE8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  60062. end;
  60063. procedure TPORTG_CNPUE.setCNPUE9; inline;
  60064. begin
  60065. pTDefRegMap(@Self)^.&set := $00000200;
  60066. end;
  60067. procedure TPORTG_CNPUE.clearCNPUE9; inline;
  60068. begin
  60069. pTDefRegMap(@Self)^.clr := $00000200;
  60070. end;
  60071. procedure TPORTG_CNPUE.setCNPUE9(thebits : TBits_1); inline;
  60072. begin
  60073. if thebits = 0 then
  60074. pTDefRegMap(@Self)^.clr := $00000200
  60075. else
  60076. pTDefRegMap(@Self)^.&set := $00000200;
  60077. end;
  60078. function TPORTG_CNPUE.getCNPUE9 : TBits_1; inline;
  60079. begin
  60080. getCNPUE9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  60081. end;
  60082. procedure TPORTG_CNPUE.setCNPUE10; inline;
  60083. begin
  60084. pTDefRegMap(@Self)^.&set := $00000400;
  60085. end;
  60086. procedure TPORTG_CNPUE.clearCNPUE10; inline;
  60087. begin
  60088. pTDefRegMap(@Self)^.clr := $00000400;
  60089. end;
  60090. procedure TPORTG_CNPUE.setCNPUE10(thebits : TBits_1); inline;
  60091. begin
  60092. if thebits = 0 then
  60093. pTDefRegMap(@Self)^.clr := $00000400
  60094. else
  60095. pTDefRegMap(@Self)^.&set := $00000400;
  60096. end;
  60097. function TPORTG_CNPUE.getCNPUE10 : TBits_1; inline;
  60098. begin
  60099. getCNPUE10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  60100. end;
  60101. procedure TPORTG_CNPUE.setCNPUE11; inline;
  60102. begin
  60103. pTDefRegMap(@Self)^.&set := $00000800;
  60104. end;
  60105. procedure TPORTG_CNPUE.clearCNPUE11; inline;
  60106. begin
  60107. pTDefRegMap(@Self)^.clr := $00000800;
  60108. end;
  60109. procedure TPORTG_CNPUE.setCNPUE11(thebits : TBits_1); inline;
  60110. begin
  60111. if thebits = 0 then
  60112. pTDefRegMap(@Self)^.clr := $00000800
  60113. else
  60114. pTDefRegMap(@Self)^.&set := $00000800;
  60115. end;
  60116. function TPORTG_CNPUE.getCNPUE11 : TBits_1; inline;
  60117. begin
  60118. getCNPUE11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  60119. end;
  60120. procedure TPORTG_CNPUE.setCNPUE12; inline;
  60121. begin
  60122. pTDefRegMap(@Self)^.&set := $00001000;
  60123. end;
  60124. procedure TPORTG_CNPUE.clearCNPUE12; inline;
  60125. begin
  60126. pTDefRegMap(@Self)^.clr := $00001000;
  60127. end;
  60128. procedure TPORTG_CNPUE.setCNPUE12(thebits : TBits_1); inline;
  60129. begin
  60130. if thebits = 0 then
  60131. pTDefRegMap(@Self)^.clr := $00001000
  60132. else
  60133. pTDefRegMap(@Self)^.&set := $00001000;
  60134. end;
  60135. function TPORTG_CNPUE.getCNPUE12 : TBits_1; inline;
  60136. begin
  60137. getCNPUE12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  60138. end;
  60139. procedure TPORTG_CNPUE.setCNPUE13; inline;
  60140. begin
  60141. pTDefRegMap(@Self)^.&set := $00002000;
  60142. end;
  60143. procedure TPORTG_CNPUE.clearCNPUE13; inline;
  60144. begin
  60145. pTDefRegMap(@Self)^.clr := $00002000;
  60146. end;
  60147. procedure TPORTG_CNPUE.setCNPUE13(thebits : TBits_1); inline;
  60148. begin
  60149. if thebits = 0 then
  60150. pTDefRegMap(@Self)^.clr := $00002000
  60151. else
  60152. pTDefRegMap(@Self)^.&set := $00002000;
  60153. end;
  60154. function TPORTG_CNPUE.getCNPUE13 : TBits_1; inline;
  60155. begin
  60156. getCNPUE13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  60157. end;
  60158. procedure TPORTG_CNPUE.setCNPUE14; inline;
  60159. begin
  60160. pTDefRegMap(@Self)^.&set := $00004000;
  60161. end;
  60162. procedure TPORTG_CNPUE.clearCNPUE14; inline;
  60163. begin
  60164. pTDefRegMap(@Self)^.clr := $00004000;
  60165. end;
  60166. procedure TPORTG_CNPUE.setCNPUE14(thebits : TBits_1); inline;
  60167. begin
  60168. if thebits = 0 then
  60169. pTDefRegMap(@Self)^.clr := $00004000
  60170. else
  60171. pTDefRegMap(@Self)^.&set := $00004000;
  60172. end;
  60173. function TPORTG_CNPUE.getCNPUE14 : TBits_1; inline;
  60174. begin
  60175. getCNPUE14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  60176. end;
  60177. procedure TPORTG_CNPUE.setCNPUE15; inline;
  60178. begin
  60179. pTDefRegMap(@Self)^.&set := $00008000;
  60180. end;
  60181. procedure TPORTG_CNPUE.clearCNPUE15; inline;
  60182. begin
  60183. pTDefRegMap(@Self)^.clr := $00008000;
  60184. end;
  60185. procedure TPORTG_CNPUE.setCNPUE15(thebits : TBits_1); inline;
  60186. begin
  60187. if thebits = 0 then
  60188. pTDefRegMap(@Self)^.clr := $00008000
  60189. else
  60190. pTDefRegMap(@Self)^.&set := $00008000;
  60191. end;
  60192. function TPORTG_CNPUE.getCNPUE15 : TBits_1; inline;
  60193. begin
  60194. getCNPUE15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  60195. end;
  60196. procedure TPORTG_CNPUE.setCNPUE16; inline;
  60197. begin
  60198. pTDefRegMap(@Self)^.&set := $00010000;
  60199. end;
  60200. procedure TPORTG_CNPUE.clearCNPUE16; inline;
  60201. begin
  60202. pTDefRegMap(@Self)^.clr := $00010000;
  60203. end;
  60204. procedure TPORTG_CNPUE.setCNPUE16(thebits : TBits_1); inline;
  60205. begin
  60206. if thebits = 0 then
  60207. pTDefRegMap(@Self)^.clr := $00010000
  60208. else
  60209. pTDefRegMap(@Self)^.&set := $00010000;
  60210. end;
  60211. function TPORTG_CNPUE.getCNPUE16 : TBits_1; inline;
  60212. begin
  60213. getCNPUE16 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  60214. end;
  60215. procedure TPORTG_CNPUE.setCNPUE17; inline;
  60216. begin
  60217. pTDefRegMap(@Self)^.&set := $00020000;
  60218. end;
  60219. procedure TPORTG_CNPUE.clearCNPUE17; inline;
  60220. begin
  60221. pTDefRegMap(@Self)^.clr := $00020000;
  60222. end;
  60223. procedure TPORTG_CNPUE.setCNPUE17(thebits : TBits_1); inline;
  60224. begin
  60225. if thebits = 0 then
  60226. pTDefRegMap(@Self)^.clr := $00020000
  60227. else
  60228. pTDefRegMap(@Self)^.&set := $00020000;
  60229. end;
  60230. function TPORTG_CNPUE.getCNPUE17 : TBits_1; inline;
  60231. begin
  60232. getCNPUE17 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  60233. end;
  60234. procedure TPORTG_CNPUE.setCNPUE18; inline;
  60235. begin
  60236. pTDefRegMap(@Self)^.&set := $00040000;
  60237. end;
  60238. procedure TPORTG_CNPUE.clearCNPUE18; inline;
  60239. begin
  60240. pTDefRegMap(@Self)^.clr := $00040000;
  60241. end;
  60242. procedure TPORTG_CNPUE.setCNPUE18(thebits : TBits_1); inline;
  60243. begin
  60244. if thebits = 0 then
  60245. pTDefRegMap(@Self)^.clr := $00040000
  60246. else
  60247. pTDefRegMap(@Self)^.&set := $00040000;
  60248. end;
  60249. function TPORTG_CNPUE.getCNPUE18 : TBits_1; inline;
  60250. begin
  60251. getCNPUE18 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  60252. end;
  60253. procedure TPORTG_CNPUE.setw(thebits : TBits_32); inline;
  60254. begin
  60255. pTDefRegMap(@Self)^.val := thebits;
  60256. end;
  60257. function TPORTG_CNPUE.getw : TBits_32; inline;
  60258. begin
  60259. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  60260. end;
  60261. procedure TCAN1_C1CON.setDNCNT(thebits : TBits_5); inline;
  60262. begin
  60263. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  60264. end;
  60265. function TCAN1_C1CON.getDNCNT : TBits_5; inline;
  60266. begin
  60267. getDNCNT := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  60268. end;
  60269. procedure TCAN1_C1CON.setCANBUSY; inline;
  60270. begin
  60271. pTDefRegMap(@Self)^.&set := $00000800;
  60272. end;
  60273. procedure TCAN1_C1CON.clearCANBUSY; inline;
  60274. begin
  60275. pTDefRegMap(@Self)^.clr := $00000800;
  60276. end;
  60277. procedure TCAN1_C1CON.setCANBUSY(thebits : TBits_1); inline;
  60278. begin
  60279. if thebits = 0 then
  60280. pTDefRegMap(@Self)^.clr := $00000800
  60281. else
  60282. pTDefRegMap(@Self)^.&set := $00000800;
  60283. end;
  60284. function TCAN1_C1CON.getCANBUSY : TBits_1; inline;
  60285. begin
  60286. getCANBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  60287. end;
  60288. procedure TCAN1_C1CON.setSIDL; inline;
  60289. begin
  60290. pTDefRegMap(@Self)^.&set := $00002000;
  60291. end;
  60292. procedure TCAN1_C1CON.clearSIDL; inline;
  60293. begin
  60294. pTDefRegMap(@Self)^.clr := $00002000;
  60295. end;
  60296. procedure TCAN1_C1CON.setSIDL(thebits : TBits_1); inline;
  60297. begin
  60298. if thebits = 0 then
  60299. pTDefRegMap(@Self)^.clr := $00002000
  60300. else
  60301. pTDefRegMap(@Self)^.&set := $00002000;
  60302. end;
  60303. function TCAN1_C1CON.getSIDL : TBits_1; inline;
  60304. begin
  60305. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  60306. end;
  60307. procedure TCAN1_C1CON.setON; inline;
  60308. begin
  60309. pTDefRegMap(@Self)^.&set := $00008000;
  60310. end;
  60311. procedure TCAN1_C1CON.clearON; inline;
  60312. begin
  60313. pTDefRegMap(@Self)^.clr := $00008000;
  60314. end;
  60315. procedure TCAN1_C1CON.setON(thebits : TBits_1); inline;
  60316. begin
  60317. if thebits = 0 then
  60318. pTDefRegMap(@Self)^.clr := $00008000
  60319. else
  60320. pTDefRegMap(@Self)^.&set := $00008000;
  60321. end;
  60322. function TCAN1_C1CON.getON : TBits_1; inline;
  60323. begin
  60324. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  60325. end;
  60326. procedure TCAN1_C1CON.setCANCAP; inline;
  60327. begin
  60328. pTDefRegMap(@Self)^.&set := $00100000;
  60329. end;
  60330. procedure TCAN1_C1CON.clearCANCAP; inline;
  60331. begin
  60332. pTDefRegMap(@Self)^.clr := $00100000;
  60333. end;
  60334. procedure TCAN1_C1CON.setCANCAP(thebits : TBits_1); inline;
  60335. begin
  60336. if thebits = 0 then
  60337. pTDefRegMap(@Self)^.clr := $00100000
  60338. else
  60339. pTDefRegMap(@Self)^.&set := $00100000;
  60340. end;
  60341. function TCAN1_C1CON.getCANCAP : TBits_1; inline;
  60342. begin
  60343. getCANCAP := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  60344. end;
  60345. procedure TCAN1_C1CON.setOPMOD(thebits : TBits_3); inline;
  60346. begin
  60347. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF1FFFFF or ( thebits shl 21 );
  60348. end;
  60349. function TCAN1_C1CON.getOPMOD : TBits_3; inline;
  60350. begin
  60351. getOPMOD := (pTDefRegMap(@Self)^.val and $00E00000) shr 21;
  60352. end;
  60353. procedure TCAN1_C1CON.setREQOP(thebits : TBits_3); inline;
  60354. begin
  60355. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  60356. end;
  60357. function TCAN1_C1CON.getREQOP : TBits_3; inline;
  60358. begin
  60359. getREQOP := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  60360. end;
  60361. procedure TCAN1_C1CON.setABAT; inline;
  60362. begin
  60363. pTDefRegMap(@Self)^.&set := $08000000;
  60364. end;
  60365. procedure TCAN1_C1CON.clearABAT; inline;
  60366. begin
  60367. pTDefRegMap(@Self)^.clr := $08000000;
  60368. end;
  60369. procedure TCAN1_C1CON.setABAT(thebits : TBits_1); inline;
  60370. begin
  60371. if thebits = 0 then
  60372. pTDefRegMap(@Self)^.clr := $08000000
  60373. else
  60374. pTDefRegMap(@Self)^.&set := $08000000;
  60375. end;
  60376. function TCAN1_C1CON.getABAT : TBits_1; inline;
  60377. begin
  60378. getABAT := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  60379. end;
  60380. procedure TCAN1_C1CON.setw(thebits : TBits_32); inline;
  60381. begin
  60382. pTDefRegMap(@Self)^.val := thebits;
  60383. end;
  60384. function TCAN1_C1CON.getw : TBits_32; inline;
  60385. begin
  60386. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  60387. end;
  60388. procedure TCAN1_C1CFG.setBRP(thebits : TBits_6); inline;
  60389. begin
  60390. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC0 or ( thebits shl 0 );
  60391. end;
  60392. function TCAN1_C1CFG.getBRP : TBits_6; inline;
  60393. begin
  60394. getBRP := (pTDefRegMap(@Self)^.val and $0000003F) shr 0;
  60395. end;
  60396. procedure TCAN1_C1CFG.setSJW(thebits : TBits_2); inline;
  60397. begin
  60398. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  60399. end;
  60400. function TCAN1_C1CFG.getSJW : TBits_2; inline;
  60401. begin
  60402. getSJW := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  60403. end;
  60404. procedure TCAN1_C1CFG.setPRSEG(thebits : TBits_3); inline;
  60405. begin
  60406. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF8FF or ( thebits shl 8 );
  60407. end;
  60408. function TCAN1_C1CFG.getPRSEG : TBits_3; inline;
  60409. begin
  60410. getPRSEG := (pTDefRegMap(@Self)^.val and $00000700) shr 8;
  60411. end;
  60412. procedure TCAN1_C1CFG.setSEG1PH(thebits : TBits_3); inline;
  60413. begin
  60414. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFC7FF or ( thebits shl 11 );
  60415. end;
  60416. function TCAN1_C1CFG.getSEG1PH : TBits_3; inline;
  60417. begin
  60418. getSEG1PH := (pTDefRegMap(@Self)^.val and $00003800) shr 11;
  60419. end;
  60420. procedure TCAN1_C1CFG.setSAM; inline;
  60421. begin
  60422. pTDefRegMap(@Self)^.&set := $00004000;
  60423. end;
  60424. procedure TCAN1_C1CFG.clearSAM; inline;
  60425. begin
  60426. pTDefRegMap(@Self)^.clr := $00004000;
  60427. end;
  60428. procedure TCAN1_C1CFG.setSAM(thebits : TBits_1); inline;
  60429. begin
  60430. if thebits = 0 then
  60431. pTDefRegMap(@Self)^.clr := $00004000
  60432. else
  60433. pTDefRegMap(@Self)^.&set := $00004000;
  60434. end;
  60435. function TCAN1_C1CFG.getSAM : TBits_1; inline;
  60436. begin
  60437. getSAM := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  60438. end;
  60439. procedure TCAN1_C1CFG.setSEG2PHTS; inline;
  60440. begin
  60441. pTDefRegMap(@Self)^.&set := $00008000;
  60442. end;
  60443. procedure TCAN1_C1CFG.clearSEG2PHTS; inline;
  60444. begin
  60445. pTDefRegMap(@Self)^.clr := $00008000;
  60446. end;
  60447. procedure TCAN1_C1CFG.setSEG2PHTS(thebits : TBits_1); inline;
  60448. begin
  60449. if thebits = 0 then
  60450. pTDefRegMap(@Self)^.clr := $00008000
  60451. else
  60452. pTDefRegMap(@Self)^.&set := $00008000;
  60453. end;
  60454. function TCAN1_C1CFG.getSEG2PHTS : TBits_1; inline;
  60455. begin
  60456. getSEG2PHTS := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  60457. end;
  60458. procedure TCAN1_C1CFG.setSEG2PH(thebits : TBits_3); inline;
  60459. begin
  60460. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF8FFFF or ( thebits shl 16 );
  60461. end;
  60462. function TCAN1_C1CFG.getSEG2PH : TBits_3; inline;
  60463. begin
  60464. getSEG2PH := (pTDefRegMap(@Self)^.val and $00070000) shr 16;
  60465. end;
  60466. procedure TCAN1_C1CFG.setWAKFIL; inline;
  60467. begin
  60468. pTDefRegMap(@Self)^.&set := $00400000;
  60469. end;
  60470. procedure TCAN1_C1CFG.clearWAKFIL; inline;
  60471. begin
  60472. pTDefRegMap(@Self)^.clr := $00400000;
  60473. end;
  60474. procedure TCAN1_C1CFG.setWAKFIL(thebits : TBits_1); inline;
  60475. begin
  60476. if thebits = 0 then
  60477. pTDefRegMap(@Self)^.clr := $00400000
  60478. else
  60479. pTDefRegMap(@Self)^.&set := $00400000;
  60480. end;
  60481. function TCAN1_C1CFG.getWAKFIL : TBits_1; inline;
  60482. begin
  60483. getWAKFIL := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  60484. end;
  60485. procedure TCAN1_C1CFG.setw(thebits : TBits_32); inline;
  60486. begin
  60487. pTDefRegMap(@Self)^.val := thebits;
  60488. end;
  60489. function TCAN1_C1CFG.getw : TBits_32; inline;
  60490. begin
  60491. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  60492. end;
  60493. procedure TCAN1_C1INT.setTBIF; inline;
  60494. begin
  60495. pTDefRegMap(@Self)^.&set := $00000001;
  60496. end;
  60497. procedure TCAN1_C1INT.clearTBIF; inline;
  60498. begin
  60499. pTDefRegMap(@Self)^.clr := $00000001;
  60500. end;
  60501. procedure TCAN1_C1INT.setTBIF(thebits : TBits_1); inline;
  60502. begin
  60503. if thebits = 0 then
  60504. pTDefRegMap(@Self)^.clr := $00000001
  60505. else
  60506. pTDefRegMap(@Self)^.&set := $00000001;
  60507. end;
  60508. function TCAN1_C1INT.getTBIF : TBits_1; inline;
  60509. begin
  60510. getTBIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  60511. end;
  60512. procedure TCAN1_C1INT.setRBIF; inline;
  60513. begin
  60514. pTDefRegMap(@Self)^.&set := $00000002;
  60515. end;
  60516. procedure TCAN1_C1INT.clearRBIF; inline;
  60517. begin
  60518. pTDefRegMap(@Self)^.clr := $00000002;
  60519. end;
  60520. procedure TCAN1_C1INT.setRBIF(thebits : TBits_1); inline;
  60521. begin
  60522. if thebits = 0 then
  60523. pTDefRegMap(@Self)^.clr := $00000002
  60524. else
  60525. pTDefRegMap(@Self)^.&set := $00000002;
  60526. end;
  60527. function TCAN1_C1INT.getRBIF : TBits_1; inline;
  60528. begin
  60529. getRBIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  60530. end;
  60531. procedure TCAN1_C1INT.setCTMRIF; inline;
  60532. begin
  60533. pTDefRegMap(@Self)^.&set := $00000004;
  60534. end;
  60535. procedure TCAN1_C1INT.clearCTMRIF; inline;
  60536. begin
  60537. pTDefRegMap(@Self)^.clr := $00000004;
  60538. end;
  60539. procedure TCAN1_C1INT.setCTMRIF(thebits : TBits_1); inline;
  60540. begin
  60541. if thebits = 0 then
  60542. pTDefRegMap(@Self)^.clr := $00000004
  60543. else
  60544. pTDefRegMap(@Self)^.&set := $00000004;
  60545. end;
  60546. function TCAN1_C1INT.getCTMRIF : TBits_1; inline;
  60547. begin
  60548. getCTMRIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  60549. end;
  60550. procedure TCAN1_C1INT.setMODIF; inline;
  60551. begin
  60552. pTDefRegMap(@Self)^.&set := $00000008;
  60553. end;
  60554. procedure TCAN1_C1INT.clearMODIF; inline;
  60555. begin
  60556. pTDefRegMap(@Self)^.clr := $00000008;
  60557. end;
  60558. procedure TCAN1_C1INT.setMODIF(thebits : TBits_1); inline;
  60559. begin
  60560. if thebits = 0 then
  60561. pTDefRegMap(@Self)^.clr := $00000008
  60562. else
  60563. pTDefRegMap(@Self)^.&set := $00000008;
  60564. end;
  60565. function TCAN1_C1INT.getMODIF : TBits_1; inline;
  60566. begin
  60567. getMODIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  60568. end;
  60569. procedure TCAN1_C1INT.setRBOVIF; inline;
  60570. begin
  60571. pTDefRegMap(@Self)^.&set := $00000800;
  60572. end;
  60573. procedure TCAN1_C1INT.clearRBOVIF; inline;
  60574. begin
  60575. pTDefRegMap(@Self)^.clr := $00000800;
  60576. end;
  60577. procedure TCAN1_C1INT.setRBOVIF(thebits : TBits_1); inline;
  60578. begin
  60579. if thebits = 0 then
  60580. pTDefRegMap(@Self)^.clr := $00000800
  60581. else
  60582. pTDefRegMap(@Self)^.&set := $00000800;
  60583. end;
  60584. function TCAN1_C1INT.getRBOVIF : TBits_1; inline;
  60585. begin
  60586. getRBOVIF := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  60587. end;
  60588. procedure TCAN1_C1INT.setSERRIF; inline;
  60589. begin
  60590. pTDefRegMap(@Self)^.&set := $00001000;
  60591. end;
  60592. procedure TCAN1_C1INT.clearSERRIF; inline;
  60593. begin
  60594. pTDefRegMap(@Self)^.clr := $00001000;
  60595. end;
  60596. procedure TCAN1_C1INT.setSERRIF(thebits : TBits_1); inline;
  60597. begin
  60598. if thebits = 0 then
  60599. pTDefRegMap(@Self)^.clr := $00001000
  60600. else
  60601. pTDefRegMap(@Self)^.&set := $00001000;
  60602. end;
  60603. function TCAN1_C1INT.getSERRIF : TBits_1; inline;
  60604. begin
  60605. getSERRIF := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  60606. end;
  60607. procedure TCAN1_C1INT.setCERRIF; inline;
  60608. begin
  60609. pTDefRegMap(@Self)^.&set := $00002000;
  60610. end;
  60611. procedure TCAN1_C1INT.clearCERRIF; inline;
  60612. begin
  60613. pTDefRegMap(@Self)^.clr := $00002000;
  60614. end;
  60615. procedure TCAN1_C1INT.setCERRIF(thebits : TBits_1); inline;
  60616. begin
  60617. if thebits = 0 then
  60618. pTDefRegMap(@Self)^.clr := $00002000
  60619. else
  60620. pTDefRegMap(@Self)^.&set := $00002000;
  60621. end;
  60622. function TCAN1_C1INT.getCERRIF : TBits_1; inline;
  60623. begin
  60624. getCERRIF := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  60625. end;
  60626. procedure TCAN1_C1INT.setWAKIF; inline;
  60627. begin
  60628. pTDefRegMap(@Self)^.&set := $00004000;
  60629. end;
  60630. procedure TCAN1_C1INT.clearWAKIF; inline;
  60631. begin
  60632. pTDefRegMap(@Self)^.clr := $00004000;
  60633. end;
  60634. procedure TCAN1_C1INT.setWAKIF(thebits : TBits_1); inline;
  60635. begin
  60636. if thebits = 0 then
  60637. pTDefRegMap(@Self)^.clr := $00004000
  60638. else
  60639. pTDefRegMap(@Self)^.&set := $00004000;
  60640. end;
  60641. function TCAN1_C1INT.getWAKIF : TBits_1; inline;
  60642. begin
  60643. getWAKIF := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  60644. end;
  60645. procedure TCAN1_C1INT.setIVRIF; inline;
  60646. begin
  60647. pTDefRegMap(@Self)^.&set := $00008000;
  60648. end;
  60649. procedure TCAN1_C1INT.clearIVRIF; inline;
  60650. begin
  60651. pTDefRegMap(@Self)^.clr := $00008000;
  60652. end;
  60653. procedure TCAN1_C1INT.setIVRIF(thebits : TBits_1); inline;
  60654. begin
  60655. if thebits = 0 then
  60656. pTDefRegMap(@Self)^.clr := $00008000
  60657. else
  60658. pTDefRegMap(@Self)^.&set := $00008000;
  60659. end;
  60660. function TCAN1_C1INT.getIVRIF : TBits_1; inline;
  60661. begin
  60662. getIVRIF := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  60663. end;
  60664. procedure TCAN1_C1INT.setTBIE; inline;
  60665. begin
  60666. pTDefRegMap(@Self)^.&set := $00010000;
  60667. end;
  60668. procedure TCAN1_C1INT.clearTBIE; inline;
  60669. begin
  60670. pTDefRegMap(@Self)^.clr := $00010000;
  60671. end;
  60672. procedure TCAN1_C1INT.setTBIE(thebits : TBits_1); inline;
  60673. begin
  60674. if thebits = 0 then
  60675. pTDefRegMap(@Self)^.clr := $00010000
  60676. else
  60677. pTDefRegMap(@Self)^.&set := $00010000;
  60678. end;
  60679. function TCAN1_C1INT.getTBIE : TBits_1; inline;
  60680. begin
  60681. getTBIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  60682. end;
  60683. procedure TCAN1_C1INT.setRBIE; inline;
  60684. begin
  60685. pTDefRegMap(@Self)^.&set := $00020000;
  60686. end;
  60687. procedure TCAN1_C1INT.clearRBIE; inline;
  60688. begin
  60689. pTDefRegMap(@Self)^.clr := $00020000;
  60690. end;
  60691. procedure TCAN1_C1INT.setRBIE(thebits : TBits_1); inline;
  60692. begin
  60693. if thebits = 0 then
  60694. pTDefRegMap(@Self)^.clr := $00020000
  60695. else
  60696. pTDefRegMap(@Self)^.&set := $00020000;
  60697. end;
  60698. function TCAN1_C1INT.getRBIE : TBits_1; inline;
  60699. begin
  60700. getRBIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  60701. end;
  60702. procedure TCAN1_C1INT.setCTMRIE; inline;
  60703. begin
  60704. pTDefRegMap(@Self)^.&set := $00040000;
  60705. end;
  60706. procedure TCAN1_C1INT.clearCTMRIE; inline;
  60707. begin
  60708. pTDefRegMap(@Self)^.clr := $00040000;
  60709. end;
  60710. procedure TCAN1_C1INT.setCTMRIE(thebits : TBits_1); inline;
  60711. begin
  60712. if thebits = 0 then
  60713. pTDefRegMap(@Self)^.clr := $00040000
  60714. else
  60715. pTDefRegMap(@Self)^.&set := $00040000;
  60716. end;
  60717. function TCAN1_C1INT.getCTMRIE : TBits_1; inline;
  60718. begin
  60719. getCTMRIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  60720. end;
  60721. procedure TCAN1_C1INT.setMODIE; inline;
  60722. begin
  60723. pTDefRegMap(@Self)^.&set := $00080000;
  60724. end;
  60725. procedure TCAN1_C1INT.clearMODIE; inline;
  60726. begin
  60727. pTDefRegMap(@Self)^.clr := $00080000;
  60728. end;
  60729. procedure TCAN1_C1INT.setMODIE(thebits : TBits_1); inline;
  60730. begin
  60731. if thebits = 0 then
  60732. pTDefRegMap(@Self)^.clr := $00080000
  60733. else
  60734. pTDefRegMap(@Self)^.&set := $00080000;
  60735. end;
  60736. function TCAN1_C1INT.getMODIE : TBits_1; inline;
  60737. begin
  60738. getMODIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  60739. end;
  60740. procedure TCAN1_C1INT.setRBOVIE; inline;
  60741. begin
  60742. pTDefRegMap(@Self)^.&set := $08000000;
  60743. end;
  60744. procedure TCAN1_C1INT.clearRBOVIE; inline;
  60745. begin
  60746. pTDefRegMap(@Self)^.clr := $08000000;
  60747. end;
  60748. procedure TCAN1_C1INT.setRBOVIE(thebits : TBits_1); inline;
  60749. begin
  60750. if thebits = 0 then
  60751. pTDefRegMap(@Self)^.clr := $08000000
  60752. else
  60753. pTDefRegMap(@Self)^.&set := $08000000;
  60754. end;
  60755. function TCAN1_C1INT.getRBOVIE : TBits_1; inline;
  60756. begin
  60757. getRBOVIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  60758. end;
  60759. procedure TCAN1_C1INT.setSERRIE; inline;
  60760. begin
  60761. pTDefRegMap(@Self)^.&set := $10000000;
  60762. end;
  60763. procedure TCAN1_C1INT.clearSERRIE; inline;
  60764. begin
  60765. pTDefRegMap(@Self)^.clr := $10000000;
  60766. end;
  60767. procedure TCAN1_C1INT.setSERRIE(thebits : TBits_1); inline;
  60768. begin
  60769. if thebits = 0 then
  60770. pTDefRegMap(@Self)^.clr := $10000000
  60771. else
  60772. pTDefRegMap(@Self)^.&set := $10000000;
  60773. end;
  60774. function TCAN1_C1INT.getSERRIE : TBits_1; inline;
  60775. begin
  60776. getSERRIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  60777. end;
  60778. procedure TCAN1_C1INT.setCERRIE; inline;
  60779. begin
  60780. pTDefRegMap(@Self)^.&set := $20000000;
  60781. end;
  60782. procedure TCAN1_C1INT.clearCERRIE; inline;
  60783. begin
  60784. pTDefRegMap(@Self)^.clr := $20000000;
  60785. end;
  60786. procedure TCAN1_C1INT.setCERRIE(thebits : TBits_1); inline;
  60787. begin
  60788. if thebits = 0 then
  60789. pTDefRegMap(@Self)^.clr := $20000000
  60790. else
  60791. pTDefRegMap(@Self)^.&set := $20000000;
  60792. end;
  60793. function TCAN1_C1INT.getCERRIE : TBits_1; inline;
  60794. begin
  60795. getCERRIE := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  60796. end;
  60797. procedure TCAN1_C1INT.setWAKIE; inline;
  60798. begin
  60799. pTDefRegMap(@Self)^.&set := $40000000;
  60800. end;
  60801. procedure TCAN1_C1INT.clearWAKIE; inline;
  60802. begin
  60803. pTDefRegMap(@Self)^.clr := $40000000;
  60804. end;
  60805. procedure TCAN1_C1INT.setWAKIE(thebits : TBits_1); inline;
  60806. begin
  60807. if thebits = 0 then
  60808. pTDefRegMap(@Self)^.clr := $40000000
  60809. else
  60810. pTDefRegMap(@Self)^.&set := $40000000;
  60811. end;
  60812. function TCAN1_C1INT.getWAKIE : TBits_1; inline;
  60813. begin
  60814. getWAKIE := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  60815. end;
  60816. procedure TCAN1_C1INT.setIVRIE; inline;
  60817. begin
  60818. pTDefRegMap(@Self)^.&set := $80000000;
  60819. end;
  60820. procedure TCAN1_C1INT.clearIVRIE; inline;
  60821. begin
  60822. pTDefRegMap(@Self)^.clr := $80000000;
  60823. end;
  60824. procedure TCAN1_C1INT.setIVRIE(thebits : TBits_1); inline;
  60825. begin
  60826. if thebits = 0 then
  60827. pTDefRegMap(@Self)^.clr := $80000000
  60828. else
  60829. pTDefRegMap(@Self)^.&set := $80000000;
  60830. end;
  60831. function TCAN1_C1INT.getIVRIE : TBits_1; inline;
  60832. begin
  60833. getIVRIE := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  60834. end;
  60835. procedure TCAN1_C1INT.setw(thebits : TBits_32); inline;
  60836. begin
  60837. pTDefRegMap(@Self)^.val := thebits;
  60838. end;
  60839. function TCAN1_C1INT.getw : TBits_32; inline;
  60840. begin
  60841. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  60842. end;
  60843. procedure TCAN1_C1VEC.setICODE(thebits : TBits_7); inline;
  60844. begin
  60845. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF80 or ( thebits shl 0 );
  60846. end;
  60847. function TCAN1_C1VEC.getICODE : TBits_7; inline;
  60848. begin
  60849. getICODE := (pTDefRegMap(@Self)^.val and $0000007F) shr 0;
  60850. end;
  60851. procedure TCAN1_C1VEC.setFILHIT(thebits : TBits_5); inline;
  60852. begin
  60853. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  60854. end;
  60855. function TCAN1_C1VEC.getFILHIT : TBits_5; inline;
  60856. begin
  60857. getFILHIT := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  60858. end;
  60859. procedure TCAN1_C1VEC.setw(thebits : TBits_32); inline;
  60860. begin
  60861. pTDefRegMap(@Self)^.val := thebits;
  60862. end;
  60863. function TCAN1_C1VEC.getw : TBits_32; inline;
  60864. begin
  60865. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  60866. end;
  60867. procedure TCAN1_C1TREC.setRERRCNT(thebits : TBits_8); inline;
  60868. begin
  60869. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  60870. end;
  60871. function TCAN1_C1TREC.getRERRCNT : TBits_8; inline;
  60872. begin
  60873. getRERRCNT := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  60874. end;
  60875. procedure TCAN1_C1TREC.setTERRCNT(thebits : TBits_8); inline;
  60876. begin
  60877. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  60878. end;
  60879. function TCAN1_C1TREC.getTERRCNT : TBits_8; inline;
  60880. begin
  60881. getTERRCNT := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  60882. end;
  60883. procedure TCAN1_C1TREC.setEWARN; inline;
  60884. begin
  60885. pTDefRegMap(@Self)^.&set := $00010000;
  60886. end;
  60887. procedure TCAN1_C1TREC.clearEWARN; inline;
  60888. begin
  60889. pTDefRegMap(@Self)^.clr := $00010000;
  60890. end;
  60891. procedure TCAN1_C1TREC.setEWARN(thebits : TBits_1); inline;
  60892. begin
  60893. if thebits = 0 then
  60894. pTDefRegMap(@Self)^.clr := $00010000
  60895. else
  60896. pTDefRegMap(@Self)^.&set := $00010000;
  60897. end;
  60898. function TCAN1_C1TREC.getEWARN : TBits_1; inline;
  60899. begin
  60900. getEWARN := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  60901. end;
  60902. procedure TCAN1_C1TREC.setRXWARN; inline;
  60903. begin
  60904. pTDefRegMap(@Self)^.&set := $00020000;
  60905. end;
  60906. procedure TCAN1_C1TREC.clearRXWARN; inline;
  60907. begin
  60908. pTDefRegMap(@Self)^.clr := $00020000;
  60909. end;
  60910. procedure TCAN1_C1TREC.setRXWARN(thebits : TBits_1); inline;
  60911. begin
  60912. if thebits = 0 then
  60913. pTDefRegMap(@Self)^.clr := $00020000
  60914. else
  60915. pTDefRegMap(@Self)^.&set := $00020000;
  60916. end;
  60917. function TCAN1_C1TREC.getRXWARN : TBits_1; inline;
  60918. begin
  60919. getRXWARN := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  60920. end;
  60921. procedure TCAN1_C1TREC.setTXWARN; inline;
  60922. begin
  60923. pTDefRegMap(@Self)^.&set := $00040000;
  60924. end;
  60925. procedure TCAN1_C1TREC.clearTXWARN; inline;
  60926. begin
  60927. pTDefRegMap(@Self)^.clr := $00040000;
  60928. end;
  60929. procedure TCAN1_C1TREC.setTXWARN(thebits : TBits_1); inline;
  60930. begin
  60931. if thebits = 0 then
  60932. pTDefRegMap(@Self)^.clr := $00040000
  60933. else
  60934. pTDefRegMap(@Self)^.&set := $00040000;
  60935. end;
  60936. function TCAN1_C1TREC.getTXWARN : TBits_1; inline;
  60937. begin
  60938. getTXWARN := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  60939. end;
  60940. procedure TCAN1_C1TREC.setRXBP; inline;
  60941. begin
  60942. pTDefRegMap(@Self)^.&set := $00080000;
  60943. end;
  60944. procedure TCAN1_C1TREC.clearRXBP; inline;
  60945. begin
  60946. pTDefRegMap(@Self)^.clr := $00080000;
  60947. end;
  60948. procedure TCAN1_C1TREC.setRXBP(thebits : TBits_1); inline;
  60949. begin
  60950. if thebits = 0 then
  60951. pTDefRegMap(@Self)^.clr := $00080000
  60952. else
  60953. pTDefRegMap(@Self)^.&set := $00080000;
  60954. end;
  60955. function TCAN1_C1TREC.getRXBP : TBits_1; inline;
  60956. begin
  60957. getRXBP := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  60958. end;
  60959. procedure TCAN1_C1TREC.setTXBP; inline;
  60960. begin
  60961. pTDefRegMap(@Self)^.&set := $00100000;
  60962. end;
  60963. procedure TCAN1_C1TREC.clearTXBP; inline;
  60964. begin
  60965. pTDefRegMap(@Self)^.clr := $00100000;
  60966. end;
  60967. procedure TCAN1_C1TREC.setTXBP(thebits : TBits_1); inline;
  60968. begin
  60969. if thebits = 0 then
  60970. pTDefRegMap(@Self)^.clr := $00100000
  60971. else
  60972. pTDefRegMap(@Self)^.&set := $00100000;
  60973. end;
  60974. function TCAN1_C1TREC.getTXBP : TBits_1; inline;
  60975. begin
  60976. getTXBP := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  60977. end;
  60978. procedure TCAN1_C1TREC.setTXBO; inline;
  60979. begin
  60980. pTDefRegMap(@Self)^.&set := $00200000;
  60981. end;
  60982. procedure TCAN1_C1TREC.clearTXBO; inline;
  60983. begin
  60984. pTDefRegMap(@Self)^.clr := $00200000;
  60985. end;
  60986. procedure TCAN1_C1TREC.setTXBO(thebits : TBits_1); inline;
  60987. begin
  60988. if thebits = 0 then
  60989. pTDefRegMap(@Self)^.clr := $00200000
  60990. else
  60991. pTDefRegMap(@Self)^.&set := $00200000;
  60992. end;
  60993. function TCAN1_C1TREC.getTXBO : TBits_1; inline;
  60994. begin
  60995. getTXBO := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  60996. end;
  60997. procedure TCAN1_C1TREC.setw(thebits : TBits_32); inline;
  60998. begin
  60999. pTDefRegMap(@Self)^.val := thebits;
  61000. end;
  61001. function TCAN1_C1TREC.getw : TBits_32; inline;
  61002. begin
  61003. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  61004. end;
  61005. procedure TCAN1_C1FSTAT.setFIFOIP(thebits : TBits_32); inline;
  61006. begin
  61007. pTDefRegMap(@Self)^.val := thebits;
  61008. end;
  61009. function TCAN1_C1FSTAT.getFIFOIP : TBits_32; inline;
  61010. begin
  61011. getFIFOIP := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  61012. end;
  61013. procedure TCAN1_C1FSTAT.setFIFOIP0; inline;
  61014. begin
  61015. pTDefRegMap(@Self)^.&set := $00000001;
  61016. end;
  61017. procedure TCAN1_C1FSTAT.clearFIFOIP0; inline;
  61018. begin
  61019. pTDefRegMap(@Self)^.clr := $00000001;
  61020. end;
  61021. procedure TCAN1_C1FSTAT.setFIFOIP0(thebits : TBits_1); inline;
  61022. begin
  61023. if thebits = 0 then
  61024. pTDefRegMap(@Self)^.clr := $00000001
  61025. else
  61026. pTDefRegMap(@Self)^.&set := $00000001;
  61027. end;
  61028. function TCAN1_C1FSTAT.getFIFOIP0 : TBits_1; inline;
  61029. begin
  61030. getFIFOIP0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  61031. end;
  61032. procedure TCAN1_C1FSTAT.setFIFOIP1; inline;
  61033. begin
  61034. pTDefRegMap(@Self)^.&set := $00000002;
  61035. end;
  61036. procedure TCAN1_C1FSTAT.clearFIFOIP1; inline;
  61037. begin
  61038. pTDefRegMap(@Self)^.clr := $00000002;
  61039. end;
  61040. procedure TCAN1_C1FSTAT.setFIFOIP1(thebits : TBits_1); inline;
  61041. begin
  61042. if thebits = 0 then
  61043. pTDefRegMap(@Self)^.clr := $00000002
  61044. else
  61045. pTDefRegMap(@Self)^.&set := $00000002;
  61046. end;
  61047. function TCAN1_C1FSTAT.getFIFOIP1 : TBits_1; inline;
  61048. begin
  61049. getFIFOIP1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  61050. end;
  61051. procedure TCAN1_C1FSTAT.setFIFOIP2; inline;
  61052. begin
  61053. pTDefRegMap(@Self)^.&set := $00000004;
  61054. end;
  61055. procedure TCAN1_C1FSTAT.clearFIFOIP2; inline;
  61056. begin
  61057. pTDefRegMap(@Self)^.clr := $00000004;
  61058. end;
  61059. procedure TCAN1_C1FSTAT.setFIFOIP2(thebits : TBits_1); inline;
  61060. begin
  61061. if thebits = 0 then
  61062. pTDefRegMap(@Self)^.clr := $00000004
  61063. else
  61064. pTDefRegMap(@Self)^.&set := $00000004;
  61065. end;
  61066. function TCAN1_C1FSTAT.getFIFOIP2 : TBits_1; inline;
  61067. begin
  61068. getFIFOIP2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  61069. end;
  61070. procedure TCAN1_C1FSTAT.setFIFOIP3; inline;
  61071. begin
  61072. pTDefRegMap(@Self)^.&set := $00000008;
  61073. end;
  61074. procedure TCAN1_C1FSTAT.clearFIFOIP3; inline;
  61075. begin
  61076. pTDefRegMap(@Self)^.clr := $00000008;
  61077. end;
  61078. procedure TCAN1_C1FSTAT.setFIFOIP3(thebits : TBits_1); inline;
  61079. begin
  61080. if thebits = 0 then
  61081. pTDefRegMap(@Self)^.clr := $00000008
  61082. else
  61083. pTDefRegMap(@Self)^.&set := $00000008;
  61084. end;
  61085. function TCAN1_C1FSTAT.getFIFOIP3 : TBits_1; inline;
  61086. begin
  61087. getFIFOIP3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  61088. end;
  61089. procedure TCAN1_C1FSTAT.setFIFOIP4; inline;
  61090. begin
  61091. pTDefRegMap(@Self)^.&set := $00000010;
  61092. end;
  61093. procedure TCAN1_C1FSTAT.clearFIFOIP4; inline;
  61094. begin
  61095. pTDefRegMap(@Self)^.clr := $00000010;
  61096. end;
  61097. procedure TCAN1_C1FSTAT.setFIFOIP4(thebits : TBits_1); inline;
  61098. begin
  61099. if thebits = 0 then
  61100. pTDefRegMap(@Self)^.clr := $00000010
  61101. else
  61102. pTDefRegMap(@Self)^.&set := $00000010;
  61103. end;
  61104. function TCAN1_C1FSTAT.getFIFOIP4 : TBits_1; inline;
  61105. begin
  61106. getFIFOIP4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  61107. end;
  61108. procedure TCAN1_C1FSTAT.setFIFOIP5; inline;
  61109. begin
  61110. pTDefRegMap(@Self)^.&set := $00000020;
  61111. end;
  61112. procedure TCAN1_C1FSTAT.clearFIFOIP5; inline;
  61113. begin
  61114. pTDefRegMap(@Self)^.clr := $00000020;
  61115. end;
  61116. procedure TCAN1_C1FSTAT.setFIFOIP5(thebits : TBits_1); inline;
  61117. begin
  61118. if thebits = 0 then
  61119. pTDefRegMap(@Self)^.clr := $00000020
  61120. else
  61121. pTDefRegMap(@Self)^.&set := $00000020;
  61122. end;
  61123. function TCAN1_C1FSTAT.getFIFOIP5 : TBits_1; inline;
  61124. begin
  61125. getFIFOIP5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  61126. end;
  61127. procedure TCAN1_C1FSTAT.setFIFOIP6; inline;
  61128. begin
  61129. pTDefRegMap(@Self)^.&set := $00000040;
  61130. end;
  61131. procedure TCAN1_C1FSTAT.clearFIFOIP6; inline;
  61132. begin
  61133. pTDefRegMap(@Self)^.clr := $00000040;
  61134. end;
  61135. procedure TCAN1_C1FSTAT.setFIFOIP6(thebits : TBits_1); inline;
  61136. begin
  61137. if thebits = 0 then
  61138. pTDefRegMap(@Self)^.clr := $00000040
  61139. else
  61140. pTDefRegMap(@Self)^.&set := $00000040;
  61141. end;
  61142. function TCAN1_C1FSTAT.getFIFOIP6 : TBits_1; inline;
  61143. begin
  61144. getFIFOIP6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  61145. end;
  61146. procedure TCAN1_C1FSTAT.setFIFOIP7; inline;
  61147. begin
  61148. pTDefRegMap(@Self)^.&set := $00000080;
  61149. end;
  61150. procedure TCAN1_C1FSTAT.clearFIFOIP7; inline;
  61151. begin
  61152. pTDefRegMap(@Self)^.clr := $00000080;
  61153. end;
  61154. procedure TCAN1_C1FSTAT.setFIFOIP7(thebits : TBits_1); inline;
  61155. begin
  61156. if thebits = 0 then
  61157. pTDefRegMap(@Self)^.clr := $00000080
  61158. else
  61159. pTDefRegMap(@Self)^.&set := $00000080;
  61160. end;
  61161. function TCAN1_C1FSTAT.getFIFOIP7 : TBits_1; inline;
  61162. begin
  61163. getFIFOIP7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  61164. end;
  61165. procedure TCAN1_C1FSTAT.setFIFOIP8; inline;
  61166. begin
  61167. pTDefRegMap(@Self)^.&set := $00000100;
  61168. end;
  61169. procedure TCAN1_C1FSTAT.clearFIFOIP8; inline;
  61170. begin
  61171. pTDefRegMap(@Self)^.clr := $00000100;
  61172. end;
  61173. procedure TCAN1_C1FSTAT.setFIFOIP8(thebits : TBits_1); inline;
  61174. begin
  61175. if thebits = 0 then
  61176. pTDefRegMap(@Self)^.clr := $00000100
  61177. else
  61178. pTDefRegMap(@Self)^.&set := $00000100;
  61179. end;
  61180. function TCAN1_C1FSTAT.getFIFOIP8 : TBits_1; inline;
  61181. begin
  61182. getFIFOIP8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  61183. end;
  61184. procedure TCAN1_C1FSTAT.setFIFOIP9; inline;
  61185. begin
  61186. pTDefRegMap(@Self)^.&set := $00000200;
  61187. end;
  61188. procedure TCAN1_C1FSTAT.clearFIFOIP9; inline;
  61189. begin
  61190. pTDefRegMap(@Self)^.clr := $00000200;
  61191. end;
  61192. procedure TCAN1_C1FSTAT.setFIFOIP9(thebits : TBits_1); inline;
  61193. begin
  61194. if thebits = 0 then
  61195. pTDefRegMap(@Self)^.clr := $00000200
  61196. else
  61197. pTDefRegMap(@Self)^.&set := $00000200;
  61198. end;
  61199. function TCAN1_C1FSTAT.getFIFOIP9 : TBits_1; inline;
  61200. begin
  61201. getFIFOIP9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  61202. end;
  61203. procedure TCAN1_C1FSTAT.setFIFOIP10; inline;
  61204. begin
  61205. pTDefRegMap(@Self)^.&set := $00000400;
  61206. end;
  61207. procedure TCAN1_C1FSTAT.clearFIFOIP10; inline;
  61208. begin
  61209. pTDefRegMap(@Self)^.clr := $00000400;
  61210. end;
  61211. procedure TCAN1_C1FSTAT.setFIFOIP10(thebits : TBits_1); inline;
  61212. begin
  61213. if thebits = 0 then
  61214. pTDefRegMap(@Self)^.clr := $00000400
  61215. else
  61216. pTDefRegMap(@Self)^.&set := $00000400;
  61217. end;
  61218. function TCAN1_C1FSTAT.getFIFOIP10 : TBits_1; inline;
  61219. begin
  61220. getFIFOIP10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  61221. end;
  61222. procedure TCAN1_C1FSTAT.setFIFOIP11; inline;
  61223. begin
  61224. pTDefRegMap(@Self)^.&set := $00000800;
  61225. end;
  61226. procedure TCAN1_C1FSTAT.clearFIFOIP11; inline;
  61227. begin
  61228. pTDefRegMap(@Self)^.clr := $00000800;
  61229. end;
  61230. procedure TCAN1_C1FSTAT.setFIFOIP11(thebits : TBits_1); inline;
  61231. begin
  61232. if thebits = 0 then
  61233. pTDefRegMap(@Self)^.clr := $00000800
  61234. else
  61235. pTDefRegMap(@Self)^.&set := $00000800;
  61236. end;
  61237. function TCAN1_C1FSTAT.getFIFOIP11 : TBits_1; inline;
  61238. begin
  61239. getFIFOIP11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  61240. end;
  61241. procedure TCAN1_C1FSTAT.setFIFOIP12; inline;
  61242. begin
  61243. pTDefRegMap(@Self)^.&set := $00001000;
  61244. end;
  61245. procedure TCAN1_C1FSTAT.clearFIFOIP12; inline;
  61246. begin
  61247. pTDefRegMap(@Self)^.clr := $00001000;
  61248. end;
  61249. procedure TCAN1_C1FSTAT.setFIFOIP12(thebits : TBits_1); inline;
  61250. begin
  61251. if thebits = 0 then
  61252. pTDefRegMap(@Self)^.clr := $00001000
  61253. else
  61254. pTDefRegMap(@Self)^.&set := $00001000;
  61255. end;
  61256. function TCAN1_C1FSTAT.getFIFOIP12 : TBits_1; inline;
  61257. begin
  61258. getFIFOIP12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  61259. end;
  61260. procedure TCAN1_C1FSTAT.setFIFOIP13; inline;
  61261. begin
  61262. pTDefRegMap(@Self)^.&set := $00002000;
  61263. end;
  61264. procedure TCAN1_C1FSTAT.clearFIFOIP13; inline;
  61265. begin
  61266. pTDefRegMap(@Self)^.clr := $00002000;
  61267. end;
  61268. procedure TCAN1_C1FSTAT.setFIFOIP13(thebits : TBits_1); inline;
  61269. begin
  61270. if thebits = 0 then
  61271. pTDefRegMap(@Self)^.clr := $00002000
  61272. else
  61273. pTDefRegMap(@Self)^.&set := $00002000;
  61274. end;
  61275. function TCAN1_C1FSTAT.getFIFOIP13 : TBits_1; inline;
  61276. begin
  61277. getFIFOIP13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  61278. end;
  61279. procedure TCAN1_C1FSTAT.setFIFOIP14; inline;
  61280. begin
  61281. pTDefRegMap(@Self)^.&set := $00004000;
  61282. end;
  61283. procedure TCAN1_C1FSTAT.clearFIFOIP14; inline;
  61284. begin
  61285. pTDefRegMap(@Self)^.clr := $00004000;
  61286. end;
  61287. procedure TCAN1_C1FSTAT.setFIFOIP14(thebits : TBits_1); inline;
  61288. begin
  61289. if thebits = 0 then
  61290. pTDefRegMap(@Self)^.clr := $00004000
  61291. else
  61292. pTDefRegMap(@Self)^.&set := $00004000;
  61293. end;
  61294. function TCAN1_C1FSTAT.getFIFOIP14 : TBits_1; inline;
  61295. begin
  61296. getFIFOIP14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  61297. end;
  61298. procedure TCAN1_C1FSTAT.setFIFOIP15; inline;
  61299. begin
  61300. pTDefRegMap(@Self)^.&set := $00008000;
  61301. end;
  61302. procedure TCAN1_C1FSTAT.clearFIFOIP15; inline;
  61303. begin
  61304. pTDefRegMap(@Self)^.clr := $00008000;
  61305. end;
  61306. procedure TCAN1_C1FSTAT.setFIFOIP15(thebits : TBits_1); inline;
  61307. begin
  61308. if thebits = 0 then
  61309. pTDefRegMap(@Self)^.clr := $00008000
  61310. else
  61311. pTDefRegMap(@Self)^.&set := $00008000;
  61312. end;
  61313. function TCAN1_C1FSTAT.getFIFOIP15 : TBits_1; inline;
  61314. begin
  61315. getFIFOIP15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  61316. end;
  61317. procedure TCAN1_C1FSTAT.setFIFOIP16; inline;
  61318. begin
  61319. pTDefRegMap(@Self)^.&set := $00010000;
  61320. end;
  61321. procedure TCAN1_C1FSTAT.clearFIFOIP16; inline;
  61322. begin
  61323. pTDefRegMap(@Self)^.clr := $00010000;
  61324. end;
  61325. procedure TCAN1_C1FSTAT.setFIFOIP16(thebits : TBits_1); inline;
  61326. begin
  61327. if thebits = 0 then
  61328. pTDefRegMap(@Self)^.clr := $00010000
  61329. else
  61330. pTDefRegMap(@Self)^.&set := $00010000;
  61331. end;
  61332. function TCAN1_C1FSTAT.getFIFOIP16 : TBits_1; inline;
  61333. begin
  61334. getFIFOIP16 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  61335. end;
  61336. procedure TCAN1_C1FSTAT.setFIFOIP17; inline;
  61337. begin
  61338. pTDefRegMap(@Self)^.&set := $00020000;
  61339. end;
  61340. procedure TCAN1_C1FSTAT.clearFIFOIP17; inline;
  61341. begin
  61342. pTDefRegMap(@Self)^.clr := $00020000;
  61343. end;
  61344. procedure TCAN1_C1FSTAT.setFIFOIP17(thebits : TBits_1); inline;
  61345. begin
  61346. if thebits = 0 then
  61347. pTDefRegMap(@Self)^.clr := $00020000
  61348. else
  61349. pTDefRegMap(@Self)^.&set := $00020000;
  61350. end;
  61351. function TCAN1_C1FSTAT.getFIFOIP17 : TBits_1; inline;
  61352. begin
  61353. getFIFOIP17 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  61354. end;
  61355. procedure TCAN1_C1FSTAT.setFIFOIP18; inline;
  61356. begin
  61357. pTDefRegMap(@Self)^.&set := $00040000;
  61358. end;
  61359. procedure TCAN1_C1FSTAT.clearFIFOIP18; inline;
  61360. begin
  61361. pTDefRegMap(@Self)^.clr := $00040000;
  61362. end;
  61363. procedure TCAN1_C1FSTAT.setFIFOIP18(thebits : TBits_1); inline;
  61364. begin
  61365. if thebits = 0 then
  61366. pTDefRegMap(@Self)^.clr := $00040000
  61367. else
  61368. pTDefRegMap(@Self)^.&set := $00040000;
  61369. end;
  61370. function TCAN1_C1FSTAT.getFIFOIP18 : TBits_1; inline;
  61371. begin
  61372. getFIFOIP18 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  61373. end;
  61374. procedure TCAN1_C1FSTAT.setFIFOIP19; inline;
  61375. begin
  61376. pTDefRegMap(@Self)^.&set := $00080000;
  61377. end;
  61378. procedure TCAN1_C1FSTAT.clearFIFOIP19; inline;
  61379. begin
  61380. pTDefRegMap(@Self)^.clr := $00080000;
  61381. end;
  61382. procedure TCAN1_C1FSTAT.setFIFOIP19(thebits : TBits_1); inline;
  61383. begin
  61384. if thebits = 0 then
  61385. pTDefRegMap(@Self)^.clr := $00080000
  61386. else
  61387. pTDefRegMap(@Self)^.&set := $00080000;
  61388. end;
  61389. function TCAN1_C1FSTAT.getFIFOIP19 : TBits_1; inline;
  61390. begin
  61391. getFIFOIP19 := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  61392. end;
  61393. procedure TCAN1_C1FSTAT.setFIFOIP20; inline;
  61394. begin
  61395. pTDefRegMap(@Self)^.&set := $00100000;
  61396. end;
  61397. procedure TCAN1_C1FSTAT.clearFIFOIP20; inline;
  61398. begin
  61399. pTDefRegMap(@Self)^.clr := $00100000;
  61400. end;
  61401. procedure TCAN1_C1FSTAT.setFIFOIP20(thebits : TBits_1); inline;
  61402. begin
  61403. if thebits = 0 then
  61404. pTDefRegMap(@Self)^.clr := $00100000
  61405. else
  61406. pTDefRegMap(@Self)^.&set := $00100000;
  61407. end;
  61408. function TCAN1_C1FSTAT.getFIFOIP20 : TBits_1; inline;
  61409. begin
  61410. getFIFOIP20 := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  61411. end;
  61412. procedure TCAN1_C1FSTAT.setFIFOIP21; inline;
  61413. begin
  61414. pTDefRegMap(@Self)^.&set := $00200000;
  61415. end;
  61416. procedure TCAN1_C1FSTAT.clearFIFOIP21; inline;
  61417. begin
  61418. pTDefRegMap(@Self)^.clr := $00200000;
  61419. end;
  61420. procedure TCAN1_C1FSTAT.setFIFOIP21(thebits : TBits_1); inline;
  61421. begin
  61422. if thebits = 0 then
  61423. pTDefRegMap(@Self)^.clr := $00200000
  61424. else
  61425. pTDefRegMap(@Self)^.&set := $00200000;
  61426. end;
  61427. function TCAN1_C1FSTAT.getFIFOIP21 : TBits_1; inline;
  61428. begin
  61429. getFIFOIP21 := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  61430. end;
  61431. procedure TCAN1_C1FSTAT.setFIFOIP22; inline;
  61432. begin
  61433. pTDefRegMap(@Self)^.&set := $00400000;
  61434. end;
  61435. procedure TCAN1_C1FSTAT.clearFIFOIP22; inline;
  61436. begin
  61437. pTDefRegMap(@Self)^.clr := $00400000;
  61438. end;
  61439. procedure TCAN1_C1FSTAT.setFIFOIP22(thebits : TBits_1); inline;
  61440. begin
  61441. if thebits = 0 then
  61442. pTDefRegMap(@Self)^.clr := $00400000
  61443. else
  61444. pTDefRegMap(@Self)^.&set := $00400000;
  61445. end;
  61446. function TCAN1_C1FSTAT.getFIFOIP22 : TBits_1; inline;
  61447. begin
  61448. getFIFOIP22 := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  61449. end;
  61450. procedure TCAN1_C1FSTAT.setFIFOIP23; inline;
  61451. begin
  61452. pTDefRegMap(@Self)^.&set := $00800000;
  61453. end;
  61454. procedure TCAN1_C1FSTAT.clearFIFOIP23; inline;
  61455. begin
  61456. pTDefRegMap(@Self)^.clr := $00800000;
  61457. end;
  61458. procedure TCAN1_C1FSTAT.setFIFOIP23(thebits : TBits_1); inline;
  61459. begin
  61460. if thebits = 0 then
  61461. pTDefRegMap(@Self)^.clr := $00800000
  61462. else
  61463. pTDefRegMap(@Self)^.&set := $00800000;
  61464. end;
  61465. function TCAN1_C1FSTAT.getFIFOIP23 : TBits_1; inline;
  61466. begin
  61467. getFIFOIP23 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  61468. end;
  61469. procedure TCAN1_C1FSTAT.setFIFOIP24; inline;
  61470. begin
  61471. pTDefRegMap(@Self)^.&set := $01000000;
  61472. end;
  61473. procedure TCAN1_C1FSTAT.clearFIFOIP24; inline;
  61474. begin
  61475. pTDefRegMap(@Self)^.clr := $01000000;
  61476. end;
  61477. procedure TCAN1_C1FSTAT.setFIFOIP24(thebits : TBits_1); inline;
  61478. begin
  61479. if thebits = 0 then
  61480. pTDefRegMap(@Self)^.clr := $01000000
  61481. else
  61482. pTDefRegMap(@Self)^.&set := $01000000;
  61483. end;
  61484. function TCAN1_C1FSTAT.getFIFOIP24 : TBits_1; inline;
  61485. begin
  61486. getFIFOIP24 := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  61487. end;
  61488. procedure TCAN1_C1FSTAT.setFIFOIP25; inline;
  61489. begin
  61490. pTDefRegMap(@Self)^.&set := $02000000;
  61491. end;
  61492. procedure TCAN1_C1FSTAT.clearFIFOIP25; inline;
  61493. begin
  61494. pTDefRegMap(@Self)^.clr := $02000000;
  61495. end;
  61496. procedure TCAN1_C1FSTAT.setFIFOIP25(thebits : TBits_1); inline;
  61497. begin
  61498. if thebits = 0 then
  61499. pTDefRegMap(@Self)^.clr := $02000000
  61500. else
  61501. pTDefRegMap(@Self)^.&set := $02000000;
  61502. end;
  61503. function TCAN1_C1FSTAT.getFIFOIP25 : TBits_1; inline;
  61504. begin
  61505. getFIFOIP25 := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  61506. end;
  61507. procedure TCAN1_C1FSTAT.setFIFOIP26; inline;
  61508. begin
  61509. pTDefRegMap(@Self)^.&set := $04000000;
  61510. end;
  61511. procedure TCAN1_C1FSTAT.clearFIFOIP26; inline;
  61512. begin
  61513. pTDefRegMap(@Self)^.clr := $04000000;
  61514. end;
  61515. procedure TCAN1_C1FSTAT.setFIFOIP26(thebits : TBits_1); inline;
  61516. begin
  61517. if thebits = 0 then
  61518. pTDefRegMap(@Self)^.clr := $04000000
  61519. else
  61520. pTDefRegMap(@Self)^.&set := $04000000;
  61521. end;
  61522. function TCAN1_C1FSTAT.getFIFOIP26 : TBits_1; inline;
  61523. begin
  61524. getFIFOIP26 := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  61525. end;
  61526. procedure TCAN1_C1FSTAT.setFIFOIP27; inline;
  61527. begin
  61528. pTDefRegMap(@Self)^.&set := $08000000;
  61529. end;
  61530. procedure TCAN1_C1FSTAT.clearFIFOIP27; inline;
  61531. begin
  61532. pTDefRegMap(@Self)^.clr := $08000000;
  61533. end;
  61534. procedure TCAN1_C1FSTAT.setFIFOIP27(thebits : TBits_1); inline;
  61535. begin
  61536. if thebits = 0 then
  61537. pTDefRegMap(@Self)^.clr := $08000000
  61538. else
  61539. pTDefRegMap(@Self)^.&set := $08000000;
  61540. end;
  61541. function TCAN1_C1FSTAT.getFIFOIP27 : TBits_1; inline;
  61542. begin
  61543. getFIFOIP27 := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  61544. end;
  61545. procedure TCAN1_C1FSTAT.setFIFOIP28; inline;
  61546. begin
  61547. pTDefRegMap(@Self)^.&set := $10000000;
  61548. end;
  61549. procedure TCAN1_C1FSTAT.clearFIFOIP28; inline;
  61550. begin
  61551. pTDefRegMap(@Self)^.clr := $10000000;
  61552. end;
  61553. procedure TCAN1_C1FSTAT.setFIFOIP28(thebits : TBits_1); inline;
  61554. begin
  61555. if thebits = 0 then
  61556. pTDefRegMap(@Self)^.clr := $10000000
  61557. else
  61558. pTDefRegMap(@Self)^.&set := $10000000;
  61559. end;
  61560. function TCAN1_C1FSTAT.getFIFOIP28 : TBits_1; inline;
  61561. begin
  61562. getFIFOIP28 := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  61563. end;
  61564. procedure TCAN1_C1FSTAT.setFIFOIP29; inline;
  61565. begin
  61566. pTDefRegMap(@Self)^.&set := $20000000;
  61567. end;
  61568. procedure TCAN1_C1FSTAT.clearFIFOIP29; inline;
  61569. begin
  61570. pTDefRegMap(@Self)^.clr := $20000000;
  61571. end;
  61572. procedure TCAN1_C1FSTAT.setFIFOIP29(thebits : TBits_1); inline;
  61573. begin
  61574. if thebits = 0 then
  61575. pTDefRegMap(@Self)^.clr := $20000000
  61576. else
  61577. pTDefRegMap(@Self)^.&set := $20000000;
  61578. end;
  61579. function TCAN1_C1FSTAT.getFIFOIP29 : TBits_1; inline;
  61580. begin
  61581. getFIFOIP29 := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  61582. end;
  61583. procedure TCAN1_C1FSTAT.setFIFOIP30; inline;
  61584. begin
  61585. pTDefRegMap(@Self)^.&set := $40000000;
  61586. end;
  61587. procedure TCAN1_C1FSTAT.clearFIFOIP30; inline;
  61588. begin
  61589. pTDefRegMap(@Self)^.clr := $40000000;
  61590. end;
  61591. procedure TCAN1_C1FSTAT.setFIFOIP30(thebits : TBits_1); inline;
  61592. begin
  61593. if thebits = 0 then
  61594. pTDefRegMap(@Self)^.clr := $40000000
  61595. else
  61596. pTDefRegMap(@Self)^.&set := $40000000;
  61597. end;
  61598. function TCAN1_C1FSTAT.getFIFOIP30 : TBits_1; inline;
  61599. begin
  61600. getFIFOIP30 := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  61601. end;
  61602. procedure TCAN1_C1FSTAT.setFIFOIP31; inline;
  61603. begin
  61604. pTDefRegMap(@Self)^.&set := $80000000;
  61605. end;
  61606. procedure TCAN1_C1FSTAT.clearFIFOIP31; inline;
  61607. begin
  61608. pTDefRegMap(@Self)^.clr := $80000000;
  61609. end;
  61610. procedure TCAN1_C1FSTAT.setFIFOIP31(thebits : TBits_1); inline;
  61611. begin
  61612. if thebits = 0 then
  61613. pTDefRegMap(@Self)^.clr := $80000000
  61614. else
  61615. pTDefRegMap(@Self)^.&set := $80000000;
  61616. end;
  61617. function TCAN1_C1FSTAT.getFIFOIP31 : TBits_1; inline;
  61618. begin
  61619. getFIFOIP31 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  61620. end;
  61621. procedure TCAN1_C1FSTAT.setw(thebits : TBits_32); inline;
  61622. begin
  61623. pTDefRegMap(@Self)^.val := thebits;
  61624. end;
  61625. function TCAN1_C1FSTAT.getw : TBits_32; inline;
  61626. begin
  61627. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  61628. end;
  61629. procedure TCAN1_C1RXOVF.setRXOVF(thebits : TBits_32); inline;
  61630. begin
  61631. pTDefRegMap(@Self)^.val := thebits;
  61632. end;
  61633. function TCAN1_C1RXOVF.getRXOVF : TBits_32; inline;
  61634. begin
  61635. getRXOVF := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  61636. end;
  61637. procedure TCAN1_C1RXOVF.setRXOVF0; inline;
  61638. begin
  61639. pTDefRegMap(@Self)^.&set := $00000001;
  61640. end;
  61641. procedure TCAN1_C1RXOVF.clearRXOVF0; inline;
  61642. begin
  61643. pTDefRegMap(@Self)^.clr := $00000001;
  61644. end;
  61645. procedure TCAN1_C1RXOVF.setRXOVF0(thebits : TBits_1); inline;
  61646. begin
  61647. if thebits = 0 then
  61648. pTDefRegMap(@Self)^.clr := $00000001
  61649. else
  61650. pTDefRegMap(@Self)^.&set := $00000001;
  61651. end;
  61652. function TCAN1_C1RXOVF.getRXOVF0 : TBits_1; inline;
  61653. begin
  61654. getRXOVF0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  61655. end;
  61656. procedure TCAN1_C1RXOVF.setRXOVF1; inline;
  61657. begin
  61658. pTDefRegMap(@Self)^.&set := $00000002;
  61659. end;
  61660. procedure TCAN1_C1RXOVF.clearRXOVF1; inline;
  61661. begin
  61662. pTDefRegMap(@Self)^.clr := $00000002;
  61663. end;
  61664. procedure TCAN1_C1RXOVF.setRXOVF1(thebits : TBits_1); inline;
  61665. begin
  61666. if thebits = 0 then
  61667. pTDefRegMap(@Self)^.clr := $00000002
  61668. else
  61669. pTDefRegMap(@Self)^.&set := $00000002;
  61670. end;
  61671. function TCAN1_C1RXOVF.getRXOVF1 : TBits_1; inline;
  61672. begin
  61673. getRXOVF1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  61674. end;
  61675. procedure TCAN1_C1RXOVF.setRXOVF2; inline;
  61676. begin
  61677. pTDefRegMap(@Self)^.&set := $00000004;
  61678. end;
  61679. procedure TCAN1_C1RXOVF.clearRXOVF2; inline;
  61680. begin
  61681. pTDefRegMap(@Self)^.clr := $00000004;
  61682. end;
  61683. procedure TCAN1_C1RXOVF.setRXOVF2(thebits : TBits_1); inline;
  61684. begin
  61685. if thebits = 0 then
  61686. pTDefRegMap(@Self)^.clr := $00000004
  61687. else
  61688. pTDefRegMap(@Self)^.&set := $00000004;
  61689. end;
  61690. function TCAN1_C1RXOVF.getRXOVF2 : TBits_1; inline;
  61691. begin
  61692. getRXOVF2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  61693. end;
  61694. procedure TCAN1_C1RXOVF.setRXOVF3; inline;
  61695. begin
  61696. pTDefRegMap(@Self)^.&set := $00000008;
  61697. end;
  61698. procedure TCAN1_C1RXOVF.clearRXOVF3; inline;
  61699. begin
  61700. pTDefRegMap(@Self)^.clr := $00000008;
  61701. end;
  61702. procedure TCAN1_C1RXOVF.setRXOVF3(thebits : TBits_1); inline;
  61703. begin
  61704. if thebits = 0 then
  61705. pTDefRegMap(@Self)^.clr := $00000008
  61706. else
  61707. pTDefRegMap(@Self)^.&set := $00000008;
  61708. end;
  61709. function TCAN1_C1RXOVF.getRXOVF3 : TBits_1; inline;
  61710. begin
  61711. getRXOVF3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  61712. end;
  61713. procedure TCAN1_C1RXOVF.setRXOVF4; inline;
  61714. begin
  61715. pTDefRegMap(@Self)^.&set := $00000010;
  61716. end;
  61717. procedure TCAN1_C1RXOVF.clearRXOVF4; inline;
  61718. begin
  61719. pTDefRegMap(@Self)^.clr := $00000010;
  61720. end;
  61721. procedure TCAN1_C1RXOVF.setRXOVF4(thebits : TBits_1); inline;
  61722. begin
  61723. if thebits = 0 then
  61724. pTDefRegMap(@Self)^.clr := $00000010
  61725. else
  61726. pTDefRegMap(@Self)^.&set := $00000010;
  61727. end;
  61728. function TCAN1_C1RXOVF.getRXOVF4 : TBits_1; inline;
  61729. begin
  61730. getRXOVF4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  61731. end;
  61732. procedure TCAN1_C1RXOVF.setRXOVF5; inline;
  61733. begin
  61734. pTDefRegMap(@Self)^.&set := $00000020;
  61735. end;
  61736. procedure TCAN1_C1RXOVF.clearRXOVF5; inline;
  61737. begin
  61738. pTDefRegMap(@Self)^.clr := $00000020;
  61739. end;
  61740. procedure TCAN1_C1RXOVF.setRXOVF5(thebits : TBits_1); inline;
  61741. begin
  61742. if thebits = 0 then
  61743. pTDefRegMap(@Self)^.clr := $00000020
  61744. else
  61745. pTDefRegMap(@Self)^.&set := $00000020;
  61746. end;
  61747. function TCAN1_C1RXOVF.getRXOVF5 : TBits_1; inline;
  61748. begin
  61749. getRXOVF5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  61750. end;
  61751. procedure TCAN1_C1RXOVF.setRXOVF6; inline;
  61752. begin
  61753. pTDefRegMap(@Self)^.&set := $00000040;
  61754. end;
  61755. procedure TCAN1_C1RXOVF.clearRXOVF6; inline;
  61756. begin
  61757. pTDefRegMap(@Self)^.clr := $00000040;
  61758. end;
  61759. procedure TCAN1_C1RXOVF.setRXOVF6(thebits : TBits_1); inline;
  61760. begin
  61761. if thebits = 0 then
  61762. pTDefRegMap(@Self)^.clr := $00000040
  61763. else
  61764. pTDefRegMap(@Self)^.&set := $00000040;
  61765. end;
  61766. function TCAN1_C1RXOVF.getRXOVF6 : TBits_1; inline;
  61767. begin
  61768. getRXOVF6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  61769. end;
  61770. procedure TCAN1_C1RXOVF.setRXOVF7; inline;
  61771. begin
  61772. pTDefRegMap(@Self)^.&set := $00000080;
  61773. end;
  61774. procedure TCAN1_C1RXOVF.clearRXOVF7; inline;
  61775. begin
  61776. pTDefRegMap(@Self)^.clr := $00000080;
  61777. end;
  61778. procedure TCAN1_C1RXOVF.setRXOVF7(thebits : TBits_1); inline;
  61779. begin
  61780. if thebits = 0 then
  61781. pTDefRegMap(@Self)^.clr := $00000080
  61782. else
  61783. pTDefRegMap(@Self)^.&set := $00000080;
  61784. end;
  61785. function TCAN1_C1RXOVF.getRXOVF7 : TBits_1; inline;
  61786. begin
  61787. getRXOVF7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  61788. end;
  61789. procedure TCAN1_C1RXOVF.setRXOVF8; inline;
  61790. begin
  61791. pTDefRegMap(@Self)^.&set := $00000100;
  61792. end;
  61793. procedure TCAN1_C1RXOVF.clearRXOVF8; inline;
  61794. begin
  61795. pTDefRegMap(@Self)^.clr := $00000100;
  61796. end;
  61797. procedure TCAN1_C1RXOVF.setRXOVF8(thebits : TBits_1); inline;
  61798. begin
  61799. if thebits = 0 then
  61800. pTDefRegMap(@Self)^.clr := $00000100
  61801. else
  61802. pTDefRegMap(@Self)^.&set := $00000100;
  61803. end;
  61804. function TCAN1_C1RXOVF.getRXOVF8 : TBits_1; inline;
  61805. begin
  61806. getRXOVF8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  61807. end;
  61808. procedure TCAN1_C1RXOVF.setRXOVF9; inline;
  61809. begin
  61810. pTDefRegMap(@Self)^.&set := $00000200;
  61811. end;
  61812. procedure TCAN1_C1RXOVF.clearRXOVF9; inline;
  61813. begin
  61814. pTDefRegMap(@Self)^.clr := $00000200;
  61815. end;
  61816. procedure TCAN1_C1RXOVF.setRXOVF9(thebits : TBits_1); inline;
  61817. begin
  61818. if thebits = 0 then
  61819. pTDefRegMap(@Self)^.clr := $00000200
  61820. else
  61821. pTDefRegMap(@Self)^.&set := $00000200;
  61822. end;
  61823. function TCAN1_C1RXOVF.getRXOVF9 : TBits_1; inline;
  61824. begin
  61825. getRXOVF9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  61826. end;
  61827. procedure TCAN1_C1RXOVF.setRXOVF10; inline;
  61828. begin
  61829. pTDefRegMap(@Self)^.&set := $00000400;
  61830. end;
  61831. procedure TCAN1_C1RXOVF.clearRXOVF10; inline;
  61832. begin
  61833. pTDefRegMap(@Self)^.clr := $00000400;
  61834. end;
  61835. procedure TCAN1_C1RXOVF.setRXOVF10(thebits : TBits_1); inline;
  61836. begin
  61837. if thebits = 0 then
  61838. pTDefRegMap(@Self)^.clr := $00000400
  61839. else
  61840. pTDefRegMap(@Self)^.&set := $00000400;
  61841. end;
  61842. function TCAN1_C1RXOVF.getRXOVF10 : TBits_1; inline;
  61843. begin
  61844. getRXOVF10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  61845. end;
  61846. procedure TCAN1_C1RXOVF.setRXOVF11; inline;
  61847. begin
  61848. pTDefRegMap(@Self)^.&set := $00000800;
  61849. end;
  61850. procedure TCAN1_C1RXOVF.clearRXOVF11; inline;
  61851. begin
  61852. pTDefRegMap(@Self)^.clr := $00000800;
  61853. end;
  61854. procedure TCAN1_C1RXOVF.setRXOVF11(thebits : TBits_1); inline;
  61855. begin
  61856. if thebits = 0 then
  61857. pTDefRegMap(@Self)^.clr := $00000800
  61858. else
  61859. pTDefRegMap(@Self)^.&set := $00000800;
  61860. end;
  61861. function TCAN1_C1RXOVF.getRXOVF11 : TBits_1; inline;
  61862. begin
  61863. getRXOVF11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  61864. end;
  61865. procedure TCAN1_C1RXOVF.setRXOVF12; inline;
  61866. begin
  61867. pTDefRegMap(@Self)^.&set := $00001000;
  61868. end;
  61869. procedure TCAN1_C1RXOVF.clearRXOVF12; inline;
  61870. begin
  61871. pTDefRegMap(@Self)^.clr := $00001000;
  61872. end;
  61873. procedure TCAN1_C1RXOVF.setRXOVF12(thebits : TBits_1); inline;
  61874. begin
  61875. if thebits = 0 then
  61876. pTDefRegMap(@Self)^.clr := $00001000
  61877. else
  61878. pTDefRegMap(@Self)^.&set := $00001000;
  61879. end;
  61880. function TCAN1_C1RXOVF.getRXOVF12 : TBits_1; inline;
  61881. begin
  61882. getRXOVF12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  61883. end;
  61884. procedure TCAN1_C1RXOVF.setRXOVF13; inline;
  61885. begin
  61886. pTDefRegMap(@Self)^.&set := $00002000;
  61887. end;
  61888. procedure TCAN1_C1RXOVF.clearRXOVF13; inline;
  61889. begin
  61890. pTDefRegMap(@Self)^.clr := $00002000;
  61891. end;
  61892. procedure TCAN1_C1RXOVF.setRXOVF13(thebits : TBits_1); inline;
  61893. begin
  61894. if thebits = 0 then
  61895. pTDefRegMap(@Self)^.clr := $00002000
  61896. else
  61897. pTDefRegMap(@Self)^.&set := $00002000;
  61898. end;
  61899. function TCAN1_C1RXOVF.getRXOVF13 : TBits_1; inline;
  61900. begin
  61901. getRXOVF13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  61902. end;
  61903. procedure TCAN1_C1RXOVF.setRXOVF14; inline;
  61904. begin
  61905. pTDefRegMap(@Self)^.&set := $00004000;
  61906. end;
  61907. procedure TCAN1_C1RXOVF.clearRXOVF14; inline;
  61908. begin
  61909. pTDefRegMap(@Self)^.clr := $00004000;
  61910. end;
  61911. procedure TCAN1_C1RXOVF.setRXOVF14(thebits : TBits_1); inline;
  61912. begin
  61913. if thebits = 0 then
  61914. pTDefRegMap(@Self)^.clr := $00004000
  61915. else
  61916. pTDefRegMap(@Self)^.&set := $00004000;
  61917. end;
  61918. function TCAN1_C1RXOVF.getRXOVF14 : TBits_1; inline;
  61919. begin
  61920. getRXOVF14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  61921. end;
  61922. procedure TCAN1_C1RXOVF.setRXOVF15; inline;
  61923. begin
  61924. pTDefRegMap(@Self)^.&set := $00008000;
  61925. end;
  61926. procedure TCAN1_C1RXOVF.clearRXOVF15; inline;
  61927. begin
  61928. pTDefRegMap(@Self)^.clr := $00008000;
  61929. end;
  61930. procedure TCAN1_C1RXOVF.setRXOVF15(thebits : TBits_1); inline;
  61931. begin
  61932. if thebits = 0 then
  61933. pTDefRegMap(@Self)^.clr := $00008000
  61934. else
  61935. pTDefRegMap(@Self)^.&set := $00008000;
  61936. end;
  61937. function TCAN1_C1RXOVF.getRXOVF15 : TBits_1; inline;
  61938. begin
  61939. getRXOVF15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  61940. end;
  61941. procedure TCAN1_C1RXOVF.setRXOVF16; inline;
  61942. begin
  61943. pTDefRegMap(@Self)^.&set := $00010000;
  61944. end;
  61945. procedure TCAN1_C1RXOVF.clearRXOVF16; inline;
  61946. begin
  61947. pTDefRegMap(@Self)^.clr := $00010000;
  61948. end;
  61949. procedure TCAN1_C1RXOVF.setRXOVF16(thebits : TBits_1); inline;
  61950. begin
  61951. if thebits = 0 then
  61952. pTDefRegMap(@Self)^.clr := $00010000
  61953. else
  61954. pTDefRegMap(@Self)^.&set := $00010000;
  61955. end;
  61956. function TCAN1_C1RXOVF.getRXOVF16 : TBits_1; inline;
  61957. begin
  61958. getRXOVF16 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  61959. end;
  61960. procedure TCAN1_C1RXOVF.setRXOVF17; inline;
  61961. begin
  61962. pTDefRegMap(@Self)^.&set := $00020000;
  61963. end;
  61964. procedure TCAN1_C1RXOVF.clearRXOVF17; inline;
  61965. begin
  61966. pTDefRegMap(@Self)^.clr := $00020000;
  61967. end;
  61968. procedure TCAN1_C1RXOVF.setRXOVF17(thebits : TBits_1); inline;
  61969. begin
  61970. if thebits = 0 then
  61971. pTDefRegMap(@Self)^.clr := $00020000
  61972. else
  61973. pTDefRegMap(@Self)^.&set := $00020000;
  61974. end;
  61975. function TCAN1_C1RXOVF.getRXOVF17 : TBits_1; inline;
  61976. begin
  61977. getRXOVF17 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  61978. end;
  61979. procedure TCAN1_C1RXOVF.setRXOVF18; inline;
  61980. begin
  61981. pTDefRegMap(@Self)^.&set := $00040000;
  61982. end;
  61983. procedure TCAN1_C1RXOVF.clearRXOVF18; inline;
  61984. begin
  61985. pTDefRegMap(@Self)^.clr := $00040000;
  61986. end;
  61987. procedure TCAN1_C1RXOVF.setRXOVF18(thebits : TBits_1); inline;
  61988. begin
  61989. if thebits = 0 then
  61990. pTDefRegMap(@Self)^.clr := $00040000
  61991. else
  61992. pTDefRegMap(@Self)^.&set := $00040000;
  61993. end;
  61994. function TCAN1_C1RXOVF.getRXOVF18 : TBits_1; inline;
  61995. begin
  61996. getRXOVF18 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  61997. end;
  61998. procedure TCAN1_C1RXOVF.setRXOVF19; inline;
  61999. begin
  62000. pTDefRegMap(@Self)^.&set := $00080000;
  62001. end;
  62002. procedure TCAN1_C1RXOVF.clearRXOVF19; inline;
  62003. begin
  62004. pTDefRegMap(@Self)^.clr := $00080000;
  62005. end;
  62006. procedure TCAN1_C1RXOVF.setRXOVF19(thebits : TBits_1); inline;
  62007. begin
  62008. if thebits = 0 then
  62009. pTDefRegMap(@Self)^.clr := $00080000
  62010. else
  62011. pTDefRegMap(@Self)^.&set := $00080000;
  62012. end;
  62013. function TCAN1_C1RXOVF.getRXOVF19 : TBits_1; inline;
  62014. begin
  62015. getRXOVF19 := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  62016. end;
  62017. procedure TCAN1_C1RXOVF.setRXOVF20; inline;
  62018. begin
  62019. pTDefRegMap(@Self)^.&set := $00100000;
  62020. end;
  62021. procedure TCAN1_C1RXOVF.clearRXOVF20; inline;
  62022. begin
  62023. pTDefRegMap(@Self)^.clr := $00100000;
  62024. end;
  62025. procedure TCAN1_C1RXOVF.setRXOVF20(thebits : TBits_1); inline;
  62026. begin
  62027. if thebits = 0 then
  62028. pTDefRegMap(@Self)^.clr := $00100000
  62029. else
  62030. pTDefRegMap(@Self)^.&set := $00100000;
  62031. end;
  62032. function TCAN1_C1RXOVF.getRXOVF20 : TBits_1; inline;
  62033. begin
  62034. getRXOVF20 := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  62035. end;
  62036. procedure TCAN1_C1RXOVF.setRXOVF21; inline;
  62037. begin
  62038. pTDefRegMap(@Self)^.&set := $00200000;
  62039. end;
  62040. procedure TCAN1_C1RXOVF.clearRXOVF21; inline;
  62041. begin
  62042. pTDefRegMap(@Self)^.clr := $00200000;
  62043. end;
  62044. procedure TCAN1_C1RXOVF.setRXOVF21(thebits : TBits_1); inline;
  62045. begin
  62046. if thebits = 0 then
  62047. pTDefRegMap(@Self)^.clr := $00200000
  62048. else
  62049. pTDefRegMap(@Self)^.&set := $00200000;
  62050. end;
  62051. function TCAN1_C1RXOVF.getRXOVF21 : TBits_1; inline;
  62052. begin
  62053. getRXOVF21 := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  62054. end;
  62055. procedure TCAN1_C1RXOVF.setRXOVF22; inline;
  62056. begin
  62057. pTDefRegMap(@Self)^.&set := $00400000;
  62058. end;
  62059. procedure TCAN1_C1RXOVF.clearRXOVF22; inline;
  62060. begin
  62061. pTDefRegMap(@Self)^.clr := $00400000;
  62062. end;
  62063. procedure TCAN1_C1RXOVF.setRXOVF22(thebits : TBits_1); inline;
  62064. begin
  62065. if thebits = 0 then
  62066. pTDefRegMap(@Self)^.clr := $00400000
  62067. else
  62068. pTDefRegMap(@Self)^.&set := $00400000;
  62069. end;
  62070. function TCAN1_C1RXOVF.getRXOVF22 : TBits_1; inline;
  62071. begin
  62072. getRXOVF22 := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  62073. end;
  62074. procedure TCAN1_C1RXOVF.setRXOVF23; inline;
  62075. begin
  62076. pTDefRegMap(@Self)^.&set := $00800000;
  62077. end;
  62078. procedure TCAN1_C1RXOVF.clearRXOVF23; inline;
  62079. begin
  62080. pTDefRegMap(@Self)^.clr := $00800000;
  62081. end;
  62082. procedure TCAN1_C1RXOVF.setRXOVF23(thebits : TBits_1); inline;
  62083. begin
  62084. if thebits = 0 then
  62085. pTDefRegMap(@Self)^.clr := $00800000
  62086. else
  62087. pTDefRegMap(@Self)^.&set := $00800000;
  62088. end;
  62089. function TCAN1_C1RXOVF.getRXOVF23 : TBits_1; inline;
  62090. begin
  62091. getRXOVF23 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  62092. end;
  62093. procedure TCAN1_C1RXOVF.setRXOVF24; inline;
  62094. begin
  62095. pTDefRegMap(@Self)^.&set := $01000000;
  62096. end;
  62097. procedure TCAN1_C1RXOVF.clearRXOVF24; inline;
  62098. begin
  62099. pTDefRegMap(@Self)^.clr := $01000000;
  62100. end;
  62101. procedure TCAN1_C1RXOVF.setRXOVF24(thebits : TBits_1); inline;
  62102. begin
  62103. if thebits = 0 then
  62104. pTDefRegMap(@Self)^.clr := $01000000
  62105. else
  62106. pTDefRegMap(@Self)^.&set := $01000000;
  62107. end;
  62108. function TCAN1_C1RXOVF.getRXOVF24 : TBits_1; inline;
  62109. begin
  62110. getRXOVF24 := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  62111. end;
  62112. procedure TCAN1_C1RXOVF.setRXOVF25; inline;
  62113. begin
  62114. pTDefRegMap(@Self)^.&set := $02000000;
  62115. end;
  62116. procedure TCAN1_C1RXOVF.clearRXOVF25; inline;
  62117. begin
  62118. pTDefRegMap(@Self)^.clr := $02000000;
  62119. end;
  62120. procedure TCAN1_C1RXOVF.setRXOVF25(thebits : TBits_1); inline;
  62121. begin
  62122. if thebits = 0 then
  62123. pTDefRegMap(@Self)^.clr := $02000000
  62124. else
  62125. pTDefRegMap(@Self)^.&set := $02000000;
  62126. end;
  62127. function TCAN1_C1RXOVF.getRXOVF25 : TBits_1; inline;
  62128. begin
  62129. getRXOVF25 := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  62130. end;
  62131. procedure TCAN1_C1RXOVF.setRXOVF26; inline;
  62132. begin
  62133. pTDefRegMap(@Self)^.&set := $04000000;
  62134. end;
  62135. procedure TCAN1_C1RXOVF.clearRXOVF26; inline;
  62136. begin
  62137. pTDefRegMap(@Self)^.clr := $04000000;
  62138. end;
  62139. procedure TCAN1_C1RXOVF.setRXOVF26(thebits : TBits_1); inline;
  62140. begin
  62141. if thebits = 0 then
  62142. pTDefRegMap(@Self)^.clr := $04000000
  62143. else
  62144. pTDefRegMap(@Self)^.&set := $04000000;
  62145. end;
  62146. function TCAN1_C1RXOVF.getRXOVF26 : TBits_1; inline;
  62147. begin
  62148. getRXOVF26 := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  62149. end;
  62150. procedure TCAN1_C1RXOVF.setRXOVF27; inline;
  62151. begin
  62152. pTDefRegMap(@Self)^.&set := $08000000;
  62153. end;
  62154. procedure TCAN1_C1RXOVF.clearRXOVF27; inline;
  62155. begin
  62156. pTDefRegMap(@Self)^.clr := $08000000;
  62157. end;
  62158. procedure TCAN1_C1RXOVF.setRXOVF27(thebits : TBits_1); inline;
  62159. begin
  62160. if thebits = 0 then
  62161. pTDefRegMap(@Self)^.clr := $08000000
  62162. else
  62163. pTDefRegMap(@Self)^.&set := $08000000;
  62164. end;
  62165. function TCAN1_C1RXOVF.getRXOVF27 : TBits_1; inline;
  62166. begin
  62167. getRXOVF27 := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  62168. end;
  62169. procedure TCAN1_C1RXOVF.setRXOVF28; inline;
  62170. begin
  62171. pTDefRegMap(@Self)^.&set := $10000000;
  62172. end;
  62173. procedure TCAN1_C1RXOVF.clearRXOVF28; inline;
  62174. begin
  62175. pTDefRegMap(@Self)^.clr := $10000000;
  62176. end;
  62177. procedure TCAN1_C1RXOVF.setRXOVF28(thebits : TBits_1); inline;
  62178. begin
  62179. if thebits = 0 then
  62180. pTDefRegMap(@Self)^.clr := $10000000
  62181. else
  62182. pTDefRegMap(@Self)^.&set := $10000000;
  62183. end;
  62184. function TCAN1_C1RXOVF.getRXOVF28 : TBits_1; inline;
  62185. begin
  62186. getRXOVF28 := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  62187. end;
  62188. procedure TCAN1_C1RXOVF.setRXOVF29; inline;
  62189. begin
  62190. pTDefRegMap(@Self)^.&set := $20000000;
  62191. end;
  62192. procedure TCAN1_C1RXOVF.clearRXOVF29; inline;
  62193. begin
  62194. pTDefRegMap(@Self)^.clr := $20000000;
  62195. end;
  62196. procedure TCAN1_C1RXOVF.setRXOVF29(thebits : TBits_1); inline;
  62197. begin
  62198. if thebits = 0 then
  62199. pTDefRegMap(@Self)^.clr := $20000000
  62200. else
  62201. pTDefRegMap(@Self)^.&set := $20000000;
  62202. end;
  62203. function TCAN1_C1RXOVF.getRXOVF29 : TBits_1; inline;
  62204. begin
  62205. getRXOVF29 := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  62206. end;
  62207. procedure TCAN1_C1RXOVF.setRXOVF30; inline;
  62208. begin
  62209. pTDefRegMap(@Self)^.&set := $40000000;
  62210. end;
  62211. procedure TCAN1_C1RXOVF.clearRXOVF30; inline;
  62212. begin
  62213. pTDefRegMap(@Self)^.clr := $40000000;
  62214. end;
  62215. procedure TCAN1_C1RXOVF.setRXOVF30(thebits : TBits_1); inline;
  62216. begin
  62217. if thebits = 0 then
  62218. pTDefRegMap(@Self)^.clr := $40000000
  62219. else
  62220. pTDefRegMap(@Self)^.&set := $40000000;
  62221. end;
  62222. function TCAN1_C1RXOVF.getRXOVF30 : TBits_1; inline;
  62223. begin
  62224. getRXOVF30 := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  62225. end;
  62226. procedure TCAN1_C1RXOVF.setRXOVF31; inline;
  62227. begin
  62228. pTDefRegMap(@Self)^.&set := $80000000;
  62229. end;
  62230. procedure TCAN1_C1RXOVF.clearRXOVF31; inline;
  62231. begin
  62232. pTDefRegMap(@Self)^.clr := $80000000;
  62233. end;
  62234. procedure TCAN1_C1RXOVF.setRXOVF31(thebits : TBits_1); inline;
  62235. begin
  62236. if thebits = 0 then
  62237. pTDefRegMap(@Self)^.clr := $80000000
  62238. else
  62239. pTDefRegMap(@Self)^.&set := $80000000;
  62240. end;
  62241. function TCAN1_C1RXOVF.getRXOVF31 : TBits_1; inline;
  62242. begin
  62243. getRXOVF31 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  62244. end;
  62245. procedure TCAN1_C1RXOVF.setw(thebits : TBits_32); inline;
  62246. begin
  62247. pTDefRegMap(@Self)^.val := thebits;
  62248. end;
  62249. function TCAN1_C1RXOVF.getw : TBits_32; inline;
  62250. begin
  62251. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62252. end;
  62253. procedure TCAN1_C1TMR.setCANTSPRE(thebits : TBits_16); inline;
  62254. begin
  62255. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  62256. end;
  62257. function TCAN1_C1TMR.getCANTSPRE : TBits_16; inline;
  62258. begin
  62259. getCANTSPRE := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  62260. end;
  62261. procedure TCAN1_C1TMR.setCANTS(thebits : TBits_16); inline;
  62262. begin
  62263. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $0000FFFF or ( thebits shl 16 );
  62264. end;
  62265. function TCAN1_C1TMR.getCANTS : TBits_16; inline;
  62266. begin
  62267. getCANTS := (pTDefRegMap(@Self)^.val and $FFFF0000) shr 16;
  62268. end;
  62269. procedure TCAN1_C1TMR.setw(thebits : TBits_32); inline;
  62270. begin
  62271. pTDefRegMap(@Self)^.val := thebits;
  62272. end;
  62273. function TCAN1_C1TMR.getw : TBits_32; inline;
  62274. begin
  62275. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62276. end;
  62277. procedure TCAN1_C1RXM0.setEID(thebits : TBits_18); inline;
  62278. begin
  62279. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  62280. end;
  62281. function TCAN1_C1RXM0.getEID : TBits_18; inline;
  62282. begin
  62283. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  62284. end;
  62285. procedure TCAN1_C1RXM0.setMIDE; inline;
  62286. begin
  62287. pTDefRegMap(@Self)^.&set := $00080000;
  62288. end;
  62289. procedure TCAN1_C1RXM0.clearMIDE; inline;
  62290. begin
  62291. pTDefRegMap(@Self)^.clr := $00080000;
  62292. end;
  62293. procedure TCAN1_C1RXM0.setMIDE(thebits : TBits_1); inline;
  62294. begin
  62295. if thebits = 0 then
  62296. pTDefRegMap(@Self)^.clr := $00080000
  62297. else
  62298. pTDefRegMap(@Self)^.&set := $00080000;
  62299. end;
  62300. function TCAN1_C1RXM0.getMIDE : TBits_1; inline;
  62301. begin
  62302. getMIDE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  62303. end;
  62304. procedure TCAN1_C1RXM0.setSID(thebits : TBits_11); inline;
  62305. begin
  62306. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  62307. end;
  62308. function TCAN1_C1RXM0.getSID : TBits_11; inline;
  62309. begin
  62310. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  62311. end;
  62312. procedure TCAN1_C1RXM0.setw(thebits : TBits_32); inline;
  62313. begin
  62314. pTDefRegMap(@Self)^.val := thebits;
  62315. end;
  62316. function TCAN1_C1RXM0.getw : TBits_32; inline;
  62317. begin
  62318. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62319. end;
  62320. procedure TCAN1_C1RXM1.setEID(thebits : TBits_18); inline;
  62321. begin
  62322. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  62323. end;
  62324. function TCAN1_C1RXM1.getEID : TBits_18; inline;
  62325. begin
  62326. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  62327. end;
  62328. procedure TCAN1_C1RXM1.setMIDE; inline;
  62329. begin
  62330. pTDefRegMap(@Self)^.&set := $00080000;
  62331. end;
  62332. procedure TCAN1_C1RXM1.clearMIDE; inline;
  62333. begin
  62334. pTDefRegMap(@Self)^.clr := $00080000;
  62335. end;
  62336. procedure TCAN1_C1RXM1.setMIDE(thebits : TBits_1); inline;
  62337. begin
  62338. if thebits = 0 then
  62339. pTDefRegMap(@Self)^.clr := $00080000
  62340. else
  62341. pTDefRegMap(@Self)^.&set := $00080000;
  62342. end;
  62343. function TCAN1_C1RXM1.getMIDE : TBits_1; inline;
  62344. begin
  62345. getMIDE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  62346. end;
  62347. procedure TCAN1_C1RXM1.setSID(thebits : TBits_11); inline;
  62348. begin
  62349. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  62350. end;
  62351. function TCAN1_C1RXM1.getSID : TBits_11; inline;
  62352. begin
  62353. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  62354. end;
  62355. procedure TCAN1_C1RXM1.setw(thebits : TBits_32); inline;
  62356. begin
  62357. pTDefRegMap(@Self)^.val := thebits;
  62358. end;
  62359. function TCAN1_C1RXM1.getw : TBits_32; inline;
  62360. begin
  62361. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62362. end;
  62363. procedure TCAN1_C1RXM2.setEID(thebits : TBits_18); inline;
  62364. begin
  62365. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  62366. end;
  62367. function TCAN1_C1RXM2.getEID : TBits_18; inline;
  62368. begin
  62369. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  62370. end;
  62371. procedure TCAN1_C1RXM2.setMIDE; inline;
  62372. begin
  62373. pTDefRegMap(@Self)^.&set := $00080000;
  62374. end;
  62375. procedure TCAN1_C1RXM2.clearMIDE; inline;
  62376. begin
  62377. pTDefRegMap(@Self)^.clr := $00080000;
  62378. end;
  62379. procedure TCAN1_C1RXM2.setMIDE(thebits : TBits_1); inline;
  62380. begin
  62381. if thebits = 0 then
  62382. pTDefRegMap(@Self)^.clr := $00080000
  62383. else
  62384. pTDefRegMap(@Self)^.&set := $00080000;
  62385. end;
  62386. function TCAN1_C1RXM2.getMIDE : TBits_1; inline;
  62387. begin
  62388. getMIDE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  62389. end;
  62390. procedure TCAN1_C1RXM2.setSID(thebits : TBits_11); inline;
  62391. begin
  62392. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  62393. end;
  62394. function TCAN1_C1RXM2.getSID : TBits_11; inline;
  62395. begin
  62396. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  62397. end;
  62398. procedure TCAN1_C1RXM2.setw(thebits : TBits_32); inline;
  62399. begin
  62400. pTDefRegMap(@Self)^.val := thebits;
  62401. end;
  62402. function TCAN1_C1RXM2.getw : TBits_32; inline;
  62403. begin
  62404. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62405. end;
  62406. procedure TCAN1_C1RXM3.setEID(thebits : TBits_18); inline;
  62407. begin
  62408. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  62409. end;
  62410. function TCAN1_C1RXM3.getEID : TBits_18; inline;
  62411. begin
  62412. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  62413. end;
  62414. procedure TCAN1_C1RXM3.setMIDE; inline;
  62415. begin
  62416. pTDefRegMap(@Self)^.&set := $00080000;
  62417. end;
  62418. procedure TCAN1_C1RXM3.clearMIDE; inline;
  62419. begin
  62420. pTDefRegMap(@Self)^.clr := $00080000;
  62421. end;
  62422. procedure TCAN1_C1RXM3.setMIDE(thebits : TBits_1); inline;
  62423. begin
  62424. if thebits = 0 then
  62425. pTDefRegMap(@Self)^.clr := $00080000
  62426. else
  62427. pTDefRegMap(@Self)^.&set := $00080000;
  62428. end;
  62429. function TCAN1_C1RXM3.getMIDE : TBits_1; inline;
  62430. begin
  62431. getMIDE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  62432. end;
  62433. procedure TCAN1_C1RXM3.setSID(thebits : TBits_11); inline;
  62434. begin
  62435. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  62436. end;
  62437. function TCAN1_C1RXM3.getSID : TBits_11; inline;
  62438. begin
  62439. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  62440. end;
  62441. procedure TCAN1_C1RXM3.setw(thebits : TBits_32); inline;
  62442. begin
  62443. pTDefRegMap(@Self)^.val := thebits;
  62444. end;
  62445. function TCAN1_C1RXM3.getw : TBits_32; inline;
  62446. begin
  62447. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62448. end;
  62449. procedure TCAN1_C1FLTCON0.setFSEL0(thebits : TBits_5); inline;
  62450. begin
  62451. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  62452. end;
  62453. function TCAN1_C1FLTCON0.getFSEL0 : TBits_5; inline;
  62454. begin
  62455. getFSEL0 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  62456. end;
  62457. procedure TCAN1_C1FLTCON0.setMSEL0(thebits : TBits_2); inline;
  62458. begin
  62459. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  62460. end;
  62461. function TCAN1_C1FLTCON0.getMSEL0 : TBits_2; inline;
  62462. begin
  62463. getMSEL0 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  62464. end;
  62465. procedure TCAN1_C1FLTCON0.setFLTEN0; inline;
  62466. begin
  62467. pTDefRegMap(@Self)^.&set := $00000080;
  62468. end;
  62469. procedure TCAN1_C1FLTCON0.clearFLTEN0; inline;
  62470. begin
  62471. pTDefRegMap(@Self)^.clr := $00000080;
  62472. end;
  62473. procedure TCAN1_C1FLTCON0.setFLTEN0(thebits : TBits_1); inline;
  62474. begin
  62475. if thebits = 0 then
  62476. pTDefRegMap(@Self)^.clr := $00000080
  62477. else
  62478. pTDefRegMap(@Self)^.&set := $00000080;
  62479. end;
  62480. function TCAN1_C1FLTCON0.getFLTEN0 : TBits_1; inline;
  62481. begin
  62482. getFLTEN0 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  62483. end;
  62484. procedure TCAN1_C1FLTCON0.setFSEL1(thebits : TBits_5); inline;
  62485. begin
  62486. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  62487. end;
  62488. function TCAN1_C1FLTCON0.getFSEL1 : TBits_5; inline;
  62489. begin
  62490. getFSEL1 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  62491. end;
  62492. procedure TCAN1_C1FLTCON0.setMSEL1(thebits : TBits_2); inline;
  62493. begin
  62494. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  62495. end;
  62496. function TCAN1_C1FLTCON0.getMSEL1 : TBits_2; inline;
  62497. begin
  62498. getMSEL1 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  62499. end;
  62500. procedure TCAN1_C1FLTCON0.setFLTEN1; inline;
  62501. begin
  62502. pTDefRegMap(@Self)^.&set := $00008000;
  62503. end;
  62504. procedure TCAN1_C1FLTCON0.clearFLTEN1; inline;
  62505. begin
  62506. pTDefRegMap(@Self)^.clr := $00008000;
  62507. end;
  62508. procedure TCAN1_C1FLTCON0.setFLTEN1(thebits : TBits_1); inline;
  62509. begin
  62510. if thebits = 0 then
  62511. pTDefRegMap(@Self)^.clr := $00008000
  62512. else
  62513. pTDefRegMap(@Self)^.&set := $00008000;
  62514. end;
  62515. function TCAN1_C1FLTCON0.getFLTEN1 : TBits_1; inline;
  62516. begin
  62517. getFLTEN1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  62518. end;
  62519. procedure TCAN1_C1FLTCON0.setFSEL2(thebits : TBits_5); inline;
  62520. begin
  62521. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  62522. end;
  62523. function TCAN1_C1FLTCON0.getFSEL2 : TBits_5; inline;
  62524. begin
  62525. getFSEL2 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  62526. end;
  62527. procedure TCAN1_C1FLTCON0.setMSEL2(thebits : TBits_2); inline;
  62528. begin
  62529. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  62530. end;
  62531. function TCAN1_C1FLTCON0.getMSEL2 : TBits_2; inline;
  62532. begin
  62533. getMSEL2 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  62534. end;
  62535. procedure TCAN1_C1FLTCON0.setFLTEN2; inline;
  62536. begin
  62537. pTDefRegMap(@Self)^.&set := $00800000;
  62538. end;
  62539. procedure TCAN1_C1FLTCON0.clearFLTEN2; inline;
  62540. begin
  62541. pTDefRegMap(@Self)^.clr := $00800000;
  62542. end;
  62543. procedure TCAN1_C1FLTCON0.setFLTEN2(thebits : TBits_1); inline;
  62544. begin
  62545. if thebits = 0 then
  62546. pTDefRegMap(@Self)^.clr := $00800000
  62547. else
  62548. pTDefRegMap(@Self)^.&set := $00800000;
  62549. end;
  62550. function TCAN1_C1FLTCON0.getFLTEN2 : TBits_1; inline;
  62551. begin
  62552. getFLTEN2 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  62553. end;
  62554. procedure TCAN1_C1FLTCON0.setFSEL3(thebits : TBits_5); inline;
  62555. begin
  62556. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  62557. end;
  62558. function TCAN1_C1FLTCON0.getFSEL3 : TBits_5; inline;
  62559. begin
  62560. getFSEL3 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  62561. end;
  62562. procedure TCAN1_C1FLTCON0.setMSEL3(thebits : TBits_2); inline;
  62563. begin
  62564. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  62565. end;
  62566. function TCAN1_C1FLTCON0.getMSEL3 : TBits_2; inline;
  62567. begin
  62568. getMSEL3 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  62569. end;
  62570. procedure TCAN1_C1FLTCON0.setFLTEN3; inline;
  62571. begin
  62572. pTDefRegMap(@Self)^.&set := $80000000;
  62573. end;
  62574. procedure TCAN1_C1FLTCON0.clearFLTEN3; inline;
  62575. begin
  62576. pTDefRegMap(@Self)^.clr := $80000000;
  62577. end;
  62578. procedure TCAN1_C1FLTCON0.setFLTEN3(thebits : TBits_1); inline;
  62579. begin
  62580. if thebits = 0 then
  62581. pTDefRegMap(@Self)^.clr := $80000000
  62582. else
  62583. pTDefRegMap(@Self)^.&set := $80000000;
  62584. end;
  62585. function TCAN1_C1FLTCON0.getFLTEN3 : TBits_1; inline;
  62586. begin
  62587. getFLTEN3 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  62588. end;
  62589. procedure TCAN1_C1FLTCON0.setw(thebits : TBits_32); inline;
  62590. begin
  62591. pTDefRegMap(@Self)^.val := thebits;
  62592. end;
  62593. function TCAN1_C1FLTCON0.getw : TBits_32; inline;
  62594. begin
  62595. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62596. end;
  62597. procedure TCAN1_C1FLTCON1.setFSEL4(thebits : TBits_5); inline;
  62598. begin
  62599. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  62600. end;
  62601. function TCAN1_C1FLTCON1.getFSEL4 : TBits_5; inline;
  62602. begin
  62603. getFSEL4 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  62604. end;
  62605. procedure TCAN1_C1FLTCON1.setMSEL4(thebits : TBits_2); inline;
  62606. begin
  62607. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  62608. end;
  62609. function TCAN1_C1FLTCON1.getMSEL4 : TBits_2; inline;
  62610. begin
  62611. getMSEL4 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  62612. end;
  62613. procedure TCAN1_C1FLTCON1.setFLTEN4; inline;
  62614. begin
  62615. pTDefRegMap(@Self)^.&set := $00000080;
  62616. end;
  62617. procedure TCAN1_C1FLTCON1.clearFLTEN4; inline;
  62618. begin
  62619. pTDefRegMap(@Self)^.clr := $00000080;
  62620. end;
  62621. procedure TCAN1_C1FLTCON1.setFLTEN4(thebits : TBits_1); inline;
  62622. begin
  62623. if thebits = 0 then
  62624. pTDefRegMap(@Self)^.clr := $00000080
  62625. else
  62626. pTDefRegMap(@Self)^.&set := $00000080;
  62627. end;
  62628. function TCAN1_C1FLTCON1.getFLTEN4 : TBits_1; inline;
  62629. begin
  62630. getFLTEN4 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  62631. end;
  62632. procedure TCAN1_C1FLTCON1.setFSEL5(thebits : TBits_5); inline;
  62633. begin
  62634. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  62635. end;
  62636. function TCAN1_C1FLTCON1.getFSEL5 : TBits_5; inline;
  62637. begin
  62638. getFSEL5 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  62639. end;
  62640. procedure TCAN1_C1FLTCON1.setMSEL5(thebits : TBits_2); inline;
  62641. begin
  62642. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  62643. end;
  62644. function TCAN1_C1FLTCON1.getMSEL5 : TBits_2; inline;
  62645. begin
  62646. getMSEL5 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  62647. end;
  62648. procedure TCAN1_C1FLTCON1.setFLTEN5; inline;
  62649. begin
  62650. pTDefRegMap(@Self)^.&set := $00008000;
  62651. end;
  62652. procedure TCAN1_C1FLTCON1.clearFLTEN5; inline;
  62653. begin
  62654. pTDefRegMap(@Self)^.clr := $00008000;
  62655. end;
  62656. procedure TCAN1_C1FLTCON1.setFLTEN5(thebits : TBits_1); inline;
  62657. begin
  62658. if thebits = 0 then
  62659. pTDefRegMap(@Self)^.clr := $00008000
  62660. else
  62661. pTDefRegMap(@Self)^.&set := $00008000;
  62662. end;
  62663. function TCAN1_C1FLTCON1.getFLTEN5 : TBits_1; inline;
  62664. begin
  62665. getFLTEN5 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  62666. end;
  62667. procedure TCAN1_C1FLTCON1.setFSEL6(thebits : TBits_5); inline;
  62668. begin
  62669. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  62670. end;
  62671. function TCAN1_C1FLTCON1.getFSEL6 : TBits_5; inline;
  62672. begin
  62673. getFSEL6 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  62674. end;
  62675. procedure TCAN1_C1FLTCON1.setMSEL6(thebits : TBits_2); inline;
  62676. begin
  62677. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  62678. end;
  62679. function TCAN1_C1FLTCON1.getMSEL6 : TBits_2; inline;
  62680. begin
  62681. getMSEL6 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  62682. end;
  62683. procedure TCAN1_C1FLTCON1.setFLTEN6; inline;
  62684. begin
  62685. pTDefRegMap(@Self)^.&set := $00800000;
  62686. end;
  62687. procedure TCAN1_C1FLTCON1.clearFLTEN6; inline;
  62688. begin
  62689. pTDefRegMap(@Self)^.clr := $00800000;
  62690. end;
  62691. procedure TCAN1_C1FLTCON1.setFLTEN6(thebits : TBits_1); inline;
  62692. begin
  62693. if thebits = 0 then
  62694. pTDefRegMap(@Self)^.clr := $00800000
  62695. else
  62696. pTDefRegMap(@Self)^.&set := $00800000;
  62697. end;
  62698. function TCAN1_C1FLTCON1.getFLTEN6 : TBits_1; inline;
  62699. begin
  62700. getFLTEN6 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  62701. end;
  62702. procedure TCAN1_C1FLTCON1.setFSEL7(thebits : TBits_5); inline;
  62703. begin
  62704. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  62705. end;
  62706. function TCAN1_C1FLTCON1.getFSEL7 : TBits_5; inline;
  62707. begin
  62708. getFSEL7 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  62709. end;
  62710. procedure TCAN1_C1FLTCON1.setMSEL7(thebits : TBits_2); inline;
  62711. begin
  62712. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  62713. end;
  62714. function TCAN1_C1FLTCON1.getMSEL7 : TBits_2; inline;
  62715. begin
  62716. getMSEL7 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  62717. end;
  62718. procedure TCAN1_C1FLTCON1.setFLTEN7; inline;
  62719. begin
  62720. pTDefRegMap(@Self)^.&set := $80000000;
  62721. end;
  62722. procedure TCAN1_C1FLTCON1.clearFLTEN7; inline;
  62723. begin
  62724. pTDefRegMap(@Self)^.clr := $80000000;
  62725. end;
  62726. procedure TCAN1_C1FLTCON1.setFLTEN7(thebits : TBits_1); inline;
  62727. begin
  62728. if thebits = 0 then
  62729. pTDefRegMap(@Self)^.clr := $80000000
  62730. else
  62731. pTDefRegMap(@Self)^.&set := $80000000;
  62732. end;
  62733. function TCAN1_C1FLTCON1.getFLTEN7 : TBits_1; inline;
  62734. begin
  62735. getFLTEN7 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  62736. end;
  62737. procedure TCAN1_C1FLTCON1.setw(thebits : TBits_32); inline;
  62738. begin
  62739. pTDefRegMap(@Self)^.val := thebits;
  62740. end;
  62741. function TCAN1_C1FLTCON1.getw : TBits_32; inline;
  62742. begin
  62743. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62744. end;
  62745. procedure TCAN1_C1FLTCON2.setFSEL8(thebits : TBits_5); inline;
  62746. begin
  62747. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  62748. end;
  62749. function TCAN1_C1FLTCON2.getFSEL8 : TBits_5; inline;
  62750. begin
  62751. getFSEL8 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  62752. end;
  62753. procedure TCAN1_C1FLTCON2.setMSEL8(thebits : TBits_2); inline;
  62754. begin
  62755. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  62756. end;
  62757. function TCAN1_C1FLTCON2.getMSEL8 : TBits_2; inline;
  62758. begin
  62759. getMSEL8 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  62760. end;
  62761. procedure TCAN1_C1FLTCON2.setFLTEN8; inline;
  62762. begin
  62763. pTDefRegMap(@Self)^.&set := $00000080;
  62764. end;
  62765. procedure TCAN1_C1FLTCON2.clearFLTEN8; inline;
  62766. begin
  62767. pTDefRegMap(@Self)^.clr := $00000080;
  62768. end;
  62769. procedure TCAN1_C1FLTCON2.setFLTEN8(thebits : TBits_1); inline;
  62770. begin
  62771. if thebits = 0 then
  62772. pTDefRegMap(@Self)^.clr := $00000080
  62773. else
  62774. pTDefRegMap(@Self)^.&set := $00000080;
  62775. end;
  62776. function TCAN1_C1FLTCON2.getFLTEN8 : TBits_1; inline;
  62777. begin
  62778. getFLTEN8 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  62779. end;
  62780. procedure TCAN1_C1FLTCON2.setFSEL9(thebits : TBits_5); inline;
  62781. begin
  62782. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  62783. end;
  62784. function TCAN1_C1FLTCON2.getFSEL9 : TBits_5; inline;
  62785. begin
  62786. getFSEL9 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  62787. end;
  62788. procedure TCAN1_C1FLTCON2.setMSEL9(thebits : TBits_2); inline;
  62789. begin
  62790. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  62791. end;
  62792. function TCAN1_C1FLTCON2.getMSEL9 : TBits_2; inline;
  62793. begin
  62794. getMSEL9 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  62795. end;
  62796. procedure TCAN1_C1FLTCON2.setFLTEN9; inline;
  62797. begin
  62798. pTDefRegMap(@Self)^.&set := $00008000;
  62799. end;
  62800. procedure TCAN1_C1FLTCON2.clearFLTEN9; inline;
  62801. begin
  62802. pTDefRegMap(@Self)^.clr := $00008000;
  62803. end;
  62804. procedure TCAN1_C1FLTCON2.setFLTEN9(thebits : TBits_1); inline;
  62805. begin
  62806. if thebits = 0 then
  62807. pTDefRegMap(@Self)^.clr := $00008000
  62808. else
  62809. pTDefRegMap(@Self)^.&set := $00008000;
  62810. end;
  62811. function TCAN1_C1FLTCON2.getFLTEN9 : TBits_1; inline;
  62812. begin
  62813. getFLTEN9 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  62814. end;
  62815. procedure TCAN1_C1FLTCON2.setFSEL10(thebits : TBits_5); inline;
  62816. begin
  62817. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  62818. end;
  62819. function TCAN1_C1FLTCON2.getFSEL10 : TBits_5; inline;
  62820. begin
  62821. getFSEL10 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  62822. end;
  62823. procedure TCAN1_C1FLTCON2.setMSEL10(thebits : TBits_2); inline;
  62824. begin
  62825. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  62826. end;
  62827. function TCAN1_C1FLTCON2.getMSEL10 : TBits_2; inline;
  62828. begin
  62829. getMSEL10 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  62830. end;
  62831. procedure TCAN1_C1FLTCON2.setFLTEN10; inline;
  62832. begin
  62833. pTDefRegMap(@Self)^.&set := $00800000;
  62834. end;
  62835. procedure TCAN1_C1FLTCON2.clearFLTEN10; inline;
  62836. begin
  62837. pTDefRegMap(@Self)^.clr := $00800000;
  62838. end;
  62839. procedure TCAN1_C1FLTCON2.setFLTEN10(thebits : TBits_1); inline;
  62840. begin
  62841. if thebits = 0 then
  62842. pTDefRegMap(@Self)^.clr := $00800000
  62843. else
  62844. pTDefRegMap(@Self)^.&set := $00800000;
  62845. end;
  62846. function TCAN1_C1FLTCON2.getFLTEN10 : TBits_1; inline;
  62847. begin
  62848. getFLTEN10 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  62849. end;
  62850. procedure TCAN1_C1FLTCON2.setFSEL11(thebits : TBits_5); inline;
  62851. begin
  62852. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  62853. end;
  62854. function TCAN1_C1FLTCON2.getFSEL11 : TBits_5; inline;
  62855. begin
  62856. getFSEL11 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  62857. end;
  62858. procedure TCAN1_C1FLTCON2.setMSEL11(thebits : TBits_2); inline;
  62859. begin
  62860. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  62861. end;
  62862. function TCAN1_C1FLTCON2.getMSEL11 : TBits_2; inline;
  62863. begin
  62864. getMSEL11 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  62865. end;
  62866. procedure TCAN1_C1FLTCON2.setFLTEN11; inline;
  62867. begin
  62868. pTDefRegMap(@Self)^.&set := $80000000;
  62869. end;
  62870. procedure TCAN1_C1FLTCON2.clearFLTEN11; inline;
  62871. begin
  62872. pTDefRegMap(@Self)^.clr := $80000000;
  62873. end;
  62874. procedure TCAN1_C1FLTCON2.setFLTEN11(thebits : TBits_1); inline;
  62875. begin
  62876. if thebits = 0 then
  62877. pTDefRegMap(@Self)^.clr := $80000000
  62878. else
  62879. pTDefRegMap(@Self)^.&set := $80000000;
  62880. end;
  62881. function TCAN1_C1FLTCON2.getFLTEN11 : TBits_1; inline;
  62882. begin
  62883. getFLTEN11 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  62884. end;
  62885. procedure TCAN1_C1FLTCON2.setw(thebits : TBits_32); inline;
  62886. begin
  62887. pTDefRegMap(@Self)^.val := thebits;
  62888. end;
  62889. function TCAN1_C1FLTCON2.getw : TBits_32; inline;
  62890. begin
  62891. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62892. end;
  62893. procedure TCAN1_C1FLTCON3.setFSEL12(thebits : TBits_5); inline;
  62894. begin
  62895. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  62896. end;
  62897. function TCAN1_C1FLTCON3.getFSEL12 : TBits_5; inline;
  62898. begin
  62899. getFSEL12 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  62900. end;
  62901. procedure TCAN1_C1FLTCON3.setMSEL12(thebits : TBits_2); inline;
  62902. begin
  62903. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  62904. end;
  62905. function TCAN1_C1FLTCON3.getMSEL12 : TBits_2; inline;
  62906. begin
  62907. getMSEL12 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  62908. end;
  62909. procedure TCAN1_C1FLTCON3.setFLTEN12; inline;
  62910. begin
  62911. pTDefRegMap(@Self)^.&set := $00000080;
  62912. end;
  62913. procedure TCAN1_C1FLTCON3.clearFLTEN12; inline;
  62914. begin
  62915. pTDefRegMap(@Self)^.clr := $00000080;
  62916. end;
  62917. procedure TCAN1_C1FLTCON3.setFLTEN12(thebits : TBits_1); inline;
  62918. begin
  62919. if thebits = 0 then
  62920. pTDefRegMap(@Self)^.clr := $00000080
  62921. else
  62922. pTDefRegMap(@Self)^.&set := $00000080;
  62923. end;
  62924. function TCAN1_C1FLTCON3.getFLTEN12 : TBits_1; inline;
  62925. begin
  62926. getFLTEN12 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  62927. end;
  62928. procedure TCAN1_C1FLTCON3.setFSEL13(thebits : TBits_5); inline;
  62929. begin
  62930. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  62931. end;
  62932. function TCAN1_C1FLTCON3.getFSEL13 : TBits_5; inline;
  62933. begin
  62934. getFSEL13 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  62935. end;
  62936. procedure TCAN1_C1FLTCON3.setMSEL13(thebits : TBits_2); inline;
  62937. begin
  62938. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  62939. end;
  62940. function TCAN1_C1FLTCON3.getMSEL13 : TBits_2; inline;
  62941. begin
  62942. getMSEL13 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  62943. end;
  62944. procedure TCAN1_C1FLTCON3.setFLTEN13; inline;
  62945. begin
  62946. pTDefRegMap(@Self)^.&set := $00008000;
  62947. end;
  62948. procedure TCAN1_C1FLTCON3.clearFLTEN13; inline;
  62949. begin
  62950. pTDefRegMap(@Self)^.clr := $00008000;
  62951. end;
  62952. procedure TCAN1_C1FLTCON3.setFLTEN13(thebits : TBits_1); inline;
  62953. begin
  62954. if thebits = 0 then
  62955. pTDefRegMap(@Self)^.clr := $00008000
  62956. else
  62957. pTDefRegMap(@Self)^.&set := $00008000;
  62958. end;
  62959. function TCAN1_C1FLTCON3.getFLTEN13 : TBits_1; inline;
  62960. begin
  62961. getFLTEN13 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  62962. end;
  62963. procedure TCAN1_C1FLTCON3.setFSEL14(thebits : TBits_5); inline;
  62964. begin
  62965. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  62966. end;
  62967. function TCAN1_C1FLTCON3.getFSEL14 : TBits_5; inline;
  62968. begin
  62969. getFSEL14 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  62970. end;
  62971. procedure TCAN1_C1FLTCON3.setMSEL14(thebits : TBits_2); inline;
  62972. begin
  62973. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  62974. end;
  62975. function TCAN1_C1FLTCON3.getMSEL14 : TBits_2; inline;
  62976. begin
  62977. getMSEL14 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  62978. end;
  62979. procedure TCAN1_C1FLTCON3.setFLTEN14; inline;
  62980. begin
  62981. pTDefRegMap(@Self)^.&set := $00800000;
  62982. end;
  62983. procedure TCAN1_C1FLTCON3.clearFLTEN14; inline;
  62984. begin
  62985. pTDefRegMap(@Self)^.clr := $00800000;
  62986. end;
  62987. procedure TCAN1_C1FLTCON3.setFLTEN14(thebits : TBits_1); inline;
  62988. begin
  62989. if thebits = 0 then
  62990. pTDefRegMap(@Self)^.clr := $00800000
  62991. else
  62992. pTDefRegMap(@Self)^.&set := $00800000;
  62993. end;
  62994. function TCAN1_C1FLTCON3.getFLTEN14 : TBits_1; inline;
  62995. begin
  62996. getFLTEN14 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  62997. end;
  62998. procedure TCAN1_C1FLTCON3.setFSEL15(thebits : TBits_5); inline;
  62999. begin
  63000. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  63001. end;
  63002. function TCAN1_C1FLTCON3.getFSEL15 : TBits_5; inline;
  63003. begin
  63004. getFSEL15 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  63005. end;
  63006. procedure TCAN1_C1FLTCON3.setMSEL15(thebits : TBits_2); inline;
  63007. begin
  63008. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  63009. end;
  63010. function TCAN1_C1FLTCON3.getMSEL15 : TBits_2; inline;
  63011. begin
  63012. getMSEL15 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  63013. end;
  63014. procedure TCAN1_C1FLTCON3.setFLTEN15; inline;
  63015. begin
  63016. pTDefRegMap(@Self)^.&set := $80000000;
  63017. end;
  63018. procedure TCAN1_C1FLTCON3.clearFLTEN15; inline;
  63019. begin
  63020. pTDefRegMap(@Self)^.clr := $80000000;
  63021. end;
  63022. procedure TCAN1_C1FLTCON3.setFLTEN15(thebits : TBits_1); inline;
  63023. begin
  63024. if thebits = 0 then
  63025. pTDefRegMap(@Self)^.clr := $80000000
  63026. else
  63027. pTDefRegMap(@Self)^.&set := $80000000;
  63028. end;
  63029. function TCAN1_C1FLTCON3.getFLTEN15 : TBits_1; inline;
  63030. begin
  63031. getFLTEN15 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  63032. end;
  63033. procedure TCAN1_C1FLTCON3.setw(thebits : TBits_32); inline;
  63034. begin
  63035. pTDefRegMap(@Self)^.val := thebits;
  63036. end;
  63037. function TCAN1_C1FLTCON3.getw : TBits_32; inline;
  63038. begin
  63039. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63040. end;
  63041. procedure TCAN1_C1FLTCON4.setFSEL16(thebits : TBits_5); inline;
  63042. begin
  63043. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  63044. end;
  63045. function TCAN1_C1FLTCON4.getFSEL16 : TBits_5; inline;
  63046. begin
  63047. getFSEL16 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  63048. end;
  63049. procedure TCAN1_C1FLTCON4.setMSEL16(thebits : TBits_2); inline;
  63050. begin
  63051. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  63052. end;
  63053. function TCAN1_C1FLTCON4.getMSEL16 : TBits_2; inline;
  63054. begin
  63055. getMSEL16 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  63056. end;
  63057. procedure TCAN1_C1FLTCON4.setFLTEN16; inline;
  63058. begin
  63059. pTDefRegMap(@Self)^.&set := $00000080;
  63060. end;
  63061. procedure TCAN1_C1FLTCON4.clearFLTEN16; inline;
  63062. begin
  63063. pTDefRegMap(@Self)^.clr := $00000080;
  63064. end;
  63065. procedure TCAN1_C1FLTCON4.setFLTEN16(thebits : TBits_1); inline;
  63066. begin
  63067. if thebits = 0 then
  63068. pTDefRegMap(@Self)^.clr := $00000080
  63069. else
  63070. pTDefRegMap(@Self)^.&set := $00000080;
  63071. end;
  63072. function TCAN1_C1FLTCON4.getFLTEN16 : TBits_1; inline;
  63073. begin
  63074. getFLTEN16 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  63075. end;
  63076. procedure TCAN1_C1FLTCON4.setFSEL17(thebits : TBits_5); inline;
  63077. begin
  63078. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  63079. end;
  63080. function TCAN1_C1FLTCON4.getFSEL17 : TBits_5; inline;
  63081. begin
  63082. getFSEL17 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  63083. end;
  63084. procedure TCAN1_C1FLTCON4.setMSEL17(thebits : TBits_2); inline;
  63085. begin
  63086. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  63087. end;
  63088. function TCAN1_C1FLTCON4.getMSEL17 : TBits_2; inline;
  63089. begin
  63090. getMSEL17 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  63091. end;
  63092. procedure TCAN1_C1FLTCON4.setFLTEN17; inline;
  63093. begin
  63094. pTDefRegMap(@Self)^.&set := $00008000;
  63095. end;
  63096. procedure TCAN1_C1FLTCON4.clearFLTEN17; inline;
  63097. begin
  63098. pTDefRegMap(@Self)^.clr := $00008000;
  63099. end;
  63100. procedure TCAN1_C1FLTCON4.setFLTEN17(thebits : TBits_1); inline;
  63101. begin
  63102. if thebits = 0 then
  63103. pTDefRegMap(@Self)^.clr := $00008000
  63104. else
  63105. pTDefRegMap(@Self)^.&set := $00008000;
  63106. end;
  63107. function TCAN1_C1FLTCON4.getFLTEN17 : TBits_1; inline;
  63108. begin
  63109. getFLTEN17 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  63110. end;
  63111. procedure TCAN1_C1FLTCON4.setFSEL18(thebits : TBits_5); inline;
  63112. begin
  63113. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  63114. end;
  63115. function TCAN1_C1FLTCON4.getFSEL18 : TBits_5; inline;
  63116. begin
  63117. getFSEL18 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  63118. end;
  63119. procedure TCAN1_C1FLTCON4.setMSEL18(thebits : TBits_2); inline;
  63120. begin
  63121. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  63122. end;
  63123. function TCAN1_C1FLTCON4.getMSEL18 : TBits_2; inline;
  63124. begin
  63125. getMSEL18 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  63126. end;
  63127. procedure TCAN1_C1FLTCON4.setFLTEN18; inline;
  63128. begin
  63129. pTDefRegMap(@Self)^.&set := $00800000;
  63130. end;
  63131. procedure TCAN1_C1FLTCON4.clearFLTEN18; inline;
  63132. begin
  63133. pTDefRegMap(@Self)^.clr := $00800000;
  63134. end;
  63135. procedure TCAN1_C1FLTCON4.setFLTEN18(thebits : TBits_1); inline;
  63136. begin
  63137. if thebits = 0 then
  63138. pTDefRegMap(@Self)^.clr := $00800000
  63139. else
  63140. pTDefRegMap(@Self)^.&set := $00800000;
  63141. end;
  63142. function TCAN1_C1FLTCON4.getFLTEN18 : TBits_1; inline;
  63143. begin
  63144. getFLTEN18 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  63145. end;
  63146. procedure TCAN1_C1FLTCON4.setFSEL19(thebits : TBits_5); inline;
  63147. begin
  63148. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  63149. end;
  63150. function TCAN1_C1FLTCON4.getFSEL19 : TBits_5; inline;
  63151. begin
  63152. getFSEL19 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  63153. end;
  63154. procedure TCAN1_C1FLTCON4.setMSEL19(thebits : TBits_2); inline;
  63155. begin
  63156. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  63157. end;
  63158. function TCAN1_C1FLTCON4.getMSEL19 : TBits_2; inline;
  63159. begin
  63160. getMSEL19 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  63161. end;
  63162. procedure TCAN1_C1FLTCON4.setFLTEN19; inline;
  63163. begin
  63164. pTDefRegMap(@Self)^.&set := $80000000;
  63165. end;
  63166. procedure TCAN1_C1FLTCON4.clearFLTEN19; inline;
  63167. begin
  63168. pTDefRegMap(@Self)^.clr := $80000000;
  63169. end;
  63170. procedure TCAN1_C1FLTCON4.setFLTEN19(thebits : TBits_1); inline;
  63171. begin
  63172. if thebits = 0 then
  63173. pTDefRegMap(@Self)^.clr := $80000000
  63174. else
  63175. pTDefRegMap(@Self)^.&set := $80000000;
  63176. end;
  63177. function TCAN1_C1FLTCON4.getFLTEN19 : TBits_1; inline;
  63178. begin
  63179. getFLTEN19 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  63180. end;
  63181. procedure TCAN1_C1FLTCON4.setw(thebits : TBits_32); inline;
  63182. begin
  63183. pTDefRegMap(@Self)^.val := thebits;
  63184. end;
  63185. function TCAN1_C1FLTCON4.getw : TBits_32; inline;
  63186. begin
  63187. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63188. end;
  63189. procedure TCAN1_C1FLTCON5.setFSEL20(thebits : TBits_5); inline;
  63190. begin
  63191. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  63192. end;
  63193. function TCAN1_C1FLTCON5.getFSEL20 : TBits_5; inline;
  63194. begin
  63195. getFSEL20 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  63196. end;
  63197. procedure TCAN1_C1FLTCON5.setMSEL20(thebits : TBits_2); inline;
  63198. begin
  63199. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  63200. end;
  63201. function TCAN1_C1FLTCON5.getMSEL20 : TBits_2; inline;
  63202. begin
  63203. getMSEL20 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  63204. end;
  63205. procedure TCAN1_C1FLTCON5.setFLTEN20; inline;
  63206. begin
  63207. pTDefRegMap(@Self)^.&set := $00000080;
  63208. end;
  63209. procedure TCAN1_C1FLTCON5.clearFLTEN20; inline;
  63210. begin
  63211. pTDefRegMap(@Self)^.clr := $00000080;
  63212. end;
  63213. procedure TCAN1_C1FLTCON5.setFLTEN20(thebits : TBits_1); inline;
  63214. begin
  63215. if thebits = 0 then
  63216. pTDefRegMap(@Self)^.clr := $00000080
  63217. else
  63218. pTDefRegMap(@Self)^.&set := $00000080;
  63219. end;
  63220. function TCAN1_C1FLTCON5.getFLTEN20 : TBits_1; inline;
  63221. begin
  63222. getFLTEN20 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  63223. end;
  63224. procedure TCAN1_C1FLTCON5.setFSEL21(thebits : TBits_5); inline;
  63225. begin
  63226. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  63227. end;
  63228. function TCAN1_C1FLTCON5.getFSEL21 : TBits_5; inline;
  63229. begin
  63230. getFSEL21 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  63231. end;
  63232. procedure TCAN1_C1FLTCON5.setMSEL21(thebits : TBits_2); inline;
  63233. begin
  63234. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  63235. end;
  63236. function TCAN1_C1FLTCON5.getMSEL21 : TBits_2; inline;
  63237. begin
  63238. getMSEL21 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  63239. end;
  63240. procedure TCAN1_C1FLTCON5.setFLTEN21; inline;
  63241. begin
  63242. pTDefRegMap(@Self)^.&set := $00008000;
  63243. end;
  63244. procedure TCAN1_C1FLTCON5.clearFLTEN21; inline;
  63245. begin
  63246. pTDefRegMap(@Self)^.clr := $00008000;
  63247. end;
  63248. procedure TCAN1_C1FLTCON5.setFLTEN21(thebits : TBits_1); inline;
  63249. begin
  63250. if thebits = 0 then
  63251. pTDefRegMap(@Self)^.clr := $00008000
  63252. else
  63253. pTDefRegMap(@Self)^.&set := $00008000;
  63254. end;
  63255. function TCAN1_C1FLTCON5.getFLTEN21 : TBits_1; inline;
  63256. begin
  63257. getFLTEN21 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  63258. end;
  63259. procedure TCAN1_C1FLTCON5.setFSEL22(thebits : TBits_5); inline;
  63260. begin
  63261. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  63262. end;
  63263. function TCAN1_C1FLTCON5.getFSEL22 : TBits_5; inline;
  63264. begin
  63265. getFSEL22 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  63266. end;
  63267. procedure TCAN1_C1FLTCON5.setMSEL22(thebits : TBits_2); inline;
  63268. begin
  63269. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  63270. end;
  63271. function TCAN1_C1FLTCON5.getMSEL22 : TBits_2; inline;
  63272. begin
  63273. getMSEL22 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  63274. end;
  63275. procedure TCAN1_C1FLTCON5.setFLTEN22; inline;
  63276. begin
  63277. pTDefRegMap(@Self)^.&set := $00800000;
  63278. end;
  63279. procedure TCAN1_C1FLTCON5.clearFLTEN22; inline;
  63280. begin
  63281. pTDefRegMap(@Self)^.clr := $00800000;
  63282. end;
  63283. procedure TCAN1_C1FLTCON5.setFLTEN22(thebits : TBits_1); inline;
  63284. begin
  63285. if thebits = 0 then
  63286. pTDefRegMap(@Self)^.clr := $00800000
  63287. else
  63288. pTDefRegMap(@Self)^.&set := $00800000;
  63289. end;
  63290. function TCAN1_C1FLTCON5.getFLTEN22 : TBits_1; inline;
  63291. begin
  63292. getFLTEN22 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  63293. end;
  63294. procedure TCAN1_C1FLTCON5.setFSEL23(thebits : TBits_5); inline;
  63295. begin
  63296. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  63297. end;
  63298. function TCAN1_C1FLTCON5.getFSEL23 : TBits_5; inline;
  63299. begin
  63300. getFSEL23 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  63301. end;
  63302. procedure TCAN1_C1FLTCON5.setMSEL23(thebits : TBits_2); inline;
  63303. begin
  63304. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  63305. end;
  63306. function TCAN1_C1FLTCON5.getMSEL23 : TBits_2; inline;
  63307. begin
  63308. getMSEL23 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  63309. end;
  63310. procedure TCAN1_C1FLTCON5.setFLTEN23; inline;
  63311. begin
  63312. pTDefRegMap(@Self)^.&set := $80000000;
  63313. end;
  63314. procedure TCAN1_C1FLTCON5.clearFLTEN23; inline;
  63315. begin
  63316. pTDefRegMap(@Self)^.clr := $80000000;
  63317. end;
  63318. procedure TCAN1_C1FLTCON5.setFLTEN23(thebits : TBits_1); inline;
  63319. begin
  63320. if thebits = 0 then
  63321. pTDefRegMap(@Self)^.clr := $80000000
  63322. else
  63323. pTDefRegMap(@Self)^.&set := $80000000;
  63324. end;
  63325. function TCAN1_C1FLTCON5.getFLTEN23 : TBits_1; inline;
  63326. begin
  63327. getFLTEN23 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  63328. end;
  63329. procedure TCAN1_C1FLTCON5.setw(thebits : TBits_32); inline;
  63330. begin
  63331. pTDefRegMap(@Self)^.val := thebits;
  63332. end;
  63333. function TCAN1_C1FLTCON5.getw : TBits_32; inline;
  63334. begin
  63335. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63336. end;
  63337. procedure TCAN1_C1FLTCON6.setFSEL24(thebits : TBits_5); inline;
  63338. begin
  63339. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  63340. end;
  63341. function TCAN1_C1FLTCON6.getFSEL24 : TBits_5; inline;
  63342. begin
  63343. getFSEL24 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  63344. end;
  63345. procedure TCAN1_C1FLTCON6.setMSEL24(thebits : TBits_2); inline;
  63346. begin
  63347. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  63348. end;
  63349. function TCAN1_C1FLTCON6.getMSEL24 : TBits_2; inline;
  63350. begin
  63351. getMSEL24 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  63352. end;
  63353. procedure TCAN1_C1FLTCON6.setFLTEN24; inline;
  63354. begin
  63355. pTDefRegMap(@Self)^.&set := $00000080;
  63356. end;
  63357. procedure TCAN1_C1FLTCON6.clearFLTEN24; inline;
  63358. begin
  63359. pTDefRegMap(@Self)^.clr := $00000080;
  63360. end;
  63361. procedure TCAN1_C1FLTCON6.setFLTEN24(thebits : TBits_1); inline;
  63362. begin
  63363. if thebits = 0 then
  63364. pTDefRegMap(@Self)^.clr := $00000080
  63365. else
  63366. pTDefRegMap(@Self)^.&set := $00000080;
  63367. end;
  63368. function TCAN1_C1FLTCON6.getFLTEN24 : TBits_1; inline;
  63369. begin
  63370. getFLTEN24 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  63371. end;
  63372. procedure TCAN1_C1FLTCON6.setFSEL25(thebits : TBits_5); inline;
  63373. begin
  63374. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  63375. end;
  63376. function TCAN1_C1FLTCON6.getFSEL25 : TBits_5; inline;
  63377. begin
  63378. getFSEL25 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  63379. end;
  63380. procedure TCAN1_C1FLTCON6.setMSEL25(thebits : TBits_2); inline;
  63381. begin
  63382. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  63383. end;
  63384. function TCAN1_C1FLTCON6.getMSEL25 : TBits_2; inline;
  63385. begin
  63386. getMSEL25 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  63387. end;
  63388. procedure TCAN1_C1FLTCON6.setFLTEN25; inline;
  63389. begin
  63390. pTDefRegMap(@Self)^.&set := $00008000;
  63391. end;
  63392. procedure TCAN1_C1FLTCON6.clearFLTEN25; inline;
  63393. begin
  63394. pTDefRegMap(@Self)^.clr := $00008000;
  63395. end;
  63396. procedure TCAN1_C1FLTCON6.setFLTEN25(thebits : TBits_1); inline;
  63397. begin
  63398. if thebits = 0 then
  63399. pTDefRegMap(@Self)^.clr := $00008000
  63400. else
  63401. pTDefRegMap(@Self)^.&set := $00008000;
  63402. end;
  63403. function TCAN1_C1FLTCON6.getFLTEN25 : TBits_1; inline;
  63404. begin
  63405. getFLTEN25 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  63406. end;
  63407. procedure TCAN1_C1FLTCON6.setFSEL26(thebits : TBits_5); inline;
  63408. begin
  63409. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  63410. end;
  63411. function TCAN1_C1FLTCON6.getFSEL26 : TBits_5; inline;
  63412. begin
  63413. getFSEL26 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  63414. end;
  63415. procedure TCAN1_C1FLTCON6.setMSEL26(thebits : TBits_2); inline;
  63416. begin
  63417. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  63418. end;
  63419. function TCAN1_C1FLTCON6.getMSEL26 : TBits_2; inline;
  63420. begin
  63421. getMSEL26 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  63422. end;
  63423. procedure TCAN1_C1FLTCON6.setFLTEN26; inline;
  63424. begin
  63425. pTDefRegMap(@Self)^.&set := $00800000;
  63426. end;
  63427. procedure TCAN1_C1FLTCON6.clearFLTEN26; inline;
  63428. begin
  63429. pTDefRegMap(@Self)^.clr := $00800000;
  63430. end;
  63431. procedure TCAN1_C1FLTCON6.setFLTEN26(thebits : TBits_1); inline;
  63432. begin
  63433. if thebits = 0 then
  63434. pTDefRegMap(@Self)^.clr := $00800000
  63435. else
  63436. pTDefRegMap(@Self)^.&set := $00800000;
  63437. end;
  63438. function TCAN1_C1FLTCON6.getFLTEN26 : TBits_1; inline;
  63439. begin
  63440. getFLTEN26 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  63441. end;
  63442. procedure TCAN1_C1FLTCON6.setFSEL27(thebits : TBits_5); inline;
  63443. begin
  63444. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  63445. end;
  63446. function TCAN1_C1FLTCON6.getFSEL27 : TBits_5; inline;
  63447. begin
  63448. getFSEL27 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  63449. end;
  63450. procedure TCAN1_C1FLTCON6.setMSEL27(thebits : TBits_2); inline;
  63451. begin
  63452. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  63453. end;
  63454. function TCAN1_C1FLTCON6.getMSEL27 : TBits_2; inline;
  63455. begin
  63456. getMSEL27 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  63457. end;
  63458. procedure TCAN1_C1FLTCON6.setFLTEN27; inline;
  63459. begin
  63460. pTDefRegMap(@Self)^.&set := $80000000;
  63461. end;
  63462. procedure TCAN1_C1FLTCON6.clearFLTEN27; inline;
  63463. begin
  63464. pTDefRegMap(@Self)^.clr := $80000000;
  63465. end;
  63466. procedure TCAN1_C1FLTCON6.setFLTEN27(thebits : TBits_1); inline;
  63467. begin
  63468. if thebits = 0 then
  63469. pTDefRegMap(@Self)^.clr := $80000000
  63470. else
  63471. pTDefRegMap(@Self)^.&set := $80000000;
  63472. end;
  63473. function TCAN1_C1FLTCON6.getFLTEN27 : TBits_1; inline;
  63474. begin
  63475. getFLTEN27 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  63476. end;
  63477. procedure TCAN1_C1FLTCON6.setw(thebits : TBits_32); inline;
  63478. begin
  63479. pTDefRegMap(@Self)^.val := thebits;
  63480. end;
  63481. function TCAN1_C1FLTCON6.getw : TBits_32; inline;
  63482. begin
  63483. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63484. end;
  63485. procedure TCAN1_C1FLTCON7.setFSEL28(thebits : TBits_5); inline;
  63486. begin
  63487. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  63488. end;
  63489. function TCAN1_C1FLTCON7.getFSEL28 : TBits_5; inline;
  63490. begin
  63491. getFSEL28 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  63492. end;
  63493. procedure TCAN1_C1FLTCON7.setMSEL28(thebits : TBits_2); inline;
  63494. begin
  63495. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  63496. end;
  63497. function TCAN1_C1FLTCON7.getMSEL28 : TBits_2; inline;
  63498. begin
  63499. getMSEL28 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  63500. end;
  63501. procedure TCAN1_C1FLTCON7.setFLTEN28; inline;
  63502. begin
  63503. pTDefRegMap(@Self)^.&set := $00000080;
  63504. end;
  63505. procedure TCAN1_C1FLTCON7.clearFLTEN28; inline;
  63506. begin
  63507. pTDefRegMap(@Self)^.clr := $00000080;
  63508. end;
  63509. procedure TCAN1_C1FLTCON7.setFLTEN28(thebits : TBits_1); inline;
  63510. begin
  63511. if thebits = 0 then
  63512. pTDefRegMap(@Self)^.clr := $00000080
  63513. else
  63514. pTDefRegMap(@Self)^.&set := $00000080;
  63515. end;
  63516. function TCAN1_C1FLTCON7.getFLTEN28 : TBits_1; inline;
  63517. begin
  63518. getFLTEN28 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  63519. end;
  63520. procedure TCAN1_C1FLTCON7.setFSEL29(thebits : TBits_5); inline;
  63521. begin
  63522. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  63523. end;
  63524. function TCAN1_C1FLTCON7.getFSEL29 : TBits_5; inline;
  63525. begin
  63526. getFSEL29 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  63527. end;
  63528. procedure TCAN1_C1FLTCON7.setMSEL29(thebits : TBits_2); inline;
  63529. begin
  63530. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  63531. end;
  63532. function TCAN1_C1FLTCON7.getMSEL29 : TBits_2; inline;
  63533. begin
  63534. getMSEL29 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  63535. end;
  63536. procedure TCAN1_C1FLTCON7.setFLTEN29; inline;
  63537. begin
  63538. pTDefRegMap(@Self)^.&set := $00008000;
  63539. end;
  63540. procedure TCAN1_C1FLTCON7.clearFLTEN29; inline;
  63541. begin
  63542. pTDefRegMap(@Self)^.clr := $00008000;
  63543. end;
  63544. procedure TCAN1_C1FLTCON7.setFLTEN29(thebits : TBits_1); inline;
  63545. begin
  63546. if thebits = 0 then
  63547. pTDefRegMap(@Self)^.clr := $00008000
  63548. else
  63549. pTDefRegMap(@Self)^.&set := $00008000;
  63550. end;
  63551. function TCAN1_C1FLTCON7.getFLTEN29 : TBits_1; inline;
  63552. begin
  63553. getFLTEN29 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  63554. end;
  63555. procedure TCAN1_C1FLTCON7.setFSEL30(thebits : TBits_5); inline;
  63556. begin
  63557. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  63558. end;
  63559. function TCAN1_C1FLTCON7.getFSEL30 : TBits_5; inline;
  63560. begin
  63561. getFSEL30 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  63562. end;
  63563. procedure TCAN1_C1FLTCON7.setMSEL30(thebits : TBits_2); inline;
  63564. begin
  63565. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  63566. end;
  63567. function TCAN1_C1FLTCON7.getMSEL30 : TBits_2; inline;
  63568. begin
  63569. getMSEL30 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  63570. end;
  63571. procedure TCAN1_C1FLTCON7.setFLTEN30; inline;
  63572. begin
  63573. pTDefRegMap(@Self)^.&set := $00800000;
  63574. end;
  63575. procedure TCAN1_C1FLTCON7.clearFLTEN30; inline;
  63576. begin
  63577. pTDefRegMap(@Self)^.clr := $00800000;
  63578. end;
  63579. procedure TCAN1_C1FLTCON7.setFLTEN30(thebits : TBits_1); inline;
  63580. begin
  63581. if thebits = 0 then
  63582. pTDefRegMap(@Self)^.clr := $00800000
  63583. else
  63584. pTDefRegMap(@Self)^.&set := $00800000;
  63585. end;
  63586. function TCAN1_C1FLTCON7.getFLTEN30 : TBits_1; inline;
  63587. begin
  63588. getFLTEN30 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  63589. end;
  63590. procedure TCAN1_C1FLTCON7.setFSEL31(thebits : TBits_5); inline;
  63591. begin
  63592. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  63593. end;
  63594. function TCAN1_C1FLTCON7.getFSEL31 : TBits_5; inline;
  63595. begin
  63596. getFSEL31 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  63597. end;
  63598. procedure TCAN1_C1FLTCON7.setMSEL31(thebits : TBits_2); inline;
  63599. begin
  63600. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  63601. end;
  63602. function TCAN1_C1FLTCON7.getMSEL31 : TBits_2; inline;
  63603. begin
  63604. getMSEL31 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  63605. end;
  63606. procedure TCAN1_C1FLTCON7.setFLTEN31; inline;
  63607. begin
  63608. pTDefRegMap(@Self)^.&set := $80000000;
  63609. end;
  63610. procedure TCAN1_C1FLTCON7.clearFLTEN31; inline;
  63611. begin
  63612. pTDefRegMap(@Self)^.clr := $80000000;
  63613. end;
  63614. procedure TCAN1_C1FLTCON7.setFLTEN31(thebits : TBits_1); inline;
  63615. begin
  63616. if thebits = 0 then
  63617. pTDefRegMap(@Self)^.clr := $80000000
  63618. else
  63619. pTDefRegMap(@Self)^.&set := $80000000;
  63620. end;
  63621. function TCAN1_C1FLTCON7.getFLTEN31 : TBits_1; inline;
  63622. begin
  63623. getFLTEN31 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  63624. end;
  63625. procedure TCAN1_C1FLTCON7.setw(thebits : TBits_32); inline;
  63626. begin
  63627. pTDefRegMap(@Self)^.val := thebits;
  63628. end;
  63629. function TCAN1_C1FLTCON7.getw : TBits_32; inline;
  63630. begin
  63631. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63632. end;
  63633. procedure TCAN1_C1RXF0.setEID(thebits : TBits_18); inline;
  63634. begin
  63635. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  63636. end;
  63637. function TCAN1_C1RXF0.getEID : TBits_18; inline;
  63638. begin
  63639. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  63640. end;
  63641. procedure TCAN1_C1RXF0.setEXID; inline;
  63642. begin
  63643. pTDefRegMap(@Self)^.&set := $00080000;
  63644. end;
  63645. procedure TCAN1_C1RXF0.clearEXID; inline;
  63646. begin
  63647. pTDefRegMap(@Self)^.clr := $00080000;
  63648. end;
  63649. procedure TCAN1_C1RXF0.setEXID(thebits : TBits_1); inline;
  63650. begin
  63651. if thebits = 0 then
  63652. pTDefRegMap(@Self)^.clr := $00080000
  63653. else
  63654. pTDefRegMap(@Self)^.&set := $00080000;
  63655. end;
  63656. function TCAN1_C1RXF0.getEXID : TBits_1; inline;
  63657. begin
  63658. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  63659. end;
  63660. procedure TCAN1_C1RXF0.setSID(thebits : TBits_11); inline;
  63661. begin
  63662. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  63663. end;
  63664. function TCAN1_C1RXF0.getSID : TBits_11; inline;
  63665. begin
  63666. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  63667. end;
  63668. procedure TCAN1_C1RXF0.setw(thebits : TBits_32); inline;
  63669. begin
  63670. pTDefRegMap(@Self)^.val := thebits;
  63671. end;
  63672. function TCAN1_C1RXF0.getw : TBits_32; inline;
  63673. begin
  63674. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63675. end;
  63676. procedure TCAN1_C1RXF1.setEID(thebits : TBits_18); inline;
  63677. begin
  63678. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  63679. end;
  63680. function TCAN1_C1RXF1.getEID : TBits_18; inline;
  63681. begin
  63682. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  63683. end;
  63684. procedure TCAN1_C1RXF1.setEXID; inline;
  63685. begin
  63686. pTDefRegMap(@Self)^.&set := $00080000;
  63687. end;
  63688. procedure TCAN1_C1RXF1.clearEXID; inline;
  63689. begin
  63690. pTDefRegMap(@Self)^.clr := $00080000;
  63691. end;
  63692. procedure TCAN1_C1RXF1.setEXID(thebits : TBits_1); inline;
  63693. begin
  63694. if thebits = 0 then
  63695. pTDefRegMap(@Self)^.clr := $00080000
  63696. else
  63697. pTDefRegMap(@Self)^.&set := $00080000;
  63698. end;
  63699. function TCAN1_C1RXF1.getEXID : TBits_1; inline;
  63700. begin
  63701. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  63702. end;
  63703. procedure TCAN1_C1RXF1.setSID(thebits : TBits_11); inline;
  63704. begin
  63705. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  63706. end;
  63707. function TCAN1_C1RXF1.getSID : TBits_11; inline;
  63708. begin
  63709. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  63710. end;
  63711. procedure TCAN1_C1RXF1.setw(thebits : TBits_32); inline;
  63712. begin
  63713. pTDefRegMap(@Self)^.val := thebits;
  63714. end;
  63715. function TCAN1_C1RXF1.getw : TBits_32; inline;
  63716. begin
  63717. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63718. end;
  63719. procedure TCAN1_C1RXF2.setEID(thebits : TBits_18); inline;
  63720. begin
  63721. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  63722. end;
  63723. function TCAN1_C1RXF2.getEID : TBits_18; inline;
  63724. begin
  63725. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  63726. end;
  63727. procedure TCAN1_C1RXF2.setEXID; inline;
  63728. begin
  63729. pTDefRegMap(@Self)^.&set := $00080000;
  63730. end;
  63731. procedure TCAN1_C1RXF2.clearEXID; inline;
  63732. begin
  63733. pTDefRegMap(@Self)^.clr := $00080000;
  63734. end;
  63735. procedure TCAN1_C1RXF2.setEXID(thebits : TBits_1); inline;
  63736. begin
  63737. if thebits = 0 then
  63738. pTDefRegMap(@Self)^.clr := $00080000
  63739. else
  63740. pTDefRegMap(@Self)^.&set := $00080000;
  63741. end;
  63742. function TCAN1_C1RXF2.getEXID : TBits_1; inline;
  63743. begin
  63744. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  63745. end;
  63746. procedure TCAN1_C1RXF2.setSID(thebits : TBits_11); inline;
  63747. begin
  63748. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  63749. end;
  63750. function TCAN1_C1RXF2.getSID : TBits_11; inline;
  63751. begin
  63752. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  63753. end;
  63754. procedure TCAN1_C1RXF2.setw(thebits : TBits_32); inline;
  63755. begin
  63756. pTDefRegMap(@Self)^.val := thebits;
  63757. end;
  63758. function TCAN1_C1RXF2.getw : TBits_32; inline;
  63759. begin
  63760. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63761. end;
  63762. procedure TCAN1_C1RXF3.setEID(thebits : TBits_18); inline;
  63763. begin
  63764. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  63765. end;
  63766. function TCAN1_C1RXF3.getEID : TBits_18; inline;
  63767. begin
  63768. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  63769. end;
  63770. procedure TCAN1_C1RXF3.setEXID; inline;
  63771. begin
  63772. pTDefRegMap(@Self)^.&set := $00080000;
  63773. end;
  63774. procedure TCAN1_C1RXF3.clearEXID; inline;
  63775. begin
  63776. pTDefRegMap(@Self)^.clr := $00080000;
  63777. end;
  63778. procedure TCAN1_C1RXF3.setEXID(thebits : TBits_1); inline;
  63779. begin
  63780. if thebits = 0 then
  63781. pTDefRegMap(@Self)^.clr := $00080000
  63782. else
  63783. pTDefRegMap(@Self)^.&set := $00080000;
  63784. end;
  63785. function TCAN1_C1RXF3.getEXID : TBits_1; inline;
  63786. begin
  63787. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  63788. end;
  63789. procedure TCAN1_C1RXF3.setSID(thebits : TBits_11); inline;
  63790. begin
  63791. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  63792. end;
  63793. function TCAN1_C1RXF3.getSID : TBits_11; inline;
  63794. begin
  63795. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  63796. end;
  63797. procedure TCAN1_C1RXF3.setw(thebits : TBits_32); inline;
  63798. begin
  63799. pTDefRegMap(@Self)^.val := thebits;
  63800. end;
  63801. function TCAN1_C1RXF3.getw : TBits_32; inline;
  63802. begin
  63803. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63804. end;
  63805. procedure TCAN1_C1RXF4.setEID(thebits : TBits_18); inline;
  63806. begin
  63807. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  63808. end;
  63809. function TCAN1_C1RXF4.getEID : TBits_18; inline;
  63810. begin
  63811. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  63812. end;
  63813. procedure TCAN1_C1RXF4.setEXID; inline;
  63814. begin
  63815. pTDefRegMap(@Self)^.&set := $00080000;
  63816. end;
  63817. procedure TCAN1_C1RXF4.clearEXID; inline;
  63818. begin
  63819. pTDefRegMap(@Self)^.clr := $00080000;
  63820. end;
  63821. procedure TCAN1_C1RXF4.setEXID(thebits : TBits_1); inline;
  63822. begin
  63823. if thebits = 0 then
  63824. pTDefRegMap(@Self)^.clr := $00080000
  63825. else
  63826. pTDefRegMap(@Self)^.&set := $00080000;
  63827. end;
  63828. function TCAN1_C1RXF4.getEXID : TBits_1; inline;
  63829. begin
  63830. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  63831. end;
  63832. procedure TCAN1_C1RXF4.setSID(thebits : TBits_11); inline;
  63833. begin
  63834. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  63835. end;
  63836. function TCAN1_C1RXF4.getSID : TBits_11; inline;
  63837. begin
  63838. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  63839. end;
  63840. procedure TCAN1_C1RXF4.setw(thebits : TBits_32); inline;
  63841. begin
  63842. pTDefRegMap(@Self)^.val := thebits;
  63843. end;
  63844. function TCAN1_C1RXF4.getw : TBits_32; inline;
  63845. begin
  63846. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63847. end;
  63848. procedure TCAN1_C1RXF5.setEID(thebits : TBits_18); inline;
  63849. begin
  63850. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  63851. end;
  63852. function TCAN1_C1RXF5.getEID : TBits_18; inline;
  63853. begin
  63854. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  63855. end;
  63856. procedure TCAN1_C1RXF5.setEXID; inline;
  63857. begin
  63858. pTDefRegMap(@Self)^.&set := $00080000;
  63859. end;
  63860. procedure TCAN1_C1RXF5.clearEXID; inline;
  63861. begin
  63862. pTDefRegMap(@Self)^.clr := $00080000;
  63863. end;
  63864. procedure TCAN1_C1RXF5.setEXID(thebits : TBits_1); inline;
  63865. begin
  63866. if thebits = 0 then
  63867. pTDefRegMap(@Self)^.clr := $00080000
  63868. else
  63869. pTDefRegMap(@Self)^.&set := $00080000;
  63870. end;
  63871. function TCAN1_C1RXF5.getEXID : TBits_1; inline;
  63872. begin
  63873. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  63874. end;
  63875. procedure TCAN1_C1RXF5.setSID(thebits : TBits_11); inline;
  63876. begin
  63877. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  63878. end;
  63879. function TCAN1_C1RXF5.getSID : TBits_11; inline;
  63880. begin
  63881. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  63882. end;
  63883. procedure TCAN1_C1RXF5.setw(thebits : TBits_32); inline;
  63884. begin
  63885. pTDefRegMap(@Self)^.val := thebits;
  63886. end;
  63887. function TCAN1_C1RXF5.getw : TBits_32; inline;
  63888. begin
  63889. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63890. end;
  63891. procedure TCAN1_C1RXF6.setEID(thebits : TBits_18); inline;
  63892. begin
  63893. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  63894. end;
  63895. function TCAN1_C1RXF6.getEID : TBits_18; inline;
  63896. begin
  63897. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  63898. end;
  63899. procedure TCAN1_C1RXF6.setEXID; inline;
  63900. begin
  63901. pTDefRegMap(@Self)^.&set := $00080000;
  63902. end;
  63903. procedure TCAN1_C1RXF6.clearEXID; inline;
  63904. begin
  63905. pTDefRegMap(@Self)^.clr := $00080000;
  63906. end;
  63907. procedure TCAN1_C1RXF6.setEXID(thebits : TBits_1); inline;
  63908. begin
  63909. if thebits = 0 then
  63910. pTDefRegMap(@Self)^.clr := $00080000
  63911. else
  63912. pTDefRegMap(@Self)^.&set := $00080000;
  63913. end;
  63914. function TCAN1_C1RXF6.getEXID : TBits_1; inline;
  63915. begin
  63916. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  63917. end;
  63918. procedure TCAN1_C1RXF6.setSID(thebits : TBits_11); inline;
  63919. begin
  63920. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  63921. end;
  63922. function TCAN1_C1RXF6.getSID : TBits_11; inline;
  63923. begin
  63924. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  63925. end;
  63926. procedure TCAN1_C1RXF6.setw(thebits : TBits_32); inline;
  63927. begin
  63928. pTDefRegMap(@Self)^.val := thebits;
  63929. end;
  63930. function TCAN1_C1RXF6.getw : TBits_32; inline;
  63931. begin
  63932. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63933. end;
  63934. procedure TCAN1_C1RXF7.setEID(thebits : TBits_18); inline;
  63935. begin
  63936. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  63937. end;
  63938. function TCAN1_C1RXF7.getEID : TBits_18; inline;
  63939. begin
  63940. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  63941. end;
  63942. procedure TCAN1_C1RXF7.setEXID; inline;
  63943. begin
  63944. pTDefRegMap(@Self)^.&set := $00080000;
  63945. end;
  63946. procedure TCAN1_C1RXF7.clearEXID; inline;
  63947. begin
  63948. pTDefRegMap(@Self)^.clr := $00080000;
  63949. end;
  63950. procedure TCAN1_C1RXF7.setEXID(thebits : TBits_1); inline;
  63951. begin
  63952. if thebits = 0 then
  63953. pTDefRegMap(@Self)^.clr := $00080000
  63954. else
  63955. pTDefRegMap(@Self)^.&set := $00080000;
  63956. end;
  63957. function TCAN1_C1RXF7.getEXID : TBits_1; inline;
  63958. begin
  63959. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  63960. end;
  63961. procedure TCAN1_C1RXF7.setSID(thebits : TBits_11); inline;
  63962. begin
  63963. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  63964. end;
  63965. function TCAN1_C1RXF7.getSID : TBits_11; inline;
  63966. begin
  63967. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  63968. end;
  63969. procedure TCAN1_C1RXF7.setw(thebits : TBits_32); inline;
  63970. begin
  63971. pTDefRegMap(@Self)^.val := thebits;
  63972. end;
  63973. function TCAN1_C1RXF7.getw : TBits_32; inline;
  63974. begin
  63975. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63976. end;
  63977. procedure TCAN1_C1RXF8.setEID(thebits : TBits_18); inline;
  63978. begin
  63979. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  63980. end;
  63981. function TCAN1_C1RXF8.getEID : TBits_18; inline;
  63982. begin
  63983. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  63984. end;
  63985. procedure TCAN1_C1RXF8.setEXID; inline;
  63986. begin
  63987. pTDefRegMap(@Self)^.&set := $00080000;
  63988. end;
  63989. procedure TCAN1_C1RXF8.clearEXID; inline;
  63990. begin
  63991. pTDefRegMap(@Self)^.clr := $00080000;
  63992. end;
  63993. procedure TCAN1_C1RXF8.setEXID(thebits : TBits_1); inline;
  63994. begin
  63995. if thebits = 0 then
  63996. pTDefRegMap(@Self)^.clr := $00080000
  63997. else
  63998. pTDefRegMap(@Self)^.&set := $00080000;
  63999. end;
  64000. function TCAN1_C1RXF8.getEXID : TBits_1; inline;
  64001. begin
  64002. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  64003. end;
  64004. procedure TCAN1_C1RXF8.setSID(thebits : TBits_11); inline;
  64005. begin
  64006. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  64007. end;
  64008. function TCAN1_C1RXF8.getSID : TBits_11; inline;
  64009. begin
  64010. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  64011. end;
  64012. procedure TCAN1_C1RXF8.setw(thebits : TBits_32); inline;
  64013. begin
  64014. pTDefRegMap(@Self)^.val := thebits;
  64015. end;
  64016. function TCAN1_C1RXF8.getw : TBits_32; inline;
  64017. begin
  64018. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64019. end;
  64020. procedure TCAN1_C1RXF9.setEID(thebits : TBits_18); inline;
  64021. begin
  64022. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  64023. end;
  64024. function TCAN1_C1RXF9.getEID : TBits_18; inline;
  64025. begin
  64026. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  64027. end;
  64028. procedure TCAN1_C1RXF9.setEXID; inline;
  64029. begin
  64030. pTDefRegMap(@Self)^.&set := $00080000;
  64031. end;
  64032. procedure TCAN1_C1RXF9.clearEXID; inline;
  64033. begin
  64034. pTDefRegMap(@Self)^.clr := $00080000;
  64035. end;
  64036. procedure TCAN1_C1RXF9.setEXID(thebits : TBits_1); inline;
  64037. begin
  64038. if thebits = 0 then
  64039. pTDefRegMap(@Self)^.clr := $00080000
  64040. else
  64041. pTDefRegMap(@Self)^.&set := $00080000;
  64042. end;
  64043. function TCAN1_C1RXF9.getEXID : TBits_1; inline;
  64044. begin
  64045. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  64046. end;
  64047. procedure TCAN1_C1RXF9.setSID(thebits : TBits_11); inline;
  64048. begin
  64049. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  64050. end;
  64051. function TCAN1_C1RXF9.getSID : TBits_11; inline;
  64052. begin
  64053. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  64054. end;
  64055. procedure TCAN1_C1RXF9.setw(thebits : TBits_32); inline;
  64056. begin
  64057. pTDefRegMap(@Self)^.val := thebits;
  64058. end;
  64059. function TCAN1_C1RXF9.getw : TBits_32; inline;
  64060. begin
  64061. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64062. end;
  64063. procedure TCAN1_C1RXF10.setEID(thebits : TBits_18); inline;
  64064. begin
  64065. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  64066. end;
  64067. function TCAN1_C1RXF10.getEID : TBits_18; inline;
  64068. begin
  64069. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  64070. end;
  64071. procedure TCAN1_C1RXF10.setEXID; inline;
  64072. begin
  64073. pTDefRegMap(@Self)^.&set := $00080000;
  64074. end;
  64075. procedure TCAN1_C1RXF10.clearEXID; inline;
  64076. begin
  64077. pTDefRegMap(@Self)^.clr := $00080000;
  64078. end;
  64079. procedure TCAN1_C1RXF10.setEXID(thebits : TBits_1); inline;
  64080. begin
  64081. if thebits = 0 then
  64082. pTDefRegMap(@Self)^.clr := $00080000
  64083. else
  64084. pTDefRegMap(@Self)^.&set := $00080000;
  64085. end;
  64086. function TCAN1_C1RXF10.getEXID : TBits_1; inline;
  64087. begin
  64088. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  64089. end;
  64090. procedure TCAN1_C1RXF10.setSID(thebits : TBits_11); inline;
  64091. begin
  64092. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  64093. end;
  64094. function TCAN1_C1RXF10.getSID : TBits_11; inline;
  64095. begin
  64096. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  64097. end;
  64098. procedure TCAN1_C1RXF10.setw(thebits : TBits_32); inline;
  64099. begin
  64100. pTDefRegMap(@Self)^.val := thebits;
  64101. end;
  64102. function TCAN1_C1RXF10.getw : TBits_32; inline;
  64103. begin
  64104. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64105. end;
  64106. procedure TCAN1_C1RXF11.setEID(thebits : TBits_18); inline;
  64107. begin
  64108. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  64109. end;
  64110. function TCAN1_C1RXF11.getEID : TBits_18; inline;
  64111. begin
  64112. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  64113. end;
  64114. procedure TCAN1_C1RXF11.setEXID; inline;
  64115. begin
  64116. pTDefRegMap(@Self)^.&set := $00080000;
  64117. end;
  64118. procedure TCAN1_C1RXF11.clearEXID; inline;
  64119. begin
  64120. pTDefRegMap(@Self)^.clr := $00080000;
  64121. end;
  64122. procedure TCAN1_C1RXF11.setEXID(thebits : TBits_1); inline;
  64123. begin
  64124. if thebits = 0 then
  64125. pTDefRegMap(@Self)^.clr := $00080000
  64126. else
  64127. pTDefRegMap(@Self)^.&set := $00080000;
  64128. end;
  64129. function TCAN1_C1RXF11.getEXID : TBits_1; inline;
  64130. begin
  64131. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  64132. end;
  64133. procedure TCAN1_C1RXF11.setSID(thebits : TBits_11); inline;
  64134. begin
  64135. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  64136. end;
  64137. function TCAN1_C1RXF11.getSID : TBits_11; inline;
  64138. begin
  64139. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  64140. end;
  64141. procedure TCAN1_C1RXF11.setw(thebits : TBits_32); inline;
  64142. begin
  64143. pTDefRegMap(@Self)^.val := thebits;
  64144. end;
  64145. function TCAN1_C1RXF11.getw : TBits_32; inline;
  64146. begin
  64147. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64148. end;
  64149. procedure TCAN1_C1RXF12.setEID(thebits : TBits_18); inline;
  64150. begin
  64151. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  64152. end;
  64153. function TCAN1_C1RXF12.getEID : TBits_18; inline;
  64154. begin
  64155. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  64156. end;
  64157. procedure TCAN1_C1RXF12.setEXID; inline;
  64158. begin
  64159. pTDefRegMap(@Self)^.&set := $00080000;
  64160. end;
  64161. procedure TCAN1_C1RXF12.clearEXID; inline;
  64162. begin
  64163. pTDefRegMap(@Self)^.clr := $00080000;
  64164. end;
  64165. procedure TCAN1_C1RXF12.setEXID(thebits : TBits_1); inline;
  64166. begin
  64167. if thebits = 0 then
  64168. pTDefRegMap(@Self)^.clr := $00080000
  64169. else
  64170. pTDefRegMap(@Self)^.&set := $00080000;
  64171. end;
  64172. function TCAN1_C1RXF12.getEXID : TBits_1; inline;
  64173. begin
  64174. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  64175. end;
  64176. procedure TCAN1_C1RXF12.setSID(thebits : TBits_11); inline;
  64177. begin
  64178. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  64179. end;
  64180. function TCAN1_C1RXF12.getSID : TBits_11; inline;
  64181. begin
  64182. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  64183. end;
  64184. procedure TCAN1_C1RXF12.setw(thebits : TBits_32); inline;
  64185. begin
  64186. pTDefRegMap(@Self)^.val := thebits;
  64187. end;
  64188. function TCAN1_C1RXF12.getw : TBits_32; inline;
  64189. begin
  64190. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64191. end;
  64192. procedure TCAN1_C1RXF13.setEID(thebits : TBits_18); inline;
  64193. begin
  64194. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  64195. end;
  64196. function TCAN1_C1RXF13.getEID : TBits_18; inline;
  64197. begin
  64198. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  64199. end;
  64200. procedure TCAN1_C1RXF13.setEXID; inline;
  64201. begin
  64202. pTDefRegMap(@Self)^.&set := $00080000;
  64203. end;
  64204. procedure TCAN1_C1RXF13.clearEXID; inline;
  64205. begin
  64206. pTDefRegMap(@Self)^.clr := $00080000;
  64207. end;
  64208. procedure TCAN1_C1RXF13.setEXID(thebits : TBits_1); inline;
  64209. begin
  64210. if thebits = 0 then
  64211. pTDefRegMap(@Self)^.clr := $00080000
  64212. else
  64213. pTDefRegMap(@Self)^.&set := $00080000;
  64214. end;
  64215. function TCAN1_C1RXF13.getEXID : TBits_1; inline;
  64216. begin
  64217. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  64218. end;
  64219. procedure TCAN1_C1RXF13.setSID(thebits : TBits_11); inline;
  64220. begin
  64221. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  64222. end;
  64223. function TCAN1_C1RXF13.getSID : TBits_11; inline;
  64224. begin
  64225. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  64226. end;
  64227. procedure TCAN1_C1RXF13.setw(thebits : TBits_32); inline;
  64228. begin
  64229. pTDefRegMap(@Self)^.val := thebits;
  64230. end;
  64231. function TCAN1_C1RXF13.getw : TBits_32; inline;
  64232. begin
  64233. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64234. end;
  64235. procedure TCAN1_C1RXF14.setEID(thebits : TBits_18); inline;
  64236. begin
  64237. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  64238. end;
  64239. function TCAN1_C1RXF14.getEID : TBits_18; inline;
  64240. begin
  64241. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  64242. end;
  64243. procedure TCAN1_C1RXF14.setEXID; inline;
  64244. begin
  64245. pTDefRegMap(@Self)^.&set := $00080000;
  64246. end;
  64247. procedure TCAN1_C1RXF14.clearEXID; inline;
  64248. begin
  64249. pTDefRegMap(@Self)^.clr := $00080000;
  64250. end;
  64251. procedure TCAN1_C1RXF14.setEXID(thebits : TBits_1); inline;
  64252. begin
  64253. if thebits = 0 then
  64254. pTDefRegMap(@Self)^.clr := $00080000
  64255. else
  64256. pTDefRegMap(@Self)^.&set := $00080000;
  64257. end;
  64258. function TCAN1_C1RXF14.getEXID : TBits_1; inline;
  64259. begin
  64260. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  64261. end;
  64262. procedure TCAN1_C1RXF14.setSID(thebits : TBits_11); inline;
  64263. begin
  64264. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  64265. end;
  64266. function TCAN1_C1RXF14.getSID : TBits_11; inline;
  64267. begin
  64268. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  64269. end;
  64270. procedure TCAN1_C1RXF14.setw(thebits : TBits_32); inline;
  64271. begin
  64272. pTDefRegMap(@Self)^.val := thebits;
  64273. end;
  64274. function TCAN1_C1RXF14.getw : TBits_32; inline;
  64275. begin
  64276. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64277. end;
  64278. procedure TCAN1_C1RXF15.setEID(thebits : TBits_18); inline;
  64279. begin
  64280. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  64281. end;
  64282. function TCAN1_C1RXF15.getEID : TBits_18; inline;
  64283. begin
  64284. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  64285. end;
  64286. procedure TCAN1_C1RXF15.setEXID; inline;
  64287. begin
  64288. pTDefRegMap(@Self)^.&set := $00080000;
  64289. end;
  64290. procedure TCAN1_C1RXF15.clearEXID; inline;
  64291. begin
  64292. pTDefRegMap(@Self)^.clr := $00080000;
  64293. end;
  64294. procedure TCAN1_C1RXF15.setEXID(thebits : TBits_1); inline;
  64295. begin
  64296. if thebits = 0 then
  64297. pTDefRegMap(@Self)^.clr := $00080000
  64298. else
  64299. pTDefRegMap(@Self)^.&set := $00080000;
  64300. end;
  64301. function TCAN1_C1RXF15.getEXID : TBits_1; inline;
  64302. begin
  64303. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  64304. end;
  64305. procedure TCAN1_C1RXF15.setSID(thebits : TBits_11); inline;
  64306. begin
  64307. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  64308. end;
  64309. function TCAN1_C1RXF15.getSID : TBits_11; inline;
  64310. begin
  64311. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  64312. end;
  64313. procedure TCAN1_C1RXF15.setw(thebits : TBits_32); inline;
  64314. begin
  64315. pTDefRegMap(@Self)^.val := thebits;
  64316. end;
  64317. function TCAN1_C1RXF15.getw : TBits_32; inline;
  64318. begin
  64319. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64320. end;
  64321. procedure TCAN1_C1RXF16.setEID(thebits : TBits_18); inline;
  64322. begin
  64323. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  64324. end;
  64325. function TCAN1_C1RXF16.getEID : TBits_18; inline;
  64326. begin
  64327. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  64328. end;
  64329. procedure TCAN1_C1RXF16.setEXID; inline;
  64330. begin
  64331. pTDefRegMap(@Self)^.&set := $00080000;
  64332. end;
  64333. procedure TCAN1_C1RXF16.clearEXID; inline;
  64334. begin
  64335. pTDefRegMap(@Self)^.clr := $00080000;
  64336. end;
  64337. procedure TCAN1_C1RXF16.setEXID(thebits : TBits_1); inline;
  64338. begin
  64339. if thebits = 0 then
  64340. pTDefRegMap(@Self)^.clr := $00080000
  64341. else
  64342. pTDefRegMap(@Self)^.&set := $00080000;
  64343. end;
  64344. function TCAN1_C1RXF16.getEXID : TBits_1; inline;
  64345. begin
  64346. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  64347. end;
  64348. procedure TCAN1_C1RXF16.setSID(thebits : TBits_11); inline;
  64349. begin
  64350. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  64351. end;
  64352. function TCAN1_C1RXF16.getSID : TBits_11; inline;
  64353. begin
  64354. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  64355. end;
  64356. procedure TCAN1_C1RXF16.setw(thebits : TBits_32); inline;
  64357. begin
  64358. pTDefRegMap(@Self)^.val := thebits;
  64359. end;
  64360. function TCAN1_C1RXF16.getw : TBits_32; inline;
  64361. begin
  64362. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64363. end;
  64364. procedure TCAN1_C1RXF17.setEID(thebits : TBits_18); inline;
  64365. begin
  64366. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  64367. end;
  64368. function TCAN1_C1RXF17.getEID : TBits_18; inline;
  64369. begin
  64370. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  64371. end;
  64372. procedure TCAN1_C1RXF17.setEXID; inline;
  64373. begin
  64374. pTDefRegMap(@Self)^.&set := $00080000;
  64375. end;
  64376. procedure TCAN1_C1RXF17.clearEXID; inline;
  64377. begin
  64378. pTDefRegMap(@Self)^.clr := $00080000;
  64379. end;
  64380. procedure TCAN1_C1RXF17.setEXID(thebits : TBits_1); inline;
  64381. begin
  64382. if thebits = 0 then
  64383. pTDefRegMap(@Self)^.clr := $00080000
  64384. else
  64385. pTDefRegMap(@Self)^.&set := $00080000;
  64386. end;
  64387. function TCAN1_C1RXF17.getEXID : TBits_1; inline;
  64388. begin
  64389. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  64390. end;
  64391. procedure TCAN1_C1RXF17.setSID(thebits : TBits_11); inline;
  64392. begin
  64393. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  64394. end;
  64395. function TCAN1_C1RXF17.getSID : TBits_11; inline;
  64396. begin
  64397. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  64398. end;
  64399. procedure TCAN1_C1RXF17.setw(thebits : TBits_32); inline;
  64400. begin
  64401. pTDefRegMap(@Self)^.val := thebits;
  64402. end;
  64403. function TCAN1_C1RXF17.getw : TBits_32; inline;
  64404. begin
  64405. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64406. end;
  64407. procedure TCAN1_C1RXF18.setEID(thebits : TBits_18); inline;
  64408. begin
  64409. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  64410. end;
  64411. function TCAN1_C1RXF18.getEID : TBits_18; inline;
  64412. begin
  64413. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  64414. end;
  64415. procedure TCAN1_C1RXF18.setEXID; inline;
  64416. begin
  64417. pTDefRegMap(@Self)^.&set := $00080000;
  64418. end;
  64419. procedure TCAN1_C1RXF18.clearEXID; inline;
  64420. begin
  64421. pTDefRegMap(@Self)^.clr := $00080000;
  64422. end;
  64423. procedure TCAN1_C1RXF18.setEXID(thebits : TBits_1); inline;
  64424. begin
  64425. if thebits = 0 then
  64426. pTDefRegMap(@Self)^.clr := $00080000
  64427. else
  64428. pTDefRegMap(@Self)^.&set := $00080000;
  64429. end;
  64430. function TCAN1_C1RXF18.getEXID : TBits_1; inline;
  64431. begin
  64432. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  64433. end;
  64434. procedure TCAN1_C1RXF18.setSID(thebits : TBits_11); inline;
  64435. begin
  64436. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  64437. end;
  64438. function TCAN1_C1RXF18.getSID : TBits_11; inline;
  64439. begin
  64440. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  64441. end;
  64442. procedure TCAN1_C1RXF18.setw(thebits : TBits_32); inline;
  64443. begin
  64444. pTDefRegMap(@Self)^.val := thebits;
  64445. end;
  64446. function TCAN1_C1RXF18.getw : TBits_32; inline;
  64447. begin
  64448. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64449. end;
  64450. procedure TCAN1_C1RXF19.setEID(thebits : TBits_18); inline;
  64451. begin
  64452. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  64453. end;
  64454. function TCAN1_C1RXF19.getEID : TBits_18; inline;
  64455. begin
  64456. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  64457. end;
  64458. procedure TCAN1_C1RXF19.setEXID; inline;
  64459. begin
  64460. pTDefRegMap(@Self)^.&set := $00080000;
  64461. end;
  64462. procedure TCAN1_C1RXF19.clearEXID; inline;
  64463. begin
  64464. pTDefRegMap(@Self)^.clr := $00080000;
  64465. end;
  64466. procedure TCAN1_C1RXF19.setEXID(thebits : TBits_1); inline;
  64467. begin
  64468. if thebits = 0 then
  64469. pTDefRegMap(@Self)^.clr := $00080000
  64470. else
  64471. pTDefRegMap(@Self)^.&set := $00080000;
  64472. end;
  64473. function TCAN1_C1RXF19.getEXID : TBits_1; inline;
  64474. begin
  64475. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  64476. end;
  64477. procedure TCAN1_C1RXF19.setSID(thebits : TBits_11); inline;
  64478. begin
  64479. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  64480. end;
  64481. function TCAN1_C1RXF19.getSID : TBits_11; inline;
  64482. begin
  64483. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  64484. end;
  64485. procedure TCAN1_C1RXF19.setw(thebits : TBits_32); inline;
  64486. begin
  64487. pTDefRegMap(@Self)^.val := thebits;
  64488. end;
  64489. function TCAN1_C1RXF19.getw : TBits_32; inline;
  64490. begin
  64491. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64492. end;
  64493. procedure TCAN1_C1RXF20.setEID(thebits : TBits_18); inline;
  64494. begin
  64495. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  64496. end;
  64497. function TCAN1_C1RXF20.getEID : TBits_18; inline;
  64498. begin
  64499. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  64500. end;
  64501. procedure TCAN1_C1RXF20.setEXID; inline;
  64502. begin
  64503. pTDefRegMap(@Self)^.&set := $00080000;
  64504. end;
  64505. procedure TCAN1_C1RXF20.clearEXID; inline;
  64506. begin
  64507. pTDefRegMap(@Self)^.clr := $00080000;
  64508. end;
  64509. procedure TCAN1_C1RXF20.setEXID(thebits : TBits_1); inline;
  64510. begin
  64511. if thebits = 0 then
  64512. pTDefRegMap(@Self)^.clr := $00080000
  64513. else
  64514. pTDefRegMap(@Self)^.&set := $00080000;
  64515. end;
  64516. function TCAN1_C1RXF20.getEXID : TBits_1; inline;
  64517. begin
  64518. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  64519. end;
  64520. procedure TCAN1_C1RXF20.setSID(thebits : TBits_11); inline;
  64521. begin
  64522. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  64523. end;
  64524. function TCAN1_C1RXF20.getSID : TBits_11; inline;
  64525. begin
  64526. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  64527. end;
  64528. procedure TCAN1_C1RXF20.setw(thebits : TBits_32); inline;
  64529. begin
  64530. pTDefRegMap(@Self)^.val := thebits;
  64531. end;
  64532. function TCAN1_C1RXF20.getw : TBits_32; inline;
  64533. begin
  64534. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64535. end;
  64536. procedure TCAN1_C1RXF21.setEID(thebits : TBits_18); inline;
  64537. begin
  64538. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  64539. end;
  64540. function TCAN1_C1RXF21.getEID : TBits_18; inline;
  64541. begin
  64542. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  64543. end;
  64544. procedure TCAN1_C1RXF21.setEXID; inline;
  64545. begin
  64546. pTDefRegMap(@Self)^.&set := $00080000;
  64547. end;
  64548. procedure TCAN1_C1RXF21.clearEXID; inline;
  64549. begin
  64550. pTDefRegMap(@Self)^.clr := $00080000;
  64551. end;
  64552. procedure TCAN1_C1RXF21.setEXID(thebits : TBits_1); inline;
  64553. begin
  64554. if thebits = 0 then
  64555. pTDefRegMap(@Self)^.clr := $00080000
  64556. else
  64557. pTDefRegMap(@Self)^.&set := $00080000;
  64558. end;
  64559. function TCAN1_C1RXF21.getEXID : TBits_1; inline;
  64560. begin
  64561. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  64562. end;
  64563. procedure TCAN1_C1RXF21.setSID(thebits : TBits_11); inline;
  64564. begin
  64565. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  64566. end;
  64567. function TCAN1_C1RXF21.getSID : TBits_11; inline;
  64568. begin
  64569. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  64570. end;
  64571. procedure TCAN1_C1RXF21.setw(thebits : TBits_32); inline;
  64572. begin
  64573. pTDefRegMap(@Self)^.val := thebits;
  64574. end;
  64575. function TCAN1_C1RXF21.getw : TBits_32; inline;
  64576. begin
  64577. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64578. end;
  64579. procedure TCAN1_C1RXF22.setEID(thebits : TBits_18); inline;
  64580. begin
  64581. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  64582. end;
  64583. function TCAN1_C1RXF22.getEID : TBits_18; inline;
  64584. begin
  64585. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  64586. end;
  64587. procedure TCAN1_C1RXF22.setEXID; inline;
  64588. begin
  64589. pTDefRegMap(@Self)^.&set := $00080000;
  64590. end;
  64591. procedure TCAN1_C1RXF22.clearEXID; inline;
  64592. begin
  64593. pTDefRegMap(@Self)^.clr := $00080000;
  64594. end;
  64595. procedure TCAN1_C1RXF22.setEXID(thebits : TBits_1); inline;
  64596. begin
  64597. if thebits = 0 then
  64598. pTDefRegMap(@Self)^.clr := $00080000
  64599. else
  64600. pTDefRegMap(@Self)^.&set := $00080000;
  64601. end;
  64602. function TCAN1_C1RXF22.getEXID : TBits_1; inline;
  64603. begin
  64604. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  64605. end;
  64606. procedure TCAN1_C1RXF22.setSID(thebits : TBits_11); inline;
  64607. begin
  64608. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  64609. end;
  64610. function TCAN1_C1RXF22.getSID : TBits_11; inline;
  64611. begin
  64612. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  64613. end;
  64614. procedure TCAN1_C1RXF22.setw(thebits : TBits_32); inline;
  64615. begin
  64616. pTDefRegMap(@Self)^.val := thebits;
  64617. end;
  64618. function TCAN1_C1RXF22.getw : TBits_32; inline;
  64619. begin
  64620. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64621. end;
  64622. procedure TCAN1_C1RXF23.setEID(thebits : TBits_18); inline;
  64623. begin
  64624. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  64625. end;
  64626. function TCAN1_C1RXF23.getEID : TBits_18; inline;
  64627. begin
  64628. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  64629. end;
  64630. procedure TCAN1_C1RXF23.setEXID; inline;
  64631. begin
  64632. pTDefRegMap(@Self)^.&set := $00080000;
  64633. end;
  64634. procedure TCAN1_C1RXF23.clearEXID; inline;
  64635. begin
  64636. pTDefRegMap(@Self)^.clr := $00080000;
  64637. end;
  64638. procedure TCAN1_C1RXF23.setEXID(thebits : TBits_1); inline;
  64639. begin
  64640. if thebits = 0 then
  64641. pTDefRegMap(@Self)^.clr := $00080000
  64642. else
  64643. pTDefRegMap(@Self)^.&set := $00080000;
  64644. end;
  64645. function TCAN1_C1RXF23.getEXID : TBits_1; inline;
  64646. begin
  64647. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  64648. end;
  64649. procedure TCAN1_C1RXF23.setSID(thebits : TBits_11); inline;
  64650. begin
  64651. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  64652. end;
  64653. function TCAN1_C1RXF23.getSID : TBits_11; inline;
  64654. begin
  64655. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  64656. end;
  64657. procedure TCAN1_C1RXF23.setw(thebits : TBits_32); inline;
  64658. begin
  64659. pTDefRegMap(@Self)^.val := thebits;
  64660. end;
  64661. function TCAN1_C1RXF23.getw : TBits_32; inline;
  64662. begin
  64663. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64664. end;
  64665. procedure TCAN1_C1RXF24.setEID(thebits : TBits_18); inline;
  64666. begin
  64667. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  64668. end;
  64669. function TCAN1_C1RXF24.getEID : TBits_18; inline;
  64670. begin
  64671. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  64672. end;
  64673. procedure TCAN1_C1RXF24.setEXID; inline;
  64674. begin
  64675. pTDefRegMap(@Self)^.&set := $00080000;
  64676. end;
  64677. procedure TCAN1_C1RXF24.clearEXID; inline;
  64678. begin
  64679. pTDefRegMap(@Self)^.clr := $00080000;
  64680. end;
  64681. procedure TCAN1_C1RXF24.setEXID(thebits : TBits_1); inline;
  64682. begin
  64683. if thebits = 0 then
  64684. pTDefRegMap(@Self)^.clr := $00080000
  64685. else
  64686. pTDefRegMap(@Self)^.&set := $00080000;
  64687. end;
  64688. function TCAN1_C1RXF24.getEXID : TBits_1; inline;
  64689. begin
  64690. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  64691. end;
  64692. procedure TCAN1_C1RXF24.setSID(thebits : TBits_11); inline;
  64693. begin
  64694. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  64695. end;
  64696. function TCAN1_C1RXF24.getSID : TBits_11; inline;
  64697. begin
  64698. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  64699. end;
  64700. procedure TCAN1_C1RXF24.setw(thebits : TBits_32); inline;
  64701. begin
  64702. pTDefRegMap(@Self)^.val := thebits;
  64703. end;
  64704. function TCAN1_C1RXF24.getw : TBits_32; inline;
  64705. begin
  64706. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64707. end;
  64708. procedure TCAN1_C1RXF25.setEID(thebits : TBits_18); inline;
  64709. begin
  64710. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  64711. end;
  64712. function TCAN1_C1RXF25.getEID : TBits_18; inline;
  64713. begin
  64714. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  64715. end;
  64716. procedure TCAN1_C1RXF25.setEXID; inline;
  64717. begin
  64718. pTDefRegMap(@Self)^.&set := $00080000;
  64719. end;
  64720. procedure TCAN1_C1RXF25.clearEXID; inline;
  64721. begin
  64722. pTDefRegMap(@Self)^.clr := $00080000;
  64723. end;
  64724. procedure TCAN1_C1RXF25.setEXID(thebits : TBits_1); inline;
  64725. begin
  64726. if thebits = 0 then
  64727. pTDefRegMap(@Self)^.clr := $00080000
  64728. else
  64729. pTDefRegMap(@Self)^.&set := $00080000;
  64730. end;
  64731. function TCAN1_C1RXF25.getEXID : TBits_1; inline;
  64732. begin
  64733. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  64734. end;
  64735. procedure TCAN1_C1RXF25.setSID(thebits : TBits_11); inline;
  64736. begin
  64737. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  64738. end;
  64739. function TCAN1_C1RXF25.getSID : TBits_11; inline;
  64740. begin
  64741. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  64742. end;
  64743. procedure TCAN1_C1RXF25.setw(thebits : TBits_32); inline;
  64744. begin
  64745. pTDefRegMap(@Self)^.val := thebits;
  64746. end;
  64747. function TCAN1_C1RXF25.getw : TBits_32; inline;
  64748. begin
  64749. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64750. end;
  64751. procedure TCAN1_C1RXF26.setEID(thebits : TBits_18); inline;
  64752. begin
  64753. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  64754. end;
  64755. function TCAN1_C1RXF26.getEID : TBits_18; inline;
  64756. begin
  64757. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  64758. end;
  64759. procedure TCAN1_C1RXF26.setEXID; inline;
  64760. begin
  64761. pTDefRegMap(@Self)^.&set := $00080000;
  64762. end;
  64763. procedure TCAN1_C1RXF26.clearEXID; inline;
  64764. begin
  64765. pTDefRegMap(@Self)^.clr := $00080000;
  64766. end;
  64767. procedure TCAN1_C1RXF26.setEXID(thebits : TBits_1); inline;
  64768. begin
  64769. if thebits = 0 then
  64770. pTDefRegMap(@Self)^.clr := $00080000
  64771. else
  64772. pTDefRegMap(@Self)^.&set := $00080000;
  64773. end;
  64774. function TCAN1_C1RXF26.getEXID : TBits_1; inline;
  64775. begin
  64776. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  64777. end;
  64778. procedure TCAN1_C1RXF26.setSID(thebits : TBits_11); inline;
  64779. begin
  64780. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  64781. end;
  64782. function TCAN1_C1RXF26.getSID : TBits_11; inline;
  64783. begin
  64784. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  64785. end;
  64786. procedure TCAN1_C1RXF26.setw(thebits : TBits_32); inline;
  64787. begin
  64788. pTDefRegMap(@Self)^.val := thebits;
  64789. end;
  64790. function TCAN1_C1RXF26.getw : TBits_32; inline;
  64791. begin
  64792. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64793. end;
  64794. procedure TCAN1_C1RXF27.setEID(thebits : TBits_18); inline;
  64795. begin
  64796. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  64797. end;
  64798. function TCAN1_C1RXF27.getEID : TBits_18; inline;
  64799. begin
  64800. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  64801. end;
  64802. procedure TCAN1_C1RXF27.setEXID; inline;
  64803. begin
  64804. pTDefRegMap(@Self)^.&set := $00080000;
  64805. end;
  64806. procedure TCAN1_C1RXF27.clearEXID; inline;
  64807. begin
  64808. pTDefRegMap(@Self)^.clr := $00080000;
  64809. end;
  64810. procedure TCAN1_C1RXF27.setEXID(thebits : TBits_1); inline;
  64811. begin
  64812. if thebits = 0 then
  64813. pTDefRegMap(@Self)^.clr := $00080000
  64814. else
  64815. pTDefRegMap(@Self)^.&set := $00080000;
  64816. end;
  64817. function TCAN1_C1RXF27.getEXID : TBits_1; inline;
  64818. begin
  64819. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  64820. end;
  64821. procedure TCAN1_C1RXF27.setSID(thebits : TBits_11); inline;
  64822. begin
  64823. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  64824. end;
  64825. function TCAN1_C1RXF27.getSID : TBits_11; inline;
  64826. begin
  64827. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  64828. end;
  64829. procedure TCAN1_C1RXF27.setw(thebits : TBits_32); inline;
  64830. begin
  64831. pTDefRegMap(@Self)^.val := thebits;
  64832. end;
  64833. function TCAN1_C1RXF27.getw : TBits_32; inline;
  64834. begin
  64835. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64836. end;
  64837. procedure TCAN1_C1RXF28.setEID(thebits : TBits_18); inline;
  64838. begin
  64839. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  64840. end;
  64841. function TCAN1_C1RXF28.getEID : TBits_18; inline;
  64842. begin
  64843. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  64844. end;
  64845. procedure TCAN1_C1RXF28.setEXID; inline;
  64846. begin
  64847. pTDefRegMap(@Self)^.&set := $00080000;
  64848. end;
  64849. procedure TCAN1_C1RXF28.clearEXID; inline;
  64850. begin
  64851. pTDefRegMap(@Self)^.clr := $00080000;
  64852. end;
  64853. procedure TCAN1_C1RXF28.setEXID(thebits : TBits_1); inline;
  64854. begin
  64855. if thebits = 0 then
  64856. pTDefRegMap(@Self)^.clr := $00080000
  64857. else
  64858. pTDefRegMap(@Self)^.&set := $00080000;
  64859. end;
  64860. function TCAN1_C1RXF28.getEXID : TBits_1; inline;
  64861. begin
  64862. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  64863. end;
  64864. procedure TCAN1_C1RXF28.setSID(thebits : TBits_11); inline;
  64865. begin
  64866. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  64867. end;
  64868. function TCAN1_C1RXF28.getSID : TBits_11; inline;
  64869. begin
  64870. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  64871. end;
  64872. procedure TCAN1_C1RXF28.setw(thebits : TBits_32); inline;
  64873. begin
  64874. pTDefRegMap(@Self)^.val := thebits;
  64875. end;
  64876. function TCAN1_C1RXF28.getw : TBits_32; inline;
  64877. begin
  64878. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64879. end;
  64880. procedure TCAN1_C1RXF29.setEID(thebits : TBits_18); inline;
  64881. begin
  64882. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  64883. end;
  64884. function TCAN1_C1RXF29.getEID : TBits_18; inline;
  64885. begin
  64886. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  64887. end;
  64888. procedure TCAN1_C1RXF29.setEXID; inline;
  64889. begin
  64890. pTDefRegMap(@Self)^.&set := $00080000;
  64891. end;
  64892. procedure TCAN1_C1RXF29.clearEXID; inline;
  64893. begin
  64894. pTDefRegMap(@Self)^.clr := $00080000;
  64895. end;
  64896. procedure TCAN1_C1RXF29.setEXID(thebits : TBits_1); inline;
  64897. begin
  64898. if thebits = 0 then
  64899. pTDefRegMap(@Self)^.clr := $00080000
  64900. else
  64901. pTDefRegMap(@Self)^.&set := $00080000;
  64902. end;
  64903. function TCAN1_C1RXF29.getEXID : TBits_1; inline;
  64904. begin
  64905. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  64906. end;
  64907. procedure TCAN1_C1RXF29.setSID(thebits : TBits_11); inline;
  64908. begin
  64909. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  64910. end;
  64911. function TCAN1_C1RXF29.getSID : TBits_11; inline;
  64912. begin
  64913. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  64914. end;
  64915. procedure TCAN1_C1RXF29.setw(thebits : TBits_32); inline;
  64916. begin
  64917. pTDefRegMap(@Self)^.val := thebits;
  64918. end;
  64919. function TCAN1_C1RXF29.getw : TBits_32; inline;
  64920. begin
  64921. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64922. end;
  64923. procedure TCAN1_C1RXF30.setEID(thebits : TBits_18); inline;
  64924. begin
  64925. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  64926. end;
  64927. function TCAN1_C1RXF30.getEID : TBits_18; inline;
  64928. begin
  64929. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  64930. end;
  64931. procedure TCAN1_C1RXF30.setEXID; inline;
  64932. begin
  64933. pTDefRegMap(@Self)^.&set := $00080000;
  64934. end;
  64935. procedure TCAN1_C1RXF30.clearEXID; inline;
  64936. begin
  64937. pTDefRegMap(@Self)^.clr := $00080000;
  64938. end;
  64939. procedure TCAN1_C1RXF30.setEXID(thebits : TBits_1); inline;
  64940. begin
  64941. if thebits = 0 then
  64942. pTDefRegMap(@Self)^.clr := $00080000
  64943. else
  64944. pTDefRegMap(@Self)^.&set := $00080000;
  64945. end;
  64946. function TCAN1_C1RXF30.getEXID : TBits_1; inline;
  64947. begin
  64948. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  64949. end;
  64950. procedure TCAN1_C1RXF30.setSID(thebits : TBits_11); inline;
  64951. begin
  64952. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  64953. end;
  64954. function TCAN1_C1RXF30.getSID : TBits_11; inline;
  64955. begin
  64956. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  64957. end;
  64958. procedure TCAN1_C1RXF30.setw(thebits : TBits_32); inline;
  64959. begin
  64960. pTDefRegMap(@Self)^.val := thebits;
  64961. end;
  64962. function TCAN1_C1RXF30.getw : TBits_32; inline;
  64963. begin
  64964. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64965. end;
  64966. procedure TCAN1_C1RXF31.setEID(thebits : TBits_18); inline;
  64967. begin
  64968. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  64969. end;
  64970. function TCAN1_C1RXF31.getEID : TBits_18; inline;
  64971. begin
  64972. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  64973. end;
  64974. procedure TCAN1_C1RXF31.setEXID; inline;
  64975. begin
  64976. pTDefRegMap(@Self)^.&set := $00080000;
  64977. end;
  64978. procedure TCAN1_C1RXF31.clearEXID; inline;
  64979. begin
  64980. pTDefRegMap(@Self)^.clr := $00080000;
  64981. end;
  64982. procedure TCAN1_C1RXF31.setEXID(thebits : TBits_1); inline;
  64983. begin
  64984. if thebits = 0 then
  64985. pTDefRegMap(@Self)^.clr := $00080000
  64986. else
  64987. pTDefRegMap(@Self)^.&set := $00080000;
  64988. end;
  64989. function TCAN1_C1RXF31.getEXID : TBits_1; inline;
  64990. begin
  64991. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  64992. end;
  64993. procedure TCAN1_C1RXF31.setSID(thebits : TBits_11); inline;
  64994. begin
  64995. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  64996. end;
  64997. function TCAN1_C1RXF31.getSID : TBits_11; inline;
  64998. begin
  64999. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  65000. end;
  65001. procedure TCAN1_C1RXF31.setw(thebits : TBits_32); inline;
  65002. begin
  65003. pTDefRegMap(@Self)^.val := thebits;
  65004. end;
  65005. function TCAN1_C1RXF31.getw : TBits_32; inline;
  65006. begin
  65007. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  65008. end;
  65009. procedure TCAN1_C1FIFOCON0.setTXPRI(thebits : TBits_2); inline;
  65010. begin
  65011. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  65012. end;
  65013. function TCAN1_C1FIFOCON0.getTXPRI : TBits_2; inline;
  65014. begin
  65015. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  65016. end;
  65017. procedure TCAN1_C1FIFOCON0.setRTREN; inline;
  65018. begin
  65019. pTDefRegMap(@Self)^.&set := $00000004;
  65020. end;
  65021. procedure TCAN1_C1FIFOCON0.clearRTREN; inline;
  65022. begin
  65023. pTDefRegMap(@Self)^.clr := $00000004;
  65024. end;
  65025. procedure TCAN1_C1FIFOCON0.setRTREN(thebits : TBits_1); inline;
  65026. begin
  65027. if thebits = 0 then
  65028. pTDefRegMap(@Self)^.clr := $00000004
  65029. else
  65030. pTDefRegMap(@Self)^.&set := $00000004;
  65031. end;
  65032. function TCAN1_C1FIFOCON0.getRTREN : TBits_1; inline;
  65033. begin
  65034. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  65035. end;
  65036. procedure TCAN1_C1FIFOCON0.setTXREQ; inline;
  65037. begin
  65038. pTDefRegMap(@Self)^.&set := $00000008;
  65039. end;
  65040. procedure TCAN1_C1FIFOCON0.clearTXREQ; inline;
  65041. begin
  65042. pTDefRegMap(@Self)^.clr := $00000008;
  65043. end;
  65044. procedure TCAN1_C1FIFOCON0.setTXREQ(thebits : TBits_1); inline;
  65045. begin
  65046. if thebits = 0 then
  65047. pTDefRegMap(@Self)^.clr := $00000008
  65048. else
  65049. pTDefRegMap(@Self)^.&set := $00000008;
  65050. end;
  65051. function TCAN1_C1FIFOCON0.getTXREQ : TBits_1; inline;
  65052. begin
  65053. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  65054. end;
  65055. procedure TCAN1_C1FIFOCON0.setTXERR; inline;
  65056. begin
  65057. pTDefRegMap(@Self)^.&set := $00000010;
  65058. end;
  65059. procedure TCAN1_C1FIFOCON0.clearTXERR; inline;
  65060. begin
  65061. pTDefRegMap(@Self)^.clr := $00000010;
  65062. end;
  65063. procedure TCAN1_C1FIFOCON0.setTXERR(thebits : TBits_1); inline;
  65064. begin
  65065. if thebits = 0 then
  65066. pTDefRegMap(@Self)^.clr := $00000010
  65067. else
  65068. pTDefRegMap(@Self)^.&set := $00000010;
  65069. end;
  65070. function TCAN1_C1FIFOCON0.getTXERR : TBits_1; inline;
  65071. begin
  65072. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  65073. end;
  65074. procedure TCAN1_C1FIFOCON0.setTXLARB; inline;
  65075. begin
  65076. pTDefRegMap(@Self)^.&set := $00000020;
  65077. end;
  65078. procedure TCAN1_C1FIFOCON0.clearTXLARB; inline;
  65079. begin
  65080. pTDefRegMap(@Self)^.clr := $00000020;
  65081. end;
  65082. procedure TCAN1_C1FIFOCON0.setTXLARB(thebits : TBits_1); inline;
  65083. begin
  65084. if thebits = 0 then
  65085. pTDefRegMap(@Self)^.clr := $00000020
  65086. else
  65087. pTDefRegMap(@Self)^.&set := $00000020;
  65088. end;
  65089. function TCAN1_C1FIFOCON0.getTXLARB : TBits_1; inline;
  65090. begin
  65091. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  65092. end;
  65093. procedure TCAN1_C1FIFOCON0.setTXABAT; inline;
  65094. begin
  65095. pTDefRegMap(@Self)^.&set := $00000040;
  65096. end;
  65097. procedure TCAN1_C1FIFOCON0.clearTXABAT; inline;
  65098. begin
  65099. pTDefRegMap(@Self)^.clr := $00000040;
  65100. end;
  65101. procedure TCAN1_C1FIFOCON0.setTXABAT(thebits : TBits_1); inline;
  65102. begin
  65103. if thebits = 0 then
  65104. pTDefRegMap(@Self)^.clr := $00000040
  65105. else
  65106. pTDefRegMap(@Self)^.&set := $00000040;
  65107. end;
  65108. function TCAN1_C1FIFOCON0.getTXABAT : TBits_1; inline;
  65109. begin
  65110. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  65111. end;
  65112. procedure TCAN1_C1FIFOCON0.setTXEN; inline;
  65113. begin
  65114. pTDefRegMap(@Self)^.&set := $00000080;
  65115. end;
  65116. procedure TCAN1_C1FIFOCON0.clearTXEN; inline;
  65117. begin
  65118. pTDefRegMap(@Self)^.clr := $00000080;
  65119. end;
  65120. procedure TCAN1_C1FIFOCON0.setTXEN(thebits : TBits_1); inline;
  65121. begin
  65122. if thebits = 0 then
  65123. pTDefRegMap(@Self)^.clr := $00000080
  65124. else
  65125. pTDefRegMap(@Self)^.&set := $00000080;
  65126. end;
  65127. function TCAN1_C1FIFOCON0.getTXEN : TBits_1; inline;
  65128. begin
  65129. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  65130. end;
  65131. procedure TCAN1_C1FIFOCON0.setDONLY; inline;
  65132. begin
  65133. pTDefRegMap(@Self)^.&set := $00001000;
  65134. end;
  65135. procedure TCAN1_C1FIFOCON0.clearDONLY; inline;
  65136. begin
  65137. pTDefRegMap(@Self)^.clr := $00001000;
  65138. end;
  65139. procedure TCAN1_C1FIFOCON0.setDONLY(thebits : TBits_1); inline;
  65140. begin
  65141. if thebits = 0 then
  65142. pTDefRegMap(@Self)^.clr := $00001000
  65143. else
  65144. pTDefRegMap(@Self)^.&set := $00001000;
  65145. end;
  65146. function TCAN1_C1FIFOCON0.getDONLY : TBits_1; inline;
  65147. begin
  65148. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  65149. end;
  65150. procedure TCAN1_C1FIFOCON0.setUINC; inline;
  65151. begin
  65152. pTDefRegMap(@Self)^.&set := $00002000;
  65153. end;
  65154. procedure TCAN1_C1FIFOCON0.clearUINC; inline;
  65155. begin
  65156. pTDefRegMap(@Self)^.clr := $00002000;
  65157. end;
  65158. procedure TCAN1_C1FIFOCON0.setUINC(thebits : TBits_1); inline;
  65159. begin
  65160. if thebits = 0 then
  65161. pTDefRegMap(@Self)^.clr := $00002000
  65162. else
  65163. pTDefRegMap(@Self)^.&set := $00002000;
  65164. end;
  65165. function TCAN1_C1FIFOCON0.getUINC : TBits_1; inline;
  65166. begin
  65167. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  65168. end;
  65169. procedure TCAN1_C1FIFOCON0.setFRESET; inline;
  65170. begin
  65171. pTDefRegMap(@Self)^.&set := $00004000;
  65172. end;
  65173. procedure TCAN1_C1FIFOCON0.clearFRESET; inline;
  65174. begin
  65175. pTDefRegMap(@Self)^.clr := $00004000;
  65176. end;
  65177. procedure TCAN1_C1FIFOCON0.setFRESET(thebits : TBits_1); inline;
  65178. begin
  65179. if thebits = 0 then
  65180. pTDefRegMap(@Self)^.clr := $00004000
  65181. else
  65182. pTDefRegMap(@Self)^.&set := $00004000;
  65183. end;
  65184. function TCAN1_C1FIFOCON0.getFRESET : TBits_1; inline;
  65185. begin
  65186. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  65187. end;
  65188. procedure TCAN1_C1FIFOCON0.setFSIZE(thebits : TBits_5); inline;
  65189. begin
  65190. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  65191. end;
  65192. function TCAN1_C1FIFOCON0.getFSIZE : TBits_5; inline;
  65193. begin
  65194. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  65195. end;
  65196. procedure TCAN1_C1FIFOCON0.setw(thebits : TBits_32); inline;
  65197. begin
  65198. pTDefRegMap(@Self)^.val := thebits;
  65199. end;
  65200. function TCAN1_C1FIFOCON0.getw : TBits_32; inline;
  65201. begin
  65202. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  65203. end;
  65204. procedure TCAN1_C1FIFOINT0.setRXNEMPTYIF; inline;
  65205. begin
  65206. pTDefRegMap(@Self)^.&set := $00000001;
  65207. end;
  65208. procedure TCAN1_C1FIFOINT0.clearRXNEMPTYIF; inline;
  65209. begin
  65210. pTDefRegMap(@Self)^.clr := $00000001;
  65211. end;
  65212. procedure TCAN1_C1FIFOINT0.setRXNEMPTYIF(thebits : TBits_1); inline;
  65213. begin
  65214. if thebits = 0 then
  65215. pTDefRegMap(@Self)^.clr := $00000001
  65216. else
  65217. pTDefRegMap(@Self)^.&set := $00000001;
  65218. end;
  65219. function TCAN1_C1FIFOINT0.getRXNEMPTYIF : TBits_1; inline;
  65220. begin
  65221. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  65222. end;
  65223. procedure TCAN1_C1FIFOINT0.setRXHALFIF; inline;
  65224. begin
  65225. pTDefRegMap(@Self)^.&set := $00000002;
  65226. end;
  65227. procedure TCAN1_C1FIFOINT0.clearRXHALFIF; inline;
  65228. begin
  65229. pTDefRegMap(@Self)^.clr := $00000002;
  65230. end;
  65231. procedure TCAN1_C1FIFOINT0.setRXHALFIF(thebits : TBits_1); inline;
  65232. begin
  65233. if thebits = 0 then
  65234. pTDefRegMap(@Self)^.clr := $00000002
  65235. else
  65236. pTDefRegMap(@Self)^.&set := $00000002;
  65237. end;
  65238. function TCAN1_C1FIFOINT0.getRXHALFIF : TBits_1; inline;
  65239. begin
  65240. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  65241. end;
  65242. procedure TCAN1_C1FIFOINT0.setRXFULLIF; inline;
  65243. begin
  65244. pTDefRegMap(@Self)^.&set := $00000004;
  65245. end;
  65246. procedure TCAN1_C1FIFOINT0.clearRXFULLIF; inline;
  65247. begin
  65248. pTDefRegMap(@Self)^.clr := $00000004;
  65249. end;
  65250. procedure TCAN1_C1FIFOINT0.setRXFULLIF(thebits : TBits_1); inline;
  65251. begin
  65252. if thebits = 0 then
  65253. pTDefRegMap(@Self)^.clr := $00000004
  65254. else
  65255. pTDefRegMap(@Self)^.&set := $00000004;
  65256. end;
  65257. function TCAN1_C1FIFOINT0.getRXFULLIF : TBits_1; inline;
  65258. begin
  65259. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  65260. end;
  65261. procedure TCAN1_C1FIFOINT0.setRXOVFLIF; inline;
  65262. begin
  65263. pTDefRegMap(@Self)^.&set := $00000008;
  65264. end;
  65265. procedure TCAN1_C1FIFOINT0.clearRXOVFLIF; inline;
  65266. begin
  65267. pTDefRegMap(@Self)^.clr := $00000008;
  65268. end;
  65269. procedure TCAN1_C1FIFOINT0.setRXOVFLIF(thebits : TBits_1); inline;
  65270. begin
  65271. if thebits = 0 then
  65272. pTDefRegMap(@Self)^.clr := $00000008
  65273. else
  65274. pTDefRegMap(@Self)^.&set := $00000008;
  65275. end;
  65276. function TCAN1_C1FIFOINT0.getRXOVFLIF : TBits_1; inline;
  65277. begin
  65278. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  65279. end;
  65280. procedure TCAN1_C1FIFOINT0.setTXEMPTYIF; inline;
  65281. begin
  65282. pTDefRegMap(@Self)^.&set := $00000100;
  65283. end;
  65284. procedure TCAN1_C1FIFOINT0.clearTXEMPTYIF; inline;
  65285. begin
  65286. pTDefRegMap(@Self)^.clr := $00000100;
  65287. end;
  65288. procedure TCAN1_C1FIFOINT0.setTXEMPTYIF(thebits : TBits_1); inline;
  65289. begin
  65290. if thebits = 0 then
  65291. pTDefRegMap(@Self)^.clr := $00000100
  65292. else
  65293. pTDefRegMap(@Self)^.&set := $00000100;
  65294. end;
  65295. function TCAN1_C1FIFOINT0.getTXEMPTYIF : TBits_1; inline;
  65296. begin
  65297. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  65298. end;
  65299. procedure TCAN1_C1FIFOINT0.setTXHALFIF; inline;
  65300. begin
  65301. pTDefRegMap(@Self)^.&set := $00000200;
  65302. end;
  65303. procedure TCAN1_C1FIFOINT0.clearTXHALFIF; inline;
  65304. begin
  65305. pTDefRegMap(@Self)^.clr := $00000200;
  65306. end;
  65307. procedure TCAN1_C1FIFOINT0.setTXHALFIF(thebits : TBits_1); inline;
  65308. begin
  65309. if thebits = 0 then
  65310. pTDefRegMap(@Self)^.clr := $00000200
  65311. else
  65312. pTDefRegMap(@Self)^.&set := $00000200;
  65313. end;
  65314. function TCAN1_C1FIFOINT0.getTXHALFIF : TBits_1; inline;
  65315. begin
  65316. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  65317. end;
  65318. procedure TCAN1_C1FIFOINT0.setTXNFULLIF; inline;
  65319. begin
  65320. pTDefRegMap(@Self)^.&set := $00000400;
  65321. end;
  65322. procedure TCAN1_C1FIFOINT0.clearTXNFULLIF; inline;
  65323. begin
  65324. pTDefRegMap(@Self)^.clr := $00000400;
  65325. end;
  65326. procedure TCAN1_C1FIFOINT0.setTXNFULLIF(thebits : TBits_1); inline;
  65327. begin
  65328. if thebits = 0 then
  65329. pTDefRegMap(@Self)^.clr := $00000400
  65330. else
  65331. pTDefRegMap(@Self)^.&set := $00000400;
  65332. end;
  65333. function TCAN1_C1FIFOINT0.getTXNFULLIF : TBits_1; inline;
  65334. begin
  65335. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  65336. end;
  65337. procedure TCAN1_C1FIFOINT0.setRXNEMPTYIE; inline;
  65338. begin
  65339. pTDefRegMap(@Self)^.&set := $00010000;
  65340. end;
  65341. procedure TCAN1_C1FIFOINT0.clearRXNEMPTYIE; inline;
  65342. begin
  65343. pTDefRegMap(@Self)^.clr := $00010000;
  65344. end;
  65345. procedure TCAN1_C1FIFOINT0.setRXNEMPTYIE(thebits : TBits_1); inline;
  65346. begin
  65347. if thebits = 0 then
  65348. pTDefRegMap(@Self)^.clr := $00010000
  65349. else
  65350. pTDefRegMap(@Self)^.&set := $00010000;
  65351. end;
  65352. function TCAN1_C1FIFOINT0.getRXNEMPTYIE : TBits_1; inline;
  65353. begin
  65354. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  65355. end;
  65356. procedure TCAN1_C1FIFOINT0.setRXHALFIE; inline;
  65357. begin
  65358. pTDefRegMap(@Self)^.&set := $00020000;
  65359. end;
  65360. procedure TCAN1_C1FIFOINT0.clearRXHALFIE; inline;
  65361. begin
  65362. pTDefRegMap(@Self)^.clr := $00020000;
  65363. end;
  65364. procedure TCAN1_C1FIFOINT0.setRXHALFIE(thebits : TBits_1); inline;
  65365. begin
  65366. if thebits = 0 then
  65367. pTDefRegMap(@Self)^.clr := $00020000
  65368. else
  65369. pTDefRegMap(@Self)^.&set := $00020000;
  65370. end;
  65371. function TCAN1_C1FIFOINT0.getRXHALFIE : TBits_1; inline;
  65372. begin
  65373. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  65374. end;
  65375. procedure TCAN1_C1FIFOINT0.setRXFULLIE; inline;
  65376. begin
  65377. pTDefRegMap(@Self)^.&set := $00040000;
  65378. end;
  65379. procedure TCAN1_C1FIFOINT0.clearRXFULLIE; inline;
  65380. begin
  65381. pTDefRegMap(@Self)^.clr := $00040000;
  65382. end;
  65383. procedure TCAN1_C1FIFOINT0.setRXFULLIE(thebits : TBits_1); inline;
  65384. begin
  65385. if thebits = 0 then
  65386. pTDefRegMap(@Self)^.clr := $00040000
  65387. else
  65388. pTDefRegMap(@Self)^.&set := $00040000;
  65389. end;
  65390. function TCAN1_C1FIFOINT0.getRXFULLIE : TBits_1; inline;
  65391. begin
  65392. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  65393. end;
  65394. procedure TCAN1_C1FIFOINT0.setRXOVFLIE; inline;
  65395. begin
  65396. pTDefRegMap(@Self)^.&set := $00080000;
  65397. end;
  65398. procedure TCAN1_C1FIFOINT0.clearRXOVFLIE; inline;
  65399. begin
  65400. pTDefRegMap(@Self)^.clr := $00080000;
  65401. end;
  65402. procedure TCAN1_C1FIFOINT0.setRXOVFLIE(thebits : TBits_1); inline;
  65403. begin
  65404. if thebits = 0 then
  65405. pTDefRegMap(@Self)^.clr := $00080000
  65406. else
  65407. pTDefRegMap(@Self)^.&set := $00080000;
  65408. end;
  65409. function TCAN1_C1FIFOINT0.getRXOVFLIE : TBits_1; inline;
  65410. begin
  65411. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  65412. end;
  65413. procedure TCAN1_C1FIFOINT0.setTXEMPTYIE; inline;
  65414. begin
  65415. pTDefRegMap(@Self)^.&set := $01000000;
  65416. end;
  65417. procedure TCAN1_C1FIFOINT0.clearTXEMPTYIE; inline;
  65418. begin
  65419. pTDefRegMap(@Self)^.clr := $01000000;
  65420. end;
  65421. procedure TCAN1_C1FIFOINT0.setTXEMPTYIE(thebits : TBits_1); inline;
  65422. begin
  65423. if thebits = 0 then
  65424. pTDefRegMap(@Self)^.clr := $01000000
  65425. else
  65426. pTDefRegMap(@Self)^.&set := $01000000;
  65427. end;
  65428. function TCAN1_C1FIFOINT0.getTXEMPTYIE : TBits_1; inline;
  65429. begin
  65430. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  65431. end;
  65432. procedure TCAN1_C1FIFOINT0.setTXHALFIE; inline;
  65433. begin
  65434. pTDefRegMap(@Self)^.&set := $02000000;
  65435. end;
  65436. procedure TCAN1_C1FIFOINT0.clearTXHALFIE; inline;
  65437. begin
  65438. pTDefRegMap(@Self)^.clr := $02000000;
  65439. end;
  65440. procedure TCAN1_C1FIFOINT0.setTXHALFIE(thebits : TBits_1); inline;
  65441. begin
  65442. if thebits = 0 then
  65443. pTDefRegMap(@Self)^.clr := $02000000
  65444. else
  65445. pTDefRegMap(@Self)^.&set := $02000000;
  65446. end;
  65447. function TCAN1_C1FIFOINT0.getTXHALFIE : TBits_1; inline;
  65448. begin
  65449. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  65450. end;
  65451. procedure TCAN1_C1FIFOINT0.setTXNFULLIE; inline;
  65452. begin
  65453. pTDefRegMap(@Self)^.&set := $04000000;
  65454. end;
  65455. procedure TCAN1_C1FIFOINT0.clearTXNFULLIE; inline;
  65456. begin
  65457. pTDefRegMap(@Self)^.clr := $04000000;
  65458. end;
  65459. procedure TCAN1_C1FIFOINT0.setTXNFULLIE(thebits : TBits_1); inline;
  65460. begin
  65461. if thebits = 0 then
  65462. pTDefRegMap(@Self)^.clr := $04000000
  65463. else
  65464. pTDefRegMap(@Self)^.&set := $04000000;
  65465. end;
  65466. function TCAN1_C1FIFOINT0.getTXNFULLIE : TBits_1; inline;
  65467. begin
  65468. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  65469. end;
  65470. procedure TCAN1_C1FIFOINT0.setw(thebits : TBits_32); inline;
  65471. begin
  65472. pTDefRegMap(@Self)^.val := thebits;
  65473. end;
  65474. function TCAN1_C1FIFOINT0.getw : TBits_32; inline;
  65475. begin
  65476. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  65477. end;
  65478. procedure TCAN1_C1FIFOCI0.setCFIFOCI(thebits : TBits_5); inline;
  65479. begin
  65480. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  65481. end;
  65482. function TCAN1_C1FIFOCI0.getCFIFOCI : TBits_5; inline;
  65483. begin
  65484. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  65485. end;
  65486. procedure TCAN1_C1FIFOCI0.setw(thebits : TBits_32); inline;
  65487. begin
  65488. pTDefRegMap(@Self)^.val := thebits;
  65489. end;
  65490. function TCAN1_C1FIFOCI0.getw : TBits_32; inline;
  65491. begin
  65492. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  65493. end;
  65494. procedure TCAN1_C1FIFOCON1.setTXPRI(thebits : TBits_2); inline;
  65495. begin
  65496. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  65497. end;
  65498. function TCAN1_C1FIFOCON1.getTXPRI : TBits_2; inline;
  65499. begin
  65500. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  65501. end;
  65502. procedure TCAN1_C1FIFOCON1.setRTREN; inline;
  65503. begin
  65504. pTDefRegMap(@Self)^.&set := $00000004;
  65505. end;
  65506. procedure TCAN1_C1FIFOCON1.clearRTREN; inline;
  65507. begin
  65508. pTDefRegMap(@Self)^.clr := $00000004;
  65509. end;
  65510. procedure TCAN1_C1FIFOCON1.setRTREN(thebits : TBits_1); inline;
  65511. begin
  65512. if thebits = 0 then
  65513. pTDefRegMap(@Self)^.clr := $00000004
  65514. else
  65515. pTDefRegMap(@Self)^.&set := $00000004;
  65516. end;
  65517. function TCAN1_C1FIFOCON1.getRTREN : TBits_1; inline;
  65518. begin
  65519. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  65520. end;
  65521. procedure TCAN1_C1FIFOCON1.setTXREQ; inline;
  65522. begin
  65523. pTDefRegMap(@Self)^.&set := $00000008;
  65524. end;
  65525. procedure TCAN1_C1FIFOCON1.clearTXREQ; inline;
  65526. begin
  65527. pTDefRegMap(@Self)^.clr := $00000008;
  65528. end;
  65529. procedure TCAN1_C1FIFOCON1.setTXREQ(thebits : TBits_1); inline;
  65530. begin
  65531. if thebits = 0 then
  65532. pTDefRegMap(@Self)^.clr := $00000008
  65533. else
  65534. pTDefRegMap(@Self)^.&set := $00000008;
  65535. end;
  65536. function TCAN1_C1FIFOCON1.getTXREQ : TBits_1; inline;
  65537. begin
  65538. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  65539. end;
  65540. procedure TCAN1_C1FIFOCON1.setTXERR; inline;
  65541. begin
  65542. pTDefRegMap(@Self)^.&set := $00000010;
  65543. end;
  65544. procedure TCAN1_C1FIFOCON1.clearTXERR; inline;
  65545. begin
  65546. pTDefRegMap(@Self)^.clr := $00000010;
  65547. end;
  65548. procedure TCAN1_C1FIFOCON1.setTXERR(thebits : TBits_1); inline;
  65549. begin
  65550. if thebits = 0 then
  65551. pTDefRegMap(@Self)^.clr := $00000010
  65552. else
  65553. pTDefRegMap(@Self)^.&set := $00000010;
  65554. end;
  65555. function TCAN1_C1FIFOCON1.getTXERR : TBits_1; inline;
  65556. begin
  65557. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  65558. end;
  65559. procedure TCAN1_C1FIFOCON1.setTXLARB; inline;
  65560. begin
  65561. pTDefRegMap(@Self)^.&set := $00000020;
  65562. end;
  65563. procedure TCAN1_C1FIFOCON1.clearTXLARB; inline;
  65564. begin
  65565. pTDefRegMap(@Self)^.clr := $00000020;
  65566. end;
  65567. procedure TCAN1_C1FIFOCON1.setTXLARB(thebits : TBits_1); inline;
  65568. begin
  65569. if thebits = 0 then
  65570. pTDefRegMap(@Self)^.clr := $00000020
  65571. else
  65572. pTDefRegMap(@Self)^.&set := $00000020;
  65573. end;
  65574. function TCAN1_C1FIFOCON1.getTXLARB : TBits_1; inline;
  65575. begin
  65576. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  65577. end;
  65578. procedure TCAN1_C1FIFOCON1.setTXABAT; inline;
  65579. begin
  65580. pTDefRegMap(@Self)^.&set := $00000040;
  65581. end;
  65582. procedure TCAN1_C1FIFOCON1.clearTXABAT; inline;
  65583. begin
  65584. pTDefRegMap(@Self)^.clr := $00000040;
  65585. end;
  65586. procedure TCAN1_C1FIFOCON1.setTXABAT(thebits : TBits_1); inline;
  65587. begin
  65588. if thebits = 0 then
  65589. pTDefRegMap(@Self)^.clr := $00000040
  65590. else
  65591. pTDefRegMap(@Self)^.&set := $00000040;
  65592. end;
  65593. function TCAN1_C1FIFOCON1.getTXABAT : TBits_1; inline;
  65594. begin
  65595. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  65596. end;
  65597. procedure TCAN1_C1FIFOCON1.setTXEN; inline;
  65598. begin
  65599. pTDefRegMap(@Self)^.&set := $00000080;
  65600. end;
  65601. procedure TCAN1_C1FIFOCON1.clearTXEN; inline;
  65602. begin
  65603. pTDefRegMap(@Self)^.clr := $00000080;
  65604. end;
  65605. procedure TCAN1_C1FIFOCON1.setTXEN(thebits : TBits_1); inline;
  65606. begin
  65607. if thebits = 0 then
  65608. pTDefRegMap(@Self)^.clr := $00000080
  65609. else
  65610. pTDefRegMap(@Self)^.&set := $00000080;
  65611. end;
  65612. function TCAN1_C1FIFOCON1.getTXEN : TBits_1; inline;
  65613. begin
  65614. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  65615. end;
  65616. procedure TCAN1_C1FIFOCON1.setDONLY; inline;
  65617. begin
  65618. pTDefRegMap(@Self)^.&set := $00001000;
  65619. end;
  65620. procedure TCAN1_C1FIFOCON1.clearDONLY; inline;
  65621. begin
  65622. pTDefRegMap(@Self)^.clr := $00001000;
  65623. end;
  65624. procedure TCAN1_C1FIFOCON1.setDONLY(thebits : TBits_1); inline;
  65625. begin
  65626. if thebits = 0 then
  65627. pTDefRegMap(@Self)^.clr := $00001000
  65628. else
  65629. pTDefRegMap(@Self)^.&set := $00001000;
  65630. end;
  65631. function TCAN1_C1FIFOCON1.getDONLY : TBits_1; inline;
  65632. begin
  65633. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  65634. end;
  65635. procedure TCAN1_C1FIFOCON1.setUINC; inline;
  65636. begin
  65637. pTDefRegMap(@Self)^.&set := $00002000;
  65638. end;
  65639. procedure TCAN1_C1FIFOCON1.clearUINC; inline;
  65640. begin
  65641. pTDefRegMap(@Self)^.clr := $00002000;
  65642. end;
  65643. procedure TCAN1_C1FIFOCON1.setUINC(thebits : TBits_1); inline;
  65644. begin
  65645. if thebits = 0 then
  65646. pTDefRegMap(@Self)^.clr := $00002000
  65647. else
  65648. pTDefRegMap(@Self)^.&set := $00002000;
  65649. end;
  65650. function TCAN1_C1FIFOCON1.getUINC : TBits_1; inline;
  65651. begin
  65652. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  65653. end;
  65654. procedure TCAN1_C1FIFOCON1.setFRESET; inline;
  65655. begin
  65656. pTDefRegMap(@Self)^.&set := $00004000;
  65657. end;
  65658. procedure TCAN1_C1FIFOCON1.clearFRESET; inline;
  65659. begin
  65660. pTDefRegMap(@Self)^.clr := $00004000;
  65661. end;
  65662. procedure TCAN1_C1FIFOCON1.setFRESET(thebits : TBits_1); inline;
  65663. begin
  65664. if thebits = 0 then
  65665. pTDefRegMap(@Self)^.clr := $00004000
  65666. else
  65667. pTDefRegMap(@Self)^.&set := $00004000;
  65668. end;
  65669. function TCAN1_C1FIFOCON1.getFRESET : TBits_1; inline;
  65670. begin
  65671. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  65672. end;
  65673. procedure TCAN1_C1FIFOCON1.setFSIZE(thebits : TBits_5); inline;
  65674. begin
  65675. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  65676. end;
  65677. function TCAN1_C1FIFOCON1.getFSIZE : TBits_5; inline;
  65678. begin
  65679. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  65680. end;
  65681. procedure TCAN1_C1FIFOCON1.setw(thebits : TBits_32); inline;
  65682. begin
  65683. pTDefRegMap(@Self)^.val := thebits;
  65684. end;
  65685. function TCAN1_C1FIFOCON1.getw : TBits_32; inline;
  65686. begin
  65687. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  65688. end;
  65689. procedure TCAN1_C1FIFOINT1.setRXNEMPTYIF; inline;
  65690. begin
  65691. pTDefRegMap(@Self)^.&set := $00000001;
  65692. end;
  65693. procedure TCAN1_C1FIFOINT1.clearRXNEMPTYIF; inline;
  65694. begin
  65695. pTDefRegMap(@Self)^.clr := $00000001;
  65696. end;
  65697. procedure TCAN1_C1FIFOINT1.setRXNEMPTYIF(thebits : TBits_1); inline;
  65698. begin
  65699. if thebits = 0 then
  65700. pTDefRegMap(@Self)^.clr := $00000001
  65701. else
  65702. pTDefRegMap(@Self)^.&set := $00000001;
  65703. end;
  65704. function TCAN1_C1FIFOINT1.getRXNEMPTYIF : TBits_1; inline;
  65705. begin
  65706. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  65707. end;
  65708. procedure TCAN1_C1FIFOINT1.setRXHALFIF; inline;
  65709. begin
  65710. pTDefRegMap(@Self)^.&set := $00000002;
  65711. end;
  65712. procedure TCAN1_C1FIFOINT1.clearRXHALFIF; inline;
  65713. begin
  65714. pTDefRegMap(@Self)^.clr := $00000002;
  65715. end;
  65716. procedure TCAN1_C1FIFOINT1.setRXHALFIF(thebits : TBits_1); inline;
  65717. begin
  65718. if thebits = 0 then
  65719. pTDefRegMap(@Self)^.clr := $00000002
  65720. else
  65721. pTDefRegMap(@Self)^.&set := $00000002;
  65722. end;
  65723. function TCAN1_C1FIFOINT1.getRXHALFIF : TBits_1; inline;
  65724. begin
  65725. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  65726. end;
  65727. procedure TCAN1_C1FIFOINT1.setRXFULLIF; inline;
  65728. begin
  65729. pTDefRegMap(@Self)^.&set := $00000004;
  65730. end;
  65731. procedure TCAN1_C1FIFOINT1.clearRXFULLIF; inline;
  65732. begin
  65733. pTDefRegMap(@Self)^.clr := $00000004;
  65734. end;
  65735. procedure TCAN1_C1FIFOINT1.setRXFULLIF(thebits : TBits_1); inline;
  65736. begin
  65737. if thebits = 0 then
  65738. pTDefRegMap(@Self)^.clr := $00000004
  65739. else
  65740. pTDefRegMap(@Self)^.&set := $00000004;
  65741. end;
  65742. function TCAN1_C1FIFOINT1.getRXFULLIF : TBits_1; inline;
  65743. begin
  65744. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  65745. end;
  65746. procedure TCAN1_C1FIFOINT1.setRXOVFLIF; inline;
  65747. begin
  65748. pTDefRegMap(@Self)^.&set := $00000008;
  65749. end;
  65750. procedure TCAN1_C1FIFOINT1.clearRXOVFLIF; inline;
  65751. begin
  65752. pTDefRegMap(@Self)^.clr := $00000008;
  65753. end;
  65754. procedure TCAN1_C1FIFOINT1.setRXOVFLIF(thebits : TBits_1); inline;
  65755. begin
  65756. if thebits = 0 then
  65757. pTDefRegMap(@Self)^.clr := $00000008
  65758. else
  65759. pTDefRegMap(@Self)^.&set := $00000008;
  65760. end;
  65761. function TCAN1_C1FIFOINT1.getRXOVFLIF : TBits_1; inline;
  65762. begin
  65763. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  65764. end;
  65765. procedure TCAN1_C1FIFOINT1.setTXEMPTYIF; inline;
  65766. begin
  65767. pTDefRegMap(@Self)^.&set := $00000100;
  65768. end;
  65769. procedure TCAN1_C1FIFOINT1.clearTXEMPTYIF; inline;
  65770. begin
  65771. pTDefRegMap(@Self)^.clr := $00000100;
  65772. end;
  65773. procedure TCAN1_C1FIFOINT1.setTXEMPTYIF(thebits : TBits_1); inline;
  65774. begin
  65775. if thebits = 0 then
  65776. pTDefRegMap(@Self)^.clr := $00000100
  65777. else
  65778. pTDefRegMap(@Self)^.&set := $00000100;
  65779. end;
  65780. function TCAN1_C1FIFOINT1.getTXEMPTYIF : TBits_1; inline;
  65781. begin
  65782. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  65783. end;
  65784. procedure TCAN1_C1FIFOINT1.setTXHALFIF; inline;
  65785. begin
  65786. pTDefRegMap(@Self)^.&set := $00000200;
  65787. end;
  65788. procedure TCAN1_C1FIFOINT1.clearTXHALFIF; inline;
  65789. begin
  65790. pTDefRegMap(@Self)^.clr := $00000200;
  65791. end;
  65792. procedure TCAN1_C1FIFOINT1.setTXHALFIF(thebits : TBits_1); inline;
  65793. begin
  65794. if thebits = 0 then
  65795. pTDefRegMap(@Self)^.clr := $00000200
  65796. else
  65797. pTDefRegMap(@Self)^.&set := $00000200;
  65798. end;
  65799. function TCAN1_C1FIFOINT1.getTXHALFIF : TBits_1; inline;
  65800. begin
  65801. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  65802. end;
  65803. procedure TCAN1_C1FIFOINT1.setTXNFULLIF; inline;
  65804. begin
  65805. pTDefRegMap(@Self)^.&set := $00000400;
  65806. end;
  65807. procedure TCAN1_C1FIFOINT1.clearTXNFULLIF; inline;
  65808. begin
  65809. pTDefRegMap(@Self)^.clr := $00000400;
  65810. end;
  65811. procedure TCAN1_C1FIFOINT1.setTXNFULLIF(thebits : TBits_1); inline;
  65812. begin
  65813. if thebits = 0 then
  65814. pTDefRegMap(@Self)^.clr := $00000400
  65815. else
  65816. pTDefRegMap(@Self)^.&set := $00000400;
  65817. end;
  65818. function TCAN1_C1FIFOINT1.getTXNFULLIF : TBits_1; inline;
  65819. begin
  65820. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  65821. end;
  65822. procedure TCAN1_C1FIFOINT1.setRXNEMPTYIE; inline;
  65823. begin
  65824. pTDefRegMap(@Self)^.&set := $00010000;
  65825. end;
  65826. procedure TCAN1_C1FIFOINT1.clearRXNEMPTYIE; inline;
  65827. begin
  65828. pTDefRegMap(@Self)^.clr := $00010000;
  65829. end;
  65830. procedure TCAN1_C1FIFOINT1.setRXNEMPTYIE(thebits : TBits_1); inline;
  65831. begin
  65832. if thebits = 0 then
  65833. pTDefRegMap(@Self)^.clr := $00010000
  65834. else
  65835. pTDefRegMap(@Self)^.&set := $00010000;
  65836. end;
  65837. function TCAN1_C1FIFOINT1.getRXNEMPTYIE : TBits_1; inline;
  65838. begin
  65839. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  65840. end;
  65841. procedure TCAN1_C1FIFOINT1.setRXHALFIE; inline;
  65842. begin
  65843. pTDefRegMap(@Self)^.&set := $00020000;
  65844. end;
  65845. procedure TCAN1_C1FIFOINT1.clearRXHALFIE; inline;
  65846. begin
  65847. pTDefRegMap(@Self)^.clr := $00020000;
  65848. end;
  65849. procedure TCAN1_C1FIFOINT1.setRXHALFIE(thebits : TBits_1); inline;
  65850. begin
  65851. if thebits = 0 then
  65852. pTDefRegMap(@Self)^.clr := $00020000
  65853. else
  65854. pTDefRegMap(@Self)^.&set := $00020000;
  65855. end;
  65856. function TCAN1_C1FIFOINT1.getRXHALFIE : TBits_1; inline;
  65857. begin
  65858. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  65859. end;
  65860. procedure TCAN1_C1FIFOINT1.setRXFULLIE; inline;
  65861. begin
  65862. pTDefRegMap(@Self)^.&set := $00040000;
  65863. end;
  65864. procedure TCAN1_C1FIFOINT1.clearRXFULLIE; inline;
  65865. begin
  65866. pTDefRegMap(@Self)^.clr := $00040000;
  65867. end;
  65868. procedure TCAN1_C1FIFOINT1.setRXFULLIE(thebits : TBits_1); inline;
  65869. begin
  65870. if thebits = 0 then
  65871. pTDefRegMap(@Self)^.clr := $00040000
  65872. else
  65873. pTDefRegMap(@Self)^.&set := $00040000;
  65874. end;
  65875. function TCAN1_C1FIFOINT1.getRXFULLIE : TBits_1; inline;
  65876. begin
  65877. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  65878. end;
  65879. procedure TCAN1_C1FIFOINT1.setRXOVFLIE; inline;
  65880. begin
  65881. pTDefRegMap(@Self)^.&set := $00080000;
  65882. end;
  65883. procedure TCAN1_C1FIFOINT1.clearRXOVFLIE; inline;
  65884. begin
  65885. pTDefRegMap(@Self)^.clr := $00080000;
  65886. end;
  65887. procedure TCAN1_C1FIFOINT1.setRXOVFLIE(thebits : TBits_1); inline;
  65888. begin
  65889. if thebits = 0 then
  65890. pTDefRegMap(@Self)^.clr := $00080000
  65891. else
  65892. pTDefRegMap(@Self)^.&set := $00080000;
  65893. end;
  65894. function TCAN1_C1FIFOINT1.getRXOVFLIE : TBits_1; inline;
  65895. begin
  65896. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  65897. end;
  65898. procedure TCAN1_C1FIFOINT1.setTXEMPTYIE; inline;
  65899. begin
  65900. pTDefRegMap(@Self)^.&set := $01000000;
  65901. end;
  65902. procedure TCAN1_C1FIFOINT1.clearTXEMPTYIE; inline;
  65903. begin
  65904. pTDefRegMap(@Self)^.clr := $01000000;
  65905. end;
  65906. procedure TCAN1_C1FIFOINT1.setTXEMPTYIE(thebits : TBits_1); inline;
  65907. begin
  65908. if thebits = 0 then
  65909. pTDefRegMap(@Self)^.clr := $01000000
  65910. else
  65911. pTDefRegMap(@Self)^.&set := $01000000;
  65912. end;
  65913. function TCAN1_C1FIFOINT1.getTXEMPTYIE : TBits_1; inline;
  65914. begin
  65915. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  65916. end;
  65917. procedure TCAN1_C1FIFOINT1.setTXHALFIE; inline;
  65918. begin
  65919. pTDefRegMap(@Self)^.&set := $02000000;
  65920. end;
  65921. procedure TCAN1_C1FIFOINT1.clearTXHALFIE; inline;
  65922. begin
  65923. pTDefRegMap(@Self)^.clr := $02000000;
  65924. end;
  65925. procedure TCAN1_C1FIFOINT1.setTXHALFIE(thebits : TBits_1); inline;
  65926. begin
  65927. if thebits = 0 then
  65928. pTDefRegMap(@Self)^.clr := $02000000
  65929. else
  65930. pTDefRegMap(@Self)^.&set := $02000000;
  65931. end;
  65932. function TCAN1_C1FIFOINT1.getTXHALFIE : TBits_1; inline;
  65933. begin
  65934. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  65935. end;
  65936. procedure TCAN1_C1FIFOINT1.setTXNFULLIE; inline;
  65937. begin
  65938. pTDefRegMap(@Self)^.&set := $04000000;
  65939. end;
  65940. procedure TCAN1_C1FIFOINT1.clearTXNFULLIE; inline;
  65941. begin
  65942. pTDefRegMap(@Self)^.clr := $04000000;
  65943. end;
  65944. procedure TCAN1_C1FIFOINT1.setTXNFULLIE(thebits : TBits_1); inline;
  65945. begin
  65946. if thebits = 0 then
  65947. pTDefRegMap(@Self)^.clr := $04000000
  65948. else
  65949. pTDefRegMap(@Self)^.&set := $04000000;
  65950. end;
  65951. function TCAN1_C1FIFOINT1.getTXNFULLIE : TBits_1; inline;
  65952. begin
  65953. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  65954. end;
  65955. procedure TCAN1_C1FIFOINT1.setw(thebits : TBits_32); inline;
  65956. begin
  65957. pTDefRegMap(@Self)^.val := thebits;
  65958. end;
  65959. function TCAN1_C1FIFOINT1.getw : TBits_32; inline;
  65960. begin
  65961. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  65962. end;
  65963. procedure TCAN1_C1FIFOCI1.setCFIFOCI(thebits : TBits_5); inline;
  65964. begin
  65965. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  65966. end;
  65967. function TCAN1_C1FIFOCI1.getCFIFOCI : TBits_5; inline;
  65968. begin
  65969. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  65970. end;
  65971. procedure TCAN1_C1FIFOCI1.setw(thebits : TBits_32); inline;
  65972. begin
  65973. pTDefRegMap(@Self)^.val := thebits;
  65974. end;
  65975. function TCAN1_C1FIFOCI1.getw : TBits_32; inline;
  65976. begin
  65977. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  65978. end;
  65979. procedure TCAN1_C1FIFOCON2.setTXPRI(thebits : TBits_2); inline;
  65980. begin
  65981. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  65982. end;
  65983. function TCAN1_C1FIFOCON2.getTXPRI : TBits_2; inline;
  65984. begin
  65985. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  65986. end;
  65987. procedure TCAN1_C1FIFOCON2.setRTREN; inline;
  65988. begin
  65989. pTDefRegMap(@Self)^.&set := $00000004;
  65990. end;
  65991. procedure TCAN1_C1FIFOCON2.clearRTREN; inline;
  65992. begin
  65993. pTDefRegMap(@Self)^.clr := $00000004;
  65994. end;
  65995. procedure TCAN1_C1FIFOCON2.setRTREN(thebits : TBits_1); inline;
  65996. begin
  65997. if thebits = 0 then
  65998. pTDefRegMap(@Self)^.clr := $00000004
  65999. else
  66000. pTDefRegMap(@Self)^.&set := $00000004;
  66001. end;
  66002. function TCAN1_C1FIFOCON2.getRTREN : TBits_1; inline;
  66003. begin
  66004. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  66005. end;
  66006. procedure TCAN1_C1FIFOCON2.setTXREQ; inline;
  66007. begin
  66008. pTDefRegMap(@Self)^.&set := $00000008;
  66009. end;
  66010. procedure TCAN1_C1FIFOCON2.clearTXREQ; inline;
  66011. begin
  66012. pTDefRegMap(@Self)^.clr := $00000008;
  66013. end;
  66014. procedure TCAN1_C1FIFOCON2.setTXREQ(thebits : TBits_1); inline;
  66015. begin
  66016. if thebits = 0 then
  66017. pTDefRegMap(@Self)^.clr := $00000008
  66018. else
  66019. pTDefRegMap(@Self)^.&set := $00000008;
  66020. end;
  66021. function TCAN1_C1FIFOCON2.getTXREQ : TBits_1; inline;
  66022. begin
  66023. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  66024. end;
  66025. procedure TCAN1_C1FIFOCON2.setTXERR; inline;
  66026. begin
  66027. pTDefRegMap(@Self)^.&set := $00000010;
  66028. end;
  66029. procedure TCAN1_C1FIFOCON2.clearTXERR; inline;
  66030. begin
  66031. pTDefRegMap(@Self)^.clr := $00000010;
  66032. end;
  66033. procedure TCAN1_C1FIFOCON2.setTXERR(thebits : TBits_1); inline;
  66034. begin
  66035. if thebits = 0 then
  66036. pTDefRegMap(@Self)^.clr := $00000010
  66037. else
  66038. pTDefRegMap(@Self)^.&set := $00000010;
  66039. end;
  66040. function TCAN1_C1FIFOCON2.getTXERR : TBits_1; inline;
  66041. begin
  66042. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  66043. end;
  66044. procedure TCAN1_C1FIFOCON2.setTXLARB; inline;
  66045. begin
  66046. pTDefRegMap(@Self)^.&set := $00000020;
  66047. end;
  66048. procedure TCAN1_C1FIFOCON2.clearTXLARB; inline;
  66049. begin
  66050. pTDefRegMap(@Self)^.clr := $00000020;
  66051. end;
  66052. procedure TCAN1_C1FIFOCON2.setTXLARB(thebits : TBits_1); inline;
  66053. begin
  66054. if thebits = 0 then
  66055. pTDefRegMap(@Self)^.clr := $00000020
  66056. else
  66057. pTDefRegMap(@Self)^.&set := $00000020;
  66058. end;
  66059. function TCAN1_C1FIFOCON2.getTXLARB : TBits_1; inline;
  66060. begin
  66061. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  66062. end;
  66063. procedure TCAN1_C1FIFOCON2.setTXABAT; inline;
  66064. begin
  66065. pTDefRegMap(@Self)^.&set := $00000040;
  66066. end;
  66067. procedure TCAN1_C1FIFOCON2.clearTXABAT; inline;
  66068. begin
  66069. pTDefRegMap(@Self)^.clr := $00000040;
  66070. end;
  66071. procedure TCAN1_C1FIFOCON2.setTXABAT(thebits : TBits_1); inline;
  66072. begin
  66073. if thebits = 0 then
  66074. pTDefRegMap(@Self)^.clr := $00000040
  66075. else
  66076. pTDefRegMap(@Self)^.&set := $00000040;
  66077. end;
  66078. function TCAN1_C1FIFOCON2.getTXABAT : TBits_1; inline;
  66079. begin
  66080. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  66081. end;
  66082. procedure TCAN1_C1FIFOCON2.setTXEN; inline;
  66083. begin
  66084. pTDefRegMap(@Self)^.&set := $00000080;
  66085. end;
  66086. procedure TCAN1_C1FIFOCON2.clearTXEN; inline;
  66087. begin
  66088. pTDefRegMap(@Self)^.clr := $00000080;
  66089. end;
  66090. procedure TCAN1_C1FIFOCON2.setTXEN(thebits : TBits_1); inline;
  66091. begin
  66092. if thebits = 0 then
  66093. pTDefRegMap(@Self)^.clr := $00000080
  66094. else
  66095. pTDefRegMap(@Self)^.&set := $00000080;
  66096. end;
  66097. function TCAN1_C1FIFOCON2.getTXEN : TBits_1; inline;
  66098. begin
  66099. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  66100. end;
  66101. procedure TCAN1_C1FIFOCON2.setDONLY; inline;
  66102. begin
  66103. pTDefRegMap(@Self)^.&set := $00001000;
  66104. end;
  66105. procedure TCAN1_C1FIFOCON2.clearDONLY; inline;
  66106. begin
  66107. pTDefRegMap(@Self)^.clr := $00001000;
  66108. end;
  66109. procedure TCAN1_C1FIFOCON2.setDONLY(thebits : TBits_1); inline;
  66110. begin
  66111. if thebits = 0 then
  66112. pTDefRegMap(@Self)^.clr := $00001000
  66113. else
  66114. pTDefRegMap(@Self)^.&set := $00001000;
  66115. end;
  66116. function TCAN1_C1FIFOCON2.getDONLY : TBits_1; inline;
  66117. begin
  66118. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  66119. end;
  66120. procedure TCAN1_C1FIFOCON2.setUINC; inline;
  66121. begin
  66122. pTDefRegMap(@Self)^.&set := $00002000;
  66123. end;
  66124. procedure TCAN1_C1FIFOCON2.clearUINC; inline;
  66125. begin
  66126. pTDefRegMap(@Self)^.clr := $00002000;
  66127. end;
  66128. procedure TCAN1_C1FIFOCON2.setUINC(thebits : TBits_1); inline;
  66129. begin
  66130. if thebits = 0 then
  66131. pTDefRegMap(@Self)^.clr := $00002000
  66132. else
  66133. pTDefRegMap(@Self)^.&set := $00002000;
  66134. end;
  66135. function TCAN1_C1FIFOCON2.getUINC : TBits_1; inline;
  66136. begin
  66137. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  66138. end;
  66139. procedure TCAN1_C1FIFOCON2.setFRESET; inline;
  66140. begin
  66141. pTDefRegMap(@Self)^.&set := $00004000;
  66142. end;
  66143. procedure TCAN1_C1FIFOCON2.clearFRESET; inline;
  66144. begin
  66145. pTDefRegMap(@Self)^.clr := $00004000;
  66146. end;
  66147. procedure TCAN1_C1FIFOCON2.setFRESET(thebits : TBits_1); inline;
  66148. begin
  66149. if thebits = 0 then
  66150. pTDefRegMap(@Self)^.clr := $00004000
  66151. else
  66152. pTDefRegMap(@Self)^.&set := $00004000;
  66153. end;
  66154. function TCAN1_C1FIFOCON2.getFRESET : TBits_1; inline;
  66155. begin
  66156. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  66157. end;
  66158. procedure TCAN1_C1FIFOCON2.setFSIZE(thebits : TBits_5); inline;
  66159. begin
  66160. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  66161. end;
  66162. function TCAN1_C1FIFOCON2.getFSIZE : TBits_5; inline;
  66163. begin
  66164. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  66165. end;
  66166. procedure TCAN1_C1FIFOCON2.setw(thebits : TBits_32); inline;
  66167. begin
  66168. pTDefRegMap(@Self)^.val := thebits;
  66169. end;
  66170. function TCAN1_C1FIFOCON2.getw : TBits_32; inline;
  66171. begin
  66172. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  66173. end;
  66174. procedure TCAN1_C1FIFOINT2.setRXNEMPTYIF; inline;
  66175. begin
  66176. pTDefRegMap(@Self)^.&set := $00000001;
  66177. end;
  66178. procedure TCAN1_C1FIFOINT2.clearRXNEMPTYIF; inline;
  66179. begin
  66180. pTDefRegMap(@Self)^.clr := $00000001;
  66181. end;
  66182. procedure TCAN1_C1FIFOINT2.setRXNEMPTYIF(thebits : TBits_1); inline;
  66183. begin
  66184. if thebits = 0 then
  66185. pTDefRegMap(@Self)^.clr := $00000001
  66186. else
  66187. pTDefRegMap(@Self)^.&set := $00000001;
  66188. end;
  66189. function TCAN1_C1FIFOINT2.getRXNEMPTYIF : TBits_1; inline;
  66190. begin
  66191. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  66192. end;
  66193. procedure TCAN1_C1FIFOINT2.setRXHALFIF; inline;
  66194. begin
  66195. pTDefRegMap(@Self)^.&set := $00000002;
  66196. end;
  66197. procedure TCAN1_C1FIFOINT2.clearRXHALFIF; inline;
  66198. begin
  66199. pTDefRegMap(@Self)^.clr := $00000002;
  66200. end;
  66201. procedure TCAN1_C1FIFOINT2.setRXHALFIF(thebits : TBits_1); inline;
  66202. begin
  66203. if thebits = 0 then
  66204. pTDefRegMap(@Self)^.clr := $00000002
  66205. else
  66206. pTDefRegMap(@Self)^.&set := $00000002;
  66207. end;
  66208. function TCAN1_C1FIFOINT2.getRXHALFIF : TBits_1; inline;
  66209. begin
  66210. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  66211. end;
  66212. procedure TCAN1_C1FIFOINT2.setRXFULLIF; inline;
  66213. begin
  66214. pTDefRegMap(@Self)^.&set := $00000004;
  66215. end;
  66216. procedure TCAN1_C1FIFOINT2.clearRXFULLIF; inline;
  66217. begin
  66218. pTDefRegMap(@Self)^.clr := $00000004;
  66219. end;
  66220. procedure TCAN1_C1FIFOINT2.setRXFULLIF(thebits : TBits_1); inline;
  66221. begin
  66222. if thebits = 0 then
  66223. pTDefRegMap(@Self)^.clr := $00000004
  66224. else
  66225. pTDefRegMap(@Self)^.&set := $00000004;
  66226. end;
  66227. function TCAN1_C1FIFOINT2.getRXFULLIF : TBits_1; inline;
  66228. begin
  66229. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  66230. end;
  66231. procedure TCAN1_C1FIFOINT2.setRXOVFLIF; inline;
  66232. begin
  66233. pTDefRegMap(@Self)^.&set := $00000008;
  66234. end;
  66235. procedure TCAN1_C1FIFOINT2.clearRXOVFLIF; inline;
  66236. begin
  66237. pTDefRegMap(@Self)^.clr := $00000008;
  66238. end;
  66239. procedure TCAN1_C1FIFOINT2.setRXOVFLIF(thebits : TBits_1); inline;
  66240. begin
  66241. if thebits = 0 then
  66242. pTDefRegMap(@Self)^.clr := $00000008
  66243. else
  66244. pTDefRegMap(@Self)^.&set := $00000008;
  66245. end;
  66246. function TCAN1_C1FIFOINT2.getRXOVFLIF : TBits_1; inline;
  66247. begin
  66248. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  66249. end;
  66250. procedure TCAN1_C1FIFOINT2.setTXEMPTYIF; inline;
  66251. begin
  66252. pTDefRegMap(@Self)^.&set := $00000100;
  66253. end;
  66254. procedure TCAN1_C1FIFOINT2.clearTXEMPTYIF; inline;
  66255. begin
  66256. pTDefRegMap(@Self)^.clr := $00000100;
  66257. end;
  66258. procedure TCAN1_C1FIFOINT2.setTXEMPTYIF(thebits : TBits_1); inline;
  66259. begin
  66260. if thebits = 0 then
  66261. pTDefRegMap(@Self)^.clr := $00000100
  66262. else
  66263. pTDefRegMap(@Self)^.&set := $00000100;
  66264. end;
  66265. function TCAN1_C1FIFOINT2.getTXEMPTYIF : TBits_1; inline;
  66266. begin
  66267. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  66268. end;
  66269. procedure TCAN1_C1FIFOINT2.setTXHALFIF; inline;
  66270. begin
  66271. pTDefRegMap(@Self)^.&set := $00000200;
  66272. end;
  66273. procedure TCAN1_C1FIFOINT2.clearTXHALFIF; inline;
  66274. begin
  66275. pTDefRegMap(@Self)^.clr := $00000200;
  66276. end;
  66277. procedure TCAN1_C1FIFOINT2.setTXHALFIF(thebits : TBits_1); inline;
  66278. begin
  66279. if thebits = 0 then
  66280. pTDefRegMap(@Self)^.clr := $00000200
  66281. else
  66282. pTDefRegMap(@Self)^.&set := $00000200;
  66283. end;
  66284. function TCAN1_C1FIFOINT2.getTXHALFIF : TBits_1; inline;
  66285. begin
  66286. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  66287. end;
  66288. procedure TCAN1_C1FIFOINT2.setTXNFULLIF; inline;
  66289. begin
  66290. pTDefRegMap(@Self)^.&set := $00000400;
  66291. end;
  66292. procedure TCAN1_C1FIFOINT2.clearTXNFULLIF; inline;
  66293. begin
  66294. pTDefRegMap(@Self)^.clr := $00000400;
  66295. end;
  66296. procedure TCAN1_C1FIFOINT2.setTXNFULLIF(thebits : TBits_1); inline;
  66297. begin
  66298. if thebits = 0 then
  66299. pTDefRegMap(@Self)^.clr := $00000400
  66300. else
  66301. pTDefRegMap(@Self)^.&set := $00000400;
  66302. end;
  66303. function TCAN1_C1FIFOINT2.getTXNFULLIF : TBits_1; inline;
  66304. begin
  66305. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  66306. end;
  66307. procedure TCAN1_C1FIFOINT2.setRXNEMPTYIE; inline;
  66308. begin
  66309. pTDefRegMap(@Self)^.&set := $00010000;
  66310. end;
  66311. procedure TCAN1_C1FIFOINT2.clearRXNEMPTYIE; inline;
  66312. begin
  66313. pTDefRegMap(@Self)^.clr := $00010000;
  66314. end;
  66315. procedure TCAN1_C1FIFOINT2.setRXNEMPTYIE(thebits : TBits_1); inline;
  66316. begin
  66317. if thebits = 0 then
  66318. pTDefRegMap(@Self)^.clr := $00010000
  66319. else
  66320. pTDefRegMap(@Self)^.&set := $00010000;
  66321. end;
  66322. function TCAN1_C1FIFOINT2.getRXNEMPTYIE : TBits_1; inline;
  66323. begin
  66324. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  66325. end;
  66326. procedure TCAN1_C1FIFOINT2.setRXHALFIE; inline;
  66327. begin
  66328. pTDefRegMap(@Self)^.&set := $00020000;
  66329. end;
  66330. procedure TCAN1_C1FIFOINT2.clearRXHALFIE; inline;
  66331. begin
  66332. pTDefRegMap(@Self)^.clr := $00020000;
  66333. end;
  66334. procedure TCAN1_C1FIFOINT2.setRXHALFIE(thebits : TBits_1); inline;
  66335. begin
  66336. if thebits = 0 then
  66337. pTDefRegMap(@Self)^.clr := $00020000
  66338. else
  66339. pTDefRegMap(@Self)^.&set := $00020000;
  66340. end;
  66341. function TCAN1_C1FIFOINT2.getRXHALFIE : TBits_1; inline;
  66342. begin
  66343. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  66344. end;
  66345. procedure TCAN1_C1FIFOINT2.setRXFULLIE; inline;
  66346. begin
  66347. pTDefRegMap(@Self)^.&set := $00040000;
  66348. end;
  66349. procedure TCAN1_C1FIFOINT2.clearRXFULLIE; inline;
  66350. begin
  66351. pTDefRegMap(@Self)^.clr := $00040000;
  66352. end;
  66353. procedure TCAN1_C1FIFOINT2.setRXFULLIE(thebits : TBits_1); inline;
  66354. begin
  66355. if thebits = 0 then
  66356. pTDefRegMap(@Self)^.clr := $00040000
  66357. else
  66358. pTDefRegMap(@Self)^.&set := $00040000;
  66359. end;
  66360. function TCAN1_C1FIFOINT2.getRXFULLIE : TBits_1; inline;
  66361. begin
  66362. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  66363. end;
  66364. procedure TCAN1_C1FIFOINT2.setRXOVFLIE; inline;
  66365. begin
  66366. pTDefRegMap(@Self)^.&set := $00080000;
  66367. end;
  66368. procedure TCAN1_C1FIFOINT2.clearRXOVFLIE; inline;
  66369. begin
  66370. pTDefRegMap(@Self)^.clr := $00080000;
  66371. end;
  66372. procedure TCAN1_C1FIFOINT2.setRXOVFLIE(thebits : TBits_1); inline;
  66373. begin
  66374. if thebits = 0 then
  66375. pTDefRegMap(@Self)^.clr := $00080000
  66376. else
  66377. pTDefRegMap(@Self)^.&set := $00080000;
  66378. end;
  66379. function TCAN1_C1FIFOINT2.getRXOVFLIE : TBits_1; inline;
  66380. begin
  66381. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  66382. end;
  66383. procedure TCAN1_C1FIFOINT2.setTXEMPTYIE; inline;
  66384. begin
  66385. pTDefRegMap(@Self)^.&set := $01000000;
  66386. end;
  66387. procedure TCAN1_C1FIFOINT2.clearTXEMPTYIE; inline;
  66388. begin
  66389. pTDefRegMap(@Self)^.clr := $01000000;
  66390. end;
  66391. procedure TCAN1_C1FIFOINT2.setTXEMPTYIE(thebits : TBits_1); inline;
  66392. begin
  66393. if thebits = 0 then
  66394. pTDefRegMap(@Self)^.clr := $01000000
  66395. else
  66396. pTDefRegMap(@Self)^.&set := $01000000;
  66397. end;
  66398. function TCAN1_C1FIFOINT2.getTXEMPTYIE : TBits_1; inline;
  66399. begin
  66400. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  66401. end;
  66402. procedure TCAN1_C1FIFOINT2.setTXHALFIE; inline;
  66403. begin
  66404. pTDefRegMap(@Self)^.&set := $02000000;
  66405. end;
  66406. procedure TCAN1_C1FIFOINT2.clearTXHALFIE; inline;
  66407. begin
  66408. pTDefRegMap(@Self)^.clr := $02000000;
  66409. end;
  66410. procedure TCAN1_C1FIFOINT2.setTXHALFIE(thebits : TBits_1); inline;
  66411. begin
  66412. if thebits = 0 then
  66413. pTDefRegMap(@Self)^.clr := $02000000
  66414. else
  66415. pTDefRegMap(@Self)^.&set := $02000000;
  66416. end;
  66417. function TCAN1_C1FIFOINT2.getTXHALFIE : TBits_1; inline;
  66418. begin
  66419. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  66420. end;
  66421. procedure TCAN1_C1FIFOINT2.setTXNFULLIE; inline;
  66422. begin
  66423. pTDefRegMap(@Self)^.&set := $04000000;
  66424. end;
  66425. procedure TCAN1_C1FIFOINT2.clearTXNFULLIE; inline;
  66426. begin
  66427. pTDefRegMap(@Self)^.clr := $04000000;
  66428. end;
  66429. procedure TCAN1_C1FIFOINT2.setTXNFULLIE(thebits : TBits_1); inline;
  66430. begin
  66431. if thebits = 0 then
  66432. pTDefRegMap(@Self)^.clr := $04000000
  66433. else
  66434. pTDefRegMap(@Self)^.&set := $04000000;
  66435. end;
  66436. function TCAN1_C1FIFOINT2.getTXNFULLIE : TBits_1; inline;
  66437. begin
  66438. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  66439. end;
  66440. procedure TCAN1_C1FIFOINT2.setw(thebits : TBits_32); inline;
  66441. begin
  66442. pTDefRegMap(@Self)^.val := thebits;
  66443. end;
  66444. function TCAN1_C1FIFOINT2.getw : TBits_32; inline;
  66445. begin
  66446. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  66447. end;
  66448. procedure TCAN1_C1FIFOCI2.setCFIFOCI(thebits : TBits_5); inline;
  66449. begin
  66450. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  66451. end;
  66452. function TCAN1_C1FIFOCI2.getCFIFOCI : TBits_5; inline;
  66453. begin
  66454. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  66455. end;
  66456. procedure TCAN1_C1FIFOCI2.setw(thebits : TBits_32); inline;
  66457. begin
  66458. pTDefRegMap(@Self)^.val := thebits;
  66459. end;
  66460. function TCAN1_C1FIFOCI2.getw : TBits_32; inline;
  66461. begin
  66462. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  66463. end;
  66464. procedure TCAN1_C1FIFOCON3.setTXPRI(thebits : TBits_2); inline;
  66465. begin
  66466. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  66467. end;
  66468. function TCAN1_C1FIFOCON3.getTXPRI : TBits_2; inline;
  66469. begin
  66470. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  66471. end;
  66472. procedure TCAN1_C1FIFOCON3.setRTREN; inline;
  66473. begin
  66474. pTDefRegMap(@Self)^.&set := $00000004;
  66475. end;
  66476. procedure TCAN1_C1FIFOCON3.clearRTREN; inline;
  66477. begin
  66478. pTDefRegMap(@Self)^.clr := $00000004;
  66479. end;
  66480. procedure TCAN1_C1FIFOCON3.setRTREN(thebits : TBits_1); inline;
  66481. begin
  66482. if thebits = 0 then
  66483. pTDefRegMap(@Self)^.clr := $00000004
  66484. else
  66485. pTDefRegMap(@Self)^.&set := $00000004;
  66486. end;
  66487. function TCAN1_C1FIFOCON3.getRTREN : TBits_1; inline;
  66488. begin
  66489. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  66490. end;
  66491. procedure TCAN1_C1FIFOCON3.setTXREQ; inline;
  66492. begin
  66493. pTDefRegMap(@Self)^.&set := $00000008;
  66494. end;
  66495. procedure TCAN1_C1FIFOCON3.clearTXREQ; inline;
  66496. begin
  66497. pTDefRegMap(@Self)^.clr := $00000008;
  66498. end;
  66499. procedure TCAN1_C1FIFOCON3.setTXREQ(thebits : TBits_1); inline;
  66500. begin
  66501. if thebits = 0 then
  66502. pTDefRegMap(@Self)^.clr := $00000008
  66503. else
  66504. pTDefRegMap(@Self)^.&set := $00000008;
  66505. end;
  66506. function TCAN1_C1FIFOCON3.getTXREQ : TBits_1; inline;
  66507. begin
  66508. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  66509. end;
  66510. procedure TCAN1_C1FIFOCON3.setTXERR; inline;
  66511. begin
  66512. pTDefRegMap(@Self)^.&set := $00000010;
  66513. end;
  66514. procedure TCAN1_C1FIFOCON3.clearTXERR; inline;
  66515. begin
  66516. pTDefRegMap(@Self)^.clr := $00000010;
  66517. end;
  66518. procedure TCAN1_C1FIFOCON3.setTXERR(thebits : TBits_1); inline;
  66519. begin
  66520. if thebits = 0 then
  66521. pTDefRegMap(@Self)^.clr := $00000010
  66522. else
  66523. pTDefRegMap(@Self)^.&set := $00000010;
  66524. end;
  66525. function TCAN1_C1FIFOCON3.getTXERR : TBits_1; inline;
  66526. begin
  66527. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  66528. end;
  66529. procedure TCAN1_C1FIFOCON3.setTXLARB; inline;
  66530. begin
  66531. pTDefRegMap(@Self)^.&set := $00000020;
  66532. end;
  66533. procedure TCAN1_C1FIFOCON3.clearTXLARB; inline;
  66534. begin
  66535. pTDefRegMap(@Self)^.clr := $00000020;
  66536. end;
  66537. procedure TCAN1_C1FIFOCON3.setTXLARB(thebits : TBits_1); inline;
  66538. begin
  66539. if thebits = 0 then
  66540. pTDefRegMap(@Self)^.clr := $00000020
  66541. else
  66542. pTDefRegMap(@Self)^.&set := $00000020;
  66543. end;
  66544. function TCAN1_C1FIFOCON3.getTXLARB : TBits_1; inline;
  66545. begin
  66546. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  66547. end;
  66548. procedure TCAN1_C1FIFOCON3.setTXABAT; inline;
  66549. begin
  66550. pTDefRegMap(@Self)^.&set := $00000040;
  66551. end;
  66552. procedure TCAN1_C1FIFOCON3.clearTXABAT; inline;
  66553. begin
  66554. pTDefRegMap(@Self)^.clr := $00000040;
  66555. end;
  66556. procedure TCAN1_C1FIFOCON3.setTXABAT(thebits : TBits_1); inline;
  66557. begin
  66558. if thebits = 0 then
  66559. pTDefRegMap(@Self)^.clr := $00000040
  66560. else
  66561. pTDefRegMap(@Self)^.&set := $00000040;
  66562. end;
  66563. function TCAN1_C1FIFOCON3.getTXABAT : TBits_1; inline;
  66564. begin
  66565. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  66566. end;
  66567. procedure TCAN1_C1FIFOCON3.setTXEN; inline;
  66568. begin
  66569. pTDefRegMap(@Self)^.&set := $00000080;
  66570. end;
  66571. procedure TCAN1_C1FIFOCON3.clearTXEN; inline;
  66572. begin
  66573. pTDefRegMap(@Self)^.clr := $00000080;
  66574. end;
  66575. procedure TCAN1_C1FIFOCON3.setTXEN(thebits : TBits_1); inline;
  66576. begin
  66577. if thebits = 0 then
  66578. pTDefRegMap(@Self)^.clr := $00000080
  66579. else
  66580. pTDefRegMap(@Self)^.&set := $00000080;
  66581. end;
  66582. function TCAN1_C1FIFOCON3.getTXEN : TBits_1; inline;
  66583. begin
  66584. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  66585. end;
  66586. procedure TCAN1_C1FIFOCON3.setDONLY; inline;
  66587. begin
  66588. pTDefRegMap(@Self)^.&set := $00001000;
  66589. end;
  66590. procedure TCAN1_C1FIFOCON3.clearDONLY; inline;
  66591. begin
  66592. pTDefRegMap(@Self)^.clr := $00001000;
  66593. end;
  66594. procedure TCAN1_C1FIFOCON3.setDONLY(thebits : TBits_1); inline;
  66595. begin
  66596. if thebits = 0 then
  66597. pTDefRegMap(@Self)^.clr := $00001000
  66598. else
  66599. pTDefRegMap(@Self)^.&set := $00001000;
  66600. end;
  66601. function TCAN1_C1FIFOCON3.getDONLY : TBits_1; inline;
  66602. begin
  66603. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  66604. end;
  66605. procedure TCAN1_C1FIFOCON3.setUINC; inline;
  66606. begin
  66607. pTDefRegMap(@Self)^.&set := $00002000;
  66608. end;
  66609. procedure TCAN1_C1FIFOCON3.clearUINC; inline;
  66610. begin
  66611. pTDefRegMap(@Self)^.clr := $00002000;
  66612. end;
  66613. procedure TCAN1_C1FIFOCON3.setUINC(thebits : TBits_1); inline;
  66614. begin
  66615. if thebits = 0 then
  66616. pTDefRegMap(@Self)^.clr := $00002000
  66617. else
  66618. pTDefRegMap(@Self)^.&set := $00002000;
  66619. end;
  66620. function TCAN1_C1FIFOCON3.getUINC : TBits_1; inline;
  66621. begin
  66622. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  66623. end;
  66624. procedure TCAN1_C1FIFOCON3.setFRESET; inline;
  66625. begin
  66626. pTDefRegMap(@Self)^.&set := $00004000;
  66627. end;
  66628. procedure TCAN1_C1FIFOCON3.clearFRESET; inline;
  66629. begin
  66630. pTDefRegMap(@Self)^.clr := $00004000;
  66631. end;
  66632. procedure TCAN1_C1FIFOCON3.setFRESET(thebits : TBits_1); inline;
  66633. begin
  66634. if thebits = 0 then
  66635. pTDefRegMap(@Self)^.clr := $00004000
  66636. else
  66637. pTDefRegMap(@Self)^.&set := $00004000;
  66638. end;
  66639. function TCAN1_C1FIFOCON3.getFRESET : TBits_1; inline;
  66640. begin
  66641. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  66642. end;
  66643. procedure TCAN1_C1FIFOCON3.setFSIZE(thebits : TBits_5); inline;
  66644. begin
  66645. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  66646. end;
  66647. function TCAN1_C1FIFOCON3.getFSIZE : TBits_5; inline;
  66648. begin
  66649. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  66650. end;
  66651. procedure TCAN1_C1FIFOCON3.setw(thebits : TBits_32); inline;
  66652. begin
  66653. pTDefRegMap(@Self)^.val := thebits;
  66654. end;
  66655. function TCAN1_C1FIFOCON3.getw : TBits_32; inline;
  66656. begin
  66657. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  66658. end;
  66659. procedure TCAN1_C1FIFOINT3.setRXNEMPTYIF; inline;
  66660. begin
  66661. pTDefRegMap(@Self)^.&set := $00000001;
  66662. end;
  66663. procedure TCAN1_C1FIFOINT3.clearRXNEMPTYIF; inline;
  66664. begin
  66665. pTDefRegMap(@Self)^.clr := $00000001;
  66666. end;
  66667. procedure TCAN1_C1FIFOINT3.setRXNEMPTYIF(thebits : TBits_1); inline;
  66668. begin
  66669. if thebits = 0 then
  66670. pTDefRegMap(@Self)^.clr := $00000001
  66671. else
  66672. pTDefRegMap(@Self)^.&set := $00000001;
  66673. end;
  66674. function TCAN1_C1FIFOINT3.getRXNEMPTYIF : TBits_1; inline;
  66675. begin
  66676. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  66677. end;
  66678. procedure TCAN1_C1FIFOINT3.setRXHALFIF; inline;
  66679. begin
  66680. pTDefRegMap(@Self)^.&set := $00000002;
  66681. end;
  66682. procedure TCAN1_C1FIFOINT3.clearRXHALFIF; inline;
  66683. begin
  66684. pTDefRegMap(@Self)^.clr := $00000002;
  66685. end;
  66686. procedure TCAN1_C1FIFOINT3.setRXHALFIF(thebits : TBits_1); inline;
  66687. begin
  66688. if thebits = 0 then
  66689. pTDefRegMap(@Self)^.clr := $00000002
  66690. else
  66691. pTDefRegMap(@Self)^.&set := $00000002;
  66692. end;
  66693. function TCAN1_C1FIFOINT3.getRXHALFIF : TBits_1; inline;
  66694. begin
  66695. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  66696. end;
  66697. procedure TCAN1_C1FIFOINT3.setRXFULLIF; inline;
  66698. begin
  66699. pTDefRegMap(@Self)^.&set := $00000004;
  66700. end;
  66701. procedure TCAN1_C1FIFOINT3.clearRXFULLIF; inline;
  66702. begin
  66703. pTDefRegMap(@Self)^.clr := $00000004;
  66704. end;
  66705. procedure TCAN1_C1FIFOINT3.setRXFULLIF(thebits : TBits_1); inline;
  66706. begin
  66707. if thebits = 0 then
  66708. pTDefRegMap(@Self)^.clr := $00000004
  66709. else
  66710. pTDefRegMap(@Self)^.&set := $00000004;
  66711. end;
  66712. function TCAN1_C1FIFOINT3.getRXFULLIF : TBits_1; inline;
  66713. begin
  66714. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  66715. end;
  66716. procedure TCAN1_C1FIFOINT3.setRXOVFLIF; inline;
  66717. begin
  66718. pTDefRegMap(@Self)^.&set := $00000008;
  66719. end;
  66720. procedure TCAN1_C1FIFOINT3.clearRXOVFLIF; inline;
  66721. begin
  66722. pTDefRegMap(@Self)^.clr := $00000008;
  66723. end;
  66724. procedure TCAN1_C1FIFOINT3.setRXOVFLIF(thebits : TBits_1); inline;
  66725. begin
  66726. if thebits = 0 then
  66727. pTDefRegMap(@Self)^.clr := $00000008
  66728. else
  66729. pTDefRegMap(@Self)^.&set := $00000008;
  66730. end;
  66731. function TCAN1_C1FIFOINT3.getRXOVFLIF : TBits_1; inline;
  66732. begin
  66733. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  66734. end;
  66735. procedure TCAN1_C1FIFOINT3.setTXEMPTYIF; inline;
  66736. begin
  66737. pTDefRegMap(@Self)^.&set := $00000100;
  66738. end;
  66739. procedure TCAN1_C1FIFOINT3.clearTXEMPTYIF; inline;
  66740. begin
  66741. pTDefRegMap(@Self)^.clr := $00000100;
  66742. end;
  66743. procedure TCAN1_C1FIFOINT3.setTXEMPTYIF(thebits : TBits_1); inline;
  66744. begin
  66745. if thebits = 0 then
  66746. pTDefRegMap(@Self)^.clr := $00000100
  66747. else
  66748. pTDefRegMap(@Self)^.&set := $00000100;
  66749. end;
  66750. function TCAN1_C1FIFOINT3.getTXEMPTYIF : TBits_1; inline;
  66751. begin
  66752. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  66753. end;
  66754. procedure TCAN1_C1FIFOINT3.setTXHALFIF; inline;
  66755. begin
  66756. pTDefRegMap(@Self)^.&set := $00000200;
  66757. end;
  66758. procedure TCAN1_C1FIFOINT3.clearTXHALFIF; inline;
  66759. begin
  66760. pTDefRegMap(@Self)^.clr := $00000200;
  66761. end;
  66762. procedure TCAN1_C1FIFOINT3.setTXHALFIF(thebits : TBits_1); inline;
  66763. begin
  66764. if thebits = 0 then
  66765. pTDefRegMap(@Self)^.clr := $00000200
  66766. else
  66767. pTDefRegMap(@Self)^.&set := $00000200;
  66768. end;
  66769. function TCAN1_C1FIFOINT3.getTXHALFIF : TBits_1; inline;
  66770. begin
  66771. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  66772. end;
  66773. procedure TCAN1_C1FIFOINT3.setTXNFULLIF; inline;
  66774. begin
  66775. pTDefRegMap(@Self)^.&set := $00000400;
  66776. end;
  66777. procedure TCAN1_C1FIFOINT3.clearTXNFULLIF; inline;
  66778. begin
  66779. pTDefRegMap(@Self)^.clr := $00000400;
  66780. end;
  66781. procedure TCAN1_C1FIFOINT3.setTXNFULLIF(thebits : TBits_1); inline;
  66782. begin
  66783. if thebits = 0 then
  66784. pTDefRegMap(@Self)^.clr := $00000400
  66785. else
  66786. pTDefRegMap(@Self)^.&set := $00000400;
  66787. end;
  66788. function TCAN1_C1FIFOINT3.getTXNFULLIF : TBits_1; inline;
  66789. begin
  66790. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  66791. end;
  66792. procedure TCAN1_C1FIFOINT3.setRXNEMPTYIE; inline;
  66793. begin
  66794. pTDefRegMap(@Self)^.&set := $00010000;
  66795. end;
  66796. procedure TCAN1_C1FIFOINT3.clearRXNEMPTYIE; inline;
  66797. begin
  66798. pTDefRegMap(@Self)^.clr := $00010000;
  66799. end;
  66800. procedure TCAN1_C1FIFOINT3.setRXNEMPTYIE(thebits : TBits_1); inline;
  66801. begin
  66802. if thebits = 0 then
  66803. pTDefRegMap(@Self)^.clr := $00010000
  66804. else
  66805. pTDefRegMap(@Self)^.&set := $00010000;
  66806. end;
  66807. function TCAN1_C1FIFOINT3.getRXNEMPTYIE : TBits_1; inline;
  66808. begin
  66809. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  66810. end;
  66811. procedure TCAN1_C1FIFOINT3.setRXHALFIE; inline;
  66812. begin
  66813. pTDefRegMap(@Self)^.&set := $00020000;
  66814. end;
  66815. procedure TCAN1_C1FIFOINT3.clearRXHALFIE; inline;
  66816. begin
  66817. pTDefRegMap(@Self)^.clr := $00020000;
  66818. end;
  66819. procedure TCAN1_C1FIFOINT3.setRXHALFIE(thebits : TBits_1); inline;
  66820. begin
  66821. if thebits = 0 then
  66822. pTDefRegMap(@Self)^.clr := $00020000
  66823. else
  66824. pTDefRegMap(@Self)^.&set := $00020000;
  66825. end;
  66826. function TCAN1_C1FIFOINT3.getRXHALFIE : TBits_1; inline;
  66827. begin
  66828. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  66829. end;
  66830. procedure TCAN1_C1FIFOINT3.setRXFULLIE; inline;
  66831. begin
  66832. pTDefRegMap(@Self)^.&set := $00040000;
  66833. end;
  66834. procedure TCAN1_C1FIFOINT3.clearRXFULLIE; inline;
  66835. begin
  66836. pTDefRegMap(@Self)^.clr := $00040000;
  66837. end;
  66838. procedure TCAN1_C1FIFOINT3.setRXFULLIE(thebits : TBits_1); inline;
  66839. begin
  66840. if thebits = 0 then
  66841. pTDefRegMap(@Self)^.clr := $00040000
  66842. else
  66843. pTDefRegMap(@Self)^.&set := $00040000;
  66844. end;
  66845. function TCAN1_C1FIFOINT3.getRXFULLIE : TBits_1; inline;
  66846. begin
  66847. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  66848. end;
  66849. procedure TCAN1_C1FIFOINT3.setRXOVFLIE; inline;
  66850. begin
  66851. pTDefRegMap(@Self)^.&set := $00080000;
  66852. end;
  66853. procedure TCAN1_C1FIFOINT3.clearRXOVFLIE; inline;
  66854. begin
  66855. pTDefRegMap(@Self)^.clr := $00080000;
  66856. end;
  66857. procedure TCAN1_C1FIFOINT3.setRXOVFLIE(thebits : TBits_1); inline;
  66858. begin
  66859. if thebits = 0 then
  66860. pTDefRegMap(@Self)^.clr := $00080000
  66861. else
  66862. pTDefRegMap(@Self)^.&set := $00080000;
  66863. end;
  66864. function TCAN1_C1FIFOINT3.getRXOVFLIE : TBits_1; inline;
  66865. begin
  66866. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  66867. end;
  66868. procedure TCAN1_C1FIFOINT3.setTXEMPTYIE; inline;
  66869. begin
  66870. pTDefRegMap(@Self)^.&set := $01000000;
  66871. end;
  66872. procedure TCAN1_C1FIFOINT3.clearTXEMPTYIE; inline;
  66873. begin
  66874. pTDefRegMap(@Self)^.clr := $01000000;
  66875. end;
  66876. procedure TCAN1_C1FIFOINT3.setTXEMPTYIE(thebits : TBits_1); inline;
  66877. begin
  66878. if thebits = 0 then
  66879. pTDefRegMap(@Self)^.clr := $01000000
  66880. else
  66881. pTDefRegMap(@Self)^.&set := $01000000;
  66882. end;
  66883. function TCAN1_C1FIFOINT3.getTXEMPTYIE : TBits_1; inline;
  66884. begin
  66885. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  66886. end;
  66887. procedure TCAN1_C1FIFOINT3.setTXHALFIE; inline;
  66888. begin
  66889. pTDefRegMap(@Self)^.&set := $02000000;
  66890. end;
  66891. procedure TCAN1_C1FIFOINT3.clearTXHALFIE; inline;
  66892. begin
  66893. pTDefRegMap(@Self)^.clr := $02000000;
  66894. end;
  66895. procedure TCAN1_C1FIFOINT3.setTXHALFIE(thebits : TBits_1); inline;
  66896. begin
  66897. if thebits = 0 then
  66898. pTDefRegMap(@Self)^.clr := $02000000
  66899. else
  66900. pTDefRegMap(@Self)^.&set := $02000000;
  66901. end;
  66902. function TCAN1_C1FIFOINT3.getTXHALFIE : TBits_1; inline;
  66903. begin
  66904. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  66905. end;
  66906. procedure TCAN1_C1FIFOINT3.setTXNFULLIE; inline;
  66907. begin
  66908. pTDefRegMap(@Self)^.&set := $04000000;
  66909. end;
  66910. procedure TCAN1_C1FIFOINT3.clearTXNFULLIE; inline;
  66911. begin
  66912. pTDefRegMap(@Self)^.clr := $04000000;
  66913. end;
  66914. procedure TCAN1_C1FIFOINT3.setTXNFULLIE(thebits : TBits_1); inline;
  66915. begin
  66916. if thebits = 0 then
  66917. pTDefRegMap(@Self)^.clr := $04000000
  66918. else
  66919. pTDefRegMap(@Self)^.&set := $04000000;
  66920. end;
  66921. function TCAN1_C1FIFOINT3.getTXNFULLIE : TBits_1; inline;
  66922. begin
  66923. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  66924. end;
  66925. procedure TCAN1_C1FIFOINT3.setw(thebits : TBits_32); inline;
  66926. begin
  66927. pTDefRegMap(@Self)^.val := thebits;
  66928. end;
  66929. function TCAN1_C1FIFOINT3.getw : TBits_32; inline;
  66930. begin
  66931. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  66932. end;
  66933. procedure TCAN1_C1FIFOCI3.setCFIFOCI(thebits : TBits_5); inline;
  66934. begin
  66935. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  66936. end;
  66937. function TCAN1_C1FIFOCI3.getCFIFOCI : TBits_5; inline;
  66938. begin
  66939. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  66940. end;
  66941. procedure TCAN1_C1FIFOCI3.setw(thebits : TBits_32); inline;
  66942. begin
  66943. pTDefRegMap(@Self)^.val := thebits;
  66944. end;
  66945. function TCAN1_C1FIFOCI3.getw : TBits_32; inline;
  66946. begin
  66947. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  66948. end;
  66949. procedure TCAN1_C1FIFOCON4.setTXPRI(thebits : TBits_2); inline;
  66950. begin
  66951. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  66952. end;
  66953. function TCAN1_C1FIFOCON4.getTXPRI : TBits_2; inline;
  66954. begin
  66955. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  66956. end;
  66957. procedure TCAN1_C1FIFOCON4.setRTREN; inline;
  66958. begin
  66959. pTDefRegMap(@Self)^.&set := $00000004;
  66960. end;
  66961. procedure TCAN1_C1FIFOCON4.clearRTREN; inline;
  66962. begin
  66963. pTDefRegMap(@Self)^.clr := $00000004;
  66964. end;
  66965. procedure TCAN1_C1FIFOCON4.setRTREN(thebits : TBits_1); inline;
  66966. begin
  66967. if thebits = 0 then
  66968. pTDefRegMap(@Self)^.clr := $00000004
  66969. else
  66970. pTDefRegMap(@Self)^.&set := $00000004;
  66971. end;
  66972. function TCAN1_C1FIFOCON4.getRTREN : TBits_1; inline;
  66973. begin
  66974. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  66975. end;
  66976. procedure TCAN1_C1FIFOCON4.setTXREQ; inline;
  66977. begin
  66978. pTDefRegMap(@Self)^.&set := $00000008;
  66979. end;
  66980. procedure TCAN1_C1FIFOCON4.clearTXREQ; inline;
  66981. begin
  66982. pTDefRegMap(@Self)^.clr := $00000008;
  66983. end;
  66984. procedure TCAN1_C1FIFOCON4.setTXREQ(thebits : TBits_1); inline;
  66985. begin
  66986. if thebits = 0 then
  66987. pTDefRegMap(@Self)^.clr := $00000008
  66988. else
  66989. pTDefRegMap(@Self)^.&set := $00000008;
  66990. end;
  66991. function TCAN1_C1FIFOCON4.getTXREQ : TBits_1; inline;
  66992. begin
  66993. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  66994. end;
  66995. procedure TCAN1_C1FIFOCON4.setTXERR; inline;
  66996. begin
  66997. pTDefRegMap(@Self)^.&set := $00000010;
  66998. end;
  66999. procedure TCAN1_C1FIFOCON4.clearTXERR; inline;
  67000. begin
  67001. pTDefRegMap(@Self)^.clr := $00000010;
  67002. end;
  67003. procedure TCAN1_C1FIFOCON4.setTXERR(thebits : TBits_1); inline;
  67004. begin
  67005. if thebits = 0 then
  67006. pTDefRegMap(@Self)^.clr := $00000010
  67007. else
  67008. pTDefRegMap(@Self)^.&set := $00000010;
  67009. end;
  67010. function TCAN1_C1FIFOCON4.getTXERR : TBits_1; inline;
  67011. begin
  67012. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  67013. end;
  67014. procedure TCAN1_C1FIFOCON4.setTXLARB; inline;
  67015. begin
  67016. pTDefRegMap(@Self)^.&set := $00000020;
  67017. end;
  67018. procedure TCAN1_C1FIFOCON4.clearTXLARB; inline;
  67019. begin
  67020. pTDefRegMap(@Self)^.clr := $00000020;
  67021. end;
  67022. procedure TCAN1_C1FIFOCON4.setTXLARB(thebits : TBits_1); inline;
  67023. begin
  67024. if thebits = 0 then
  67025. pTDefRegMap(@Self)^.clr := $00000020
  67026. else
  67027. pTDefRegMap(@Self)^.&set := $00000020;
  67028. end;
  67029. function TCAN1_C1FIFOCON4.getTXLARB : TBits_1; inline;
  67030. begin
  67031. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  67032. end;
  67033. procedure TCAN1_C1FIFOCON4.setTXABAT; inline;
  67034. begin
  67035. pTDefRegMap(@Self)^.&set := $00000040;
  67036. end;
  67037. procedure TCAN1_C1FIFOCON4.clearTXABAT; inline;
  67038. begin
  67039. pTDefRegMap(@Self)^.clr := $00000040;
  67040. end;
  67041. procedure TCAN1_C1FIFOCON4.setTXABAT(thebits : TBits_1); inline;
  67042. begin
  67043. if thebits = 0 then
  67044. pTDefRegMap(@Self)^.clr := $00000040
  67045. else
  67046. pTDefRegMap(@Self)^.&set := $00000040;
  67047. end;
  67048. function TCAN1_C1FIFOCON4.getTXABAT : TBits_1; inline;
  67049. begin
  67050. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  67051. end;
  67052. procedure TCAN1_C1FIFOCON4.setTXEN; inline;
  67053. begin
  67054. pTDefRegMap(@Self)^.&set := $00000080;
  67055. end;
  67056. procedure TCAN1_C1FIFOCON4.clearTXEN; inline;
  67057. begin
  67058. pTDefRegMap(@Self)^.clr := $00000080;
  67059. end;
  67060. procedure TCAN1_C1FIFOCON4.setTXEN(thebits : TBits_1); inline;
  67061. begin
  67062. if thebits = 0 then
  67063. pTDefRegMap(@Self)^.clr := $00000080
  67064. else
  67065. pTDefRegMap(@Self)^.&set := $00000080;
  67066. end;
  67067. function TCAN1_C1FIFOCON4.getTXEN : TBits_1; inline;
  67068. begin
  67069. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  67070. end;
  67071. procedure TCAN1_C1FIFOCON4.setDONLY; inline;
  67072. begin
  67073. pTDefRegMap(@Self)^.&set := $00001000;
  67074. end;
  67075. procedure TCAN1_C1FIFOCON4.clearDONLY; inline;
  67076. begin
  67077. pTDefRegMap(@Self)^.clr := $00001000;
  67078. end;
  67079. procedure TCAN1_C1FIFOCON4.setDONLY(thebits : TBits_1); inline;
  67080. begin
  67081. if thebits = 0 then
  67082. pTDefRegMap(@Self)^.clr := $00001000
  67083. else
  67084. pTDefRegMap(@Self)^.&set := $00001000;
  67085. end;
  67086. function TCAN1_C1FIFOCON4.getDONLY : TBits_1; inline;
  67087. begin
  67088. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  67089. end;
  67090. procedure TCAN1_C1FIFOCON4.setUINC; inline;
  67091. begin
  67092. pTDefRegMap(@Self)^.&set := $00002000;
  67093. end;
  67094. procedure TCAN1_C1FIFOCON4.clearUINC; inline;
  67095. begin
  67096. pTDefRegMap(@Self)^.clr := $00002000;
  67097. end;
  67098. procedure TCAN1_C1FIFOCON4.setUINC(thebits : TBits_1); inline;
  67099. begin
  67100. if thebits = 0 then
  67101. pTDefRegMap(@Self)^.clr := $00002000
  67102. else
  67103. pTDefRegMap(@Self)^.&set := $00002000;
  67104. end;
  67105. function TCAN1_C1FIFOCON4.getUINC : TBits_1; inline;
  67106. begin
  67107. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  67108. end;
  67109. procedure TCAN1_C1FIFOCON4.setFRESET; inline;
  67110. begin
  67111. pTDefRegMap(@Self)^.&set := $00004000;
  67112. end;
  67113. procedure TCAN1_C1FIFOCON4.clearFRESET; inline;
  67114. begin
  67115. pTDefRegMap(@Self)^.clr := $00004000;
  67116. end;
  67117. procedure TCAN1_C1FIFOCON4.setFRESET(thebits : TBits_1); inline;
  67118. begin
  67119. if thebits = 0 then
  67120. pTDefRegMap(@Self)^.clr := $00004000
  67121. else
  67122. pTDefRegMap(@Self)^.&set := $00004000;
  67123. end;
  67124. function TCAN1_C1FIFOCON4.getFRESET : TBits_1; inline;
  67125. begin
  67126. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  67127. end;
  67128. procedure TCAN1_C1FIFOCON4.setFSIZE(thebits : TBits_5); inline;
  67129. begin
  67130. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  67131. end;
  67132. function TCAN1_C1FIFOCON4.getFSIZE : TBits_5; inline;
  67133. begin
  67134. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  67135. end;
  67136. procedure TCAN1_C1FIFOCON4.setw(thebits : TBits_32); inline;
  67137. begin
  67138. pTDefRegMap(@Self)^.val := thebits;
  67139. end;
  67140. function TCAN1_C1FIFOCON4.getw : TBits_32; inline;
  67141. begin
  67142. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67143. end;
  67144. procedure TCAN1_C1FIFOINT4.setRXNEMPTYIF; inline;
  67145. begin
  67146. pTDefRegMap(@Self)^.&set := $00000001;
  67147. end;
  67148. procedure TCAN1_C1FIFOINT4.clearRXNEMPTYIF; inline;
  67149. begin
  67150. pTDefRegMap(@Self)^.clr := $00000001;
  67151. end;
  67152. procedure TCAN1_C1FIFOINT4.setRXNEMPTYIF(thebits : TBits_1); inline;
  67153. begin
  67154. if thebits = 0 then
  67155. pTDefRegMap(@Self)^.clr := $00000001
  67156. else
  67157. pTDefRegMap(@Self)^.&set := $00000001;
  67158. end;
  67159. function TCAN1_C1FIFOINT4.getRXNEMPTYIF : TBits_1; inline;
  67160. begin
  67161. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  67162. end;
  67163. procedure TCAN1_C1FIFOINT4.setRXHALFIF; inline;
  67164. begin
  67165. pTDefRegMap(@Self)^.&set := $00000002;
  67166. end;
  67167. procedure TCAN1_C1FIFOINT4.clearRXHALFIF; inline;
  67168. begin
  67169. pTDefRegMap(@Self)^.clr := $00000002;
  67170. end;
  67171. procedure TCAN1_C1FIFOINT4.setRXHALFIF(thebits : TBits_1); inline;
  67172. begin
  67173. if thebits = 0 then
  67174. pTDefRegMap(@Self)^.clr := $00000002
  67175. else
  67176. pTDefRegMap(@Self)^.&set := $00000002;
  67177. end;
  67178. function TCAN1_C1FIFOINT4.getRXHALFIF : TBits_1; inline;
  67179. begin
  67180. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  67181. end;
  67182. procedure TCAN1_C1FIFOINT4.setRXFULLIF; inline;
  67183. begin
  67184. pTDefRegMap(@Self)^.&set := $00000004;
  67185. end;
  67186. procedure TCAN1_C1FIFOINT4.clearRXFULLIF; inline;
  67187. begin
  67188. pTDefRegMap(@Self)^.clr := $00000004;
  67189. end;
  67190. procedure TCAN1_C1FIFOINT4.setRXFULLIF(thebits : TBits_1); inline;
  67191. begin
  67192. if thebits = 0 then
  67193. pTDefRegMap(@Self)^.clr := $00000004
  67194. else
  67195. pTDefRegMap(@Self)^.&set := $00000004;
  67196. end;
  67197. function TCAN1_C1FIFOINT4.getRXFULLIF : TBits_1; inline;
  67198. begin
  67199. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  67200. end;
  67201. procedure TCAN1_C1FIFOINT4.setRXOVFLIF; inline;
  67202. begin
  67203. pTDefRegMap(@Self)^.&set := $00000008;
  67204. end;
  67205. procedure TCAN1_C1FIFOINT4.clearRXOVFLIF; inline;
  67206. begin
  67207. pTDefRegMap(@Self)^.clr := $00000008;
  67208. end;
  67209. procedure TCAN1_C1FIFOINT4.setRXOVFLIF(thebits : TBits_1); inline;
  67210. begin
  67211. if thebits = 0 then
  67212. pTDefRegMap(@Self)^.clr := $00000008
  67213. else
  67214. pTDefRegMap(@Self)^.&set := $00000008;
  67215. end;
  67216. function TCAN1_C1FIFOINT4.getRXOVFLIF : TBits_1; inline;
  67217. begin
  67218. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  67219. end;
  67220. procedure TCAN1_C1FIFOINT4.setTXEMPTYIF; inline;
  67221. begin
  67222. pTDefRegMap(@Self)^.&set := $00000100;
  67223. end;
  67224. procedure TCAN1_C1FIFOINT4.clearTXEMPTYIF; inline;
  67225. begin
  67226. pTDefRegMap(@Self)^.clr := $00000100;
  67227. end;
  67228. procedure TCAN1_C1FIFOINT4.setTXEMPTYIF(thebits : TBits_1); inline;
  67229. begin
  67230. if thebits = 0 then
  67231. pTDefRegMap(@Self)^.clr := $00000100
  67232. else
  67233. pTDefRegMap(@Self)^.&set := $00000100;
  67234. end;
  67235. function TCAN1_C1FIFOINT4.getTXEMPTYIF : TBits_1; inline;
  67236. begin
  67237. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  67238. end;
  67239. procedure TCAN1_C1FIFOINT4.setTXHALFIF; inline;
  67240. begin
  67241. pTDefRegMap(@Self)^.&set := $00000200;
  67242. end;
  67243. procedure TCAN1_C1FIFOINT4.clearTXHALFIF; inline;
  67244. begin
  67245. pTDefRegMap(@Self)^.clr := $00000200;
  67246. end;
  67247. procedure TCAN1_C1FIFOINT4.setTXHALFIF(thebits : TBits_1); inline;
  67248. begin
  67249. if thebits = 0 then
  67250. pTDefRegMap(@Self)^.clr := $00000200
  67251. else
  67252. pTDefRegMap(@Self)^.&set := $00000200;
  67253. end;
  67254. function TCAN1_C1FIFOINT4.getTXHALFIF : TBits_1; inline;
  67255. begin
  67256. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  67257. end;
  67258. procedure TCAN1_C1FIFOINT4.setTXNFULLIF; inline;
  67259. begin
  67260. pTDefRegMap(@Self)^.&set := $00000400;
  67261. end;
  67262. procedure TCAN1_C1FIFOINT4.clearTXNFULLIF; inline;
  67263. begin
  67264. pTDefRegMap(@Self)^.clr := $00000400;
  67265. end;
  67266. procedure TCAN1_C1FIFOINT4.setTXNFULLIF(thebits : TBits_1); inline;
  67267. begin
  67268. if thebits = 0 then
  67269. pTDefRegMap(@Self)^.clr := $00000400
  67270. else
  67271. pTDefRegMap(@Self)^.&set := $00000400;
  67272. end;
  67273. function TCAN1_C1FIFOINT4.getTXNFULLIF : TBits_1; inline;
  67274. begin
  67275. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  67276. end;
  67277. procedure TCAN1_C1FIFOINT4.setRXNEMPTYIE; inline;
  67278. begin
  67279. pTDefRegMap(@Self)^.&set := $00010000;
  67280. end;
  67281. procedure TCAN1_C1FIFOINT4.clearRXNEMPTYIE; inline;
  67282. begin
  67283. pTDefRegMap(@Self)^.clr := $00010000;
  67284. end;
  67285. procedure TCAN1_C1FIFOINT4.setRXNEMPTYIE(thebits : TBits_1); inline;
  67286. begin
  67287. if thebits = 0 then
  67288. pTDefRegMap(@Self)^.clr := $00010000
  67289. else
  67290. pTDefRegMap(@Self)^.&set := $00010000;
  67291. end;
  67292. function TCAN1_C1FIFOINT4.getRXNEMPTYIE : TBits_1; inline;
  67293. begin
  67294. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  67295. end;
  67296. procedure TCAN1_C1FIFOINT4.setRXHALFIE; inline;
  67297. begin
  67298. pTDefRegMap(@Self)^.&set := $00020000;
  67299. end;
  67300. procedure TCAN1_C1FIFOINT4.clearRXHALFIE; inline;
  67301. begin
  67302. pTDefRegMap(@Self)^.clr := $00020000;
  67303. end;
  67304. procedure TCAN1_C1FIFOINT4.setRXHALFIE(thebits : TBits_1); inline;
  67305. begin
  67306. if thebits = 0 then
  67307. pTDefRegMap(@Self)^.clr := $00020000
  67308. else
  67309. pTDefRegMap(@Self)^.&set := $00020000;
  67310. end;
  67311. function TCAN1_C1FIFOINT4.getRXHALFIE : TBits_1; inline;
  67312. begin
  67313. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  67314. end;
  67315. procedure TCAN1_C1FIFOINT4.setRXFULLIE; inline;
  67316. begin
  67317. pTDefRegMap(@Self)^.&set := $00040000;
  67318. end;
  67319. procedure TCAN1_C1FIFOINT4.clearRXFULLIE; inline;
  67320. begin
  67321. pTDefRegMap(@Self)^.clr := $00040000;
  67322. end;
  67323. procedure TCAN1_C1FIFOINT4.setRXFULLIE(thebits : TBits_1); inline;
  67324. begin
  67325. if thebits = 0 then
  67326. pTDefRegMap(@Self)^.clr := $00040000
  67327. else
  67328. pTDefRegMap(@Self)^.&set := $00040000;
  67329. end;
  67330. function TCAN1_C1FIFOINT4.getRXFULLIE : TBits_1; inline;
  67331. begin
  67332. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  67333. end;
  67334. procedure TCAN1_C1FIFOINT4.setRXOVFLIE; inline;
  67335. begin
  67336. pTDefRegMap(@Self)^.&set := $00080000;
  67337. end;
  67338. procedure TCAN1_C1FIFOINT4.clearRXOVFLIE; inline;
  67339. begin
  67340. pTDefRegMap(@Self)^.clr := $00080000;
  67341. end;
  67342. procedure TCAN1_C1FIFOINT4.setRXOVFLIE(thebits : TBits_1); inline;
  67343. begin
  67344. if thebits = 0 then
  67345. pTDefRegMap(@Self)^.clr := $00080000
  67346. else
  67347. pTDefRegMap(@Self)^.&set := $00080000;
  67348. end;
  67349. function TCAN1_C1FIFOINT4.getRXOVFLIE : TBits_1; inline;
  67350. begin
  67351. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  67352. end;
  67353. procedure TCAN1_C1FIFOINT4.setTXEMPTYIE; inline;
  67354. begin
  67355. pTDefRegMap(@Self)^.&set := $01000000;
  67356. end;
  67357. procedure TCAN1_C1FIFOINT4.clearTXEMPTYIE; inline;
  67358. begin
  67359. pTDefRegMap(@Self)^.clr := $01000000;
  67360. end;
  67361. procedure TCAN1_C1FIFOINT4.setTXEMPTYIE(thebits : TBits_1); inline;
  67362. begin
  67363. if thebits = 0 then
  67364. pTDefRegMap(@Self)^.clr := $01000000
  67365. else
  67366. pTDefRegMap(@Self)^.&set := $01000000;
  67367. end;
  67368. function TCAN1_C1FIFOINT4.getTXEMPTYIE : TBits_1; inline;
  67369. begin
  67370. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  67371. end;
  67372. procedure TCAN1_C1FIFOINT4.setTXHALFIE; inline;
  67373. begin
  67374. pTDefRegMap(@Self)^.&set := $02000000;
  67375. end;
  67376. procedure TCAN1_C1FIFOINT4.clearTXHALFIE; inline;
  67377. begin
  67378. pTDefRegMap(@Self)^.clr := $02000000;
  67379. end;
  67380. procedure TCAN1_C1FIFOINT4.setTXHALFIE(thebits : TBits_1); inline;
  67381. begin
  67382. if thebits = 0 then
  67383. pTDefRegMap(@Self)^.clr := $02000000
  67384. else
  67385. pTDefRegMap(@Self)^.&set := $02000000;
  67386. end;
  67387. function TCAN1_C1FIFOINT4.getTXHALFIE : TBits_1; inline;
  67388. begin
  67389. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  67390. end;
  67391. procedure TCAN1_C1FIFOINT4.setTXNFULLIE; inline;
  67392. begin
  67393. pTDefRegMap(@Self)^.&set := $04000000;
  67394. end;
  67395. procedure TCAN1_C1FIFOINT4.clearTXNFULLIE; inline;
  67396. begin
  67397. pTDefRegMap(@Self)^.clr := $04000000;
  67398. end;
  67399. procedure TCAN1_C1FIFOINT4.setTXNFULLIE(thebits : TBits_1); inline;
  67400. begin
  67401. if thebits = 0 then
  67402. pTDefRegMap(@Self)^.clr := $04000000
  67403. else
  67404. pTDefRegMap(@Self)^.&set := $04000000;
  67405. end;
  67406. function TCAN1_C1FIFOINT4.getTXNFULLIE : TBits_1; inline;
  67407. begin
  67408. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  67409. end;
  67410. procedure TCAN1_C1FIFOINT4.setw(thebits : TBits_32); inline;
  67411. begin
  67412. pTDefRegMap(@Self)^.val := thebits;
  67413. end;
  67414. function TCAN1_C1FIFOINT4.getw : TBits_32; inline;
  67415. begin
  67416. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67417. end;
  67418. procedure TCAN1_C1FIFOCI4.setCFIFOCI(thebits : TBits_5); inline;
  67419. begin
  67420. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  67421. end;
  67422. function TCAN1_C1FIFOCI4.getCFIFOCI : TBits_5; inline;
  67423. begin
  67424. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  67425. end;
  67426. procedure TCAN1_C1FIFOCI4.setw(thebits : TBits_32); inline;
  67427. begin
  67428. pTDefRegMap(@Self)^.val := thebits;
  67429. end;
  67430. function TCAN1_C1FIFOCI4.getw : TBits_32; inline;
  67431. begin
  67432. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67433. end;
  67434. procedure TCAN1_C1FIFOCON5.setTXPRI(thebits : TBits_2); inline;
  67435. begin
  67436. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  67437. end;
  67438. function TCAN1_C1FIFOCON5.getTXPRI : TBits_2; inline;
  67439. begin
  67440. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  67441. end;
  67442. procedure TCAN1_C1FIFOCON5.setRTREN; inline;
  67443. begin
  67444. pTDefRegMap(@Self)^.&set := $00000004;
  67445. end;
  67446. procedure TCAN1_C1FIFOCON5.clearRTREN; inline;
  67447. begin
  67448. pTDefRegMap(@Self)^.clr := $00000004;
  67449. end;
  67450. procedure TCAN1_C1FIFOCON5.setRTREN(thebits : TBits_1); inline;
  67451. begin
  67452. if thebits = 0 then
  67453. pTDefRegMap(@Self)^.clr := $00000004
  67454. else
  67455. pTDefRegMap(@Self)^.&set := $00000004;
  67456. end;
  67457. function TCAN1_C1FIFOCON5.getRTREN : TBits_1; inline;
  67458. begin
  67459. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  67460. end;
  67461. procedure TCAN1_C1FIFOCON5.setTXREQ; inline;
  67462. begin
  67463. pTDefRegMap(@Self)^.&set := $00000008;
  67464. end;
  67465. procedure TCAN1_C1FIFOCON5.clearTXREQ; inline;
  67466. begin
  67467. pTDefRegMap(@Self)^.clr := $00000008;
  67468. end;
  67469. procedure TCAN1_C1FIFOCON5.setTXREQ(thebits : TBits_1); inline;
  67470. begin
  67471. if thebits = 0 then
  67472. pTDefRegMap(@Self)^.clr := $00000008
  67473. else
  67474. pTDefRegMap(@Self)^.&set := $00000008;
  67475. end;
  67476. function TCAN1_C1FIFOCON5.getTXREQ : TBits_1; inline;
  67477. begin
  67478. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  67479. end;
  67480. procedure TCAN1_C1FIFOCON5.setTXERR; inline;
  67481. begin
  67482. pTDefRegMap(@Self)^.&set := $00000010;
  67483. end;
  67484. procedure TCAN1_C1FIFOCON5.clearTXERR; inline;
  67485. begin
  67486. pTDefRegMap(@Self)^.clr := $00000010;
  67487. end;
  67488. procedure TCAN1_C1FIFOCON5.setTXERR(thebits : TBits_1); inline;
  67489. begin
  67490. if thebits = 0 then
  67491. pTDefRegMap(@Self)^.clr := $00000010
  67492. else
  67493. pTDefRegMap(@Self)^.&set := $00000010;
  67494. end;
  67495. function TCAN1_C1FIFOCON5.getTXERR : TBits_1; inline;
  67496. begin
  67497. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  67498. end;
  67499. procedure TCAN1_C1FIFOCON5.setTXLARB; inline;
  67500. begin
  67501. pTDefRegMap(@Self)^.&set := $00000020;
  67502. end;
  67503. procedure TCAN1_C1FIFOCON5.clearTXLARB; inline;
  67504. begin
  67505. pTDefRegMap(@Self)^.clr := $00000020;
  67506. end;
  67507. procedure TCAN1_C1FIFOCON5.setTXLARB(thebits : TBits_1); inline;
  67508. begin
  67509. if thebits = 0 then
  67510. pTDefRegMap(@Self)^.clr := $00000020
  67511. else
  67512. pTDefRegMap(@Self)^.&set := $00000020;
  67513. end;
  67514. function TCAN1_C1FIFOCON5.getTXLARB : TBits_1; inline;
  67515. begin
  67516. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  67517. end;
  67518. procedure TCAN1_C1FIFOCON5.setTXABAT; inline;
  67519. begin
  67520. pTDefRegMap(@Self)^.&set := $00000040;
  67521. end;
  67522. procedure TCAN1_C1FIFOCON5.clearTXABAT; inline;
  67523. begin
  67524. pTDefRegMap(@Self)^.clr := $00000040;
  67525. end;
  67526. procedure TCAN1_C1FIFOCON5.setTXABAT(thebits : TBits_1); inline;
  67527. begin
  67528. if thebits = 0 then
  67529. pTDefRegMap(@Self)^.clr := $00000040
  67530. else
  67531. pTDefRegMap(@Self)^.&set := $00000040;
  67532. end;
  67533. function TCAN1_C1FIFOCON5.getTXABAT : TBits_1; inline;
  67534. begin
  67535. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  67536. end;
  67537. procedure TCAN1_C1FIFOCON5.setTXEN; inline;
  67538. begin
  67539. pTDefRegMap(@Self)^.&set := $00000080;
  67540. end;
  67541. procedure TCAN1_C1FIFOCON5.clearTXEN; inline;
  67542. begin
  67543. pTDefRegMap(@Self)^.clr := $00000080;
  67544. end;
  67545. procedure TCAN1_C1FIFOCON5.setTXEN(thebits : TBits_1); inline;
  67546. begin
  67547. if thebits = 0 then
  67548. pTDefRegMap(@Self)^.clr := $00000080
  67549. else
  67550. pTDefRegMap(@Self)^.&set := $00000080;
  67551. end;
  67552. function TCAN1_C1FIFOCON5.getTXEN : TBits_1; inline;
  67553. begin
  67554. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  67555. end;
  67556. procedure TCAN1_C1FIFOCON5.setDONLY; inline;
  67557. begin
  67558. pTDefRegMap(@Self)^.&set := $00001000;
  67559. end;
  67560. procedure TCAN1_C1FIFOCON5.clearDONLY; inline;
  67561. begin
  67562. pTDefRegMap(@Self)^.clr := $00001000;
  67563. end;
  67564. procedure TCAN1_C1FIFOCON5.setDONLY(thebits : TBits_1); inline;
  67565. begin
  67566. if thebits = 0 then
  67567. pTDefRegMap(@Self)^.clr := $00001000
  67568. else
  67569. pTDefRegMap(@Self)^.&set := $00001000;
  67570. end;
  67571. function TCAN1_C1FIFOCON5.getDONLY : TBits_1; inline;
  67572. begin
  67573. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  67574. end;
  67575. procedure TCAN1_C1FIFOCON5.setUINC; inline;
  67576. begin
  67577. pTDefRegMap(@Self)^.&set := $00002000;
  67578. end;
  67579. procedure TCAN1_C1FIFOCON5.clearUINC; inline;
  67580. begin
  67581. pTDefRegMap(@Self)^.clr := $00002000;
  67582. end;
  67583. procedure TCAN1_C1FIFOCON5.setUINC(thebits : TBits_1); inline;
  67584. begin
  67585. if thebits = 0 then
  67586. pTDefRegMap(@Self)^.clr := $00002000
  67587. else
  67588. pTDefRegMap(@Self)^.&set := $00002000;
  67589. end;
  67590. function TCAN1_C1FIFOCON5.getUINC : TBits_1; inline;
  67591. begin
  67592. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  67593. end;
  67594. procedure TCAN1_C1FIFOCON5.setFRESET; inline;
  67595. begin
  67596. pTDefRegMap(@Self)^.&set := $00004000;
  67597. end;
  67598. procedure TCAN1_C1FIFOCON5.clearFRESET; inline;
  67599. begin
  67600. pTDefRegMap(@Self)^.clr := $00004000;
  67601. end;
  67602. procedure TCAN1_C1FIFOCON5.setFRESET(thebits : TBits_1); inline;
  67603. begin
  67604. if thebits = 0 then
  67605. pTDefRegMap(@Self)^.clr := $00004000
  67606. else
  67607. pTDefRegMap(@Self)^.&set := $00004000;
  67608. end;
  67609. function TCAN1_C1FIFOCON5.getFRESET : TBits_1; inline;
  67610. begin
  67611. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  67612. end;
  67613. procedure TCAN1_C1FIFOCON5.setFSIZE(thebits : TBits_5); inline;
  67614. begin
  67615. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  67616. end;
  67617. function TCAN1_C1FIFOCON5.getFSIZE : TBits_5; inline;
  67618. begin
  67619. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  67620. end;
  67621. procedure TCAN1_C1FIFOCON5.setw(thebits : TBits_32); inline;
  67622. begin
  67623. pTDefRegMap(@Self)^.val := thebits;
  67624. end;
  67625. function TCAN1_C1FIFOCON5.getw : TBits_32; inline;
  67626. begin
  67627. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67628. end;
  67629. procedure TCAN1_C1FIFOINT5.setRXNEMPTYIF; inline;
  67630. begin
  67631. pTDefRegMap(@Self)^.&set := $00000001;
  67632. end;
  67633. procedure TCAN1_C1FIFOINT5.clearRXNEMPTYIF; inline;
  67634. begin
  67635. pTDefRegMap(@Self)^.clr := $00000001;
  67636. end;
  67637. procedure TCAN1_C1FIFOINT5.setRXNEMPTYIF(thebits : TBits_1); inline;
  67638. begin
  67639. if thebits = 0 then
  67640. pTDefRegMap(@Self)^.clr := $00000001
  67641. else
  67642. pTDefRegMap(@Self)^.&set := $00000001;
  67643. end;
  67644. function TCAN1_C1FIFOINT5.getRXNEMPTYIF : TBits_1; inline;
  67645. begin
  67646. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  67647. end;
  67648. procedure TCAN1_C1FIFOINT5.setRXHALFIF; inline;
  67649. begin
  67650. pTDefRegMap(@Self)^.&set := $00000002;
  67651. end;
  67652. procedure TCAN1_C1FIFOINT5.clearRXHALFIF; inline;
  67653. begin
  67654. pTDefRegMap(@Self)^.clr := $00000002;
  67655. end;
  67656. procedure TCAN1_C1FIFOINT5.setRXHALFIF(thebits : TBits_1); inline;
  67657. begin
  67658. if thebits = 0 then
  67659. pTDefRegMap(@Self)^.clr := $00000002
  67660. else
  67661. pTDefRegMap(@Self)^.&set := $00000002;
  67662. end;
  67663. function TCAN1_C1FIFOINT5.getRXHALFIF : TBits_1; inline;
  67664. begin
  67665. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  67666. end;
  67667. procedure TCAN1_C1FIFOINT5.setRXFULLIF; inline;
  67668. begin
  67669. pTDefRegMap(@Self)^.&set := $00000004;
  67670. end;
  67671. procedure TCAN1_C1FIFOINT5.clearRXFULLIF; inline;
  67672. begin
  67673. pTDefRegMap(@Self)^.clr := $00000004;
  67674. end;
  67675. procedure TCAN1_C1FIFOINT5.setRXFULLIF(thebits : TBits_1); inline;
  67676. begin
  67677. if thebits = 0 then
  67678. pTDefRegMap(@Self)^.clr := $00000004
  67679. else
  67680. pTDefRegMap(@Self)^.&set := $00000004;
  67681. end;
  67682. function TCAN1_C1FIFOINT5.getRXFULLIF : TBits_1; inline;
  67683. begin
  67684. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  67685. end;
  67686. procedure TCAN1_C1FIFOINT5.setRXOVFLIF; inline;
  67687. begin
  67688. pTDefRegMap(@Self)^.&set := $00000008;
  67689. end;
  67690. procedure TCAN1_C1FIFOINT5.clearRXOVFLIF; inline;
  67691. begin
  67692. pTDefRegMap(@Self)^.clr := $00000008;
  67693. end;
  67694. procedure TCAN1_C1FIFOINT5.setRXOVFLIF(thebits : TBits_1); inline;
  67695. begin
  67696. if thebits = 0 then
  67697. pTDefRegMap(@Self)^.clr := $00000008
  67698. else
  67699. pTDefRegMap(@Self)^.&set := $00000008;
  67700. end;
  67701. function TCAN1_C1FIFOINT5.getRXOVFLIF : TBits_1; inline;
  67702. begin
  67703. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  67704. end;
  67705. procedure TCAN1_C1FIFOINT5.setTXEMPTYIF; inline;
  67706. begin
  67707. pTDefRegMap(@Self)^.&set := $00000100;
  67708. end;
  67709. procedure TCAN1_C1FIFOINT5.clearTXEMPTYIF; inline;
  67710. begin
  67711. pTDefRegMap(@Self)^.clr := $00000100;
  67712. end;
  67713. procedure TCAN1_C1FIFOINT5.setTXEMPTYIF(thebits : TBits_1); inline;
  67714. begin
  67715. if thebits = 0 then
  67716. pTDefRegMap(@Self)^.clr := $00000100
  67717. else
  67718. pTDefRegMap(@Self)^.&set := $00000100;
  67719. end;
  67720. function TCAN1_C1FIFOINT5.getTXEMPTYIF : TBits_1; inline;
  67721. begin
  67722. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  67723. end;
  67724. procedure TCAN1_C1FIFOINT5.setTXHALFIF; inline;
  67725. begin
  67726. pTDefRegMap(@Self)^.&set := $00000200;
  67727. end;
  67728. procedure TCAN1_C1FIFOINT5.clearTXHALFIF; inline;
  67729. begin
  67730. pTDefRegMap(@Self)^.clr := $00000200;
  67731. end;
  67732. procedure TCAN1_C1FIFOINT5.setTXHALFIF(thebits : TBits_1); inline;
  67733. begin
  67734. if thebits = 0 then
  67735. pTDefRegMap(@Self)^.clr := $00000200
  67736. else
  67737. pTDefRegMap(@Self)^.&set := $00000200;
  67738. end;
  67739. function TCAN1_C1FIFOINT5.getTXHALFIF : TBits_1; inline;
  67740. begin
  67741. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  67742. end;
  67743. procedure TCAN1_C1FIFOINT5.setTXNFULLIF; inline;
  67744. begin
  67745. pTDefRegMap(@Self)^.&set := $00000400;
  67746. end;
  67747. procedure TCAN1_C1FIFOINT5.clearTXNFULLIF; inline;
  67748. begin
  67749. pTDefRegMap(@Self)^.clr := $00000400;
  67750. end;
  67751. procedure TCAN1_C1FIFOINT5.setTXNFULLIF(thebits : TBits_1); inline;
  67752. begin
  67753. if thebits = 0 then
  67754. pTDefRegMap(@Self)^.clr := $00000400
  67755. else
  67756. pTDefRegMap(@Self)^.&set := $00000400;
  67757. end;
  67758. function TCAN1_C1FIFOINT5.getTXNFULLIF : TBits_1; inline;
  67759. begin
  67760. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  67761. end;
  67762. procedure TCAN1_C1FIFOINT5.setRXNEMPTYIE; inline;
  67763. begin
  67764. pTDefRegMap(@Self)^.&set := $00010000;
  67765. end;
  67766. procedure TCAN1_C1FIFOINT5.clearRXNEMPTYIE; inline;
  67767. begin
  67768. pTDefRegMap(@Self)^.clr := $00010000;
  67769. end;
  67770. procedure TCAN1_C1FIFOINT5.setRXNEMPTYIE(thebits : TBits_1); inline;
  67771. begin
  67772. if thebits = 0 then
  67773. pTDefRegMap(@Self)^.clr := $00010000
  67774. else
  67775. pTDefRegMap(@Self)^.&set := $00010000;
  67776. end;
  67777. function TCAN1_C1FIFOINT5.getRXNEMPTYIE : TBits_1; inline;
  67778. begin
  67779. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  67780. end;
  67781. procedure TCAN1_C1FIFOINT5.setRXHALFIE; inline;
  67782. begin
  67783. pTDefRegMap(@Self)^.&set := $00020000;
  67784. end;
  67785. procedure TCAN1_C1FIFOINT5.clearRXHALFIE; inline;
  67786. begin
  67787. pTDefRegMap(@Self)^.clr := $00020000;
  67788. end;
  67789. procedure TCAN1_C1FIFOINT5.setRXHALFIE(thebits : TBits_1); inline;
  67790. begin
  67791. if thebits = 0 then
  67792. pTDefRegMap(@Self)^.clr := $00020000
  67793. else
  67794. pTDefRegMap(@Self)^.&set := $00020000;
  67795. end;
  67796. function TCAN1_C1FIFOINT5.getRXHALFIE : TBits_1; inline;
  67797. begin
  67798. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  67799. end;
  67800. procedure TCAN1_C1FIFOINT5.setRXFULLIE; inline;
  67801. begin
  67802. pTDefRegMap(@Self)^.&set := $00040000;
  67803. end;
  67804. procedure TCAN1_C1FIFOINT5.clearRXFULLIE; inline;
  67805. begin
  67806. pTDefRegMap(@Self)^.clr := $00040000;
  67807. end;
  67808. procedure TCAN1_C1FIFOINT5.setRXFULLIE(thebits : TBits_1); inline;
  67809. begin
  67810. if thebits = 0 then
  67811. pTDefRegMap(@Self)^.clr := $00040000
  67812. else
  67813. pTDefRegMap(@Self)^.&set := $00040000;
  67814. end;
  67815. function TCAN1_C1FIFOINT5.getRXFULLIE : TBits_1; inline;
  67816. begin
  67817. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  67818. end;
  67819. procedure TCAN1_C1FIFOINT5.setRXOVFLIE; inline;
  67820. begin
  67821. pTDefRegMap(@Self)^.&set := $00080000;
  67822. end;
  67823. procedure TCAN1_C1FIFOINT5.clearRXOVFLIE; inline;
  67824. begin
  67825. pTDefRegMap(@Self)^.clr := $00080000;
  67826. end;
  67827. procedure TCAN1_C1FIFOINT5.setRXOVFLIE(thebits : TBits_1); inline;
  67828. begin
  67829. if thebits = 0 then
  67830. pTDefRegMap(@Self)^.clr := $00080000
  67831. else
  67832. pTDefRegMap(@Self)^.&set := $00080000;
  67833. end;
  67834. function TCAN1_C1FIFOINT5.getRXOVFLIE : TBits_1; inline;
  67835. begin
  67836. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  67837. end;
  67838. procedure TCAN1_C1FIFOINT5.setTXEMPTYIE; inline;
  67839. begin
  67840. pTDefRegMap(@Self)^.&set := $01000000;
  67841. end;
  67842. procedure TCAN1_C1FIFOINT5.clearTXEMPTYIE; inline;
  67843. begin
  67844. pTDefRegMap(@Self)^.clr := $01000000;
  67845. end;
  67846. procedure TCAN1_C1FIFOINT5.setTXEMPTYIE(thebits : TBits_1); inline;
  67847. begin
  67848. if thebits = 0 then
  67849. pTDefRegMap(@Self)^.clr := $01000000
  67850. else
  67851. pTDefRegMap(@Self)^.&set := $01000000;
  67852. end;
  67853. function TCAN1_C1FIFOINT5.getTXEMPTYIE : TBits_1; inline;
  67854. begin
  67855. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  67856. end;
  67857. procedure TCAN1_C1FIFOINT5.setTXHALFIE; inline;
  67858. begin
  67859. pTDefRegMap(@Self)^.&set := $02000000;
  67860. end;
  67861. procedure TCAN1_C1FIFOINT5.clearTXHALFIE; inline;
  67862. begin
  67863. pTDefRegMap(@Self)^.clr := $02000000;
  67864. end;
  67865. procedure TCAN1_C1FIFOINT5.setTXHALFIE(thebits : TBits_1); inline;
  67866. begin
  67867. if thebits = 0 then
  67868. pTDefRegMap(@Self)^.clr := $02000000
  67869. else
  67870. pTDefRegMap(@Self)^.&set := $02000000;
  67871. end;
  67872. function TCAN1_C1FIFOINT5.getTXHALFIE : TBits_1; inline;
  67873. begin
  67874. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  67875. end;
  67876. procedure TCAN1_C1FIFOINT5.setTXNFULLIE; inline;
  67877. begin
  67878. pTDefRegMap(@Self)^.&set := $04000000;
  67879. end;
  67880. procedure TCAN1_C1FIFOINT5.clearTXNFULLIE; inline;
  67881. begin
  67882. pTDefRegMap(@Self)^.clr := $04000000;
  67883. end;
  67884. procedure TCAN1_C1FIFOINT5.setTXNFULLIE(thebits : TBits_1); inline;
  67885. begin
  67886. if thebits = 0 then
  67887. pTDefRegMap(@Self)^.clr := $04000000
  67888. else
  67889. pTDefRegMap(@Self)^.&set := $04000000;
  67890. end;
  67891. function TCAN1_C1FIFOINT5.getTXNFULLIE : TBits_1; inline;
  67892. begin
  67893. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  67894. end;
  67895. procedure TCAN1_C1FIFOINT5.setw(thebits : TBits_32); inline;
  67896. begin
  67897. pTDefRegMap(@Self)^.val := thebits;
  67898. end;
  67899. function TCAN1_C1FIFOINT5.getw : TBits_32; inline;
  67900. begin
  67901. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67902. end;
  67903. procedure TCAN1_C1FIFOCI5.setCFIFOCI(thebits : TBits_5); inline;
  67904. begin
  67905. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  67906. end;
  67907. function TCAN1_C1FIFOCI5.getCFIFOCI : TBits_5; inline;
  67908. begin
  67909. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  67910. end;
  67911. procedure TCAN1_C1FIFOCI5.setw(thebits : TBits_32); inline;
  67912. begin
  67913. pTDefRegMap(@Self)^.val := thebits;
  67914. end;
  67915. function TCAN1_C1FIFOCI5.getw : TBits_32; inline;
  67916. begin
  67917. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67918. end;
  67919. procedure TCAN1_C1FIFOCON6.setTXPRI(thebits : TBits_2); inline;
  67920. begin
  67921. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  67922. end;
  67923. function TCAN1_C1FIFOCON6.getTXPRI : TBits_2; inline;
  67924. begin
  67925. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  67926. end;
  67927. procedure TCAN1_C1FIFOCON6.setRTREN; inline;
  67928. begin
  67929. pTDefRegMap(@Self)^.&set := $00000004;
  67930. end;
  67931. procedure TCAN1_C1FIFOCON6.clearRTREN; inline;
  67932. begin
  67933. pTDefRegMap(@Self)^.clr := $00000004;
  67934. end;
  67935. procedure TCAN1_C1FIFOCON6.setRTREN(thebits : TBits_1); inline;
  67936. begin
  67937. if thebits = 0 then
  67938. pTDefRegMap(@Self)^.clr := $00000004
  67939. else
  67940. pTDefRegMap(@Self)^.&set := $00000004;
  67941. end;
  67942. function TCAN1_C1FIFOCON6.getRTREN : TBits_1; inline;
  67943. begin
  67944. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  67945. end;
  67946. procedure TCAN1_C1FIFOCON6.setTXREQ; inline;
  67947. begin
  67948. pTDefRegMap(@Self)^.&set := $00000008;
  67949. end;
  67950. procedure TCAN1_C1FIFOCON6.clearTXREQ; inline;
  67951. begin
  67952. pTDefRegMap(@Self)^.clr := $00000008;
  67953. end;
  67954. procedure TCAN1_C1FIFOCON6.setTXREQ(thebits : TBits_1); inline;
  67955. begin
  67956. if thebits = 0 then
  67957. pTDefRegMap(@Self)^.clr := $00000008
  67958. else
  67959. pTDefRegMap(@Self)^.&set := $00000008;
  67960. end;
  67961. function TCAN1_C1FIFOCON6.getTXREQ : TBits_1; inline;
  67962. begin
  67963. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  67964. end;
  67965. procedure TCAN1_C1FIFOCON6.setTXERR; inline;
  67966. begin
  67967. pTDefRegMap(@Self)^.&set := $00000010;
  67968. end;
  67969. procedure TCAN1_C1FIFOCON6.clearTXERR; inline;
  67970. begin
  67971. pTDefRegMap(@Self)^.clr := $00000010;
  67972. end;
  67973. procedure TCAN1_C1FIFOCON6.setTXERR(thebits : TBits_1); inline;
  67974. begin
  67975. if thebits = 0 then
  67976. pTDefRegMap(@Self)^.clr := $00000010
  67977. else
  67978. pTDefRegMap(@Self)^.&set := $00000010;
  67979. end;
  67980. function TCAN1_C1FIFOCON6.getTXERR : TBits_1; inline;
  67981. begin
  67982. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  67983. end;
  67984. procedure TCAN1_C1FIFOCON6.setTXLARB; inline;
  67985. begin
  67986. pTDefRegMap(@Self)^.&set := $00000020;
  67987. end;
  67988. procedure TCAN1_C1FIFOCON6.clearTXLARB; inline;
  67989. begin
  67990. pTDefRegMap(@Self)^.clr := $00000020;
  67991. end;
  67992. procedure TCAN1_C1FIFOCON6.setTXLARB(thebits : TBits_1); inline;
  67993. begin
  67994. if thebits = 0 then
  67995. pTDefRegMap(@Self)^.clr := $00000020
  67996. else
  67997. pTDefRegMap(@Self)^.&set := $00000020;
  67998. end;
  67999. function TCAN1_C1FIFOCON6.getTXLARB : TBits_1; inline;
  68000. begin
  68001. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  68002. end;
  68003. procedure TCAN1_C1FIFOCON6.setTXABAT; inline;
  68004. begin
  68005. pTDefRegMap(@Self)^.&set := $00000040;
  68006. end;
  68007. procedure TCAN1_C1FIFOCON6.clearTXABAT; inline;
  68008. begin
  68009. pTDefRegMap(@Self)^.clr := $00000040;
  68010. end;
  68011. procedure TCAN1_C1FIFOCON6.setTXABAT(thebits : TBits_1); inline;
  68012. begin
  68013. if thebits = 0 then
  68014. pTDefRegMap(@Self)^.clr := $00000040
  68015. else
  68016. pTDefRegMap(@Self)^.&set := $00000040;
  68017. end;
  68018. function TCAN1_C1FIFOCON6.getTXABAT : TBits_1; inline;
  68019. begin
  68020. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  68021. end;
  68022. procedure TCAN1_C1FIFOCON6.setTXEN; inline;
  68023. begin
  68024. pTDefRegMap(@Self)^.&set := $00000080;
  68025. end;
  68026. procedure TCAN1_C1FIFOCON6.clearTXEN; inline;
  68027. begin
  68028. pTDefRegMap(@Self)^.clr := $00000080;
  68029. end;
  68030. procedure TCAN1_C1FIFOCON6.setTXEN(thebits : TBits_1); inline;
  68031. begin
  68032. if thebits = 0 then
  68033. pTDefRegMap(@Self)^.clr := $00000080
  68034. else
  68035. pTDefRegMap(@Self)^.&set := $00000080;
  68036. end;
  68037. function TCAN1_C1FIFOCON6.getTXEN : TBits_1; inline;
  68038. begin
  68039. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  68040. end;
  68041. procedure TCAN1_C1FIFOCON6.setDONLY; inline;
  68042. begin
  68043. pTDefRegMap(@Self)^.&set := $00001000;
  68044. end;
  68045. procedure TCAN1_C1FIFOCON6.clearDONLY; inline;
  68046. begin
  68047. pTDefRegMap(@Self)^.clr := $00001000;
  68048. end;
  68049. procedure TCAN1_C1FIFOCON6.setDONLY(thebits : TBits_1); inline;
  68050. begin
  68051. if thebits = 0 then
  68052. pTDefRegMap(@Self)^.clr := $00001000
  68053. else
  68054. pTDefRegMap(@Self)^.&set := $00001000;
  68055. end;
  68056. function TCAN1_C1FIFOCON6.getDONLY : TBits_1; inline;
  68057. begin
  68058. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  68059. end;
  68060. procedure TCAN1_C1FIFOCON6.setUINC; inline;
  68061. begin
  68062. pTDefRegMap(@Self)^.&set := $00002000;
  68063. end;
  68064. procedure TCAN1_C1FIFOCON6.clearUINC; inline;
  68065. begin
  68066. pTDefRegMap(@Self)^.clr := $00002000;
  68067. end;
  68068. procedure TCAN1_C1FIFOCON6.setUINC(thebits : TBits_1); inline;
  68069. begin
  68070. if thebits = 0 then
  68071. pTDefRegMap(@Self)^.clr := $00002000
  68072. else
  68073. pTDefRegMap(@Self)^.&set := $00002000;
  68074. end;
  68075. function TCAN1_C1FIFOCON6.getUINC : TBits_1; inline;
  68076. begin
  68077. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  68078. end;
  68079. procedure TCAN1_C1FIFOCON6.setFRESET; inline;
  68080. begin
  68081. pTDefRegMap(@Self)^.&set := $00004000;
  68082. end;
  68083. procedure TCAN1_C1FIFOCON6.clearFRESET; inline;
  68084. begin
  68085. pTDefRegMap(@Self)^.clr := $00004000;
  68086. end;
  68087. procedure TCAN1_C1FIFOCON6.setFRESET(thebits : TBits_1); inline;
  68088. begin
  68089. if thebits = 0 then
  68090. pTDefRegMap(@Self)^.clr := $00004000
  68091. else
  68092. pTDefRegMap(@Self)^.&set := $00004000;
  68093. end;
  68094. function TCAN1_C1FIFOCON6.getFRESET : TBits_1; inline;
  68095. begin
  68096. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  68097. end;
  68098. procedure TCAN1_C1FIFOCON6.setFSIZE(thebits : TBits_5); inline;
  68099. begin
  68100. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  68101. end;
  68102. function TCAN1_C1FIFOCON6.getFSIZE : TBits_5; inline;
  68103. begin
  68104. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  68105. end;
  68106. procedure TCAN1_C1FIFOCON6.setw(thebits : TBits_32); inline;
  68107. begin
  68108. pTDefRegMap(@Self)^.val := thebits;
  68109. end;
  68110. function TCAN1_C1FIFOCON6.getw : TBits_32; inline;
  68111. begin
  68112. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68113. end;
  68114. procedure TCAN1_C1FIFOINT6.setRXNEMPTYIF; inline;
  68115. begin
  68116. pTDefRegMap(@Self)^.&set := $00000001;
  68117. end;
  68118. procedure TCAN1_C1FIFOINT6.clearRXNEMPTYIF; inline;
  68119. begin
  68120. pTDefRegMap(@Self)^.clr := $00000001;
  68121. end;
  68122. procedure TCAN1_C1FIFOINT6.setRXNEMPTYIF(thebits : TBits_1); inline;
  68123. begin
  68124. if thebits = 0 then
  68125. pTDefRegMap(@Self)^.clr := $00000001
  68126. else
  68127. pTDefRegMap(@Self)^.&set := $00000001;
  68128. end;
  68129. function TCAN1_C1FIFOINT6.getRXNEMPTYIF : TBits_1; inline;
  68130. begin
  68131. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  68132. end;
  68133. procedure TCAN1_C1FIFOINT6.setRXHALFIF; inline;
  68134. begin
  68135. pTDefRegMap(@Self)^.&set := $00000002;
  68136. end;
  68137. procedure TCAN1_C1FIFOINT6.clearRXHALFIF; inline;
  68138. begin
  68139. pTDefRegMap(@Self)^.clr := $00000002;
  68140. end;
  68141. procedure TCAN1_C1FIFOINT6.setRXHALFIF(thebits : TBits_1); inline;
  68142. begin
  68143. if thebits = 0 then
  68144. pTDefRegMap(@Self)^.clr := $00000002
  68145. else
  68146. pTDefRegMap(@Self)^.&set := $00000002;
  68147. end;
  68148. function TCAN1_C1FIFOINT6.getRXHALFIF : TBits_1; inline;
  68149. begin
  68150. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  68151. end;
  68152. procedure TCAN1_C1FIFOINT6.setRXFULLIF; inline;
  68153. begin
  68154. pTDefRegMap(@Self)^.&set := $00000004;
  68155. end;
  68156. procedure TCAN1_C1FIFOINT6.clearRXFULLIF; inline;
  68157. begin
  68158. pTDefRegMap(@Self)^.clr := $00000004;
  68159. end;
  68160. procedure TCAN1_C1FIFOINT6.setRXFULLIF(thebits : TBits_1); inline;
  68161. begin
  68162. if thebits = 0 then
  68163. pTDefRegMap(@Self)^.clr := $00000004
  68164. else
  68165. pTDefRegMap(@Self)^.&set := $00000004;
  68166. end;
  68167. function TCAN1_C1FIFOINT6.getRXFULLIF : TBits_1; inline;
  68168. begin
  68169. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  68170. end;
  68171. procedure TCAN1_C1FIFOINT6.setRXOVFLIF; inline;
  68172. begin
  68173. pTDefRegMap(@Self)^.&set := $00000008;
  68174. end;
  68175. procedure TCAN1_C1FIFOINT6.clearRXOVFLIF; inline;
  68176. begin
  68177. pTDefRegMap(@Self)^.clr := $00000008;
  68178. end;
  68179. procedure TCAN1_C1FIFOINT6.setRXOVFLIF(thebits : TBits_1); inline;
  68180. begin
  68181. if thebits = 0 then
  68182. pTDefRegMap(@Self)^.clr := $00000008
  68183. else
  68184. pTDefRegMap(@Self)^.&set := $00000008;
  68185. end;
  68186. function TCAN1_C1FIFOINT6.getRXOVFLIF : TBits_1; inline;
  68187. begin
  68188. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  68189. end;
  68190. procedure TCAN1_C1FIFOINT6.setTXEMPTYIF; inline;
  68191. begin
  68192. pTDefRegMap(@Self)^.&set := $00000100;
  68193. end;
  68194. procedure TCAN1_C1FIFOINT6.clearTXEMPTYIF; inline;
  68195. begin
  68196. pTDefRegMap(@Self)^.clr := $00000100;
  68197. end;
  68198. procedure TCAN1_C1FIFOINT6.setTXEMPTYIF(thebits : TBits_1); inline;
  68199. begin
  68200. if thebits = 0 then
  68201. pTDefRegMap(@Self)^.clr := $00000100
  68202. else
  68203. pTDefRegMap(@Self)^.&set := $00000100;
  68204. end;
  68205. function TCAN1_C1FIFOINT6.getTXEMPTYIF : TBits_1; inline;
  68206. begin
  68207. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  68208. end;
  68209. procedure TCAN1_C1FIFOINT6.setTXHALFIF; inline;
  68210. begin
  68211. pTDefRegMap(@Self)^.&set := $00000200;
  68212. end;
  68213. procedure TCAN1_C1FIFOINT6.clearTXHALFIF; inline;
  68214. begin
  68215. pTDefRegMap(@Self)^.clr := $00000200;
  68216. end;
  68217. procedure TCAN1_C1FIFOINT6.setTXHALFIF(thebits : TBits_1); inline;
  68218. begin
  68219. if thebits = 0 then
  68220. pTDefRegMap(@Self)^.clr := $00000200
  68221. else
  68222. pTDefRegMap(@Self)^.&set := $00000200;
  68223. end;
  68224. function TCAN1_C1FIFOINT6.getTXHALFIF : TBits_1; inline;
  68225. begin
  68226. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  68227. end;
  68228. procedure TCAN1_C1FIFOINT6.setTXNFULLIF; inline;
  68229. begin
  68230. pTDefRegMap(@Self)^.&set := $00000400;
  68231. end;
  68232. procedure TCAN1_C1FIFOINT6.clearTXNFULLIF; inline;
  68233. begin
  68234. pTDefRegMap(@Self)^.clr := $00000400;
  68235. end;
  68236. procedure TCAN1_C1FIFOINT6.setTXNFULLIF(thebits : TBits_1); inline;
  68237. begin
  68238. if thebits = 0 then
  68239. pTDefRegMap(@Self)^.clr := $00000400
  68240. else
  68241. pTDefRegMap(@Self)^.&set := $00000400;
  68242. end;
  68243. function TCAN1_C1FIFOINT6.getTXNFULLIF : TBits_1; inline;
  68244. begin
  68245. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  68246. end;
  68247. procedure TCAN1_C1FIFOINT6.setRXNEMPTYIE; inline;
  68248. begin
  68249. pTDefRegMap(@Self)^.&set := $00010000;
  68250. end;
  68251. procedure TCAN1_C1FIFOINT6.clearRXNEMPTYIE; inline;
  68252. begin
  68253. pTDefRegMap(@Self)^.clr := $00010000;
  68254. end;
  68255. procedure TCAN1_C1FIFOINT6.setRXNEMPTYIE(thebits : TBits_1); inline;
  68256. begin
  68257. if thebits = 0 then
  68258. pTDefRegMap(@Self)^.clr := $00010000
  68259. else
  68260. pTDefRegMap(@Self)^.&set := $00010000;
  68261. end;
  68262. function TCAN1_C1FIFOINT6.getRXNEMPTYIE : TBits_1; inline;
  68263. begin
  68264. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  68265. end;
  68266. procedure TCAN1_C1FIFOINT6.setRXHALFIE; inline;
  68267. begin
  68268. pTDefRegMap(@Self)^.&set := $00020000;
  68269. end;
  68270. procedure TCAN1_C1FIFOINT6.clearRXHALFIE; inline;
  68271. begin
  68272. pTDefRegMap(@Self)^.clr := $00020000;
  68273. end;
  68274. procedure TCAN1_C1FIFOINT6.setRXHALFIE(thebits : TBits_1); inline;
  68275. begin
  68276. if thebits = 0 then
  68277. pTDefRegMap(@Self)^.clr := $00020000
  68278. else
  68279. pTDefRegMap(@Self)^.&set := $00020000;
  68280. end;
  68281. function TCAN1_C1FIFOINT6.getRXHALFIE : TBits_1; inline;
  68282. begin
  68283. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  68284. end;
  68285. procedure TCAN1_C1FIFOINT6.setRXFULLIE; inline;
  68286. begin
  68287. pTDefRegMap(@Self)^.&set := $00040000;
  68288. end;
  68289. procedure TCAN1_C1FIFOINT6.clearRXFULLIE; inline;
  68290. begin
  68291. pTDefRegMap(@Self)^.clr := $00040000;
  68292. end;
  68293. procedure TCAN1_C1FIFOINT6.setRXFULLIE(thebits : TBits_1); inline;
  68294. begin
  68295. if thebits = 0 then
  68296. pTDefRegMap(@Self)^.clr := $00040000
  68297. else
  68298. pTDefRegMap(@Self)^.&set := $00040000;
  68299. end;
  68300. function TCAN1_C1FIFOINT6.getRXFULLIE : TBits_1; inline;
  68301. begin
  68302. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  68303. end;
  68304. procedure TCAN1_C1FIFOINT6.setRXOVFLIE; inline;
  68305. begin
  68306. pTDefRegMap(@Self)^.&set := $00080000;
  68307. end;
  68308. procedure TCAN1_C1FIFOINT6.clearRXOVFLIE; inline;
  68309. begin
  68310. pTDefRegMap(@Self)^.clr := $00080000;
  68311. end;
  68312. procedure TCAN1_C1FIFOINT6.setRXOVFLIE(thebits : TBits_1); inline;
  68313. begin
  68314. if thebits = 0 then
  68315. pTDefRegMap(@Self)^.clr := $00080000
  68316. else
  68317. pTDefRegMap(@Self)^.&set := $00080000;
  68318. end;
  68319. function TCAN1_C1FIFOINT6.getRXOVFLIE : TBits_1; inline;
  68320. begin
  68321. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  68322. end;
  68323. procedure TCAN1_C1FIFOINT6.setTXEMPTYIE; inline;
  68324. begin
  68325. pTDefRegMap(@Self)^.&set := $01000000;
  68326. end;
  68327. procedure TCAN1_C1FIFOINT6.clearTXEMPTYIE; inline;
  68328. begin
  68329. pTDefRegMap(@Self)^.clr := $01000000;
  68330. end;
  68331. procedure TCAN1_C1FIFOINT6.setTXEMPTYIE(thebits : TBits_1); inline;
  68332. begin
  68333. if thebits = 0 then
  68334. pTDefRegMap(@Self)^.clr := $01000000
  68335. else
  68336. pTDefRegMap(@Self)^.&set := $01000000;
  68337. end;
  68338. function TCAN1_C1FIFOINT6.getTXEMPTYIE : TBits_1; inline;
  68339. begin
  68340. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  68341. end;
  68342. procedure TCAN1_C1FIFOINT6.setTXHALFIE; inline;
  68343. begin
  68344. pTDefRegMap(@Self)^.&set := $02000000;
  68345. end;
  68346. procedure TCAN1_C1FIFOINT6.clearTXHALFIE; inline;
  68347. begin
  68348. pTDefRegMap(@Self)^.clr := $02000000;
  68349. end;
  68350. procedure TCAN1_C1FIFOINT6.setTXHALFIE(thebits : TBits_1); inline;
  68351. begin
  68352. if thebits = 0 then
  68353. pTDefRegMap(@Self)^.clr := $02000000
  68354. else
  68355. pTDefRegMap(@Self)^.&set := $02000000;
  68356. end;
  68357. function TCAN1_C1FIFOINT6.getTXHALFIE : TBits_1; inline;
  68358. begin
  68359. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  68360. end;
  68361. procedure TCAN1_C1FIFOINT6.setTXNFULLIE; inline;
  68362. begin
  68363. pTDefRegMap(@Self)^.&set := $04000000;
  68364. end;
  68365. procedure TCAN1_C1FIFOINT6.clearTXNFULLIE; inline;
  68366. begin
  68367. pTDefRegMap(@Self)^.clr := $04000000;
  68368. end;
  68369. procedure TCAN1_C1FIFOINT6.setTXNFULLIE(thebits : TBits_1); inline;
  68370. begin
  68371. if thebits = 0 then
  68372. pTDefRegMap(@Self)^.clr := $04000000
  68373. else
  68374. pTDefRegMap(@Self)^.&set := $04000000;
  68375. end;
  68376. function TCAN1_C1FIFOINT6.getTXNFULLIE : TBits_1; inline;
  68377. begin
  68378. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  68379. end;
  68380. procedure TCAN1_C1FIFOINT6.setw(thebits : TBits_32); inline;
  68381. begin
  68382. pTDefRegMap(@Self)^.val := thebits;
  68383. end;
  68384. function TCAN1_C1FIFOINT6.getw : TBits_32; inline;
  68385. begin
  68386. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68387. end;
  68388. procedure TCAN1_C1FIFOCI6.setCFIFOCI(thebits : TBits_5); inline;
  68389. begin
  68390. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  68391. end;
  68392. function TCAN1_C1FIFOCI6.getCFIFOCI : TBits_5; inline;
  68393. begin
  68394. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  68395. end;
  68396. procedure TCAN1_C1FIFOCI6.setw(thebits : TBits_32); inline;
  68397. begin
  68398. pTDefRegMap(@Self)^.val := thebits;
  68399. end;
  68400. function TCAN1_C1FIFOCI6.getw : TBits_32; inline;
  68401. begin
  68402. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68403. end;
  68404. procedure TCAN1_C1FIFOCON7.setTXPRI(thebits : TBits_2); inline;
  68405. begin
  68406. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  68407. end;
  68408. function TCAN1_C1FIFOCON7.getTXPRI : TBits_2; inline;
  68409. begin
  68410. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  68411. end;
  68412. procedure TCAN1_C1FIFOCON7.setRTREN; inline;
  68413. begin
  68414. pTDefRegMap(@Self)^.&set := $00000004;
  68415. end;
  68416. procedure TCAN1_C1FIFOCON7.clearRTREN; inline;
  68417. begin
  68418. pTDefRegMap(@Self)^.clr := $00000004;
  68419. end;
  68420. procedure TCAN1_C1FIFOCON7.setRTREN(thebits : TBits_1); inline;
  68421. begin
  68422. if thebits = 0 then
  68423. pTDefRegMap(@Self)^.clr := $00000004
  68424. else
  68425. pTDefRegMap(@Self)^.&set := $00000004;
  68426. end;
  68427. function TCAN1_C1FIFOCON7.getRTREN : TBits_1; inline;
  68428. begin
  68429. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  68430. end;
  68431. procedure TCAN1_C1FIFOCON7.setTXREQ; inline;
  68432. begin
  68433. pTDefRegMap(@Self)^.&set := $00000008;
  68434. end;
  68435. procedure TCAN1_C1FIFOCON7.clearTXREQ; inline;
  68436. begin
  68437. pTDefRegMap(@Self)^.clr := $00000008;
  68438. end;
  68439. procedure TCAN1_C1FIFOCON7.setTXREQ(thebits : TBits_1); inline;
  68440. begin
  68441. if thebits = 0 then
  68442. pTDefRegMap(@Self)^.clr := $00000008
  68443. else
  68444. pTDefRegMap(@Self)^.&set := $00000008;
  68445. end;
  68446. function TCAN1_C1FIFOCON7.getTXREQ : TBits_1; inline;
  68447. begin
  68448. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  68449. end;
  68450. procedure TCAN1_C1FIFOCON7.setTXERR; inline;
  68451. begin
  68452. pTDefRegMap(@Self)^.&set := $00000010;
  68453. end;
  68454. procedure TCAN1_C1FIFOCON7.clearTXERR; inline;
  68455. begin
  68456. pTDefRegMap(@Self)^.clr := $00000010;
  68457. end;
  68458. procedure TCAN1_C1FIFOCON7.setTXERR(thebits : TBits_1); inline;
  68459. begin
  68460. if thebits = 0 then
  68461. pTDefRegMap(@Self)^.clr := $00000010
  68462. else
  68463. pTDefRegMap(@Self)^.&set := $00000010;
  68464. end;
  68465. function TCAN1_C1FIFOCON7.getTXERR : TBits_1; inline;
  68466. begin
  68467. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  68468. end;
  68469. procedure TCAN1_C1FIFOCON7.setTXLARB; inline;
  68470. begin
  68471. pTDefRegMap(@Self)^.&set := $00000020;
  68472. end;
  68473. procedure TCAN1_C1FIFOCON7.clearTXLARB; inline;
  68474. begin
  68475. pTDefRegMap(@Self)^.clr := $00000020;
  68476. end;
  68477. procedure TCAN1_C1FIFOCON7.setTXLARB(thebits : TBits_1); inline;
  68478. begin
  68479. if thebits = 0 then
  68480. pTDefRegMap(@Self)^.clr := $00000020
  68481. else
  68482. pTDefRegMap(@Self)^.&set := $00000020;
  68483. end;
  68484. function TCAN1_C1FIFOCON7.getTXLARB : TBits_1; inline;
  68485. begin
  68486. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  68487. end;
  68488. procedure TCAN1_C1FIFOCON7.setTXABAT; inline;
  68489. begin
  68490. pTDefRegMap(@Self)^.&set := $00000040;
  68491. end;
  68492. procedure TCAN1_C1FIFOCON7.clearTXABAT; inline;
  68493. begin
  68494. pTDefRegMap(@Self)^.clr := $00000040;
  68495. end;
  68496. procedure TCAN1_C1FIFOCON7.setTXABAT(thebits : TBits_1); inline;
  68497. begin
  68498. if thebits = 0 then
  68499. pTDefRegMap(@Self)^.clr := $00000040
  68500. else
  68501. pTDefRegMap(@Self)^.&set := $00000040;
  68502. end;
  68503. function TCAN1_C1FIFOCON7.getTXABAT : TBits_1; inline;
  68504. begin
  68505. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  68506. end;
  68507. procedure TCAN1_C1FIFOCON7.setTXEN; inline;
  68508. begin
  68509. pTDefRegMap(@Self)^.&set := $00000080;
  68510. end;
  68511. procedure TCAN1_C1FIFOCON7.clearTXEN; inline;
  68512. begin
  68513. pTDefRegMap(@Self)^.clr := $00000080;
  68514. end;
  68515. procedure TCAN1_C1FIFOCON7.setTXEN(thebits : TBits_1); inline;
  68516. begin
  68517. if thebits = 0 then
  68518. pTDefRegMap(@Self)^.clr := $00000080
  68519. else
  68520. pTDefRegMap(@Self)^.&set := $00000080;
  68521. end;
  68522. function TCAN1_C1FIFOCON7.getTXEN : TBits_1; inline;
  68523. begin
  68524. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  68525. end;
  68526. procedure TCAN1_C1FIFOCON7.setDONLY; inline;
  68527. begin
  68528. pTDefRegMap(@Self)^.&set := $00001000;
  68529. end;
  68530. procedure TCAN1_C1FIFOCON7.clearDONLY; inline;
  68531. begin
  68532. pTDefRegMap(@Self)^.clr := $00001000;
  68533. end;
  68534. procedure TCAN1_C1FIFOCON7.setDONLY(thebits : TBits_1); inline;
  68535. begin
  68536. if thebits = 0 then
  68537. pTDefRegMap(@Self)^.clr := $00001000
  68538. else
  68539. pTDefRegMap(@Self)^.&set := $00001000;
  68540. end;
  68541. function TCAN1_C1FIFOCON7.getDONLY : TBits_1; inline;
  68542. begin
  68543. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  68544. end;
  68545. procedure TCAN1_C1FIFOCON7.setUINC; inline;
  68546. begin
  68547. pTDefRegMap(@Self)^.&set := $00002000;
  68548. end;
  68549. procedure TCAN1_C1FIFOCON7.clearUINC; inline;
  68550. begin
  68551. pTDefRegMap(@Self)^.clr := $00002000;
  68552. end;
  68553. procedure TCAN1_C1FIFOCON7.setUINC(thebits : TBits_1); inline;
  68554. begin
  68555. if thebits = 0 then
  68556. pTDefRegMap(@Self)^.clr := $00002000
  68557. else
  68558. pTDefRegMap(@Self)^.&set := $00002000;
  68559. end;
  68560. function TCAN1_C1FIFOCON7.getUINC : TBits_1; inline;
  68561. begin
  68562. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  68563. end;
  68564. procedure TCAN1_C1FIFOCON7.setFRESET; inline;
  68565. begin
  68566. pTDefRegMap(@Self)^.&set := $00004000;
  68567. end;
  68568. procedure TCAN1_C1FIFOCON7.clearFRESET; inline;
  68569. begin
  68570. pTDefRegMap(@Self)^.clr := $00004000;
  68571. end;
  68572. procedure TCAN1_C1FIFOCON7.setFRESET(thebits : TBits_1); inline;
  68573. begin
  68574. if thebits = 0 then
  68575. pTDefRegMap(@Self)^.clr := $00004000
  68576. else
  68577. pTDefRegMap(@Self)^.&set := $00004000;
  68578. end;
  68579. function TCAN1_C1FIFOCON7.getFRESET : TBits_1; inline;
  68580. begin
  68581. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  68582. end;
  68583. procedure TCAN1_C1FIFOCON7.setFSIZE(thebits : TBits_5); inline;
  68584. begin
  68585. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  68586. end;
  68587. function TCAN1_C1FIFOCON7.getFSIZE : TBits_5; inline;
  68588. begin
  68589. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  68590. end;
  68591. procedure TCAN1_C1FIFOCON7.setw(thebits : TBits_32); inline;
  68592. begin
  68593. pTDefRegMap(@Self)^.val := thebits;
  68594. end;
  68595. function TCAN1_C1FIFOCON7.getw : TBits_32; inline;
  68596. begin
  68597. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68598. end;
  68599. procedure TCAN1_C1FIFOINT7.setRXNEMPTYIF; inline;
  68600. begin
  68601. pTDefRegMap(@Self)^.&set := $00000001;
  68602. end;
  68603. procedure TCAN1_C1FIFOINT7.clearRXNEMPTYIF; inline;
  68604. begin
  68605. pTDefRegMap(@Self)^.clr := $00000001;
  68606. end;
  68607. procedure TCAN1_C1FIFOINT7.setRXNEMPTYIF(thebits : TBits_1); inline;
  68608. begin
  68609. if thebits = 0 then
  68610. pTDefRegMap(@Self)^.clr := $00000001
  68611. else
  68612. pTDefRegMap(@Self)^.&set := $00000001;
  68613. end;
  68614. function TCAN1_C1FIFOINT7.getRXNEMPTYIF : TBits_1; inline;
  68615. begin
  68616. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  68617. end;
  68618. procedure TCAN1_C1FIFOINT7.setRXHALFIF; inline;
  68619. begin
  68620. pTDefRegMap(@Self)^.&set := $00000002;
  68621. end;
  68622. procedure TCAN1_C1FIFOINT7.clearRXHALFIF; inline;
  68623. begin
  68624. pTDefRegMap(@Self)^.clr := $00000002;
  68625. end;
  68626. procedure TCAN1_C1FIFOINT7.setRXHALFIF(thebits : TBits_1); inline;
  68627. begin
  68628. if thebits = 0 then
  68629. pTDefRegMap(@Self)^.clr := $00000002
  68630. else
  68631. pTDefRegMap(@Self)^.&set := $00000002;
  68632. end;
  68633. function TCAN1_C1FIFOINT7.getRXHALFIF : TBits_1; inline;
  68634. begin
  68635. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  68636. end;
  68637. procedure TCAN1_C1FIFOINT7.setRXFULLIF; inline;
  68638. begin
  68639. pTDefRegMap(@Self)^.&set := $00000004;
  68640. end;
  68641. procedure TCAN1_C1FIFOINT7.clearRXFULLIF; inline;
  68642. begin
  68643. pTDefRegMap(@Self)^.clr := $00000004;
  68644. end;
  68645. procedure TCAN1_C1FIFOINT7.setRXFULLIF(thebits : TBits_1); inline;
  68646. begin
  68647. if thebits = 0 then
  68648. pTDefRegMap(@Self)^.clr := $00000004
  68649. else
  68650. pTDefRegMap(@Self)^.&set := $00000004;
  68651. end;
  68652. function TCAN1_C1FIFOINT7.getRXFULLIF : TBits_1; inline;
  68653. begin
  68654. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  68655. end;
  68656. procedure TCAN1_C1FIFOINT7.setRXOVFLIF; inline;
  68657. begin
  68658. pTDefRegMap(@Self)^.&set := $00000008;
  68659. end;
  68660. procedure TCAN1_C1FIFOINT7.clearRXOVFLIF; inline;
  68661. begin
  68662. pTDefRegMap(@Self)^.clr := $00000008;
  68663. end;
  68664. procedure TCAN1_C1FIFOINT7.setRXOVFLIF(thebits : TBits_1); inline;
  68665. begin
  68666. if thebits = 0 then
  68667. pTDefRegMap(@Self)^.clr := $00000008
  68668. else
  68669. pTDefRegMap(@Self)^.&set := $00000008;
  68670. end;
  68671. function TCAN1_C1FIFOINT7.getRXOVFLIF : TBits_1; inline;
  68672. begin
  68673. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  68674. end;
  68675. procedure TCAN1_C1FIFOINT7.setTXEMPTYIF; inline;
  68676. begin
  68677. pTDefRegMap(@Self)^.&set := $00000100;
  68678. end;
  68679. procedure TCAN1_C1FIFOINT7.clearTXEMPTYIF; inline;
  68680. begin
  68681. pTDefRegMap(@Self)^.clr := $00000100;
  68682. end;
  68683. procedure TCAN1_C1FIFOINT7.setTXEMPTYIF(thebits : TBits_1); inline;
  68684. begin
  68685. if thebits = 0 then
  68686. pTDefRegMap(@Self)^.clr := $00000100
  68687. else
  68688. pTDefRegMap(@Self)^.&set := $00000100;
  68689. end;
  68690. function TCAN1_C1FIFOINT7.getTXEMPTYIF : TBits_1; inline;
  68691. begin
  68692. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  68693. end;
  68694. procedure TCAN1_C1FIFOINT7.setTXHALFIF; inline;
  68695. begin
  68696. pTDefRegMap(@Self)^.&set := $00000200;
  68697. end;
  68698. procedure TCAN1_C1FIFOINT7.clearTXHALFIF; inline;
  68699. begin
  68700. pTDefRegMap(@Self)^.clr := $00000200;
  68701. end;
  68702. procedure TCAN1_C1FIFOINT7.setTXHALFIF(thebits : TBits_1); inline;
  68703. begin
  68704. if thebits = 0 then
  68705. pTDefRegMap(@Self)^.clr := $00000200
  68706. else
  68707. pTDefRegMap(@Self)^.&set := $00000200;
  68708. end;
  68709. function TCAN1_C1FIFOINT7.getTXHALFIF : TBits_1; inline;
  68710. begin
  68711. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  68712. end;
  68713. procedure TCAN1_C1FIFOINT7.setTXNFULLIF; inline;
  68714. begin
  68715. pTDefRegMap(@Self)^.&set := $00000400;
  68716. end;
  68717. procedure TCAN1_C1FIFOINT7.clearTXNFULLIF; inline;
  68718. begin
  68719. pTDefRegMap(@Self)^.clr := $00000400;
  68720. end;
  68721. procedure TCAN1_C1FIFOINT7.setTXNFULLIF(thebits : TBits_1); inline;
  68722. begin
  68723. if thebits = 0 then
  68724. pTDefRegMap(@Self)^.clr := $00000400
  68725. else
  68726. pTDefRegMap(@Self)^.&set := $00000400;
  68727. end;
  68728. function TCAN1_C1FIFOINT7.getTXNFULLIF : TBits_1; inline;
  68729. begin
  68730. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  68731. end;
  68732. procedure TCAN1_C1FIFOINT7.setRXNEMPTYIE; inline;
  68733. begin
  68734. pTDefRegMap(@Self)^.&set := $00010000;
  68735. end;
  68736. procedure TCAN1_C1FIFOINT7.clearRXNEMPTYIE; inline;
  68737. begin
  68738. pTDefRegMap(@Self)^.clr := $00010000;
  68739. end;
  68740. procedure TCAN1_C1FIFOINT7.setRXNEMPTYIE(thebits : TBits_1); inline;
  68741. begin
  68742. if thebits = 0 then
  68743. pTDefRegMap(@Self)^.clr := $00010000
  68744. else
  68745. pTDefRegMap(@Self)^.&set := $00010000;
  68746. end;
  68747. function TCAN1_C1FIFOINT7.getRXNEMPTYIE : TBits_1; inline;
  68748. begin
  68749. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  68750. end;
  68751. procedure TCAN1_C1FIFOINT7.setRXHALFIE; inline;
  68752. begin
  68753. pTDefRegMap(@Self)^.&set := $00020000;
  68754. end;
  68755. procedure TCAN1_C1FIFOINT7.clearRXHALFIE; inline;
  68756. begin
  68757. pTDefRegMap(@Self)^.clr := $00020000;
  68758. end;
  68759. procedure TCAN1_C1FIFOINT7.setRXHALFIE(thebits : TBits_1); inline;
  68760. begin
  68761. if thebits = 0 then
  68762. pTDefRegMap(@Self)^.clr := $00020000
  68763. else
  68764. pTDefRegMap(@Self)^.&set := $00020000;
  68765. end;
  68766. function TCAN1_C1FIFOINT7.getRXHALFIE : TBits_1; inline;
  68767. begin
  68768. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  68769. end;
  68770. procedure TCAN1_C1FIFOINT7.setRXFULLIE; inline;
  68771. begin
  68772. pTDefRegMap(@Self)^.&set := $00040000;
  68773. end;
  68774. procedure TCAN1_C1FIFOINT7.clearRXFULLIE; inline;
  68775. begin
  68776. pTDefRegMap(@Self)^.clr := $00040000;
  68777. end;
  68778. procedure TCAN1_C1FIFOINT7.setRXFULLIE(thebits : TBits_1); inline;
  68779. begin
  68780. if thebits = 0 then
  68781. pTDefRegMap(@Self)^.clr := $00040000
  68782. else
  68783. pTDefRegMap(@Self)^.&set := $00040000;
  68784. end;
  68785. function TCAN1_C1FIFOINT7.getRXFULLIE : TBits_1; inline;
  68786. begin
  68787. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  68788. end;
  68789. procedure TCAN1_C1FIFOINT7.setRXOVFLIE; inline;
  68790. begin
  68791. pTDefRegMap(@Self)^.&set := $00080000;
  68792. end;
  68793. procedure TCAN1_C1FIFOINT7.clearRXOVFLIE; inline;
  68794. begin
  68795. pTDefRegMap(@Self)^.clr := $00080000;
  68796. end;
  68797. procedure TCAN1_C1FIFOINT7.setRXOVFLIE(thebits : TBits_1); inline;
  68798. begin
  68799. if thebits = 0 then
  68800. pTDefRegMap(@Self)^.clr := $00080000
  68801. else
  68802. pTDefRegMap(@Self)^.&set := $00080000;
  68803. end;
  68804. function TCAN1_C1FIFOINT7.getRXOVFLIE : TBits_1; inline;
  68805. begin
  68806. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  68807. end;
  68808. procedure TCAN1_C1FIFOINT7.setTXEMPTYIE; inline;
  68809. begin
  68810. pTDefRegMap(@Self)^.&set := $01000000;
  68811. end;
  68812. procedure TCAN1_C1FIFOINT7.clearTXEMPTYIE; inline;
  68813. begin
  68814. pTDefRegMap(@Self)^.clr := $01000000;
  68815. end;
  68816. procedure TCAN1_C1FIFOINT7.setTXEMPTYIE(thebits : TBits_1); inline;
  68817. begin
  68818. if thebits = 0 then
  68819. pTDefRegMap(@Self)^.clr := $01000000
  68820. else
  68821. pTDefRegMap(@Self)^.&set := $01000000;
  68822. end;
  68823. function TCAN1_C1FIFOINT7.getTXEMPTYIE : TBits_1; inline;
  68824. begin
  68825. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  68826. end;
  68827. procedure TCAN1_C1FIFOINT7.setTXHALFIE; inline;
  68828. begin
  68829. pTDefRegMap(@Self)^.&set := $02000000;
  68830. end;
  68831. procedure TCAN1_C1FIFOINT7.clearTXHALFIE; inline;
  68832. begin
  68833. pTDefRegMap(@Self)^.clr := $02000000;
  68834. end;
  68835. procedure TCAN1_C1FIFOINT7.setTXHALFIE(thebits : TBits_1); inline;
  68836. begin
  68837. if thebits = 0 then
  68838. pTDefRegMap(@Self)^.clr := $02000000
  68839. else
  68840. pTDefRegMap(@Self)^.&set := $02000000;
  68841. end;
  68842. function TCAN1_C1FIFOINT7.getTXHALFIE : TBits_1; inline;
  68843. begin
  68844. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  68845. end;
  68846. procedure TCAN1_C1FIFOINT7.setTXNFULLIE; inline;
  68847. begin
  68848. pTDefRegMap(@Self)^.&set := $04000000;
  68849. end;
  68850. procedure TCAN1_C1FIFOINT7.clearTXNFULLIE; inline;
  68851. begin
  68852. pTDefRegMap(@Self)^.clr := $04000000;
  68853. end;
  68854. procedure TCAN1_C1FIFOINT7.setTXNFULLIE(thebits : TBits_1); inline;
  68855. begin
  68856. if thebits = 0 then
  68857. pTDefRegMap(@Self)^.clr := $04000000
  68858. else
  68859. pTDefRegMap(@Self)^.&set := $04000000;
  68860. end;
  68861. function TCAN1_C1FIFOINT7.getTXNFULLIE : TBits_1; inline;
  68862. begin
  68863. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  68864. end;
  68865. procedure TCAN1_C1FIFOINT7.setw(thebits : TBits_32); inline;
  68866. begin
  68867. pTDefRegMap(@Self)^.val := thebits;
  68868. end;
  68869. function TCAN1_C1FIFOINT7.getw : TBits_32; inline;
  68870. begin
  68871. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68872. end;
  68873. procedure TCAN1_C1FIFOCI7.setCFIFOCI(thebits : TBits_5); inline;
  68874. begin
  68875. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  68876. end;
  68877. function TCAN1_C1FIFOCI7.getCFIFOCI : TBits_5; inline;
  68878. begin
  68879. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  68880. end;
  68881. procedure TCAN1_C1FIFOCI7.setw(thebits : TBits_32); inline;
  68882. begin
  68883. pTDefRegMap(@Self)^.val := thebits;
  68884. end;
  68885. function TCAN1_C1FIFOCI7.getw : TBits_32; inline;
  68886. begin
  68887. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68888. end;
  68889. procedure TCAN1_C1FIFOCON8.setTXPRI(thebits : TBits_2); inline;
  68890. begin
  68891. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  68892. end;
  68893. function TCAN1_C1FIFOCON8.getTXPRI : TBits_2; inline;
  68894. begin
  68895. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  68896. end;
  68897. procedure TCAN1_C1FIFOCON8.setRTREN; inline;
  68898. begin
  68899. pTDefRegMap(@Self)^.&set := $00000004;
  68900. end;
  68901. procedure TCAN1_C1FIFOCON8.clearRTREN; inline;
  68902. begin
  68903. pTDefRegMap(@Self)^.clr := $00000004;
  68904. end;
  68905. procedure TCAN1_C1FIFOCON8.setRTREN(thebits : TBits_1); inline;
  68906. begin
  68907. if thebits = 0 then
  68908. pTDefRegMap(@Self)^.clr := $00000004
  68909. else
  68910. pTDefRegMap(@Self)^.&set := $00000004;
  68911. end;
  68912. function TCAN1_C1FIFOCON8.getRTREN : TBits_1; inline;
  68913. begin
  68914. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  68915. end;
  68916. procedure TCAN1_C1FIFOCON8.setTXREQ; inline;
  68917. begin
  68918. pTDefRegMap(@Self)^.&set := $00000008;
  68919. end;
  68920. procedure TCAN1_C1FIFOCON8.clearTXREQ; inline;
  68921. begin
  68922. pTDefRegMap(@Self)^.clr := $00000008;
  68923. end;
  68924. procedure TCAN1_C1FIFOCON8.setTXREQ(thebits : TBits_1); inline;
  68925. begin
  68926. if thebits = 0 then
  68927. pTDefRegMap(@Self)^.clr := $00000008
  68928. else
  68929. pTDefRegMap(@Self)^.&set := $00000008;
  68930. end;
  68931. function TCAN1_C1FIFOCON8.getTXREQ : TBits_1; inline;
  68932. begin
  68933. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  68934. end;
  68935. procedure TCAN1_C1FIFOCON8.setTXERR; inline;
  68936. begin
  68937. pTDefRegMap(@Self)^.&set := $00000010;
  68938. end;
  68939. procedure TCAN1_C1FIFOCON8.clearTXERR; inline;
  68940. begin
  68941. pTDefRegMap(@Self)^.clr := $00000010;
  68942. end;
  68943. procedure TCAN1_C1FIFOCON8.setTXERR(thebits : TBits_1); inline;
  68944. begin
  68945. if thebits = 0 then
  68946. pTDefRegMap(@Self)^.clr := $00000010
  68947. else
  68948. pTDefRegMap(@Self)^.&set := $00000010;
  68949. end;
  68950. function TCAN1_C1FIFOCON8.getTXERR : TBits_1; inline;
  68951. begin
  68952. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  68953. end;
  68954. procedure TCAN1_C1FIFOCON8.setTXLARB; inline;
  68955. begin
  68956. pTDefRegMap(@Self)^.&set := $00000020;
  68957. end;
  68958. procedure TCAN1_C1FIFOCON8.clearTXLARB; inline;
  68959. begin
  68960. pTDefRegMap(@Self)^.clr := $00000020;
  68961. end;
  68962. procedure TCAN1_C1FIFOCON8.setTXLARB(thebits : TBits_1); inline;
  68963. begin
  68964. if thebits = 0 then
  68965. pTDefRegMap(@Self)^.clr := $00000020
  68966. else
  68967. pTDefRegMap(@Self)^.&set := $00000020;
  68968. end;
  68969. function TCAN1_C1FIFOCON8.getTXLARB : TBits_1; inline;
  68970. begin
  68971. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  68972. end;
  68973. procedure TCAN1_C1FIFOCON8.setTXABAT; inline;
  68974. begin
  68975. pTDefRegMap(@Self)^.&set := $00000040;
  68976. end;
  68977. procedure TCAN1_C1FIFOCON8.clearTXABAT; inline;
  68978. begin
  68979. pTDefRegMap(@Self)^.clr := $00000040;
  68980. end;
  68981. procedure TCAN1_C1FIFOCON8.setTXABAT(thebits : TBits_1); inline;
  68982. begin
  68983. if thebits = 0 then
  68984. pTDefRegMap(@Self)^.clr := $00000040
  68985. else
  68986. pTDefRegMap(@Self)^.&set := $00000040;
  68987. end;
  68988. function TCAN1_C1FIFOCON8.getTXABAT : TBits_1; inline;
  68989. begin
  68990. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  68991. end;
  68992. procedure TCAN1_C1FIFOCON8.setTXEN; inline;
  68993. begin
  68994. pTDefRegMap(@Self)^.&set := $00000080;
  68995. end;
  68996. procedure TCAN1_C1FIFOCON8.clearTXEN; inline;
  68997. begin
  68998. pTDefRegMap(@Self)^.clr := $00000080;
  68999. end;
  69000. procedure TCAN1_C1FIFOCON8.setTXEN(thebits : TBits_1); inline;
  69001. begin
  69002. if thebits = 0 then
  69003. pTDefRegMap(@Self)^.clr := $00000080
  69004. else
  69005. pTDefRegMap(@Self)^.&set := $00000080;
  69006. end;
  69007. function TCAN1_C1FIFOCON8.getTXEN : TBits_1; inline;
  69008. begin
  69009. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  69010. end;
  69011. procedure TCAN1_C1FIFOCON8.setDONLY; inline;
  69012. begin
  69013. pTDefRegMap(@Self)^.&set := $00001000;
  69014. end;
  69015. procedure TCAN1_C1FIFOCON8.clearDONLY; inline;
  69016. begin
  69017. pTDefRegMap(@Self)^.clr := $00001000;
  69018. end;
  69019. procedure TCAN1_C1FIFOCON8.setDONLY(thebits : TBits_1); inline;
  69020. begin
  69021. if thebits = 0 then
  69022. pTDefRegMap(@Self)^.clr := $00001000
  69023. else
  69024. pTDefRegMap(@Self)^.&set := $00001000;
  69025. end;
  69026. function TCAN1_C1FIFOCON8.getDONLY : TBits_1; inline;
  69027. begin
  69028. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  69029. end;
  69030. procedure TCAN1_C1FIFOCON8.setUINC; inline;
  69031. begin
  69032. pTDefRegMap(@Self)^.&set := $00002000;
  69033. end;
  69034. procedure TCAN1_C1FIFOCON8.clearUINC; inline;
  69035. begin
  69036. pTDefRegMap(@Self)^.clr := $00002000;
  69037. end;
  69038. procedure TCAN1_C1FIFOCON8.setUINC(thebits : TBits_1); inline;
  69039. begin
  69040. if thebits = 0 then
  69041. pTDefRegMap(@Self)^.clr := $00002000
  69042. else
  69043. pTDefRegMap(@Self)^.&set := $00002000;
  69044. end;
  69045. function TCAN1_C1FIFOCON8.getUINC : TBits_1; inline;
  69046. begin
  69047. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  69048. end;
  69049. procedure TCAN1_C1FIFOCON8.setFRESET; inline;
  69050. begin
  69051. pTDefRegMap(@Self)^.&set := $00004000;
  69052. end;
  69053. procedure TCAN1_C1FIFOCON8.clearFRESET; inline;
  69054. begin
  69055. pTDefRegMap(@Self)^.clr := $00004000;
  69056. end;
  69057. procedure TCAN1_C1FIFOCON8.setFRESET(thebits : TBits_1); inline;
  69058. begin
  69059. if thebits = 0 then
  69060. pTDefRegMap(@Self)^.clr := $00004000
  69061. else
  69062. pTDefRegMap(@Self)^.&set := $00004000;
  69063. end;
  69064. function TCAN1_C1FIFOCON8.getFRESET : TBits_1; inline;
  69065. begin
  69066. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  69067. end;
  69068. procedure TCAN1_C1FIFOCON8.setFSIZE(thebits : TBits_5); inline;
  69069. begin
  69070. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  69071. end;
  69072. function TCAN1_C1FIFOCON8.getFSIZE : TBits_5; inline;
  69073. begin
  69074. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  69075. end;
  69076. procedure TCAN1_C1FIFOCON8.setw(thebits : TBits_32); inline;
  69077. begin
  69078. pTDefRegMap(@Self)^.val := thebits;
  69079. end;
  69080. function TCAN1_C1FIFOCON8.getw : TBits_32; inline;
  69081. begin
  69082. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69083. end;
  69084. procedure TCAN1_C1FIFOINT8.setRXNEMPTYIF; inline;
  69085. begin
  69086. pTDefRegMap(@Self)^.&set := $00000001;
  69087. end;
  69088. procedure TCAN1_C1FIFOINT8.clearRXNEMPTYIF; inline;
  69089. begin
  69090. pTDefRegMap(@Self)^.clr := $00000001;
  69091. end;
  69092. procedure TCAN1_C1FIFOINT8.setRXNEMPTYIF(thebits : TBits_1); inline;
  69093. begin
  69094. if thebits = 0 then
  69095. pTDefRegMap(@Self)^.clr := $00000001
  69096. else
  69097. pTDefRegMap(@Self)^.&set := $00000001;
  69098. end;
  69099. function TCAN1_C1FIFOINT8.getRXNEMPTYIF : TBits_1; inline;
  69100. begin
  69101. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  69102. end;
  69103. procedure TCAN1_C1FIFOINT8.setRXHALFIF; inline;
  69104. begin
  69105. pTDefRegMap(@Self)^.&set := $00000002;
  69106. end;
  69107. procedure TCAN1_C1FIFOINT8.clearRXHALFIF; inline;
  69108. begin
  69109. pTDefRegMap(@Self)^.clr := $00000002;
  69110. end;
  69111. procedure TCAN1_C1FIFOINT8.setRXHALFIF(thebits : TBits_1); inline;
  69112. begin
  69113. if thebits = 0 then
  69114. pTDefRegMap(@Self)^.clr := $00000002
  69115. else
  69116. pTDefRegMap(@Self)^.&set := $00000002;
  69117. end;
  69118. function TCAN1_C1FIFOINT8.getRXHALFIF : TBits_1; inline;
  69119. begin
  69120. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  69121. end;
  69122. procedure TCAN1_C1FIFOINT8.setRXFULLIF; inline;
  69123. begin
  69124. pTDefRegMap(@Self)^.&set := $00000004;
  69125. end;
  69126. procedure TCAN1_C1FIFOINT8.clearRXFULLIF; inline;
  69127. begin
  69128. pTDefRegMap(@Self)^.clr := $00000004;
  69129. end;
  69130. procedure TCAN1_C1FIFOINT8.setRXFULLIF(thebits : TBits_1); inline;
  69131. begin
  69132. if thebits = 0 then
  69133. pTDefRegMap(@Self)^.clr := $00000004
  69134. else
  69135. pTDefRegMap(@Self)^.&set := $00000004;
  69136. end;
  69137. function TCAN1_C1FIFOINT8.getRXFULLIF : TBits_1; inline;
  69138. begin
  69139. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  69140. end;
  69141. procedure TCAN1_C1FIFOINT8.setRXOVFLIF; inline;
  69142. begin
  69143. pTDefRegMap(@Self)^.&set := $00000008;
  69144. end;
  69145. procedure TCAN1_C1FIFOINT8.clearRXOVFLIF; inline;
  69146. begin
  69147. pTDefRegMap(@Self)^.clr := $00000008;
  69148. end;
  69149. procedure TCAN1_C1FIFOINT8.setRXOVFLIF(thebits : TBits_1); inline;
  69150. begin
  69151. if thebits = 0 then
  69152. pTDefRegMap(@Self)^.clr := $00000008
  69153. else
  69154. pTDefRegMap(@Self)^.&set := $00000008;
  69155. end;
  69156. function TCAN1_C1FIFOINT8.getRXOVFLIF : TBits_1; inline;
  69157. begin
  69158. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  69159. end;
  69160. procedure TCAN1_C1FIFOINT8.setTXEMPTYIF; inline;
  69161. begin
  69162. pTDefRegMap(@Self)^.&set := $00000100;
  69163. end;
  69164. procedure TCAN1_C1FIFOINT8.clearTXEMPTYIF; inline;
  69165. begin
  69166. pTDefRegMap(@Self)^.clr := $00000100;
  69167. end;
  69168. procedure TCAN1_C1FIFOINT8.setTXEMPTYIF(thebits : TBits_1); inline;
  69169. begin
  69170. if thebits = 0 then
  69171. pTDefRegMap(@Self)^.clr := $00000100
  69172. else
  69173. pTDefRegMap(@Self)^.&set := $00000100;
  69174. end;
  69175. function TCAN1_C1FIFOINT8.getTXEMPTYIF : TBits_1; inline;
  69176. begin
  69177. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  69178. end;
  69179. procedure TCAN1_C1FIFOINT8.setTXHALFIF; inline;
  69180. begin
  69181. pTDefRegMap(@Self)^.&set := $00000200;
  69182. end;
  69183. procedure TCAN1_C1FIFOINT8.clearTXHALFIF; inline;
  69184. begin
  69185. pTDefRegMap(@Self)^.clr := $00000200;
  69186. end;
  69187. procedure TCAN1_C1FIFOINT8.setTXHALFIF(thebits : TBits_1); inline;
  69188. begin
  69189. if thebits = 0 then
  69190. pTDefRegMap(@Self)^.clr := $00000200
  69191. else
  69192. pTDefRegMap(@Self)^.&set := $00000200;
  69193. end;
  69194. function TCAN1_C1FIFOINT8.getTXHALFIF : TBits_1; inline;
  69195. begin
  69196. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  69197. end;
  69198. procedure TCAN1_C1FIFOINT8.setTXNFULLIF; inline;
  69199. begin
  69200. pTDefRegMap(@Self)^.&set := $00000400;
  69201. end;
  69202. procedure TCAN1_C1FIFOINT8.clearTXNFULLIF; inline;
  69203. begin
  69204. pTDefRegMap(@Self)^.clr := $00000400;
  69205. end;
  69206. procedure TCAN1_C1FIFOINT8.setTXNFULLIF(thebits : TBits_1); inline;
  69207. begin
  69208. if thebits = 0 then
  69209. pTDefRegMap(@Self)^.clr := $00000400
  69210. else
  69211. pTDefRegMap(@Self)^.&set := $00000400;
  69212. end;
  69213. function TCAN1_C1FIFOINT8.getTXNFULLIF : TBits_1; inline;
  69214. begin
  69215. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  69216. end;
  69217. procedure TCAN1_C1FIFOINT8.setRXNEMPTYIE; inline;
  69218. begin
  69219. pTDefRegMap(@Self)^.&set := $00010000;
  69220. end;
  69221. procedure TCAN1_C1FIFOINT8.clearRXNEMPTYIE; inline;
  69222. begin
  69223. pTDefRegMap(@Self)^.clr := $00010000;
  69224. end;
  69225. procedure TCAN1_C1FIFOINT8.setRXNEMPTYIE(thebits : TBits_1); inline;
  69226. begin
  69227. if thebits = 0 then
  69228. pTDefRegMap(@Self)^.clr := $00010000
  69229. else
  69230. pTDefRegMap(@Self)^.&set := $00010000;
  69231. end;
  69232. function TCAN1_C1FIFOINT8.getRXNEMPTYIE : TBits_1; inline;
  69233. begin
  69234. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  69235. end;
  69236. procedure TCAN1_C1FIFOINT8.setRXHALFIE; inline;
  69237. begin
  69238. pTDefRegMap(@Self)^.&set := $00020000;
  69239. end;
  69240. procedure TCAN1_C1FIFOINT8.clearRXHALFIE; inline;
  69241. begin
  69242. pTDefRegMap(@Self)^.clr := $00020000;
  69243. end;
  69244. procedure TCAN1_C1FIFOINT8.setRXHALFIE(thebits : TBits_1); inline;
  69245. begin
  69246. if thebits = 0 then
  69247. pTDefRegMap(@Self)^.clr := $00020000
  69248. else
  69249. pTDefRegMap(@Self)^.&set := $00020000;
  69250. end;
  69251. function TCAN1_C1FIFOINT8.getRXHALFIE : TBits_1; inline;
  69252. begin
  69253. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  69254. end;
  69255. procedure TCAN1_C1FIFOINT8.setRXFULLIE; inline;
  69256. begin
  69257. pTDefRegMap(@Self)^.&set := $00040000;
  69258. end;
  69259. procedure TCAN1_C1FIFOINT8.clearRXFULLIE; inline;
  69260. begin
  69261. pTDefRegMap(@Self)^.clr := $00040000;
  69262. end;
  69263. procedure TCAN1_C1FIFOINT8.setRXFULLIE(thebits : TBits_1); inline;
  69264. begin
  69265. if thebits = 0 then
  69266. pTDefRegMap(@Self)^.clr := $00040000
  69267. else
  69268. pTDefRegMap(@Self)^.&set := $00040000;
  69269. end;
  69270. function TCAN1_C1FIFOINT8.getRXFULLIE : TBits_1; inline;
  69271. begin
  69272. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  69273. end;
  69274. procedure TCAN1_C1FIFOINT8.setRXOVFLIE; inline;
  69275. begin
  69276. pTDefRegMap(@Self)^.&set := $00080000;
  69277. end;
  69278. procedure TCAN1_C1FIFOINT8.clearRXOVFLIE; inline;
  69279. begin
  69280. pTDefRegMap(@Self)^.clr := $00080000;
  69281. end;
  69282. procedure TCAN1_C1FIFOINT8.setRXOVFLIE(thebits : TBits_1); inline;
  69283. begin
  69284. if thebits = 0 then
  69285. pTDefRegMap(@Self)^.clr := $00080000
  69286. else
  69287. pTDefRegMap(@Self)^.&set := $00080000;
  69288. end;
  69289. function TCAN1_C1FIFOINT8.getRXOVFLIE : TBits_1; inline;
  69290. begin
  69291. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  69292. end;
  69293. procedure TCAN1_C1FIFOINT8.setTXEMPTYIE; inline;
  69294. begin
  69295. pTDefRegMap(@Self)^.&set := $01000000;
  69296. end;
  69297. procedure TCAN1_C1FIFOINT8.clearTXEMPTYIE; inline;
  69298. begin
  69299. pTDefRegMap(@Self)^.clr := $01000000;
  69300. end;
  69301. procedure TCAN1_C1FIFOINT8.setTXEMPTYIE(thebits : TBits_1); inline;
  69302. begin
  69303. if thebits = 0 then
  69304. pTDefRegMap(@Self)^.clr := $01000000
  69305. else
  69306. pTDefRegMap(@Self)^.&set := $01000000;
  69307. end;
  69308. function TCAN1_C1FIFOINT8.getTXEMPTYIE : TBits_1; inline;
  69309. begin
  69310. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  69311. end;
  69312. procedure TCAN1_C1FIFOINT8.setTXHALFIE; inline;
  69313. begin
  69314. pTDefRegMap(@Self)^.&set := $02000000;
  69315. end;
  69316. procedure TCAN1_C1FIFOINT8.clearTXHALFIE; inline;
  69317. begin
  69318. pTDefRegMap(@Self)^.clr := $02000000;
  69319. end;
  69320. procedure TCAN1_C1FIFOINT8.setTXHALFIE(thebits : TBits_1); inline;
  69321. begin
  69322. if thebits = 0 then
  69323. pTDefRegMap(@Self)^.clr := $02000000
  69324. else
  69325. pTDefRegMap(@Self)^.&set := $02000000;
  69326. end;
  69327. function TCAN1_C1FIFOINT8.getTXHALFIE : TBits_1; inline;
  69328. begin
  69329. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  69330. end;
  69331. procedure TCAN1_C1FIFOINT8.setTXNFULLIE; inline;
  69332. begin
  69333. pTDefRegMap(@Self)^.&set := $04000000;
  69334. end;
  69335. procedure TCAN1_C1FIFOINT8.clearTXNFULLIE; inline;
  69336. begin
  69337. pTDefRegMap(@Self)^.clr := $04000000;
  69338. end;
  69339. procedure TCAN1_C1FIFOINT8.setTXNFULLIE(thebits : TBits_1); inline;
  69340. begin
  69341. if thebits = 0 then
  69342. pTDefRegMap(@Self)^.clr := $04000000
  69343. else
  69344. pTDefRegMap(@Self)^.&set := $04000000;
  69345. end;
  69346. function TCAN1_C1FIFOINT8.getTXNFULLIE : TBits_1; inline;
  69347. begin
  69348. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  69349. end;
  69350. procedure TCAN1_C1FIFOINT8.setw(thebits : TBits_32); inline;
  69351. begin
  69352. pTDefRegMap(@Self)^.val := thebits;
  69353. end;
  69354. function TCAN1_C1FIFOINT8.getw : TBits_32; inline;
  69355. begin
  69356. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69357. end;
  69358. procedure TCAN1_C1FIFOCI8.setCFIFOCI(thebits : TBits_5); inline;
  69359. begin
  69360. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  69361. end;
  69362. function TCAN1_C1FIFOCI8.getCFIFOCI : TBits_5; inline;
  69363. begin
  69364. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  69365. end;
  69366. procedure TCAN1_C1FIFOCI8.setw(thebits : TBits_32); inline;
  69367. begin
  69368. pTDefRegMap(@Self)^.val := thebits;
  69369. end;
  69370. function TCAN1_C1FIFOCI8.getw : TBits_32; inline;
  69371. begin
  69372. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69373. end;
  69374. procedure TCAN1_C1FIFOCON9.setTXPRI(thebits : TBits_2); inline;
  69375. begin
  69376. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  69377. end;
  69378. function TCAN1_C1FIFOCON9.getTXPRI : TBits_2; inline;
  69379. begin
  69380. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  69381. end;
  69382. procedure TCAN1_C1FIFOCON9.setRTREN; inline;
  69383. begin
  69384. pTDefRegMap(@Self)^.&set := $00000004;
  69385. end;
  69386. procedure TCAN1_C1FIFOCON9.clearRTREN; inline;
  69387. begin
  69388. pTDefRegMap(@Self)^.clr := $00000004;
  69389. end;
  69390. procedure TCAN1_C1FIFOCON9.setRTREN(thebits : TBits_1); inline;
  69391. begin
  69392. if thebits = 0 then
  69393. pTDefRegMap(@Self)^.clr := $00000004
  69394. else
  69395. pTDefRegMap(@Self)^.&set := $00000004;
  69396. end;
  69397. function TCAN1_C1FIFOCON9.getRTREN : TBits_1; inline;
  69398. begin
  69399. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  69400. end;
  69401. procedure TCAN1_C1FIFOCON9.setTXREQ; inline;
  69402. begin
  69403. pTDefRegMap(@Self)^.&set := $00000008;
  69404. end;
  69405. procedure TCAN1_C1FIFOCON9.clearTXREQ; inline;
  69406. begin
  69407. pTDefRegMap(@Self)^.clr := $00000008;
  69408. end;
  69409. procedure TCAN1_C1FIFOCON9.setTXREQ(thebits : TBits_1); inline;
  69410. begin
  69411. if thebits = 0 then
  69412. pTDefRegMap(@Self)^.clr := $00000008
  69413. else
  69414. pTDefRegMap(@Self)^.&set := $00000008;
  69415. end;
  69416. function TCAN1_C1FIFOCON9.getTXREQ : TBits_1; inline;
  69417. begin
  69418. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  69419. end;
  69420. procedure TCAN1_C1FIFOCON9.setTXERR; inline;
  69421. begin
  69422. pTDefRegMap(@Self)^.&set := $00000010;
  69423. end;
  69424. procedure TCAN1_C1FIFOCON9.clearTXERR; inline;
  69425. begin
  69426. pTDefRegMap(@Self)^.clr := $00000010;
  69427. end;
  69428. procedure TCAN1_C1FIFOCON9.setTXERR(thebits : TBits_1); inline;
  69429. begin
  69430. if thebits = 0 then
  69431. pTDefRegMap(@Self)^.clr := $00000010
  69432. else
  69433. pTDefRegMap(@Self)^.&set := $00000010;
  69434. end;
  69435. function TCAN1_C1FIFOCON9.getTXERR : TBits_1; inline;
  69436. begin
  69437. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  69438. end;
  69439. procedure TCAN1_C1FIFOCON9.setTXLARB; inline;
  69440. begin
  69441. pTDefRegMap(@Self)^.&set := $00000020;
  69442. end;
  69443. procedure TCAN1_C1FIFOCON9.clearTXLARB; inline;
  69444. begin
  69445. pTDefRegMap(@Self)^.clr := $00000020;
  69446. end;
  69447. procedure TCAN1_C1FIFOCON9.setTXLARB(thebits : TBits_1); inline;
  69448. begin
  69449. if thebits = 0 then
  69450. pTDefRegMap(@Self)^.clr := $00000020
  69451. else
  69452. pTDefRegMap(@Self)^.&set := $00000020;
  69453. end;
  69454. function TCAN1_C1FIFOCON9.getTXLARB : TBits_1; inline;
  69455. begin
  69456. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  69457. end;
  69458. procedure TCAN1_C1FIFOCON9.setTXABAT; inline;
  69459. begin
  69460. pTDefRegMap(@Self)^.&set := $00000040;
  69461. end;
  69462. procedure TCAN1_C1FIFOCON9.clearTXABAT; inline;
  69463. begin
  69464. pTDefRegMap(@Self)^.clr := $00000040;
  69465. end;
  69466. procedure TCAN1_C1FIFOCON9.setTXABAT(thebits : TBits_1); inline;
  69467. begin
  69468. if thebits = 0 then
  69469. pTDefRegMap(@Self)^.clr := $00000040
  69470. else
  69471. pTDefRegMap(@Self)^.&set := $00000040;
  69472. end;
  69473. function TCAN1_C1FIFOCON9.getTXABAT : TBits_1; inline;
  69474. begin
  69475. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  69476. end;
  69477. procedure TCAN1_C1FIFOCON9.setTXEN; inline;
  69478. begin
  69479. pTDefRegMap(@Self)^.&set := $00000080;
  69480. end;
  69481. procedure TCAN1_C1FIFOCON9.clearTXEN; inline;
  69482. begin
  69483. pTDefRegMap(@Self)^.clr := $00000080;
  69484. end;
  69485. procedure TCAN1_C1FIFOCON9.setTXEN(thebits : TBits_1); inline;
  69486. begin
  69487. if thebits = 0 then
  69488. pTDefRegMap(@Self)^.clr := $00000080
  69489. else
  69490. pTDefRegMap(@Self)^.&set := $00000080;
  69491. end;
  69492. function TCAN1_C1FIFOCON9.getTXEN : TBits_1; inline;
  69493. begin
  69494. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  69495. end;
  69496. procedure TCAN1_C1FIFOCON9.setDONLY; inline;
  69497. begin
  69498. pTDefRegMap(@Self)^.&set := $00001000;
  69499. end;
  69500. procedure TCAN1_C1FIFOCON9.clearDONLY; inline;
  69501. begin
  69502. pTDefRegMap(@Self)^.clr := $00001000;
  69503. end;
  69504. procedure TCAN1_C1FIFOCON9.setDONLY(thebits : TBits_1); inline;
  69505. begin
  69506. if thebits = 0 then
  69507. pTDefRegMap(@Self)^.clr := $00001000
  69508. else
  69509. pTDefRegMap(@Self)^.&set := $00001000;
  69510. end;
  69511. function TCAN1_C1FIFOCON9.getDONLY : TBits_1; inline;
  69512. begin
  69513. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  69514. end;
  69515. procedure TCAN1_C1FIFOCON9.setUINC; inline;
  69516. begin
  69517. pTDefRegMap(@Self)^.&set := $00002000;
  69518. end;
  69519. procedure TCAN1_C1FIFOCON9.clearUINC; inline;
  69520. begin
  69521. pTDefRegMap(@Self)^.clr := $00002000;
  69522. end;
  69523. procedure TCAN1_C1FIFOCON9.setUINC(thebits : TBits_1); inline;
  69524. begin
  69525. if thebits = 0 then
  69526. pTDefRegMap(@Self)^.clr := $00002000
  69527. else
  69528. pTDefRegMap(@Self)^.&set := $00002000;
  69529. end;
  69530. function TCAN1_C1FIFOCON9.getUINC : TBits_1; inline;
  69531. begin
  69532. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  69533. end;
  69534. procedure TCAN1_C1FIFOCON9.setFRESET; inline;
  69535. begin
  69536. pTDefRegMap(@Self)^.&set := $00004000;
  69537. end;
  69538. procedure TCAN1_C1FIFOCON9.clearFRESET; inline;
  69539. begin
  69540. pTDefRegMap(@Self)^.clr := $00004000;
  69541. end;
  69542. procedure TCAN1_C1FIFOCON9.setFRESET(thebits : TBits_1); inline;
  69543. begin
  69544. if thebits = 0 then
  69545. pTDefRegMap(@Self)^.clr := $00004000
  69546. else
  69547. pTDefRegMap(@Self)^.&set := $00004000;
  69548. end;
  69549. function TCAN1_C1FIFOCON9.getFRESET : TBits_1; inline;
  69550. begin
  69551. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  69552. end;
  69553. procedure TCAN1_C1FIFOCON9.setFSIZE(thebits : TBits_5); inline;
  69554. begin
  69555. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  69556. end;
  69557. function TCAN1_C1FIFOCON9.getFSIZE : TBits_5; inline;
  69558. begin
  69559. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  69560. end;
  69561. procedure TCAN1_C1FIFOCON9.setw(thebits : TBits_32); inline;
  69562. begin
  69563. pTDefRegMap(@Self)^.val := thebits;
  69564. end;
  69565. function TCAN1_C1FIFOCON9.getw : TBits_32; inline;
  69566. begin
  69567. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69568. end;
  69569. procedure TCAN1_C1FIFOINT9.setRXNEMPTYIF; inline;
  69570. begin
  69571. pTDefRegMap(@Self)^.&set := $00000001;
  69572. end;
  69573. procedure TCAN1_C1FIFOINT9.clearRXNEMPTYIF; inline;
  69574. begin
  69575. pTDefRegMap(@Self)^.clr := $00000001;
  69576. end;
  69577. procedure TCAN1_C1FIFOINT9.setRXNEMPTYIF(thebits : TBits_1); inline;
  69578. begin
  69579. if thebits = 0 then
  69580. pTDefRegMap(@Self)^.clr := $00000001
  69581. else
  69582. pTDefRegMap(@Self)^.&set := $00000001;
  69583. end;
  69584. function TCAN1_C1FIFOINT9.getRXNEMPTYIF : TBits_1; inline;
  69585. begin
  69586. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  69587. end;
  69588. procedure TCAN1_C1FIFOINT9.setRXHALFIF; inline;
  69589. begin
  69590. pTDefRegMap(@Self)^.&set := $00000002;
  69591. end;
  69592. procedure TCAN1_C1FIFOINT9.clearRXHALFIF; inline;
  69593. begin
  69594. pTDefRegMap(@Self)^.clr := $00000002;
  69595. end;
  69596. procedure TCAN1_C1FIFOINT9.setRXHALFIF(thebits : TBits_1); inline;
  69597. begin
  69598. if thebits = 0 then
  69599. pTDefRegMap(@Self)^.clr := $00000002
  69600. else
  69601. pTDefRegMap(@Self)^.&set := $00000002;
  69602. end;
  69603. function TCAN1_C1FIFOINT9.getRXHALFIF : TBits_1; inline;
  69604. begin
  69605. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  69606. end;
  69607. procedure TCAN1_C1FIFOINT9.setRXFULLIF; inline;
  69608. begin
  69609. pTDefRegMap(@Self)^.&set := $00000004;
  69610. end;
  69611. procedure TCAN1_C1FIFOINT9.clearRXFULLIF; inline;
  69612. begin
  69613. pTDefRegMap(@Self)^.clr := $00000004;
  69614. end;
  69615. procedure TCAN1_C1FIFOINT9.setRXFULLIF(thebits : TBits_1); inline;
  69616. begin
  69617. if thebits = 0 then
  69618. pTDefRegMap(@Self)^.clr := $00000004
  69619. else
  69620. pTDefRegMap(@Self)^.&set := $00000004;
  69621. end;
  69622. function TCAN1_C1FIFOINT9.getRXFULLIF : TBits_1; inline;
  69623. begin
  69624. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  69625. end;
  69626. procedure TCAN1_C1FIFOINT9.setRXOVFLIF; inline;
  69627. begin
  69628. pTDefRegMap(@Self)^.&set := $00000008;
  69629. end;
  69630. procedure TCAN1_C1FIFOINT9.clearRXOVFLIF; inline;
  69631. begin
  69632. pTDefRegMap(@Self)^.clr := $00000008;
  69633. end;
  69634. procedure TCAN1_C1FIFOINT9.setRXOVFLIF(thebits : TBits_1); inline;
  69635. begin
  69636. if thebits = 0 then
  69637. pTDefRegMap(@Self)^.clr := $00000008
  69638. else
  69639. pTDefRegMap(@Self)^.&set := $00000008;
  69640. end;
  69641. function TCAN1_C1FIFOINT9.getRXOVFLIF : TBits_1; inline;
  69642. begin
  69643. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  69644. end;
  69645. procedure TCAN1_C1FIFOINT9.setTXEMPTYIF; inline;
  69646. begin
  69647. pTDefRegMap(@Self)^.&set := $00000100;
  69648. end;
  69649. procedure TCAN1_C1FIFOINT9.clearTXEMPTYIF; inline;
  69650. begin
  69651. pTDefRegMap(@Self)^.clr := $00000100;
  69652. end;
  69653. procedure TCAN1_C1FIFOINT9.setTXEMPTYIF(thebits : TBits_1); inline;
  69654. begin
  69655. if thebits = 0 then
  69656. pTDefRegMap(@Self)^.clr := $00000100
  69657. else
  69658. pTDefRegMap(@Self)^.&set := $00000100;
  69659. end;
  69660. function TCAN1_C1FIFOINT9.getTXEMPTYIF : TBits_1; inline;
  69661. begin
  69662. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  69663. end;
  69664. procedure TCAN1_C1FIFOINT9.setTXHALFIF; inline;
  69665. begin
  69666. pTDefRegMap(@Self)^.&set := $00000200;
  69667. end;
  69668. procedure TCAN1_C1FIFOINT9.clearTXHALFIF; inline;
  69669. begin
  69670. pTDefRegMap(@Self)^.clr := $00000200;
  69671. end;
  69672. procedure TCAN1_C1FIFOINT9.setTXHALFIF(thebits : TBits_1); inline;
  69673. begin
  69674. if thebits = 0 then
  69675. pTDefRegMap(@Self)^.clr := $00000200
  69676. else
  69677. pTDefRegMap(@Self)^.&set := $00000200;
  69678. end;
  69679. function TCAN1_C1FIFOINT9.getTXHALFIF : TBits_1; inline;
  69680. begin
  69681. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  69682. end;
  69683. procedure TCAN1_C1FIFOINT9.setTXNFULLIF; inline;
  69684. begin
  69685. pTDefRegMap(@Self)^.&set := $00000400;
  69686. end;
  69687. procedure TCAN1_C1FIFOINT9.clearTXNFULLIF; inline;
  69688. begin
  69689. pTDefRegMap(@Self)^.clr := $00000400;
  69690. end;
  69691. procedure TCAN1_C1FIFOINT9.setTXNFULLIF(thebits : TBits_1); inline;
  69692. begin
  69693. if thebits = 0 then
  69694. pTDefRegMap(@Self)^.clr := $00000400
  69695. else
  69696. pTDefRegMap(@Self)^.&set := $00000400;
  69697. end;
  69698. function TCAN1_C1FIFOINT9.getTXNFULLIF : TBits_1; inline;
  69699. begin
  69700. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  69701. end;
  69702. procedure TCAN1_C1FIFOINT9.setRXNEMPTYIE; inline;
  69703. begin
  69704. pTDefRegMap(@Self)^.&set := $00010000;
  69705. end;
  69706. procedure TCAN1_C1FIFOINT9.clearRXNEMPTYIE; inline;
  69707. begin
  69708. pTDefRegMap(@Self)^.clr := $00010000;
  69709. end;
  69710. procedure TCAN1_C1FIFOINT9.setRXNEMPTYIE(thebits : TBits_1); inline;
  69711. begin
  69712. if thebits = 0 then
  69713. pTDefRegMap(@Self)^.clr := $00010000
  69714. else
  69715. pTDefRegMap(@Self)^.&set := $00010000;
  69716. end;
  69717. function TCAN1_C1FIFOINT9.getRXNEMPTYIE : TBits_1; inline;
  69718. begin
  69719. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  69720. end;
  69721. procedure TCAN1_C1FIFOINT9.setRXHALFIE; inline;
  69722. begin
  69723. pTDefRegMap(@Self)^.&set := $00020000;
  69724. end;
  69725. procedure TCAN1_C1FIFOINT9.clearRXHALFIE; inline;
  69726. begin
  69727. pTDefRegMap(@Self)^.clr := $00020000;
  69728. end;
  69729. procedure TCAN1_C1FIFOINT9.setRXHALFIE(thebits : TBits_1); inline;
  69730. begin
  69731. if thebits = 0 then
  69732. pTDefRegMap(@Self)^.clr := $00020000
  69733. else
  69734. pTDefRegMap(@Self)^.&set := $00020000;
  69735. end;
  69736. function TCAN1_C1FIFOINT9.getRXHALFIE : TBits_1; inline;
  69737. begin
  69738. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  69739. end;
  69740. procedure TCAN1_C1FIFOINT9.setRXFULLIE; inline;
  69741. begin
  69742. pTDefRegMap(@Self)^.&set := $00040000;
  69743. end;
  69744. procedure TCAN1_C1FIFOINT9.clearRXFULLIE; inline;
  69745. begin
  69746. pTDefRegMap(@Self)^.clr := $00040000;
  69747. end;
  69748. procedure TCAN1_C1FIFOINT9.setRXFULLIE(thebits : TBits_1); inline;
  69749. begin
  69750. if thebits = 0 then
  69751. pTDefRegMap(@Self)^.clr := $00040000
  69752. else
  69753. pTDefRegMap(@Self)^.&set := $00040000;
  69754. end;
  69755. function TCAN1_C1FIFOINT9.getRXFULLIE : TBits_1; inline;
  69756. begin
  69757. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  69758. end;
  69759. procedure TCAN1_C1FIFOINT9.setRXOVFLIE; inline;
  69760. begin
  69761. pTDefRegMap(@Self)^.&set := $00080000;
  69762. end;
  69763. procedure TCAN1_C1FIFOINT9.clearRXOVFLIE; inline;
  69764. begin
  69765. pTDefRegMap(@Self)^.clr := $00080000;
  69766. end;
  69767. procedure TCAN1_C1FIFOINT9.setRXOVFLIE(thebits : TBits_1); inline;
  69768. begin
  69769. if thebits = 0 then
  69770. pTDefRegMap(@Self)^.clr := $00080000
  69771. else
  69772. pTDefRegMap(@Self)^.&set := $00080000;
  69773. end;
  69774. function TCAN1_C1FIFOINT9.getRXOVFLIE : TBits_1; inline;
  69775. begin
  69776. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  69777. end;
  69778. procedure TCAN1_C1FIFOINT9.setTXEMPTYIE; inline;
  69779. begin
  69780. pTDefRegMap(@Self)^.&set := $01000000;
  69781. end;
  69782. procedure TCAN1_C1FIFOINT9.clearTXEMPTYIE; inline;
  69783. begin
  69784. pTDefRegMap(@Self)^.clr := $01000000;
  69785. end;
  69786. procedure TCAN1_C1FIFOINT9.setTXEMPTYIE(thebits : TBits_1); inline;
  69787. begin
  69788. if thebits = 0 then
  69789. pTDefRegMap(@Self)^.clr := $01000000
  69790. else
  69791. pTDefRegMap(@Self)^.&set := $01000000;
  69792. end;
  69793. function TCAN1_C1FIFOINT9.getTXEMPTYIE : TBits_1; inline;
  69794. begin
  69795. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  69796. end;
  69797. procedure TCAN1_C1FIFOINT9.setTXHALFIE; inline;
  69798. begin
  69799. pTDefRegMap(@Self)^.&set := $02000000;
  69800. end;
  69801. procedure TCAN1_C1FIFOINT9.clearTXHALFIE; inline;
  69802. begin
  69803. pTDefRegMap(@Self)^.clr := $02000000;
  69804. end;
  69805. procedure TCAN1_C1FIFOINT9.setTXHALFIE(thebits : TBits_1); inline;
  69806. begin
  69807. if thebits = 0 then
  69808. pTDefRegMap(@Self)^.clr := $02000000
  69809. else
  69810. pTDefRegMap(@Self)^.&set := $02000000;
  69811. end;
  69812. function TCAN1_C1FIFOINT9.getTXHALFIE : TBits_1; inline;
  69813. begin
  69814. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  69815. end;
  69816. procedure TCAN1_C1FIFOINT9.setTXNFULLIE; inline;
  69817. begin
  69818. pTDefRegMap(@Self)^.&set := $04000000;
  69819. end;
  69820. procedure TCAN1_C1FIFOINT9.clearTXNFULLIE; inline;
  69821. begin
  69822. pTDefRegMap(@Self)^.clr := $04000000;
  69823. end;
  69824. procedure TCAN1_C1FIFOINT9.setTXNFULLIE(thebits : TBits_1); inline;
  69825. begin
  69826. if thebits = 0 then
  69827. pTDefRegMap(@Self)^.clr := $04000000
  69828. else
  69829. pTDefRegMap(@Self)^.&set := $04000000;
  69830. end;
  69831. function TCAN1_C1FIFOINT9.getTXNFULLIE : TBits_1; inline;
  69832. begin
  69833. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  69834. end;
  69835. procedure TCAN1_C1FIFOINT9.setw(thebits : TBits_32); inline;
  69836. begin
  69837. pTDefRegMap(@Self)^.val := thebits;
  69838. end;
  69839. function TCAN1_C1FIFOINT9.getw : TBits_32; inline;
  69840. begin
  69841. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69842. end;
  69843. procedure TCAN1_C1FIFOCI9.setCFIFOCI(thebits : TBits_5); inline;
  69844. begin
  69845. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  69846. end;
  69847. function TCAN1_C1FIFOCI9.getCFIFOCI : TBits_5; inline;
  69848. begin
  69849. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  69850. end;
  69851. procedure TCAN1_C1FIFOCI9.setw(thebits : TBits_32); inline;
  69852. begin
  69853. pTDefRegMap(@Self)^.val := thebits;
  69854. end;
  69855. function TCAN1_C1FIFOCI9.getw : TBits_32; inline;
  69856. begin
  69857. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69858. end;
  69859. procedure TCAN1_C1FIFOCON10.setTXPRI(thebits : TBits_2); inline;
  69860. begin
  69861. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  69862. end;
  69863. function TCAN1_C1FIFOCON10.getTXPRI : TBits_2; inline;
  69864. begin
  69865. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  69866. end;
  69867. procedure TCAN1_C1FIFOCON10.setRTREN; inline;
  69868. begin
  69869. pTDefRegMap(@Self)^.&set := $00000004;
  69870. end;
  69871. procedure TCAN1_C1FIFOCON10.clearRTREN; inline;
  69872. begin
  69873. pTDefRegMap(@Self)^.clr := $00000004;
  69874. end;
  69875. procedure TCAN1_C1FIFOCON10.setRTREN(thebits : TBits_1); inline;
  69876. begin
  69877. if thebits = 0 then
  69878. pTDefRegMap(@Self)^.clr := $00000004
  69879. else
  69880. pTDefRegMap(@Self)^.&set := $00000004;
  69881. end;
  69882. function TCAN1_C1FIFOCON10.getRTREN : TBits_1; inline;
  69883. begin
  69884. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  69885. end;
  69886. procedure TCAN1_C1FIFOCON10.setTXREQ; inline;
  69887. begin
  69888. pTDefRegMap(@Self)^.&set := $00000008;
  69889. end;
  69890. procedure TCAN1_C1FIFOCON10.clearTXREQ; inline;
  69891. begin
  69892. pTDefRegMap(@Self)^.clr := $00000008;
  69893. end;
  69894. procedure TCAN1_C1FIFOCON10.setTXREQ(thebits : TBits_1); inline;
  69895. begin
  69896. if thebits = 0 then
  69897. pTDefRegMap(@Self)^.clr := $00000008
  69898. else
  69899. pTDefRegMap(@Self)^.&set := $00000008;
  69900. end;
  69901. function TCAN1_C1FIFOCON10.getTXREQ : TBits_1; inline;
  69902. begin
  69903. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  69904. end;
  69905. procedure TCAN1_C1FIFOCON10.setTXERR; inline;
  69906. begin
  69907. pTDefRegMap(@Self)^.&set := $00000010;
  69908. end;
  69909. procedure TCAN1_C1FIFOCON10.clearTXERR; inline;
  69910. begin
  69911. pTDefRegMap(@Self)^.clr := $00000010;
  69912. end;
  69913. procedure TCAN1_C1FIFOCON10.setTXERR(thebits : TBits_1); inline;
  69914. begin
  69915. if thebits = 0 then
  69916. pTDefRegMap(@Self)^.clr := $00000010
  69917. else
  69918. pTDefRegMap(@Self)^.&set := $00000010;
  69919. end;
  69920. function TCAN1_C1FIFOCON10.getTXERR : TBits_1; inline;
  69921. begin
  69922. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  69923. end;
  69924. procedure TCAN1_C1FIFOCON10.setTXLARB; inline;
  69925. begin
  69926. pTDefRegMap(@Self)^.&set := $00000020;
  69927. end;
  69928. procedure TCAN1_C1FIFOCON10.clearTXLARB; inline;
  69929. begin
  69930. pTDefRegMap(@Self)^.clr := $00000020;
  69931. end;
  69932. procedure TCAN1_C1FIFOCON10.setTXLARB(thebits : TBits_1); inline;
  69933. begin
  69934. if thebits = 0 then
  69935. pTDefRegMap(@Self)^.clr := $00000020
  69936. else
  69937. pTDefRegMap(@Self)^.&set := $00000020;
  69938. end;
  69939. function TCAN1_C1FIFOCON10.getTXLARB : TBits_1; inline;
  69940. begin
  69941. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  69942. end;
  69943. procedure TCAN1_C1FIFOCON10.setTXABAT; inline;
  69944. begin
  69945. pTDefRegMap(@Self)^.&set := $00000040;
  69946. end;
  69947. procedure TCAN1_C1FIFOCON10.clearTXABAT; inline;
  69948. begin
  69949. pTDefRegMap(@Self)^.clr := $00000040;
  69950. end;
  69951. procedure TCAN1_C1FIFOCON10.setTXABAT(thebits : TBits_1); inline;
  69952. begin
  69953. if thebits = 0 then
  69954. pTDefRegMap(@Self)^.clr := $00000040
  69955. else
  69956. pTDefRegMap(@Self)^.&set := $00000040;
  69957. end;
  69958. function TCAN1_C1FIFOCON10.getTXABAT : TBits_1; inline;
  69959. begin
  69960. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  69961. end;
  69962. procedure TCAN1_C1FIFOCON10.setTXEN; inline;
  69963. begin
  69964. pTDefRegMap(@Self)^.&set := $00000080;
  69965. end;
  69966. procedure TCAN1_C1FIFOCON10.clearTXEN; inline;
  69967. begin
  69968. pTDefRegMap(@Self)^.clr := $00000080;
  69969. end;
  69970. procedure TCAN1_C1FIFOCON10.setTXEN(thebits : TBits_1); inline;
  69971. begin
  69972. if thebits = 0 then
  69973. pTDefRegMap(@Self)^.clr := $00000080
  69974. else
  69975. pTDefRegMap(@Self)^.&set := $00000080;
  69976. end;
  69977. function TCAN1_C1FIFOCON10.getTXEN : TBits_1; inline;
  69978. begin
  69979. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  69980. end;
  69981. procedure TCAN1_C1FIFOCON10.setDONLY; inline;
  69982. begin
  69983. pTDefRegMap(@Self)^.&set := $00001000;
  69984. end;
  69985. procedure TCAN1_C1FIFOCON10.clearDONLY; inline;
  69986. begin
  69987. pTDefRegMap(@Self)^.clr := $00001000;
  69988. end;
  69989. procedure TCAN1_C1FIFOCON10.setDONLY(thebits : TBits_1); inline;
  69990. begin
  69991. if thebits = 0 then
  69992. pTDefRegMap(@Self)^.clr := $00001000
  69993. else
  69994. pTDefRegMap(@Self)^.&set := $00001000;
  69995. end;
  69996. function TCAN1_C1FIFOCON10.getDONLY : TBits_1; inline;
  69997. begin
  69998. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  69999. end;
  70000. procedure TCAN1_C1FIFOCON10.setUINC; inline;
  70001. begin
  70002. pTDefRegMap(@Self)^.&set := $00002000;
  70003. end;
  70004. procedure TCAN1_C1FIFOCON10.clearUINC; inline;
  70005. begin
  70006. pTDefRegMap(@Self)^.clr := $00002000;
  70007. end;
  70008. procedure TCAN1_C1FIFOCON10.setUINC(thebits : TBits_1); inline;
  70009. begin
  70010. if thebits = 0 then
  70011. pTDefRegMap(@Self)^.clr := $00002000
  70012. else
  70013. pTDefRegMap(@Self)^.&set := $00002000;
  70014. end;
  70015. function TCAN1_C1FIFOCON10.getUINC : TBits_1; inline;
  70016. begin
  70017. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  70018. end;
  70019. procedure TCAN1_C1FIFOCON10.setFRESET; inline;
  70020. begin
  70021. pTDefRegMap(@Self)^.&set := $00004000;
  70022. end;
  70023. procedure TCAN1_C1FIFOCON10.clearFRESET; inline;
  70024. begin
  70025. pTDefRegMap(@Self)^.clr := $00004000;
  70026. end;
  70027. procedure TCAN1_C1FIFOCON10.setFRESET(thebits : TBits_1); inline;
  70028. begin
  70029. if thebits = 0 then
  70030. pTDefRegMap(@Self)^.clr := $00004000
  70031. else
  70032. pTDefRegMap(@Self)^.&set := $00004000;
  70033. end;
  70034. function TCAN1_C1FIFOCON10.getFRESET : TBits_1; inline;
  70035. begin
  70036. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  70037. end;
  70038. procedure TCAN1_C1FIFOCON10.setFSIZE(thebits : TBits_5); inline;
  70039. begin
  70040. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  70041. end;
  70042. function TCAN1_C1FIFOCON10.getFSIZE : TBits_5; inline;
  70043. begin
  70044. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  70045. end;
  70046. procedure TCAN1_C1FIFOCON10.setw(thebits : TBits_32); inline;
  70047. begin
  70048. pTDefRegMap(@Self)^.val := thebits;
  70049. end;
  70050. function TCAN1_C1FIFOCON10.getw : TBits_32; inline;
  70051. begin
  70052. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  70053. end;
  70054. procedure TCAN1_C1FIFOINT10.setRXNEMPTYIF; inline;
  70055. begin
  70056. pTDefRegMap(@Self)^.&set := $00000001;
  70057. end;
  70058. procedure TCAN1_C1FIFOINT10.clearRXNEMPTYIF; inline;
  70059. begin
  70060. pTDefRegMap(@Self)^.clr := $00000001;
  70061. end;
  70062. procedure TCAN1_C1FIFOINT10.setRXNEMPTYIF(thebits : TBits_1); inline;
  70063. begin
  70064. if thebits = 0 then
  70065. pTDefRegMap(@Self)^.clr := $00000001
  70066. else
  70067. pTDefRegMap(@Self)^.&set := $00000001;
  70068. end;
  70069. function TCAN1_C1FIFOINT10.getRXNEMPTYIF : TBits_1; inline;
  70070. begin
  70071. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  70072. end;
  70073. procedure TCAN1_C1FIFOINT10.setRXHALFIF; inline;
  70074. begin
  70075. pTDefRegMap(@Self)^.&set := $00000002;
  70076. end;
  70077. procedure TCAN1_C1FIFOINT10.clearRXHALFIF; inline;
  70078. begin
  70079. pTDefRegMap(@Self)^.clr := $00000002;
  70080. end;
  70081. procedure TCAN1_C1FIFOINT10.setRXHALFIF(thebits : TBits_1); inline;
  70082. begin
  70083. if thebits = 0 then
  70084. pTDefRegMap(@Self)^.clr := $00000002
  70085. else
  70086. pTDefRegMap(@Self)^.&set := $00000002;
  70087. end;
  70088. function TCAN1_C1FIFOINT10.getRXHALFIF : TBits_1; inline;
  70089. begin
  70090. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  70091. end;
  70092. procedure TCAN1_C1FIFOINT10.setRXFULLIF; inline;
  70093. begin
  70094. pTDefRegMap(@Self)^.&set := $00000004;
  70095. end;
  70096. procedure TCAN1_C1FIFOINT10.clearRXFULLIF; inline;
  70097. begin
  70098. pTDefRegMap(@Self)^.clr := $00000004;
  70099. end;
  70100. procedure TCAN1_C1FIFOINT10.setRXFULLIF(thebits : TBits_1); inline;
  70101. begin
  70102. if thebits = 0 then
  70103. pTDefRegMap(@Self)^.clr := $00000004
  70104. else
  70105. pTDefRegMap(@Self)^.&set := $00000004;
  70106. end;
  70107. function TCAN1_C1FIFOINT10.getRXFULLIF : TBits_1; inline;
  70108. begin
  70109. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  70110. end;
  70111. procedure TCAN1_C1FIFOINT10.setRXOVFLIF; inline;
  70112. begin
  70113. pTDefRegMap(@Self)^.&set := $00000008;
  70114. end;
  70115. procedure TCAN1_C1FIFOINT10.clearRXOVFLIF; inline;
  70116. begin
  70117. pTDefRegMap(@Self)^.clr := $00000008;
  70118. end;
  70119. procedure TCAN1_C1FIFOINT10.setRXOVFLIF(thebits : TBits_1); inline;
  70120. begin
  70121. if thebits = 0 then
  70122. pTDefRegMap(@Self)^.clr := $00000008
  70123. else
  70124. pTDefRegMap(@Self)^.&set := $00000008;
  70125. end;
  70126. function TCAN1_C1FIFOINT10.getRXOVFLIF : TBits_1; inline;
  70127. begin
  70128. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  70129. end;
  70130. procedure TCAN1_C1FIFOINT10.setTXEMPTYIF; inline;
  70131. begin
  70132. pTDefRegMap(@Self)^.&set := $00000100;
  70133. end;
  70134. procedure TCAN1_C1FIFOINT10.clearTXEMPTYIF; inline;
  70135. begin
  70136. pTDefRegMap(@Self)^.clr := $00000100;
  70137. end;
  70138. procedure TCAN1_C1FIFOINT10.setTXEMPTYIF(thebits : TBits_1); inline;
  70139. begin
  70140. if thebits = 0 then
  70141. pTDefRegMap(@Self)^.clr := $00000100
  70142. else
  70143. pTDefRegMap(@Self)^.&set := $00000100;
  70144. end;
  70145. function TCAN1_C1FIFOINT10.getTXEMPTYIF : TBits_1; inline;
  70146. begin
  70147. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  70148. end;
  70149. procedure TCAN1_C1FIFOINT10.setTXHALFIF; inline;
  70150. begin
  70151. pTDefRegMap(@Self)^.&set := $00000200;
  70152. end;
  70153. procedure TCAN1_C1FIFOINT10.clearTXHALFIF; inline;
  70154. begin
  70155. pTDefRegMap(@Self)^.clr := $00000200;
  70156. end;
  70157. procedure TCAN1_C1FIFOINT10.setTXHALFIF(thebits : TBits_1); inline;
  70158. begin
  70159. if thebits = 0 then
  70160. pTDefRegMap(@Self)^.clr := $00000200
  70161. else
  70162. pTDefRegMap(@Self)^.&set := $00000200;
  70163. end;
  70164. function TCAN1_C1FIFOINT10.getTXHALFIF : TBits_1; inline;
  70165. begin
  70166. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  70167. end;
  70168. procedure TCAN1_C1FIFOINT10.setTXNFULLIF; inline;
  70169. begin
  70170. pTDefRegMap(@Self)^.&set := $00000400;
  70171. end;
  70172. procedure TCAN1_C1FIFOINT10.clearTXNFULLIF; inline;
  70173. begin
  70174. pTDefRegMap(@Self)^.clr := $00000400;
  70175. end;
  70176. procedure TCAN1_C1FIFOINT10.setTXNFULLIF(thebits : TBits_1); inline;
  70177. begin
  70178. if thebits = 0 then
  70179. pTDefRegMap(@Self)^.clr := $00000400
  70180. else
  70181. pTDefRegMap(@Self)^.&set := $00000400;
  70182. end;
  70183. function TCAN1_C1FIFOINT10.getTXNFULLIF : TBits_1; inline;
  70184. begin
  70185. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  70186. end;
  70187. procedure TCAN1_C1FIFOINT10.setRXNEMPTYIE; inline;
  70188. begin
  70189. pTDefRegMap(@Self)^.&set := $00010000;
  70190. end;
  70191. procedure TCAN1_C1FIFOINT10.clearRXNEMPTYIE; inline;
  70192. begin
  70193. pTDefRegMap(@Self)^.clr := $00010000;
  70194. end;
  70195. procedure TCAN1_C1FIFOINT10.setRXNEMPTYIE(thebits : TBits_1); inline;
  70196. begin
  70197. if thebits = 0 then
  70198. pTDefRegMap(@Self)^.clr := $00010000
  70199. else
  70200. pTDefRegMap(@Self)^.&set := $00010000;
  70201. end;
  70202. function TCAN1_C1FIFOINT10.getRXNEMPTYIE : TBits_1; inline;
  70203. begin
  70204. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  70205. end;
  70206. procedure TCAN1_C1FIFOINT10.setRXHALFIE; inline;
  70207. begin
  70208. pTDefRegMap(@Self)^.&set := $00020000;
  70209. end;
  70210. procedure TCAN1_C1FIFOINT10.clearRXHALFIE; inline;
  70211. begin
  70212. pTDefRegMap(@Self)^.clr := $00020000;
  70213. end;
  70214. procedure TCAN1_C1FIFOINT10.setRXHALFIE(thebits : TBits_1); inline;
  70215. begin
  70216. if thebits = 0 then
  70217. pTDefRegMap(@Self)^.clr := $00020000
  70218. else
  70219. pTDefRegMap(@Self)^.&set := $00020000;
  70220. end;
  70221. function TCAN1_C1FIFOINT10.getRXHALFIE : TBits_1; inline;
  70222. begin
  70223. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  70224. end;
  70225. procedure TCAN1_C1FIFOINT10.setRXFULLIE; inline;
  70226. begin
  70227. pTDefRegMap(@Self)^.&set := $00040000;
  70228. end;
  70229. procedure TCAN1_C1FIFOINT10.clearRXFULLIE; inline;
  70230. begin
  70231. pTDefRegMap(@Self)^.clr := $00040000;
  70232. end;
  70233. procedure TCAN1_C1FIFOINT10.setRXFULLIE(thebits : TBits_1); inline;
  70234. begin
  70235. if thebits = 0 then
  70236. pTDefRegMap(@Self)^.clr := $00040000
  70237. else
  70238. pTDefRegMap(@Self)^.&set := $00040000;
  70239. end;
  70240. function TCAN1_C1FIFOINT10.getRXFULLIE : TBits_1; inline;
  70241. begin
  70242. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  70243. end;
  70244. procedure TCAN1_C1FIFOINT10.setRXOVFLIE; inline;
  70245. begin
  70246. pTDefRegMap(@Self)^.&set := $00080000;
  70247. end;
  70248. procedure TCAN1_C1FIFOINT10.clearRXOVFLIE; inline;
  70249. begin
  70250. pTDefRegMap(@Self)^.clr := $00080000;
  70251. end;
  70252. procedure TCAN1_C1FIFOINT10.setRXOVFLIE(thebits : TBits_1); inline;
  70253. begin
  70254. if thebits = 0 then
  70255. pTDefRegMap(@Self)^.clr := $00080000
  70256. else
  70257. pTDefRegMap(@Self)^.&set := $00080000;
  70258. end;
  70259. function TCAN1_C1FIFOINT10.getRXOVFLIE : TBits_1; inline;
  70260. begin
  70261. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  70262. end;
  70263. procedure TCAN1_C1FIFOINT10.setTXEMPTYIE; inline;
  70264. begin
  70265. pTDefRegMap(@Self)^.&set := $01000000;
  70266. end;
  70267. procedure TCAN1_C1FIFOINT10.clearTXEMPTYIE; inline;
  70268. begin
  70269. pTDefRegMap(@Self)^.clr := $01000000;
  70270. end;
  70271. procedure TCAN1_C1FIFOINT10.setTXEMPTYIE(thebits : TBits_1); inline;
  70272. begin
  70273. if thebits = 0 then
  70274. pTDefRegMap(@Self)^.clr := $01000000
  70275. else
  70276. pTDefRegMap(@Self)^.&set := $01000000;
  70277. end;
  70278. function TCAN1_C1FIFOINT10.getTXEMPTYIE : TBits_1; inline;
  70279. begin
  70280. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  70281. end;
  70282. procedure TCAN1_C1FIFOINT10.setTXHALFIE; inline;
  70283. begin
  70284. pTDefRegMap(@Self)^.&set := $02000000;
  70285. end;
  70286. procedure TCAN1_C1FIFOINT10.clearTXHALFIE; inline;
  70287. begin
  70288. pTDefRegMap(@Self)^.clr := $02000000;
  70289. end;
  70290. procedure TCAN1_C1FIFOINT10.setTXHALFIE(thebits : TBits_1); inline;
  70291. begin
  70292. if thebits = 0 then
  70293. pTDefRegMap(@Self)^.clr := $02000000
  70294. else
  70295. pTDefRegMap(@Self)^.&set := $02000000;
  70296. end;
  70297. function TCAN1_C1FIFOINT10.getTXHALFIE : TBits_1; inline;
  70298. begin
  70299. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  70300. end;
  70301. procedure TCAN1_C1FIFOINT10.setTXNFULLIE; inline;
  70302. begin
  70303. pTDefRegMap(@Self)^.&set := $04000000;
  70304. end;
  70305. procedure TCAN1_C1FIFOINT10.clearTXNFULLIE; inline;
  70306. begin
  70307. pTDefRegMap(@Self)^.clr := $04000000;
  70308. end;
  70309. procedure TCAN1_C1FIFOINT10.setTXNFULLIE(thebits : TBits_1); inline;
  70310. begin
  70311. if thebits = 0 then
  70312. pTDefRegMap(@Self)^.clr := $04000000
  70313. else
  70314. pTDefRegMap(@Self)^.&set := $04000000;
  70315. end;
  70316. function TCAN1_C1FIFOINT10.getTXNFULLIE : TBits_1; inline;
  70317. begin
  70318. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  70319. end;
  70320. procedure TCAN1_C1FIFOINT10.setw(thebits : TBits_32); inline;
  70321. begin
  70322. pTDefRegMap(@Self)^.val := thebits;
  70323. end;
  70324. function TCAN1_C1FIFOINT10.getw : TBits_32; inline;
  70325. begin
  70326. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  70327. end;
  70328. procedure TCAN1_C1FIFOCI10.setCFIFOCI(thebits : TBits_5); inline;
  70329. begin
  70330. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  70331. end;
  70332. function TCAN1_C1FIFOCI10.getCFIFOCI : TBits_5; inline;
  70333. begin
  70334. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  70335. end;
  70336. procedure TCAN1_C1FIFOCI10.setw(thebits : TBits_32); inline;
  70337. begin
  70338. pTDefRegMap(@Self)^.val := thebits;
  70339. end;
  70340. function TCAN1_C1FIFOCI10.getw : TBits_32; inline;
  70341. begin
  70342. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  70343. end;
  70344. procedure TCAN1_C1FIFOCON11.setTXPRI(thebits : TBits_2); inline;
  70345. begin
  70346. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  70347. end;
  70348. function TCAN1_C1FIFOCON11.getTXPRI : TBits_2; inline;
  70349. begin
  70350. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  70351. end;
  70352. procedure TCAN1_C1FIFOCON11.setRTREN; inline;
  70353. begin
  70354. pTDefRegMap(@Self)^.&set := $00000004;
  70355. end;
  70356. procedure TCAN1_C1FIFOCON11.clearRTREN; inline;
  70357. begin
  70358. pTDefRegMap(@Self)^.clr := $00000004;
  70359. end;
  70360. procedure TCAN1_C1FIFOCON11.setRTREN(thebits : TBits_1); inline;
  70361. begin
  70362. if thebits = 0 then
  70363. pTDefRegMap(@Self)^.clr := $00000004
  70364. else
  70365. pTDefRegMap(@Self)^.&set := $00000004;
  70366. end;
  70367. function TCAN1_C1FIFOCON11.getRTREN : TBits_1; inline;
  70368. begin
  70369. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  70370. end;
  70371. procedure TCAN1_C1FIFOCON11.setTXREQ; inline;
  70372. begin
  70373. pTDefRegMap(@Self)^.&set := $00000008;
  70374. end;
  70375. procedure TCAN1_C1FIFOCON11.clearTXREQ; inline;
  70376. begin
  70377. pTDefRegMap(@Self)^.clr := $00000008;
  70378. end;
  70379. procedure TCAN1_C1FIFOCON11.setTXREQ(thebits : TBits_1); inline;
  70380. begin
  70381. if thebits = 0 then
  70382. pTDefRegMap(@Self)^.clr := $00000008
  70383. else
  70384. pTDefRegMap(@Self)^.&set := $00000008;
  70385. end;
  70386. function TCAN1_C1FIFOCON11.getTXREQ : TBits_1; inline;
  70387. begin
  70388. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  70389. end;
  70390. procedure TCAN1_C1FIFOCON11.setTXERR; inline;
  70391. begin
  70392. pTDefRegMap(@Self)^.&set := $00000010;
  70393. end;
  70394. procedure TCAN1_C1FIFOCON11.clearTXERR; inline;
  70395. begin
  70396. pTDefRegMap(@Self)^.clr := $00000010;
  70397. end;
  70398. procedure TCAN1_C1FIFOCON11.setTXERR(thebits : TBits_1); inline;
  70399. begin
  70400. if thebits = 0 then
  70401. pTDefRegMap(@Self)^.clr := $00000010
  70402. else
  70403. pTDefRegMap(@Self)^.&set := $00000010;
  70404. end;
  70405. function TCAN1_C1FIFOCON11.getTXERR : TBits_1; inline;
  70406. begin
  70407. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  70408. end;
  70409. procedure TCAN1_C1FIFOCON11.setTXLARB; inline;
  70410. begin
  70411. pTDefRegMap(@Self)^.&set := $00000020;
  70412. end;
  70413. procedure TCAN1_C1FIFOCON11.clearTXLARB; inline;
  70414. begin
  70415. pTDefRegMap(@Self)^.clr := $00000020;
  70416. end;
  70417. procedure TCAN1_C1FIFOCON11.setTXLARB(thebits : TBits_1); inline;
  70418. begin
  70419. if thebits = 0 then
  70420. pTDefRegMap(@Self)^.clr := $00000020
  70421. else
  70422. pTDefRegMap(@Self)^.&set := $00000020;
  70423. end;
  70424. function TCAN1_C1FIFOCON11.getTXLARB : TBits_1; inline;
  70425. begin
  70426. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  70427. end;
  70428. procedure TCAN1_C1FIFOCON11.setTXABAT; inline;
  70429. begin
  70430. pTDefRegMap(@Self)^.&set := $00000040;
  70431. end;
  70432. procedure TCAN1_C1FIFOCON11.clearTXABAT; inline;
  70433. begin
  70434. pTDefRegMap(@Self)^.clr := $00000040;
  70435. end;
  70436. procedure TCAN1_C1FIFOCON11.setTXABAT(thebits : TBits_1); inline;
  70437. begin
  70438. if thebits = 0 then
  70439. pTDefRegMap(@Self)^.clr := $00000040
  70440. else
  70441. pTDefRegMap(@Self)^.&set := $00000040;
  70442. end;
  70443. function TCAN1_C1FIFOCON11.getTXABAT : TBits_1; inline;
  70444. begin
  70445. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  70446. end;
  70447. procedure TCAN1_C1FIFOCON11.setTXEN; inline;
  70448. begin
  70449. pTDefRegMap(@Self)^.&set := $00000080;
  70450. end;
  70451. procedure TCAN1_C1FIFOCON11.clearTXEN; inline;
  70452. begin
  70453. pTDefRegMap(@Self)^.clr := $00000080;
  70454. end;
  70455. procedure TCAN1_C1FIFOCON11.setTXEN(thebits : TBits_1); inline;
  70456. begin
  70457. if thebits = 0 then
  70458. pTDefRegMap(@Self)^.clr := $00000080
  70459. else
  70460. pTDefRegMap(@Self)^.&set := $00000080;
  70461. end;
  70462. function TCAN1_C1FIFOCON11.getTXEN : TBits_1; inline;
  70463. begin
  70464. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  70465. end;
  70466. procedure TCAN1_C1FIFOCON11.setDONLY; inline;
  70467. begin
  70468. pTDefRegMap(@Self)^.&set := $00001000;
  70469. end;
  70470. procedure TCAN1_C1FIFOCON11.clearDONLY; inline;
  70471. begin
  70472. pTDefRegMap(@Self)^.clr := $00001000;
  70473. end;
  70474. procedure TCAN1_C1FIFOCON11.setDONLY(thebits : TBits_1); inline;
  70475. begin
  70476. if thebits = 0 then
  70477. pTDefRegMap(@Self)^.clr := $00001000
  70478. else
  70479. pTDefRegMap(@Self)^.&set := $00001000;
  70480. end;
  70481. function TCAN1_C1FIFOCON11.getDONLY : TBits_1; inline;
  70482. begin
  70483. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  70484. end;
  70485. procedure TCAN1_C1FIFOCON11.setUINC; inline;
  70486. begin
  70487. pTDefRegMap(@Self)^.&set := $00002000;
  70488. end;
  70489. procedure TCAN1_C1FIFOCON11.clearUINC; inline;
  70490. begin
  70491. pTDefRegMap(@Self)^.clr := $00002000;
  70492. end;
  70493. procedure TCAN1_C1FIFOCON11.setUINC(thebits : TBits_1); inline;
  70494. begin
  70495. if thebits = 0 then
  70496. pTDefRegMap(@Self)^.clr := $00002000
  70497. else
  70498. pTDefRegMap(@Self)^.&set := $00002000;
  70499. end;
  70500. function TCAN1_C1FIFOCON11.getUINC : TBits_1; inline;
  70501. begin
  70502. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  70503. end;
  70504. procedure TCAN1_C1FIFOCON11.setFRESET; inline;
  70505. begin
  70506. pTDefRegMap(@Self)^.&set := $00004000;
  70507. end;
  70508. procedure TCAN1_C1FIFOCON11.clearFRESET; inline;
  70509. begin
  70510. pTDefRegMap(@Self)^.clr := $00004000;
  70511. end;
  70512. procedure TCAN1_C1FIFOCON11.setFRESET(thebits : TBits_1); inline;
  70513. begin
  70514. if thebits = 0 then
  70515. pTDefRegMap(@Self)^.clr := $00004000
  70516. else
  70517. pTDefRegMap(@Self)^.&set := $00004000;
  70518. end;
  70519. function TCAN1_C1FIFOCON11.getFRESET : TBits_1; inline;
  70520. begin
  70521. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  70522. end;
  70523. procedure TCAN1_C1FIFOCON11.setFSIZE(thebits : TBits_5); inline;
  70524. begin
  70525. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  70526. end;
  70527. function TCAN1_C1FIFOCON11.getFSIZE : TBits_5; inline;
  70528. begin
  70529. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  70530. end;
  70531. procedure TCAN1_C1FIFOCON11.setw(thebits : TBits_32); inline;
  70532. begin
  70533. pTDefRegMap(@Self)^.val := thebits;
  70534. end;
  70535. function TCAN1_C1FIFOCON11.getw : TBits_32; inline;
  70536. begin
  70537. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  70538. end;
  70539. procedure TCAN1_C1FIFOINT11.setRXNEMPTYIF; inline;
  70540. begin
  70541. pTDefRegMap(@Self)^.&set := $00000001;
  70542. end;
  70543. procedure TCAN1_C1FIFOINT11.clearRXNEMPTYIF; inline;
  70544. begin
  70545. pTDefRegMap(@Self)^.clr := $00000001;
  70546. end;
  70547. procedure TCAN1_C1FIFOINT11.setRXNEMPTYIF(thebits : TBits_1); inline;
  70548. begin
  70549. if thebits = 0 then
  70550. pTDefRegMap(@Self)^.clr := $00000001
  70551. else
  70552. pTDefRegMap(@Self)^.&set := $00000001;
  70553. end;
  70554. function TCAN1_C1FIFOINT11.getRXNEMPTYIF : TBits_1; inline;
  70555. begin
  70556. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  70557. end;
  70558. procedure TCAN1_C1FIFOINT11.setRXHALFIF; inline;
  70559. begin
  70560. pTDefRegMap(@Self)^.&set := $00000002;
  70561. end;
  70562. procedure TCAN1_C1FIFOINT11.clearRXHALFIF; inline;
  70563. begin
  70564. pTDefRegMap(@Self)^.clr := $00000002;
  70565. end;
  70566. procedure TCAN1_C1FIFOINT11.setRXHALFIF(thebits : TBits_1); inline;
  70567. begin
  70568. if thebits = 0 then
  70569. pTDefRegMap(@Self)^.clr := $00000002
  70570. else
  70571. pTDefRegMap(@Self)^.&set := $00000002;
  70572. end;
  70573. function TCAN1_C1FIFOINT11.getRXHALFIF : TBits_1; inline;
  70574. begin
  70575. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  70576. end;
  70577. procedure TCAN1_C1FIFOINT11.setRXFULLIF; inline;
  70578. begin
  70579. pTDefRegMap(@Self)^.&set := $00000004;
  70580. end;
  70581. procedure TCAN1_C1FIFOINT11.clearRXFULLIF; inline;
  70582. begin
  70583. pTDefRegMap(@Self)^.clr := $00000004;
  70584. end;
  70585. procedure TCAN1_C1FIFOINT11.setRXFULLIF(thebits : TBits_1); inline;
  70586. begin
  70587. if thebits = 0 then
  70588. pTDefRegMap(@Self)^.clr := $00000004
  70589. else
  70590. pTDefRegMap(@Self)^.&set := $00000004;
  70591. end;
  70592. function TCAN1_C1FIFOINT11.getRXFULLIF : TBits_1; inline;
  70593. begin
  70594. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  70595. end;
  70596. procedure TCAN1_C1FIFOINT11.setRXOVFLIF; inline;
  70597. begin
  70598. pTDefRegMap(@Self)^.&set := $00000008;
  70599. end;
  70600. procedure TCAN1_C1FIFOINT11.clearRXOVFLIF; inline;
  70601. begin
  70602. pTDefRegMap(@Self)^.clr := $00000008;
  70603. end;
  70604. procedure TCAN1_C1FIFOINT11.setRXOVFLIF(thebits : TBits_1); inline;
  70605. begin
  70606. if thebits = 0 then
  70607. pTDefRegMap(@Self)^.clr := $00000008
  70608. else
  70609. pTDefRegMap(@Self)^.&set := $00000008;
  70610. end;
  70611. function TCAN1_C1FIFOINT11.getRXOVFLIF : TBits_1; inline;
  70612. begin
  70613. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  70614. end;
  70615. procedure TCAN1_C1FIFOINT11.setTXEMPTYIF; inline;
  70616. begin
  70617. pTDefRegMap(@Self)^.&set := $00000100;
  70618. end;
  70619. procedure TCAN1_C1FIFOINT11.clearTXEMPTYIF; inline;
  70620. begin
  70621. pTDefRegMap(@Self)^.clr := $00000100;
  70622. end;
  70623. procedure TCAN1_C1FIFOINT11.setTXEMPTYIF(thebits : TBits_1); inline;
  70624. begin
  70625. if thebits = 0 then
  70626. pTDefRegMap(@Self)^.clr := $00000100
  70627. else
  70628. pTDefRegMap(@Self)^.&set := $00000100;
  70629. end;
  70630. function TCAN1_C1FIFOINT11.getTXEMPTYIF : TBits_1; inline;
  70631. begin
  70632. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  70633. end;
  70634. procedure TCAN1_C1FIFOINT11.setTXHALFIF; inline;
  70635. begin
  70636. pTDefRegMap(@Self)^.&set := $00000200;
  70637. end;
  70638. procedure TCAN1_C1FIFOINT11.clearTXHALFIF; inline;
  70639. begin
  70640. pTDefRegMap(@Self)^.clr := $00000200;
  70641. end;
  70642. procedure TCAN1_C1FIFOINT11.setTXHALFIF(thebits : TBits_1); inline;
  70643. begin
  70644. if thebits = 0 then
  70645. pTDefRegMap(@Self)^.clr := $00000200
  70646. else
  70647. pTDefRegMap(@Self)^.&set := $00000200;
  70648. end;
  70649. function TCAN1_C1FIFOINT11.getTXHALFIF : TBits_1; inline;
  70650. begin
  70651. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  70652. end;
  70653. procedure TCAN1_C1FIFOINT11.setTXNFULLIF; inline;
  70654. begin
  70655. pTDefRegMap(@Self)^.&set := $00000400;
  70656. end;
  70657. procedure TCAN1_C1FIFOINT11.clearTXNFULLIF; inline;
  70658. begin
  70659. pTDefRegMap(@Self)^.clr := $00000400;
  70660. end;
  70661. procedure TCAN1_C1FIFOINT11.setTXNFULLIF(thebits : TBits_1); inline;
  70662. begin
  70663. if thebits = 0 then
  70664. pTDefRegMap(@Self)^.clr := $00000400
  70665. else
  70666. pTDefRegMap(@Self)^.&set := $00000400;
  70667. end;
  70668. function TCAN1_C1FIFOINT11.getTXNFULLIF : TBits_1; inline;
  70669. begin
  70670. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  70671. end;
  70672. procedure TCAN1_C1FIFOINT11.setRXNEMPTYIE; inline;
  70673. begin
  70674. pTDefRegMap(@Self)^.&set := $00010000;
  70675. end;
  70676. procedure TCAN1_C1FIFOINT11.clearRXNEMPTYIE; inline;
  70677. begin
  70678. pTDefRegMap(@Self)^.clr := $00010000;
  70679. end;
  70680. procedure TCAN1_C1FIFOINT11.setRXNEMPTYIE(thebits : TBits_1); inline;
  70681. begin
  70682. if thebits = 0 then
  70683. pTDefRegMap(@Self)^.clr := $00010000
  70684. else
  70685. pTDefRegMap(@Self)^.&set := $00010000;
  70686. end;
  70687. function TCAN1_C1FIFOINT11.getRXNEMPTYIE : TBits_1; inline;
  70688. begin
  70689. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  70690. end;
  70691. procedure TCAN1_C1FIFOINT11.setRXHALFIE; inline;
  70692. begin
  70693. pTDefRegMap(@Self)^.&set := $00020000;
  70694. end;
  70695. procedure TCAN1_C1FIFOINT11.clearRXHALFIE; inline;
  70696. begin
  70697. pTDefRegMap(@Self)^.clr := $00020000;
  70698. end;
  70699. procedure TCAN1_C1FIFOINT11.setRXHALFIE(thebits : TBits_1); inline;
  70700. begin
  70701. if thebits = 0 then
  70702. pTDefRegMap(@Self)^.clr := $00020000
  70703. else
  70704. pTDefRegMap(@Self)^.&set := $00020000;
  70705. end;
  70706. function TCAN1_C1FIFOINT11.getRXHALFIE : TBits_1; inline;
  70707. begin
  70708. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  70709. end;
  70710. procedure TCAN1_C1FIFOINT11.setRXFULLIE; inline;
  70711. begin
  70712. pTDefRegMap(@Self)^.&set := $00040000;
  70713. end;
  70714. procedure TCAN1_C1FIFOINT11.clearRXFULLIE; inline;
  70715. begin
  70716. pTDefRegMap(@Self)^.clr := $00040000;
  70717. end;
  70718. procedure TCAN1_C1FIFOINT11.setRXFULLIE(thebits : TBits_1); inline;
  70719. begin
  70720. if thebits = 0 then
  70721. pTDefRegMap(@Self)^.clr := $00040000
  70722. else
  70723. pTDefRegMap(@Self)^.&set := $00040000;
  70724. end;
  70725. function TCAN1_C1FIFOINT11.getRXFULLIE : TBits_1; inline;
  70726. begin
  70727. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  70728. end;
  70729. procedure TCAN1_C1FIFOINT11.setRXOVFLIE; inline;
  70730. begin
  70731. pTDefRegMap(@Self)^.&set := $00080000;
  70732. end;
  70733. procedure TCAN1_C1FIFOINT11.clearRXOVFLIE; inline;
  70734. begin
  70735. pTDefRegMap(@Self)^.clr := $00080000;
  70736. end;
  70737. procedure TCAN1_C1FIFOINT11.setRXOVFLIE(thebits : TBits_1); inline;
  70738. begin
  70739. if thebits = 0 then
  70740. pTDefRegMap(@Self)^.clr := $00080000
  70741. else
  70742. pTDefRegMap(@Self)^.&set := $00080000;
  70743. end;
  70744. function TCAN1_C1FIFOINT11.getRXOVFLIE : TBits_1; inline;
  70745. begin
  70746. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  70747. end;
  70748. procedure TCAN1_C1FIFOINT11.setTXEMPTYIE; inline;
  70749. begin
  70750. pTDefRegMap(@Self)^.&set := $01000000;
  70751. end;
  70752. procedure TCAN1_C1FIFOINT11.clearTXEMPTYIE; inline;
  70753. begin
  70754. pTDefRegMap(@Self)^.clr := $01000000;
  70755. end;
  70756. procedure TCAN1_C1FIFOINT11.setTXEMPTYIE(thebits : TBits_1); inline;
  70757. begin
  70758. if thebits = 0 then
  70759. pTDefRegMap(@Self)^.clr := $01000000
  70760. else
  70761. pTDefRegMap(@Self)^.&set := $01000000;
  70762. end;
  70763. function TCAN1_C1FIFOINT11.getTXEMPTYIE : TBits_1; inline;
  70764. begin
  70765. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  70766. end;
  70767. procedure TCAN1_C1FIFOINT11.setTXHALFIE; inline;
  70768. begin
  70769. pTDefRegMap(@Self)^.&set := $02000000;
  70770. end;
  70771. procedure TCAN1_C1FIFOINT11.clearTXHALFIE; inline;
  70772. begin
  70773. pTDefRegMap(@Self)^.clr := $02000000;
  70774. end;
  70775. procedure TCAN1_C1FIFOINT11.setTXHALFIE(thebits : TBits_1); inline;
  70776. begin
  70777. if thebits = 0 then
  70778. pTDefRegMap(@Self)^.clr := $02000000
  70779. else
  70780. pTDefRegMap(@Self)^.&set := $02000000;
  70781. end;
  70782. function TCAN1_C1FIFOINT11.getTXHALFIE : TBits_1; inline;
  70783. begin
  70784. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  70785. end;
  70786. procedure TCAN1_C1FIFOINT11.setTXNFULLIE; inline;
  70787. begin
  70788. pTDefRegMap(@Self)^.&set := $04000000;
  70789. end;
  70790. procedure TCAN1_C1FIFOINT11.clearTXNFULLIE; inline;
  70791. begin
  70792. pTDefRegMap(@Self)^.clr := $04000000;
  70793. end;
  70794. procedure TCAN1_C1FIFOINT11.setTXNFULLIE(thebits : TBits_1); inline;
  70795. begin
  70796. if thebits = 0 then
  70797. pTDefRegMap(@Self)^.clr := $04000000
  70798. else
  70799. pTDefRegMap(@Self)^.&set := $04000000;
  70800. end;
  70801. function TCAN1_C1FIFOINT11.getTXNFULLIE : TBits_1; inline;
  70802. begin
  70803. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  70804. end;
  70805. procedure TCAN1_C1FIFOINT11.setw(thebits : TBits_32); inline;
  70806. begin
  70807. pTDefRegMap(@Self)^.val := thebits;
  70808. end;
  70809. function TCAN1_C1FIFOINT11.getw : TBits_32; inline;
  70810. begin
  70811. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  70812. end;
  70813. procedure TCAN1_C1FIFOCI11.setCFIFOCI(thebits : TBits_5); inline;
  70814. begin
  70815. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  70816. end;
  70817. function TCAN1_C1FIFOCI11.getCFIFOCI : TBits_5; inline;
  70818. begin
  70819. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  70820. end;
  70821. procedure TCAN1_C1FIFOCI11.setw(thebits : TBits_32); inline;
  70822. begin
  70823. pTDefRegMap(@Self)^.val := thebits;
  70824. end;
  70825. function TCAN1_C1FIFOCI11.getw : TBits_32; inline;
  70826. begin
  70827. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  70828. end;
  70829. procedure TCAN1_C1FIFOCON12.setTXPRI(thebits : TBits_2); inline;
  70830. begin
  70831. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  70832. end;
  70833. function TCAN1_C1FIFOCON12.getTXPRI : TBits_2; inline;
  70834. begin
  70835. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  70836. end;
  70837. procedure TCAN1_C1FIFOCON12.setRTREN; inline;
  70838. begin
  70839. pTDefRegMap(@Self)^.&set := $00000004;
  70840. end;
  70841. procedure TCAN1_C1FIFOCON12.clearRTREN; inline;
  70842. begin
  70843. pTDefRegMap(@Self)^.clr := $00000004;
  70844. end;
  70845. procedure TCAN1_C1FIFOCON12.setRTREN(thebits : TBits_1); inline;
  70846. begin
  70847. if thebits = 0 then
  70848. pTDefRegMap(@Self)^.clr := $00000004
  70849. else
  70850. pTDefRegMap(@Self)^.&set := $00000004;
  70851. end;
  70852. function TCAN1_C1FIFOCON12.getRTREN : TBits_1; inline;
  70853. begin
  70854. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  70855. end;
  70856. procedure TCAN1_C1FIFOCON12.setTXREQ; inline;
  70857. begin
  70858. pTDefRegMap(@Self)^.&set := $00000008;
  70859. end;
  70860. procedure TCAN1_C1FIFOCON12.clearTXREQ; inline;
  70861. begin
  70862. pTDefRegMap(@Self)^.clr := $00000008;
  70863. end;
  70864. procedure TCAN1_C1FIFOCON12.setTXREQ(thebits : TBits_1); inline;
  70865. begin
  70866. if thebits = 0 then
  70867. pTDefRegMap(@Self)^.clr := $00000008
  70868. else
  70869. pTDefRegMap(@Self)^.&set := $00000008;
  70870. end;
  70871. function TCAN1_C1FIFOCON12.getTXREQ : TBits_1; inline;
  70872. begin
  70873. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  70874. end;
  70875. procedure TCAN1_C1FIFOCON12.setTXERR; inline;
  70876. begin
  70877. pTDefRegMap(@Self)^.&set := $00000010;
  70878. end;
  70879. procedure TCAN1_C1FIFOCON12.clearTXERR; inline;
  70880. begin
  70881. pTDefRegMap(@Self)^.clr := $00000010;
  70882. end;
  70883. procedure TCAN1_C1FIFOCON12.setTXERR(thebits : TBits_1); inline;
  70884. begin
  70885. if thebits = 0 then
  70886. pTDefRegMap(@Self)^.clr := $00000010
  70887. else
  70888. pTDefRegMap(@Self)^.&set := $00000010;
  70889. end;
  70890. function TCAN1_C1FIFOCON12.getTXERR : TBits_1; inline;
  70891. begin
  70892. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  70893. end;
  70894. procedure TCAN1_C1FIFOCON12.setTXLARB; inline;
  70895. begin
  70896. pTDefRegMap(@Self)^.&set := $00000020;
  70897. end;
  70898. procedure TCAN1_C1FIFOCON12.clearTXLARB; inline;
  70899. begin
  70900. pTDefRegMap(@Self)^.clr := $00000020;
  70901. end;
  70902. procedure TCAN1_C1FIFOCON12.setTXLARB(thebits : TBits_1); inline;
  70903. begin
  70904. if thebits = 0 then
  70905. pTDefRegMap(@Self)^.clr := $00000020
  70906. else
  70907. pTDefRegMap(@Self)^.&set := $00000020;
  70908. end;
  70909. function TCAN1_C1FIFOCON12.getTXLARB : TBits_1; inline;
  70910. begin
  70911. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  70912. end;
  70913. procedure TCAN1_C1FIFOCON12.setTXABAT; inline;
  70914. begin
  70915. pTDefRegMap(@Self)^.&set := $00000040;
  70916. end;
  70917. procedure TCAN1_C1FIFOCON12.clearTXABAT; inline;
  70918. begin
  70919. pTDefRegMap(@Self)^.clr := $00000040;
  70920. end;
  70921. procedure TCAN1_C1FIFOCON12.setTXABAT(thebits : TBits_1); inline;
  70922. begin
  70923. if thebits = 0 then
  70924. pTDefRegMap(@Self)^.clr := $00000040
  70925. else
  70926. pTDefRegMap(@Self)^.&set := $00000040;
  70927. end;
  70928. function TCAN1_C1FIFOCON12.getTXABAT : TBits_1; inline;
  70929. begin
  70930. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  70931. end;
  70932. procedure TCAN1_C1FIFOCON12.setTXEN; inline;
  70933. begin
  70934. pTDefRegMap(@Self)^.&set := $00000080;
  70935. end;
  70936. procedure TCAN1_C1FIFOCON12.clearTXEN; inline;
  70937. begin
  70938. pTDefRegMap(@Self)^.clr := $00000080;
  70939. end;
  70940. procedure TCAN1_C1FIFOCON12.setTXEN(thebits : TBits_1); inline;
  70941. begin
  70942. if thebits = 0 then
  70943. pTDefRegMap(@Self)^.clr := $00000080
  70944. else
  70945. pTDefRegMap(@Self)^.&set := $00000080;
  70946. end;
  70947. function TCAN1_C1FIFOCON12.getTXEN : TBits_1; inline;
  70948. begin
  70949. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  70950. end;
  70951. procedure TCAN1_C1FIFOCON12.setDONLY; inline;
  70952. begin
  70953. pTDefRegMap(@Self)^.&set := $00001000;
  70954. end;
  70955. procedure TCAN1_C1FIFOCON12.clearDONLY; inline;
  70956. begin
  70957. pTDefRegMap(@Self)^.clr := $00001000;
  70958. end;
  70959. procedure TCAN1_C1FIFOCON12.setDONLY(thebits : TBits_1); inline;
  70960. begin
  70961. if thebits = 0 then
  70962. pTDefRegMap(@Self)^.clr := $00001000
  70963. else
  70964. pTDefRegMap(@Self)^.&set := $00001000;
  70965. end;
  70966. function TCAN1_C1FIFOCON12.getDONLY : TBits_1; inline;
  70967. begin
  70968. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  70969. end;
  70970. procedure TCAN1_C1FIFOCON12.setUINC; inline;
  70971. begin
  70972. pTDefRegMap(@Self)^.&set := $00002000;
  70973. end;
  70974. procedure TCAN1_C1FIFOCON12.clearUINC; inline;
  70975. begin
  70976. pTDefRegMap(@Self)^.clr := $00002000;
  70977. end;
  70978. procedure TCAN1_C1FIFOCON12.setUINC(thebits : TBits_1); inline;
  70979. begin
  70980. if thebits = 0 then
  70981. pTDefRegMap(@Self)^.clr := $00002000
  70982. else
  70983. pTDefRegMap(@Self)^.&set := $00002000;
  70984. end;
  70985. function TCAN1_C1FIFOCON12.getUINC : TBits_1; inline;
  70986. begin
  70987. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  70988. end;
  70989. procedure TCAN1_C1FIFOCON12.setFRESET; inline;
  70990. begin
  70991. pTDefRegMap(@Self)^.&set := $00004000;
  70992. end;
  70993. procedure TCAN1_C1FIFOCON12.clearFRESET; inline;
  70994. begin
  70995. pTDefRegMap(@Self)^.clr := $00004000;
  70996. end;
  70997. procedure TCAN1_C1FIFOCON12.setFRESET(thebits : TBits_1); inline;
  70998. begin
  70999. if thebits = 0 then
  71000. pTDefRegMap(@Self)^.clr := $00004000
  71001. else
  71002. pTDefRegMap(@Self)^.&set := $00004000;
  71003. end;
  71004. function TCAN1_C1FIFOCON12.getFRESET : TBits_1; inline;
  71005. begin
  71006. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  71007. end;
  71008. procedure TCAN1_C1FIFOCON12.setFSIZE(thebits : TBits_5); inline;
  71009. begin
  71010. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  71011. end;
  71012. function TCAN1_C1FIFOCON12.getFSIZE : TBits_5; inline;
  71013. begin
  71014. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  71015. end;
  71016. procedure TCAN1_C1FIFOCON12.setw(thebits : TBits_32); inline;
  71017. begin
  71018. pTDefRegMap(@Self)^.val := thebits;
  71019. end;
  71020. function TCAN1_C1FIFOCON12.getw : TBits_32; inline;
  71021. begin
  71022. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  71023. end;
  71024. procedure TCAN1_C1FIFOINT12.setRXNEMPTYIF; inline;
  71025. begin
  71026. pTDefRegMap(@Self)^.&set := $00000001;
  71027. end;
  71028. procedure TCAN1_C1FIFOINT12.clearRXNEMPTYIF; inline;
  71029. begin
  71030. pTDefRegMap(@Self)^.clr := $00000001;
  71031. end;
  71032. procedure TCAN1_C1FIFOINT12.setRXNEMPTYIF(thebits : TBits_1); inline;
  71033. begin
  71034. if thebits = 0 then
  71035. pTDefRegMap(@Self)^.clr := $00000001
  71036. else
  71037. pTDefRegMap(@Self)^.&set := $00000001;
  71038. end;
  71039. function TCAN1_C1FIFOINT12.getRXNEMPTYIF : TBits_1; inline;
  71040. begin
  71041. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  71042. end;
  71043. procedure TCAN1_C1FIFOINT12.setRXHALFIF; inline;
  71044. begin
  71045. pTDefRegMap(@Self)^.&set := $00000002;
  71046. end;
  71047. procedure TCAN1_C1FIFOINT12.clearRXHALFIF; inline;
  71048. begin
  71049. pTDefRegMap(@Self)^.clr := $00000002;
  71050. end;
  71051. procedure TCAN1_C1FIFOINT12.setRXHALFIF(thebits : TBits_1); inline;
  71052. begin
  71053. if thebits = 0 then
  71054. pTDefRegMap(@Self)^.clr := $00000002
  71055. else
  71056. pTDefRegMap(@Self)^.&set := $00000002;
  71057. end;
  71058. function TCAN1_C1FIFOINT12.getRXHALFIF : TBits_1; inline;
  71059. begin
  71060. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  71061. end;
  71062. procedure TCAN1_C1FIFOINT12.setRXFULLIF; inline;
  71063. begin
  71064. pTDefRegMap(@Self)^.&set := $00000004;
  71065. end;
  71066. procedure TCAN1_C1FIFOINT12.clearRXFULLIF; inline;
  71067. begin
  71068. pTDefRegMap(@Self)^.clr := $00000004;
  71069. end;
  71070. procedure TCAN1_C1FIFOINT12.setRXFULLIF(thebits : TBits_1); inline;
  71071. begin
  71072. if thebits = 0 then
  71073. pTDefRegMap(@Self)^.clr := $00000004
  71074. else
  71075. pTDefRegMap(@Self)^.&set := $00000004;
  71076. end;
  71077. function TCAN1_C1FIFOINT12.getRXFULLIF : TBits_1; inline;
  71078. begin
  71079. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  71080. end;
  71081. procedure TCAN1_C1FIFOINT12.setRXOVFLIF; inline;
  71082. begin
  71083. pTDefRegMap(@Self)^.&set := $00000008;
  71084. end;
  71085. procedure TCAN1_C1FIFOINT12.clearRXOVFLIF; inline;
  71086. begin
  71087. pTDefRegMap(@Self)^.clr := $00000008;
  71088. end;
  71089. procedure TCAN1_C1FIFOINT12.setRXOVFLIF(thebits : TBits_1); inline;
  71090. begin
  71091. if thebits = 0 then
  71092. pTDefRegMap(@Self)^.clr := $00000008
  71093. else
  71094. pTDefRegMap(@Self)^.&set := $00000008;
  71095. end;
  71096. function TCAN1_C1FIFOINT12.getRXOVFLIF : TBits_1; inline;
  71097. begin
  71098. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  71099. end;
  71100. procedure TCAN1_C1FIFOINT12.setTXEMPTYIF; inline;
  71101. begin
  71102. pTDefRegMap(@Self)^.&set := $00000100;
  71103. end;
  71104. procedure TCAN1_C1FIFOINT12.clearTXEMPTYIF; inline;
  71105. begin
  71106. pTDefRegMap(@Self)^.clr := $00000100;
  71107. end;
  71108. procedure TCAN1_C1FIFOINT12.setTXEMPTYIF(thebits : TBits_1); inline;
  71109. begin
  71110. if thebits = 0 then
  71111. pTDefRegMap(@Self)^.clr := $00000100
  71112. else
  71113. pTDefRegMap(@Self)^.&set := $00000100;
  71114. end;
  71115. function TCAN1_C1FIFOINT12.getTXEMPTYIF : TBits_1; inline;
  71116. begin
  71117. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  71118. end;
  71119. procedure TCAN1_C1FIFOINT12.setTXHALFIF; inline;
  71120. begin
  71121. pTDefRegMap(@Self)^.&set := $00000200;
  71122. end;
  71123. procedure TCAN1_C1FIFOINT12.clearTXHALFIF; inline;
  71124. begin
  71125. pTDefRegMap(@Self)^.clr := $00000200;
  71126. end;
  71127. procedure TCAN1_C1FIFOINT12.setTXHALFIF(thebits : TBits_1); inline;
  71128. begin
  71129. if thebits = 0 then
  71130. pTDefRegMap(@Self)^.clr := $00000200
  71131. else
  71132. pTDefRegMap(@Self)^.&set := $00000200;
  71133. end;
  71134. function TCAN1_C1FIFOINT12.getTXHALFIF : TBits_1; inline;
  71135. begin
  71136. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  71137. end;
  71138. procedure TCAN1_C1FIFOINT12.setTXNFULLIF; inline;
  71139. begin
  71140. pTDefRegMap(@Self)^.&set := $00000400;
  71141. end;
  71142. procedure TCAN1_C1FIFOINT12.clearTXNFULLIF; inline;
  71143. begin
  71144. pTDefRegMap(@Self)^.clr := $00000400;
  71145. end;
  71146. procedure TCAN1_C1FIFOINT12.setTXNFULLIF(thebits : TBits_1); inline;
  71147. begin
  71148. if thebits = 0 then
  71149. pTDefRegMap(@Self)^.clr := $00000400
  71150. else
  71151. pTDefRegMap(@Self)^.&set := $00000400;
  71152. end;
  71153. function TCAN1_C1FIFOINT12.getTXNFULLIF : TBits_1; inline;
  71154. begin
  71155. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  71156. end;
  71157. procedure TCAN1_C1FIFOINT12.setRXNEMPTYIE; inline;
  71158. begin
  71159. pTDefRegMap(@Self)^.&set := $00010000;
  71160. end;
  71161. procedure TCAN1_C1FIFOINT12.clearRXNEMPTYIE; inline;
  71162. begin
  71163. pTDefRegMap(@Self)^.clr := $00010000;
  71164. end;
  71165. procedure TCAN1_C1FIFOINT12.setRXNEMPTYIE(thebits : TBits_1); inline;
  71166. begin
  71167. if thebits = 0 then
  71168. pTDefRegMap(@Self)^.clr := $00010000
  71169. else
  71170. pTDefRegMap(@Self)^.&set := $00010000;
  71171. end;
  71172. function TCAN1_C1FIFOINT12.getRXNEMPTYIE : TBits_1; inline;
  71173. begin
  71174. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  71175. end;
  71176. procedure TCAN1_C1FIFOINT12.setRXHALFIE; inline;
  71177. begin
  71178. pTDefRegMap(@Self)^.&set := $00020000;
  71179. end;
  71180. procedure TCAN1_C1FIFOINT12.clearRXHALFIE; inline;
  71181. begin
  71182. pTDefRegMap(@Self)^.clr := $00020000;
  71183. end;
  71184. procedure TCAN1_C1FIFOINT12.setRXHALFIE(thebits : TBits_1); inline;
  71185. begin
  71186. if thebits = 0 then
  71187. pTDefRegMap(@Self)^.clr := $00020000
  71188. else
  71189. pTDefRegMap(@Self)^.&set := $00020000;
  71190. end;
  71191. function TCAN1_C1FIFOINT12.getRXHALFIE : TBits_1; inline;
  71192. begin
  71193. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  71194. end;
  71195. procedure TCAN1_C1FIFOINT12.setRXFULLIE; inline;
  71196. begin
  71197. pTDefRegMap(@Self)^.&set := $00040000;
  71198. end;
  71199. procedure TCAN1_C1FIFOINT12.clearRXFULLIE; inline;
  71200. begin
  71201. pTDefRegMap(@Self)^.clr := $00040000;
  71202. end;
  71203. procedure TCAN1_C1FIFOINT12.setRXFULLIE(thebits : TBits_1); inline;
  71204. begin
  71205. if thebits = 0 then
  71206. pTDefRegMap(@Self)^.clr := $00040000
  71207. else
  71208. pTDefRegMap(@Self)^.&set := $00040000;
  71209. end;
  71210. function TCAN1_C1FIFOINT12.getRXFULLIE : TBits_1; inline;
  71211. begin
  71212. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  71213. end;
  71214. procedure TCAN1_C1FIFOINT12.setRXOVFLIE; inline;
  71215. begin
  71216. pTDefRegMap(@Self)^.&set := $00080000;
  71217. end;
  71218. procedure TCAN1_C1FIFOINT12.clearRXOVFLIE; inline;
  71219. begin
  71220. pTDefRegMap(@Self)^.clr := $00080000;
  71221. end;
  71222. procedure TCAN1_C1FIFOINT12.setRXOVFLIE(thebits : TBits_1); inline;
  71223. begin
  71224. if thebits = 0 then
  71225. pTDefRegMap(@Self)^.clr := $00080000
  71226. else
  71227. pTDefRegMap(@Self)^.&set := $00080000;
  71228. end;
  71229. function TCAN1_C1FIFOINT12.getRXOVFLIE : TBits_1; inline;
  71230. begin
  71231. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  71232. end;
  71233. procedure TCAN1_C1FIFOINT12.setTXEMPTYIE; inline;
  71234. begin
  71235. pTDefRegMap(@Self)^.&set := $01000000;
  71236. end;
  71237. procedure TCAN1_C1FIFOINT12.clearTXEMPTYIE; inline;
  71238. begin
  71239. pTDefRegMap(@Self)^.clr := $01000000;
  71240. end;
  71241. procedure TCAN1_C1FIFOINT12.setTXEMPTYIE(thebits : TBits_1); inline;
  71242. begin
  71243. if thebits = 0 then
  71244. pTDefRegMap(@Self)^.clr := $01000000
  71245. else
  71246. pTDefRegMap(@Self)^.&set := $01000000;
  71247. end;
  71248. function TCAN1_C1FIFOINT12.getTXEMPTYIE : TBits_1; inline;
  71249. begin
  71250. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  71251. end;
  71252. procedure TCAN1_C1FIFOINT12.setTXHALFIE; inline;
  71253. begin
  71254. pTDefRegMap(@Self)^.&set := $02000000;
  71255. end;
  71256. procedure TCAN1_C1FIFOINT12.clearTXHALFIE; inline;
  71257. begin
  71258. pTDefRegMap(@Self)^.clr := $02000000;
  71259. end;
  71260. procedure TCAN1_C1FIFOINT12.setTXHALFIE(thebits : TBits_1); inline;
  71261. begin
  71262. if thebits = 0 then
  71263. pTDefRegMap(@Self)^.clr := $02000000
  71264. else
  71265. pTDefRegMap(@Self)^.&set := $02000000;
  71266. end;
  71267. function TCAN1_C1FIFOINT12.getTXHALFIE : TBits_1; inline;
  71268. begin
  71269. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  71270. end;
  71271. procedure TCAN1_C1FIFOINT12.setTXNFULLIE; inline;
  71272. begin
  71273. pTDefRegMap(@Self)^.&set := $04000000;
  71274. end;
  71275. procedure TCAN1_C1FIFOINT12.clearTXNFULLIE; inline;
  71276. begin
  71277. pTDefRegMap(@Self)^.clr := $04000000;
  71278. end;
  71279. procedure TCAN1_C1FIFOINT12.setTXNFULLIE(thebits : TBits_1); inline;
  71280. begin
  71281. if thebits = 0 then
  71282. pTDefRegMap(@Self)^.clr := $04000000
  71283. else
  71284. pTDefRegMap(@Self)^.&set := $04000000;
  71285. end;
  71286. function TCAN1_C1FIFOINT12.getTXNFULLIE : TBits_1; inline;
  71287. begin
  71288. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  71289. end;
  71290. procedure TCAN1_C1FIFOINT12.setw(thebits : TBits_32); inline;
  71291. begin
  71292. pTDefRegMap(@Self)^.val := thebits;
  71293. end;
  71294. function TCAN1_C1FIFOINT12.getw : TBits_32; inline;
  71295. begin
  71296. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  71297. end;
  71298. procedure TCAN1_C1FIFOCI12.setCFIFOCI(thebits : TBits_5); inline;
  71299. begin
  71300. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  71301. end;
  71302. function TCAN1_C1FIFOCI12.getCFIFOCI : TBits_5; inline;
  71303. begin
  71304. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  71305. end;
  71306. procedure TCAN1_C1FIFOCI12.setw(thebits : TBits_32); inline;
  71307. begin
  71308. pTDefRegMap(@Self)^.val := thebits;
  71309. end;
  71310. function TCAN1_C1FIFOCI12.getw : TBits_32; inline;
  71311. begin
  71312. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  71313. end;
  71314. procedure TCAN1_C1FIFOCON13.setTXPRI(thebits : TBits_2); inline;
  71315. begin
  71316. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  71317. end;
  71318. function TCAN1_C1FIFOCON13.getTXPRI : TBits_2; inline;
  71319. begin
  71320. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  71321. end;
  71322. procedure TCAN1_C1FIFOCON13.setRTREN; inline;
  71323. begin
  71324. pTDefRegMap(@Self)^.&set := $00000004;
  71325. end;
  71326. procedure TCAN1_C1FIFOCON13.clearRTREN; inline;
  71327. begin
  71328. pTDefRegMap(@Self)^.clr := $00000004;
  71329. end;
  71330. procedure TCAN1_C1FIFOCON13.setRTREN(thebits : TBits_1); inline;
  71331. begin
  71332. if thebits = 0 then
  71333. pTDefRegMap(@Self)^.clr := $00000004
  71334. else
  71335. pTDefRegMap(@Self)^.&set := $00000004;
  71336. end;
  71337. function TCAN1_C1FIFOCON13.getRTREN : TBits_1; inline;
  71338. begin
  71339. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  71340. end;
  71341. procedure TCAN1_C1FIFOCON13.setTXREQ; inline;
  71342. begin
  71343. pTDefRegMap(@Self)^.&set := $00000008;
  71344. end;
  71345. procedure TCAN1_C1FIFOCON13.clearTXREQ; inline;
  71346. begin
  71347. pTDefRegMap(@Self)^.clr := $00000008;
  71348. end;
  71349. procedure TCAN1_C1FIFOCON13.setTXREQ(thebits : TBits_1); inline;
  71350. begin
  71351. if thebits = 0 then
  71352. pTDefRegMap(@Self)^.clr := $00000008
  71353. else
  71354. pTDefRegMap(@Self)^.&set := $00000008;
  71355. end;
  71356. function TCAN1_C1FIFOCON13.getTXREQ : TBits_1; inline;
  71357. begin
  71358. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  71359. end;
  71360. procedure TCAN1_C1FIFOCON13.setTXERR; inline;
  71361. begin
  71362. pTDefRegMap(@Self)^.&set := $00000010;
  71363. end;
  71364. procedure TCAN1_C1FIFOCON13.clearTXERR; inline;
  71365. begin
  71366. pTDefRegMap(@Self)^.clr := $00000010;
  71367. end;
  71368. procedure TCAN1_C1FIFOCON13.setTXERR(thebits : TBits_1); inline;
  71369. begin
  71370. if thebits = 0 then
  71371. pTDefRegMap(@Self)^.clr := $00000010
  71372. else
  71373. pTDefRegMap(@Self)^.&set := $00000010;
  71374. end;
  71375. function TCAN1_C1FIFOCON13.getTXERR : TBits_1; inline;
  71376. begin
  71377. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  71378. end;
  71379. procedure TCAN1_C1FIFOCON13.setTXLARB; inline;
  71380. begin
  71381. pTDefRegMap(@Self)^.&set := $00000020;
  71382. end;
  71383. procedure TCAN1_C1FIFOCON13.clearTXLARB; inline;
  71384. begin
  71385. pTDefRegMap(@Self)^.clr := $00000020;
  71386. end;
  71387. procedure TCAN1_C1FIFOCON13.setTXLARB(thebits : TBits_1); inline;
  71388. begin
  71389. if thebits = 0 then
  71390. pTDefRegMap(@Self)^.clr := $00000020
  71391. else
  71392. pTDefRegMap(@Self)^.&set := $00000020;
  71393. end;
  71394. function TCAN1_C1FIFOCON13.getTXLARB : TBits_1; inline;
  71395. begin
  71396. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  71397. end;
  71398. procedure TCAN1_C1FIFOCON13.setTXABAT; inline;
  71399. begin
  71400. pTDefRegMap(@Self)^.&set := $00000040;
  71401. end;
  71402. procedure TCAN1_C1FIFOCON13.clearTXABAT; inline;
  71403. begin
  71404. pTDefRegMap(@Self)^.clr := $00000040;
  71405. end;
  71406. procedure TCAN1_C1FIFOCON13.setTXABAT(thebits : TBits_1); inline;
  71407. begin
  71408. if thebits = 0 then
  71409. pTDefRegMap(@Self)^.clr := $00000040
  71410. else
  71411. pTDefRegMap(@Self)^.&set := $00000040;
  71412. end;
  71413. function TCAN1_C1FIFOCON13.getTXABAT : TBits_1; inline;
  71414. begin
  71415. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  71416. end;
  71417. procedure TCAN1_C1FIFOCON13.setTXEN; inline;
  71418. begin
  71419. pTDefRegMap(@Self)^.&set := $00000080;
  71420. end;
  71421. procedure TCAN1_C1FIFOCON13.clearTXEN; inline;
  71422. begin
  71423. pTDefRegMap(@Self)^.clr := $00000080;
  71424. end;
  71425. procedure TCAN1_C1FIFOCON13.setTXEN(thebits : TBits_1); inline;
  71426. begin
  71427. if thebits = 0 then
  71428. pTDefRegMap(@Self)^.clr := $00000080
  71429. else
  71430. pTDefRegMap(@Self)^.&set := $00000080;
  71431. end;
  71432. function TCAN1_C1FIFOCON13.getTXEN : TBits_1; inline;
  71433. begin
  71434. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  71435. end;
  71436. procedure TCAN1_C1FIFOCON13.setDONLY; inline;
  71437. begin
  71438. pTDefRegMap(@Self)^.&set := $00001000;
  71439. end;
  71440. procedure TCAN1_C1FIFOCON13.clearDONLY; inline;
  71441. begin
  71442. pTDefRegMap(@Self)^.clr := $00001000;
  71443. end;
  71444. procedure TCAN1_C1FIFOCON13.setDONLY(thebits : TBits_1); inline;
  71445. begin
  71446. if thebits = 0 then
  71447. pTDefRegMap(@Self)^.clr := $00001000
  71448. else
  71449. pTDefRegMap(@Self)^.&set := $00001000;
  71450. end;
  71451. function TCAN1_C1FIFOCON13.getDONLY : TBits_1; inline;
  71452. begin
  71453. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  71454. end;
  71455. procedure TCAN1_C1FIFOCON13.setUINC; inline;
  71456. begin
  71457. pTDefRegMap(@Self)^.&set := $00002000;
  71458. end;
  71459. procedure TCAN1_C1FIFOCON13.clearUINC; inline;
  71460. begin
  71461. pTDefRegMap(@Self)^.clr := $00002000;
  71462. end;
  71463. procedure TCAN1_C1FIFOCON13.setUINC(thebits : TBits_1); inline;
  71464. begin
  71465. if thebits = 0 then
  71466. pTDefRegMap(@Self)^.clr := $00002000
  71467. else
  71468. pTDefRegMap(@Self)^.&set := $00002000;
  71469. end;
  71470. function TCAN1_C1FIFOCON13.getUINC : TBits_1; inline;
  71471. begin
  71472. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  71473. end;
  71474. procedure TCAN1_C1FIFOCON13.setFRESET; inline;
  71475. begin
  71476. pTDefRegMap(@Self)^.&set := $00004000;
  71477. end;
  71478. procedure TCAN1_C1FIFOCON13.clearFRESET; inline;
  71479. begin
  71480. pTDefRegMap(@Self)^.clr := $00004000;
  71481. end;
  71482. procedure TCAN1_C1FIFOCON13.setFRESET(thebits : TBits_1); inline;
  71483. begin
  71484. if thebits = 0 then
  71485. pTDefRegMap(@Self)^.clr := $00004000
  71486. else
  71487. pTDefRegMap(@Self)^.&set := $00004000;
  71488. end;
  71489. function TCAN1_C1FIFOCON13.getFRESET : TBits_1; inline;
  71490. begin
  71491. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  71492. end;
  71493. procedure TCAN1_C1FIFOCON13.setFSIZE(thebits : TBits_5); inline;
  71494. begin
  71495. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  71496. end;
  71497. function TCAN1_C1FIFOCON13.getFSIZE : TBits_5; inline;
  71498. begin
  71499. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  71500. end;
  71501. procedure TCAN1_C1FIFOCON13.setw(thebits : TBits_32); inline;
  71502. begin
  71503. pTDefRegMap(@Self)^.val := thebits;
  71504. end;
  71505. function TCAN1_C1FIFOCON13.getw : TBits_32; inline;
  71506. begin
  71507. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  71508. end;
  71509. procedure TCAN1_C1FIFOINT13.setRXNEMPTYIF; inline;
  71510. begin
  71511. pTDefRegMap(@Self)^.&set := $00000001;
  71512. end;
  71513. procedure TCAN1_C1FIFOINT13.clearRXNEMPTYIF; inline;
  71514. begin
  71515. pTDefRegMap(@Self)^.clr := $00000001;
  71516. end;
  71517. procedure TCAN1_C1FIFOINT13.setRXNEMPTYIF(thebits : TBits_1); inline;
  71518. begin
  71519. if thebits = 0 then
  71520. pTDefRegMap(@Self)^.clr := $00000001
  71521. else
  71522. pTDefRegMap(@Self)^.&set := $00000001;
  71523. end;
  71524. function TCAN1_C1FIFOINT13.getRXNEMPTYIF : TBits_1; inline;
  71525. begin
  71526. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  71527. end;
  71528. procedure TCAN1_C1FIFOINT13.setRXHALFIF; inline;
  71529. begin
  71530. pTDefRegMap(@Self)^.&set := $00000002;
  71531. end;
  71532. procedure TCAN1_C1FIFOINT13.clearRXHALFIF; inline;
  71533. begin
  71534. pTDefRegMap(@Self)^.clr := $00000002;
  71535. end;
  71536. procedure TCAN1_C1FIFOINT13.setRXHALFIF(thebits : TBits_1); inline;
  71537. begin
  71538. if thebits = 0 then
  71539. pTDefRegMap(@Self)^.clr := $00000002
  71540. else
  71541. pTDefRegMap(@Self)^.&set := $00000002;
  71542. end;
  71543. function TCAN1_C1FIFOINT13.getRXHALFIF : TBits_1; inline;
  71544. begin
  71545. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  71546. end;
  71547. procedure TCAN1_C1FIFOINT13.setRXFULLIF; inline;
  71548. begin
  71549. pTDefRegMap(@Self)^.&set := $00000004;
  71550. end;
  71551. procedure TCAN1_C1FIFOINT13.clearRXFULLIF; inline;
  71552. begin
  71553. pTDefRegMap(@Self)^.clr := $00000004;
  71554. end;
  71555. procedure TCAN1_C1FIFOINT13.setRXFULLIF(thebits : TBits_1); inline;
  71556. begin
  71557. if thebits = 0 then
  71558. pTDefRegMap(@Self)^.clr := $00000004
  71559. else
  71560. pTDefRegMap(@Self)^.&set := $00000004;
  71561. end;
  71562. function TCAN1_C1FIFOINT13.getRXFULLIF : TBits_1; inline;
  71563. begin
  71564. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  71565. end;
  71566. procedure TCAN1_C1FIFOINT13.setRXOVFLIF; inline;
  71567. begin
  71568. pTDefRegMap(@Self)^.&set := $00000008;
  71569. end;
  71570. procedure TCAN1_C1FIFOINT13.clearRXOVFLIF; inline;
  71571. begin
  71572. pTDefRegMap(@Self)^.clr := $00000008;
  71573. end;
  71574. procedure TCAN1_C1FIFOINT13.setRXOVFLIF(thebits : TBits_1); inline;
  71575. begin
  71576. if thebits = 0 then
  71577. pTDefRegMap(@Self)^.clr := $00000008
  71578. else
  71579. pTDefRegMap(@Self)^.&set := $00000008;
  71580. end;
  71581. function TCAN1_C1FIFOINT13.getRXOVFLIF : TBits_1; inline;
  71582. begin
  71583. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  71584. end;
  71585. procedure TCAN1_C1FIFOINT13.setTXEMPTYIF; inline;
  71586. begin
  71587. pTDefRegMap(@Self)^.&set := $00000100;
  71588. end;
  71589. procedure TCAN1_C1FIFOINT13.clearTXEMPTYIF; inline;
  71590. begin
  71591. pTDefRegMap(@Self)^.clr := $00000100;
  71592. end;
  71593. procedure TCAN1_C1FIFOINT13.setTXEMPTYIF(thebits : TBits_1); inline;
  71594. begin
  71595. if thebits = 0 then
  71596. pTDefRegMap(@Self)^.clr := $00000100
  71597. else
  71598. pTDefRegMap(@Self)^.&set := $00000100;
  71599. end;
  71600. function TCAN1_C1FIFOINT13.getTXEMPTYIF : TBits_1; inline;
  71601. begin
  71602. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  71603. end;
  71604. procedure TCAN1_C1FIFOINT13.setTXHALFIF; inline;
  71605. begin
  71606. pTDefRegMap(@Self)^.&set := $00000200;
  71607. end;
  71608. procedure TCAN1_C1FIFOINT13.clearTXHALFIF; inline;
  71609. begin
  71610. pTDefRegMap(@Self)^.clr := $00000200;
  71611. end;
  71612. procedure TCAN1_C1FIFOINT13.setTXHALFIF(thebits : TBits_1); inline;
  71613. begin
  71614. if thebits = 0 then
  71615. pTDefRegMap(@Self)^.clr := $00000200
  71616. else
  71617. pTDefRegMap(@Self)^.&set := $00000200;
  71618. end;
  71619. function TCAN1_C1FIFOINT13.getTXHALFIF : TBits_1; inline;
  71620. begin
  71621. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  71622. end;
  71623. procedure TCAN1_C1FIFOINT13.setTXNFULLIF; inline;
  71624. begin
  71625. pTDefRegMap(@Self)^.&set := $00000400;
  71626. end;
  71627. procedure TCAN1_C1FIFOINT13.clearTXNFULLIF; inline;
  71628. begin
  71629. pTDefRegMap(@Self)^.clr := $00000400;
  71630. end;
  71631. procedure TCAN1_C1FIFOINT13.setTXNFULLIF(thebits : TBits_1); inline;
  71632. begin
  71633. if thebits = 0 then
  71634. pTDefRegMap(@Self)^.clr := $00000400
  71635. else
  71636. pTDefRegMap(@Self)^.&set := $00000400;
  71637. end;
  71638. function TCAN1_C1FIFOINT13.getTXNFULLIF : TBits_1; inline;
  71639. begin
  71640. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  71641. end;
  71642. procedure TCAN1_C1FIFOINT13.setRXNEMPTYIE; inline;
  71643. begin
  71644. pTDefRegMap(@Self)^.&set := $00010000;
  71645. end;
  71646. procedure TCAN1_C1FIFOINT13.clearRXNEMPTYIE; inline;
  71647. begin
  71648. pTDefRegMap(@Self)^.clr := $00010000;
  71649. end;
  71650. procedure TCAN1_C1FIFOINT13.setRXNEMPTYIE(thebits : TBits_1); inline;
  71651. begin
  71652. if thebits = 0 then
  71653. pTDefRegMap(@Self)^.clr := $00010000
  71654. else
  71655. pTDefRegMap(@Self)^.&set := $00010000;
  71656. end;
  71657. function TCAN1_C1FIFOINT13.getRXNEMPTYIE : TBits_1; inline;
  71658. begin
  71659. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  71660. end;
  71661. procedure TCAN1_C1FIFOINT13.setRXHALFIE; inline;
  71662. begin
  71663. pTDefRegMap(@Self)^.&set := $00020000;
  71664. end;
  71665. procedure TCAN1_C1FIFOINT13.clearRXHALFIE; inline;
  71666. begin
  71667. pTDefRegMap(@Self)^.clr := $00020000;
  71668. end;
  71669. procedure TCAN1_C1FIFOINT13.setRXHALFIE(thebits : TBits_1); inline;
  71670. begin
  71671. if thebits = 0 then
  71672. pTDefRegMap(@Self)^.clr := $00020000
  71673. else
  71674. pTDefRegMap(@Self)^.&set := $00020000;
  71675. end;
  71676. function TCAN1_C1FIFOINT13.getRXHALFIE : TBits_1; inline;
  71677. begin
  71678. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  71679. end;
  71680. procedure TCAN1_C1FIFOINT13.setRXFULLIE; inline;
  71681. begin
  71682. pTDefRegMap(@Self)^.&set := $00040000;
  71683. end;
  71684. procedure TCAN1_C1FIFOINT13.clearRXFULLIE; inline;
  71685. begin
  71686. pTDefRegMap(@Self)^.clr := $00040000;
  71687. end;
  71688. procedure TCAN1_C1FIFOINT13.setRXFULLIE(thebits : TBits_1); inline;
  71689. begin
  71690. if thebits = 0 then
  71691. pTDefRegMap(@Self)^.clr := $00040000
  71692. else
  71693. pTDefRegMap(@Self)^.&set := $00040000;
  71694. end;
  71695. function TCAN1_C1FIFOINT13.getRXFULLIE : TBits_1; inline;
  71696. begin
  71697. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  71698. end;
  71699. procedure TCAN1_C1FIFOINT13.setRXOVFLIE; inline;
  71700. begin
  71701. pTDefRegMap(@Self)^.&set := $00080000;
  71702. end;
  71703. procedure TCAN1_C1FIFOINT13.clearRXOVFLIE; inline;
  71704. begin
  71705. pTDefRegMap(@Self)^.clr := $00080000;
  71706. end;
  71707. procedure TCAN1_C1FIFOINT13.setRXOVFLIE(thebits : TBits_1); inline;
  71708. begin
  71709. if thebits = 0 then
  71710. pTDefRegMap(@Self)^.clr := $00080000
  71711. else
  71712. pTDefRegMap(@Self)^.&set := $00080000;
  71713. end;
  71714. function TCAN1_C1FIFOINT13.getRXOVFLIE : TBits_1; inline;
  71715. begin
  71716. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  71717. end;
  71718. procedure TCAN1_C1FIFOINT13.setTXEMPTYIE; inline;
  71719. begin
  71720. pTDefRegMap(@Self)^.&set := $01000000;
  71721. end;
  71722. procedure TCAN1_C1FIFOINT13.clearTXEMPTYIE; inline;
  71723. begin
  71724. pTDefRegMap(@Self)^.clr := $01000000;
  71725. end;
  71726. procedure TCAN1_C1FIFOINT13.setTXEMPTYIE(thebits : TBits_1); inline;
  71727. begin
  71728. if thebits = 0 then
  71729. pTDefRegMap(@Self)^.clr := $01000000
  71730. else
  71731. pTDefRegMap(@Self)^.&set := $01000000;
  71732. end;
  71733. function TCAN1_C1FIFOINT13.getTXEMPTYIE : TBits_1; inline;
  71734. begin
  71735. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  71736. end;
  71737. procedure TCAN1_C1FIFOINT13.setTXHALFIE; inline;
  71738. begin
  71739. pTDefRegMap(@Self)^.&set := $02000000;
  71740. end;
  71741. procedure TCAN1_C1FIFOINT13.clearTXHALFIE; inline;
  71742. begin
  71743. pTDefRegMap(@Self)^.clr := $02000000;
  71744. end;
  71745. procedure TCAN1_C1FIFOINT13.setTXHALFIE(thebits : TBits_1); inline;
  71746. begin
  71747. if thebits = 0 then
  71748. pTDefRegMap(@Self)^.clr := $02000000
  71749. else
  71750. pTDefRegMap(@Self)^.&set := $02000000;
  71751. end;
  71752. function TCAN1_C1FIFOINT13.getTXHALFIE : TBits_1; inline;
  71753. begin
  71754. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  71755. end;
  71756. procedure TCAN1_C1FIFOINT13.setTXNFULLIE; inline;
  71757. begin
  71758. pTDefRegMap(@Self)^.&set := $04000000;
  71759. end;
  71760. procedure TCAN1_C1FIFOINT13.clearTXNFULLIE; inline;
  71761. begin
  71762. pTDefRegMap(@Self)^.clr := $04000000;
  71763. end;
  71764. procedure TCAN1_C1FIFOINT13.setTXNFULLIE(thebits : TBits_1); inline;
  71765. begin
  71766. if thebits = 0 then
  71767. pTDefRegMap(@Self)^.clr := $04000000
  71768. else
  71769. pTDefRegMap(@Self)^.&set := $04000000;
  71770. end;
  71771. function TCAN1_C1FIFOINT13.getTXNFULLIE : TBits_1; inline;
  71772. begin
  71773. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  71774. end;
  71775. procedure TCAN1_C1FIFOINT13.setw(thebits : TBits_32); inline;
  71776. begin
  71777. pTDefRegMap(@Self)^.val := thebits;
  71778. end;
  71779. function TCAN1_C1FIFOINT13.getw : TBits_32; inline;
  71780. begin
  71781. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  71782. end;
  71783. procedure TCAN1_C1FIFOCI13.setCFIFOCI(thebits : TBits_5); inline;
  71784. begin
  71785. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  71786. end;
  71787. function TCAN1_C1FIFOCI13.getCFIFOCI : TBits_5; inline;
  71788. begin
  71789. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  71790. end;
  71791. procedure TCAN1_C1FIFOCI13.setw(thebits : TBits_32); inline;
  71792. begin
  71793. pTDefRegMap(@Self)^.val := thebits;
  71794. end;
  71795. function TCAN1_C1FIFOCI13.getw : TBits_32; inline;
  71796. begin
  71797. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  71798. end;
  71799. procedure TCAN1_C1FIFOCON14.setTXPRI(thebits : TBits_2); inline;
  71800. begin
  71801. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  71802. end;
  71803. function TCAN1_C1FIFOCON14.getTXPRI : TBits_2; inline;
  71804. begin
  71805. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  71806. end;
  71807. procedure TCAN1_C1FIFOCON14.setRTREN; inline;
  71808. begin
  71809. pTDefRegMap(@Self)^.&set := $00000004;
  71810. end;
  71811. procedure TCAN1_C1FIFOCON14.clearRTREN; inline;
  71812. begin
  71813. pTDefRegMap(@Self)^.clr := $00000004;
  71814. end;
  71815. procedure TCAN1_C1FIFOCON14.setRTREN(thebits : TBits_1); inline;
  71816. begin
  71817. if thebits = 0 then
  71818. pTDefRegMap(@Self)^.clr := $00000004
  71819. else
  71820. pTDefRegMap(@Self)^.&set := $00000004;
  71821. end;
  71822. function TCAN1_C1FIFOCON14.getRTREN : TBits_1; inline;
  71823. begin
  71824. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  71825. end;
  71826. procedure TCAN1_C1FIFOCON14.setTXREQ; inline;
  71827. begin
  71828. pTDefRegMap(@Self)^.&set := $00000008;
  71829. end;
  71830. procedure TCAN1_C1FIFOCON14.clearTXREQ; inline;
  71831. begin
  71832. pTDefRegMap(@Self)^.clr := $00000008;
  71833. end;
  71834. procedure TCAN1_C1FIFOCON14.setTXREQ(thebits : TBits_1); inline;
  71835. begin
  71836. if thebits = 0 then
  71837. pTDefRegMap(@Self)^.clr := $00000008
  71838. else
  71839. pTDefRegMap(@Self)^.&set := $00000008;
  71840. end;
  71841. function TCAN1_C1FIFOCON14.getTXREQ : TBits_1; inline;
  71842. begin
  71843. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  71844. end;
  71845. procedure TCAN1_C1FIFOCON14.setTXERR; inline;
  71846. begin
  71847. pTDefRegMap(@Self)^.&set := $00000010;
  71848. end;
  71849. procedure TCAN1_C1FIFOCON14.clearTXERR; inline;
  71850. begin
  71851. pTDefRegMap(@Self)^.clr := $00000010;
  71852. end;
  71853. procedure TCAN1_C1FIFOCON14.setTXERR(thebits : TBits_1); inline;
  71854. begin
  71855. if thebits = 0 then
  71856. pTDefRegMap(@Self)^.clr := $00000010
  71857. else
  71858. pTDefRegMap(@Self)^.&set := $00000010;
  71859. end;
  71860. function TCAN1_C1FIFOCON14.getTXERR : TBits_1; inline;
  71861. begin
  71862. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  71863. end;
  71864. procedure TCAN1_C1FIFOCON14.setTXLARB; inline;
  71865. begin
  71866. pTDefRegMap(@Self)^.&set := $00000020;
  71867. end;
  71868. procedure TCAN1_C1FIFOCON14.clearTXLARB; inline;
  71869. begin
  71870. pTDefRegMap(@Self)^.clr := $00000020;
  71871. end;
  71872. procedure TCAN1_C1FIFOCON14.setTXLARB(thebits : TBits_1); inline;
  71873. begin
  71874. if thebits = 0 then
  71875. pTDefRegMap(@Self)^.clr := $00000020
  71876. else
  71877. pTDefRegMap(@Self)^.&set := $00000020;
  71878. end;
  71879. function TCAN1_C1FIFOCON14.getTXLARB : TBits_1; inline;
  71880. begin
  71881. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  71882. end;
  71883. procedure TCAN1_C1FIFOCON14.setTXABAT; inline;
  71884. begin
  71885. pTDefRegMap(@Self)^.&set := $00000040;
  71886. end;
  71887. procedure TCAN1_C1FIFOCON14.clearTXABAT; inline;
  71888. begin
  71889. pTDefRegMap(@Self)^.clr := $00000040;
  71890. end;
  71891. procedure TCAN1_C1FIFOCON14.setTXABAT(thebits : TBits_1); inline;
  71892. begin
  71893. if thebits = 0 then
  71894. pTDefRegMap(@Self)^.clr := $00000040
  71895. else
  71896. pTDefRegMap(@Self)^.&set := $00000040;
  71897. end;
  71898. function TCAN1_C1FIFOCON14.getTXABAT : TBits_1; inline;
  71899. begin
  71900. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  71901. end;
  71902. procedure TCAN1_C1FIFOCON14.setTXEN; inline;
  71903. begin
  71904. pTDefRegMap(@Self)^.&set := $00000080;
  71905. end;
  71906. procedure TCAN1_C1FIFOCON14.clearTXEN; inline;
  71907. begin
  71908. pTDefRegMap(@Self)^.clr := $00000080;
  71909. end;
  71910. procedure TCAN1_C1FIFOCON14.setTXEN(thebits : TBits_1); inline;
  71911. begin
  71912. if thebits = 0 then
  71913. pTDefRegMap(@Self)^.clr := $00000080
  71914. else
  71915. pTDefRegMap(@Self)^.&set := $00000080;
  71916. end;
  71917. function TCAN1_C1FIFOCON14.getTXEN : TBits_1; inline;
  71918. begin
  71919. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  71920. end;
  71921. procedure TCAN1_C1FIFOCON14.setDONLY; inline;
  71922. begin
  71923. pTDefRegMap(@Self)^.&set := $00001000;
  71924. end;
  71925. procedure TCAN1_C1FIFOCON14.clearDONLY; inline;
  71926. begin
  71927. pTDefRegMap(@Self)^.clr := $00001000;
  71928. end;
  71929. procedure TCAN1_C1FIFOCON14.setDONLY(thebits : TBits_1); inline;
  71930. begin
  71931. if thebits = 0 then
  71932. pTDefRegMap(@Self)^.clr := $00001000
  71933. else
  71934. pTDefRegMap(@Self)^.&set := $00001000;
  71935. end;
  71936. function TCAN1_C1FIFOCON14.getDONLY : TBits_1; inline;
  71937. begin
  71938. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  71939. end;
  71940. procedure TCAN1_C1FIFOCON14.setUINC; inline;
  71941. begin
  71942. pTDefRegMap(@Self)^.&set := $00002000;
  71943. end;
  71944. procedure TCAN1_C1FIFOCON14.clearUINC; inline;
  71945. begin
  71946. pTDefRegMap(@Self)^.clr := $00002000;
  71947. end;
  71948. procedure TCAN1_C1FIFOCON14.setUINC(thebits : TBits_1); inline;
  71949. begin
  71950. if thebits = 0 then
  71951. pTDefRegMap(@Self)^.clr := $00002000
  71952. else
  71953. pTDefRegMap(@Self)^.&set := $00002000;
  71954. end;
  71955. function TCAN1_C1FIFOCON14.getUINC : TBits_1; inline;
  71956. begin
  71957. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  71958. end;
  71959. procedure TCAN1_C1FIFOCON14.setFRESET; inline;
  71960. begin
  71961. pTDefRegMap(@Self)^.&set := $00004000;
  71962. end;
  71963. procedure TCAN1_C1FIFOCON14.clearFRESET; inline;
  71964. begin
  71965. pTDefRegMap(@Self)^.clr := $00004000;
  71966. end;
  71967. procedure TCAN1_C1FIFOCON14.setFRESET(thebits : TBits_1); inline;
  71968. begin
  71969. if thebits = 0 then
  71970. pTDefRegMap(@Self)^.clr := $00004000
  71971. else
  71972. pTDefRegMap(@Self)^.&set := $00004000;
  71973. end;
  71974. function TCAN1_C1FIFOCON14.getFRESET : TBits_1; inline;
  71975. begin
  71976. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  71977. end;
  71978. procedure TCAN1_C1FIFOCON14.setFSIZE(thebits : TBits_5); inline;
  71979. begin
  71980. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  71981. end;
  71982. function TCAN1_C1FIFOCON14.getFSIZE : TBits_5; inline;
  71983. begin
  71984. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  71985. end;
  71986. procedure TCAN1_C1FIFOCON14.setw(thebits : TBits_32); inline;
  71987. begin
  71988. pTDefRegMap(@Self)^.val := thebits;
  71989. end;
  71990. function TCAN1_C1FIFOCON14.getw : TBits_32; inline;
  71991. begin
  71992. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  71993. end;
  71994. procedure TCAN1_C1FIFOINT14.setRXNEMPTYIF; inline;
  71995. begin
  71996. pTDefRegMap(@Self)^.&set := $00000001;
  71997. end;
  71998. procedure TCAN1_C1FIFOINT14.clearRXNEMPTYIF; inline;
  71999. begin
  72000. pTDefRegMap(@Self)^.clr := $00000001;
  72001. end;
  72002. procedure TCAN1_C1FIFOINT14.setRXNEMPTYIF(thebits : TBits_1); inline;
  72003. begin
  72004. if thebits = 0 then
  72005. pTDefRegMap(@Self)^.clr := $00000001
  72006. else
  72007. pTDefRegMap(@Self)^.&set := $00000001;
  72008. end;
  72009. function TCAN1_C1FIFOINT14.getRXNEMPTYIF : TBits_1; inline;
  72010. begin
  72011. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  72012. end;
  72013. procedure TCAN1_C1FIFOINT14.setRXHALFIF; inline;
  72014. begin
  72015. pTDefRegMap(@Self)^.&set := $00000002;
  72016. end;
  72017. procedure TCAN1_C1FIFOINT14.clearRXHALFIF; inline;
  72018. begin
  72019. pTDefRegMap(@Self)^.clr := $00000002;
  72020. end;
  72021. procedure TCAN1_C1FIFOINT14.setRXHALFIF(thebits : TBits_1); inline;
  72022. begin
  72023. if thebits = 0 then
  72024. pTDefRegMap(@Self)^.clr := $00000002
  72025. else
  72026. pTDefRegMap(@Self)^.&set := $00000002;
  72027. end;
  72028. function TCAN1_C1FIFOINT14.getRXHALFIF : TBits_1; inline;
  72029. begin
  72030. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  72031. end;
  72032. procedure TCAN1_C1FIFOINT14.setRXFULLIF; inline;
  72033. begin
  72034. pTDefRegMap(@Self)^.&set := $00000004;
  72035. end;
  72036. procedure TCAN1_C1FIFOINT14.clearRXFULLIF; inline;
  72037. begin
  72038. pTDefRegMap(@Self)^.clr := $00000004;
  72039. end;
  72040. procedure TCAN1_C1FIFOINT14.setRXFULLIF(thebits : TBits_1); inline;
  72041. begin
  72042. if thebits = 0 then
  72043. pTDefRegMap(@Self)^.clr := $00000004
  72044. else
  72045. pTDefRegMap(@Self)^.&set := $00000004;
  72046. end;
  72047. function TCAN1_C1FIFOINT14.getRXFULLIF : TBits_1; inline;
  72048. begin
  72049. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  72050. end;
  72051. procedure TCAN1_C1FIFOINT14.setRXOVFLIF; inline;
  72052. begin
  72053. pTDefRegMap(@Self)^.&set := $00000008;
  72054. end;
  72055. procedure TCAN1_C1FIFOINT14.clearRXOVFLIF; inline;
  72056. begin
  72057. pTDefRegMap(@Self)^.clr := $00000008;
  72058. end;
  72059. procedure TCAN1_C1FIFOINT14.setRXOVFLIF(thebits : TBits_1); inline;
  72060. begin
  72061. if thebits = 0 then
  72062. pTDefRegMap(@Self)^.clr := $00000008
  72063. else
  72064. pTDefRegMap(@Self)^.&set := $00000008;
  72065. end;
  72066. function TCAN1_C1FIFOINT14.getRXOVFLIF : TBits_1; inline;
  72067. begin
  72068. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  72069. end;
  72070. procedure TCAN1_C1FIFOINT14.setTXEMPTYIF; inline;
  72071. begin
  72072. pTDefRegMap(@Self)^.&set := $00000100;
  72073. end;
  72074. procedure TCAN1_C1FIFOINT14.clearTXEMPTYIF; inline;
  72075. begin
  72076. pTDefRegMap(@Self)^.clr := $00000100;
  72077. end;
  72078. procedure TCAN1_C1FIFOINT14.setTXEMPTYIF(thebits : TBits_1); inline;
  72079. begin
  72080. if thebits = 0 then
  72081. pTDefRegMap(@Self)^.clr := $00000100
  72082. else
  72083. pTDefRegMap(@Self)^.&set := $00000100;
  72084. end;
  72085. function TCAN1_C1FIFOINT14.getTXEMPTYIF : TBits_1; inline;
  72086. begin
  72087. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  72088. end;
  72089. procedure TCAN1_C1FIFOINT14.setTXHALFIF; inline;
  72090. begin
  72091. pTDefRegMap(@Self)^.&set := $00000200;
  72092. end;
  72093. procedure TCAN1_C1FIFOINT14.clearTXHALFIF; inline;
  72094. begin
  72095. pTDefRegMap(@Self)^.clr := $00000200;
  72096. end;
  72097. procedure TCAN1_C1FIFOINT14.setTXHALFIF(thebits : TBits_1); inline;
  72098. begin
  72099. if thebits = 0 then
  72100. pTDefRegMap(@Self)^.clr := $00000200
  72101. else
  72102. pTDefRegMap(@Self)^.&set := $00000200;
  72103. end;
  72104. function TCAN1_C1FIFOINT14.getTXHALFIF : TBits_1; inline;
  72105. begin
  72106. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  72107. end;
  72108. procedure TCAN1_C1FIFOINT14.setTXNFULLIF; inline;
  72109. begin
  72110. pTDefRegMap(@Self)^.&set := $00000400;
  72111. end;
  72112. procedure TCAN1_C1FIFOINT14.clearTXNFULLIF; inline;
  72113. begin
  72114. pTDefRegMap(@Self)^.clr := $00000400;
  72115. end;
  72116. procedure TCAN1_C1FIFOINT14.setTXNFULLIF(thebits : TBits_1); inline;
  72117. begin
  72118. if thebits = 0 then
  72119. pTDefRegMap(@Self)^.clr := $00000400
  72120. else
  72121. pTDefRegMap(@Self)^.&set := $00000400;
  72122. end;
  72123. function TCAN1_C1FIFOINT14.getTXNFULLIF : TBits_1; inline;
  72124. begin
  72125. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  72126. end;
  72127. procedure TCAN1_C1FIFOINT14.setRXNEMPTYIE; inline;
  72128. begin
  72129. pTDefRegMap(@Self)^.&set := $00010000;
  72130. end;
  72131. procedure TCAN1_C1FIFOINT14.clearRXNEMPTYIE; inline;
  72132. begin
  72133. pTDefRegMap(@Self)^.clr := $00010000;
  72134. end;
  72135. procedure TCAN1_C1FIFOINT14.setRXNEMPTYIE(thebits : TBits_1); inline;
  72136. begin
  72137. if thebits = 0 then
  72138. pTDefRegMap(@Self)^.clr := $00010000
  72139. else
  72140. pTDefRegMap(@Self)^.&set := $00010000;
  72141. end;
  72142. function TCAN1_C1FIFOINT14.getRXNEMPTYIE : TBits_1; inline;
  72143. begin
  72144. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  72145. end;
  72146. procedure TCAN1_C1FIFOINT14.setRXHALFIE; inline;
  72147. begin
  72148. pTDefRegMap(@Self)^.&set := $00020000;
  72149. end;
  72150. procedure TCAN1_C1FIFOINT14.clearRXHALFIE; inline;
  72151. begin
  72152. pTDefRegMap(@Self)^.clr := $00020000;
  72153. end;
  72154. procedure TCAN1_C1FIFOINT14.setRXHALFIE(thebits : TBits_1); inline;
  72155. begin
  72156. if thebits = 0 then
  72157. pTDefRegMap(@Self)^.clr := $00020000
  72158. else
  72159. pTDefRegMap(@Self)^.&set := $00020000;
  72160. end;
  72161. function TCAN1_C1FIFOINT14.getRXHALFIE : TBits_1; inline;
  72162. begin
  72163. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  72164. end;
  72165. procedure TCAN1_C1FIFOINT14.setRXFULLIE; inline;
  72166. begin
  72167. pTDefRegMap(@Self)^.&set := $00040000;
  72168. end;
  72169. procedure TCAN1_C1FIFOINT14.clearRXFULLIE; inline;
  72170. begin
  72171. pTDefRegMap(@Self)^.clr := $00040000;
  72172. end;
  72173. procedure TCAN1_C1FIFOINT14.setRXFULLIE(thebits : TBits_1); inline;
  72174. begin
  72175. if thebits = 0 then
  72176. pTDefRegMap(@Self)^.clr := $00040000
  72177. else
  72178. pTDefRegMap(@Self)^.&set := $00040000;
  72179. end;
  72180. function TCAN1_C1FIFOINT14.getRXFULLIE : TBits_1; inline;
  72181. begin
  72182. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  72183. end;
  72184. procedure TCAN1_C1FIFOINT14.setRXOVFLIE; inline;
  72185. begin
  72186. pTDefRegMap(@Self)^.&set := $00080000;
  72187. end;
  72188. procedure TCAN1_C1FIFOINT14.clearRXOVFLIE; inline;
  72189. begin
  72190. pTDefRegMap(@Self)^.clr := $00080000;
  72191. end;
  72192. procedure TCAN1_C1FIFOINT14.setRXOVFLIE(thebits : TBits_1); inline;
  72193. begin
  72194. if thebits = 0 then
  72195. pTDefRegMap(@Self)^.clr := $00080000
  72196. else
  72197. pTDefRegMap(@Self)^.&set := $00080000;
  72198. end;
  72199. function TCAN1_C1FIFOINT14.getRXOVFLIE : TBits_1; inline;
  72200. begin
  72201. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  72202. end;
  72203. procedure TCAN1_C1FIFOINT14.setTXEMPTYIE; inline;
  72204. begin
  72205. pTDefRegMap(@Self)^.&set := $01000000;
  72206. end;
  72207. procedure TCAN1_C1FIFOINT14.clearTXEMPTYIE; inline;
  72208. begin
  72209. pTDefRegMap(@Self)^.clr := $01000000;
  72210. end;
  72211. procedure TCAN1_C1FIFOINT14.setTXEMPTYIE(thebits : TBits_1); inline;
  72212. begin
  72213. if thebits = 0 then
  72214. pTDefRegMap(@Self)^.clr := $01000000
  72215. else
  72216. pTDefRegMap(@Self)^.&set := $01000000;
  72217. end;
  72218. function TCAN1_C1FIFOINT14.getTXEMPTYIE : TBits_1; inline;
  72219. begin
  72220. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  72221. end;
  72222. procedure TCAN1_C1FIFOINT14.setTXHALFIE; inline;
  72223. begin
  72224. pTDefRegMap(@Self)^.&set := $02000000;
  72225. end;
  72226. procedure TCAN1_C1FIFOINT14.clearTXHALFIE; inline;
  72227. begin
  72228. pTDefRegMap(@Self)^.clr := $02000000;
  72229. end;
  72230. procedure TCAN1_C1FIFOINT14.setTXHALFIE(thebits : TBits_1); inline;
  72231. begin
  72232. if thebits = 0 then
  72233. pTDefRegMap(@Self)^.clr := $02000000
  72234. else
  72235. pTDefRegMap(@Self)^.&set := $02000000;
  72236. end;
  72237. function TCAN1_C1FIFOINT14.getTXHALFIE : TBits_1; inline;
  72238. begin
  72239. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  72240. end;
  72241. procedure TCAN1_C1FIFOINT14.setTXNFULLIE; inline;
  72242. begin
  72243. pTDefRegMap(@Self)^.&set := $04000000;
  72244. end;
  72245. procedure TCAN1_C1FIFOINT14.clearTXNFULLIE; inline;
  72246. begin
  72247. pTDefRegMap(@Self)^.clr := $04000000;
  72248. end;
  72249. procedure TCAN1_C1FIFOINT14.setTXNFULLIE(thebits : TBits_1); inline;
  72250. begin
  72251. if thebits = 0 then
  72252. pTDefRegMap(@Self)^.clr := $04000000
  72253. else
  72254. pTDefRegMap(@Self)^.&set := $04000000;
  72255. end;
  72256. function TCAN1_C1FIFOINT14.getTXNFULLIE : TBits_1; inline;
  72257. begin
  72258. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  72259. end;
  72260. procedure TCAN1_C1FIFOINT14.setw(thebits : TBits_32); inline;
  72261. begin
  72262. pTDefRegMap(@Self)^.val := thebits;
  72263. end;
  72264. function TCAN1_C1FIFOINT14.getw : TBits_32; inline;
  72265. begin
  72266. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72267. end;
  72268. procedure TCAN1_C1FIFOCI14.setCFIFOCI(thebits : TBits_5); inline;
  72269. begin
  72270. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  72271. end;
  72272. function TCAN1_C1FIFOCI14.getCFIFOCI : TBits_5; inline;
  72273. begin
  72274. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  72275. end;
  72276. procedure TCAN1_C1FIFOCI14.setw(thebits : TBits_32); inline;
  72277. begin
  72278. pTDefRegMap(@Self)^.val := thebits;
  72279. end;
  72280. function TCAN1_C1FIFOCI14.getw : TBits_32; inline;
  72281. begin
  72282. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72283. end;
  72284. procedure TCAN1_C1FIFOCON15.setTXPRI(thebits : TBits_2); inline;
  72285. begin
  72286. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  72287. end;
  72288. function TCAN1_C1FIFOCON15.getTXPRI : TBits_2; inline;
  72289. begin
  72290. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  72291. end;
  72292. procedure TCAN1_C1FIFOCON15.setRTREN; inline;
  72293. begin
  72294. pTDefRegMap(@Self)^.&set := $00000004;
  72295. end;
  72296. procedure TCAN1_C1FIFOCON15.clearRTREN; inline;
  72297. begin
  72298. pTDefRegMap(@Self)^.clr := $00000004;
  72299. end;
  72300. procedure TCAN1_C1FIFOCON15.setRTREN(thebits : TBits_1); inline;
  72301. begin
  72302. if thebits = 0 then
  72303. pTDefRegMap(@Self)^.clr := $00000004
  72304. else
  72305. pTDefRegMap(@Self)^.&set := $00000004;
  72306. end;
  72307. function TCAN1_C1FIFOCON15.getRTREN : TBits_1; inline;
  72308. begin
  72309. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  72310. end;
  72311. procedure TCAN1_C1FIFOCON15.setTXREQ; inline;
  72312. begin
  72313. pTDefRegMap(@Self)^.&set := $00000008;
  72314. end;
  72315. procedure TCAN1_C1FIFOCON15.clearTXREQ; inline;
  72316. begin
  72317. pTDefRegMap(@Self)^.clr := $00000008;
  72318. end;
  72319. procedure TCAN1_C1FIFOCON15.setTXREQ(thebits : TBits_1); inline;
  72320. begin
  72321. if thebits = 0 then
  72322. pTDefRegMap(@Self)^.clr := $00000008
  72323. else
  72324. pTDefRegMap(@Self)^.&set := $00000008;
  72325. end;
  72326. function TCAN1_C1FIFOCON15.getTXREQ : TBits_1; inline;
  72327. begin
  72328. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  72329. end;
  72330. procedure TCAN1_C1FIFOCON15.setTXERR; inline;
  72331. begin
  72332. pTDefRegMap(@Self)^.&set := $00000010;
  72333. end;
  72334. procedure TCAN1_C1FIFOCON15.clearTXERR; inline;
  72335. begin
  72336. pTDefRegMap(@Self)^.clr := $00000010;
  72337. end;
  72338. procedure TCAN1_C1FIFOCON15.setTXERR(thebits : TBits_1); inline;
  72339. begin
  72340. if thebits = 0 then
  72341. pTDefRegMap(@Self)^.clr := $00000010
  72342. else
  72343. pTDefRegMap(@Self)^.&set := $00000010;
  72344. end;
  72345. function TCAN1_C1FIFOCON15.getTXERR : TBits_1; inline;
  72346. begin
  72347. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  72348. end;
  72349. procedure TCAN1_C1FIFOCON15.setTXLARB; inline;
  72350. begin
  72351. pTDefRegMap(@Self)^.&set := $00000020;
  72352. end;
  72353. procedure TCAN1_C1FIFOCON15.clearTXLARB; inline;
  72354. begin
  72355. pTDefRegMap(@Self)^.clr := $00000020;
  72356. end;
  72357. procedure TCAN1_C1FIFOCON15.setTXLARB(thebits : TBits_1); inline;
  72358. begin
  72359. if thebits = 0 then
  72360. pTDefRegMap(@Self)^.clr := $00000020
  72361. else
  72362. pTDefRegMap(@Self)^.&set := $00000020;
  72363. end;
  72364. function TCAN1_C1FIFOCON15.getTXLARB : TBits_1; inline;
  72365. begin
  72366. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  72367. end;
  72368. procedure TCAN1_C1FIFOCON15.setTXABAT; inline;
  72369. begin
  72370. pTDefRegMap(@Self)^.&set := $00000040;
  72371. end;
  72372. procedure TCAN1_C1FIFOCON15.clearTXABAT; inline;
  72373. begin
  72374. pTDefRegMap(@Self)^.clr := $00000040;
  72375. end;
  72376. procedure TCAN1_C1FIFOCON15.setTXABAT(thebits : TBits_1); inline;
  72377. begin
  72378. if thebits = 0 then
  72379. pTDefRegMap(@Self)^.clr := $00000040
  72380. else
  72381. pTDefRegMap(@Self)^.&set := $00000040;
  72382. end;
  72383. function TCAN1_C1FIFOCON15.getTXABAT : TBits_1; inline;
  72384. begin
  72385. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  72386. end;
  72387. procedure TCAN1_C1FIFOCON15.setTXEN; inline;
  72388. begin
  72389. pTDefRegMap(@Self)^.&set := $00000080;
  72390. end;
  72391. procedure TCAN1_C1FIFOCON15.clearTXEN; inline;
  72392. begin
  72393. pTDefRegMap(@Self)^.clr := $00000080;
  72394. end;
  72395. procedure TCAN1_C1FIFOCON15.setTXEN(thebits : TBits_1); inline;
  72396. begin
  72397. if thebits = 0 then
  72398. pTDefRegMap(@Self)^.clr := $00000080
  72399. else
  72400. pTDefRegMap(@Self)^.&set := $00000080;
  72401. end;
  72402. function TCAN1_C1FIFOCON15.getTXEN : TBits_1; inline;
  72403. begin
  72404. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  72405. end;
  72406. procedure TCAN1_C1FIFOCON15.setDONLY; inline;
  72407. begin
  72408. pTDefRegMap(@Self)^.&set := $00001000;
  72409. end;
  72410. procedure TCAN1_C1FIFOCON15.clearDONLY; inline;
  72411. begin
  72412. pTDefRegMap(@Self)^.clr := $00001000;
  72413. end;
  72414. procedure TCAN1_C1FIFOCON15.setDONLY(thebits : TBits_1); inline;
  72415. begin
  72416. if thebits = 0 then
  72417. pTDefRegMap(@Self)^.clr := $00001000
  72418. else
  72419. pTDefRegMap(@Self)^.&set := $00001000;
  72420. end;
  72421. function TCAN1_C1FIFOCON15.getDONLY : TBits_1; inline;
  72422. begin
  72423. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  72424. end;
  72425. procedure TCAN1_C1FIFOCON15.setUINC; inline;
  72426. begin
  72427. pTDefRegMap(@Self)^.&set := $00002000;
  72428. end;
  72429. procedure TCAN1_C1FIFOCON15.clearUINC; inline;
  72430. begin
  72431. pTDefRegMap(@Self)^.clr := $00002000;
  72432. end;
  72433. procedure TCAN1_C1FIFOCON15.setUINC(thebits : TBits_1); inline;
  72434. begin
  72435. if thebits = 0 then
  72436. pTDefRegMap(@Self)^.clr := $00002000
  72437. else
  72438. pTDefRegMap(@Self)^.&set := $00002000;
  72439. end;
  72440. function TCAN1_C1FIFOCON15.getUINC : TBits_1; inline;
  72441. begin
  72442. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  72443. end;
  72444. procedure TCAN1_C1FIFOCON15.setFRESET; inline;
  72445. begin
  72446. pTDefRegMap(@Self)^.&set := $00004000;
  72447. end;
  72448. procedure TCAN1_C1FIFOCON15.clearFRESET; inline;
  72449. begin
  72450. pTDefRegMap(@Self)^.clr := $00004000;
  72451. end;
  72452. procedure TCAN1_C1FIFOCON15.setFRESET(thebits : TBits_1); inline;
  72453. begin
  72454. if thebits = 0 then
  72455. pTDefRegMap(@Self)^.clr := $00004000
  72456. else
  72457. pTDefRegMap(@Self)^.&set := $00004000;
  72458. end;
  72459. function TCAN1_C1FIFOCON15.getFRESET : TBits_1; inline;
  72460. begin
  72461. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  72462. end;
  72463. procedure TCAN1_C1FIFOCON15.setFSIZE(thebits : TBits_5); inline;
  72464. begin
  72465. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  72466. end;
  72467. function TCAN1_C1FIFOCON15.getFSIZE : TBits_5; inline;
  72468. begin
  72469. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  72470. end;
  72471. procedure TCAN1_C1FIFOCON15.setw(thebits : TBits_32); inline;
  72472. begin
  72473. pTDefRegMap(@Self)^.val := thebits;
  72474. end;
  72475. function TCAN1_C1FIFOCON15.getw : TBits_32; inline;
  72476. begin
  72477. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72478. end;
  72479. procedure TCAN1_C1FIFOINT15.setRXNEMPTYIF; inline;
  72480. begin
  72481. pTDefRegMap(@Self)^.&set := $00000001;
  72482. end;
  72483. procedure TCAN1_C1FIFOINT15.clearRXNEMPTYIF; inline;
  72484. begin
  72485. pTDefRegMap(@Self)^.clr := $00000001;
  72486. end;
  72487. procedure TCAN1_C1FIFOINT15.setRXNEMPTYIF(thebits : TBits_1); inline;
  72488. begin
  72489. if thebits = 0 then
  72490. pTDefRegMap(@Self)^.clr := $00000001
  72491. else
  72492. pTDefRegMap(@Self)^.&set := $00000001;
  72493. end;
  72494. function TCAN1_C1FIFOINT15.getRXNEMPTYIF : TBits_1; inline;
  72495. begin
  72496. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  72497. end;
  72498. procedure TCAN1_C1FIFOINT15.setRXHALFIF; inline;
  72499. begin
  72500. pTDefRegMap(@Self)^.&set := $00000002;
  72501. end;
  72502. procedure TCAN1_C1FIFOINT15.clearRXHALFIF; inline;
  72503. begin
  72504. pTDefRegMap(@Self)^.clr := $00000002;
  72505. end;
  72506. procedure TCAN1_C1FIFOINT15.setRXHALFIF(thebits : TBits_1); inline;
  72507. begin
  72508. if thebits = 0 then
  72509. pTDefRegMap(@Self)^.clr := $00000002
  72510. else
  72511. pTDefRegMap(@Self)^.&set := $00000002;
  72512. end;
  72513. function TCAN1_C1FIFOINT15.getRXHALFIF : TBits_1; inline;
  72514. begin
  72515. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  72516. end;
  72517. procedure TCAN1_C1FIFOINT15.setRXFULLIF; inline;
  72518. begin
  72519. pTDefRegMap(@Self)^.&set := $00000004;
  72520. end;
  72521. procedure TCAN1_C1FIFOINT15.clearRXFULLIF; inline;
  72522. begin
  72523. pTDefRegMap(@Self)^.clr := $00000004;
  72524. end;
  72525. procedure TCAN1_C1FIFOINT15.setRXFULLIF(thebits : TBits_1); inline;
  72526. begin
  72527. if thebits = 0 then
  72528. pTDefRegMap(@Self)^.clr := $00000004
  72529. else
  72530. pTDefRegMap(@Self)^.&set := $00000004;
  72531. end;
  72532. function TCAN1_C1FIFOINT15.getRXFULLIF : TBits_1; inline;
  72533. begin
  72534. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  72535. end;
  72536. procedure TCAN1_C1FIFOINT15.setRXOVFLIF; inline;
  72537. begin
  72538. pTDefRegMap(@Self)^.&set := $00000008;
  72539. end;
  72540. procedure TCAN1_C1FIFOINT15.clearRXOVFLIF; inline;
  72541. begin
  72542. pTDefRegMap(@Self)^.clr := $00000008;
  72543. end;
  72544. procedure TCAN1_C1FIFOINT15.setRXOVFLIF(thebits : TBits_1); inline;
  72545. begin
  72546. if thebits = 0 then
  72547. pTDefRegMap(@Self)^.clr := $00000008
  72548. else
  72549. pTDefRegMap(@Self)^.&set := $00000008;
  72550. end;
  72551. function TCAN1_C1FIFOINT15.getRXOVFLIF : TBits_1; inline;
  72552. begin
  72553. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  72554. end;
  72555. procedure TCAN1_C1FIFOINT15.setTXEMPTYIF; inline;
  72556. begin
  72557. pTDefRegMap(@Self)^.&set := $00000100;
  72558. end;
  72559. procedure TCAN1_C1FIFOINT15.clearTXEMPTYIF; inline;
  72560. begin
  72561. pTDefRegMap(@Self)^.clr := $00000100;
  72562. end;
  72563. procedure TCAN1_C1FIFOINT15.setTXEMPTYIF(thebits : TBits_1); inline;
  72564. begin
  72565. if thebits = 0 then
  72566. pTDefRegMap(@Self)^.clr := $00000100
  72567. else
  72568. pTDefRegMap(@Self)^.&set := $00000100;
  72569. end;
  72570. function TCAN1_C1FIFOINT15.getTXEMPTYIF : TBits_1; inline;
  72571. begin
  72572. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  72573. end;
  72574. procedure TCAN1_C1FIFOINT15.setTXHALFIF; inline;
  72575. begin
  72576. pTDefRegMap(@Self)^.&set := $00000200;
  72577. end;
  72578. procedure TCAN1_C1FIFOINT15.clearTXHALFIF; inline;
  72579. begin
  72580. pTDefRegMap(@Self)^.clr := $00000200;
  72581. end;
  72582. procedure TCAN1_C1FIFOINT15.setTXHALFIF(thebits : TBits_1); inline;
  72583. begin
  72584. if thebits = 0 then
  72585. pTDefRegMap(@Self)^.clr := $00000200
  72586. else
  72587. pTDefRegMap(@Self)^.&set := $00000200;
  72588. end;
  72589. function TCAN1_C1FIFOINT15.getTXHALFIF : TBits_1; inline;
  72590. begin
  72591. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  72592. end;
  72593. procedure TCAN1_C1FIFOINT15.setTXNFULLIF; inline;
  72594. begin
  72595. pTDefRegMap(@Self)^.&set := $00000400;
  72596. end;
  72597. procedure TCAN1_C1FIFOINT15.clearTXNFULLIF; inline;
  72598. begin
  72599. pTDefRegMap(@Self)^.clr := $00000400;
  72600. end;
  72601. procedure TCAN1_C1FIFOINT15.setTXNFULLIF(thebits : TBits_1); inline;
  72602. begin
  72603. if thebits = 0 then
  72604. pTDefRegMap(@Self)^.clr := $00000400
  72605. else
  72606. pTDefRegMap(@Self)^.&set := $00000400;
  72607. end;
  72608. function TCAN1_C1FIFOINT15.getTXNFULLIF : TBits_1; inline;
  72609. begin
  72610. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  72611. end;
  72612. procedure TCAN1_C1FIFOINT15.setRXNEMPTYIE; inline;
  72613. begin
  72614. pTDefRegMap(@Self)^.&set := $00010000;
  72615. end;
  72616. procedure TCAN1_C1FIFOINT15.clearRXNEMPTYIE; inline;
  72617. begin
  72618. pTDefRegMap(@Self)^.clr := $00010000;
  72619. end;
  72620. procedure TCAN1_C1FIFOINT15.setRXNEMPTYIE(thebits : TBits_1); inline;
  72621. begin
  72622. if thebits = 0 then
  72623. pTDefRegMap(@Self)^.clr := $00010000
  72624. else
  72625. pTDefRegMap(@Self)^.&set := $00010000;
  72626. end;
  72627. function TCAN1_C1FIFOINT15.getRXNEMPTYIE : TBits_1; inline;
  72628. begin
  72629. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  72630. end;
  72631. procedure TCAN1_C1FIFOINT15.setRXHALFIE; inline;
  72632. begin
  72633. pTDefRegMap(@Self)^.&set := $00020000;
  72634. end;
  72635. procedure TCAN1_C1FIFOINT15.clearRXHALFIE; inline;
  72636. begin
  72637. pTDefRegMap(@Self)^.clr := $00020000;
  72638. end;
  72639. procedure TCAN1_C1FIFOINT15.setRXHALFIE(thebits : TBits_1); inline;
  72640. begin
  72641. if thebits = 0 then
  72642. pTDefRegMap(@Self)^.clr := $00020000
  72643. else
  72644. pTDefRegMap(@Self)^.&set := $00020000;
  72645. end;
  72646. function TCAN1_C1FIFOINT15.getRXHALFIE : TBits_1; inline;
  72647. begin
  72648. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  72649. end;
  72650. procedure TCAN1_C1FIFOINT15.setRXFULLIE; inline;
  72651. begin
  72652. pTDefRegMap(@Self)^.&set := $00040000;
  72653. end;
  72654. procedure TCAN1_C1FIFOINT15.clearRXFULLIE; inline;
  72655. begin
  72656. pTDefRegMap(@Self)^.clr := $00040000;
  72657. end;
  72658. procedure TCAN1_C1FIFOINT15.setRXFULLIE(thebits : TBits_1); inline;
  72659. begin
  72660. if thebits = 0 then
  72661. pTDefRegMap(@Self)^.clr := $00040000
  72662. else
  72663. pTDefRegMap(@Self)^.&set := $00040000;
  72664. end;
  72665. function TCAN1_C1FIFOINT15.getRXFULLIE : TBits_1; inline;
  72666. begin
  72667. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  72668. end;
  72669. procedure TCAN1_C1FIFOINT15.setRXOVFLIE; inline;
  72670. begin
  72671. pTDefRegMap(@Self)^.&set := $00080000;
  72672. end;
  72673. procedure TCAN1_C1FIFOINT15.clearRXOVFLIE; inline;
  72674. begin
  72675. pTDefRegMap(@Self)^.clr := $00080000;
  72676. end;
  72677. procedure TCAN1_C1FIFOINT15.setRXOVFLIE(thebits : TBits_1); inline;
  72678. begin
  72679. if thebits = 0 then
  72680. pTDefRegMap(@Self)^.clr := $00080000
  72681. else
  72682. pTDefRegMap(@Self)^.&set := $00080000;
  72683. end;
  72684. function TCAN1_C1FIFOINT15.getRXOVFLIE : TBits_1; inline;
  72685. begin
  72686. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  72687. end;
  72688. procedure TCAN1_C1FIFOINT15.setTXEMPTYIE; inline;
  72689. begin
  72690. pTDefRegMap(@Self)^.&set := $01000000;
  72691. end;
  72692. procedure TCAN1_C1FIFOINT15.clearTXEMPTYIE; inline;
  72693. begin
  72694. pTDefRegMap(@Self)^.clr := $01000000;
  72695. end;
  72696. procedure TCAN1_C1FIFOINT15.setTXEMPTYIE(thebits : TBits_1); inline;
  72697. begin
  72698. if thebits = 0 then
  72699. pTDefRegMap(@Self)^.clr := $01000000
  72700. else
  72701. pTDefRegMap(@Self)^.&set := $01000000;
  72702. end;
  72703. function TCAN1_C1FIFOINT15.getTXEMPTYIE : TBits_1; inline;
  72704. begin
  72705. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  72706. end;
  72707. procedure TCAN1_C1FIFOINT15.setTXHALFIE; inline;
  72708. begin
  72709. pTDefRegMap(@Self)^.&set := $02000000;
  72710. end;
  72711. procedure TCAN1_C1FIFOINT15.clearTXHALFIE; inline;
  72712. begin
  72713. pTDefRegMap(@Self)^.clr := $02000000;
  72714. end;
  72715. procedure TCAN1_C1FIFOINT15.setTXHALFIE(thebits : TBits_1); inline;
  72716. begin
  72717. if thebits = 0 then
  72718. pTDefRegMap(@Self)^.clr := $02000000
  72719. else
  72720. pTDefRegMap(@Self)^.&set := $02000000;
  72721. end;
  72722. function TCAN1_C1FIFOINT15.getTXHALFIE : TBits_1; inline;
  72723. begin
  72724. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  72725. end;
  72726. procedure TCAN1_C1FIFOINT15.setTXNFULLIE; inline;
  72727. begin
  72728. pTDefRegMap(@Self)^.&set := $04000000;
  72729. end;
  72730. procedure TCAN1_C1FIFOINT15.clearTXNFULLIE; inline;
  72731. begin
  72732. pTDefRegMap(@Self)^.clr := $04000000;
  72733. end;
  72734. procedure TCAN1_C1FIFOINT15.setTXNFULLIE(thebits : TBits_1); inline;
  72735. begin
  72736. if thebits = 0 then
  72737. pTDefRegMap(@Self)^.clr := $04000000
  72738. else
  72739. pTDefRegMap(@Self)^.&set := $04000000;
  72740. end;
  72741. function TCAN1_C1FIFOINT15.getTXNFULLIE : TBits_1; inline;
  72742. begin
  72743. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  72744. end;
  72745. procedure TCAN1_C1FIFOINT15.setw(thebits : TBits_32); inline;
  72746. begin
  72747. pTDefRegMap(@Self)^.val := thebits;
  72748. end;
  72749. function TCAN1_C1FIFOINT15.getw : TBits_32; inline;
  72750. begin
  72751. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72752. end;
  72753. procedure TCAN1_C1FIFOCI15.setCFIFOCI(thebits : TBits_5); inline;
  72754. begin
  72755. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  72756. end;
  72757. function TCAN1_C1FIFOCI15.getCFIFOCI : TBits_5; inline;
  72758. begin
  72759. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  72760. end;
  72761. procedure TCAN1_C1FIFOCI15.setw(thebits : TBits_32); inline;
  72762. begin
  72763. pTDefRegMap(@Self)^.val := thebits;
  72764. end;
  72765. function TCAN1_C1FIFOCI15.getw : TBits_32; inline;
  72766. begin
  72767. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72768. end;
  72769. procedure TCAN1_C1FIFOCON16.setTXPRI(thebits : TBits_2); inline;
  72770. begin
  72771. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  72772. end;
  72773. function TCAN1_C1FIFOCON16.getTXPRI : TBits_2; inline;
  72774. begin
  72775. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  72776. end;
  72777. procedure TCAN1_C1FIFOCON16.setRTREN; inline;
  72778. begin
  72779. pTDefRegMap(@Self)^.&set := $00000004;
  72780. end;
  72781. procedure TCAN1_C1FIFOCON16.clearRTREN; inline;
  72782. begin
  72783. pTDefRegMap(@Self)^.clr := $00000004;
  72784. end;
  72785. procedure TCAN1_C1FIFOCON16.setRTREN(thebits : TBits_1); inline;
  72786. begin
  72787. if thebits = 0 then
  72788. pTDefRegMap(@Self)^.clr := $00000004
  72789. else
  72790. pTDefRegMap(@Self)^.&set := $00000004;
  72791. end;
  72792. function TCAN1_C1FIFOCON16.getRTREN : TBits_1; inline;
  72793. begin
  72794. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  72795. end;
  72796. procedure TCAN1_C1FIFOCON16.setTXREQ; inline;
  72797. begin
  72798. pTDefRegMap(@Self)^.&set := $00000008;
  72799. end;
  72800. procedure TCAN1_C1FIFOCON16.clearTXREQ; inline;
  72801. begin
  72802. pTDefRegMap(@Self)^.clr := $00000008;
  72803. end;
  72804. procedure TCAN1_C1FIFOCON16.setTXREQ(thebits : TBits_1); inline;
  72805. begin
  72806. if thebits = 0 then
  72807. pTDefRegMap(@Self)^.clr := $00000008
  72808. else
  72809. pTDefRegMap(@Self)^.&set := $00000008;
  72810. end;
  72811. function TCAN1_C1FIFOCON16.getTXREQ : TBits_1; inline;
  72812. begin
  72813. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  72814. end;
  72815. procedure TCAN1_C1FIFOCON16.setTXERR; inline;
  72816. begin
  72817. pTDefRegMap(@Self)^.&set := $00000010;
  72818. end;
  72819. procedure TCAN1_C1FIFOCON16.clearTXERR; inline;
  72820. begin
  72821. pTDefRegMap(@Self)^.clr := $00000010;
  72822. end;
  72823. procedure TCAN1_C1FIFOCON16.setTXERR(thebits : TBits_1); inline;
  72824. begin
  72825. if thebits = 0 then
  72826. pTDefRegMap(@Self)^.clr := $00000010
  72827. else
  72828. pTDefRegMap(@Self)^.&set := $00000010;
  72829. end;
  72830. function TCAN1_C1FIFOCON16.getTXERR : TBits_1; inline;
  72831. begin
  72832. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  72833. end;
  72834. procedure TCAN1_C1FIFOCON16.setTXLARB; inline;
  72835. begin
  72836. pTDefRegMap(@Self)^.&set := $00000020;
  72837. end;
  72838. procedure TCAN1_C1FIFOCON16.clearTXLARB; inline;
  72839. begin
  72840. pTDefRegMap(@Self)^.clr := $00000020;
  72841. end;
  72842. procedure TCAN1_C1FIFOCON16.setTXLARB(thebits : TBits_1); inline;
  72843. begin
  72844. if thebits = 0 then
  72845. pTDefRegMap(@Self)^.clr := $00000020
  72846. else
  72847. pTDefRegMap(@Self)^.&set := $00000020;
  72848. end;
  72849. function TCAN1_C1FIFOCON16.getTXLARB : TBits_1; inline;
  72850. begin
  72851. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  72852. end;
  72853. procedure TCAN1_C1FIFOCON16.setTXABAT; inline;
  72854. begin
  72855. pTDefRegMap(@Self)^.&set := $00000040;
  72856. end;
  72857. procedure TCAN1_C1FIFOCON16.clearTXABAT; inline;
  72858. begin
  72859. pTDefRegMap(@Self)^.clr := $00000040;
  72860. end;
  72861. procedure TCAN1_C1FIFOCON16.setTXABAT(thebits : TBits_1); inline;
  72862. begin
  72863. if thebits = 0 then
  72864. pTDefRegMap(@Self)^.clr := $00000040
  72865. else
  72866. pTDefRegMap(@Self)^.&set := $00000040;
  72867. end;
  72868. function TCAN1_C1FIFOCON16.getTXABAT : TBits_1; inline;
  72869. begin
  72870. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  72871. end;
  72872. procedure TCAN1_C1FIFOCON16.setTXEN; inline;
  72873. begin
  72874. pTDefRegMap(@Self)^.&set := $00000080;
  72875. end;
  72876. procedure TCAN1_C1FIFOCON16.clearTXEN; inline;
  72877. begin
  72878. pTDefRegMap(@Self)^.clr := $00000080;
  72879. end;
  72880. procedure TCAN1_C1FIFOCON16.setTXEN(thebits : TBits_1); inline;
  72881. begin
  72882. if thebits = 0 then
  72883. pTDefRegMap(@Self)^.clr := $00000080
  72884. else
  72885. pTDefRegMap(@Self)^.&set := $00000080;
  72886. end;
  72887. function TCAN1_C1FIFOCON16.getTXEN : TBits_1; inline;
  72888. begin
  72889. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  72890. end;
  72891. procedure TCAN1_C1FIFOCON16.setDONLY; inline;
  72892. begin
  72893. pTDefRegMap(@Self)^.&set := $00001000;
  72894. end;
  72895. procedure TCAN1_C1FIFOCON16.clearDONLY; inline;
  72896. begin
  72897. pTDefRegMap(@Self)^.clr := $00001000;
  72898. end;
  72899. procedure TCAN1_C1FIFOCON16.setDONLY(thebits : TBits_1); inline;
  72900. begin
  72901. if thebits = 0 then
  72902. pTDefRegMap(@Self)^.clr := $00001000
  72903. else
  72904. pTDefRegMap(@Self)^.&set := $00001000;
  72905. end;
  72906. function TCAN1_C1FIFOCON16.getDONLY : TBits_1; inline;
  72907. begin
  72908. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  72909. end;
  72910. procedure TCAN1_C1FIFOCON16.setUINC; inline;
  72911. begin
  72912. pTDefRegMap(@Self)^.&set := $00002000;
  72913. end;
  72914. procedure TCAN1_C1FIFOCON16.clearUINC; inline;
  72915. begin
  72916. pTDefRegMap(@Self)^.clr := $00002000;
  72917. end;
  72918. procedure TCAN1_C1FIFOCON16.setUINC(thebits : TBits_1); inline;
  72919. begin
  72920. if thebits = 0 then
  72921. pTDefRegMap(@Self)^.clr := $00002000
  72922. else
  72923. pTDefRegMap(@Self)^.&set := $00002000;
  72924. end;
  72925. function TCAN1_C1FIFOCON16.getUINC : TBits_1; inline;
  72926. begin
  72927. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  72928. end;
  72929. procedure TCAN1_C1FIFOCON16.setFRESET; inline;
  72930. begin
  72931. pTDefRegMap(@Self)^.&set := $00004000;
  72932. end;
  72933. procedure TCAN1_C1FIFOCON16.clearFRESET; inline;
  72934. begin
  72935. pTDefRegMap(@Self)^.clr := $00004000;
  72936. end;
  72937. procedure TCAN1_C1FIFOCON16.setFRESET(thebits : TBits_1); inline;
  72938. begin
  72939. if thebits = 0 then
  72940. pTDefRegMap(@Self)^.clr := $00004000
  72941. else
  72942. pTDefRegMap(@Self)^.&set := $00004000;
  72943. end;
  72944. function TCAN1_C1FIFOCON16.getFRESET : TBits_1; inline;
  72945. begin
  72946. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  72947. end;
  72948. procedure TCAN1_C1FIFOCON16.setFSIZE(thebits : TBits_5); inline;
  72949. begin
  72950. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  72951. end;
  72952. function TCAN1_C1FIFOCON16.getFSIZE : TBits_5; inline;
  72953. begin
  72954. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  72955. end;
  72956. procedure TCAN1_C1FIFOCON16.setw(thebits : TBits_32); inline;
  72957. begin
  72958. pTDefRegMap(@Self)^.val := thebits;
  72959. end;
  72960. function TCAN1_C1FIFOCON16.getw : TBits_32; inline;
  72961. begin
  72962. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72963. end;
  72964. procedure TCAN1_C1FIFOINT16.setRXNEMPTYIF; inline;
  72965. begin
  72966. pTDefRegMap(@Self)^.&set := $00000001;
  72967. end;
  72968. procedure TCAN1_C1FIFOINT16.clearRXNEMPTYIF; inline;
  72969. begin
  72970. pTDefRegMap(@Self)^.clr := $00000001;
  72971. end;
  72972. procedure TCAN1_C1FIFOINT16.setRXNEMPTYIF(thebits : TBits_1); inline;
  72973. begin
  72974. if thebits = 0 then
  72975. pTDefRegMap(@Self)^.clr := $00000001
  72976. else
  72977. pTDefRegMap(@Self)^.&set := $00000001;
  72978. end;
  72979. function TCAN1_C1FIFOINT16.getRXNEMPTYIF : TBits_1; inline;
  72980. begin
  72981. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  72982. end;
  72983. procedure TCAN1_C1FIFOINT16.setRXHALFIF; inline;
  72984. begin
  72985. pTDefRegMap(@Self)^.&set := $00000002;
  72986. end;
  72987. procedure TCAN1_C1FIFOINT16.clearRXHALFIF; inline;
  72988. begin
  72989. pTDefRegMap(@Self)^.clr := $00000002;
  72990. end;
  72991. procedure TCAN1_C1FIFOINT16.setRXHALFIF(thebits : TBits_1); inline;
  72992. begin
  72993. if thebits = 0 then
  72994. pTDefRegMap(@Self)^.clr := $00000002
  72995. else
  72996. pTDefRegMap(@Self)^.&set := $00000002;
  72997. end;
  72998. function TCAN1_C1FIFOINT16.getRXHALFIF : TBits_1; inline;
  72999. begin
  73000. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  73001. end;
  73002. procedure TCAN1_C1FIFOINT16.setRXFULLIF; inline;
  73003. begin
  73004. pTDefRegMap(@Self)^.&set := $00000004;
  73005. end;
  73006. procedure TCAN1_C1FIFOINT16.clearRXFULLIF; inline;
  73007. begin
  73008. pTDefRegMap(@Self)^.clr := $00000004;
  73009. end;
  73010. procedure TCAN1_C1FIFOINT16.setRXFULLIF(thebits : TBits_1); inline;
  73011. begin
  73012. if thebits = 0 then
  73013. pTDefRegMap(@Self)^.clr := $00000004
  73014. else
  73015. pTDefRegMap(@Self)^.&set := $00000004;
  73016. end;
  73017. function TCAN1_C1FIFOINT16.getRXFULLIF : TBits_1; inline;
  73018. begin
  73019. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  73020. end;
  73021. procedure TCAN1_C1FIFOINT16.setRXOVFLIF; inline;
  73022. begin
  73023. pTDefRegMap(@Self)^.&set := $00000008;
  73024. end;
  73025. procedure TCAN1_C1FIFOINT16.clearRXOVFLIF; inline;
  73026. begin
  73027. pTDefRegMap(@Self)^.clr := $00000008;
  73028. end;
  73029. procedure TCAN1_C1FIFOINT16.setRXOVFLIF(thebits : TBits_1); inline;
  73030. begin
  73031. if thebits = 0 then
  73032. pTDefRegMap(@Self)^.clr := $00000008
  73033. else
  73034. pTDefRegMap(@Self)^.&set := $00000008;
  73035. end;
  73036. function TCAN1_C1FIFOINT16.getRXOVFLIF : TBits_1; inline;
  73037. begin
  73038. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  73039. end;
  73040. procedure TCAN1_C1FIFOINT16.setTXEMPTYIF; inline;
  73041. begin
  73042. pTDefRegMap(@Self)^.&set := $00000100;
  73043. end;
  73044. procedure TCAN1_C1FIFOINT16.clearTXEMPTYIF; inline;
  73045. begin
  73046. pTDefRegMap(@Self)^.clr := $00000100;
  73047. end;
  73048. procedure TCAN1_C1FIFOINT16.setTXEMPTYIF(thebits : TBits_1); inline;
  73049. begin
  73050. if thebits = 0 then
  73051. pTDefRegMap(@Self)^.clr := $00000100
  73052. else
  73053. pTDefRegMap(@Self)^.&set := $00000100;
  73054. end;
  73055. function TCAN1_C1FIFOINT16.getTXEMPTYIF : TBits_1; inline;
  73056. begin
  73057. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  73058. end;
  73059. procedure TCAN1_C1FIFOINT16.setTXHALFIF; inline;
  73060. begin
  73061. pTDefRegMap(@Self)^.&set := $00000200;
  73062. end;
  73063. procedure TCAN1_C1FIFOINT16.clearTXHALFIF; inline;
  73064. begin
  73065. pTDefRegMap(@Self)^.clr := $00000200;
  73066. end;
  73067. procedure TCAN1_C1FIFOINT16.setTXHALFIF(thebits : TBits_1); inline;
  73068. begin
  73069. if thebits = 0 then
  73070. pTDefRegMap(@Self)^.clr := $00000200
  73071. else
  73072. pTDefRegMap(@Self)^.&set := $00000200;
  73073. end;
  73074. function TCAN1_C1FIFOINT16.getTXHALFIF : TBits_1; inline;
  73075. begin
  73076. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  73077. end;
  73078. procedure TCAN1_C1FIFOINT16.setTXNFULLIF; inline;
  73079. begin
  73080. pTDefRegMap(@Self)^.&set := $00000400;
  73081. end;
  73082. procedure TCAN1_C1FIFOINT16.clearTXNFULLIF; inline;
  73083. begin
  73084. pTDefRegMap(@Self)^.clr := $00000400;
  73085. end;
  73086. procedure TCAN1_C1FIFOINT16.setTXNFULLIF(thebits : TBits_1); inline;
  73087. begin
  73088. if thebits = 0 then
  73089. pTDefRegMap(@Self)^.clr := $00000400
  73090. else
  73091. pTDefRegMap(@Self)^.&set := $00000400;
  73092. end;
  73093. function TCAN1_C1FIFOINT16.getTXNFULLIF : TBits_1; inline;
  73094. begin
  73095. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  73096. end;
  73097. procedure TCAN1_C1FIFOINT16.setRXNEMPTYIE; inline;
  73098. begin
  73099. pTDefRegMap(@Self)^.&set := $00010000;
  73100. end;
  73101. procedure TCAN1_C1FIFOINT16.clearRXNEMPTYIE; inline;
  73102. begin
  73103. pTDefRegMap(@Self)^.clr := $00010000;
  73104. end;
  73105. procedure TCAN1_C1FIFOINT16.setRXNEMPTYIE(thebits : TBits_1); inline;
  73106. begin
  73107. if thebits = 0 then
  73108. pTDefRegMap(@Self)^.clr := $00010000
  73109. else
  73110. pTDefRegMap(@Self)^.&set := $00010000;
  73111. end;
  73112. function TCAN1_C1FIFOINT16.getRXNEMPTYIE : TBits_1; inline;
  73113. begin
  73114. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  73115. end;
  73116. procedure TCAN1_C1FIFOINT16.setRXHALFIE; inline;
  73117. begin
  73118. pTDefRegMap(@Self)^.&set := $00020000;
  73119. end;
  73120. procedure TCAN1_C1FIFOINT16.clearRXHALFIE; inline;
  73121. begin
  73122. pTDefRegMap(@Self)^.clr := $00020000;
  73123. end;
  73124. procedure TCAN1_C1FIFOINT16.setRXHALFIE(thebits : TBits_1); inline;
  73125. begin
  73126. if thebits = 0 then
  73127. pTDefRegMap(@Self)^.clr := $00020000
  73128. else
  73129. pTDefRegMap(@Self)^.&set := $00020000;
  73130. end;
  73131. function TCAN1_C1FIFOINT16.getRXHALFIE : TBits_1; inline;
  73132. begin
  73133. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  73134. end;
  73135. procedure TCAN1_C1FIFOINT16.setRXFULLIE; inline;
  73136. begin
  73137. pTDefRegMap(@Self)^.&set := $00040000;
  73138. end;
  73139. procedure TCAN1_C1FIFOINT16.clearRXFULLIE; inline;
  73140. begin
  73141. pTDefRegMap(@Self)^.clr := $00040000;
  73142. end;
  73143. procedure TCAN1_C1FIFOINT16.setRXFULLIE(thebits : TBits_1); inline;
  73144. begin
  73145. if thebits = 0 then
  73146. pTDefRegMap(@Self)^.clr := $00040000
  73147. else
  73148. pTDefRegMap(@Self)^.&set := $00040000;
  73149. end;
  73150. function TCAN1_C1FIFOINT16.getRXFULLIE : TBits_1; inline;
  73151. begin
  73152. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  73153. end;
  73154. procedure TCAN1_C1FIFOINT16.setRXOVFLIE; inline;
  73155. begin
  73156. pTDefRegMap(@Self)^.&set := $00080000;
  73157. end;
  73158. procedure TCAN1_C1FIFOINT16.clearRXOVFLIE; inline;
  73159. begin
  73160. pTDefRegMap(@Self)^.clr := $00080000;
  73161. end;
  73162. procedure TCAN1_C1FIFOINT16.setRXOVFLIE(thebits : TBits_1); inline;
  73163. begin
  73164. if thebits = 0 then
  73165. pTDefRegMap(@Self)^.clr := $00080000
  73166. else
  73167. pTDefRegMap(@Self)^.&set := $00080000;
  73168. end;
  73169. function TCAN1_C1FIFOINT16.getRXOVFLIE : TBits_1; inline;
  73170. begin
  73171. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  73172. end;
  73173. procedure TCAN1_C1FIFOINT16.setTXEMPTYIE; inline;
  73174. begin
  73175. pTDefRegMap(@Self)^.&set := $01000000;
  73176. end;
  73177. procedure TCAN1_C1FIFOINT16.clearTXEMPTYIE; inline;
  73178. begin
  73179. pTDefRegMap(@Self)^.clr := $01000000;
  73180. end;
  73181. procedure TCAN1_C1FIFOINT16.setTXEMPTYIE(thebits : TBits_1); inline;
  73182. begin
  73183. if thebits = 0 then
  73184. pTDefRegMap(@Self)^.clr := $01000000
  73185. else
  73186. pTDefRegMap(@Self)^.&set := $01000000;
  73187. end;
  73188. function TCAN1_C1FIFOINT16.getTXEMPTYIE : TBits_1; inline;
  73189. begin
  73190. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  73191. end;
  73192. procedure TCAN1_C1FIFOINT16.setTXHALFIE; inline;
  73193. begin
  73194. pTDefRegMap(@Self)^.&set := $02000000;
  73195. end;
  73196. procedure TCAN1_C1FIFOINT16.clearTXHALFIE; inline;
  73197. begin
  73198. pTDefRegMap(@Self)^.clr := $02000000;
  73199. end;
  73200. procedure TCAN1_C1FIFOINT16.setTXHALFIE(thebits : TBits_1); inline;
  73201. begin
  73202. if thebits = 0 then
  73203. pTDefRegMap(@Self)^.clr := $02000000
  73204. else
  73205. pTDefRegMap(@Self)^.&set := $02000000;
  73206. end;
  73207. function TCAN1_C1FIFOINT16.getTXHALFIE : TBits_1; inline;
  73208. begin
  73209. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  73210. end;
  73211. procedure TCAN1_C1FIFOINT16.setTXNFULLIE; inline;
  73212. begin
  73213. pTDefRegMap(@Self)^.&set := $04000000;
  73214. end;
  73215. procedure TCAN1_C1FIFOINT16.clearTXNFULLIE; inline;
  73216. begin
  73217. pTDefRegMap(@Self)^.clr := $04000000;
  73218. end;
  73219. procedure TCAN1_C1FIFOINT16.setTXNFULLIE(thebits : TBits_1); inline;
  73220. begin
  73221. if thebits = 0 then
  73222. pTDefRegMap(@Self)^.clr := $04000000
  73223. else
  73224. pTDefRegMap(@Self)^.&set := $04000000;
  73225. end;
  73226. function TCAN1_C1FIFOINT16.getTXNFULLIE : TBits_1; inline;
  73227. begin
  73228. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  73229. end;
  73230. procedure TCAN1_C1FIFOINT16.setw(thebits : TBits_32); inline;
  73231. begin
  73232. pTDefRegMap(@Self)^.val := thebits;
  73233. end;
  73234. function TCAN1_C1FIFOINT16.getw : TBits_32; inline;
  73235. begin
  73236. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73237. end;
  73238. procedure TCAN1_C1FIFOCI16.setCFIFOCI(thebits : TBits_5); inline;
  73239. begin
  73240. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  73241. end;
  73242. function TCAN1_C1FIFOCI16.getCFIFOCI : TBits_5; inline;
  73243. begin
  73244. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  73245. end;
  73246. procedure TCAN1_C1FIFOCI16.setw(thebits : TBits_32); inline;
  73247. begin
  73248. pTDefRegMap(@Self)^.val := thebits;
  73249. end;
  73250. function TCAN1_C1FIFOCI16.getw : TBits_32; inline;
  73251. begin
  73252. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73253. end;
  73254. procedure TCAN1_C1FIFOCON17.setTXPRI(thebits : TBits_2); inline;
  73255. begin
  73256. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  73257. end;
  73258. function TCAN1_C1FIFOCON17.getTXPRI : TBits_2; inline;
  73259. begin
  73260. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  73261. end;
  73262. procedure TCAN1_C1FIFOCON17.setRTREN; inline;
  73263. begin
  73264. pTDefRegMap(@Self)^.&set := $00000004;
  73265. end;
  73266. procedure TCAN1_C1FIFOCON17.clearRTREN; inline;
  73267. begin
  73268. pTDefRegMap(@Self)^.clr := $00000004;
  73269. end;
  73270. procedure TCAN1_C1FIFOCON17.setRTREN(thebits : TBits_1); inline;
  73271. begin
  73272. if thebits = 0 then
  73273. pTDefRegMap(@Self)^.clr := $00000004
  73274. else
  73275. pTDefRegMap(@Self)^.&set := $00000004;
  73276. end;
  73277. function TCAN1_C1FIFOCON17.getRTREN : TBits_1; inline;
  73278. begin
  73279. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  73280. end;
  73281. procedure TCAN1_C1FIFOCON17.setTXREQ; inline;
  73282. begin
  73283. pTDefRegMap(@Self)^.&set := $00000008;
  73284. end;
  73285. procedure TCAN1_C1FIFOCON17.clearTXREQ; inline;
  73286. begin
  73287. pTDefRegMap(@Self)^.clr := $00000008;
  73288. end;
  73289. procedure TCAN1_C1FIFOCON17.setTXREQ(thebits : TBits_1); inline;
  73290. begin
  73291. if thebits = 0 then
  73292. pTDefRegMap(@Self)^.clr := $00000008
  73293. else
  73294. pTDefRegMap(@Self)^.&set := $00000008;
  73295. end;
  73296. function TCAN1_C1FIFOCON17.getTXREQ : TBits_1; inline;
  73297. begin
  73298. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  73299. end;
  73300. procedure TCAN1_C1FIFOCON17.setTXERR; inline;
  73301. begin
  73302. pTDefRegMap(@Self)^.&set := $00000010;
  73303. end;
  73304. procedure TCAN1_C1FIFOCON17.clearTXERR; inline;
  73305. begin
  73306. pTDefRegMap(@Self)^.clr := $00000010;
  73307. end;
  73308. procedure TCAN1_C1FIFOCON17.setTXERR(thebits : TBits_1); inline;
  73309. begin
  73310. if thebits = 0 then
  73311. pTDefRegMap(@Self)^.clr := $00000010
  73312. else
  73313. pTDefRegMap(@Self)^.&set := $00000010;
  73314. end;
  73315. function TCAN1_C1FIFOCON17.getTXERR : TBits_1; inline;
  73316. begin
  73317. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  73318. end;
  73319. procedure TCAN1_C1FIFOCON17.setTXLARB; inline;
  73320. begin
  73321. pTDefRegMap(@Self)^.&set := $00000020;
  73322. end;
  73323. procedure TCAN1_C1FIFOCON17.clearTXLARB; inline;
  73324. begin
  73325. pTDefRegMap(@Self)^.clr := $00000020;
  73326. end;
  73327. procedure TCAN1_C1FIFOCON17.setTXLARB(thebits : TBits_1); inline;
  73328. begin
  73329. if thebits = 0 then
  73330. pTDefRegMap(@Self)^.clr := $00000020
  73331. else
  73332. pTDefRegMap(@Self)^.&set := $00000020;
  73333. end;
  73334. function TCAN1_C1FIFOCON17.getTXLARB : TBits_1; inline;
  73335. begin
  73336. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  73337. end;
  73338. procedure TCAN1_C1FIFOCON17.setTXABAT; inline;
  73339. begin
  73340. pTDefRegMap(@Self)^.&set := $00000040;
  73341. end;
  73342. procedure TCAN1_C1FIFOCON17.clearTXABAT; inline;
  73343. begin
  73344. pTDefRegMap(@Self)^.clr := $00000040;
  73345. end;
  73346. procedure TCAN1_C1FIFOCON17.setTXABAT(thebits : TBits_1); inline;
  73347. begin
  73348. if thebits = 0 then
  73349. pTDefRegMap(@Self)^.clr := $00000040
  73350. else
  73351. pTDefRegMap(@Self)^.&set := $00000040;
  73352. end;
  73353. function TCAN1_C1FIFOCON17.getTXABAT : TBits_1; inline;
  73354. begin
  73355. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  73356. end;
  73357. procedure TCAN1_C1FIFOCON17.setTXEN; inline;
  73358. begin
  73359. pTDefRegMap(@Self)^.&set := $00000080;
  73360. end;
  73361. procedure TCAN1_C1FIFOCON17.clearTXEN; inline;
  73362. begin
  73363. pTDefRegMap(@Self)^.clr := $00000080;
  73364. end;
  73365. procedure TCAN1_C1FIFOCON17.setTXEN(thebits : TBits_1); inline;
  73366. begin
  73367. if thebits = 0 then
  73368. pTDefRegMap(@Self)^.clr := $00000080
  73369. else
  73370. pTDefRegMap(@Self)^.&set := $00000080;
  73371. end;
  73372. function TCAN1_C1FIFOCON17.getTXEN : TBits_1; inline;
  73373. begin
  73374. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  73375. end;
  73376. procedure TCAN1_C1FIFOCON17.setDONLY; inline;
  73377. begin
  73378. pTDefRegMap(@Self)^.&set := $00001000;
  73379. end;
  73380. procedure TCAN1_C1FIFOCON17.clearDONLY; inline;
  73381. begin
  73382. pTDefRegMap(@Self)^.clr := $00001000;
  73383. end;
  73384. procedure TCAN1_C1FIFOCON17.setDONLY(thebits : TBits_1); inline;
  73385. begin
  73386. if thebits = 0 then
  73387. pTDefRegMap(@Self)^.clr := $00001000
  73388. else
  73389. pTDefRegMap(@Self)^.&set := $00001000;
  73390. end;
  73391. function TCAN1_C1FIFOCON17.getDONLY : TBits_1; inline;
  73392. begin
  73393. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  73394. end;
  73395. procedure TCAN1_C1FIFOCON17.setUINC; inline;
  73396. begin
  73397. pTDefRegMap(@Self)^.&set := $00002000;
  73398. end;
  73399. procedure TCAN1_C1FIFOCON17.clearUINC; inline;
  73400. begin
  73401. pTDefRegMap(@Self)^.clr := $00002000;
  73402. end;
  73403. procedure TCAN1_C1FIFOCON17.setUINC(thebits : TBits_1); inline;
  73404. begin
  73405. if thebits = 0 then
  73406. pTDefRegMap(@Self)^.clr := $00002000
  73407. else
  73408. pTDefRegMap(@Self)^.&set := $00002000;
  73409. end;
  73410. function TCAN1_C1FIFOCON17.getUINC : TBits_1; inline;
  73411. begin
  73412. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  73413. end;
  73414. procedure TCAN1_C1FIFOCON17.setFRESET; inline;
  73415. begin
  73416. pTDefRegMap(@Self)^.&set := $00004000;
  73417. end;
  73418. procedure TCAN1_C1FIFOCON17.clearFRESET; inline;
  73419. begin
  73420. pTDefRegMap(@Self)^.clr := $00004000;
  73421. end;
  73422. procedure TCAN1_C1FIFOCON17.setFRESET(thebits : TBits_1); inline;
  73423. begin
  73424. if thebits = 0 then
  73425. pTDefRegMap(@Self)^.clr := $00004000
  73426. else
  73427. pTDefRegMap(@Self)^.&set := $00004000;
  73428. end;
  73429. function TCAN1_C1FIFOCON17.getFRESET : TBits_1; inline;
  73430. begin
  73431. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  73432. end;
  73433. procedure TCAN1_C1FIFOCON17.setFSIZE(thebits : TBits_5); inline;
  73434. begin
  73435. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  73436. end;
  73437. function TCAN1_C1FIFOCON17.getFSIZE : TBits_5; inline;
  73438. begin
  73439. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  73440. end;
  73441. procedure TCAN1_C1FIFOCON17.setw(thebits : TBits_32); inline;
  73442. begin
  73443. pTDefRegMap(@Self)^.val := thebits;
  73444. end;
  73445. function TCAN1_C1FIFOCON17.getw : TBits_32; inline;
  73446. begin
  73447. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73448. end;
  73449. procedure TCAN1_C1FIFOINT17.setRXNEMPTYIF; inline;
  73450. begin
  73451. pTDefRegMap(@Self)^.&set := $00000001;
  73452. end;
  73453. procedure TCAN1_C1FIFOINT17.clearRXNEMPTYIF; inline;
  73454. begin
  73455. pTDefRegMap(@Self)^.clr := $00000001;
  73456. end;
  73457. procedure TCAN1_C1FIFOINT17.setRXNEMPTYIF(thebits : TBits_1); inline;
  73458. begin
  73459. if thebits = 0 then
  73460. pTDefRegMap(@Self)^.clr := $00000001
  73461. else
  73462. pTDefRegMap(@Self)^.&set := $00000001;
  73463. end;
  73464. function TCAN1_C1FIFOINT17.getRXNEMPTYIF : TBits_1; inline;
  73465. begin
  73466. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  73467. end;
  73468. procedure TCAN1_C1FIFOINT17.setRXHALFIF; inline;
  73469. begin
  73470. pTDefRegMap(@Self)^.&set := $00000002;
  73471. end;
  73472. procedure TCAN1_C1FIFOINT17.clearRXHALFIF; inline;
  73473. begin
  73474. pTDefRegMap(@Self)^.clr := $00000002;
  73475. end;
  73476. procedure TCAN1_C1FIFOINT17.setRXHALFIF(thebits : TBits_1); inline;
  73477. begin
  73478. if thebits = 0 then
  73479. pTDefRegMap(@Self)^.clr := $00000002
  73480. else
  73481. pTDefRegMap(@Self)^.&set := $00000002;
  73482. end;
  73483. function TCAN1_C1FIFOINT17.getRXHALFIF : TBits_1; inline;
  73484. begin
  73485. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  73486. end;
  73487. procedure TCAN1_C1FIFOINT17.setRXFULLIF; inline;
  73488. begin
  73489. pTDefRegMap(@Self)^.&set := $00000004;
  73490. end;
  73491. procedure TCAN1_C1FIFOINT17.clearRXFULLIF; inline;
  73492. begin
  73493. pTDefRegMap(@Self)^.clr := $00000004;
  73494. end;
  73495. procedure TCAN1_C1FIFOINT17.setRXFULLIF(thebits : TBits_1); inline;
  73496. begin
  73497. if thebits = 0 then
  73498. pTDefRegMap(@Self)^.clr := $00000004
  73499. else
  73500. pTDefRegMap(@Self)^.&set := $00000004;
  73501. end;
  73502. function TCAN1_C1FIFOINT17.getRXFULLIF : TBits_1; inline;
  73503. begin
  73504. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  73505. end;
  73506. procedure TCAN1_C1FIFOINT17.setRXOVFLIF; inline;
  73507. begin
  73508. pTDefRegMap(@Self)^.&set := $00000008;
  73509. end;
  73510. procedure TCAN1_C1FIFOINT17.clearRXOVFLIF; inline;
  73511. begin
  73512. pTDefRegMap(@Self)^.clr := $00000008;
  73513. end;
  73514. procedure TCAN1_C1FIFOINT17.setRXOVFLIF(thebits : TBits_1); inline;
  73515. begin
  73516. if thebits = 0 then
  73517. pTDefRegMap(@Self)^.clr := $00000008
  73518. else
  73519. pTDefRegMap(@Self)^.&set := $00000008;
  73520. end;
  73521. function TCAN1_C1FIFOINT17.getRXOVFLIF : TBits_1; inline;
  73522. begin
  73523. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  73524. end;
  73525. procedure TCAN1_C1FIFOINT17.setTXEMPTYIF; inline;
  73526. begin
  73527. pTDefRegMap(@Self)^.&set := $00000100;
  73528. end;
  73529. procedure TCAN1_C1FIFOINT17.clearTXEMPTYIF; inline;
  73530. begin
  73531. pTDefRegMap(@Self)^.clr := $00000100;
  73532. end;
  73533. procedure TCAN1_C1FIFOINT17.setTXEMPTYIF(thebits : TBits_1); inline;
  73534. begin
  73535. if thebits = 0 then
  73536. pTDefRegMap(@Self)^.clr := $00000100
  73537. else
  73538. pTDefRegMap(@Self)^.&set := $00000100;
  73539. end;
  73540. function TCAN1_C1FIFOINT17.getTXEMPTYIF : TBits_1; inline;
  73541. begin
  73542. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  73543. end;
  73544. procedure TCAN1_C1FIFOINT17.setTXHALFIF; inline;
  73545. begin
  73546. pTDefRegMap(@Self)^.&set := $00000200;
  73547. end;
  73548. procedure TCAN1_C1FIFOINT17.clearTXHALFIF; inline;
  73549. begin
  73550. pTDefRegMap(@Self)^.clr := $00000200;
  73551. end;
  73552. procedure TCAN1_C1FIFOINT17.setTXHALFIF(thebits : TBits_1); inline;
  73553. begin
  73554. if thebits = 0 then
  73555. pTDefRegMap(@Self)^.clr := $00000200
  73556. else
  73557. pTDefRegMap(@Self)^.&set := $00000200;
  73558. end;
  73559. function TCAN1_C1FIFOINT17.getTXHALFIF : TBits_1; inline;
  73560. begin
  73561. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  73562. end;
  73563. procedure TCAN1_C1FIFOINT17.setTXNFULLIF; inline;
  73564. begin
  73565. pTDefRegMap(@Self)^.&set := $00000400;
  73566. end;
  73567. procedure TCAN1_C1FIFOINT17.clearTXNFULLIF; inline;
  73568. begin
  73569. pTDefRegMap(@Self)^.clr := $00000400;
  73570. end;
  73571. procedure TCAN1_C1FIFOINT17.setTXNFULLIF(thebits : TBits_1); inline;
  73572. begin
  73573. if thebits = 0 then
  73574. pTDefRegMap(@Self)^.clr := $00000400
  73575. else
  73576. pTDefRegMap(@Self)^.&set := $00000400;
  73577. end;
  73578. function TCAN1_C1FIFOINT17.getTXNFULLIF : TBits_1; inline;
  73579. begin
  73580. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  73581. end;
  73582. procedure TCAN1_C1FIFOINT17.setRXNEMPTYIE; inline;
  73583. begin
  73584. pTDefRegMap(@Self)^.&set := $00010000;
  73585. end;
  73586. procedure TCAN1_C1FIFOINT17.clearRXNEMPTYIE; inline;
  73587. begin
  73588. pTDefRegMap(@Self)^.clr := $00010000;
  73589. end;
  73590. procedure TCAN1_C1FIFOINT17.setRXNEMPTYIE(thebits : TBits_1); inline;
  73591. begin
  73592. if thebits = 0 then
  73593. pTDefRegMap(@Self)^.clr := $00010000
  73594. else
  73595. pTDefRegMap(@Self)^.&set := $00010000;
  73596. end;
  73597. function TCAN1_C1FIFOINT17.getRXNEMPTYIE : TBits_1; inline;
  73598. begin
  73599. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  73600. end;
  73601. procedure TCAN1_C1FIFOINT17.setRXHALFIE; inline;
  73602. begin
  73603. pTDefRegMap(@Self)^.&set := $00020000;
  73604. end;
  73605. procedure TCAN1_C1FIFOINT17.clearRXHALFIE; inline;
  73606. begin
  73607. pTDefRegMap(@Self)^.clr := $00020000;
  73608. end;
  73609. procedure TCAN1_C1FIFOINT17.setRXHALFIE(thebits : TBits_1); inline;
  73610. begin
  73611. if thebits = 0 then
  73612. pTDefRegMap(@Self)^.clr := $00020000
  73613. else
  73614. pTDefRegMap(@Self)^.&set := $00020000;
  73615. end;
  73616. function TCAN1_C1FIFOINT17.getRXHALFIE : TBits_1; inline;
  73617. begin
  73618. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  73619. end;
  73620. procedure TCAN1_C1FIFOINT17.setRXFULLIE; inline;
  73621. begin
  73622. pTDefRegMap(@Self)^.&set := $00040000;
  73623. end;
  73624. procedure TCAN1_C1FIFOINT17.clearRXFULLIE; inline;
  73625. begin
  73626. pTDefRegMap(@Self)^.clr := $00040000;
  73627. end;
  73628. procedure TCAN1_C1FIFOINT17.setRXFULLIE(thebits : TBits_1); inline;
  73629. begin
  73630. if thebits = 0 then
  73631. pTDefRegMap(@Self)^.clr := $00040000
  73632. else
  73633. pTDefRegMap(@Self)^.&set := $00040000;
  73634. end;
  73635. function TCAN1_C1FIFOINT17.getRXFULLIE : TBits_1; inline;
  73636. begin
  73637. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  73638. end;
  73639. procedure TCAN1_C1FIFOINT17.setRXOVFLIE; inline;
  73640. begin
  73641. pTDefRegMap(@Self)^.&set := $00080000;
  73642. end;
  73643. procedure TCAN1_C1FIFOINT17.clearRXOVFLIE; inline;
  73644. begin
  73645. pTDefRegMap(@Self)^.clr := $00080000;
  73646. end;
  73647. procedure TCAN1_C1FIFOINT17.setRXOVFLIE(thebits : TBits_1); inline;
  73648. begin
  73649. if thebits = 0 then
  73650. pTDefRegMap(@Self)^.clr := $00080000
  73651. else
  73652. pTDefRegMap(@Self)^.&set := $00080000;
  73653. end;
  73654. function TCAN1_C1FIFOINT17.getRXOVFLIE : TBits_1; inline;
  73655. begin
  73656. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  73657. end;
  73658. procedure TCAN1_C1FIFOINT17.setTXEMPTYIE; inline;
  73659. begin
  73660. pTDefRegMap(@Self)^.&set := $01000000;
  73661. end;
  73662. procedure TCAN1_C1FIFOINT17.clearTXEMPTYIE; inline;
  73663. begin
  73664. pTDefRegMap(@Self)^.clr := $01000000;
  73665. end;
  73666. procedure TCAN1_C1FIFOINT17.setTXEMPTYIE(thebits : TBits_1); inline;
  73667. begin
  73668. if thebits = 0 then
  73669. pTDefRegMap(@Self)^.clr := $01000000
  73670. else
  73671. pTDefRegMap(@Self)^.&set := $01000000;
  73672. end;
  73673. function TCAN1_C1FIFOINT17.getTXEMPTYIE : TBits_1; inline;
  73674. begin
  73675. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  73676. end;
  73677. procedure TCAN1_C1FIFOINT17.setTXHALFIE; inline;
  73678. begin
  73679. pTDefRegMap(@Self)^.&set := $02000000;
  73680. end;
  73681. procedure TCAN1_C1FIFOINT17.clearTXHALFIE; inline;
  73682. begin
  73683. pTDefRegMap(@Self)^.clr := $02000000;
  73684. end;
  73685. procedure TCAN1_C1FIFOINT17.setTXHALFIE(thebits : TBits_1); inline;
  73686. begin
  73687. if thebits = 0 then
  73688. pTDefRegMap(@Self)^.clr := $02000000
  73689. else
  73690. pTDefRegMap(@Self)^.&set := $02000000;
  73691. end;
  73692. function TCAN1_C1FIFOINT17.getTXHALFIE : TBits_1; inline;
  73693. begin
  73694. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  73695. end;
  73696. procedure TCAN1_C1FIFOINT17.setTXNFULLIE; inline;
  73697. begin
  73698. pTDefRegMap(@Self)^.&set := $04000000;
  73699. end;
  73700. procedure TCAN1_C1FIFOINT17.clearTXNFULLIE; inline;
  73701. begin
  73702. pTDefRegMap(@Self)^.clr := $04000000;
  73703. end;
  73704. procedure TCAN1_C1FIFOINT17.setTXNFULLIE(thebits : TBits_1); inline;
  73705. begin
  73706. if thebits = 0 then
  73707. pTDefRegMap(@Self)^.clr := $04000000
  73708. else
  73709. pTDefRegMap(@Self)^.&set := $04000000;
  73710. end;
  73711. function TCAN1_C1FIFOINT17.getTXNFULLIE : TBits_1; inline;
  73712. begin
  73713. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  73714. end;
  73715. procedure TCAN1_C1FIFOINT17.setw(thebits : TBits_32); inline;
  73716. begin
  73717. pTDefRegMap(@Self)^.val := thebits;
  73718. end;
  73719. function TCAN1_C1FIFOINT17.getw : TBits_32; inline;
  73720. begin
  73721. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73722. end;
  73723. procedure TCAN1_C1FIFOCI17.setCFIFOCI(thebits : TBits_5); inline;
  73724. begin
  73725. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  73726. end;
  73727. function TCAN1_C1FIFOCI17.getCFIFOCI : TBits_5; inline;
  73728. begin
  73729. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  73730. end;
  73731. procedure TCAN1_C1FIFOCI17.setw(thebits : TBits_32); inline;
  73732. begin
  73733. pTDefRegMap(@Self)^.val := thebits;
  73734. end;
  73735. function TCAN1_C1FIFOCI17.getw : TBits_32; inline;
  73736. begin
  73737. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73738. end;
  73739. procedure TCAN1_C1FIFOCON18.setTXPRI(thebits : TBits_2); inline;
  73740. begin
  73741. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  73742. end;
  73743. function TCAN1_C1FIFOCON18.getTXPRI : TBits_2; inline;
  73744. begin
  73745. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  73746. end;
  73747. procedure TCAN1_C1FIFOCON18.setRTREN; inline;
  73748. begin
  73749. pTDefRegMap(@Self)^.&set := $00000004;
  73750. end;
  73751. procedure TCAN1_C1FIFOCON18.clearRTREN; inline;
  73752. begin
  73753. pTDefRegMap(@Self)^.clr := $00000004;
  73754. end;
  73755. procedure TCAN1_C1FIFOCON18.setRTREN(thebits : TBits_1); inline;
  73756. begin
  73757. if thebits = 0 then
  73758. pTDefRegMap(@Self)^.clr := $00000004
  73759. else
  73760. pTDefRegMap(@Self)^.&set := $00000004;
  73761. end;
  73762. function TCAN1_C1FIFOCON18.getRTREN : TBits_1; inline;
  73763. begin
  73764. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  73765. end;
  73766. procedure TCAN1_C1FIFOCON18.setTXREQ; inline;
  73767. begin
  73768. pTDefRegMap(@Self)^.&set := $00000008;
  73769. end;
  73770. procedure TCAN1_C1FIFOCON18.clearTXREQ; inline;
  73771. begin
  73772. pTDefRegMap(@Self)^.clr := $00000008;
  73773. end;
  73774. procedure TCAN1_C1FIFOCON18.setTXREQ(thebits : TBits_1); inline;
  73775. begin
  73776. if thebits = 0 then
  73777. pTDefRegMap(@Self)^.clr := $00000008
  73778. else
  73779. pTDefRegMap(@Self)^.&set := $00000008;
  73780. end;
  73781. function TCAN1_C1FIFOCON18.getTXREQ : TBits_1; inline;
  73782. begin
  73783. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  73784. end;
  73785. procedure TCAN1_C1FIFOCON18.setTXERR; inline;
  73786. begin
  73787. pTDefRegMap(@Self)^.&set := $00000010;
  73788. end;
  73789. procedure TCAN1_C1FIFOCON18.clearTXERR; inline;
  73790. begin
  73791. pTDefRegMap(@Self)^.clr := $00000010;
  73792. end;
  73793. procedure TCAN1_C1FIFOCON18.setTXERR(thebits : TBits_1); inline;
  73794. begin
  73795. if thebits = 0 then
  73796. pTDefRegMap(@Self)^.clr := $00000010
  73797. else
  73798. pTDefRegMap(@Self)^.&set := $00000010;
  73799. end;
  73800. function TCAN1_C1FIFOCON18.getTXERR : TBits_1; inline;
  73801. begin
  73802. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  73803. end;
  73804. procedure TCAN1_C1FIFOCON18.setTXLARB; inline;
  73805. begin
  73806. pTDefRegMap(@Self)^.&set := $00000020;
  73807. end;
  73808. procedure TCAN1_C1FIFOCON18.clearTXLARB; inline;
  73809. begin
  73810. pTDefRegMap(@Self)^.clr := $00000020;
  73811. end;
  73812. procedure TCAN1_C1FIFOCON18.setTXLARB(thebits : TBits_1); inline;
  73813. begin
  73814. if thebits = 0 then
  73815. pTDefRegMap(@Self)^.clr := $00000020
  73816. else
  73817. pTDefRegMap(@Self)^.&set := $00000020;
  73818. end;
  73819. function TCAN1_C1FIFOCON18.getTXLARB : TBits_1; inline;
  73820. begin
  73821. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  73822. end;
  73823. procedure TCAN1_C1FIFOCON18.setTXABAT; inline;
  73824. begin
  73825. pTDefRegMap(@Self)^.&set := $00000040;
  73826. end;
  73827. procedure TCAN1_C1FIFOCON18.clearTXABAT; inline;
  73828. begin
  73829. pTDefRegMap(@Self)^.clr := $00000040;
  73830. end;
  73831. procedure TCAN1_C1FIFOCON18.setTXABAT(thebits : TBits_1); inline;
  73832. begin
  73833. if thebits = 0 then
  73834. pTDefRegMap(@Self)^.clr := $00000040
  73835. else
  73836. pTDefRegMap(@Self)^.&set := $00000040;
  73837. end;
  73838. function TCAN1_C1FIFOCON18.getTXABAT : TBits_1; inline;
  73839. begin
  73840. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  73841. end;
  73842. procedure TCAN1_C1FIFOCON18.setTXEN; inline;
  73843. begin
  73844. pTDefRegMap(@Self)^.&set := $00000080;
  73845. end;
  73846. procedure TCAN1_C1FIFOCON18.clearTXEN; inline;
  73847. begin
  73848. pTDefRegMap(@Self)^.clr := $00000080;
  73849. end;
  73850. procedure TCAN1_C1FIFOCON18.setTXEN(thebits : TBits_1); inline;
  73851. begin
  73852. if thebits = 0 then
  73853. pTDefRegMap(@Self)^.clr := $00000080
  73854. else
  73855. pTDefRegMap(@Self)^.&set := $00000080;
  73856. end;
  73857. function TCAN1_C1FIFOCON18.getTXEN : TBits_1; inline;
  73858. begin
  73859. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  73860. end;
  73861. procedure TCAN1_C1FIFOCON18.setDONLY; inline;
  73862. begin
  73863. pTDefRegMap(@Self)^.&set := $00001000;
  73864. end;
  73865. procedure TCAN1_C1FIFOCON18.clearDONLY; inline;
  73866. begin
  73867. pTDefRegMap(@Self)^.clr := $00001000;
  73868. end;
  73869. procedure TCAN1_C1FIFOCON18.setDONLY(thebits : TBits_1); inline;
  73870. begin
  73871. if thebits = 0 then
  73872. pTDefRegMap(@Self)^.clr := $00001000
  73873. else
  73874. pTDefRegMap(@Self)^.&set := $00001000;
  73875. end;
  73876. function TCAN1_C1FIFOCON18.getDONLY : TBits_1; inline;
  73877. begin
  73878. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  73879. end;
  73880. procedure TCAN1_C1FIFOCON18.setUINC; inline;
  73881. begin
  73882. pTDefRegMap(@Self)^.&set := $00002000;
  73883. end;
  73884. procedure TCAN1_C1FIFOCON18.clearUINC; inline;
  73885. begin
  73886. pTDefRegMap(@Self)^.clr := $00002000;
  73887. end;
  73888. procedure TCAN1_C1FIFOCON18.setUINC(thebits : TBits_1); inline;
  73889. begin
  73890. if thebits = 0 then
  73891. pTDefRegMap(@Self)^.clr := $00002000
  73892. else
  73893. pTDefRegMap(@Self)^.&set := $00002000;
  73894. end;
  73895. function TCAN1_C1FIFOCON18.getUINC : TBits_1; inline;
  73896. begin
  73897. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  73898. end;
  73899. procedure TCAN1_C1FIFOCON18.setFRESET; inline;
  73900. begin
  73901. pTDefRegMap(@Self)^.&set := $00004000;
  73902. end;
  73903. procedure TCAN1_C1FIFOCON18.clearFRESET; inline;
  73904. begin
  73905. pTDefRegMap(@Self)^.clr := $00004000;
  73906. end;
  73907. procedure TCAN1_C1FIFOCON18.setFRESET(thebits : TBits_1); inline;
  73908. begin
  73909. if thebits = 0 then
  73910. pTDefRegMap(@Self)^.clr := $00004000
  73911. else
  73912. pTDefRegMap(@Self)^.&set := $00004000;
  73913. end;
  73914. function TCAN1_C1FIFOCON18.getFRESET : TBits_1; inline;
  73915. begin
  73916. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  73917. end;
  73918. procedure TCAN1_C1FIFOCON18.setFSIZE(thebits : TBits_5); inline;
  73919. begin
  73920. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  73921. end;
  73922. function TCAN1_C1FIFOCON18.getFSIZE : TBits_5; inline;
  73923. begin
  73924. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  73925. end;
  73926. procedure TCAN1_C1FIFOCON18.setw(thebits : TBits_32); inline;
  73927. begin
  73928. pTDefRegMap(@Self)^.val := thebits;
  73929. end;
  73930. function TCAN1_C1FIFOCON18.getw : TBits_32; inline;
  73931. begin
  73932. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73933. end;
  73934. procedure TCAN1_C1FIFOINT18.setRXNEMPTYIF; inline;
  73935. begin
  73936. pTDefRegMap(@Self)^.&set := $00000001;
  73937. end;
  73938. procedure TCAN1_C1FIFOINT18.clearRXNEMPTYIF; inline;
  73939. begin
  73940. pTDefRegMap(@Self)^.clr := $00000001;
  73941. end;
  73942. procedure TCAN1_C1FIFOINT18.setRXNEMPTYIF(thebits : TBits_1); inline;
  73943. begin
  73944. if thebits = 0 then
  73945. pTDefRegMap(@Self)^.clr := $00000001
  73946. else
  73947. pTDefRegMap(@Self)^.&set := $00000001;
  73948. end;
  73949. function TCAN1_C1FIFOINT18.getRXNEMPTYIF : TBits_1; inline;
  73950. begin
  73951. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  73952. end;
  73953. procedure TCAN1_C1FIFOINT18.setRXHALFIF; inline;
  73954. begin
  73955. pTDefRegMap(@Self)^.&set := $00000002;
  73956. end;
  73957. procedure TCAN1_C1FIFOINT18.clearRXHALFIF; inline;
  73958. begin
  73959. pTDefRegMap(@Self)^.clr := $00000002;
  73960. end;
  73961. procedure TCAN1_C1FIFOINT18.setRXHALFIF(thebits : TBits_1); inline;
  73962. begin
  73963. if thebits = 0 then
  73964. pTDefRegMap(@Self)^.clr := $00000002
  73965. else
  73966. pTDefRegMap(@Self)^.&set := $00000002;
  73967. end;
  73968. function TCAN1_C1FIFOINT18.getRXHALFIF : TBits_1; inline;
  73969. begin
  73970. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  73971. end;
  73972. procedure TCAN1_C1FIFOINT18.setRXFULLIF; inline;
  73973. begin
  73974. pTDefRegMap(@Self)^.&set := $00000004;
  73975. end;
  73976. procedure TCAN1_C1FIFOINT18.clearRXFULLIF; inline;
  73977. begin
  73978. pTDefRegMap(@Self)^.clr := $00000004;
  73979. end;
  73980. procedure TCAN1_C1FIFOINT18.setRXFULLIF(thebits : TBits_1); inline;
  73981. begin
  73982. if thebits = 0 then
  73983. pTDefRegMap(@Self)^.clr := $00000004
  73984. else
  73985. pTDefRegMap(@Self)^.&set := $00000004;
  73986. end;
  73987. function TCAN1_C1FIFOINT18.getRXFULLIF : TBits_1; inline;
  73988. begin
  73989. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  73990. end;
  73991. procedure TCAN1_C1FIFOINT18.setRXOVFLIF; inline;
  73992. begin
  73993. pTDefRegMap(@Self)^.&set := $00000008;
  73994. end;
  73995. procedure TCAN1_C1FIFOINT18.clearRXOVFLIF; inline;
  73996. begin
  73997. pTDefRegMap(@Self)^.clr := $00000008;
  73998. end;
  73999. procedure TCAN1_C1FIFOINT18.setRXOVFLIF(thebits : TBits_1); inline;
  74000. begin
  74001. if thebits = 0 then
  74002. pTDefRegMap(@Self)^.clr := $00000008
  74003. else
  74004. pTDefRegMap(@Self)^.&set := $00000008;
  74005. end;
  74006. function TCAN1_C1FIFOINT18.getRXOVFLIF : TBits_1; inline;
  74007. begin
  74008. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  74009. end;
  74010. procedure TCAN1_C1FIFOINT18.setTXEMPTYIF; inline;
  74011. begin
  74012. pTDefRegMap(@Self)^.&set := $00000100;
  74013. end;
  74014. procedure TCAN1_C1FIFOINT18.clearTXEMPTYIF; inline;
  74015. begin
  74016. pTDefRegMap(@Self)^.clr := $00000100;
  74017. end;
  74018. procedure TCAN1_C1FIFOINT18.setTXEMPTYIF(thebits : TBits_1); inline;
  74019. begin
  74020. if thebits = 0 then
  74021. pTDefRegMap(@Self)^.clr := $00000100
  74022. else
  74023. pTDefRegMap(@Self)^.&set := $00000100;
  74024. end;
  74025. function TCAN1_C1FIFOINT18.getTXEMPTYIF : TBits_1; inline;
  74026. begin
  74027. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  74028. end;
  74029. procedure TCAN1_C1FIFOINT18.setTXHALFIF; inline;
  74030. begin
  74031. pTDefRegMap(@Self)^.&set := $00000200;
  74032. end;
  74033. procedure TCAN1_C1FIFOINT18.clearTXHALFIF; inline;
  74034. begin
  74035. pTDefRegMap(@Self)^.clr := $00000200;
  74036. end;
  74037. procedure TCAN1_C1FIFOINT18.setTXHALFIF(thebits : TBits_1); inline;
  74038. begin
  74039. if thebits = 0 then
  74040. pTDefRegMap(@Self)^.clr := $00000200
  74041. else
  74042. pTDefRegMap(@Self)^.&set := $00000200;
  74043. end;
  74044. function TCAN1_C1FIFOINT18.getTXHALFIF : TBits_1; inline;
  74045. begin
  74046. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  74047. end;
  74048. procedure TCAN1_C1FIFOINT18.setTXNFULLIF; inline;
  74049. begin
  74050. pTDefRegMap(@Self)^.&set := $00000400;
  74051. end;
  74052. procedure TCAN1_C1FIFOINT18.clearTXNFULLIF; inline;
  74053. begin
  74054. pTDefRegMap(@Self)^.clr := $00000400;
  74055. end;
  74056. procedure TCAN1_C1FIFOINT18.setTXNFULLIF(thebits : TBits_1); inline;
  74057. begin
  74058. if thebits = 0 then
  74059. pTDefRegMap(@Self)^.clr := $00000400
  74060. else
  74061. pTDefRegMap(@Self)^.&set := $00000400;
  74062. end;
  74063. function TCAN1_C1FIFOINT18.getTXNFULLIF : TBits_1; inline;
  74064. begin
  74065. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  74066. end;
  74067. procedure TCAN1_C1FIFOINT18.setRXNEMPTYIE; inline;
  74068. begin
  74069. pTDefRegMap(@Self)^.&set := $00010000;
  74070. end;
  74071. procedure TCAN1_C1FIFOINT18.clearRXNEMPTYIE; inline;
  74072. begin
  74073. pTDefRegMap(@Self)^.clr := $00010000;
  74074. end;
  74075. procedure TCAN1_C1FIFOINT18.setRXNEMPTYIE(thebits : TBits_1); inline;
  74076. begin
  74077. if thebits = 0 then
  74078. pTDefRegMap(@Self)^.clr := $00010000
  74079. else
  74080. pTDefRegMap(@Self)^.&set := $00010000;
  74081. end;
  74082. function TCAN1_C1FIFOINT18.getRXNEMPTYIE : TBits_1; inline;
  74083. begin
  74084. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  74085. end;
  74086. procedure TCAN1_C1FIFOINT18.setRXHALFIE; inline;
  74087. begin
  74088. pTDefRegMap(@Self)^.&set := $00020000;
  74089. end;
  74090. procedure TCAN1_C1FIFOINT18.clearRXHALFIE; inline;
  74091. begin
  74092. pTDefRegMap(@Self)^.clr := $00020000;
  74093. end;
  74094. procedure TCAN1_C1FIFOINT18.setRXHALFIE(thebits : TBits_1); inline;
  74095. begin
  74096. if thebits = 0 then
  74097. pTDefRegMap(@Self)^.clr := $00020000
  74098. else
  74099. pTDefRegMap(@Self)^.&set := $00020000;
  74100. end;
  74101. function TCAN1_C1FIFOINT18.getRXHALFIE : TBits_1; inline;
  74102. begin
  74103. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  74104. end;
  74105. procedure TCAN1_C1FIFOINT18.setRXFULLIE; inline;
  74106. begin
  74107. pTDefRegMap(@Self)^.&set := $00040000;
  74108. end;
  74109. procedure TCAN1_C1FIFOINT18.clearRXFULLIE; inline;
  74110. begin
  74111. pTDefRegMap(@Self)^.clr := $00040000;
  74112. end;
  74113. procedure TCAN1_C1FIFOINT18.setRXFULLIE(thebits : TBits_1); inline;
  74114. begin
  74115. if thebits = 0 then
  74116. pTDefRegMap(@Self)^.clr := $00040000
  74117. else
  74118. pTDefRegMap(@Self)^.&set := $00040000;
  74119. end;
  74120. function TCAN1_C1FIFOINT18.getRXFULLIE : TBits_1; inline;
  74121. begin
  74122. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  74123. end;
  74124. procedure TCAN1_C1FIFOINT18.setRXOVFLIE; inline;
  74125. begin
  74126. pTDefRegMap(@Self)^.&set := $00080000;
  74127. end;
  74128. procedure TCAN1_C1FIFOINT18.clearRXOVFLIE; inline;
  74129. begin
  74130. pTDefRegMap(@Self)^.clr := $00080000;
  74131. end;
  74132. procedure TCAN1_C1FIFOINT18.setRXOVFLIE(thebits : TBits_1); inline;
  74133. begin
  74134. if thebits = 0 then
  74135. pTDefRegMap(@Self)^.clr := $00080000
  74136. else
  74137. pTDefRegMap(@Self)^.&set := $00080000;
  74138. end;
  74139. function TCAN1_C1FIFOINT18.getRXOVFLIE : TBits_1; inline;
  74140. begin
  74141. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  74142. end;
  74143. procedure TCAN1_C1FIFOINT18.setTXEMPTYIE; inline;
  74144. begin
  74145. pTDefRegMap(@Self)^.&set := $01000000;
  74146. end;
  74147. procedure TCAN1_C1FIFOINT18.clearTXEMPTYIE; inline;
  74148. begin
  74149. pTDefRegMap(@Self)^.clr := $01000000;
  74150. end;
  74151. procedure TCAN1_C1FIFOINT18.setTXEMPTYIE(thebits : TBits_1); inline;
  74152. begin
  74153. if thebits = 0 then
  74154. pTDefRegMap(@Self)^.clr := $01000000
  74155. else
  74156. pTDefRegMap(@Self)^.&set := $01000000;
  74157. end;
  74158. function TCAN1_C1FIFOINT18.getTXEMPTYIE : TBits_1; inline;
  74159. begin
  74160. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  74161. end;
  74162. procedure TCAN1_C1FIFOINT18.setTXHALFIE; inline;
  74163. begin
  74164. pTDefRegMap(@Self)^.&set := $02000000;
  74165. end;
  74166. procedure TCAN1_C1FIFOINT18.clearTXHALFIE; inline;
  74167. begin
  74168. pTDefRegMap(@Self)^.clr := $02000000;
  74169. end;
  74170. procedure TCAN1_C1FIFOINT18.setTXHALFIE(thebits : TBits_1); inline;
  74171. begin
  74172. if thebits = 0 then
  74173. pTDefRegMap(@Self)^.clr := $02000000
  74174. else
  74175. pTDefRegMap(@Self)^.&set := $02000000;
  74176. end;
  74177. function TCAN1_C1FIFOINT18.getTXHALFIE : TBits_1; inline;
  74178. begin
  74179. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  74180. end;
  74181. procedure TCAN1_C1FIFOINT18.setTXNFULLIE; inline;
  74182. begin
  74183. pTDefRegMap(@Self)^.&set := $04000000;
  74184. end;
  74185. procedure TCAN1_C1FIFOINT18.clearTXNFULLIE; inline;
  74186. begin
  74187. pTDefRegMap(@Self)^.clr := $04000000;
  74188. end;
  74189. procedure TCAN1_C1FIFOINT18.setTXNFULLIE(thebits : TBits_1); inline;
  74190. begin
  74191. if thebits = 0 then
  74192. pTDefRegMap(@Self)^.clr := $04000000
  74193. else
  74194. pTDefRegMap(@Self)^.&set := $04000000;
  74195. end;
  74196. function TCAN1_C1FIFOINT18.getTXNFULLIE : TBits_1; inline;
  74197. begin
  74198. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  74199. end;
  74200. procedure TCAN1_C1FIFOINT18.setw(thebits : TBits_32); inline;
  74201. begin
  74202. pTDefRegMap(@Self)^.val := thebits;
  74203. end;
  74204. function TCAN1_C1FIFOINT18.getw : TBits_32; inline;
  74205. begin
  74206. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74207. end;
  74208. procedure TCAN1_C1FIFOCI18.setCFIFOCI(thebits : TBits_5); inline;
  74209. begin
  74210. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  74211. end;
  74212. function TCAN1_C1FIFOCI18.getCFIFOCI : TBits_5; inline;
  74213. begin
  74214. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  74215. end;
  74216. procedure TCAN1_C1FIFOCI18.setw(thebits : TBits_32); inline;
  74217. begin
  74218. pTDefRegMap(@Self)^.val := thebits;
  74219. end;
  74220. function TCAN1_C1FIFOCI18.getw : TBits_32; inline;
  74221. begin
  74222. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74223. end;
  74224. procedure TCAN1_C1FIFOCON19.setTXPRI(thebits : TBits_2); inline;
  74225. begin
  74226. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  74227. end;
  74228. function TCAN1_C1FIFOCON19.getTXPRI : TBits_2; inline;
  74229. begin
  74230. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  74231. end;
  74232. procedure TCAN1_C1FIFOCON19.setRTREN; inline;
  74233. begin
  74234. pTDefRegMap(@Self)^.&set := $00000004;
  74235. end;
  74236. procedure TCAN1_C1FIFOCON19.clearRTREN; inline;
  74237. begin
  74238. pTDefRegMap(@Self)^.clr := $00000004;
  74239. end;
  74240. procedure TCAN1_C1FIFOCON19.setRTREN(thebits : TBits_1); inline;
  74241. begin
  74242. if thebits = 0 then
  74243. pTDefRegMap(@Self)^.clr := $00000004
  74244. else
  74245. pTDefRegMap(@Self)^.&set := $00000004;
  74246. end;
  74247. function TCAN1_C1FIFOCON19.getRTREN : TBits_1; inline;
  74248. begin
  74249. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  74250. end;
  74251. procedure TCAN1_C1FIFOCON19.setTXREQ; inline;
  74252. begin
  74253. pTDefRegMap(@Self)^.&set := $00000008;
  74254. end;
  74255. procedure TCAN1_C1FIFOCON19.clearTXREQ; inline;
  74256. begin
  74257. pTDefRegMap(@Self)^.clr := $00000008;
  74258. end;
  74259. procedure TCAN1_C1FIFOCON19.setTXREQ(thebits : TBits_1); inline;
  74260. begin
  74261. if thebits = 0 then
  74262. pTDefRegMap(@Self)^.clr := $00000008
  74263. else
  74264. pTDefRegMap(@Self)^.&set := $00000008;
  74265. end;
  74266. function TCAN1_C1FIFOCON19.getTXREQ : TBits_1; inline;
  74267. begin
  74268. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  74269. end;
  74270. procedure TCAN1_C1FIFOCON19.setTXERR; inline;
  74271. begin
  74272. pTDefRegMap(@Self)^.&set := $00000010;
  74273. end;
  74274. procedure TCAN1_C1FIFOCON19.clearTXERR; inline;
  74275. begin
  74276. pTDefRegMap(@Self)^.clr := $00000010;
  74277. end;
  74278. procedure TCAN1_C1FIFOCON19.setTXERR(thebits : TBits_1); inline;
  74279. begin
  74280. if thebits = 0 then
  74281. pTDefRegMap(@Self)^.clr := $00000010
  74282. else
  74283. pTDefRegMap(@Self)^.&set := $00000010;
  74284. end;
  74285. function TCAN1_C1FIFOCON19.getTXERR : TBits_1; inline;
  74286. begin
  74287. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  74288. end;
  74289. procedure TCAN1_C1FIFOCON19.setTXLARB; inline;
  74290. begin
  74291. pTDefRegMap(@Self)^.&set := $00000020;
  74292. end;
  74293. procedure TCAN1_C1FIFOCON19.clearTXLARB; inline;
  74294. begin
  74295. pTDefRegMap(@Self)^.clr := $00000020;
  74296. end;
  74297. procedure TCAN1_C1FIFOCON19.setTXLARB(thebits : TBits_1); inline;
  74298. begin
  74299. if thebits = 0 then
  74300. pTDefRegMap(@Self)^.clr := $00000020
  74301. else
  74302. pTDefRegMap(@Self)^.&set := $00000020;
  74303. end;
  74304. function TCAN1_C1FIFOCON19.getTXLARB : TBits_1; inline;
  74305. begin
  74306. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  74307. end;
  74308. procedure TCAN1_C1FIFOCON19.setTXABAT; inline;
  74309. begin
  74310. pTDefRegMap(@Self)^.&set := $00000040;
  74311. end;
  74312. procedure TCAN1_C1FIFOCON19.clearTXABAT; inline;
  74313. begin
  74314. pTDefRegMap(@Self)^.clr := $00000040;
  74315. end;
  74316. procedure TCAN1_C1FIFOCON19.setTXABAT(thebits : TBits_1); inline;
  74317. begin
  74318. if thebits = 0 then
  74319. pTDefRegMap(@Self)^.clr := $00000040
  74320. else
  74321. pTDefRegMap(@Self)^.&set := $00000040;
  74322. end;
  74323. function TCAN1_C1FIFOCON19.getTXABAT : TBits_1; inline;
  74324. begin
  74325. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  74326. end;
  74327. procedure TCAN1_C1FIFOCON19.setTXEN; inline;
  74328. begin
  74329. pTDefRegMap(@Self)^.&set := $00000080;
  74330. end;
  74331. procedure TCAN1_C1FIFOCON19.clearTXEN; inline;
  74332. begin
  74333. pTDefRegMap(@Self)^.clr := $00000080;
  74334. end;
  74335. procedure TCAN1_C1FIFOCON19.setTXEN(thebits : TBits_1); inline;
  74336. begin
  74337. if thebits = 0 then
  74338. pTDefRegMap(@Self)^.clr := $00000080
  74339. else
  74340. pTDefRegMap(@Self)^.&set := $00000080;
  74341. end;
  74342. function TCAN1_C1FIFOCON19.getTXEN : TBits_1; inline;
  74343. begin
  74344. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  74345. end;
  74346. procedure TCAN1_C1FIFOCON19.setDONLY; inline;
  74347. begin
  74348. pTDefRegMap(@Self)^.&set := $00001000;
  74349. end;
  74350. procedure TCAN1_C1FIFOCON19.clearDONLY; inline;
  74351. begin
  74352. pTDefRegMap(@Self)^.clr := $00001000;
  74353. end;
  74354. procedure TCAN1_C1FIFOCON19.setDONLY(thebits : TBits_1); inline;
  74355. begin
  74356. if thebits = 0 then
  74357. pTDefRegMap(@Self)^.clr := $00001000
  74358. else
  74359. pTDefRegMap(@Self)^.&set := $00001000;
  74360. end;
  74361. function TCAN1_C1FIFOCON19.getDONLY : TBits_1; inline;
  74362. begin
  74363. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  74364. end;
  74365. procedure TCAN1_C1FIFOCON19.setUINC; inline;
  74366. begin
  74367. pTDefRegMap(@Self)^.&set := $00002000;
  74368. end;
  74369. procedure TCAN1_C1FIFOCON19.clearUINC; inline;
  74370. begin
  74371. pTDefRegMap(@Self)^.clr := $00002000;
  74372. end;
  74373. procedure TCAN1_C1FIFOCON19.setUINC(thebits : TBits_1); inline;
  74374. begin
  74375. if thebits = 0 then
  74376. pTDefRegMap(@Self)^.clr := $00002000
  74377. else
  74378. pTDefRegMap(@Self)^.&set := $00002000;
  74379. end;
  74380. function TCAN1_C1FIFOCON19.getUINC : TBits_1; inline;
  74381. begin
  74382. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  74383. end;
  74384. procedure TCAN1_C1FIFOCON19.setFRESET; inline;
  74385. begin
  74386. pTDefRegMap(@Self)^.&set := $00004000;
  74387. end;
  74388. procedure TCAN1_C1FIFOCON19.clearFRESET; inline;
  74389. begin
  74390. pTDefRegMap(@Self)^.clr := $00004000;
  74391. end;
  74392. procedure TCAN1_C1FIFOCON19.setFRESET(thebits : TBits_1); inline;
  74393. begin
  74394. if thebits = 0 then
  74395. pTDefRegMap(@Self)^.clr := $00004000
  74396. else
  74397. pTDefRegMap(@Self)^.&set := $00004000;
  74398. end;
  74399. function TCAN1_C1FIFOCON19.getFRESET : TBits_1; inline;
  74400. begin
  74401. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  74402. end;
  74403. procedure TCAN1_C1FIFOCON19.setFSIZE(thebits : TBits_5); inline;
  74404. begin
  74405. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  74406. end;
  74407. function TCAN1_C1FIFOCON19.getFSIZE : TBits_5; inline;
  74408. begin
  74409. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  74410. end;
  74411. procedure TCAN1_C1FIFOCON19.setw(thebits : TBits_32); inline;
  74412. begin
  74413. pTDefRegMap(@Self)^.val := thebits;
  74414. end;
  74415. function TCAN1_C1FIFOCON19.getw : TBits_32; inline;
  74416. begin
  74417. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74418. end;
  74419. procedure TCAN1_C1FIFOINT19.setRXNEMPTYIF; inline;
  74420. begin
  74421. pTDefRegMap(@Self)^.&set := $00000001;
  74422. end;
  74423. procedure TCAN1_C1FIFOINT19.clearRXNEMPTYIF; inline;
  74424. begin
  74425. pTDefRegMap(@Self)^.clr := $00000001;
  74426. end;
  74427. procedure TCAN1_C1FIFOINT19.setRXNEMPTYIF(thebits : TBits_1); inline;
  74428. begin
  74429. if thebits = 0 then
  74430. pTDefRegMap(@Self)^.clr := $00000001
  74431. else
  74432. pTDefRegMap(@Self)^.&set := $00000001;
  74433. end;
  74434. function TCAN1_C1FIFOINT19.getRXNEMPTYIF : TBits_1; inline;
  74435. begin
  74436. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  74437. end;
  74438. procedure TCAN1_C1FIFOINT19.setRXHALFIF; inline;
  74439. begin
  74440. pTDefRegMap(@Self)^.&set := $00000002;
  74441. end;
  74442. procedure TCAN1_C1FIFOINT19.clearRXHALFIF; inline;
  74443. begin
  74444. pTDefRegMap(@Self)^.clr := $00000002;
  74445. end;
  74446. procedure TCAN1_C1FIFOINT19.setRXHALFIF(thebits : TBits_1); inline;
  74447. begin
  74448. if thebits = 0 then
  74449. pTDefRegMap(@Self)^.clr := $00000002
  74450. else
  74451. pTDefRegMap(@Self)^.&set := $00000002;
  74452. end;
  74453. function TCAN1_C1FIFOINT19.getRXHALFIF : TBits_1; inline;
  74454. begin
  74455. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  74456. end;
  74457. procedure TCAN1_C1FIFOINT19.setRXFULLIF; inline;
  74458. begin
  74459. pTDefRegMap(@Self)^.&set := $00000004;
  74460. end;
  74461. procedure TCAN1_C1FIFOINT19.clearRXFULLIF; inline;
  74462. begin
  74463. pTDefRegMap(@Self)^.clr := $00000004;
  74464. end;
  74465. procedure TCAN1_C1FIFOINT19.setRXFULLIF(thebits : TBits_1); inline;
  74466. begin
  74467. if thebits = 0 then
  74468. pTDefRegMap(@Self)^.clr := $00000004
  74469. else
  74470. pTDefRegMap(@Self)^.&set := $00000004;
  74471. end;
  74472. function TCAN1_C1FIFOINT19.getRXFULLIF : TBits_1; inline;
  74473. begin
  74474. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  74475. end;
  74476. procedure TCAN1_C1FIFOINT19.setRXOVFLIF; inline;
  74477. begin
  74478. pTDefRegMap(@Self)^.&set := $00000008;
  74479. end;
  74480. procedure TCAN1_C1FIFOINT19.clearRXOVFLIF; inline;
  74481. begin
  74482. pTDefRegMap(@Self)^.clr := $00000008;
  74483. end;
  74484. procedure TCAN1_C1FIFOINT19.setRXOVFLIF(thebits : TBits_1); inline;
  74485. begin
  74486. if thebits = 0 then
  74487. pTDefRegMap(@Self)^.clr := $00000008
  74488. else
  74489. pTDefRegMap(@Self)^.&set := $00000008;
  74490. end;
  74491. function TCAN1_C1FIFOINT19.getRXOVFLIF : TBits_1; inline;
  74492. begin
  74493. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  74494. end;
  74495. procedure TCAN1_C1FIFOINT19.setTXEMPTYIF; inline;
  74496. begin
  74497. pTDefRegMap(@Self)^.&set := $00000100;
  74498. end;
  74499. procedure TCAN1_C1FIFOINT19.clearTXEMPTYIF; inline;
  74500. begin
  74501. pTDefRegMap(@Self)^.clr := $00000100;
  74502. end;
  74503. procedure TCAN1_C1FIFOINT19.setTXEMPTYIF(thebits : TBits_1); inline;
  74504. begin
  74505. if thebits = 0 then
  74506. pTDefRegMap(@Self)^.clr := $00000100
  74507. else
  74508. pTDefRegMap(@Self)^.&set := $00000100;
  74509. end;
  74510. function TCAN1_C1FIFOINT19.getTXEMPTYIF : TBits_1; inline;
  74511. begin
  74512. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  74513. end;
  74514. procedure TCAN1_C1FIFOINT19.setTXHALFIF; inline;
  74515. begin
  74516. pTDefRegMap(@Self)^.&set := $00000200;
  74517. end;
  74518. procedure TCAN1_C1FIFOINT19.clearTXHALFIF; inline;
  74519. begin
  74520. pTDefRegMap(@Self)^.clr := $00000200;
  74521. end;
  74522. procedure TCAN1_C1FIFOINT19.setTXHALFIF(thebits : TBits_1); inline;
  74523. begin
  74524. if thebits = 0 then
  74525. pTDefRegMap(@Self)^.clr := $00000200
  74526. else
  74527. pTDefRegMap(@Self)^.&set := $00000200;
  74528. end;
  74529. function TCAN1_C1FIFOINT19.getTXHALFIF : TBits_1; inline;
  74530. begin
  74531. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  74532. end;
  74533. procedure TCAN1_C1FIFOINT19.setTXNFULLIF; inline;
  74534. begin
  74535. pTDefRegMap(@Self)^.&set := $00000400;
  74536. end;
  74537. procedure TCAN1_C1FIFOINT19.clearTXNFULLIF; inline;
  74538. begin
  74539. pTDefRegMap(@Self)^.clr := $00000400;
  74540. end;
  74541. procedure TCAN1_C1FIFOINT19.setTXNFULLIF(thebits : TBits_1); inline;
  74542. begin
  74543. if thebits = 0 then
  74544. pTDefRegMap(@Self)^.clr := $00000400
  74545. else
  74546. pTDefRegMap(@Self)^.&set := $00000400;
  74547. end;
  74548. function TCAN1_C1FIFOINT19.getTXNFULLIF : TBits_1; inline;
  74549. begin
  74550. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  74551. end;
  74552. procedure TCAN1_C1FIFOINT19.setRXNEMPTYIE; inline;
  74553. begin
  74554. pTDefRegMap(@Self)^.&set := $00010000;
  74555. end;
  74556. procedure TCAN1_C1FIFOINT19.clearRXNEMPTYIE; inline;
  74557. begin
  74558. pTDefRegMap(@Self)^.clr := $00010000;
  74559. end;
  74560. procedure TCAN1_C1FIFOINT19.setRXNEMPTYIE(thebits : TBits_1); inline;
  74561. begin
  74562. if thebits = 0 then
  74563. pTDefRegMap(@Self)^.clr := $00010000
  74564. else
  74565. pTDefRegMap(@Self)^.&set := $00010000;
  74566. end;
  74567. function TCAN1_C1FIFOINT19.getRXNEMPTYIE : TBits_1; inline;
  74568. begin
  74569. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  74570. end;
  74571. procedure TCAN1_C1FIFOINT19.setRXHALFIE; inline;
  74572. begin
  74573. pTDefRegMap(@Self)^.&set := $00020000;
  74574. end;
  74575. procedure TCAN1_C1FIFOINT19.clearRXHALFIE; inline;
  74576. begin
  74577. pTDefRegMap(@Self)^.clr := $00020000;
  74578. end;
  74579. procedure TCAN1_C1FIFOINT19.setRXHALFIE(thebits : TBits_1); inline;
  74580. begin
  74581. if thebits = 0 then
  74582. pTDefRegMap(@Self)^.clr := $00020000
  74583. else
  74584. pTDefRegMap(@Self)^.&set := $00020000;
  74585. end;
  74586. function TCAN1_C1FIFOINT19.getRXHALFIE : TBits_1; inline;
  74587. begin
  74588. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  74589. end;
  74590. procedure TCAN1_C1FIFOINT19.setRXFULLIE; inline;
  74591. begin
  74592. pTDefRegMap(@Self)^.&set := $00040000;
  74593. end;
  74594. procedure TCAN1_C1FIFOINT19.clearRXFULLIE; inline;
  74595. begin
  74596. pTDefRegMap(@Self)^.clr := $00040000;
  74597. end;
  74598. procedure TCAN1_C1FIFOINT19.setRXFULLIE(thebits : TBits_1); inline;
  74599. begin
  74600. if thebits = 0 then
  74601. pTDefRegMap(@Self)^.clr := $00040000
  74602. else
  74603. pTDefRegMap(@Self)^.&set := $00040000;
  74604. end;
  74605. function TCAN1_C1FIFOINT19.getRXFULLIE : TBits_1; inline;
  74606. begin
  74607. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  74608. end;
  74609. procedure TCAN1_C1FIFOINT19.setRXOVFLIE; inline;
  74610. begin
  74611. pTDefRegMap(@Self)^.&set := $00080000;
  74612. end;
  74613. procedure TCAN1_C1FIFOINT19.clearRXOVFLIE; inline;
  74614. begin
  74615. pTDefRegMap(@Self)^.clr := $00080000;
  74616. end;
  74617. procedure TCAN1_C1FIFOINT19.setRXOVFLIE(thebits : TBits_1); inline;
  74618. begin
  74619. if thebits = 0 then
  74620. pTDefRegMap(@Self)^.clr := $00080000
  74621. else
  74622. pTDefRegMap(@Self)^.&set := $00080000;
  74623. end;
  74624. function TCAN1_C1FIFOINT19.getRXOVFLIE : TBits_1; inline;
  74625. begin
  74626. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  74627. end;
  74628. procedure TCAN1_C1FIFOINT19.setTXEMPTYIE; inline;
  74629. begin
  74630. pTDefRegMap(@Self)^.&set := $01000000;
  74631. end;
  74632. procedure TCAN1_C1FIFOINT19.clearTXEMPTYIE; inline;
  74633. begin
  74634. pTDefRegMap(@Self)^.clr := $01000000;
  74635. end;
  74636. procedure TCAN1_C1FIFOINT19.setTXEMPTYIE(thebits : TBits_1); inline;
  74637. begin
  74638. if thebits = 0 then
  74639. pTDefRegMap(@Self)^.clr := $01000000
  74640. else
  74641. pTDefRegMap(@Self)^.&set := $01000000;
  74642. end;
  74643. function TCAN1_C1FIFOINT19.getTXEMPTYIE : TBits_1; inline;
  74644. begin
  74645. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  74646. end;
  74647. procedure TCAN1_C1FIFOINT19.setTXHALFIE; inline;
  74648. begin
  74649. pTDefRegMap(@Self)^.&set := $02000000;
  74650. end;
  74651. procedure TCAN1_C1FIFOINT19.clearTXHALFIE; inline;
  74652. begin
  74653. pTDefRegMap(@Self)^.clr := $02000000;
  74654. end;
  74655. procedure TCAN1_C1FIFOINT19.setTXHALFIE(thebits : TBits_1); inline;
  74656. begin
  74657. if thebits = 0 then
  74658. pTDefRegMap(@Self)^.clr := $02000000
  74659. else
  74660. pTDefRegMap(@Self)^.&set := $02000000;
  74661. end;
  74662. function TCAN1_C1FIFOINT19.getTXHALFIE : TBits_1; inline;
  74663. begin
  74664. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  74665. end;
  74666. procedure TCAN1_C1FIFOINT19.setTXNFULLIE; inline;
  74667. begin
  74668. pTDefRegMap(@Self)^.&set := $04000000;
  74669. end;
  74670. procedure TCAN1_C1FIFOINT19.clearTXNFULLIE; inline;
  74671. begin
  74672. pTDefRegMap(@Self)^.clr := $04000000;
  74673. end;
  74674. procedure TCAN1_C1FIFOINT19.setTXNFULLIE(thebits : TBits_1); inline;
  74675. begin
  74676. if thebits = 0 then
  74677. pTDefRegMap(@Self)^.clr := $04000000
  74678. else
  74679. pTDefRegMap(@Self)^.&set := $04000000;
  74680. end;
  74681. function TCAN1_C1FIFOINT19.getTXNFULLIE : TBits_1; inline;
  74682. begin
  74683. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  74684. end;
  74685. procedure TCAN1_C1FIFOINT19.setw(thebits : TBits_32); inline;
  74686. begin
  74687. pTDefRegMap(@Self)^.val := thebits;
  74688. end;
  74689. function TCAN1_C1FIFOINT19.getw : TBits_32; inline;
  74690. begin
  74691. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74692. end;
  74693. procedure TCAN1_C1FIFOCI19.setCFIFOCI(thebits : TBits_5); inline;
  74694. begin
  74695. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  74696. end;
  74697. function TCAN1_C1FIFOCI19.getCFIFOCI : TBits_5; inline;
  74698. begin
  74699. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  74700. end;
  74701. procedure TCAN1_C1FIFOCI19.setw(thebits : TBits_32); inline;
  74702. begin
  74703. pTDefRegMap(@Self)^.val := thebits;
  74704. end;
  74705. function TCAN1_C1FIFOCI19.getw : TBits_32; inline;
  74706. begin
  74707. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74708. end;
  74709. procedure TCAN1_C1FIFOCON20.setTXPRI(thebits : TBits_2); inline;
  74710. begin
  74711. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  74712. end;
  74713. function TCAN1_C1FIFOCON20.getTXPRI : TBits_2; inline;
  74714. begin
  74715. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  74716. end;
  74717. procedure TCAN1_C1FIFOCON20.setRTREN; inline;
  74718. begin
  74719. pTDefRegMap(@Self)^.&set := $00000004;
  74720. end;
  74721. procedure TCAN1_C1FIFOCON20.clearRTREN; inline;
  74722. begin
  74723. pTDefRegMap(@Self)^.clr := $00000004;
  74724. end;
  74725. procedure TCAN1_C1FIFOCON20.setRTREN(thebits : TBits_1); inline;
  74726. begin
  74727. if thebits = 0 then
  74728. pTDefRegMap(@Self)^.clr := $00000004
  74729. else
  74730. pTDefRegMap(@Self)^.&set := $00000004;
  74731. end;
  74732. function TCAN1_C1FIFOCON20.getRTREN : TBits_1; inline;
  74733. begin
  74734. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  74735. end;
  74736. procedure TCAN1_C1FIFOCON20.setTXREQ; inline;
  74737. begin
  74738. pTDefRegMap(@Self)^.&set := $00000008;
  74739. end;
  74740. procedure TCAN1_C1FIFOCON20.clearTXREQ; inline;
  74741. begin
  74742. pTDefRegMap(@Self)^.clr := $00000008;
  74743. end;
  74744. procedure TCAN1_C1FIFOCON20.setTXREQ(thebits : TBits_1); inline;
  74745. begin
  74746. if thebits = 0 then
  74747. pTDefRegMap(@Self)^.clr := $00000008
  74748. else
  74749. pTDefRegMap(@Self)^.&set := $00000008;
  74750. end;
  74751. function TCAN1_C1FIFOCON20.getTXREQ : TBits_1; inline;
  74752. begin
  74753. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  74754. end;
  74755. procedure TCAN1_C1FIFOCON20.setTXERR; inline;
  74756. begin
  74757. pTDefRegMap(@Self)^.&set := $00000010;
  74758. end;
  74759. procedure TCAN1_C1FIFOCON20.clearTXERR; inline;
  74760. begin
  74761. pTDefRegMap(@Self)^.clr := $00000010;
  74762. end;
  74763. procedure TCAN1_C1FIFOCON20.setTXERR(thebits : TBits_1); inline;
  74764. begin
  74765. if thebits = 0 then
  74766. pTDefRegMap(@Self)^.clr := $00000010
  74767. else
  74768. pTDefRegMap(@Self)^.&set := $00000010;
  74769. end;
  74770. function TCAN1_C1FIFOCON20.getTXERR : TBits_1; inline;
  74771. begin
  74772. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  74773. end;
  74774. procedure TCAN1_C1FIFOCON20.setTXLARB; inline;
  74775. begin
  74776. pTDefRegMap(@Self)^.&set := $00000020;
  74777. end;
  74778. procedure TCAN1_C1FIFOCON20.clearTXLARB; inline;
  74779. begin
  74780. pTDefRegMap(@Self)^.clr := $00000020;
  74781. end;
  74782. procedure TCAN1_C1FIFOCON20.setTXLARB(thebits : TBits_1); inline;
  74783. begin
  74784. if thebits = 0 then
  74785. pTDefRegMap(@Self)^.clr := $00000020
  74786. else
  74787. pTDefRegMap(@Self)^.&set := $00000020;
  74788. end;
  74789. function TCAN1_C1FIFOCON20.getTXLARB : TBits_1; inline;
  74790. begin
  74791. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  74792. end;
  74793. procedure TCAN1_C1FIFOCON20.setTXABAT; inline;
  74794. begin
  74795. pTDefRegMap(@Self)^.&set := $00000040;
  74796. end;
  74797. procedure TCAN1_C1FIFOCON20.clearTXABAT; inline;
  74798. begin
  74799. pTDefRegMap(@Self)^.clr := $00000040;
  74800. end;
  74801. procedure TCAN1_C1FIFOCON20.setTXABAT(thebits : TBits_1); inline;
  74802. begin
  74803. if thebits = 0 then
  74804. pTDefRegMap(@Self)^.clr := $00000040
  74805. else
  74806. pTDefRegMap(@Self)^.&set := $00000040;
  74807. end;
  74808. function TCAN1_C1FIFOCON20.getTXABAT : TBits_1; inline;
  74809. begin
  74810. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  74811. end;
  74812. procedure TCAN1_C1FIFOCON20.setTXEN; inline;
  74813. begin
  74814. pTDefRegMap(@Self)^.&set := $00000080;
  74815. end;
  74816. procedure TCAN1_C1FIFOCON20.clearTXEN; inline;
  74817. begin
  74818. pTDefRegMap(@Self)^.clr := $00000080;
  74819. end;
  74820. procedure TCAN1_C1FIFOCON20.setTXEN(thebits : TBits_1); inline;
  74821. begin
  74822. if thebits = 0 then
  74823. pTDefRegMap(@Self)^.clr := $00000080
  74824. else
  74825. pTDefRegMap(@Self)^.&set := $00000080;
  74826. end;
  74827. function TCAN1_C1FIFOCON20.getTXEN : TBits_1; inline;
  74828. begin
  74829. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  74830. end;
  74831. procedure TCAN1_C1FIFOCON20.setDONLY; inline;
  74832. begin
  74833. pTDefRegMap(@Self)^.&set := $00001000;
  74834. end;
  74835. procedure TCAN1_C1FIFOCON20.clearDONLY; inline;
  74836. begin
  74837. pTDefRegMap(@Self)^.clr := $00001000;
  74838. end;
  74839. procedure TCAN1_C1FIFOCON20.setDONLY(thebits : TBits_1); inline;
  74840. begin
  74841. if thebits = 0 then
  74842. pTDefRegMap(@Self)^.clr := $00001000
  74843. else
  74844. pTDefRegMap(@Self)^.&set := $00001000;
  74845. end;
  74846. function TCAN1_C1FIFOCON20.getDONLY : TBits_1; inline;
  74847. begin
  74848. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  74849. end;
  74850. procedure TCAN1_C1FIFOCON20.setUINC; inline;
  74851. begin
  74852. pTDefRegMap(@Self)^.&set := $00002000;
  74853. end;
  74854. procedure TCAN1_C1FIFOCON20.clearUINC; inline;
  74855. begin
  74856. pTDefRegMap(@Self)^.clr := $00002000;
  74857. end;
  74858. procedure TCAN1_C1FIFOCON20.setUINC(thebits : TBits_1); inline;
  74859. begin
  74860. if thebits = 0 then
  74861. pTDefRegMap(@Self)^.clr := $00002000
  74862. else
  74863. pTDefRegMap(@Self)^.&set := $00002000;
  74864. end;
  74865. function TCAN1_C1FIFOCON20.getUINC : TBits_1; inline;
  74866. begin
  74867. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  74868. end;
  74869. procedure TCAN1_C1FIFOCON20.setFRESET; inline;
  74870. begin
  74871. pTDefRegMap(@Self)^.&set := $00004000;
  74872. end;
  74873. procedure TCAN1_C1FIFOCON20.clearFRESET; inline;
  74874. begin
  74875. pTDefRegMap(@Self)^.clr := $00004000;
  74876. end;
  74877. procedure TCAN1_C1FIFOCON20.setFRESET(thebits : TBits_1); inline;
  74878. begin
  74879. if thebits = 0 then
  74880. pTDefRegMap(@Self)^.clr := $00004000
  74881. else
  74882. pTDefRegMap(@Self)^.&set := $00004000;
  74883. end;
  74884. function TCAN1_C1FIFOCON20.getFRESET : TBits_1; inline;
  74885. begin
  74886. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  74887. end;
  74888. procedure TCAN1_C1FIFOCON20.setFSIZE(thebits : TBits_5); inline;
  74889. begin
  74890. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  74891. end;
  74892. function TCAN1_C1FIFOCON20.getFSIZE : TBits_5; inline;
  74893. begin
  74894. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  74895. end;
  74896. procedure TCAN1_C1FIFOCON20.setw(thebits : TBits_32); inline;
  74897. begin
  74898. pTDefRegMap(@Self)^.val := thebits;
  74899. end;
  74900. function TCAN1_C1FIFOCON20.getw : TBits_32; inline;
  74901. begin
  74902. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74903. end;
  74904. procedure TCAN1_C1FIFOINT20.setRXNEMPTYIF; inline;
  74905. begin
  74906. pTDefRegMap(@Self)^.&set := $00000001;
  74907. end;
  74908. procedure TCAN1_C1FIFOINT20.clearRXNEMPTYIF; inline;
  74909. begin
  74910. pTDefRegMap(@Self)^.clr := $00000001;
  74911. end;
  74912. procedure TCAN1_C1FIFOINT20.setRXNEMPTYIF(thebits : TBits_1); inline;
  74913. begin
  74914. if thebits = 0 then
  74915. pTDefRegMap(@Self)^.clr := $00000001
  74916. else
  74917. pTDefRegMap(@Self)^.&set := $00000001;
  74918. end;
  74919. function TCAN1_C1FIFOINT20.getRXNEMPTYIF : TBits_1; inline;
  74920. begin
  74921. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  74922. end;
  74923. procedure TCAN1_C1FIFOINT20.setRXHALFIF; inline;
  74924. begin
  74925. pTDefRegMap(@Self)^.&set := $00000002;
  74926. end;
  74927. procedure TCAN1_C1FIFOINT20.clearRXHALFIF; inline;
  74928. begin
  74929. pTDefRegMap(@Self)^.clr := $00000002;
  74930. end;
  74931. procedure TCAN1_C1FIFOINT20.setRXHALFIF(thebits : TBits_1); inline;
  74932. begin
  74933. if thebits = 0 then
  74934. pTDefRegMap(@Self)^.clr := $00000002
  74935. else
  74936. pTDefRegMap(@Self)^.&set := $00000002;
  74937. end;
  74938. function TCAN1_C1FIFOINT20.getRXHALFIF : TBits_1; inline;
  74939. begin
  74940. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  74941. end;
  74942. procedure TCAN1_C1FIFOINT20.setRXFULLIF; inline;
  74943. begin
  74944. pTDefRegMap(@Self)^.&set := $00000004;
  74945. end;
  74946. procedure TCAN1_C1FIFOINT20.clearRXFULLIF; inline;
  74947. begin
  74948. pTDefRegMap(@Self)^.clr := $00000004;
  74949. end;
  74950. procedure TCAN1_C1FIFOINT20.setRXFULLIF(thebits : TBits_1); inline;
  74951. begin
  74952. if thebits = 0 then
  74953. pTDefRegMap(@Self)^.clr := $00000004
  74954. else
  74955. pTDefRegMap(@Self)^.&set := $00000004;
  74956. end;
  74957. function TCAN1_C1FIFOINT20.getRXFULLIF : TBits_1; inline;
  74958. begin
  74959. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  74960. end;
  74961. procedure TCAN1_C1FIFOINT20.setRXOVFLIF; inline;
  74962. begin
  74963. pTDefRegMap(@Self)^.&set := $00000008;
  74964. end;
  74965. procedure TCAN1_C1FIFOINT20.clearRXOVFLIF; inline;
  74966. begin
  74967. pTDefRegMap(@Self)^.clr := $00000008;
  74968. end;
  74969. procedure TCAN1_C1FIFOINT20.setRXOVFLIF(thebits : TBits_1); inline;
  74970. begin
  74971. if thebits = 0 then
  74972. pTDefRegMap(@Self)^.clr := $00000008
  74973. else
  74974. pTDefRegMap(@Self)^.&set := $00000008;
  74975. end;
  74976. function TCAN1_C1FIFOINT20.getRXOVFLIF : TBits_1; inline;
  74977. begin
  74978. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  74979. end;
  74980. procedure TCAN1_C1FIFOINT20.setTXEMPTYIF; inline;
  74981. begin
  74982. pTDefRegMap(@Self)^.&set := $00000100;
  74983. end;
  74984. procedure TCAN1_C1FIFOINT20.clearTXEMPTYIF; inline;
  74985. begin
  74986. pTDefRegMap(@Self)^.clr := $00000100;
  74987. end;
  74988. procedure TCAN1_C1FIFOINT20.setTXEMPTYIF(thebits : TBits_1); inline;
  74989. begin
  74990. if thebits = 0 then
  74991. pTDefRegMap(@Self)^.clr := $00000100
  74992. else
  74993. pTDefRegMap(@Self)^.&set := $00000100;
  74994. end;
  74995. function TCAN1_C1FIFOINT20.getTXEMPTYIF : TBits_1; inline;
  74996. begin
  74997. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  74998. end;
  74999. procedure TCAN1_C1FIFOINT20.setTXHALFIF; inline;
  75000. begin
  75001. pTDefRegMap(@Self)^.&set := $00000200;
  75002. end;
  75003. procedure TCAN1_C1FIFOINT20.clearTXHALFIF; inline;
  75004. begin
  75005. pTDefRegMap(@Self)^.clr := $00000200;
  75006. end;
  75007. procedure TCAN1_C1FIFOINT20.setTXHALFIF(thebits : TBits_1); inline;
  75008. begin
  75009. if thebits = 0 then
  75010. pTDefRegMap(@Self)^.clr := $00000200
  75011. else
  75012. pTDefRegMap(@Self)^.&set := $00000200;
  75013. end;
  75014. function TCAN1_C1FIFOINT20.getTXHALFIF : TBits_1; inline;
  75015. begin
  75016. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  75017. end;
  75018. procedure TCAN1_C1FIFOINT20.setTXNFULLIF; inline;
  75019. begin
  75020. pTDefRegMap(@Self)^.&set := $00000400;
  75021. end;
  75022. procedure TCAN1_C1FIFOINT20.clearTXNFULLIF; inline;
  75023. begin
  75024. pTDefRegMap(@Self)^.clr := $00000400;
  75025. end;
  75026. procedure TCAN1_C1FIFOINT20.setTXNFULLIF(thebits : TBits_1); inline;
  75027. begin
  75028. if thebits = 0 then
  75029. pTDefRegMap(@Self)^.clr := $00000400
  75030. else
  75031. pTDefRegMap(@Self)^.&set := $00000400;
  75032. end;
  75033. function TCAN1_C1FIFOINT20.getTXNFULLIF : TBits_1; inline;
  75034. begin
  75035. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  75036. end;
  75037. procedure TCAN1_C1FIFOINT20.setRXNEMPTYIE; inline;
  75038. begin
  75039. pTDefRegMap(@Self)^.&set := $00010000;
  75040. end;
  75041. procedure TCAN1_C1FIFOINT20.clearRXNEMPTYIE; inline;
  75042. begin
  75043. pTDefRegMap(@Self)^.clr := $00010000;
  75044. end;
  75045. procedure TCAN1_C1FIFOINT20.setRXNEMPTYIE(thebits : TBits_1); inline;
  75046. begin
  75047. if thebits = 0 then
  75048. pTDefRegMap(@Self)^.clr := $00010000
  75049. else
  75050. pTDefRegMap(@Self)^.&set := $00010000;
  75051. end;
  75052. function TCAN1_C1FIFOINT20.getRXNEMPTYIE : TBits_1; inline;
  75053. begin
  75054. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  75055. end;
  75056. procedure TCAN1_C1FIFOINT20.setRXHALFIE; inline;
  75057. begin
  75058. pTDefRegMap(@Self)^.&set := $00020000;
  75059. end;
  75060. procedure TCAN1_C1FIFOINT20.clearRXHALFIE; inline;
  75061. begin
  75062. pTDefRegMap(@Self)^.clr := $00020000;
  75063. end;
  75064. procedure TCAN1_C1FIFOINT20.setRXHALFIE(thebits : TBits_1); inline;
  75065. begin
  75066. if thebits = 0 then
  75067. pTDefRegMap(@Self)^.clr := $00020000
  75068. else
  75069. pTDefRegMap(@Self)^.&set := $00020000;
  75070. end;
  75071. function TCAN1_C1FIFOINT20.getRXHALFIE : TBits_1; inline;
  75072. begin
  75073. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  75074. end;
  75075. procedure TCAN1_C1FIFOINT20.setRXFULLIE; inline;
  75076. begin
  75077. pTDefRegMap(@Self)^.&set := $00040000;
  75078. end;
  75079. procedure TCAN1_C1FIFOINT20.clearRXFULLIE; inline;
  75080. begin
  75081. pTDefRegMap(@Self)^.clr := $00040000;
  75082. end;
  75083. procedure TCAN1_C1FIFOINT20.setRXFULLIE(thebits : TBits_1); inline;
  75084. begin
  75085. if thebits = 0 then
  75086. pTDefRegMap(@Self)^.clr := $00040000
  75087. else
  75088. pTDefRegMap(@Self)^.&set := $00040000;
  75089. end;
  75090. function TCAN1_C1FIFOINT20.getRXFULLIE : TBits_1; inline;
  75091. begin
  75092. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  75093. end;
  75094. procedure TCAN1_C1FIFOINT20.setRXOVFLIE; inline;
  75095. begin
  75096. pTDefRegMap(@Self)^.&set := $00080000;
  75097. end;
  75098. procedure TCAN1_C1FIFOINT20.clearRXOVFLIE; inline;
  75099. begin
  75100. pTDefRegMap(@Self)^.clr := $00080000;
  75101. end;
  75102. procedure TCAN1_C1FIFOINT20.setRXOVFLIE(thebits : TBits_1); inline;
  75103. begin
  75104. if thebits = 0 then
  75105. pTDefRegMap(@Self)^.clr := $00080000
  75106. else
  75107. pTDefRegMap(@Self)^.&set := $00080000;
  75108. end;
  75109. function TCAN1_C1FIFOINT20.getRXOVFLIE : TBits_1; inline;
  75110. begin
  75111. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  75112. end;
  75113. procedure TCAN1_C1FIFOINT20.setTXEMPTYIE; inline;
  75114. begin
  75115. pTDefRegMap(@Self)^.&set := $01000000;
  75116. end;
  75117. procedure TCAN1_C1FIFOINT20.clearTXEMPTYIE; inline;
  75118. begin
  75119. pTDefRegMap(@Self)^.clr := $01000000;
  75120. end;
  75121. procedure TCAN1_C1FIFOINT20.setTXEMPTYIE(thebits : TBits_1); inline;
  75122. begin
  75123. if thebits = 0 then
  75124. pTDefRegMap(@Self)^.clr := $01000000
  75125. else
  75126. pTDefRegMap(@Self)^.&set := $01000000;
  75127. end;
  75128. function TCAN1_C1FIFOINT20.getTXEMPTYIE : TBits_1; inline;
  75129. begin
  75130. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  75131. end;
  75132. procedure TCAN1_C1FIFOINT20.setTXHALFIE; inline;
  75133. begin
  75134. pTDefRegMap(@Self)^.&set := $02000000;
  75135. end;
  75136. procedure TCAN1_C1FIFOINT20.clearTXHALFIE; inline;
  75137. begin
  75138. pTDefRegMap(@Self)^.clr := $02000000;
  75139. end;
  75140. procedure TCAN1_C1FIFOINT20.setTXHALFIE(thebits : TBits_1); inline;
  75141. begin
  75142. if thebits = 0 then
  75143. pTDefRegMap(@Self)^.clr := $02000000
  75144. else
  75145. pTDefRegMap(@Self)^.&set := $02000000;
  75146. end;
  75147. function TCAN1_C1FIFOINT20.getTXHALFIE : TBits_1; inline;
  75148. begin
  75149. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  75150. end;
  75151. procedure TCAN1_C1FIFOINT20.setTXNFULLIE; inline;
  75152. begin
  75153. pTDefRegMap(@Self)^.&set := $04000000;
  75154. end;
  75155. procedure TCAN1_C1FIFOINT20.clearTXNFULLIE; inline;
  75156. begin
  75157. pTDefRegMap(@Self)^.clr := $04000000;
  75158. end;
  75159. procedure TCAN1_C1FIFOINT20.setTXNFULLIE(thebits : TBits_1); inline;
  75160. begin
  75161. if thebits = 0 then
  75162. pTDefRegMap(@Self)^.clr := $04000000
  75163. else
  75164. pTDefRegMap(@Self)^.&set := $04000000;
  75165. end;
  75166. function TCAN1_C1FIFOINT20.getTXNFULLIE : TBits_1; inline;
  75167. begin
  75168. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  75169. end;
  75170. procedure TCAN1_C1FIFOINT20.setw(thebits : TBits_32); inline;
  75171. begin
  75172. pTDefRegMap(@Self)^.val := thebits;
  75173. end;
  75174. function TCAN1_C1FIFOINT20.getw : TBits_32; inline;
  75175. begin
  75176. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75177. end;
  75178. procedure TCAN1_C1FIFOCI20.setCFIFOCI(thebits : TBits_5); inline;
  75179. begin
  75180. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  75181. end;
  75182. function TCAN1_C1FIFOCI20.getCFIFOCI : TBits_5; inline;
  75183. begin
  75184. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  75185. end;
  75186. procedure TCAN1_C1FIFOCI20.setw(thebits : TBits_32); inline;
  75187. begin
  75188. pTDefRegMap(@Self)^.val := thebits;
  75189. end;
  75190. function TCAN1_C1FIFOCI20.getw : TBits_32; inline;
  75191. begin
  75192. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75193. end;
  75194. procedure TCAN1_C1FIFOCON21.setTXPRI(thebits : TBits_2); inline;
  75195. begin
  75196. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  75197. end;
  75198. function TCAN1_C1FIFOCON21.getTXPRI : TBits_2; inline;
  75199. begin
  75200. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  75201. end;
  75202. procedure TCAN1_C1FIFOCON21.setRTREN; inline;
  75203. begin
  75204. pTDefRegMap(@Self)^.&set := $00000004;
  75205. end;
  75206. procedure TCAN1_C1FIFOCON21.clearRTREN; inline;
  75207. begin
  75208. pTDefRegMap(@Self)^.clr := $00000004;
  75209. end;
  75210. procedure TCAN1_C1FIFOCON21.setRTREN(thebits : TBits_1); inline;
  75211. begin
  75212. if thebits = 0 then
  75213. pTDefRegMap(@Self)^.clr := $00000004
  75214. else
  75215. pTDefRegMap(@Self)^.&set := $00000004;
  75216. end;
  75217. function TCAN1_C1FIFOCON21.getRTREN : TBits_1; inline;
  75218. begin
  75219. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  75220. end;
  75221. procedure TCAN1_C1FIFOCON21.setTXREQ; inline;
  75222. begin
  75223. pTDefRegMap(@Self)^.&set := $00000008;
  75224. end;
  75225. procedure TCAN1_C1FIFOCON21.clearTXREQ; inline;
  75226. begin
  75227. pTDefRegMap(@Self)^.clr := $00000008;
  75228. end;
  75229. procedure TCAN1_C1FIFOCON21.setTXREQ(thebits : TBits_1); inline;
  75230. begin
  75231. if thebits = 0 then
  75232. pTDefRegMap(@Self)^.clr := $00000008
  75233. else
  75234. pTDefRegMap(@Self)^.&set := $00000008;
  75235. end;
  75236. function TCAN1_C1FIFOCON21.getTXREQ : TBits_1; inline;
  75237. begin
  75238. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  75239. end;
  75240. procedure TCAN1_C1FIFOCON21.setTXERR; inline;
  75241. begin
  75242. pTDefRegMap(@Self)^.&set := $00000010;
  75243. end;
  75244. procedure TCAN1_C1FIFOCON21.clearTXERR; inline;
  75245. begin
  75246. pTDefRegMap(@Self)^.clr := $00000010;
  75247. end;
  75248. procedure TCAN1_C1FIFOCON21.setTXERR(thebits : TBits_1); inline;
  75249. begin
  75250. if thebits = 0 then
  75251. pTDefRegMap(@Self)^.clr := $00000010
  75252. else
  75253. pTDefRegMap(@Self)^.&set := $00000010;
  75254. end;
  75255. function TCAN1_C1FIFOCON21.getTXERR : TBits_1; inline;
  75256. begin
  75257. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  75258. end;
  75259. procedure TCAN1_C1FIFOCON21.setTXLARB; inline;
  75260. begin
  75261. pTDefRegMap(@Self)^.&set := $00000020;
  75262. end;
  75263. procedure TCAN1_C1FIFOCON21.clearTXLARB; inline;
  75264. begin
  75265. pTDefRegMap(@Self)^.clr := $00000020;
  75266. end;
  75267. procedure TCAN1_C1FIFOCON21.setTXLARB(thebits : TBits_1); inline;
  75268. begin
  75269. if thebits = 0 then
  75270. pTDefRegMap(@Self)^.clr := $00000020
  75271. else
  75272. pTDefRegMap(@Self)^.&set := $00000020;
  75273. end;
  75274. function TCAN1_C1FIFOCON21.getTXLARB : TBits_1; inline;
  75275. begin
  75276. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  75277. end;
  75278. procedure TCAN1_C1FIFOCON21.setTXABAT; inline;
  75279. begin
  75280. pTDefRegMap(@Self)^.&set := $00000040;
  75281. end;
  75282. procedure TCAN1_C1FIFOCON21.clearTXABAT; inline;
  75283. begin
  75284. pTDefRegMap(@Self)^.clr := $00000040;
  75285. end;
  75286. procedure TCAN1_C1FIFOCON21.setTXABAT(thebits : TBits_1); inline;
  75287. begin
  75288. if thebits = 0 then
  75289. pTDefRegMap(@Self)^.clr := $00000040
  75290. else
  75291. pTDefRegMap(@Self)^.&set := $00000040;
  75292. end;
  75293. function TCAN1_C1FIFOCON21.getTXABAT : TBits_1; inline;
  75294. begin
  75295. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  75296. end;
  75297. procedure TCAN1_C1FIFOCON21.setTXEN; inline;
  75298. begin
  75299. pTDefRegMap(@Self)^.&set := $00000080;
  75300. end;
  75301. procedure TCAN1_C1FIFOCON21.clearTXEN; inline;
  75302. begin
  75303. pTDefRegMap(@Self)^.clr := $00000080;
  75304. end;
  75305. procedure TCAN1_C1FIFOCON21.setTXEN(thebits : TBits_1); inline;
  75306. begin
  75307. if thebits = 0 then
  75308. pTDefRegMap(@Self)^.clr := $00000080
  75309. else
  75310. pTDefRegMap(@Self)^.&set := $00000080;
  75311. end;
  75312. function TCAN1_C1FIFOCON21.getTXEN : TBits_1; inline;
  75313. begin
  75314. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  75315. end;
  75316. procedure TCAN1_C1FIFOCON21.setDONLY; inline;
  75317. begin
  75318. pTDefRegMap(@Self)^.&set := $00001000;
  75319. end;
  75320. procedure TCAN1_C1FIFOCON21.clearDONLY; inline;
  75321. begin
  75322. pTDefRegMap(@Self)^.clr := $00001000;
  75323. end;
  75324. procedure TCAN1_C1FIFOCON21.setDONLY(thebits : TBits_1); inline;
  75325. begin
  75326. if thebits = 0 then
  75327. pTDefRegMap(@Self)^.clr := $00001000
  75328. else
  75329. pTDefRegMap(@Self)^.&set := $00001000;
  75330. end;
  75331. function TCAN1_C1FIFOCON21.getDONLY : TBits_1; inline;
  75332. begin
  75333. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  75334. end;
  75335. procedure TCAN1_C1FIFOCON21.setUINC; inline;
  75336. begin
  75337. pTDefRegMap(@Self)^.&set := $00002000;
  75338. end;
  75339. procedure TCAN1_C1FIFOCON21.clearUINC; inline;
  75340. begin
  75341. pTDefRegMap(@Self)^.clr := $00002000;
  75342. end;
  75343. procedure TCAN1_C1FIFOCON21.setUINC(thebits : TBits_1); inline;
  75344. begin
  75345. if thebits = 0 then
  75346. pTDefRegMap(@Self)^.clr := $00002000
  75347. else
  75348. pTDefRegMap(@Self)^.&set := $00002000;
  75349. end;
  75350. function TCAN1_C1FIFOCON21.getUINC : TBits_1; inline;
  75351. begin
  75352. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  75353. end;
  75354. procedure TCAN1_C1FIFOCON21.setFRESET; inline;
  75355. begin
  75356. pTDefRegMap(@Self)^.&set := $00004000;
  75357. end;
  75358. procedure TCAN1_C1FIFOCON21.clearFRESET; inline;
  75359. begin
  75360. pTDefRegMap(@Self)^.clr := $00004000;
  75361. end;
  75362. procedure TCAN1_C1FIFOCON21.setFRESET(thebits : TBits_1); inline;
  75363. begin
  75364. if thebits = 0 then
  75365. pTDefRegMap(@Self)^.clr := $00004000
  75366. else
  75367. pTDefRegMap(@Self)^.&set := $00004000;
  75368. end;
  75369. function TCAN1_C1FIFOCON21.getFRESET : TBits_1; inline;
  75370. begin
  75371. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  75372. end;
  75373. procedure TCAN1_C1FIFOCON21.setFSIZE(thebits : TBits_5); inline;
  75374. begin
  75375. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  75376. end;
  75377. function TCAN1_C1FIFOCON21.getFSIZE : TBits_5; inline;
  75378. begin
  75379. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  75380. end;
  75381. procedure TCAN1_C1FIFOCON21.setw(thebits : TBits_32); inline;
  75382. begin
  75383. pTDefRegMap(@Self)^.val := thebits;
  75384. end;
  75385. function TCAN1_C1FIFOCON21.getw : TBits_32; inline;
  75386. begin
  75387. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75388. end;
  75389. procedure TCAN1_C1FIFOINT21.setRXNEMPTYIF; inline;
  75390. begin
  75391. pTDefRegMap(@Self)^.&set := $00000001;
  75392. end;
  75393. procedure TCAN1_C1FIFOINT21.clearRXNEMPTYIF; inline;
  75394. begin
  75395. pTDefRegMap(@Self)^.clr := $00000001;
  75396. end;
  75397. procedure TCAN1_C1FIFOINT21.setRXNEMPTYIF(thebits : TBits_1); inline;
  75398. begin
  75399. if thebits = 0 then
  75400. pTDefRegMap(@Self)^.clr := $00000001
  75401. else
  75402. pTDefRegMap(@Self)^.&set := $00000001;
  75403. end;
  75404. function TCAN1_C1FIFOINT21.getRXNEMPTYIF : TBits_1; inline;
  75405. begin
  75406. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  75407. end;
  75408. procedure TCAN1_C1FIFOINT21.setRXHALFIF; inline;
  75409. begin
  75410. pTDefRegMap(@Self)^.&set := $00000002;
  75411. end;
  75412. procedure TCAN1_C1FIFOINT21.clearRXHALFIF; inline;
  75413. begin
  75414. pTDefRegMap(@Self)^.clr := $00000002;
  75415. end;
  75416. procedure TCAN1_C1FIFOINT21.setRXHALFIF(thebits : TBits_1); inline;
  75417. begin
  75418. if thebits = 0 then
  75419. pTDefRegMap(@Self)^.clr := $00000002
  75420. else
  75421. pTDefRegMap(@Self)^.&set := $00000002;
  75422. end;
  75423. function TCAN1_C1FIFOINT21.getRXHALFIF : TBits_1; inline;
  75424. begin
  75425. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  75426. end;
  75427. procedure TCAN1_C1FIFOINT21.setRXFULLIF; inline;
  75428. begin
  75429. pTDefRegMap(@Self)^.&set := $00000004;
  75430. end;
  75431. procedure TCAN1_C1FIFOINT21.clearRXFULLIF; inline;
  75432. begin
  75433. pTDefRegMap(@Self)^.clr := $00000004;
  75434. end;
  75435. procedure TCAN1_C1FIFOINT21.setRXFULLIF(thebits : TBits_1); inline;
  75436. begin
  75437. if thebits = 0 then
  75438. pTDefRegMap(@Self)^.clr := $00000004
  75439. else
  75440. pTDefRegMap(@Self)^.&set := $00000004;
  75441. end;
  75442. function TCAN1_C1FIFOINT21.getRXFULLIF : TBits_1; inline;
  75443. begin
  75444. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  75445. end;
  75446. procedure TCAN1_C1FIFOINT21.setRXOVFLIF; inline;
  75447. begin
  75448. pTDefRegMap(@Self)^.&set := $00000008;
  75449. end;
  75450. procedure TCAN1_C1FIFOINT21.clearRXOVFLIF; inline;
  75451. begin
  75452. pTDefRegMap(@Self)^.clr := $00000008;
  75453. end;
  75454. procedure TCAN1_C1FIFOINT21.setRXOVFLIF(thebits : TBits_1); inline;
  75455. begin
  75456. if thebits = 0 then
  75457. pTDefRegMap(@Self)^.clr := $00000008
  75458. else
  75459. pTDefRegMap(@Self)^.&set := $00000008;
  75460. end;
  75461. function TCAN1_C1FIFOINT21.getRXOVFLIF : TBits_1; inline;
  75462. begin
  75463. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  75464. end;
  75465. procedure TCAN1_C1FIFOINT21.setTXEMPTYIF; inline;
  75466. begin
  75467. pTDefRegMap(@Self)^.&set := $00000100;
  75468. end;
  75469. procedure TCAN1_C1FIFOINT21.clearTXEMPTYIF; inline;
  75470. begin
  75471. pTDefRegMap(@Self)^.clr := $00000100;
  75472. end;
  75473. procedure TCAN1_C1FIFOINT21.setTXEMPTYIF(thebits : TBits_1); inline;
  75474. begin
  75475. if thebits = 0 then
  75476. pTDefRegMap(@Self)^.clr := $00000100
  75477. else
  75478. pTDefRegMap(@Self)^.&set := $00000100;
  75479. end;
  75480. function TCAN1_C1FIFOINT21.getTXEMPTYIF : TBits_1; inline;
  75481. begin
  75482. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  75483. end;
  75484. procedure TCAN1_C1FIFOINT21.setTXHALFIF; inline;
  75485. begin
  75486. pTDefRegMap(@Self)^.&set := $00000200;
  75487. end;
  75488. procedure TCAN1_C1FIFOINT21.clearTXHALFIF; inline;
  75489. begin
  75490. pTDefRegMap(@Self)^.clr := $00000200;
  75491. end;
  75492. procedure TCAN1_C1FIFOINT21.setTXHALFIF(thebits : TBits_1); inline;
  75493. begin
  75494. if thebits = 0 then
  75495. pTDefRegMap(@Self)^.clr := $00000200
  75496. else
  75497. pTDefRegMap(@Self)^.&set := $00000200;
  75498. end;
  75499. function TCAN1_C1FIFOINT21.getTXHALFIF : TBits_1; inline;
  75500. begin
  75501. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  75502. end;
  75503. procedure TCAN1_C1FIFOINT21.setTXNFULLIF; inline;
  75504. begin
  75505. pTDefRegMap(@Self)^.&set := $00000400;
  75506. end;
  75507. procedure TCAN1_C1FIFOINT21.clearTXNFULLIF; inline;
  75508. begin
  75509. pTDefRegMap(@Self)^.clr := $00000400;
  75510. end;
  75511. procedure TCAN1_C1FIFOINT21.setTXNFULLIF(thebits : TBits_1); inline;
  75512. begin
  75513. if thebits = 0 then
  75514. pTDefRegMap(@Self)^.clr := $00000400
  75515. else
  75516. pTDefRegMap(@Self)^.&set := $00000400;
  75517. end;
  75518. function TCAN1_C1FIFOINT21.getTXNFULLIF : TBits_1; inline;
  75519. begin
  75520. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  75521. end;
  75522. procedure TCAN1_C1FIFOINT21.setRXNEMPTYIE; inline;
  75523. begin
  75524. pTDefRegMap(@Self)^.&set := $00010000;
  75525. end;
  75526. procedure TCAN1_C1FIFOINT21.clearRXNEMPTYIE; inline;
  75527. begin
  75528. pTDefRegMap(@Self)^.clr := $00010000;
  75529. end;
  75530. procedure TCAN1_C1FIFOINT21.setRXNEMPTYIE(thebits : TBits_1); inline;
  75531. begin
  75532. if thebits = 0 then
  75533. pTDefRegMap(@Self)^.clr := $00010000
  75534. else
  75535. pTDefRegMap(@Self)^.&set := $00010000;
  75536. end;
  75537. function TCAN1_C1FIFOINT21.getRXNEMPTYIE : TBits_1; inline;
  75538. begin
  75539. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  75540. end;
  75541. procedure TCAN1_C1FIFOINT21.setRXHALFIE; inline;
  75542. begin
  75543. pTDefRegMap(@Self)^.&set := $00020000;
  75544. end;
  75545. procedure TCAN1_C1FIFOINT21.clearRXHALFIE; inline;
  75546. begin
  75547. pTDefRegMap(@Self)^.clr := $00020000;
  75548. end;
  75549. procedure TCAN1_C1FIFOINT21.setRXHALFIE(thebits : TBits_1); inline;
  75550. begin
  75551. if thebits = 0 then
  75552. pTDefRegMap(@Self)^.clr := $00020000
  75553. else
  75554. pTDefRegMap(@Self)^.&set := $00020000;
  75555. end;
  75556. function TCAN1_C1FIFOINT21.getRXHALFIE : TBits_1; inline;
  75557. begin
  75558. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  75559. end;
  75560. procedure TCAN1_C1FIFOINT21.setRXFULLIE; inline;
  75561. begin
  75562. pTDefRegMap(@Self)^.&set := $00040000;
  75563. end;
  75564. procedure TCAN1_C1FIFOINT21.clearRXFULLIE; inline;
  75565. begin
  75566. pTDefRegMap(@Self)^.clr := $00040000;
  75567. end;
  75568. procedure TCAN1_C1FIFOINT21.setRXFULLIE(thebits : TBits_1); inline;
  75569. begin
  75570. if thebits = 0 then
  75571. pTDefRegMap(@Self)^.clr := $00040000
  75572. else
  75573. pTDefRegMap(@Self)^.&set := $00040000;
  75574. end;
  75575. function TCAN1_C1FIFOINT21.getRXFULLIE : TBits_1; inline;
  75576. begin
  75577. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  75578. end;
  75579. procedure TCAN1_C1FIFOINT21.setRXOVFLIE; inline;
  75580. begin
  75581. pTDefRegMap(@Self)^.&set := $00080000;
  75582. end;
  75583. procedure TCAN1_C1FIFOINT21.clearRXOVFLIE; inline;
  75584. begin
  75585. pTDefRegMap(@Self)^.clr := $00080000;
  75586. end;
  75587. procedure TCAN1_C1FIFOINT21.setRXOVFLIE(thebits : TBits_1); inline;
  75588. begin
  75589. if thebits = 0 then
  75590. pTDefRegMap(@Self)^.clr := $00080000
  75591. else
  75592. pTDefRegMap(@Self)^.&set := $00080000;
  75593. end;
  75594. function TCAN1_C1FIFOINT21.getRXOVFLIE : TBits_1; inline;
  75595. begin
  75596. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  75597. end;
  75598. procedure TCAN1_C1FIFOINT21.setTXEMPTYIE; inline;
  75599. begin
  75600. pTDefRegMap(@Self)^.&set := $01000000;
  75601. end;
  75602. procedure TCAN1_C1FIFOINT21.clearTXEMPTYIE; inline;
  75603. begin
  75604. pTDefRegMap(@Self)^.clr := $01000000;
  75605. end;
  75606. procedure TCAN1_C1FIFOINT21.setTXEMPTYIE(thebits : TBits_1); inline;
  75607. begin
  75608. if thebits = 0 then
  75609. pTDefRegMap(@Self)^.clr := $01000000
  75610. else
  75611. pTDefRegMap(@Self)^.&set := $01000000;
  75612. end;
  75613. function TCAN1_C1FIFOINT21.getTXEMPTYIE : TBits_1; inline;
  75614. begin
  75615. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  75616. end;
  75617. procedure TCAN1_C1FIFOINT21.setTXHALFIE; inline;
  75618. begin
  75619. pTDefRegMap(@Self)^.&set := $02000000;
  75620. end;
  75621. procedure TCAN1_C1FIFOINT21.clearTXHALFIE; inline;
  75622. begin
  75623. pTDefRegMap(@Self)^.clr := $02000000;
  75624. end;
  75625. procedure TCAN1_C1FIFOINT21.setTXHALFIE(thebits : TBits_1); inline;
  75626. begin
  75627. if thebits = 0 then
  75628. pTDefRegMap(@Self)^.clr := $02000000
  75629. else
  75630. pTDefRegMap(@Self)^.&set := $02000000;
  75631. end;
  75632. function TCAN1_C1FIFOINT21.getTXHALFIE : TBits_1; inline;
  75633. begin
  75634. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  75635. end;
  75636. procedure TCAN1_C1FIFOINT21.setTXNFULLIE; inline;
  75637. begin
  75638. pTDefRegMap(@Self)^.&set := $04000000;
  75639. end;
  75640. procedure TCAN1_C1FIFOINT21.clearTXNFULLIE; inline;
  75641. begin
  75642. pTDefRegMap(@Self)^.clr := $04000000;
  75643. end;
  75644. procedure TCAN1_C1FIFOINT21.setTXNFULLIE(thebits : TBits_1); inline;
  75645. begin
  75646. if thebits = 0 then
  75647. pTDefRegMap(@Self)^.clr := $04000000
  75648. else
  75649. pTDefRegMap(@Self)^.&set := $04000000;
  75650. end;
  75651. function TCAN1_C1FIFOINT21.getTXNFULLIE : TBits_1; inline;
  75652. begin
  75653. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  75654. end;
  75655. procedure TCAN1_C1FIFOINT21.setw(thebits : TBits_32); inline;
  75656. begin
  75657. pTDefRegMap(@Self)^.val := thebits;
  75658. end;
  75659. function TCAN1_C1FIFOINT21.getw : TBits_32; inline;
  75660. begin
  75661. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75662. end;
  75663. procedure TCAN1_C1FIFOCI21.setCFIFOCI(thebits : TBits_5); inline;
  75664. begin
  75665. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  75666. end;
  75667. function TCAN1_C1FIFOCI21.getCFIFOCI : TBits_5; inline;
  75668. begin
  75669. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  75670. end;
  75671. procedure TCAN1_C1FIFOCI21.setw(thebits : TBits_32); inline;
  75672. begin
  75673. pTDefRegMap(@Self)^.val := thebits;
  75674. end;
  75675. function TCAN1_C1FIFOCI21.getw : TBits_32; inline;
  75676. begin
  75677. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75678. end;
  75679. procedure TCAN1_C1FIFOCON22.setTXPRI(thebits : TBits_2); inline;
  75680. begin
  75681. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  75682. end;
  75683. function TCAN1_C1FIFOCON22.getTXPRI : TBits_2; inline;
  75684. begin
  75685. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  75686. end;
  75687. procedure TCAN1_C1FIFOCON22.setRTREN; inline;
  75688. begin
  75689. pTDefRegMap(@Self)^.&set := $00000004;
  75690. end;
  75691. procedure TCAN1_C1FIFOCON22.clearRTREN; inline;
  75692. begin
  75693. pTDefRegMap(@Self)^.clr := $00000004;
  75694. end;
  75695. procedure TCAN1_C1FIFOCON22.setRTREN(thebits : TBits_1); inline;
  75696. begin
  75697. if thebits = 0 then
  75698. pTDefRegMap(@Self)^.clr := $00000004
  75699. else
  75700. pTDefRegMap(@Self)^.&set := $00000004;
  75701. end;
  75702. function TCAN1_C1FIFOCON22.getRTREN : TBits_1; inline;
  75703. begin
  75704. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  75705. end;
  75706. procedure TCAN1_C1FIFOCON22.setTXREQ; inline;
  75707. begin
  75708. pTDefRegMap(@Self)^.&set := $00000008;
  75709. end;
  75710. procedure TCAN1_C1FIFOCON22.clearTXREQ; inline;
  75711. begin
  75712. pTDefRegMap(@Self)^.clr := $00000008;
  75713. end;
  75714. procedure TCAN1_C1FIFOCON22.setTXREQ(thebits : TBits_1); inline;
  75715. begin
  75716. if thebits = 0 then
  75717. pTDefRegMap(@Self)^.clr := $00000008
  75718. else
  75719. pTDefRegMap(@Self)^.&set := $00000008;
  75720. end;
  75721. function TCAN1_C1FIFOCON22.getTXREQ : TBits_1; inline;
  75722. begin
  75723. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  75724. end;
  75725. procedure TCAN1_C1FIFOCON22.setTXERR; inline;
  75726. begin
  75727. pTDefRegMap(@Self)^.&set := $00000010;
  75728. end;
  75729. procedure TCAN1_C1FIFOCON22.clearTXERR; inline;
  75730. begin
  75731. pTDefRegMap(@Self)^.clr := $00000010;
  75732. end;
  75733. procedure TCAN1_C1FIFOCON22.setTXERR(thebits : TBits_1); inline;
  75734. begin
  75735. if thebits = 0 then
  75736. pTDefRegMap(@Self)^.clr := $00000010
  75737. else
  75738. pTDefRegMap(@Self)^.&set := $00000010;
  75739. end;
  75740. function TCAN1_C1FIFOCON22.getTXERR : TBits_1; inline;
  75741. begin
  75742. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  75743. end;
  75744. procedure TCAN1_C1FIFOCON22.setTXLARB; inline;
  75745. begin
  75746. pTDefRegMap(@Self)^.&set := $00000020;
  75747. end;
  75748. procedure TCAN1_C1FIFOCON22.clearTXLARB; inline;
  75749. begin
  75750. pTDefRegMap(@Self)^.clr := $00000020;
  75751. end;
  75752. procedure TCAN1_C1FIFOCON22.setTXLARB(thebits : TBits_1); inline;
  75753. begin
  75754. if thebits = 0 then
  75755. pTDefRegMap(@Self)^.clr := $00000020
  75756. else
  75757. pTDefRegMap(@Self)^.&set := $00000020;
  75758. end;
  75759. function TCAN1_C1FIFOCON22.getTXLARB : TBits_1; inline;
  75760. begin
  75761. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  75762. end;
  75763. procedure TCAN1_C1FIFOCON22.setTXABAT; inline;
  75764. begin
  75765. pTDefRegMap(@Self)^.&set := $00000040;
  75766. end;
  75767. procedure TCAN1_C1FIFOCON22.clearTXABAT; inline;
  75768. begin
  75769. pTDefRegMap(@Self)^.clr := $00000040;
  75770. end;
  75771. procedure TCAN1_C1FIFOCON22.setTXABAT(thebits : TBits_1); inline;
  75772. begin
  75773. if thebits = 0 then
  75774. pTDefRegMap(@Self)^.clr := $00000040
  75775. else
  75776. pTDefRegMap(@Self)^.&set := $00000040;
  75777. end;
  75778. function TCAN1_C1FIFOCON22.getTXABAT : TBits_1; inline;
  75779. begin
  75780. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  75781. end;
  75782. procedure TCAN1_C1FIFOCON22.setTXEN; inline;
  75783. begin
  75784. pTDefRegMap(@Self)^.&set := $00000080;
  75785. end;
  75786. procedure TCAN1_C1FIFOCON22.clearTXEN; inline;
  75787. begin
  75788. pTDefRegMap(@Self)^.clr := $00000080;
  75789. end;
  75790. procedure TCAN1_C1FIFOCON22.setTXEN(thebits : TBits_1); inline;
  75791. begin
  75792. if thebits = 0 then
  75793. pTDefRegMap(@Self)^.clr := $00000080
  75794. else
  75795. pTDefRegMap(@Self)^.&set := $00000080;
  75796. end;
  75797. function TCAN1_C1FIFOCON22.getTXEN : TBits_1; inline;
  75798. begin
  75799. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  75800. end;
  75801. procedure TCAN1_C1FIFOCON22.setDONLY; inline;
  75802. begin
  75803. pTDefRegMap(@Self)^.&set := $00001000;
  75804. end;
  75805. procedure TCAN1_C1FIFOCON22.clearDONLY; inline;
  75806. begin
  75807. pTDefRegMap(@Self)^.clr := $00001000;
  75808. end;
  75809. procedure TCAN1_C1FIFOCON22.setDONLY(thebits : TBits_1); inline;
  75810. begin
  75811. if thebits = 0 then
  75812. pTDefRegMap(@Self)^.clr := $00001000
  75813. else
  75814. pTDefRegMap(@Self)^.&set := $00001000;
  75815. end;
  75816. function TCAN1_C1FIFOCON22.getDONLY : TBits_1; inline;
  75817. begin
  75818. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  75819. end;
  75820. procedure TCAN1_C1FIFOCON22.setUINC; inline;
  75821. begin
  75822. pTDefRegMap(@Self)^.&set := $00002000;
  75823. end;
  75824. procedure TCAN1_C1FIFOCON22.clearUINC; inline;
  75825. begin
  75826. pTDefRegMap(@Self)^.clr := $00002000;
  75827. end;
  75828. procedure TCAN1_C1FIFOCON22.setUINC(thebits : TBits_1); inline;
  75829. begin
  75830. if thebits = 0 then
  75831. pTDefRegMap(@Self)^.clr := $00002000
  75832. else
  75833. pTDefRegMap(@Self)^.&set := $00002000;
  75834. end;
  75835. function TCAN1_C1FIFOCON22.getUINC : TBits_1; inline;
  75836. begin
  75837. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  75838. end;
  75839. procedure TCAN1_C1FIFOCON22.setFRESET; inline;
  75840. begin
  75841. pTDefRegMap(@Self)^.&set := $00004000;
  75842. end;
  75843. procedure TCAN1_C1FIFOCON22.clearFRESET; inline;
  75844. begin
  75845. pTDefRegMap(@Self)^.clr := $00004000;
  75846. end;
  75847. procedure TCAN1_C1FIFOCON22.setFRESET(thebits : TBits_1); inline;
  75848. begin
  75849. if thebits = 0 then
  75850. pTDefRegMap(@Self)^.clr := $00004000
  75851. else
  75852. pTDefRegMap(@Self)^.&set := $00004000;
  75853. end;
  75854. function TCAN1_C1FIFOCON22.getFRESET : TBits_1; inline;
  75855. begin
  75856. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  75857. end;
  75858. procedure TCAN1_C1FIFOCON22.setFSIZE(thebits : TBits_5); inline;
  75859. begin
  75860. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  75861. end;
  75862. function TCAN1_C1FIFOCON22.getFSIZE : TBits_5; inline;
  75863. begin
  75864. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  75865. end;
  75866. procedure TCAN1_C1FIFOCON22.setw(thebits : TBits_32); inline;
  75867. begin
  75868. pTDefRegMap(@Self)^.val := thebits;
  75869. end;
  75870. function TCAN1_C1FIFOCON22.getw : TBits_32; inline;
  75871. begin
  75872. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75873. end;
  75874. procedure TCAN1_C1FIFOINT22.setRXNEMPTYIF; inline;
  75875. begin
  75876. pTDefRegMap(@Self)^.&set := $00000001;
  75877. end;
  75878. procedure TCAN1_C1FIFOINT22.clearRXNEMPTYIF; inline;
  75879. begin
  75880. pTDefRegMap(@Self)^.clr := $00000001;
  75881. end;
  75882. procedure TCAN1_C1FIFOINT22.setRXNEMPTYIF(thebits : TBits_1); inline;
  75883. begin
  75884. if thebits = 0 then
  75885. pTDefRegMap(@Self)^.clr := $00000001
  75886. else
  75887. pTDefRegMap(@Self)^.&set := $00000001;
  75888. end;
  75889. function TCAN1_C1FIFOINT22.getRXNEMPTYIF : TBits_1; inline;
  75890. begin
  75891. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  75892. end;
  75893. procedure TCAN1_C1FIFOINT22.setRXHALFIF; inline;
  75894. begin
  75895. pTDefRegMap(@Self)^.&set := $00000002;
  75896. end;
  75897. procedure TCAN1_C1FIFOINT22.clearRXHALFIF; inline;
  75898. begin
  75899. pTDefRegMap(@Self)^.clr := $00000002;
  75900. end;
  75901. procedure TCAN1_C1FIFOINT22.setRXHALFIF(thebits : TBits_1); inline;
  75902. begin
  75903. if thebits = 0 then
  75904. pTDefRegMap(@Self)^.clr := $00000002
  75905. else
  75906. pTDefRegMap(@Self)^.&set := $00000002;
  75907. end;
  75908. function TCAN1_C1FIFOINT22.getRXHALFIF : TBits_1; inline;
  75909. begin
  75910. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  75911. end;
  75912. procedure TCAN1_C1FIFOINT22.setRXFULLIF; inline;
  75913. begin
  75914. pTDefRegMap(@Self)^.&set := $00000004;
  75915. end;
  75916. procedure TCAN1_C1FIFOINT22.clearRXFULLIF; inline;
  75917. begin
  75918. pTDefRegMap(@Self)^.clr := $00000004;
  75919. end;
  75920. procedure TCAN1_C1FIFOINT22.setRXFULLIF(thebits : TBits_1); inline;
  75921. begin
  75922. if thebits = 0 then
  75923. pTDefRegMap(@Self)^.clr := $00000004
  75924. else
  75925. pTDefRegMap(@Self)^.&set := $00000004;
  75926. end;
  75927. function TCAN1_C1FIFOINT22.getRXFULLIF : TBits_1; inline;
  75928. begin
  75929. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  75930. end;
  75931. procedure TCAN1_C1FIFOINT22.setRXOVFLIF; inline;
  75932. begin
  75933. pTDefRegMap(@Self)^.&set := $00000008;
  75934. end;
  75935. procedure TCAN1_C1FIFOINT22.clearRXOVFLIF; inline;
  75936. begin
  75937. pTDefRegMap(@Self)^.clr := $00000008;
  75938. end;
  75939. procedure TCAN1_C1FIFOINT22.setRXOVFLIF(thebits : TBits_1); inline;
  75940. begin
  75941. if thebits = 0 then
  75942. pTDefRegMap(@Self)^.clr := $00000008
  75943. else
  75944. pTDefRegMap(@Self)^.&set := $00000008;
  75945. end;
  75946. function TCAN1_C1FIFOINT22.getRXOVFLIF : TBits_1; inline;
  75947. begin
  75948. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  75949. end;
  75950. procedure TCAN1_C1FIFOINT22.setTXEMPTYIF; inline;
  75951. begin
  75952. pTDefRegMap(@Self)^.&set := $00000100;
  75953. end;
  75954. procedure TCAN1_C1FIFOINT22.clearTXEMPTYIF; inline;
  75955. begin
  75956. pTDefRegMap(@Self)^.clr := $00000100;
  75957. end;
  75958. procedure TCAN1_C1FIFOINT22.setTXEMPTYIF(thebits : TBits_1); inline;
  75959. begin
  75960. if thebits = 0 then
  75961. pTDefRegMap(@Self)^.clr := $00000100
  75962. else
  75963. pTDefRegMap(@Self)^.&set := $00000100;
  75964. end;
  75965. function TCAN1_C1FIFOINT22.getTXEMPTYIF : TBits_1; inline;
  75966. begin
  75967. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  75968. end;
  75969. procedure TCAN1_C1FIFOINT22.setTXHALFIF; inline;
  75970. begin
  75971. pTDefRegMap(@Self)^.&set := $00000200;
  75972. end;
  75973. procedure TCAN1_C1FIFOINT22.clearTXHALFIF; inline;
  75974. begin
  75975. pTDefRegMap(@Self)^.clr := $00000200;
  75976. end;
  75977. procedure TCAN1_C1FIFOINT22.setTXHALFIF(thebits : TBits_1); inline;
  75978. begin
  75979. if thebits = 0 then
  75980. pTDefRegMap(@Self)^.clr := $00000200
  75981. else
  75982. pTDefRegMap(@Self)^.&set := $00000200;
  75983. end;
  75984. function TCAN1_C1FIFOINT22.getTXHALFIF : TBits_1; inline;
  75985. begin
  75986. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  75987. end;
  75988. procedure TCAN1_C1FIFOINT22.setTXNFULLIF; inline;
  75989. begin
  75990. pTDefRegMap(@Self)^.&set := $00000400;
  75991. end;
  75992. procedure TCAN1_C1FIFOINT22.clearTXNFULLIF; inline;
  75993. begin
  75994. pTDefRegMap(@Self)^.clr := $00000400;
  75995. end;
  75996. procedure TCAN1_C1FIFOINT22.setTXNFULLIF(thebits : TBits_1); inline;
  75997. begin
  75998. if thebits = 0 then
  75999. pTDefRegMap(@Self)^.clr := $00000400
  76000. else
  76001. pTDefRegMap(@Self)^.&set := $00000400;
  76002. end;
  76003. function TCAN1_C1FIFOINT22.getTXNFULLIF : TBits_1; inline;
  76004. begin
  76005. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  76006. end;
  76007. procedure TCAN1_C1FIFOINT22.setRXNEMPTYIE; inline;
  76008. begin
  76009. pTDefRegMap(@Self)^.&set := $00010000;
  76010. end;
  76011. procedure TCAN1_C1FIFOINT22.clearRXNEMPTYIE; inline;
  76012. begin
  76013. pTDefRegMap(@Self)^.clr := $00010000;
  76014. end;
  76015. procedure TCAN1_C1FIFOINT22.setRXNEMPTYIE(thebits : TBits_1); inline;
  76016. begin
  76017. if thebits = 0 then
  76018. pTDefRegMap(@Self)^.clr := $00010000
  76019. else
  76020. pTDefRegMap(@Self)^.&set := $00010000;
  76021. end;
  76022. function TCAN1_C1FIFOINT22.getRXNEMPTYIE : TBits_1; inline;
  76023. begin
  76024. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  76025. end;
  76026. procedure TCAN1_C1FIFOINT22.setRXHALFIE; inline;
  76027. begin
  76028. pTDefRegMap(@Self)^.&set := $00020000;
  76029. end;
  76030. procedure TCAN1_C1FIFOINT22.clearRXHALFIE; inline;
  76031. begin
  76032. pTDefRegMap(@Self)^.clr := $00020000;
  76033. end;
  76034. procedure TCAN1_C1FIFOINT22.setRXHALFIE(thebits : TBits_1); inline;
  76035. begin
  76036. if thebits = 0 then
  76037. pTDefRegMap(@Self)^.clr := $00020000
  76038. else
  76039. pTDefRegMap(@Self)^.&set := $00020000;
  76040. end;
  76041. function TCAN1_C1FIFOINT22.getRXHALFIE : TBits_1; inline;
  76042. begin
  76043. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  76044. end;
  76045. procedure TCAN1_C1FIFOINT22.setRXFULLIE; inline;
  76046. begin
  76047. pTDefRegMap(@Self)^.&set := $00040000;
  76048. end;
  76049. procedure TCAN1_C1FIFOINT22.clearRXFULLIE; inline;
  76050. begin
  76051. pTDefRegMap(@Self)^.clr := $00040000;
  76052. end;
  76053. procedure TCAN1_C1FIFOINT22.setRXFULLIE(thebits : TBits_1); inline;
  76054. begin
  76055. if thebits = 0 then
  76056. pTDefRegMap(@Self)^.clr := $00040000
  76057. else
  76058. pTDefRegMap(@Self)^.&set := $00040000;
  76059. end;
  76060. function TCAN1_C1FIFOINT22.getRXFULLIE : TBits_1; inline;
  76061. begin
  76062. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  76063. end;
  76064. procedure TCAN1_C1FIFOINT22.setRXOVFLIE; inline;
  76065. begin
  76066. pTDefRegMap(@Self)^.&set := $00080000;
  76067. end;
  76068. procedure TCAN1_C1FIFOINT22.clearRXOVFLIE; inline;
  76069. begin
  76070. pTDefRegMap(@Self)^.clr := $00080000;
  76071. end;
  76072. procedure TCAN1_C1FIFOINT22.setRXOVFLIE(thebits : TBits_1); inline;
  76073. begin
  76074. if thebits = 0 then
  76075. pTDefRegMap(@Self)^.clr := $00080000
  76076. else
  76077. pTDefRegMap(@Self)^.&set := $00080000;
  76078. end;
  76079. function TCAN1_C1FIFOINT22.getRXOVFLIE : TBits_1; inline;
  76080. begin
  76081. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  76082. end;
  76083. procedure TCAN1_C1FIFOINT22.setTXEMPTYIE; inline;
  76084. begin
  76085. pTDefRegMap(@Self)^.&set := $01000000;
  76086. end;
  76087. procedure TCAN1_C1FIFOINT22.clearTXEMPTYIE; inline;
  76088. begin
  76089. pTDefRegMap(@Self)^.clr := $01000000;
  76090. end;
  76091. procedure TCAN1_C1FIFOINT22.setTXEMPTYIE(thebits : TBits_1); inline;
  76092. begin
  76093. if thebits = 0 then
  76094. pTDefRegMap(@Self)^.clr := $01000000
  76095. else
  76096. pTDefRegMap(@Self)^.&set := $01000000;
  76097. end;
  76098. function TCAN1_C1FIFOINT22.getTXEMPTYIE : TBits_1; inline;
  76099. begin
  76100. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  76101. end;
  76102. procedure TCAN1_C1FIFOINT22.setTXHALFIE; inline;
  76103. begin
  76104. pTDefRegMap(@Self)^.&set := $02000000;
  76105. end;
  76106. procedure TCAN1_C1FIFOINT22.clearTXHALFIE; inline;
  76107. begin
  76108. pTDefRegMap(@Self)^.clr := $02000000;
  76109. end;
  76110. procedure TCAN1_C1FIFOINT22.setTXHALFIE(thebits : TBits_1); inline;
  76111. begin
  76112. if thebits = 0 then
  76113. pTDefRegMap(@Self)^.clr := $02000000
  76114. else
  76115. pTDefRegMap(@Self)^.&set := $02000000;
  76116. end;
  76117. function TCAN1_C1FIFOINT22.getTXHALFIE : TBits_1; inline;
  76118. begin
  76119. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  76120. end;
  76121. procedure TCAN1_C1FIFOINT22.setTXNFULLIE; inline;
  76122. begin
  76123. pTDefRegMap(@Self)^.&set := $04000000;
  76124. end;
  76125. procedure TCAN1_C1FIFOINT22.clearTXNFULLIE; inline;
  76126. begin
  76127. pTDefRegMap(@Self)^.clr := $04000000;
  76128. end;
  76129. procedure TCAN1_C1FIFOINT22.setTXNFULLIE(thebits : TBits_1); inline;
  76130. begin
  76131. if thebits = 0 then
  76132. pTDefRegMap(@Self)^.clr := $04000000
  76133. else
  76134. pTDefRegMap(@Self)^.&set := $04000000;
  76135. end;
  76136. function TCAN1_C1FIFOINT22.getTXNFULLIE : TBits_1; inline;
  76137. begin
  76138. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  76139. end;
  76140. procedure TCAN1_C1FIFOINT22.setw(thebits : TBits_32); inline;
  76141. begin
  76142. pTDefRegMap(@Self)^.val := thebits;
  76143. end;
  76144. function TCAN1_C1FIFOINT22.getw : TBits_32; inline;
  76145. begin
  76146. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  76147. end;
  76148. procedure TCAN1_C1FIFOCI22.setCFIFOCI(thebits : TBits_5); inline;
  76149. begin
  76150. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  76151. end;
  76152. function TCAN1_C1FIFOCI22.getCFIFOCI : TBits_5; inline;
  76153. begin
  76154. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  76155. end;
  76156. procedure TCAN1_C1FIFOCI22.setw(thebits : TBits_32); inline;
  76157. begin
  76158. pTDefRegMap(@Self)^.val := thebits;
  76159. end;
  76160. function TCAN1_C1FIFOCI22.getw : TBits_32; inline;
  76161. begin
  76162. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  76163. end;
  76164. procedure TCAN1_C1FIFOCON23.setTXPRI(thebits : TBits_2); inline;
  76165. begin
  76166. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  76167. end;
  76168. function TCAN1_C1FIFOCON23.getTXPRI : TBits_2; inline;
  76169. begin
  76170. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  76171. end;
  76172. procedure TCAN1_C1FIFOCON23.setRTREN; inline;
  76173. begin
  76174. pTDefRegMap(@Self)^.&set := $00000004;
  76175. end;
  76176. procedure TCAN1_C1FIFOCON23.clearRTREN; inline;
  76177. begin
  76178. pTDefRegMap(@Self)^.clr := $00000004;
  76179. end;
  76180. procedure TCAN1_C1FIFOCON23.setRTREN(thebits : TBits_1); inline;
  76181. begin
  76182. if thebits = 0 then
  76183. pTDefRegMap(@Self)^.clr := $00000004
  76184. else
  76185. pTDefRegMap(@Self)^.&set := $00000004;
  76186. end;
  76187. function TCAN1_C1FIFOCON23.getRTREN : TBits_1; inline;
  76188. begin
  76189. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  76190. end;
  76191. procedure TCAN1_C1FIFOCON23.setTXREQ; inline;
  76192. begin
  76193. pTDefRegMap(@Self)^.&set := $00000008;
  76194. end;
  76195. procedure TCAN1_C1FIFOCON23.clearTXREQ; inline;
  76196. begin
  76197. pTDefRegMap(@Self)^.clr := $00000008;
  76198. end;
  76199. procedure TCAN1_C1FIFOCON23.setTXREQ(thebits : TBits_1); inline;
  76200. begin
  76201. if thebits = 0 then
  76202. pTDefRegMap(@Self)^.clr := $00000008
  76203. else
  76204. pTDefRegMap(@Self)^.&set := $00000008;
  76205. end;
  76206. function TCAN1_C1FIFOCON23.getTXREQ : TBits_1; inline;
  76207. begin
  76208. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  76209. end;
  76210. procedure TCAN1_C1FIFOCON23.setTXERR; inline;
  76211. begin
  76212. pTDefRegMap(@Self)^.&set := $00000010;
  76213. end;
  76214. procedure TCAN1_C1FIFOCON23.clearTXERR; inline;
  76215. begin
  76216. pTDefRegMap(@Self)^.clr := $00000010;
  76217. end;
  76218. procedure TCAN1_C1FIFOCON23.setTXERR(thebits : TBits_1); inline;
  76219. begin
  76220. if thebits = 0 then
  76221. pTDefRegMap(@Self)^.clr := $00000010
  76222. else
  76223. pTDefRegMap(@Self)^.&set := $00000010;
  76224. end;
  76225. function TCAN1_C1FIFOCON23.getTXERR : TBits_1; inline;
  76226. begin
  76227. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  76228. end;
  76229. procedure TCAN1_C1FIFOCON23.setTXLARB; inline;
  76230. begin
  76231. pTDefRegMap(@Self)^.&set := $00000020;
  76232. end;
  76233. procedure TCAN1_C1FIFOCON23.clearTXLARB; inline;
  76234. begin
  76235. pTDefRegMap(@Self)^.clr := $00000020;
  76236. end;
  76237. procedure TCAN1_C1FIFOCON23.setTXLARB(thebits : TBits_1); inline;
  76238. begin
  76239. if thebits = 0 then
  76240. pTDefRegMap(@Self)^.clr := $00000020
  76241. else
  76242. pTDefRegMap(@Self)^.&set := $00000020;
  76243. end;
  76244. function TCAN1_C1FIFOCON23.getTXLARB : TBits_1; inline;
  76245. begin
  76246. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  76247. end;
  76248. procedure TCAN1_C1FIFOCON23.setTXABAT; inline;
  76249. begin
  76250. pTDefRegMap(@Self)^.&set := $00000040;
  76251. end;
  76252. procedure TCAN1_C1FIFOCON23.clearTXABAT; inline;
  76253. begin
  76254. pTDefRegMap(@Self)^.clr := $00000040;
  76255. end;
  76256. procedure TCAN1_C1FIFOCON23.setTXABAT(thebits : TBits_1); inline;
  76257. begin
  76258. if thebits = 0 then
  76259. pTDefRegMap(@Self)^.clr := $00000040
  76260. else
  76261. pTDefRegMap(@Self)^.&set := $00000040;
  76262. end;
  76263. function TCAN1_C1FIFOCON23.getTXABAT : TBits_1; inline;
  76264. begin
  76265. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  76266. end;
  76267. procedure TCAN1_C1FIFOCON23.setTXEN; inline;
  76268. begin
  76269. pTDefRegMap(@Self)^.&set := $00000080;
  76270. end;
  76271. procedure TCAN1_C1FIFOCON23.clearTXEN; inline;
  76272. begin
  76273. pTDefRegMap(@Self)^.clr := $00000080;
  76274. end;
  76275. procedure TCAN1_C1FIFOCON23.setTXEN(thebits : TBits_1); inline;
  76276. begin
  76277. if thebits = 0 then
  76278. pTDefRegMap(@Self)^.clr := $00000080
  76279. else
  76280. pTDefRegMap(@Self)^.&set := $00000080;
  76281. end;
  76282. function TCAN1_C1FIFOCON23.getTXEN : TBits_1; inline;
  76283. begin
  76284. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  76285. end;
  76286. procedure TCAN1_C1FIFOCON23.setDONLY; inline;
  76287. begin
  76288. pTDefRegMap(@Self)^.&set := $00001000;
  76289. end;
  76290. procedure TCAN1_C1FIFOCON23.clearDONLY; inline;
  76291. begin
  76292. pTDefRegMap(@Self)^.clr := $00001000;
  76293. end;
  76294. procedure TCAN1_C1FIFOCON23.setDONLY(thebits : TBits_1); inline;
  76295. begin
  76296. if thebits = 0 then
  76297. pTDefRegMap(@Self)^.clr := $00001000
  76298. else
  76299. pTDefRegMap(@Self)^.&set := $00001000;
  76300. end;
  76301. function TCAN1_C1FIFOCON23.getDONLY : TBits_1; inline;
  76302. begin
  76303. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  76304. end;
  76305. procedure TCAN1_C1FIFOCON23.setUINC; inline;
  76306. begin
  76307. pTDefRegMap(@Self)^.&set := $00002000;
  76308. end;
  76309. procedure TCAN1_C1FIFOCON23.clearUINC; inline;
  76310. begin
  76311. pTDefRegMap(@Self)^.clr := $00002000;
  76312. end;
  76313. procedure TCAN1_C1FIFOCON23.setUINC(thebits : TBits_1); inline;
  76314. begin
  76315. if thebits = 0 then
  76316. pTDefRegMap(@Self)^.clr := $00002000
  76317. else
  76318. pTDefRegMap(@Self)^.&set := $00002000;
  76319. end;
  76320. function TCAN1_C1FIFOCON23.getUINC : TBits_1; inline;
  76321. begin
  76322. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  76323. end;
  76324. procedure TCAN1_C1FIFOCON23.setFRESET; inline;
  76325. begin
  76326. pTDefRegMap(@Self)^.&set := $00004000;
  76327. end;
  76328. procedure TCAN1_C1FIFOCON23.clearFRESET; inline;
  76329. begin
  76330. pTDefRegMap(@Self)^.clr := $00004000;
  76331. end;
  76332. procedure TCAN1_C1FIFOCON23.setFRESET(thebits : TBits_1); inline;
  76333. begin
  76334. if thebits = 0 then
  76335. pTDefRegMap(@Self)^.clr := $00004000
  76336. else
  76337. pTDefRegMap(@Self)^.&set := $00004000;
  76338. end;
  76339. function TCAN1_C1FIFOCON23.getFRESET : TBits_1; inline;
  76340. begin
  76341. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  76342. end;
  76343. procedure TCAN1_C1FIFOCON23.setFSIZE(thebits : TBits_5); inline;
  76344. begin
  76345. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  76346. end;
  76347. function TCAN1_C1FIFOCON23.getFSIZE : TBits_5; inline;
  76348. begin
  76349. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  76350. end;
  76351. procedure TCAN1_C1FIFOCON23.setw(thebits : TBits_32); inline;
  76352. begin
  76353. pTDefRegMap(@Self)^.val := thebits;
  76354. end;
  76355. function TCAN1_C1FIFOCON23.getw : TBits_32; inline;
  76356. begin
  76357. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  76358. end;
  76359. procedure TCAN1_C1FIFOINT23.setRXNEMPTYIF; inline;
  76360. begin
  76361. pTDefRegMap(@Self)^.&set := $00000001;
  76362. end;
  76363. procedure TCAN1_C1FIFOINT23.clearRXNEMPTYIF; inline;
  76364. begin
  76365. pTDefRegMap(@Self)^.clr := $00000001;
  76366. end;
  76367. procedure TCAN1_C1FIFOINT23.setRXNEMPTYIF(thebits : TBits_1); inline;
  76368. begin
  76369. if thebits = 0 then
  76370. pTDefRegMap(@Self)^.clr := $00000001
  76371. else
  76372. pTDefRegMap(@Self)^.&set := $00000001;
  76373. end;
  76374. function TCAN1_C1FIFOINT23.getRXNEMPTYIF : TBits_1; inline;
  76375. begin
  76376. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  76377. end;
  76378. procedure TCAN1_C1FIFOINT23.setRXHALFIF; inline;
  76379. begin
  76380. pTDefRegMap(@Self)^.&set := $00000002;
  76381. end;
  76382. procedure TCAN1_C1FIFOINT23.clearRXHALFIF; inline;
  76383. begin
  76384. pTDefRegMap(@Self)^.clr := $00000002;
  76385. end;
  76386. procedure TCAN1_C1FIFOINT23.setRXHALFIF(thebits : TBits_1); inline;
  76387. begin
  76388. if thebits = 0 then
  76389. pTDefRegMap(@Self)^.clr := $00000002
  76390. else
  76391. pTDefRegMap(@Self)^.&set := $00000002;
  76392. end;
  76393. function TCAN1_C1FIFOINT23.getRXHALFIF : TBits_1; inline;
  76394. begin
  76395. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  76396. end;
  76397. procedure TCAN1_C1FIFOINT23.setRXFULLIF; inline;
  76398. begin
  76399. pTDefRegMap(@Self)^.&set := $00000004;
  76400. end;
  76401. procedure TCAN1_C1FIFOINT23.clearRXFULLIF; inline;
  76402. begin
  76403. pTDefRegMap(@Self)^.clr := $00000004;
  76404. end;
  76405. procedure TCAN1_C1FIFOINT23.setRXFULLIF(thebits : TBits_1); inline;
  76406. begin
  76407. if thebits = 0 then
  76408. pTDefRegMap(@Self)^.clr := $00000004
  76409. else
  76410. pTDefRegMap(@Self)^.&set := $00000004;
  76411. end;
  76412. function TCAN1_C1FIFOINT23.getRXFULLIF : TBits_1; inline;
  76413. begin
  76414. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  76415. end;
  76416. procedure TCAN1_C1FIFOINT23.setRXOVFLIF; inline;
  76417. begin
  76418. pTDefRegMap(@Self)^.&set := $00000008;
  76419. end;
  76420. procedure TCAN1_C1FIFOINT23.clearRXOVFLIF; inline;
  76421. begin
  76422. pTDefRegMap(@Self)^.clr := $00000008;
  76423. end;
  76424. procedure TCAN1_C1FIFOINT23.setRXOVFLIF(thebits : TBits_1); inline;
  76425. begin
  76426. if thebits = 0 then
  76427. pTDefRegMap(@Self)^.clr := $00000008
  76428. else
  76429. pTDefRegMap(@Self)^.&set := $00000008;
  76430. end;
  76431. function TCAN1_C1FIFOINT23.getRXOVFLIF : TBits_1; inline;
  76432. begin
  76433. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  76434. end;
  76435. procedure TCAN1_C1FIFOINT23.setTXEMPTYIF; inline;
  76436. begin
  76437. pTDefRegMap(@Self)^.&set := $00000100;
  76438. end;
  76439. procedure TCAN1_C1FIFOINT23.clearTXEMPTYIF; inline;
  76440. begin
  76441. pTDefRegMap(@Self)^.clr := $00000100;
  76442. end;
  76443. procedure TCAN1_C1FIFOINT23.setTXEMPTYIF(thebits : TBits_1); inline;
  76444. begin
  76445. if thebits = 0 then
  76446. pTDefRegMap(@Self)^.clr := $00000100
  76447. else
  76448. pTDefRegMap(@Self)^.&set := $00000100;
  76449. end;
  76450. function TCAN1_C1FIFOINT23.getTXEMPTYIF : TBits_1; inline;
  76451. begin
  76452. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  76453. end;
  76454. procedure TCAN1_C1FIFOINT23.setTXHALFIF; inline;
  76455. begin
  76456. pTDefRegMap(@Self)^.&set := $00000200;
  76457. end;
  76458. procedure TCAN1_C1FIFOINT23.clearTXHALFIF; inline;
  76459. begin
  76460. pTDefRegMap(@Self)^.clr := $00000200;
  76461. end;
  76462. procedure TCAN1_C1FIFOINT23.setTXHALFIF(thebits : TBits_1); inline;
  76463. begin
  76464. if thebits = 0 then
  76465. pTDefRegMap(@Self)^.clr := $00000200
  76466. else
  76467. pTDefRegMap(@Self)^.&set := $00000200;
  76468. end;
  76469. function TCAN1_C1FIFOINT23.getTXHALFIF : TBits_1; inline;
  76470. begin
  76471. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  76472. end;
  76473. procedure TCAN1_C1FIFOINT23.setTXNFULLIF; inline;
  76474. begin
  76475. pTDefRegMap(@Self)^.&set := $00000400;
  76476. end;
  76477. procedure TCAN1_C1FIFOINT23.clearTXNFULLIF; inline;
  76478. begin
  76479. pTDefRegMap(@Self)^.clr := $00000400;
  76480. end;
  76481. procedure TCAN1_C1FIFOINT23.setTXNFULLIF(thebits : TBits_1); inline;
  76482. begin
  76483. if thebits = 0 then
  76484. pTDefRegMap(@Self)^.clr := $00000400
  76485. else
  76486. pTDefRegMap(@Self)^.&set := $00000400;
  76487. end;
  76488. function TCAN1_C1FIFOINT23.getTXNFULLIF : TBits_1; inline;
  76489. begin
  76490. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  76491. end;
  76492. procedure TCAN1_C1FIFOINT23.setRXNEMPTYIE; inline;
  76493. begin
  76494. pTDefRegMap(@Self)^.&set := $00010000;
  76495. end;
  76496. procedure TCAN1_C1FIFOINT23.clearRXNEMPTYIE; inline;
  76497. begin
  76498. pTDefRegMap(@Self)^.clr := $00010000;
  76499. end;
  76500. procedure TCAN1_C1FIFOINT23.setRXNEMPTYIE(thebits : TBits_1); inline;
  76501. begin
  76502. if thebits = 0 then
  76503. pTDefRegMap(@Self)^.clr := $00010000
  76504. else
  76505. pTDefRegMap(@Self)^.&set := $00010000;
  76506. end;
  76507. function TCAN1_C1FIFOINT23.getRXNEMPTYIE : TBits_1; inline;
  76508. begin
  76509. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  76510. end;
  76511. procedure TCAN1_C1FIFOINT23.setRXHALFIE; inline;
  76512. begin
  76513. pTDefRegMap(@Self)^.&set := $00020000;
  76514. end;
  76515. procedure TCAN1_C1FIFOINT23.clearRXHALFIE; inline;
  76516. begin
  76517. pTDefRegMap(@Self)^.clr := $00020000;
  76518. end;
  76519. procedure TCAN1_C1FIFOINT23.setRXHALFIE(thebits : TBits_1); inline;
  76520. begin
  76521. if thebits = 0 then
  76522. pTDefRegMap(@Self)^.clr := $00020000
  76523. else
  76524. pTDefRegMap(@Self)^.&set := $00020000;
  76525. end;
  76526. function TCAN1_C1FIFOINT23.getRXHALFIE : TBits_1; inline;
  76527. begin
  76528. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  76529. end;
  76530. procedure TCAN1_C1FIFOINT23.setRXFULLIE; inline;
  76531. begin
  76532. pTDefRegMap(@Self)^.&set := $00040000;
  76533. end;
  76534. procedure TCAN1_C1FIFOINT23.clearRXFULLIE; inline;
  76535. begin
  76536. pTDefRegMap(@Self)^.clr := $00040000;
  76537. end;
  76538. procedure TCAN1_C1FIFOINT23.setRXFULLIE(thebits : TBits_1); inline;
  76539. begin
  76540. if thebits = 0 then
  76541. pTDefRegMap(@Self)^.clr := $00040000
  76542. else
  76543. pTDefRegMap(@Self)^.&set := $00040000;
  76544. end;
  76545. function TCAN1_C1FIFOINT23.getRXFULLIE : TBits_1; inline;
  76546. begin
  76547. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  76548. end;
  76549. procedure TCAN1_C1FIFOINT23.setRXOVFLIE; inline;
  76550. begin
  76551. pTDefRegMap(@Self)^.&set := $00080000;
  76552. end;
  76553. procedure TCAN1_C1FIFOINT23.clearRXOVFLIE; inline;
  76554. begin
  76555. pTDefRegMap(@Self)^.clr := $00080000;
  76556. end;
  76557. procedure TCAN1_C1FIFOINT23.setRXOVFLIE(thebits : TBits_1); inline;
  76558. begin
  76559. if thebits = 0 then
  76560. pTDefRegMap(@Self)^.clr := $00080000
  76561. else
  76562. pTDefRegMap(@Self)^.&set := $00080000;
  76563. end;
  76564. function TCAN1_C1FIFOINT23.getRXOVFLIE : TBits_1; inline;
  76565. begin
  76566. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  76567. end;
  76568. procedure TCAN1_C1FIFOINT23.setTXEMPTYIE; inline;
  76569. begin
  76570. pTDefRegMap(@Self)^.&set := $01000000;
  76571. end;
  76572. procedure TCAN1_C1FIFOINT23.clearTXEMPTYIE; inline;
  76573. begin
  76574. pTDefRegMap(@Self)^.clr := $01000000;
  76575. end;
  76576. procedure TCAN1_C1FIFOINT23.setTXEMPTYIE(thebits : TBits_1); inline;
  76577. begin
  76578. if thebits = 0 then
  76579. pTDefRegMap(@Self)^.clr := $01000000
  76580. else
  76581. pTDefRegMap(@Self)^.&set := $01000000;
  76582. end;
  76583. function TCAN1_C1FIFOINT23.getTXEMPTYIE : TBits_1; inline;
  76584. begin
  76585. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  76586. end;
  76587. procedure TCAN1_C1FIFOINT23.setTXHALFIE; inline;
  76588. begin
  76589. pTDefRegMap(@Self)^.&set := $02000000;
  76590. end;
  76591. procedure TCAN1_C1FIFOINT23.clearTXHALFIE; inline;
  76592. begin
  76593. pTDefRegMap(@Self)^.clr := $02000000;
  76594. end;
  76595. procedure TCAN1_C1FIFOINT23.setTXHALFIE(thebits : TBits_1); inline;
  76596. begin
  76597. if thebits = 0 then
  76598. pTDefRegMap(@Self)^.clr := $02000000
  76599. else
  76600. pTDefRegMap(@Self)^.&set := $02000000;
  76601. end;
  76602. function TCAN1_C1FIFOINT23.getTXHALFIE : TBits_1; inline;
  76603. begin
  76604. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  76605. end;
  76606. procedure TCAN1_C1FIFOINT23.setTXNFULLIE; inline;
  76607. begin
  76608. pTDefRegMap(@Self)^.&set := $04000000;
  76609. end;
  76610. procedure TCAN1_C1FIFOINT23.clearTXNFULLIE; inline;
  76611. begin
  76612. pTDefRegMap(@Self)^.clr := $04000000;
  76613. end;
  76614. procedure TCAN1_C1FIFOINT23.setTXNFULLIE(thebits : TBits_1); inline;
  76615. begin
  76616. if thebits = 0 then
  76617. pTDefRegMap(@Self)^.clr := $04000000
  76618. else
  76619. pTDefRegMap(@Self)^.&set := $04000000;
  76620. end;
  76621. function TCAN1_C1FIFOINT23.getTXNFULLIE : TBits_1; inline;
  76622. begin
  76623. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  76624. end;
  76625. procedure TCAN1_C1FIFOINT23.setw(thebits : TBits_32); inline;
  76626. begin
  76627. pTDefRegMap(@Self)^.val := thebits;
  76628. end;
  76629. function TCAN1_C1FIFOINT23.getw : TBits_32; inline;
  76630. begin
  76631. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  76632. end;
  76633. procedure TCAN1_C1FIFOCI23.setCFIFOCI(thebits : TBits_5); inline;
  76634. begin
  76635. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  76636. end;
  76637. function TCAN1_C1FIFOCI23.getCFIFOCI : TBits_5; inline;
  76638. begin
  76639. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  76640. end;
  76641. procedure TCAN1_C1FIFOCI23.setw(thebits : TBits_32); inline;
  76642. begin
  76643. pTDefRegMap(@Self)^.val := thebits;
  76644. end;
  76645. function TCAN1_C1FIFOCI23.getw : TBits_32; inline;
  76646. begin
  76647. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  76648. end;
  76649. procedure TCAN1_C1FIFOCON24.setTXPRI(thebits : TBits_2); inline;
  76650. begin
  76651. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  76652. end;
  76653. function TCAN1_C1FIFOCON24.getTXPRI : TBits_2; inline;
  76654. begin
  76655. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  76656. end;
  76657. procedure TCAN1_C1FIFOCON24.setRTREN; inline;
  76658. begin
  76659. pTDefRegMap(@Self)^.&set := $00000004;
  76660. end;
  76661. procedure TCAN1_C1FIFOCON24.clearRTREN; inline;
  76662. begin
  76663. pTDefRegMap(@Self)^.clr := $00000004;
  76664. end;
  76665. procedure TCAN1_C1FIFOCON24.setRTREN(thebits : TBits_1); inline;
  76666. begin
  76667. if thebits = 0 then
  76668. pTDefRegMap(@Self)^.clr := $00000004
  76669. else
  76670. pTDefRegMap(@Self)^.&set := $00000004;
  76671. end;
  76672. function TCAN1_C1FIFOCON24.getRTREN : TBits_1; inline;
  76673. begin
  76674. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  76675. end;
  76676. procedure TCAN1_C1FIFOCON24.setTXREQ; inline;
  76677. begin
  76678. pTDefRegMap(@Self)^.&set := $00000008;
  76679. end;
  76680. procedure TCAN1_C1FIFOCON24.clearTXREQ; inline;
  76681. begin
  76682. pTDefRegMap(@Self)^.clr := $00000008;
  76683. end;
  76684. procedure TCAN1_C1FIFOCON24.setTXREQ(thebits : TBits_1); inline;
  76685. begin
  76686. if thebits = 0 then
  76687. pTDefRegMap(@Self)^.clr := $00000008
  76688. else
  76689. pTDefRegMap(@Self)^.&set := $00000008;
  76690. end;
  76691. function TCAN1_C1FIFOCON24.getTXREQ : TBits_1; inline;
  76692. begin
  76693. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  76694. end;
  76695. procedure TCAN1_C1FIFOCON24.setTXERR; inline;
  76696. begin
  76697. pTDefRegMap(@Self)^.&set := $00000010;
  76698. end;
  76699. procedure TCAN1_C1FIFOCON24.clearTXERR; inline;
  76700. begin
  76701. pTDefRegMap(@Self)^.clr := $00000010;
  76702. end;
  76703. procedure TCAN1_C1FIFOCON24.setTXERR(thebits : TBits_1); inline;
  76704. begin
  76705. if thebits = 0 then
  76706. pTDefRegMap(@Self)^.clr := $00000010
  76707. else
  76708. pTDefRegMap(@Self)^.&set := $00000010;
  76709. end;
  76710. function TCAN1_C1FIFOCON24.getTXERR : TBits_1; inline;
  76711. begin
  76712. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  76713. end;
  76714. procedure TCAN1_C1FIFOCON24.setTXLARB; inline;
  76715. begin
  76716. pTDefRegMap(@Self)^.&set := $00000020;
  76717. end;
  76718. procedure TCAN1_C1FIFOCON24.clearTXLARB; inline;
  76719. begin
  76720. pTDefRegMap(@Self)^.clr := $00000020;
  76721. end;
  76722. procedure TCAN1_C1FIFOCON24.setTXLARB(thebits : TBits_1); inline;
  76723. begin
  76724. if thebits = 0 then
  76725. pTDefRegMap(@Self)^.clr := $00000020
  76726. else
  76727. pTDefRegMap(@Self)^.&set := $00000020;
  76728. end;
  76729. function TCAN1_C1FIFOCON24.getTXLARB : TBits_1; inline;
  76730. begin
  76731. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  76732. end;
  76733. procedure TCAN1_C1FIFOCON24.setTXABAT; inline;
  76734. begin
  76735. pTDefRegMap(@Self)^.&set := $00000040;
  76736. end;
  76737. procedure TCAN1_C1FIFOCON24.clearTXABAT; inline;
  76738. begin
  76739. pTDefRegMap(@Self)^.clr := $00000040;
  76740. end;
  76741. procedure TCAN1_C1FIFOCON24.setTXABAT(thebits : TBits_1); inline;
  76742. begin
  76743. if thebits = 0 then
  76744. pTDefRegMap(@Self)^.clr := $00000040
  76745. else
  76746. pTDefRegMap(@Self)^.&set := $00000040;
  76747. end;
  76748. function TCAN1_C1FIFOCON24.getTXABAT : TBits_1; inline;
  76749. begin
  76750. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  76751. end;
  76752. procedure TCAN1_C1FIFOCON24.setTXEN; inline;
  76753. begin
  76754. pTDefRegMap(@Self)^.&set := $00000080;
  76755. end;
  76756. procedure TCAN1_C1FIFOCON24.clearTXEN; inline;
  76757. begin
  76758. pTDefRegMap(@Self)^.clr := $00000080;
  76759. end;
  76760. procedure TCAN1_C1FIFOCON24.setTXEN(thebits : TBits_1); inline;
  76761. begin
  76762. if thebits = 0 then
  76763. pTDefRegMap(@Self)^.clr := $00000080
  76764. else
  76765. pTDefRegMap(@Self)^.&set := $00000080;
  76766. end;
  76767. function TCAN1_C1FIFOCON24.getTXEN : TBits_1; inline;
  76768. begin
  76769. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  76770. end;
  76771. procedure TCAN1_C1FIFOCON24.setDONLY; inline;
  76772. begin
  76773. pTDefRegMap(@Self)^.&set := $00001000;
  76774. end;
  76775. procedure TCAN1_C1FIFOCON24.clearDONLY; inline;
  76776. begin
  76777. pTDefRegMap(@Self)^.clr := $00001000;
  76778. end;
  76779. procedure TCAN1_C1FIFOCON24.setDONLY(thebits : TBits_1); inline;
  76780. begin
  76781. if thebits = 0 then
  76782. pTDefRegMap(@Self)^.clr := $00001000
  76783. else
  76784. pTDefRegMap(@Self)^.&set := $00001000;
  76785. end;
  76786. function TCAN1_C1FIFOCON24.getDONLY : TBits_1; inline;
  76787. begin
  76788. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  76789. end;
  76790. procedure TCAN1_C1FIFOCON24.setUINC; inline;
  76791. begin
  76792. pTDefRegMap(@Self)^.&set := $00002000;
  76793. end;
  76794. procedure TCAN1_C1FIFOCON24.clearUINC; inline;
  76795. begin
  76796. pTDefRegMap(@Self)^.clr := $00002000;
  76797. end;
  76798. procedure TCAN1_C1FIFOCON24.setUINC(thebits : TBits_1); inline;
  76799. begin
  76800. if thebits = 0 then
  76801. pTDefRegMap(@Self)^.clr := $00002000
  76802. else
  76803. pTDefRegMap(@Self)^.&set := $00002000;
  76804. end;
  76805. function TCAN1_C1FIFOCON24.getUINC : TBits_1; inline;
  76806. begin
  76807. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  76808. end;
  76809. procedure TCAN1_C1FIFOCON24.setFRESET; inline;
  76810. begin
  76811. pTDefRegMap(@Self)^.&set := $00004000;
  76812. end;
  76813. procedure TCAN1_C1FIFOCON24.clearFRESET; inline;
  76814. begin
  76815. pTDefRegMap(@Self)^.clr := $00004000;
  76816. end;
  76817. procedure TCAN1_C1FIFOCON24.setFRESET(thebits : TBits_1); inline;
  76818. begin
  76819. if thebits = 0 then
  76820. pTDefRegMap(@Self)^.clr := $00004000
  76821. else
  76822. pTDefRegMap(@Self)^.&set := $00004000;
  76823. end;
  76824. function TCAN1_C1FIFOCON24.getFRESET : TBits_1; inline;
  76825. begin
  76826. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  76827. end;
  76828. procedure TCAN1_C1FIFOCON24.setFSIZE(thebits : TBits_5); inline;
  76829. begin
  76830. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  76831. end;
  76832. function TCAN1_C1FIFOCON24.getFSIZE : TBits_5; inline;
  76833. begin
  76834. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  76835. end;
  76836. procedure TCAN1_C1FIFOCON24.setw(thebits : TBits_32); inline;
  76837. begin
  76838. pTDefRegMap(@Self)^.val := thebits;
  76839. end;
  76840. function TCAN1_C1FIFOCON24.getw : TBits_32; inline;
  76841. begin
  76842. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  76843. end;
  76844. procedure TCAN1_C1FIFOINT24.setRXNEMPTYIF; inline;
  76845. begin
  76846. pTDefRegMap(@Self)^.&set := $00000001;
  76847. end;
  76848. procedure TCAN1_C1FIFOINT24.clearRXNEMPTYIF; inline;
  76849. begin
  76850. pTDefRegMap(@Self)^.clr := $00000001;
  76851. end;
  76852. procedure TCAN1_C1FIFOINT24.setRXNEMPTYIF(thebits : TBits_1); inline;
  76853. begin
  76854. if thebits = 0 then
  76855. pTDefRegMap(@Self)^.clr := $00000001
  76856. else
  76857. pTDefRegMap(@Self)^.&set := $00000001;
  76858. end;
  76859. function TCAN1_C1FIFOINT24.getRXNEMPTYIF : TBits_1; inline;
  76860. begin
  76861. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  76862. end;
  76863. procedure TCAN1_C1FIFOINT24.setRXHALFIF; inline;
  76864. begin
  76865. pTDefRegMap(@Self)^.&set := $00000002;
  76866. end;
  76867. procedure TCAN1_C1FIFOINT24.clearRXHALFIF; inline;
  76868. begin
  76869. pTDefRegMap(@Self)^.clr := $00000002;
  76870. end;
  76871. procedure TCAN1_C1FIFOINT24.setRXHALFIF(thebits : TBits_1); inline;
  76872. begin
  76873. if thebits = 0 then
  76874. pTDefRegMap(@Self)^.clr := $00000002
  76875. else
  76876. pTDefRegMap(@Self)^.&set := $00000002;
  76877. end;
  76878. function TCAN1_C1FIFOINT24.getRXHALFIF : TBits_1; inline;
  76879. begin
  76880. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  76881. end;
  76882. procedure TCAN1_C1FIFOINT24.setRXFULLIF; inline;
  76883. begin
  76884. pTDefRegMap(@Self)^.&set := $00000004;
  76885. end;
  76886. procedure TCAN1_C1FIFOINT24.clearRXFULLIF; inline;
  76887. begin
  76888. pTDefRegMap(@Self)^.clr := $00000004;
  76889. end;
  76890. procedure TCAN1_C1FIFOINT24.setRXFULLIF(thebits : TBits_1); inline;
  76891. begin
  76892. if thebits = 0 then
  76893. pTDefRegMap(@Self)^.clr := $00000004
  76894. else
  76895. pTDefRegMap(@Self)^.&set := $00000004;
  76896. end;
  76897. function TCAN1_C1FIFOINT24.getRXFULLIF : TBits_1; inline;
  76898. begin
  76899. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  76900. end;
  76901. procedure TCAN1_C1FIFOINT24.setRXOVFLIF; inline;
  76902. begin
  76903. pTDefRegMap(@Self)^.&set := $00000008;
  76904. end;
  76905. procedure TCAN1_C1FIFOINT24.clearRXOVFLIF; inline;
  76906. begin
  76907. pTDefRegMap(@Self)^.clr := $00000008;
  76908. end;
  76909. procedure TCAN1_C1FIFOINT24.setRXOVFLIF(thebits : TBits_1); inline;
  76910. begin
  76911. if thebits = 0 then
  76912. pTDefRegMap(@Self)^.clr := $00000008
  76913. else
  76914. pTDefRegMap(@Self)^.&set := $00000008;
  76915. end;
  76916. function TCAN1_C1FIFOINT24.getRXOVFLIF : TBits_1; inline;
  76917. begin
  76918. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  76919. end;
  76920. procedure TCAN1_C1FIFOINT24.setTXEMPTYIF; inline;
  76921. begin
  76922. pTDefRegMap(@Self)^.&set := $00000100;
  76923. end;
  76924. procedure TCAN1_C1FIFOINT24.clearTXEMPTYIF; inline;
  76925. begin
  76926. pTDefRegMap(@Self)^.clr := $00000100;
  76927. end;
  76928. procedure TCAN1_C1FIFOINT24.setTXEMPTYIF(thebits : TBits_1); inline;
  76929. begin
  76930. if thebits = 0 then
  76931. pTDefRegMap(@Self)^.clr := $00000100
  76932. else
  76933. pTDefRegMap(@Self)^.&set := $00000100;
  76934. end;
  76935. function TCAN1_C1FIFOINT24.getTXEMPTYIF : TBits_1; inline;
  76936. begin
  76937. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  76938. end;
  76939. procedure TCAN1_C1FIFOINT24.setTXHALFIF; inline;
  76940. begin
  76941. pTDefRegMap(@Self)^.&set := $00000200;
  76942. end;
  76943. procedure TCAN1_C1FIFOINT24.clearTXHALFIF; inline;
  76944. begin
  76945. pTDefRegMap(@Self)^.clr := $00000200;
  76946. end;
  76947. procedure TCAN1_C1FIFOINT24.setTXHALFIF(thebits : TBits_1); inline;
  76948. begin
  76949. if thebits = 0 then
  76950. pTDefRegMap(@Self)^.clr := $00000200
  76951. else
  76952. pTDefRegMap(@Self)^.&set := $00000200;
  76953. end;
  76954. function TCAN1_C1FIFOINT24.getTXHALFIF : TBits_1; inline;
  76955. begin
  76956. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  76957. end;
  76958. procedure TCAN1_C1FIFOINT24.setTXNFULLIF; inline;
  76959. begin
  76960. pTDefRegMap(@Self)^.&set := $00000400;
  76961. end;
  76962. procedure TCAN1_C1FIFOINT24.clearTXNFULLIF; inline;
  76963. begin
  76964. pTDefRegMap(@Self)^.clr := $00000400;
  76965. end;
  76966. procedure TCAN1_C1FIFOINT24.setTXNFULLIF(thebits : TBits_1); inline;
  76967. begin
  76968. if thebits = 0 then
  76969. pTDefRegMap(@Self)^.clr := $00000400
  76970. else
  76971. pTDefRegMap(@Self)^.&set := $00000400;
  76972. end;
  76973. function TCAN1_C1FIFOINT24.getTXNFULLIF : TBits_1; inline;
  76974. begin
  76975. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  76976. end;
  76977. procedure TCAN1_C1FIFOINT24.setRXNEMPTYIE; inline;
  76978. begin
  76979. pTDefRegMap(@Self)^.&set := $00010000;
  76980. end;
  76981. procedure TCAN1_C1FIFOINT24.clearRXNEMPTYIE; inline;
  76982. begin
  76983. pTDefRegMap(@Self)^.clr := $00010000;
  76984. end;
  76985. procedure TCAN1_C1FIFOINT24.setRXNEMPTYIE(thebits : TBits_1); inline;
  76986. begin
  76987. if thebits = 0 then
  76988. pTDefRegMap(@Self)^.clr := $00010000
  76989. else
  76990. pTDefRegMap(@Self)^.&set := $00010000;
  76991. end;
  76992. function TCAN1_C1FIFOINT24.getRXNEMPTYIE : TBits_1; inline;
  76993. begin
  76994. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  76995. end;
  76996. procedure TCAN1_C1FIFOINT24.setRXHALFIE; inline;
  76997. begin
  76998. pTDefRegMap(@Self)^.&set := $00020000;
  76999. end;
  77000. procedure TCAN1_C1FIFOINT24.clearRXHALFIE; inline;
  77001. begin
  77002. pTDefRegMap(@Self)^.clr := $00020000;
  77003. end;
  77004. procedure TCAN1_C1FIFOINT24.setRXHALFIE(thebits : TBits_1); inline;
  77005. begin
  77006. if thebits = 0 then
  77007. pTDefRegMap(@Self)^.clr := $00020000
  77008. else
  77009. pTDefRegMap(@Self)^.&set := $00020000;
  77010. end;
  77011. function TCAN1_C1FIFOINT24.getRXHALFIE : TBits_1; inline;
  77012. begin
  77013. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  77014. end;
  77015. procedure TCAN1_C1FIFOINT24.setRXFULLIE; inline;
  77016. begin
  77017. pTDefRegMap(@Self)^.&set := $00040000;
  77018. end;
  77019. procedure TCAN1_C1FIFOINT24.clearRXFULLIE; inline;
  77020. begin
  77021. pTDefRegMap(@Self)^.clr := $00040000;
  77022. end;
  77023. procedure TCAN1_C1FIFOINT24.setRXFULLIE(thebits : TBits_1); inline;
  77024. begin
  77025. if thebits = 0 then
  77026. pTDefRegMap(@Self)^.clr := $00040000
  77027. else
  77028. pTDefRegMap(@Self)^.&set := $00040000;
  77029. end;
  77030. function TCAN1_C1FIFOINT24.getRXFULLIE : TBits_1; inline;
  77031. begin
  77032. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  77033. end;
  77034. procedure TCAN1_C1FIFOINT24.setRXOVFLIE; inline;
  77035. begin
  77036. pTDefRegMap(@Self)^.&set := $00080000;
  77037. end;
  77038. procedure TCAN1_C1FIFOINT24.clearRXOVFLIE; inline;
  77039. begin
  77040. pTDefRegMap(@Self)^.clr := $00080000;
  77041. end;
  77042. procedure TCAN1_C1FIFOINT24.setRXOVFLIE(thebits : TBits_1); inline;
  77043. begin
  77044. if thebits = 0 then
  77045. pTDefRegMap(@Self)^.clr := $00080000
  77046. else
  77047. pTDefRegMap(@Self)^.&set := $00080000;
  77048. end;
  77049. function TCAN1_C1FIFOINT24.getRXOVFLIE : TBits_1; inline;
  77050. begin
  77051. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  77052. end;
  77053. procedure TCAN1_C1FIFOINT24.setTXEMPTYIE; inline;
  77054. begin
  77055. pTDefRegMap(@Self)^.&set := $01000000;
  77056. end;
  77057. procedure TCAN1_C1FIFOINT24.clearTXEMPTYIE; inline;
  77058. begin
  77059. pTDefRegMap(@Self)^.clr := $01000000;
  77060. end;
  77061. procedure TCAN1_C1FIFOINT24.setTXEMPTYIE(thebits : TBits_1); inline;
  77062. begin
  77063. if thebits = 0 then
  77064. pTDefRegMap(@Self)^.clr := $01000000
  77065. else
  77066. pTDefRegMap(@Self)^.&set := $01000000;
  77067. end;
  77068. function TCAN1_C1FIFOINT24.getTXEMPTYIE : TBits_1; inline;
  77069. begin
  77070. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  77071. end;
  77072. procedure TCAN1_C1FIFOINT24.setTXHALFIE; inline;
  77073. begin
  77074. pTDefRegMap(@Self)^.&set := $02000000;
  77075. end;
  77076. procedure TCAN1_C1FIFOINT24.clearTXHALFIE; inline;
  77077. begin
  77078. pTDefRegMap(@Self)^.clr := $02000000;
  77079. end;
  77080. procedure TCAN1_C1FIFOINT24.setTXHALFIE(thebits : TBits_1); inline;
  77081. begin
  77082. if thebits = 0 then
  77083. pTDefRegMap(@Self)^.clr := $02000000
  77084. else
  77085. pTDefRegMap(@Self)^.&set := $02000000;
  77086. end;
  77087. function TCAN1_C1FIFOINT24.getTXHALFIE : TBits_1; inline;
  77088. begin
  77089. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  77090. end;
  77091. procedure TCAN1_C1FIFOINT24.setTXNFULLIE; inline;
  77092. begin
  77093. pTDefRegMap(@Self)^.&set := $04000000;
  77094. end;
  77095. procedure TCAN1_C1FIFOINT24.clearTXNFULLIE; inline;
  77096. begin
  77097. pTDefRegMap(@Self)^.clr := $04000000;
  77098. end;
  77099. procedure TCAN1_C1FIFOINT24.setTXNFULLIE(thebits : TBits_1); inline;
  77100. begin
  77101. if thebits = 0 then
  77102. pTDefRegMap(@Self)^.clr := $04000000
  77103. else
  77104. pTDefRegMap(@Self)^.&set := $04000000;
  77105. end;
  77106. function TCAN1_C1FIFOINT24.getTXNFULLIE : TBits_1; inline;
  77107. begin
  77108. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  77109. end;
  77110. procedure TCAN1_C1FIFOINT24.setw(thebits : TBits_32); inline;
  77111. begin
  77112. pTDefRegMap(@Self)^.val := thebits;
  77113. end;
  77114. function TCAN1_C1FIFOINT24.getw : TBits_32; inline;
  77115. begin
  77116. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77117. end;
  77118. procedure TCAN1_C1FIFOCI24.setCFIFOCI(thebits : TBits_5); inline;
  77119. begin
  77120. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  77121. end;
  77122. function TCAN1_C1FIFOCI24.getCFIFOCI : TBits_5; inline;
  77123. begin
  77124. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  77125. end;
  77126. procedure TCAN1_C1FIFOCI24.setw(thebits : TBits_32); inline;
  77127. begin
  77128. pTDefRegMap(@Self)^.val := thebits;
  77129. end;
  77130. function TCAN1_C1FIFOCI24.getw : TBits_32; inline;
  77131. begin
  77132. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77133. end;
  77134. procedure TCAN1_C1FIFOCON25.setTXPRI(thebits : TBits_2); inline;
  77135. begin
  77136. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  77137. end;
  77138. function TCAN1_C1FIFOCON25.getTXPRI : TBits_2; inline;
  77139. begin
  77140. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  77141. end;
  77142. procedure TCAN1_C1FIFOCON25.setRTREN; inline;
  77143. begin
  77144. pTDefRegMap(@Self)^.&set := $00000004;
  77145. end;
  77146. procedure TCAN1_C1FIFOCON25.clearRTREN; inline;
  77147. begin
  77148. pTDefRegMap(@Self)^.clr := $00000004;
  77149. end;
  77150. procedure TCAN1_C1FIFOCON25.setRTREN(thebits : TBits_1); inline;
  77151. begin
  77152. if thebits = 0 then
  77153. pTDefRegMap(@Self)^.clr := $00000004
  77154. else
  77155. pTDefRegMap(@Self)^.&set := $00000004;
  77156. end;
  77157. function TCAN1_C1FIFOCON25.getRTREN : TBits_1; inline;
  77158. begin
  77159. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  77160. end;
  77161. procedure TCAN1_C1FIFOCON25.setTXREQ; inline;
  77162. begin
  77163. pTDefRegMap(@Self)^.&set := $00000008;
  77164. end;
  77165. procedure TCAN1_C1FIFOCON25.clearTXREQ; inline;
  77166. begin
  77167. pTDefRegMap(@Self)^.clr := $00000008;
  77168. end;
  77169. procedure TCAN1_C1FIFOCON25.setTXREQ(thebits : TBits_1); inline;
  77170. begin
  77171. if thebits = 0 then
  77172. pTDefRegMap(@Self)^.clr := $00000008
  77173. else
  77174. pTDefRegMap(@Self)^.&set := $00000008;
  77175. end;
  77176. function TCAN1_C1FIFOCON25.getTXREQ : TBits_1; inline;
  77177. begin
  77178. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  77179. end;
  77180. procedure TCAN1_C1FIFOCON25.setTXERR; inline;
  77181. begin
  77182. pTDefRegMap(@Self)^.&set := $00000010;
  77183. end;
  77184. procedure TCAN1_C1FIFOCON25.clearTXERR; inline;
  77185. begin
  77186. pTDefRegMap(@Self)^.clr := $00000010;
  77187. end;
  77188. procedure TCAN1_C1FIFOCON25.setTXERR(thebits : TBits_1); inline;
  77189. begin
  77190. if thebits = 0 then
  77191. pTDefRegMap(@Self)^.clr := $00000010
  77192. else
  77193. pTDefRegMap(@Self)^.&set := $00000010;
  77194. end;
  77195. function TCAN1_C1FIFOCON25.getTXERR : TBits_1; inline;
  77196. begin
  77197. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  77198. end;
  77199. procedure TCAN1_C1FIFOCON25.setTXLARB; inline;
  77200. begin
  77201. pTDefRegMap(@Self)^.&set := $00000020;
  77202. end;
  77203. procedure TCAN1_C1FIFOCON25.clearTXLARB; inline;
  77204. begin
  77205. pTDefRegMap(@Self)^.clr := $00000020;
  77206. end;
  77207. procedure TCAN1_C1FIFOCON25.setTXLARB(thebits : TBits_1); inline;
  77208. begin
  77209. if thebits = 0 then
  77210. pTDefRegMap(@Self)^.clr := $00000020
  77211. else
  77212. pTDefRegMap(@Self)^.&set := $00000020;
  77213. end;
  77214. function TCAN1_C1FIFOCON25.getTXLARB : TBits_1; inline;
  77215. begin
  77216. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  77217. end;
  77218. procedure TCAN1_C1FIFOCON25.setTXABAT; inline;
  77219. begin
  77220. pTDefRegMap(@Self)^.&set := $00000040;
  77221. end;
  77222. procedure TCAN1_C1FIFOCON25.clearTXABAT; inline;
  77223. begin
  77224. pTDefRegMap(@Self)^.clr := $00000040;
  77225. end;
  77226. procedure TCAN1_C1FIFOCON25.setTXABAT(thebits : TBits_1); inline;
  77227. begin
  77228. if thebits = 0 then
  77229. pTDefRegMap(@Self)^.clr := $00000040
  77230. else
  77231. pTDefRegMap(@Self)^.&set := $00000040;
  77232. end;
  77233. function TCAN1_C1FIFOCON25.getTXABAT : TBits_1; inline;
  77234. begin
  77235. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  77236. end;
  77237. procedure TCAN1_C1FIFOCON25.setTXEN; inline;
  77238. begin
  77239. pTDefRegMap(@Self)^.&set := $00000080;
  77240. end;
  77241. procedure TCAN1_C1FIFOCON25.clearTXEN; inline;
  77242. begin
  77243. pTDefRegMap(@Self)^.clr := $00000080;
  77244. end;
  77245. procedure TCAN1_C1FIFOCON25.setTXEN(thebits : TBits_1); inline;
  77246. begin
  77247. if thebits = 0 then
  77248. pTDefRegMap(@Self)^.clr := $00000080
  77249. else
  77250. pTDefRegMap(@Self)^.&set := $00000080;
  77251. end;
  77252. function TCAN1_C1FIFOCON25.getTXEN : TBits_1; inline;
  77253. begin
  77254. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  77255. end;
  77256. procedure TCAN1_C1FIFOCON25.setDONLY; inline;
  77257. begin
  77258. pTDefRegMap(@Self)^.&set := $00001000;
  77259. end;
  77260. procedure TCAN1_C1FIFOCON25.clearDONLY; inline;
  77261. begin
  77262. pTDefRegMap(@Self)^.clr := $00001000;
  77263. end;
  77264. procedure TCAN1_C1FIFOCON25.setDONLY(thebits : TBits_1); inline;
  77265. begin
  77266. if thebits = 0 then
  77267. pTDefRegMap(@Self)^.clr := $00001000
  77268. else
  77269. pTDefRegMap(@Self)^.&set := $00001000;
  77270. end;
  77271. function TCAN1_C1FIFOCON25.getDONLY : TBits_1; inline;
  77272. begin
  77273. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  77274. end;
  77275. procedure TCAN1_C1FIFOCON25.setUINC; inline;
  77276. begin
  77277. pTDefRegMap(@Self)^.&set := $00002000;
  77278. end;
  77279. procedure TCAN1_C1FIFOCON25.clearUINC; inline;
  77280. begin
  77281. pTDefRegMap(@Self)^.clr := $00002000;
  77282. end;
  77283. procedure TCAN1_C1FIFOCON25.setUINC(thebits : TBits_1); inline;
  77284. begin
  77285. if thebits = 0 then
  77286. pTDefRegMap(@Self)^.clr := $00002000
  77287. else
  77288. pTDefRegMap(@Self)^.&set := $00002000;
  77289. end;
  77290. function TCAN1_C1FIFOCON25.getUINC : TBits_1; inline;
  77291. begin
  77292. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  77293. end;
  77294. procedure TCAN1_C1FIFOCON25.setFRESET; inline;
  77295. begin
  77296. pTDefRegMap(@Self)^.&set := $00004000;
  77297. end;
  77298. procedure TCAN1_C1FIFOCON25.clearFRESET; inline;
  77299. begin
  77300. pTDefRegMap(@Self)^.clr := $00004000;
  77301. end;
  77302. procedure TCAN1_C1FIFOCON25.setFRESET(thebits : TBits_1); inline;
  77303. begin
  77304. if thebits = 0 then
  77305. pTDefRegMap(@Self)^.clr := $00004000
  77306. else
  77307. pTDefRegMap(@Self)^.&set := $00004000;
  77308. end;
  77309. function TCAN1_C1FIFOCON25.getFRESET : TBits_1; inline;
  77310. begin
  77311. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  77312. end;
  77313. procedure TCAN1_C1FIFOCON25.setFSIZE(thebits : TBits_5); inline;
  77314. begin
  77315. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  77316. end;
  77317. function TCAN1_C1FIFOCON25.getFSIZE : TBits_5; inline;
  77318. begin
  77319. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  77320. end;
  77321. procedure TCAN1_C1FIFOCON25.setw(thebits : TBits_32); inline;
  77322. begin
  77323. pTDefRegMap(@Self)^.val := thebits;
  77324. end;
  77325. function TCAN1_C1FIFOCON25.getw : TBits_32; inline;
  77326. begin
  77327. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77328. end;
  77329. procedure TCAN1_C1FIFOINT25.setRXNEMPTYIF; inline;
  77330. begin
  77331. pTDefRegMap(@Self)^.&set := $00000001;
  77332. end;
  77333. procedure TCAN1_C1FIFOINT25.clearRXNEMPTYIF; inline;
  77334. begin
  77335. pTDefRegMap(@Self)^.clr := $00000001;
  77336. end;
  77337. procedure TCAN1_C1FIFOINT25.setRXNEMPTYIF(thebits : TBits_1); inline;
  77338. begin
  77339. if thebits = 0 then
  77340. pTDefRegMap(@Self)^.clr := $00000001
  77341. else
  77342. pTDefRegMap(@Self)^.&set := $00000001;
  77343. end;
  77344. function TCAN1_C1FIFOINT25.getRXNEMPTYIF : TBits_1; inline;
  77345. begin
  77346. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  77347. end;
  77348. procedure TCAN1_C1FIFOINT25.setRXHALFIF; inline;
  77349. begin
  77350. pTDefRegMap(@Self)^.&set := $00000002;
  77351. end;
  77352. procedure TCAN1_C1FIFOINT25.clearRXHALFIF; inline;
  77353. begin
  77354. pTDefRegMap(@Self)^.clr := $00000002;
  77355. end;
  77356. procedure TCAN1_C1FIFOINT25.setRXHALFIF(thebits : TBits_1); inline;
  77357. begin
  77358. if thebits = 0 then
  77359. pTDefRegMap(@Self)^.clr := $00000002
  77360. else
  77361. pTDefRegMap(@Self)^.&set := $00000002;
  77362. end;
  77363. function TCAN1_C1FIFOINT25.getRXHALFIF : TBits_1; inline;
  77364. begin
  77365. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  77366. end;
  77367. procedure TCAN1_C1FIFOINT25.setRXFULLIF; inline;
  77368. begin
  77369. pTDefRegMap(@Self)^.&set := $00000004;
  77370. end;
  77371. procedure TCAN1_C1FIFOINT25.clearRXFULLIF; inline;
  77372. begin
  77373. pTDefRegMap(@Self)^.clr := $00000004;
  77374. end;
  77375. procedure TCAN1_C1FIFOINT25.setRXFULLIF(thebits : TBits_1); inline;
  77376. begin
  77377. if thebits = 0 then
  77378. pTDefRegMap(@Self)^.clr := $00000004
  77379. else
  77380. pTDefRegMap(@Self)^.&set := $00000004;
  77381. end;
  77382. function TCAN1_C1FIFOINT25.getRXFULLIF : TBits_1; inline;
  77383. begin
  77384. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  77385. end;
  77386. procedure TCAN1_C1FIFOINT25.setRXOVFLIF; inline;
  77387. begin
  77388. pTDefRegMap(@Self)^.&set := $00000008;
  77389. end;
  77390. procedure TCAN1_C1FIFOINT25.clearRXOVFLIF; inline;
  77391. begin
  77392. pTDefRegMap(@Self)^.clr := $00000008;
  77393. end;
  77394. procedure TCAN1_C1FIFOINT25.setRXOVFLIF(thebits : TBits_1); inline;
  77395. begin
  77396. if thebits = 0 then
  77397. pTDefRegMap(@Self)^.clr := $00000008
  77398. else
  77399. pTDefRegMap(@Self)^.&set := $00000008;
  77400. end;
  77401. function TCAN1_C1FIFOINT25.getRXOVFLIF : TBits_1; inline;
  77402. begin
  77403. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  77404. end;
  77405. procedure TCAN1_C1FIFOINT25.setTXEMPTYIF; inline;
  77406. begin
  77407. pTDefRegMap(@Self)^.&set := $00000100;
  77408. end;
  77409. procedure TCAN1_C1FIFOINT25.clearTXEMPTYIF; inline;
  77410. begin
  77411. pTDefRegMap(@Self)^.clr := $00000100;
  77412. end;
  77413. procedure TCAN1_C1FIFOINT25.setTXEMPTYIF(thebits : TBits_1); inline;
  77414. begin
  77415. if thebits = 0 then
  77416. pTDefRegMap(@Self)^.clr := $00000100
  77417. else
  77418. pTDefRegMap(@Self)^.&set := $00000100;
  77419. end;
  77420. function TCAN1_C1FIFOINT25.getTXEMPTYIF : TBits_1; inline;
  77421. begin
  77422. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  77423. end;
  77424. procedure TCAN1_C1FIFOINT25.setTXHALFIF; inline;
  77425. begin
  77426. pTDefRegMap(@Self)^.&set := $00000200;
  77427. end;
  77428. procedure TCAN1_C1FIFOINT25.clearTXHALFIF; inline;
  77429. begin
  77430. pTDefRegMap(@Self)^.clr := $00000200;
  77431. end;
  77432. procedure TCAN1_C1FIFOINT25.setTXHALFIF(thebits : TBits_1); inline;
  77433. begin
  77434. if thebits = 0 then
  77435. pTDefRegMap(@Self)^.clr := $00000200
  77436. else
  77437. pTDefRegMap(@Self)^.&set := $00000200;
  77438. end;
  77439. function TCAN1_C1FIFOINT25.getTXHALFIF : TBits_1; inline;
  77440. begin
  77441. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  77442. end;
  77443. procedure TCAN1_C1FIFOINT25.setTXNFULLIF; inline;
  77444. begin
  77445. pTDefRegMap(@Self)^.&set := $00000400;
  77446. end;
  77447. procedure TCAN1_C1FIFOINT25.clearTXNFULLIF; inline;
  77448. begin
  77449. pTDefRegMap(@Self)^.clr := $00000400;
  77450. end;
  77451. procedure TCAN1_C1FIFOINT25.setTXNFULLIF(thebits : TBits_1); inline;
  77452. begin
  77453. if thebits = 0 then
  77454. pTDefRegMap(@Self)^.clr := $00000400
  77455. else
  77456. pTDefRegMap(@Self)^.&set := $00000400;
  77457. end;
  77458. function TCAN1_C1FIFOINT25.getTXNFULLIF : TBits_1; inline;
  77459. begin
  77460. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  77461. end;
  77462. procedure TCAN1_C1FIFOINT25.setRXNEMPTYIE; inline;
  77463. begin
  77464. pTDefRegMap(@Self)^.&set := $00010000;
  77465. end;
  77466. procedure TCAN1_C1FIFOINT25.clearRXNEMPTYIE; inline;
  77467. begin
  77468. pTDefRegMap(@Self)^.clr := $00010000;
  77469. end;
  77470. procedure TCAN1_C1FIFOINT25.setRXNEMPTYIE(thebits : TBits_1); inline;
  77471. begin
  77472. if thebits = 0 then
  77473. pTDefRegMap(@Self)^.clr := $00010000
  77474. else
  77475. pTDefRegMap(@Self)^.&set := $00010000;
  77476. end;
  77477. function TCAN1_C1FIFOINT25.getRXNEMPTYIE : TBits_1; inline;
  77478. begin
  77479. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  77480. end;
  77481. procedure TCAN1_C1FIFOINT25.setRXHALFIE; inline;
  77482. begin
  77483. pTDefRegMap(@Self)^.&set := $00020000;
  77484. end;
  77485. procedure TCAN1_C1FIFOINT25.clearRXHALFIE; inline;
  77486. begin
  77487. pTDefRegMap(@Self)^.clr := $00020000;
  77488. end;
  77489. procedure TCAN1_C1FIFOINT25.setRXHALFIE(thebits : TBits_1); inline;
  77490. begin
  77491. if thebits = 0 then
  77492. pTDefRegMap(@Self)^.clr := $00020000
  77493. else
  77494. pTDefRegMap(@Self)^.&set := $00020000;
  77495. end;
  77496. function TCAN1_C1FIFOINT25.getRXHALFIE : TBits_1; inline;
  77497. begin
  77498. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  77499. end;
  77500. procedure TCAN1_C1FIFOINT25.setRXFULLIE; inline;
  77501. begin
  77502. pTDefRegMap(@Self)^.&set := $00040000;
  77503. end;
  77504. procedure TCAN1_C1FIFOINT25.clearRXFULLIE; inline;
  77505. begin
  77506. pTDefRegMap(@Self)^.clr := $00040000;
  77507. end;
  77508. procedure TCAN1_C1FIFOINT25.setRXFULLIE(thebits : TBits_1); inline;
  77509. begin
  77510. if thebits = 0 then
  77511. pTDefRegMap(@Self)^.clr := $00040000
  77512. else
  77513. pTDefRegMap(@Self)^.&set := $00040000;
  77514. end;
  77515. function TCAN1_C1FIFOINT25.getRXFULLIE : TBits_1; inline;
  77516. begin
  77517. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  77518. end;
  77519. procedure TCAN1_C1FIFOINT25.setRXOVFLIE; inline;
  77520. begin
  77521. pTDefRegMap(@Self)^.&set := $00080000;
  77522. end;
  77523. procedure TCAN1_C1FIFOINT25.clearRXOVFLIE; inline;
  77524. begin
  77525. pTDefRegMap(@Self)^.clr := $00080000;
  77526. end;
  77527. procedure TCAN1_C1FIFOINT25.setRXOVFLIE(thebits : TBits_1); inline;
  77528. begin
  77529. if thebits = 0 then
  77530. pTDefRegMap(@Self)^.clr := $00080000
  77531. else
  77532. pTDefRegMap(@Self)^.&set := $00080000;
  77533. end;
  77534. function TCAN1_C1FIFOINT25.getRXOVFLIE : TBits_1; inline;
  77535. begin
  77536. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  77537. end;
  77538. procedure TCAN1_C1FIFOINT25.setTXEMPTYIE; inline;
  77539. begin
  77540. pTDefRegMap(@Self)^.&set := $01000000;
  77541. end;
  77542. procedure TCAN1_C1FIFOINT25.clearTXEMPTYIE; inline;
  77543. begin
  77544. pTDefRegMap(@Self)^.clr := $01000000;
  77545. end;
  77546. procedure TCAN1_C1FIFOINT25.setTXEMPTYIE(thebits : TBits_1); inline;
  77547. begin
  77548. if thebits = 0 then
  77549. pTDefRegMap(@Self)^.clr := $01000000
  77550. else
  77551. pTDefRegMap(@Self)^.&set := $01000000;
  77552. end;
  77553. function TCAN1_C1FIFOINT25.getTXEMPTYIE : TBits_1; inline;
  77554. begin
  77555. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  77556. end;
  77557. procedure TCAN1_C1FIFOINT25.setTXHALFIE; inline;
  77558. begin
  77559. pTDefRegMap(@Self)^.&set := $02000000;
  77560. end;
  77561. procedure TCAN1_C1FIFOINT25.clearTXHALFIE; inline;
  77562. begin
  77563. pTDefRegMap(@Self)^.clr := $02000000;
  77564. end;
  77565. procedure TCAN1_C1FIFOINT25.setTXHALFIE(thebits : TBits_1); inline;
  77566. begin
  77567. if thebits = 0 then
  77568. pTDefRegMap(@Self)^.clr := $02000000
  77569. else
  77570. pTDefRegMap(@Self)^.&set := $02000000;
  77571. end;
  77572. function TCAN1_C1FIFOINT25.getTXHALFIE : TBits_1; inline;
  77573. begin
  77574. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  77575. end;
  77576. procedure TCAN1_C1FIFOINT25.setTXNFULLIE; inline;
  77577. begin
  77578. pTDefRegMap(@Self)^.&set := $04000000;
  77579. end;
  77580. procedure TCAN1_C1FIFOINT25.clearTXNFULLIE; inline;
  77581. begin
  77582. pTDefRegMap(@Self)^.clr := $04000000;
  77583. end;
  77584. procedure TCAN1_C1FIFOINT25.setTXNFULLIE(thebits : TBits_1); inline;
  77585. begin
  77586. if thebits = 0 then
  77587. pTDefRegMap(@Self)^.clr := $04000000
  77588. else
  77589. pTDefRegMap(@Self)^.&set := $04000000;
  77590. end;
  77591. function TCAN1_C1FIFOINT25.getTXNFULLIE : TBits_1; inline;
  77592. begin
  77593. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  77594. end;
  77595. procedure TCAN1_C1FIFOINT25.setw(thebits : TBits_32); inline;
  77596. begin
  77597. pTDefRegMap(@Self)^.val := thebits;
  77598. end;
  77599. function TCAN1_C1FIFOINT25.getw : TBits_32; inline;
  77600. begin
  77601. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77602. end;
  77603. procedure TCAN1_C1FIFOCI25.setCFIFOCI(thebits : TBits_5); inline;
  77604. begin
  77605. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  77606. end;
  77607. function TCAN1_C1FIFOCI25.getCFIFOCI : TBits_5; inline;
  77608. begin
  77609. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  77610. end;
  77611. procedure TCAN1_C1FIFOCI25.setw(thebits : TBits_32); inline;
  77612. begin
  77613. pTDefRegMap(@Self)^.val := thebits;
  77614. end;
  77615. function TCAN1_C1FIFOCI25.getw : TBits_32; inline;
  77616. begin
  77617. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77618. end;
  77619. procedure TCAN1_C1FIFOCON26.setTXPRI(thebits : TBits_2); inline;
  77620. begin
  77621. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  77622. end;
  77623. function TCAN1_C1FIFOCON26.getTXPRI : TBits_2; inline;
  77624. begin
  77625. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  77626. end;
  77627. procedure TCAN1_C1FIFOCON26.setRTREN; inline;
  77628. begin
  77629. pTDefRegMap(@Self)^.&set := $00000004;
  77630. end;
  77631. procedure TCAN1_C1FIFOCON26.clearRTREN; inline;
  77632. begin
  77633. pTDefRegMap(@Self)^.clr := $00000004;
  77634. end;
  77635. procedure TCAN1_C1FIFOCON26.setRTREN(thebits : TBits_1); inline;
  77636. begin
  77637. if thebits = 0 then
  77638. pTDefRegMap(@Self)^.clr := $00000004
  77639. else
  77640. pTDefRegMap(@Self)^.&set := $00000004;
  77641. end;
  77642. function TCAN1_C1FIFOCON26.getRTREN : TBits_1; inline;
  77643. begin
  77644. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  77645. end;
  77646. procedure TCAN1_C1FIFOCON26.setTXREQ; inline;
  77647. begin
  77648. pTDefRegMap(@Self)^.&set := $00000008;
  77649. end;
  77650. procedure TCAN1_C1FIFOCON26.clearTXREQ; inline;
  77651. begin
  77652. pTDefRegMap(@Self)^.clr := $00000008;
  77653. end;
  77654. procedure TCAN1_C1FIFOCON26.setTXREQ(thebits : TBits_1); inline;
  77655. begin
  77656. if thebits = 0 then
  77657. pTDefRegMap(@Self)^.clr := $00000008
  77658. else
  77659. pTDefRegMap(@Self)^.&set := $00000008;
  77660. end;
  77661. function TCAN1_C1FIFOCON26.getTXREQ : TBits_1; inline;
  77662. begin
  77663. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  77664. end;
  77665. procedure TCAN1_C1FIFOCON26.setTXERR; inline;
  77666. begin
  77667. pTDefRegMap(@Self)^.&set := $00000010;
  77668. end;
  77669. procedure TCAN1_C1FIFOCON26.clearTXERR; inline;
  77670. begin
  77671. pTDefRegMap(@Self)^.clr := $00000010;
  77672. end;
  77673. procedure TCAN1_C1FIFOCON26.setTXERR(thebits : TBits_1); inline;
  77674. begin
  77675. if thebits = 0 then
  77676. pTDefRegMap(@Self)^.clr := $00000010
  77677. else
  77678. pTDefRegMap(@Self)^.&set := $00000010;
  77679. end;
  77680. function TCAN1_C1FIFOCON26.getTXERR : TBits_1; inline;
  77681. begin
  77682. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  77683. end;
  77684. procedure TCAN1_C1FIFOCON26.setTXLARB; inline;
  77685. begin
  77686. pTDefRegMap(@Self)^.&set := $00000020;
  77687. end;
  77688. procedure TCAN1_C1FIFOCON26.clearTXLARB; inline;
  77689. begin
  77690. pTDefRegMap(@Self)^.clr := $00000020;
  77691. end;
  77692. procedure TCAN1_C1FIFOCON26.setTXLARB(thebits : TBits_1); inline;
  77693. begin
  77694. if thebits = 0 then
  77695. pTDefRegMap(@Self)^.clr := $00000020
  77696. else
  77697. pTDefRegMap(@Self)^.&set := $00000020;
  77698. end;
  77699. function TCAN1_C1FIFOCON26.getTXLARB : TBits_1; inline;
  77700. begin
  77701. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  77702. end;
  77703. procedure TCAN1_C1FIFOCON26.setTXABAT; inline;
  77704. begin
  77705. pTDefRegMap(@Self)^.&set := $00000040;
  77706. end;
  77707. procedure TCAN1_C1FIFOCON26.clearTXABAT; inline;
  77708. begin
  77709. pTDefRegMap(@Self)^.clr := $00000040;
  77710. end;
  77711. procedure TCAN1_C1FIFOCON26.setTXABAT(thebits : TBits_1); inline;
  77712. begin
  77713. if thebits = 0 then
  77714. pTDefRegMap(@Self)^.clr := $00000040
  77715. else
  77716. pTDefRegMap(@Self)^.&set := $00000040;
  77717. end;
  77718. function TCAN1_C1FIFOCON26.getTXABAT : TBits_1; inline;
  77719. begin
  77720. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  77721. end;
  77722. procedure TCAN1_C1FIFOCON26.setTXEN; inline;
  77723. begin
  77724. pTDefRegMap(@Self)^.&set := $00000080;
  77725. end;
  77726. procedure TCAN1_C1FIFOCON26.clearTXEN; inline;
  77727. begin
  77728. pTDefRegMap(@Self)^.clr := $00000080;
  77729. end;
  77730. procedure TCAN1_C1FIFOCON26.setTXEN(thebits : TBits_1); inline;
  77731. begin
  77732. if thebits = 0 then
  77733. pTDefRegMap(@Self)^.clr := $00000080
  77734. else
  77735. pTDefRegMap(@Self)^.&set := $00000080;
  77736. end;
  77737. function TCAN1_C1FIFOCON26.getTXEN : TBits_1; inline;
  77738. begin
  77739. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  77740. end;
  77741. procedure TCAN1_C1FIFOCON26.setDONLY; inline;
  77742. begin
  77743. pTDefRegMap(@Self)^.&set := $00001000;
  77744. end;
  77745. procedure TCAN1_C1FIFOCON26.clearDONLY; inline;
  77746. begin
  77747. pTDefRegMap(@Self)^.clr := $00001000;
  77748. end;
  77749. procedure TCAN1_C1FIFOCON26.setDONLY(thebits : TBits_1); inline;
  77750. begin
  77751. if thebits = 0 then
  77752. pTDefRegMap(@Self)^.clr := $00001000
  77753. else
  77754. pTDefRegMap(@Self)^.&set := $00001000;
  77755. end;
  77756. function TCAN1_C1FIFOCON26.getDONLY : TBits_1; inline;
  77757. begin
  77758. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  77759. end;
  77760. procedure TCAN1_C1FIFOCON26.setUINC; inline;
  77761. begin
  77762. pTDefRegMap(@Self)^.&set := $00002000;
  77763. end;
  77764. procedure TCAN1_C1FIFOCON26.clearUINC; inline;
  77765. begin
  77766. pTDefRegMap(@Self)^.clr := $00002000;
  77767. end;
  77768. procedure TCAN1_C1FIFOCON26.setUINC(thebits : TBits_1); inline;
  77769. begin
  77770. if thebits = 0 then
  77771. pTDefRegMap(@Self)^.clr := $00002000
  77772. else
  77773. pTDefRegMap(@Self)^.&set := $00002000;
  77774. end;
  77775. function TCAN1_C1FIFOCON26.getUINC : TBits_1; inline;
  77776. begin
  77777. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  77778. end;
  77779. procedure TCAN1_C1FIFOCON26.setFRESET; inline;
  77780. begin
  77781. pTDefRegMap(@Self)^.&set := $00004000;
  77782. end;
  77783. procedure TCAN1_C1FIFOCON26.clearFRESET; inline;
  77784. begin
  77785. pTDefRegMap(@Self)^.clr := $00004000;
  77786. end;
  77787. procedure TCAN1_C1FIFOCON26.setFRESET(thebits : TBits_1); inline;
  77788. begin
  77789. if thebits = 0 then
  77790. pTDefRegMap(@Self)^.clr := $00004000
  77791. else
  77792. pTDefRegMap(@Self)^.&set := $00004000;
  77793. end;
  77794. function TCAN1_C1FIFOCON26.getFRESET : TBits_1; inline;
  77795. begin
  77796. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  77797. end;
  77798. procedure TCAN1_C1FIFOCON26.setFSIZE(thebits : TBits_5); inline;
  77799. begin
  77800. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  77801. end;
  77802. function TCAN1_C1FIFOCON26.getFSIZE : TBits_5; inline;
  77803. begin
  77804. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  77805. end;
  77806. procedure TCAN1_C1FIFOCON26.setw(thebits : TBits_32); inline;
  77807. begin
  77808. pTDefRegMap(@Self)^.val := thebits;
  77809. end;
  77810. function TCAN1_C1FIFOCON26.getw : TBits_32; inline;
  77811. begin
  77812. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77813. end;
  77814. procedure TCAN1_C1FIFOINT26.setRXNEMPTYIF; inline;
  77815. begin
  77816. pTDefRegMap(@Self)^.&set := $00000001;
  77817. end;
  77818. procedure TCAN1_C1FIFOINT26.clearRXNEMPTYIF; inline;
  77819. begin
  77820. pTDefRegMap(@Self)^.clr := $00000001;
  77821. end;
  77822. procedure TCAN1_C1FIFOINT26.setRXNEMPTYIF(thebits : TBits_1); inline;
  77823. begin
  77824. if thebits = 0 then
  77825. pTDefRegMap(@Self)^.clr := $00000001
  77826. else
  77827. pTDefRegMap(@Self)^.&set := $00000001;
  77828. end;
  77829. function TCAN1_C1FIFOINT26.getRXNEMPTYIF : TBits_1; inline;
  77830. begin
  77831. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  77832. end;
  77833. procedure TCAN1_C1FIFOINT26.setRXHALFIF; inline;
  77834. begin
  77835. pTDefRegMap(@Self)^.&set := $00000002;
  77836. end;
  77837. procedure TCAN1_C1FIFOINT26.clearRXHALFIF; inline;
  77838. begin
  77839. pTDefRegMap(@Self)^.clr := $00000002;
  77840. end;
  77841. procedure TCAN1_C1FIFOINT26.setRXHALFIF(thebits : TBits_1); inline;
  77842. begin
  77843. if thebits = 0 then
  77844. pTDefRegMap(@Self)^.clr := $00000002
  77845. else
  77846. pTDefRegMap(@Self)^.&set := $00000002;
  77847. end;
  77848. function TCAN1_C1FIFOINT26.getRXHALFIF : TBits_1; inline;
  77849. begin
  77850. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  77851. end;
  77852. procedure TCAN1_C1FIFOINT26.setRXFULLIF; inline;
  77853. begin
  77854. pTDefRegMap(@Self)^.&set := $00000004;
  77855. end;
  77856. procedure TCAN1_C1FIFOINT26.clearRXFULLIF; inline;
  77857. begin
  77858. pTDefRegMap(@Self)^.clr := $00000004;
  77859. end;
  77860. procedure TCAN1_C1FIFOINT26.setRXFULLIF(thebits : TBits_1); inline;
  77861. begin
  77862. if thebits = 0 then
  77863. pTDefRegMap(@Self)^.clr := $00000004
  77864. else
  77865. pTDefRegMap(@Self)^.&set := $00000004;
  77866. end;
  77867. function TCAN1_C1FIFOINT26.getRXFULLIF : TBits_1; inline;
  77868. begin
  77869. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  77870. end;
  77871. procedure TCAN1_C1FIFOINT26.setRXOVFLIF; inline;
  77872. begin
  77873. pTDefRegMap(@Self)^.&set := $00000008;
  77874. end;
  77875. procedure TCAN1_C1FIFOINT26.clearRXOVFLIF; inline;
  77876. begin
  77877. pTDefRegMap(@Self)^.clr := $00000008;
  77878. end;
  77879. procedure TCAN1_C1FIFOINT26.setRXOVFLIF(thebits : TBits_1); inline;
  77880. begin
  77881. if thebits = 0 then
  77882. pTDefRegMap(@Self)^.clr := $00000008
  77883. else
  77884. pTDefRegMap(@Self)^.&set := $00000008;
  77885. end;
  77886. function TCAN1_C1FIFOINT26.getRXOVFLIF : TBits_1; inline;
  77887. begin
  77888. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  77889. end;
  77890. procedure TCAN1_C1FIFOINT26.setTXEMPTYIF; inline;
  77891. begin
  77892. pTDefRegMap(@Self)^.&set := $00000100;
  77893. end;
  77894. procedure TCAN1_C1FIFOINT26.clearTXEMPTYIF; inline;
  77895. begin
  77896. pTDefRegMap(@Self)^.clr := $00000100;
  77897. end;
  77898. procedure TCAN1_C1FIFOINT26.setTXEMPTYIF(thebits : TBits_1); inline;
  77899. begin
  77900. if thebits = 0 then
  77901. pTDefRegMap(@Self)^.clr := $00000100
  77902. else
  77903. pTDefRegMap(@Self)^.&set := $00000100;
  77904. end;
  77905. function TCAN1_C1FIFOINT26.getTXEMPTYIF : TBits_1; inline;
  77906. begin
  77907. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  77908. end;
  77909. procedure TCAN1_C1FIFOINT26.setTXHALFIF; inline;
  77910. begin
  77911. pTDefRegMap(@Self)^.&set := $00000200;
  77912. end;
  77913. procedure TCAN1_C1FIFOINT26.clearTXHALFIF; inline;
  77914. begin
  77915. pTDefRegMap(@Self)^.clr := $00000200;
  77916. end;
  77917. procedure TCAN1_C1FIFOINT26.setTXHALFIF(thebits : TBits_1); inline;
  77918. begin
  77919. if thebits = 0 then
  77920. pTDefRegMap(@Self)^.clr := $00000200
  77921. else
  77922. pTDefRegMap(@Self)^.&set := $00000200;
  77923. end;
  77924. function TCAN1_C1FIFOINT26.getTXHALFIF : TBits_1; inline;
  77925. begin
  77926. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  77927. end;
  77928. procedure TCAN1_C1FIFOINT26.setTXNFULLIF; inline;
  77929. begin
  77930. pTDefRegMap(@Self)^.&set := $00000400;
  77931. end;
  77932. procedure TCAN1_C1FIFOINT26.clearTXNFULLIF; inline;
  77933. begin
  77934. pTDefRegMap(@Self)^.clr := $00000400;
  77935. end;
  77936. procedure TCAN1_C1FIFOINT26.setTXNFULLIF(thebits : TBits_1); inline;
  77937. begin
  77938. if thebits = 0 then
  77939. pTDefRegMap(@Self)^.clr := $00000400
  77940. else
  77941. pTDefRegMap(@Self)^.&set := $00000400;
  77942. end;
  77943. function TCAN1_C1FIFOINT26.getTXNFULLIF : TBits_1; inline;
  77944. begin
  77945. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  77946. end;
  77947. procedure TCAN1_C1FIFOINT26.setRXNEMPTYIE; inline;
  77948. begin
  77949. pTDefRegMap(@Self)^.&set := $00010000;
  77950. end;
  77951. procedure TCAN1_C1FIFOINT26.clearRXNEMPTYIE; inline;
  77952. begin
  77953. pTDefRegMap(@Self)^.clr := $00010000;
  77954. end;
  77955. procedure TCAN1_C1FIFOINT26.setRXNEMPTYIE(thebits : TBits_1); inline;
  77956. begin
  77957. if thebits = 0 then
  77958. pTDefRegMap(@Self)^.clr := $00010000
  77959. else
  77960. pTDefRegMap(@Self)^.&set := $00010000;
  77961. end;
  77962. function TCAN1_C1FIFOINT26.getRXNEMPTYIE : TBits_1; inline;
  77963. begin
  77964. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  77965. end;
  77966. procedure TCAN1_C1FIFOINT26.setRXHALFIE; inline;
  77967. begin
  77968. pTDefRegMap(@Self)^.&set := $00020000;
  77969. end;
  77970. procedure TCAN1_C1FIFOINT26.clearRXHALFIE; inline;
  77971. begin
  77972. pTDefRegMap(@Self)^.clr := $00020000;
  77973. end;
  77974. procedure TCAN1_C1FIFOINT26.setRXHALFIE(thebits : TBits_1); inline;
  77975. begin
  77976. if thebits = 0 then
  77977. pTDefRegMap(@Self)^.clr := $00020000
  77978. else
  77979. pTDefRegMap(@Self)^.&set := $00020000;
  77980. end;
  77981. function TCAN1_C1FIFOINT26.getRXHALFIE : TBits_1; inline;
  77982. begin
  77983. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  77984. end;
  77985. procedure TCAN1_C1FIFOINT26.setRXFULLIE; inline;
  77986. begin
  77987. pTDefRegMap(@Self)^.&set := $00040000;
  77988. end;
  77989. procedure TCAN1_C1FIFOINT26.clearRXFULLIE; inline;
  77990. begin
  77991. pTDefRegMap(@Self)^.clr := $00040000;
  77992. end;
  77993. procedure TCAN1_C1FIFOINT26.setRXFULLIE(thebits : TBits_1); inline;
  77994. begin
  77995. if thebits = 0 then
  77996. pTDefRegMap(@Self)^.clr := $00040000
  77997. else
  77998. pTDefRegMap(@Self)^.&set := $00040000;
  77999. end;
  78000. function TCAN1_C1FIFOINT26.getRXFULLIE : TBits_1; inline;
  78001. begin
  78002. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  78003. end;
  78004. procedure TCAN1_C1FIFOINT26.setRXOVFLIE; inline;
  78005. begin
  78006. pTDefRegMap(@Self)^.&set := $00080000;
  78007. end;
  78008. procedure TCAN1_C1FIFOINT26.clearRXOVFLIE; inline;
  78009. begin
  78010. pTDefRegMap(@Self)^.clr := $00080000;
  78011. end;
  78012. procedure TCAN1_C1FIFOINT26.setRXOVFLIE(thebits : TBits_1); inline;
  78013. begin
  78014. if thebits = 0 then
  78015. pTDefRegMap(@Self)^.clr := $00080000
  78016. else
  78017. pTDefRegMap(@Self)^.&set := $00080000;
  78018. end;
  78019. function TCAN1_C1FIFOINT26.getRXOVFLIE : TBits_1; inline;
  78020. begin
  78021. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  78022. end;
  78023. procedure TCAN1_C1FIFOINT26.setTXEMPTYIE; inline;
  78024. begin
  78025. pTDefRegMap(@Self)^.&set := $01000000;
  78026. end;
  78027. procedure TCAN1_C1FIFOINT26.clearTXEMPTYIE; inline;
  78028. begin
  78029. pTDefRegMap(@Self)^.clr := $01000000;
  78030. end;
  78031. procedure TCAN1_C1FIFOINT26.setTXEMPTYIE(thebits : TBits_1); inline;
  78032. begin
  78033. if thebits = 0 then
  78034. pTDefRegMap(@Self)^.clr := $01000000
  78035. else
  78036. pTDefRegMap(@Self)^.&set := $01000000;
  78037. end;
  78038. function TCAN1_C1FIFOINT26.getTXEMPTYIE : TBits_1; inline;
  78039. begin
  78040. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  78041. end;
  78042. procedure TCAN1_C1FIFOINT26.setTXHALFIE; inline;
  78043. begin
  78044. pTDefRegMap(@Self)^.&set := $02000000;
  78045. end;
  78046. procedure TCAN1_C1FIFOINT26.clearTXHALFIE; inline;
  78047. begin
  78048. pTDefRegMap(@Self)^.clr := $02000000;
  78049. end;
  78050. procedure TCAN1_C1FIFOINT26.setTXHALFIE(thebits : TBits_1); inline;
  78051. begin
  78052. if thebits = 0 then
  78053. pTDefRegMap(@Self)^.clr := $02000000
  78054. else
  78055. pTDefRegMap(@Self)^.&set := $02000000;
  78056. end;
  78057. function TCAN1_C1FIFOINT26.getTXHALFIE : TBits_1; inline;
  78058. begin
  78059. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  78060. end;
  78061. procedure TCAN1_C1FIFOINT26.setTXNFULLIE; inline;
  78062. begin
  78063. pTDefRegMap(@Self)^.&set := $04000000;
  78064. end;
  78065. procedure TCAN1_C1FIFOINT26.clearTXNFULLIE; inline;
  78066. begin
  78067. pTDefRegMap(@Self)^.clr := $04000000;
  78068. end;
  78069. procedure TCAN1_C1FIFOINT26.setTXNFULLIE(thebits : TBits_1); inline;
  78070. begin
  78071. if thebits = 0 then
  78072. pTDefRegMap(@Self)^.clr := $04000000
  78073. else
  78074. pTDefRegMap(@Self)^.&set := $04000000;
  78075. end;
  78076. function TCAN1_C1FIFOINT26.getTXNFULLIE : TBits_1; inline;
  78077. begin
  78078. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  78079. end;
  78080. procedure TCAN1_C1FIFOINT26.setw(thebits : TBits_32); inline;
  78081. begin
  78082. pTDefRegMap(@Self)^.val := thebits;
  78083. end;
  78084. function TCAN1_C1FIFOINT26.getw : TBits_32; inline;
  78085. begin
  78086. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78087. end;
  78088. procedure TCAN1_C1FIFOCI26.setCFIFOCI(thebits : TBits_5); inline;
  78089. begin
  78090. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  78091. end;
  78092. function TCAN1_C1FIFOCI26.getCFIFOCI : TBits_5; inline;
  78093. begin
  78094. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  78095. end;
  78096. procedure TCAN1_C1FIFOCI26.setw(thebits : TBits_32); inline;
  78097. begin
  78098. pTDefRegMap(@Self)^.val := thebits;
  78099. end;
  78100. function TCAN1_C1FIFOCI26.getw : TBits_32; inline;
  78101. begin
  78102. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78103. end;
  78104. procedure TCAN1_C1FIFOCON27.setTXPRI(thebits : TBits_2); inline;
  78105. begin
  78106. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  78107. end;
  78108. function TCAN1_C1FIFOCON27.getTXPRI : TBits_2; inline;
  78109. begin
  78110. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  78111. end;
  78112. procedure TCAN1_C1FIFOCON27.setRTREN; inline;
  78113. begin
  78114. pTDefRegMap(@Self)^.&set := $00000004;
  78115. end;
  78116. procedure TCAN1_C1FIFOCON27.clearRTREN; inline;
  78117. begin
  78118. pTDefRegMap(@Self)^.clr := $00000004;
  78119. end;
  78120. procedure TCAN1_C1FIFOCON27.setRTREN(thebits : TBits_1); inline;
  78121. begin
  78122. if thebits = 0 then
  78123. pTDefRegMap(@Self)^.clr := $00000004
  78124. else
  78125. pTDefRegMap(@Self)^.&set := $00000004;
  78126. end;
  78127. function TCAN1_C1FIFOCON27.getRTREN : TBits_1; inline;
  78128. begin
  78129. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  78130. end;
  78131. procedure TCAN1_C1FIFOCON27.setTXREQ; inline;
  78132. begin
  78133. pTDefRegMap(@Self)^.&set := $00000008;
  78134. end;
  78135. procedure TCAN1_C1FIFOCON27.clearTXREQ; inline;
  78136. begin
  78137. pTDefRegMap(@Self)^.clr := $00000008;
  78138. end;
  78139. procedure TCAN1_C1FIFOCON27.setTXREQ(thebits : TBits_1); inline;
  78140. begin
  78141. if thebits = 0 then
  78142. pTDefRegMap(@Self)^.clr := $00000008
  78143. else
  78144. pTDefRegMap(@Self)^.&set := $00000008;
  78145. end;
  78146. function TCAN1_C1FIFOCON27.getTXREQ : TBits_1; inline;
  78147. begin
  78148. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  78149. end;
  78150. procedure TCAN1_C1FIFOCON27.setTXERR; inline;
  78151. begin
  78152. pTDefRegMap(@Self)^.&set := $00000010;
  78153. end;
  78154. procedure TCAN1_C1FIFOCON27.clearTXERR; inline;
  78155. begin
  78156. pTDefRegMap(@Self)^.clr := $00000010;
  78157. end;
  78158. procedure TCAN1_C1FIFOCON27.setTXERR(thebits : TBits_1); inline;
  78159. begin
  78160. if thebits = 0 then
  78161. pTDefRegMap(@Self)^.clr := $00000010
  78162. else
  78163. pTDefRegMap(@Self)^.&set := $00000010;
  78164. end;
  78165. function TCAN1_C1FIFOCON27.getTXERR : TBits_1; inline;
  78166. begin
  78167. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  78168. end;
  78169. procedure TCAN1_C1FIFOCON27.setTXLARB; inline;
  78170. begin
  78171. pTDefRegMap(@Self)^.&set := $00000020;
  78172. end;
  78173. procedure TCAN1_C1FIFOCON27.clearTXLARB; inline;
  78174. begin
  78175. pTDefRegMap(@Self)^.clr := $00000020;
  78176. end;
  78177. procedure TCAN1_C1FIFOCON27.setTXLARB(thebits : TBits_1); inline;
  78178. begin
  78179. if thebits = 0 then
  78180. pTDefRegMap(@Self)^.clr := $00000020
  78181. else
  78182. pTDefRegMap(@Self)^.&set := $00000020;
  78183. end;
  78184. function TCAN1_C1FIFOCON27.getTXLARB : TBits_1; inline;
  78185. begin
  78186. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  78187. end;
  78188. procedure TCAN1_C1FIFOCON27.setTXABAT; inline;
  78189. begin
  78190. pTDefRegMap(@Self)^.&set := $00000040;
  78191. end;
  78192. procedure TCAN1_C1FIFOCON27.clearTXABAT; inline;
  78193. begin
  78194. pTDefRegMap(@Self)^.clr := $00000040;
  78195. end;
  78196. procedure TCAN1_C1FIFOCON27.setTXABAT(thebits : TBits_1); inline;
  78197. begin
  78198. if thebits = 0 then
  78199. pTDefRegMap(@Self)^.clr := $00000040
  78200. else
  78201. pTDefRegMap(@Self)^.&set := $00000040;
  78202. end;
  78203. function TCAN1_C1FIFOCON27.getTXABAT : TBits_1; inline;
  78204. begin
  78205. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  78206. end;
  78207. procedure TCAN1_C1FIFOCON27.setTXEN; inline;
  78208. begin
  78209. pTDefRegMap(@Self)^.&set := $00000080;
  78210. end;
  78211. procedure TCAN1_C1FIFOCON27.clearTXEN; inline;
  78212. begin
  78213. pTDefRegMap(@Self)^.clr := $00000080;
  78214. end;
  78215. procedure TCAN1_C1FIFOCON27.setTXEN(thebits : TBits_1); inline;
  78216. begin
  78217. if thebits = 0 then
  78218. pTDefRegMap(@Self)^.clr := $00000080
  78219. else
  78220. pTDefRegMap(@Self)^.&set := $00000080;
  78221. end;
  78222. function TCAN1_C1FIFOCON27.getTXEN : TBits_1; inline;
  78223. begin
  78224. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  78225. end;
  78226. procedure TCAN1_C1FIFOCON27.setDONLY; inline;
  78227. begin
  78228. pTDefRegMap(@Self)^.&set := $00001000;
  78229. end;
  78230. procedure TCAN1_C1FIFOCON27.clearDONLY; inline;
  78231. begin
  78232. pTDefRegMap(@Self)^.clr := $00001000;
  78233. end;
  78234. procedure TCAN1_C1FIFOCON27.setDONLY(thebits : TBits_1); inline;
  78235. begin
  78236. if thebits = 0 then
  78237. pTDefRegMap(@Self)^.clr := $00001000
  78238. else
  78239. pTDefRegMap(@Self)^.&set := $00001000;
  78240. end;
  78241. function TCAN1_C1FIFOCON27.getDONLY : TBits_1; inline;
  78242. begin
  78243. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  78244. end;
  78245. procedure TCAN1_C1FIFOCON27.setUINC; inline;
  78246. begin
  78247. pTDefRegMap(@Self)^.&set := $00002000;
  78248. end;
  78249. procedure TCAN1_C1FIFOCON27.clearUINC; inline;
  78250. begin
  78251. pTDefRegMap(@Self)^.clr := $00002000;
  78252. end;
  78253. procedure TCAN1_C1FIFOCON27.setUINC(thebits : TBits_1); inline;
  78254. begin
  78255. if thebits = 0 then
  78256. pTDefRegMap(@Self)^.clr := $00002000
  78257. else
  78258. pTDefRegMap(@Self)^.&set := $00002000;
  78259. end;
  78260. function TCAN1_C1FIFOCON27.getUINC : TBits_1; inline;
  78261. begin
  78262. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  78263. end;
  78264. procedure TCAN1_C1FIFOCON27.setFRESET; inline;
  78265. begin
  78266. pTDefRegMap(@Self)^.&set := $00004000;
  78267. end;
  78268. procedure TCAN1_C1FIFOCON27.clearFRESET; inline;
  78269. begin
  78270. pTDefRegMap(@Self)^.clr := $00004000;
  78271. end;
  78272. procedure TCAN1_C1FIFOCON27.setFRESET(thebits : TBits_1); inline;
  78273. begin
  78274. if thebits = 0 then
  78275. pTDefRegMap(@Self)^.clr := $00004000
  78276. else
  78277. pTDefRegMap(@Self)^.&set := $00004000;
  78278. end;
  78279. function TCAN1_C1FIFOCON27.getFRESET : TBits_1; inline;
  78280. begin
  78281. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  78282. end;
  78283. procedure TCAN1_C1FIFOCON27.setFSIZE(thebits : TBits_5); inline;
  78284. begin
  78285. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  78286. end;
  78287. function TCAN1_C1FIFOCON27.getFSIZE : TBits_5; inline;
  78288. begin
  78289. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  78290. end;
  78291. procedure TCAN1_C1FIFOCON27.setw(thebits : TBits_32); inline;
  78292. begin
  78293. pTDefRegMap(@Self)^.val := thebits;
  78294. end;
  78295. function TCAN1_C1FIFOCON27.getw : TBits_32; inline;
  78296. begin
  78297. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78298. end;
  78299. procedure TCAN1_C1FIFOINT27.setRXNEMPTYIF; inline;
  78300. begin
  78301. pTDefRegMap(@Self)^.&set := $00000001;
  78302. end;
  78303. procedure TCAN1_C1FIFOINT27.clearRXNEMPTYIF; inline;
  78304. begin
  78305. pTDefRegMap(@Self)^.clr := $00000001;
  78306. end;
  78307. procedure TCAN1_C1FIFOINT27.setRXNEMPTYIF(thebits : TBits_1); inline;
  78308. begin
  78309. if thebits = 0 then
  78310. pTDefRegMap(@Self)^.clr := $00000001
  78311. else
  78312. pTDefRegMap(@Self)^.&set := $00000001;
  78313. end;
  78314. function TCAN1_C1FIFOINT27.getRXNEMPTYIF : TBits_1; inline;
  78315. begin
  78316. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  78317. end;
  78318. procedure TCAN1_C1FIFOINT27.setRXHALFIF; inline;
  78319. begin
  78320. pTDefRegMap(@Self)^.&set := $00000002;
  78321. end;
  78322. procedure TCAN1_C1FIFOINT27.clearRXHALFIF; inline;
  78323. begin
  78324. pTDefRegMap(@Self)^.clr := $00000002;
  78325. end;
  78326. procedure TCAN1_C1FIFOINT27.setRXHALFIF(thebits : TBits_1); inline;
  78327. begin
  78328. if thebits = 0 then
  78329. pTDefRegMap(@Self)^.clr := $00000002
  78330. else
  78331. pTDefRegMap(@Self)^.&set := $00000002;
  78332. end;
  78333. function TCAN1_C1FIFOINT27.getRXHALFIF : TBits_1; inline;
  78334. begin
  78335. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  78336. end;
  78337. procedure TCAN1_C1FIFOINT27.setRXFULLIF; inline;
  78338. begin
  78339. pTDefRegMap(@Self)^.&set := $00000004;
  78340. end;
  78341. procedure TCAN1_C1FIFOINT27.clearRXFULLIF; inline;
  78342. begin
  78343. pTDefRegMap(@Self)^.clr := $00000004;
  78344. end;
  78345. procedure TCAN1_C1FIFOINT27.setRXFULLIF(thebits : TBits_1); inline;
  78346. begin
  78347. if thebits = 0 then
  78348. pTDefRegMap(@Self)^.clr := $00000004
  78349. else
  78350. pTDefRegMap(@Self)^.&set := $00000004;
  78351. end;
  78352. function TCAN1_C1FIFOINT27.getRXFULLIF : TBits_1; inline;
  78353. begin
  78354. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  78355. end;
  78356. procedure TCAN1_C1FIFOINT27.setRXOVFLIF; inline;
  78357. begin
  78358. pTDefRegMap(@Self)^.&set := $00000008;
  78359. end;
  78360. procedure TCAN1_C1FIFOINT27.clearRXOVFLIF; inline;
  78361. begin
  78362. pTDefRegMap(@Self)^.clr := $00000008;
  78363. end;
  78364. procedure TCAN1_C1FIFOINT27.setRXOVFLIF(thebits : TBits_1); inline;
  78365. begin
  78366. if thebits = 0 then
  78367. pTDefRegMap(@Self)^.clr := $00000008
  78368. else
  78369. pTDefRegMap(@Self)^.&set := $00000008;
  78370. end;
  78371. function TCAN1_C1FIFOINT27.getRXOVFLIF : TBits_1; inline;
  78372. begin
  78373. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  78374. end;
  78375. procedure TCAN1_C1FIFOINT27.setTXEMPTYIF; inline;
  78376. begin
  78377. pTDefRegMap(@Self)^.&set := $00000100;
  78378. end;
  78379. procedure TCAN1_C1FIFOINT27.clearTXEMPTYIF; inline;
  78380. begin
  78381. pTDefRegMap(@Self)^.clr := $00000100;
  78382. end;
  78383. procedure TCAN1_C1FIFOINT27.setTXEMPTYIF(thebits : TBits_1); inline;
  78384. begin
  78385. if thebits = 0 then
  78386. pTDefRegMap(@Self)^.clr := $00000100
  78387. else
  78388. pTDefRegMap(@Self)^.&set := $00000100;
  78389. end;
  78390. function TCAN1_C1FIFOINT27.getTXEMPTYIF : TBits_1; inline;
  78391. begin
  78392. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  78393. end;
  78394. procedure TCAN1_C1FIFOINT27.setTXHALFIF; inline;
  78395. begin
  78396. pTDefRegMap(@Self)^.&set := $00000200;
  78397. end;
  78398. procedure TCAN1_C1FIFOINT27.clearTXHALFIF; inline;
  78399. begin
  78400. pTDefRegMap(@Self)^.clr := $00000200;
  78401. end;
  78402. procedure TCAN1_C1FIFOINT27.setTXHALFIF(thebits : TBits_1); inline;
  78403. begin
  78404. if thebits = 0 then
  78405. pTDefRegMap(@Self)^.clr := $00000200
  78406. else
  78407. pTDefRegMap(@Self)^.&set := $00000200;
  78408. end;
  78409. function TCAN1_C1FIFOINT27.getTXHALFIF : TBits_1; inline;
  78410. begin
  78411. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  78412. end;
  78413. procedure TCAN1_C1FIFOINT27.setTXNFULLIF; inline;
  78414. begin
  78415. pTDefRegMap(@Self)^.&set := $00000400;
  78416. end;
  78417. procedure TCAN1_C1FIFOINT27.clearTXNFULLIF; inline;
  78418. begin
  78419. pTDefRegMap(@Self)^.clr := $00000400;
  78420. end;
  78421. procedure TCAN1_C1FIFOINT27.setTXNFULLIF(thebits : TBits_1); inline;
  78422. begin
  78423. if thebits = 0 then
  78424. pTDefRegMap(@Self)^.clr := $00000400
  78425. else
  78426. pTDefRegMap(@Self)^.&set := $00000400;
  78427. end;
  78428. function TCAN1_C1FIFOINT27.getTXNFULLIF : TBits_1; inline;
  78429. begin
  78430. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  78431. end;
  78432. procedure TCAN1_C1FIFOINT27.setRXNEMPTYIE; inline;
  78433. begin
  78434. pTDefRegMap(@Self)^.&set := $00010000;
  78435. end;
  78436. procedure TCAN1_C1FIFOINT27.clearRXNEMPTYIE; inline;
  78437. begin
  78438. pTDefRegMap(@Self)^.clr := $00010000;
  78439. end;
  78440. procedure TCAN1_C1FIFOINT27.setRXNEMPTYIE(thebits : TBits_1); inline;
  78441. begin
  78442. if thebits = 0 then
  78443. pTDefRegMap(@Self)^.clr := $00010000
  78444. else
  78445. pTDefRegMap(@Self)^.&set := $00010000;
  78446. end;
  78447. function TCAN1_C1FIFOINT27.getRXNEMPTYIE : TBits_1; inline;
  78448. begin
  78449. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  78450. end;
  78451. procedure TCAN1_C1FIFOINT27.setRXHALFIE; inline;
  78452. begin
  78453. pTDefRegMap(@Self)^.&set := $00020000;
  78454. end;
  78455. procedure TCAN1_C1FIFOINT27.clearRXHALFIE; inline;
  78456. begin
  78457. pTDefRegMap(@Self)^.clr := $00020000;
  78458. end;
  78459. procedure TCAN1_C1FIFOINT27.setRXHALFIE(thebits : TBits_1); inline;
  78460. begin
  78461. if thebits = 0 then
  78462. pTDefRegMap(@Self)^.clr := $00020000
  78463. else
  78464. pTDefRegMap(@Self)^.&set := $00020000;
  78465. end;
  78466. function TCAN1_C1FIFOINT27.getRXHALFIE : TBits_1; inline;
  78467. begin
  78468. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  78469. end;
  78470. procedure TCAN1_C1FIFOINT27.setRXFULLIE; inline;
  78471. begin
  78472. pTDefRegMap(@Self)^.&set := $00040000;
  78473. end;
  78474. procedure TCAN1_C1FIFOINT27.clearRXFULLIE; inline;
  78475. begin
  78476. pTDefRegMap(@Self)^.clr := $00040000;
  78477. end;
  78478. procedure TCAN1_C1FIFOINT27.setRXFULLIE(thebits : TBits_1); inline;
  78479. begin
  78480. if thebits = 0 then
  78481. pTDefRegMap(@Self)^.clr := $00040000
  78482. else
  78483. pTDefRegMap(@Self)^.&set := $00040000;
  78484. end;
  78485. function TCAN1_C1FIFOINT27.getRXFULLIE : TBits_1; inline;
  78486. begin
  78487. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  78488. end;
  78489. procedure TCAN1_C1FIFOINT27.setRXOVFLIE; inline;
  78490. begin
  78491. pTDefRegMap(@Self)^.&set := $00080000;
  78492. end;
  78493. procedure TCAN1_C1FIFOINT27.clearRXOVFLIE; inline;
  78494. begin
  78495. pTDefRegMap(@Self)^.clr := $00080000;
  78496. end;
  78497. procedure TCAN1_C1FIFOINT27.setRXOVFLIE(thebits : TBits_1); inline;
  78498. begin
  78499. if thebits = 0 then
  78500. pTDefRegMap(@Self)^.clr := $00080000
  78501. else
  78502. pTDefRegMap(@Self)^.&set := $00080000;
  78503. end;
  78504. function TCAN1_C1FIFOINT27.getRXOVFLIE : TBits_1; inline;
  78505. begin
  78506. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  78507. end;
  78508. procedure TCAN1_C1FIFOINT27.setTXEMPTYIE; inline;
  78509. begin
  78510. pTDefRegMap(@Self)^.&set := $01000000;
  78511. end;
  78512. procedure TCAN1_C1FIFOINT27.clearTXEMPTYIE; inline;
  78513. begin
  78514. pTDefRegMap(@Self)^.clr := $01000000;
  78515. end;
  78516. procedure TCAN1_C1FIFOINT27.setTXEMPTYIE(thebits : TBits_1); inline;
  78517. begin
  78518. if thebits = 0 then
  78519. pTDefRegMap(@Self)^.clr := $01000000
  78520. else
  78521. pTDefRegMap(@Self)^.&set := $01000000;
  78522. end;
  78523. function TCAN1_C1FIFOINT27.getTXEMPTYIE : TBits_1; inline;
  78524. begin
  78525. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  78526. end;
  78527. procedure TCAN1_C1FIFOINT27.setTXHALFIE; inline;
  78528. begin
  78529. pTDefRegMap(@Self)^.&set := $02000000;
  78530. end;
  78531. procedure TCAN1_C1FIFOINT27.clearTXHALFIE; inline;
  78532. begin
  78533. pTDefRegMap(@Self)^.clr := $02000000;
  78534. end;
  78535. procedure TCAN1_C1FIFOINT27.setTXHALFIE(thebits : TBits_1); inline;
  78536. begin
  78537. if thebits = 0 then
  78538. pTDefRegMap(@Self)^.clr := $02000000
  78539. else
  78540. pTDefRegMap(@Self)^.&set := $02000000;
  78541. end;
  78542. function TCAN1_C1FIFOINT27.getTXHALFIE : TBits_1; inline;
  78543. begin
  78544. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  78545. end;
  78546. procedure TCAN1_C1FIFOINT27.setTXNFULLIE; inline;
  78547. begin
  78548. pTDefRegMap(@Self)^.&set := $04000000;
  78549. end;
  78550. procedure TCAN1_C1FIFOINT27.clearTXNFULLIE; inline;
  78551. begin
  78552. pTDefRegMap(@Self)^.clr := $04000000;
  78553. end;
  78554. procedure TCAN1_C1FIFOINT27.setTXNFULLIE(thebits : TBits_1); inline;
  78555. begin
  78556. if thebits = 0 then
  78557. pTDefRegMap(@Self)^.clr := $04000000
  78558. else
  78559. pTDefRegMap(@Self)^.&set := $04000000;
  78560. end;
  78561. function TCAN1_C1FIFOINT27.getTXNFULLIE : TBits_1; inline;
  78562. begin
  78563. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  78564. end;
  78565. procedure TCAN1_C1FIFOINT27.setw(thebits : TBits_32); inline;
  78566. begin
  78567. pTDefRegMap(@Self)^.val := thebits;
  78568. end;
  78569. function TCAN1_C1FIFOINT27.getw : TBits_32; inline;
  78570. begin
  78571. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78572. end;
  78573. procedure TCAN1_C1FIFOCI27.setCFIFOCI(thebits : TBits_5); inline;
  78574. begin
  78575. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  78576. end;
  78577. function TCAN1_C1FIFOCI27.getCFIFOCI : TBits_5; inline;
  78578. begin
  78579. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  78580. end;
  78581. procedure TCAN1_C1FIFOCI27.setw(thebits : TBits_32); inline;
  78582. begin
  78583. pTDefRegMap(@Self)^.val := thebits;
  78584. end;
  78585. function TCAN1_C1FIFOCI27.getw : TBits_32; inline;
  78586. begin
  78587. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78588. end;
  78589. procedure TCAN1_C1FIFOCON28.setTXPRI(thebits : TBits_2); inline;
  78590. begin
  78591. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  78592. end;
  78593. function TCAN1_C1FIFOCON28.getTXPRI : TBits_2; inline;
  78594. begin
  78595. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  78596. end;
  78597. procedure TCAN1_C1FIFOCON28.setRTREN; inline;
  78598. begin
  78599. pTDefRegMap(@Self)^.&set := $00000004;
  78600. end;
  78601. procedure TCAN1_C1FIFOCON28.clearRTREN; inline;
  78602. begin
  78603. pTDefRegMap(@Self)^.clr := $00000004;
  78604. end;
  78605. procedure TCAN1_C1FIFOCON28.setRTREN(thebits : TBits_1); inline;
  78606. begin
  78607. if thebits = 0 then
  78608. pTDefRegMap(@Self)^.clr := $00000004
  78609. else
  78610. pTDefRegMap(@Self)^.&set := $00000004;
  78611. end;
  78612. function TCAN1_C1FIFOCON28.getRTREN : TBits_1; inline;
  78613. begin
  78614. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  78615. end;
  78616. procedure TCAN1_C1FIFOCON28.setTXREQ; inline;
  78617. begin
  78618. pTDefRegMap(@Self)^.&set := $00000008;
  78619. end;
  78620. procedure TCAN1_C1FIFOCON28.clearTXREQ; inline;
  78621. begin
  78622. pTDefRegMap(@Self)^.clr := $00000008;
  78623. end;
  78624. procedure TCAN1_C1FIFOCON28.setTXREQ(thebits : TBits_1); inline;
  78625. begin
  78626. if thebits = 0 then
  78627. pTDefRegMap(@Self)^.clr := $00000008
  78628. else
  78629. pTDefRegMap(@Self)^.&set := $00000008;
  78630. end;
  78631. function TCAN1_C1FIFOCON28.getTXREQ : TBits_1; inline;
  78632. begin
  78633. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  78634. end;
  78635. procedure TCAN1_C1FIFOCON28.setTXERR; inline;
  78636. begin
  78637. pTDefRegMap(@Self)^.&set := $00000010;
  78638. end;
  78639. procedure TCAN1_C1FIFOCON28.clearTXERR; inline;
  78640. begin
  78641. pTDefRegMap(@Self)^.clr := $00000010;
  78642. end;
  78643. procedure TCAN1_C1FIFOCON28.setTXERR(thebits : TBits_1); inline;
  78644. begin
  78645. if thebits = 0 then
  78646. pTDefRegMap(@Self)^.clr := $00000010
  78647. else
  78648. pTDefRegMap(@Self)^.&set := $00000010;
  78649. end;
  78650. function TCAN1_C1FIFOCON28.getTXERR : TBits_1; inline;
  78651. begin
  78652. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  78653. end;
  78654. procedure TCAN1_C1FIFOCON28.setTXLARB; inline;
  78655. begin
  78656. pTDefRegMap(@Self)^.&set := $00000020;
  78657. end;
  78658. procedure TCAN1_C1FIFOCON28.clearTXLARB; inline;
  78659. begin
  78660. pTDefRegMap(@Self)^.clr := $00000020;
  78661. end;
  78662. procedure TCAN1_C1FIFOCON28.setTXLARB(thebits : TBits_1); inline;
  78663. begin
  78664. if thebits = 0 then
  78665. pTDefRegMap(@Self)^.clr := $00000020
  78666. else
  78667. pTDefRegMap(@Self)^.&set := $00000020;
  78668. end;
  78669. function TCAN1_C1FIFOCON28.getTXLARB : TBits_1; inline;
  78670. begin
  78671. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  78672. end;
  78673. procedure TCAN1_C1FIFOCON28.setTXABAT; inline;
  78674. begin
  78675. pTDefRegMap(@Self)^.&set := $00000040;
  78676. end;
  78677. procedure TCAN1_C1FIFOCON28.clearTXABAT; inline;
  78678. begin
  78679. pTDefRegMap(@Self)^.clr := $00000040;
  78680. end;
  78681. procedure TCAN1_C1FIFOCON28.setTXABAT(thebits : TBits_1); inline;
  78682. begin
  78683. if thebits = 0 then
  78684. pTDefRegMap(@Self)^.clr := $00000040
  78685. else
  78686. pTDefRegMap(@Self)^.&set := $00000040;
  78687. end;
  78688. function TCAN1_C1FIFOCON28.getTXABAT : TBits_1; inline;
  78689. begin
  78690. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  78691. end;
  78692. procedure TCAN1_C1FIFOCON28.setTXEN; inline;
  78693. begin
  78694. pTDefRegMap(@Self)^.&set := $00000080;
  78695. end;
  78696. procedure TCAN1_C1FIFOCON28.clearTXEN; inline;
  78697. begin
  78698. pTDefRegMap(@Self)^.clr := $00000080;
  78699. end;
  78700. procedure TCAN1_C1FIFOCON28.setTXEN(thebits : TBits_1); inline;
  78701. begin
  78702. if thebits = 0 then
  78703. pTDefRegMap(@Self)^.clr := $00000080
  78704. else
  78705. pTDefRegMap(@Self)^.&set := $00000080;
  78706. end;
  78707. function TCAN1_C1FIFOCON28.getTXEN : TBits_1; inline;
  78708. begin
  78709. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  78710. end;
  78711. procedure TCAN1_C1FIFOCON28.setDONLY; inline;
  78712. begin
  78713. pTDefRegMap(@Self)^.&set := $00001000;
  78714. end;
  78715. procedure TCAN1_C1FIFOCON28.clearDONLY; inline;
  78716. begin
  78717. pTDefRegMap(@Self)^.clr := $00001000;
  78718. end;
  78719. procedure TCAN1_C1FIFOCON28.setDONLY(thebits : TBits_1); inline;
  78720. begin
  78721. if thebits = 0 then
  78722. pTDefRegMap(@Self)^.clr := $00001000
  78723. else
  78724. pTDefRegMap(@Self)^.&set := $00001000;
  78725. end;
  78726. function TCAN1_C1FIFOCON28.getDONLY : TBits_1; inline;
  78727. begin
  78728. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  78729. end;
  78730. procedure TCAN1_C1FIFOCON28.setUINC; inline;
  78731. begin
  78732. pTDefRegMap(@Self)^.&set := $00002000;
  78733. end;
  78734. procedure TCAN1_C1FIFOCON28.clearUINC; inline;
  78735. begin
  78736. pTDefRegMap(@Self)^.clr := $00002000;
  78737. end;
  78738. procedure TCAN1_C1FIFOCON28.setUINC(thebits : TBits_1); inline;
  78739. begin
  78740. if thebits = 0 then
  78741. pTDefRegMap(@Self)^.clr := $00002000
  78742. else
  78743. pTDefRegMap(@Self)^.&set := $00002000;
  78744. end;
  78745. function TCAN1_C1FIFOCON28.getUINC : TBits_1; inline;
  78746. begin
  78747. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  78748. end;
  78749. procedure TCAN1_C1FIFOCON28.setFRESET; inline;
  78750. begin
  78751. pTDefRegMap(@Self)^.&set := $00004000;
  78752. end;
  78753. procedure TCAN1_C1FIFOCON28.clearFRESET; inline;
  78754. begin
  78755. pTDefRegMap(@Self)^.clr := $00004000;
  78756. end;
  78757. procedure TCAN1_C1FIFOCON28.setFRESET(thebits : TBits_1); inline;
  78758. begin
  78759. if thebits = 0 then
  78760. pTDefRegMap(@Self)^.clr := $00004000
  78761. else
  78762. pTDefRegMap(@Self)^.&set := $00004000;
  78763. end;
  78764. function TCAN1_C1FIFOCON28.getFRESET : TBits_1; inline;
  78765. begin
  78766. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  78767. end;
  78768. procedure TCAN1_C1FIFOCON28.setFSIZE(thebits : TBits_5); inline;
  78769. begin
  78770. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  78771. end;
  78772. function TCAN1_C1FIFOCON28.getFSIZE : TBits_5; inline;
  78773. begin
  78774. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  78775. end;
  78776. procedure TCAN1_C1FIFOCON28.setw(thebits : TBits_32); inline;
  78777. begin
  78778. pTDefRegMap(@Self)^.val := thebits;
  78779. end;
  78780. function TCAN1_C1FIFOCON28.getw : TBits_32; inline;
  78781. begin
  78782. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78783. end;
  78784. procedure TCAN1_C1FIFOINT28.setRXNEMPTYIF; inline;
  78785. begin
  78786. pTDefRegMap(@Self)^.&set := $00000001;
  78787. end;
  78788. procedure TCAN1_C1FIFOINT28.clearRXNEMPTYIF; inline;
  78789. begin
  78790. pTDefRegMap(@Self)^.clr := $00000001;
  78791. end;
  78792. procedure TCAN1_C1FIFOINT28.setRXNEMPTYIF(thebits : TBits_1); inline;
  78793. begin
  78794. if thebits = 0 then
  78795. pTDefRegMap(@Self)^.clr := $00000001
  78796. else
  78797. pTDefRegMap(@Self)^.&set := $00000001;
  78798. end;
  78799. function TCAN1_C1FIFOINT28.getRXNEMPTYIF : TBits_1; inline;
  78800. begin
  78801. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  78802. end;
  78803. procedure TCAN1_C1FIFOINT28.setRXHALFIF; inline;
  78804. begin
  78805. pTDefRegMap(@Self)^.&set := $00000002;
  78806. end;
  78807. procedure TCAN1_C1FIFOINT28.clearRXHALFIF; inline;
  78808. begin
  78809. pTDefRegMap(@Self)^.clr := $00000002;
  78810. end;
  78811. procedure TCAN1_C1FIFOINT28.setRXHALFIF(thebits : TBits_1); inline;
  78812. begin
  78813. if thebits = 0 then
  78814. pTDefRegMap(@Self)^.clr := $00000002
  78815. else
  78816. pTDefRegMap(@Self)^.&set := $00000002;
  78817. end;
  78818. function TCAN1_C1FIFOINT28.getRXHALFIF : TBits_1; inline;
  78819. begin
  78820. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  78821. end;
  78822. procedure TCAN1_C1FIFOINT28.setRXFULLIF; inline;
  78823. begin
  78824. pTDefRegMap(@Self)^.&set := $00000004;
  78825. end;
  78826. procedure TCAN1_C1FIFOINT28.clearRXFULLIF; inline;
  78827. begin
  78828. pTDefRegMap(@Self)^.clr := $00000004;
  78829. end;
  78830. procedure TCAN1_C1FIFOINT28.setRXFULLIF(thebits : TBits_1); inline;
  78831. begin
  78832. if thebits = 0 then
  78833. pTDefRegMap(@Self)^.clr := $00000004
  78834. else
  78835. pTDefRegMap(@Self)^.&set := $00000004;
  78836. end;
  78837. function TCAN1_C1FIFOINT28.getRXFULLIF : TBits_1; inline;
  78838. begin
  78839. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  78840. end;
  78841. procedure TCAN1_C1FIFOINT28.setRXOVFLIF; inline;
  78842. begin
  78843. pTDefRegMap(@Self)^.&set := $00000008;
  78844. end;
  78845. procedure TCAN1_C1FIFOINT28.clearRXOVFLIF; inline;
  78846. begin
  78847. pTDefRegMap(@Self)^.clr := $00000008;
  78848. end;
  78849. procedure TCAN1_C1FIFOINT28.setRXOVFLIF(thebits : TBits_1); inline;
  78850. begin
  78851. if thebits = 0 then
  78852. pTDefRegMap(@Self)^.clr := $00000008
  78853. else
  78854. pTDefRegMap(@Self)^.&set := $00000008;
  78855. end;
  78856. function TCAN1_C1FIFOINT28.getRXOVFLIF : TBits_1; inline;
  78857. begin
  78858. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  78859. end;
  78860. procedure TCAN1_C1FIFOINT28.setTXEMPTYIF; inline;
  78861. begin
  78862. pTDefRegMap(@Self)^.&set := $00000100;
  78863. end;
  78864. procedure TCAN1_C1FIFOINT28.clearTXEMPTYIF; inline;
  78865. begin
  78866. pTDefRegMap(@Self)^.clr := $00000100;
  78867. end;
  78868. procedure TCAN1_C1FIFOINT28.setTXEMPTYIF(thebits : TBits_1); inline;
  78869. begin
  78870. if thebits = 0 then
  78871. pTDefRegMap(@Self)^.clr := $00000100
  78872. else
  78873. pTDefRegMap(@Self)^.&set := $00000100;
  78874. end;
  78875. function TCAN1_C1FIFOINT28.getTXEMPTYIF : TBits_1; inline;
  78876. begin
  78877. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  78878. end;
  78879. procedure TCAN1_C1FIFOINT28.setTXHALFIF; inline;
  78880. begin
  78881. pTDefRegMap(@Self)^.&set := $00000200;
  78882. end;
  78883. procedure TCAN1_C1FIFOINT28.clearTXHALFIF; inline;
  78884. begin
  78885. pTDefRegMap(@Self)^.clr := $00000200;
  78886. end;
  78887. procedure TCAN1_C1FIFOINT28.setTXHALFIF(thebits : TBits_1); inline;
  78888. begin
  78889. if thebits = 0 then
  78890. pTDefRegMap(@Self)^.clr := $00000200
  78891. else
  78892. pTDefRegMap(@Self)^.&set := $00000200;
  78893. end;
  78894. function TCAN1_C1FIFOINT28.getTXHALFIF : TBits_1; inline;
  78895. begin
  78896. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  78897. end;
  78898. procedure TCAN1_C1FIFOINT28.setTXNFULLIF; inline;
  78899. begin
  78900. pTDefRegMap(@Self)^.&set := $00000400;
  78901. end;
  78902. procedure TCAN1_C1FIFOINT28.clearTXNFULLIF; inline;
  78903. begin
  78904. pTDefRegMap(@Self)^.clr := $00000400;
  78905. end;
  78906. procedure TCAN1_C1FIFOINT28.setTXNFULLIF(thebits : TBits_1); inline;
  78907. begin
  78908. if thebits = 0 then
  78909. pTDefRegMap(@Self)^.clr := $00000400
  78910. else
  78911. pTDefRegMap(@Self)^.&set := $00000400;
  78912. end;
  78913. function TCAN1_C1FIFOINT28.getTXNFULLIF : TBits_1; inline;
  78914. begin
  78915. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  78916. end;
  78917. procedure TCAN1_C1FIFOINT28.setRXNEMPTYIE; inline;
  78918. begin
  78919. pTDefRegMap(@Self)^.&set := $00010000;
  78920. end;
  78921. procedure TCAN1_C1FIFOINT28.clearRXNEMPTYIE; inline;
  78922. begin
  78923. pTDefRegMap(@Self)^.clr := $00010000;
  78924. end;
  78925. procedure TCAN1_C1FIFOINT28.setRXNEMPTYIE(thebits : TBits_1); inline;
  78926. begin
  78927. if thebits = 0 then
  78928. pTDefRegMap(@Self)^.clr := $00010000
  78929. else
  78930. pTDefRegMap(@Self)^.&set := $00010000;
  78931. end;
  78932. function TCAN1_C1FIFOINT28.getRXNEMPTYIE : TBits_1; inline;
  78933. begin
  78934. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  78935. end;
  78936. procedure TCAN1_C1FIFOINT28.setRXHALFIE; inline;
  78937. begin
  78938. pTDefRegMap(@Self)^.&set := $00020000;
  78939. end;
  78940. procedure TCAN1_C1FIFOINT28.clearRXHALFIE; inline;
  78941. begin
  78942. pTDefRegMap(@Self)^.clr := $00020000;
  78943. end;
  78944. procedure TCAN1_C1FIFOINT28.setRXHALFIE(thebits : TBits_1); inline;
  78945. begin
  78946. if thebits = 0 then
  78947. pTDefRegMap(@Self)^.clr := $00020000
  78948. else
  78949. pTDefRegMap(@Self)^.&set := $00020000;
  78950. end;
  78951. function TCAN1_C1FIFOINT28.getRXHALFIE : TBits_1; inline;
  78952. begin
  78953. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  78954. end;
  78955. procedure TCAN1_C1FIFOINT28.setRXFULLIE; inline;
  78956. begin
  78957. pTDefRegMap(@Self)^.&set := $00040000;
  78958. end;
  78959. procedure TCAN1_C1FIFOINT28.clearRXFULLIE; inline;
  78960. begin
  78961. pTDefRegMap(@Self)^.clr := $00040000;
  78962. end;
  78963. procedure TCAN1_C1FIFOINT28.setRXFULLIE(thebits : TBits_1); inline;
  78964. begin
  78965. if thebits = 0 then
  78966. pTDefRegMap(@Self)^.clr := $00040000
  78967. else
  78968. pTDefRegMap(@Self)^.&set := $00040000;
  78969. end;
  78970. function TCAN1_C1FIFOINT28.getRXFULLIE : TBits_1; inline;
  78971. begin
  78972. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  78973. end;
  78974. procedure TCAN1_C1FIFOINT28.setRXOVFLIE; inline;
  78975. begin
  78976. pTDefRegMap(@Self)^.&set := $00080000;
  78977. end;
  78978. procedure TCAN1_C1FIFOINT28.clearRXOVFLIE; inline;
  78979. begin
  78980. pTDefRegMap(@Self)^.clr := $00080000;
  78981. end;
  78982. procedure TCAN1_C1FIFOINT28.setRXOVFLIE(thebits : TBits_1); inline;
  78983. begin
  78984. if thebits = 0 then
  78985. pTDefRegMap(@Self)^.clr := $00080000
  78986. else
  78987. pTDefRegMap(@Self)^.&set := $00080000;
  78988. end;
  78989. function TCAN1_C1FIFOINT28.getRXOVFLIE : TBits_1; inline;
  78990. begin
  78991. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  78992. end;
  78993. procedure TCAN1_C1FIFOINT28.setTXEMPTYIE; inline;
  78994. begin
  78995. pTDefRegMap(@Self)^.&set := $01000000;
  78996. end;
  78997. procedure TCAN1_C1FIFOINT28.clearTXEMPTYIE; inline;
  78998. begin
  78999. pTDefRegMap(@Self)^.clr := $01000000;
  79000. end;
  79001. procedure TCAN1_C1FIFOINT28.setTXEMPTYIE(thebits : TBits_1); inline;
  79002. begin
  79003. if thebits = 0 then
  79004. pTDefRegMap(@Self)^.clr := $01000000
  79005. else
  79006. pTDefRegMap(@Self)^.&set := $01000000;
  79007. end;
  79008. function TCAN1_C1FIFOINT28.getTXEMPTYIE : TBits_1; inline;
  79009. begin
  79010. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  79011. end;
  79012. procedure TCAN1_C1FIFOINT28.setTXHALFIE; inline;
  79013. begin
  79014. pTDefRegMap(@Self)^.&set := $02000000;
  79015. end;
  79016. procedure TCAN1_C1FIFOINT28.clearTXHALFIE; inline;
  79017. begin
  79018. pTDefRegMap(@Self)^.clr := $02000000;
  79019. end;
  79020. procedure TCAN1_C1FIFOINT28.setTXHALFIE(thebits : TBits_1); inline;
  79021. begin
  79022. if thebits = 0 then
  79023. pTDefRegMap(@Self)^.clr := $02000000
  79024. else
  79025. pTDefRegMap(@Self)^.&set := $02000000;
  79026. end;
  79027. function TCAN1_C1FIFOINT28.getTXHALFIE : TBits_1; inline;
  79028. begin
  79029. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  79030. end;
  79031. procedure TCAN1_C1FIFOINT28.setTXNFULLIE; inline;
  79032. begin
  79033. pTDefRegMap(@Self)^.&set := $04000000;
  79034. end;
  79035. procedure TCAN1_C1FIFOINT28.clearTXNFULLIE; inline;
  79036. begin
  79037. pTDefRegMap(@Self)^.clr := $04000000;
  79038. end;
  79039. procedure TCAN1_C1FIFOINT28.setTXNFULLIE(thebits : TBits_1); inline;
  79040. begin
  79041. if thebits = 0 then
  79042. pTDefRegMap(@Self)^.clr := $04000000
  79043. else
  79044. pTDefRegMap(@Self)^.&set := $04000000;
  79045. end;
  79046. function TCAN1_C1FIFOINT28.getTXNFULLIE : TBits_1; inline;
  79047. begin
  79048. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  79049. end;
  79050. procedure TCAN1_C1FIFOINT28.setw(thebits : TBits_32); inline;
  79051. begin
  79052. pTDefRegMap(@Self)^.val := thebits;
  79053. end;
  79054. function TCAN1_C1FIFOINT28.getw : TBits_32; inline;
  79055. begin
  79056. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79057. end;
  79058. procedure TCAN1_C1FIFOCI28.setCFIFOCI(thebits : TBits_5); inline;
  79059. begin
  79060. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  79061. end;
  79062. function TCAN1_C1FIFOCI28.getCFIFOCI : TBits_5; inline;
  79063. begin
  79064. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  79065. end;
  79066. procedure TCAN1_C1FIFOCI28.setw(thebits : TBits_32); inline;
  79067. begin
  79068. pTDefRegMap(@Self)^.val := thebits;
  79069. end;
  79070. function TCAN1_C1FIFOCI28.getw : TBits_32; inline;
  79071. begin
  79072. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79073. end;
  79074. procedure TCAN1_C1FIFOCON29.setTXPRI(thebits : TBits_2); inline;
  79075. begin
  79076. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  79077. end;
  79078. function TCAN1_C1FIFOCON29.getTXPRI : TBits_2; inline;
  79079. begin
  79080. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  79081. end;
  79082. procedure TCAN1_C1FIFOCON29.setRTREN; inline;
  79083. begin
  79084. pTDefRegMap(@Self)^.&set := $00000004;
  79085. end;
  79086. procedure TCAN1_C1FIFOCON29.clearRTREN; inline;
  79087. begin
  79088. pTDefRegMap(@Self)^.clr := $00000004;
  79089. end;
  79090. procedure TCAN1_C1FIFOCON29.setRTREN(thebits : TBits_1); inline;
  79091. begin
  79092. if thebits = 0 then
  79093. pTDefRegMap(@Self)^.clr := $00000004
  79094. else
  79095. pTDefRegMap(@Self)^.&set := $00000004;
  79096. end;
  79097. function TCAN1_C1FIFOCON29.getRTREN : TBits_1; inline;
  79098. begin
  79099. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  79100. end;
  79101. procedure TCAN1_C1FIFOCON29.setTXREQ; inline;
  79102. begin
  79103. pTDefRegMap(@Self)^.&set := $00000008;
  79104. end;
  79105. procedure TCAN1_C1FIFOCON29.clearTXREQ; inline;
  79106. begin
  79107. pTDefRegMap(@Self)^.clr := $00000008;
  79108. end;
  79109. procedure TCAN1_C1FIFOCON29.setTXREQ(thebits : TBits_1); inline;
  79110. begin
  79111. if thebits = 0 then
  79112. pTDefRegMap(@Self)^.clr := $00000008
  79113. else
  79114. pTDefRegMap(@Self)^.&set := $00000008;
  79115. end;
  79116. function TCAN1_C1FIFOCON29.getTXREQ : TBits_1; inline;
  79117. begin
  79118. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  79119. end;
  79120. procedure TCAN1_C1FIFOCON29.setTXERR; inline;
  79121. begin
  79122. pTDefRegMap(@Self)^.&set := $00000010;
  79123. end;
  79124. procedure TCAN1_C1FIFOCON29.clearTXERR; inline;
  79125. begin
  79126. pTDefRegMap(@Self)^.clr := $00000010;
  79127. end;
  79128. procedure TCAN1_C1FIFOCON29.setTXERR(thebits : TBits_1); inline;
  79129. begin
  79130. if thebits = 0 then
  79131. pTDefRegMap(@Self)^.clr := $00000010
  79132. else
  79133. pTDefRegMap(@Self)^.&set := $00000010;
  79134. end;
  79135. function TCAN1_C1FIFOCON29.getTXERR : TBits_1; inline;
  79136. begin
  79137. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  79138. end;
  79139. procedure TCAN1_C1FIFOCON29.setTXLARB; inline;
  79140. begin
  79141. pTDefRegMap(@Self)^.&set := $00000020;
  79142. end;
  79143. procedure TCAN1_C1FIFOCON29.clearTXLARB; inline;
  79144. begin
  79145. pTDefRegMap(@Self)^.clr := $00000020;
  79146. end;
  79147. procedure TCAN1_C1FIFOCON29.setTXLARB(thebits : TBits_1); inline;
  79148. begin
  79149. if thebits = 0 then
  79150. pTDefRegMap(@Self)^.clr := $00000020
  79151. else
  79152. pTDefRegMap(@Self)^.&set := $00000020;
  79153. end;
  79154. function TCAN1_C1FIFOCON29.getTXLARB : TBits_1; inline;
  79155. begin
  79156. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  79157. end;
  79158. procedure TCAN1_C1FIFOCON29.setTXABAT; inline;
  79159. begin
  79160. pTDefRegMap(@Self)^.&set := $00000040;
  79161. end;
  79162. procedure TCAN1_C1FIFOCON29.clearTXABAT; inline;
  79163. begin
  79164. pTDefRegMap(@Self)^.clr := $00000040;
  79165. end;
  79166. procedure TCAN1_C1FIFOCON29.setTXABAT(thebits : TBits_1); inline;
  79167. begin
  79168. if thebits = 0 then
  79169. pTDefRegMap(@Self)^.clr := $00000040
  79170. else
  79171. pTDefRegMap(@Self)^.&set := $00000040;
  79172. end;
  79173. function TCAN1_C1FIFOCON29.getTXABAT : TBits_1; inline;
  79174. begin
  79175. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  79176. end;
  79177. procedure TCAN1_C1FIFOCON29.setTXEN; inline;
  79178. begin
  79179. pTDefRegMap(@Self)^.&set := $00000080;
  79180. end;
  79181. procedure TCAN1_C1FIFOCON29.clearTXEN; inline;
  79182. begin
  79183. pTDefRegMap(@Self)^.clr := $00000080;
  79184. end;
  79185. procedure TCAN1_C1FIFOCON29.setTXEN(thebits : TBits_1); inline;
  79186. begin
  79187. if thebits = 0 then
  79188. pTDefRegMap(@Self)^.clr := $00000080
  79189. else
  79190. pTDefRegMap(@Self)^.&set := $00000080;
  79191. end;
  79192. function TCAN1_C1FIFOCON29.getTXEN : TBits_1; inline;
  79193. begin
  79194. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  79195. end;
  79196. procedure TCAN1_C1FIFOCON29.setDONLY; inline;
  79197. begin
  79198. pTDefRegMap(@Self)^.&set := $00001000;
  79199. end;
  79200. procedure TCAN1_C1FIFOCON29.clearDONLY; inline;
  79201. begin
  79202. pTDefRegMap(@Self)^.clr := $00001000;
  79203. end;
  79204. procedure TCAN1_C1FIFOCON29.setDONLY(thebits : TBits_1); inline;
  79205. begin
  79206. if thebits = 0 then
  79207. pTDefRegMap(@Self)^.clr := $00001000
  79208. else
  79209. pTDefRegMap(@Self)^.&set := $00001000;
  79210. end;
  79211. function TCAN1_C1FIFOCON29.getDONLY : TBits_1; inline;
  79212. begin
  79213. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  79214. end;
  79215. procedure TCAN1_C1FIFOCON29.setUINC; inline;
  79216. begin
  79217. pTDefRegMap(@Self)^.&set := $00002000;
  79218. end;
  79219. procedure TCAN1_C1FIFOCON29.clearUINC; inline;
  79220. begin
  79221. pTDefRegMap(@Self)^.clr := $00002000;
  79222. end;
  79223. procedure TCAN1_C1FIFOCON29.setUINC(thebits : TBits_1); inline;
  79224. begin
  79225. if thebits = 0 then
  79226. pTDefRegMap(@Self)^.clr := $00002000
  79227. else
  79228. pTDefRegMap(@Self)^.&set := $00002000;
  79229. end;
  79230. function TCAN1_C1FIFOCON29.getUINC : TBits_1; inline;
  79231. begin
  79232. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  79233. end;
  79234. procedure TCAN1_C1FIFOCON29.setFRESET; inline;
  79235. begin
  79236. pTDefRegMap(@Self)^.&set := $00004000;
  79237. end;
  79238. procedure TCAN1_C1FIFOCON29.clearFRESET; inline;
  79239. begin
  79240. pTDefRegMap(@Self)^.clr := $00004000;
  79241. end;
  79242. procedure TCAN1_C1FIFOCON29.setFRESET(thebits : TBits_1); inline;
  79243. begin
  79244. if thebits = 0 then
  79245. pTDefRegMap(@Self)^.clr := $00004000
  79246. else
  79247. pTDefRegMap(@Self)^.&set := $00004000;
  79248. end;
  79249. function TCAN1_C1FIFOCON29.getFRESET : TBits_1; inline;
  79250. begin
  79251. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  79252. end;
  79253. procedure TCAN1_C1FIFOCON29.setFSIZE(thebits : TBits_5); inline;
  79254. begin
  79255. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  79256. end;
  79257. function TCAN1_C1FIFOCON29.getFSIZE : TBits_5; inline;
  79258. begin
  79259. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  79260. end;
  79261. procedure TCAN1_C1FIFOCON29.setw(thebits : TBits_32); inline;
  79262. begin
  79263. pTDefRegMap(@Self)^.val := thebits;
  79264. end;
  79265. function TCAN1_C1FIFOCON29.getw : TBits_32; inline;
  79266. begin
  79267. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79268. end;
  79269. procedure TCAN1_C1FIFOINT29.setRXNEMPTYIF; inline;
  79270. begin
  79271. pTDefRegMap(@Self)^.&set := $00000001;
  79272. end;
  79273. procedure TCAN1_C1FIFOINT29.clearRXNEMPTYIF; inline;
  79274. begin
  79275. pTDefRegMap(@Self)^.clr := $00000001;
  79276. end;
  79277. procedure TCAN1_C1FIFOINT29.setRXNEMPTYIF(thebits : TBits_1); inline;
  79278. begin
  79279. if thebits = 0 then
  79280. pTDefRegMap(@Self)^.clr := $00000001
  79281. else
  79282. pTDefRegMap(@Self)^.&set := $00000001;
  79283. end;
  79284. function TCAN1_C1FIFOINT29.getRXNEMPTYIF : TBits_1; inline;
  79285. begin
  79286. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  79287. end;
  79288. procedure TCAN1_C1FIFOINT29.setRXHALFIF; inline;
  79289. begin
  79290. pTDefRegMap(@Self)^.&set := $00000002;
  79291. end;
  79292. procedure TCAN1_C1FIFOINT29.clearRXHALFIF; inline;
  79293. begin
  79294. pTDefRegMap(@Self)^.clr := $00000002;
  79295. end;
  79296. procedure TCAN1_C1FIFOINT29.setRXHALFIF(thebits : TBits_1); inline;
  79297. begin
  79298. if thebits = 0 then
  79299. pTDefRegMap(@Self)^.clr := $00000002
  79300. else
  79301. pTDefRegMap(@Self)^.&set := $00000002;
  79302. end;
  79303. function TCAN1_C1FIFOINT29.getRXHALFIF : TBits_1; inline;
  79304. begin
  79305. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  79306. end;
  79307. procedure TCAN1_C1FIFOINT29.setRXFULLIF; inline;
  79308. begin
  79309. pTDefRegMap(@Self)^.&set := $00000004;
  79310. end;
  79311. procedure TCAN1_C1FIFOINT29.clearRXFULLIF; inline;
  79312. begin
  79313. pTDefRegMap(@Self)^.clr := $00000004;
  79314. end;
  79315. procedure TCAN1_C1FIFOINT29.setRXFULLIF(thebits : TBits_1); inline;
  79316. begin
  79317. if thebits = 0 then
  79318. pTDefRegMap(@Self)^.clr := $00000004
  79319. else
  79320. pTDefRegMap(@Self)^.&set := $00000004;
  79321. end;
  79322. function TCAN1_C1FIFOINT29.getRXFULLIF : TBits_1; inline;
  79323. begin
  79324. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  79325. end;
  79326. procedure TCAN1_C1FIFOINT29.setRXOVFLIF; inline;
  79327. begin
  79328. pTDefRegMap(@Self)^.&set := $00000008;
  79329. end;
  79330. procedure TCAN1_C1FIFOINT29.clearRXOVFLIF; inline;
  79331. begin
  79332. pTDefRegMap(@Self)^.clr := $00000008;
  79333. end;
  79334. procedure TCAN1_C1FIFOINT29.setRXOVFLIF(thebits : TBits_1); inline;
  79335. begin
  79336. if thebits = 0 then
  79337. pTDefRegMap(@Self)^.clr := $00000008
  79338. else
  79339. pTDefRegMap(@Self)^.&set := $00000008;
  79340. end;
  79341. function TCAN1_C1FIFOINT29.getRXOVFLIF : TBits_1; inline;
  79342. begin
  79343. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  79344. end;
  79345. procedure TCAN1_C1FIFOINT29.setTXEMPTYIF; inline;
  79346. begin
  79347. pTDefRegMap(@Self)^.&set := $00000100;
  79348. end;
  79349. procedure TCAN1_C1FIFOINT29.clearTXEMPTYIF; inline;
  79350. begin
  79351. pTDefRegMap(@Self)^.clr := $00000100;
  79352. end;
  79353. procedure TCAN1_C1FIFOINT29.setTXEMPTYIF(thebits : TBits_1); inline;
  79354. begin
  79355. if thebits = 0 then
  79356. pTDefRegMap(@Self)^.clr := $00000100
  79357. else
  79358. pTDefRegMap(@Self)^.&set := $00000100;
  79359. end;
  79360. function TCAN1_C1FIFOINT29.getTXEMPTYIF : TBits_1; inline;
  79361. begin
  79362. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  79363. end;
  79364. procedure TCAN1_C1FIFOINT29.setTXHALFIF; inline;
  79365. begin
  79366. pTDefRegMap(@Self)^.&set := $00000200;
  79367. end;
  79368. procedure TCAN1_C1FIFOINT29.clearTXHALFIF; inline;
  79369. begin
  79370. pTDefRegMap(@Self)^.clr := $00000200;
  79371. end;
  79372. procedure TCAN1_C1FIFOINT29.setTXHALFIF(thebits : TBits_1); inline;
  79373. begin
  79374. if thebits = 0 then
  79375. pTDefRegMap(@Self)^.clr := $00000200
  79376. else
  79377. pTDefRegMap(@Self)^.&set := $00000200;
  79378. end;
  79379. function TCAN1_C1FIFOINT29.getTXHALFIF : TBits_1; inline;
  79380. begin
  79381. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  79382. end;
  79383. procedure TCAN1_C1FIFOINT29.setTXNFULLIF; inline;
  79384. begin
  79385. pTDefRegMap(@Self)^.&set := $00000400;
  79386. end;
  79387. procedure TCAN1_C1FIFOINT29.clearTXNFULLIF; inline;
  79388. begin
  79389. pTDefRegMap(@Self)^.clr := $00000400;
  79390. end;
  79391. procedure TCAN1_C1FIFOINT29.setTXNFULLIF(thebits : TBits_1); inline;
  79392. begin
  79393. if thebits = 0 then
  79394. pTDefRegMap(@Self)^.clr := $00000400
  79395. else
  79396. pTDefRegMap(@Self)^.&set := $00000400;
  79397. end;
  79398. function TCAN1_C1FIFOINT29.getTXNFULLIF : TBits_1; inline;
  79399. begin
  79400. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  79401. end;
  79402. procedure TCAN1_C1FIFOINT29.setRXNEMPTYIE; inline;
  79403. begin
  79404. pTDefRegMap(@Self)^.&set := $00010000;
  79405. end;
  79406. procedure TCAN1_C1FIFOINT29.clearRXNEMPTYIE; inline;
  79407. begin
  79408. pTDefRegMap(@Self)^.clr := $00010000;
  79409. end;
  79410. procedure TCAN1_C1FIFOINT29.setRXNEMPTYIE(thebits : TBits_1); inline;
  79411. begin
  79412. if thebits = 0 then
  79413. pTDefRegMap(@Self)^.clr := $00010000
  79414. else
  79415. pTDefRegMap(@Self)^.&set := $00010000;
  79416. end;
  79417. function TCAN1_C1FIFOINT29.getRXNEMPTYIE : TBits_1; inline;
  79418. begin
  79419. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  79420. end;
  79421. procedure TCAN1_C1FIFOINT29.setRXHALFIE; inline;
  79422. begin
  79423. pTDefRegMap(@Self)^.&set := $00020000;
  79424. end;
  79425. procedure TCAN1_C1FIFOINT29.clearRXHALFIE; inline;
  79426. begin
  79427. pTDefRegMap(@Self)^.clr := $00020000;
  79428. end;
  79429. procedure TCAN1_C1FIFOINT29.setRXHALFIE(thebits : TBits_1); inline;
  79430. begin
  79431. if thebits = 0 then
  79432. pTDefRegMap(@Self)^.clr := $00020000
  79433. else
  79434. pTDefRegMap(@Self)^.&set := $00020000;
  79435. end;
  79436. function TCAN1_C1FIFOINT29.getRXHALFIE : TBits_1; inline;
  79437. begin
  79438. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  79439. end;
  79440. procedure TCAN1_C1FIFOINT29.setRXFULLIE; inline;
  79441. begin
  79442. pTDefRegMap(@Self)^.&set := $00040000;
  79443. end;
  79444. procedure TCAN1_C1FIFOINT29.clearRXFULLIE; inline;
  79445. begin
  79446. pTDefRegMap(@Self)^.clr := $00040000;
  79447. end;
  79448. procedure TCAN1_C1FIFOINT29.setRXFULLIE(thebits : TBits_1); inline;
  79449. begin
  79450. if thebits = 0 then
  79451. pTDefRegMap(@Self)^.clr := $00040000
  79452. else
  79453. pTDefRegMap(@Self)^.&set := $00040000;
  79454. end;
  79455. function TCAN1_C1FIFOINT29.getRXFULLIE : TBits_1; inline;
  79456. begin
  79457. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  79458. end;
  79459. procedure TCAN1_C1FIFOINT29.setRXOVFLIE; inline;
  79460. begin
  79461. pTDefRegMap(@Self)^.&set := $00080000;
  79462. end;
  79463. procedure TCAN1_C1FIFOINT29.clearRXOVFLIE; inline;
  79464. begin
  79465. pTDefRegMap(@Self)^.clr := $00080000;
  79466. end;
  79467. procedure TCAN1_C1FIFOINT29.setRXOVFLIE(thebits : TBits_1); inline;
  79468. begin
  79469. if thebits = 0 then
  79470. pTDefRegMap(@Self)^.clr := $00080000
  79471. else
  79472. pTDefRegMap(@Self)^.&set := $00080000;
  79473. end;
  79474. function TCAN1_C1FIFOINT29.getRXOVFLIE : TBits_1; inline;
  79475. begin
  79476. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  79477. end;
  79478. procedure TCAN1_C1FIFOINT29.setTXEMPTYIE; inline;
  79479. begin
  79480. pTDefRegMap(@Self)^.&set := $01000000;
  79481. end;
  79482. procedure TCAN1_C1FIFOINT29.clearTXEMPTYIE; inline;
  79483. begin
  79484. pTDefRegMap(@Self)^.clr := $01000000;
  79485. end;
  79486. procedure TCAN1_C1FIFOINT29.setTXEMPTYIE(thebits : TBits_1); inline;
  79487. begin
  79488. if thebits = 0 then
  79489. pTDefRegMap(@Self)^.clr := $01000000
  79490. else
  79491. pTDefRegMap(@Self)^.&set := $01000000;
  79492. end;
  79493. function TCAN1_C1FIFOINT29.getTXEMPTYIE : TBits_1; inline;
  79494. begin
  79495. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  79496. end;
  79497. procedure TCAN1_C1FIFOINT29.setTXHALFIE; inline;
  79498. begin
  79499. pTDefRegMap(@Self)^.&set := $02000000;
  79500. end;
  79501. procedure TCAN1_C1FIFOINT29.clearTXHALFIE; inline;
  79502. begin
  79503. pTDefRegMap(@Self)^.clr := $02000000;
  79504. end;
  79505. procedure TCAN1_C1FIFOINT29.setTXHALFIE(thebits : TBits_1); inline;
  79506. begin
  79507. if thebits = 0 then
  79508. pTDefRegMap(@Self)^.clr := $02000000
  79509. else
  79510. pTDefRegMap(@Self)^.&set := $02000000;
  79511. end;
  79512. function TCAN1_C1FIFOINT29.getTXHALFIE : TBits_1; inline;
  79513. begin
  79514. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  79515. end;
  79516. procedure TCAN1_C1FIFOINT29.setTXNFULLIE; inline;
  79517. begin
  79518. pTDefRegMap(@Self)^.&set := $04000000;
  79519. end;
  79520. procedure TCAN1_C1FIFOINT29.clearTXNFULLIE; inline;
  79521. begin
  79522. pTDefRegMap(@Self)^.clr := $04000000;
  79523. end;
  79524. procedure TCAN1_C1FIFOINT29.setTXNFULLIE(thebits : TBits_1); inline;
  79525. begin
  79526. if thebits = 0 then
  79527. pTDefRegMap(@Self)^.clr := $04000000
  79528. else
  79529. pTDefRegMap(@Self)^.&set := $04000000;
  79530. end;
  79531. function TCAN1_C1FIFOINT29.getTXNFULLIE : TBits_1; inline;
  79532. begin
  79533. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  79534. end;
  79535. procedure TCAN1_C1FIFOINT29.setw(thebits : TBits_32); inline;
  79536. begin
  79537. pTDefRegMap(@Self)^.val := thebits;
  79538. end;
  79539. function TCAN1_C1FIFOINT29.getw : TBits_32; inline;
  79540. begin
  79541. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79542. end;
  79543. procedure TCAN1_C1FIFOCI29.setCFIFOCI(thebits : TBits_5); inline;
  79544. begin
  79545. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  79546. end;
  79547. function TCAN1_C1FIFOCI29.getCFIFOCI : TBits_5; inline;
  79548. begin
  79549. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  79550. end;
  79551. procedure TCAN1_C1FIFOCI29.setw(thebits : TBits_32); inline;
  79552. begin
  79553. pTDefRegMap(@Self)^.val := thebits;
  79554. end;
  79555. function TCAN1_C1FIFOCI29.getw : TBits_32; inline;
  79556. begin
  79557. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79558. end;
  79559. procedure TCAN1_C1FIFOCON30.setTXPRI(thebits : TBits_2); inline;
  79560. begin
  79561. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  79562. end;
  79563. function TCAN1_C1FIFOCON30.getTXPRI : TBits_2; inline;
  79564. begin
  79565. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  79566. end;
  79567. procedure TCAN1_C1FIFOCON30.setRTREN; inline;
  79568. begin
  79569. pTDefRegMap(@Self)^.&set := $00000004;
  79570. end;
  79571. procedure TCAN1_C1FIFOCON30.clearRTREN; inline;
  79572. begin
  79573. pTDefRegMap(@Self)^.clr := $00000004;
  79574. end;
  79575. procedure TCAN1_C1FIFOCON30.setRTREN(thebits : TBits_1); inline;
  79576. begin
  79577. if thebits = 0 then
  79578. pTDefRegMap(@Self)^.clr := $00000004
  79579. else
  79580. pTDefRegMap(@Self)^.&set := $00000004;
  79581. end;
  79582. function TCAN1_C1FIFOCON30.getRTREN : TBits_1; inline;
  79583. begin
  79584. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  79585. end;
  79586. procedure TCAN1_C1FIFOCON30.setTXREQ; inline;
  79587. begin
  79588. pTDefRegMap(@Self)^.&set := $00000008;
  79589. end;
  79590. procedure TCAN1_C1FIFOCON30.clearTXREQ; inline;
  79591. begin
  79592. pTDefRegMap(@Self)^.clr := $00000008;
  79593. end;
  79594. procedure TCAN1_C1FIFOCON30.setTXREQ(thebits : TBits_1); inline;
  79595. begin
  79596. if thebits = 0 then
  79597. pTDefRegMap(@Self)^.clr := $00000008
  79598. else
  79599. pTDefRegMap(@Self)^.&set := $00000008;
  79600. end;
  79601. function TCAN1_C1FIFOCON30.getTXREQ : TBits_1; inline;
  79602. begin
  79603. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  79604. end;
  79605. procedure TCAN1_C1FIFOCON30.setTXERR; inline;
  79606. begin
  79607. pTDefRegMap(@Self)^.&set := $00000010;
  79608. end;
  79609. procedure TCAN1_C1FIFOCON30.clearTXERR; inline;
  79610. begin
  79611. pTDefRegMap(@Self)^.clr := $00000010;
  79612. end;
  79613. procedure TCAN1_C1FIFOCON30.setTXERR(thebits : TBits_1); inline;
  79614. begin
  79615. if thebits = 0 then
  79616. pTDefRegMap(@Self)^.clr := $00000010
  79617. else
  79618. pTDefRegMap(@Self)^.&set := $00000010;
  79619. end;
  79620. function TCAN1_C1FIFOCON30.getTXERR : TBits_1; inline;
  79621. begin
  79622. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  79623. end;
  79624. procedure TCAN1_C1FIFOCON30.setTXLARB; inline;
  79625. begin
  79626. pTDefRegMap(@Self)^.&set := $00000020;
  79627. end;
  79628. procedure TCAN1_C1FIFOCON30.clearTXLARB; inline;
  79629. begin
  79630. pTDefRegMap(@Self)^.clr := $00000020;
  79631. end;
  79632. procedure TCAN1_C1FIFOCON30.setTXLARB(thebits : TBits_1); inline;
  79633. begin
  79634. if thebits = 0 then
  79635. pTDefRegMap(@Self)^.clr := $00000020
  79636. else
  79637. pTDefRegMap(@Self)^.&set := $00000020;
  79638. end;
  79639. function TCAN1_C1FIFOCON30.getTXLARB : TBits_1; inline;
  79640. begin
  79641. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  79642. end;
  79643. procedure TCAN1_C1FIFOCON30.setTXABAT; inline;
  79644. begin
  79645. pTDefRegMap(@Self)^.&set := $00000040;
  79646. end;
  79647. procedure TCAN1_C1FIFOCON30.clearTXABAT; inline;
  79648. begin
  79649. pTDefRegMap(@Self)^.clr := $00000040;
  79650. end;
  79651. procedure TCAN1_C1FIFOCON30.setTXABAT(thebits : TBits_1); inline;
  79652. begin
  79653. if thebits = 0 then
  79654. pTDefRegMap(@Self)^.clr := $00000040
  79655. else
  79656. pTDefRegMap(@Self)^.&set := $00000040;
  79657. end;
  79658. function TCAN1_C1FIFOCON30.getTXABAT : TBits_1; inline;
  79659. begin
  79660. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  79661. end;
  79662. procedure TCAN1_C1FIFOCON30.setTXEN; inline;
  79663. begin
  79664. pTDefRegMap(@Self)^.&set := $00000080;
  79665. end;
  79666. procedure TCAN1_C1FIFOCON30.clearTXEN; inline;
  79667. begin
  79668. pTDefRegMap(@Self)^.clr := $00000080;
  79669. end;
  79670. procedure TCAN1_C1FIFOCON30.setTXEN(thebits : TBits_1); inline;
  79671. begin
  79672. if thebits = 0 then
  79673. pTDefRegMap(@Self)^.clr := $00000080
  79674. else
  79675. pTDefRegMap(@Self)^.&set := $00000080;
  79676. end;
  79677. function TCAN1_C1FIFOCON30.getTXEN : TBits_1; inline;
  79678. begin
  79679. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  79680. end;
  79681. procedure TCAN1_C1FIFOCON30.setDONLY; inline;
  79682. begin
  79683. pTDefRegMap(@Self)^.&set := $00001000;
  79684. end;
  79685. procedure TCAN1_C1FIFOCON30.clearDONLY; inline;
  79686. begin
  79687. pTDefRegMap(@Self)^.clr := $00001000;
  79688. end;
  79689. procedure TCAN1_C1FIFOCON30.setDONLY(thebits : TBits_1); inline;
  79690. begin
  79691. if thebits = 0 then
  79692. pTDefRegMap(@Self)^.clr := $00001000
  79693. else
  79694. pTDefRegMap(@Self)^.&set := $00001000;
  79695. end;
  79696. function TCAN1_C1FIFOCON30.getDONLY : TBits_1; inline;
  79697. begin
  79698. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  79699. end;
  79700. procedure TCAN1_C1FIFOCON30.setUINC; inline;
  79701. begin
  79702. pTDefRegMap(@Self)^.&set := $00002000;
  79703. end;
  79704. procedure TCAN1_C1FIFOCON30.clearUINC; inline;
  79705. begin
  79706. pTDefRegMap(@Self)^.clr := $00002000;
  79707. end;
  79708. procedure TCAN1_C1FIFOCON30.setUINC(thebits : TBits_1); inline;
  79709. begin
  79710. if thebits = 0 then
  79711. pTDefRegMap(@Self)^.clr := $00002000
  79712. else
  79713. pTDefRegMap(@Self)^.&set := $00002000;
  79714. end;
  79715. function TCAN1_C1FIFOCON30.getUINC : TBits_1; inline;
  79716. begin
  79717. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  79718. end;
  79719. procedure TCAN1_C1FIFOCON30.setFRESET; inline;
  79720. begin
  79721. pTDefRegMap(@Self)^.&set := $00004000;
  79722. end;
  79723. procedure TCAN1_C1FIFOCON30.clearFRESET; inline;
  79724. begin
  79725. pTDefRegMap(@Self)^.clr := $00004000;
  79726. end;
  79727. procedure TCAN1_C1FIFOCON30.setFRESET(thebits : TBits_1); inline;
  79728. begin
  79729. if thebits = 0 then
  79730. pTDefRegMap(@Self)^.clr := $00004000
  79731. else
  79732. pTDefRegMap(@Self)^.&set := $00004000;
  79733. end;
  79734. function TCAN1_C1FIFOCON30.getFRESET : TBits_1; inline;
  79735. begin
  79736. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  79737. end;
  79738. procedure TCAN1_C1FIFOCON30.setFSIZE(thebits : TBits_5); inline;
  79739. begin
  79740. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  79741. end;
  79742. function TCAN1_C1FIFOCON30.getFSIZE : TBits_5; inline;
  79743. begin
  79744. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  79745. end;
  79746. procedure TCAN1_C1FIFOCON30.setw(thebits : TBits_32); inline;
  79747. begin
  79748. pTDefRegMap(@Self)^.val := thebits;
  79749. end;
  79750. function TCAN1_C1FIFOCON30.getw : TBits_32; inline;
  79751. begin
  79752. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79753. end;
  79754. procedure TCAN1_C1FIFOINT30.setRXNEMPTYIF; inline;
  79755. begin
  79756. pTDefRegMap(@Self)^.&set := $00000001;
  79757. end;
  79758. procedure TCAN1_C1FIFOINT30.clearRXNEMPTYIF; inline;
  79759. begin
  79760. pTDefRegMap(@Self)^.clr := $00000001;
  79761. end;
  79762. procedure TCAN1_C1FIFOINT30.setRXNEMPTYIF(thebits : TBits_1); inline;
  79763. begin
  79764. if thebits = 0 then
  79765. pTDefRegMap(@Self)^.clr := $00000001
  79766. else
  79767. pTDefRegMap(@Self)^.&set := $00000001;
  79768. end;
  79769. function TCAN1_C1FIFOINT30.getRXNEMPTYIF : TBits_1; inline;
  79770. begin
  79771. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  79772. end;
  79773. procedure TCAN1_C1FIFOINT30.setRXHALFIF; inline;
  79774. begin
  79775. pTDefRegMap(@Self)^.&set := $00000002;
  79776. end;
  79777. procedure TCAN1_C1FIFOINT30.clearRXHALFIF; inline;
  79778. begin
  79779. pTDefRegMap(@Self)^.clr := $00000002;
  79780. end;
  79781. procedure TCAN1_C1FIFOINT30.setRXHALFIF(thebits : TBits_1); inline;
  79782. begin
  79783. if thebits = 0 then
  79784. pTDefRegMap(@Self)^.clr := $00000002
  79785. else
  79786. pTDefRegMap(@Self)^.&set := $00000002;
  79787. end;
  79788. function TCAN1_C1FIFOINT30.getRXHALFIF : TBits_1; inline;
  79789. begin
  79790. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  79791. end;
  79792. procedure TCAN1_C1FIFOINT30.setRXFULLIF; inline;
  79793. begin
  79794. pTDefRegMap(@Self)^.&set := $00000004;
  79795. end;
  79796. procedure TCAN1_C1FIFOINT30.clearRXFULLIF; inline;
  79797. begin
  79798. pTDefRegMap(@Self)^.clr := $00000004;
  79799. end;
  79800. procedure TCAN1_C1FIFOINT30.setRXFULLIF(thebits : TBits_1); inline;
  79801. begin
  79802. if thebits = 0 then
  79803. pTDefRegMap(@Self)^.clr := $00000004
  79804. else
  79805. pTDefRegMap(@Self)^.&set := $00000004;
  79806. end;
  79807. function TCAN1_C1FIFOINT30.getRXFULLIF : TBits_1; inline;
  79808. begin
  79809. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  79810. end;
  79811. procedure TCAN1_C1FIFOINT30.setRXOVFLIF; inline;
  79812. begin
  79813. pTDefRegMap(@Self)^.&set := $00000008;
  79814. end;
  79815. procedure TCAN1_C1FIFOINT30.clearRXOVFLIF; inline;
  79816. begin
  79817. pTDefRegMap(@Self)^.clr := $00000008;
  79818. end;
  79819. procedure TCAN1_C1FIFOINT30.setRXOVFLIF(thebits : TBits_1); inline;
  79820. begin
  79821. if thebits = 0 then
  79822. pTDefRegMap(@Self)^.clr := $00000008
  79823. else
  79824. pTDefRegMap(@Self)^.&set := $00000008;
  79825. end;
  79826. function TCAN1_C1FIFOINT30.getRXOVFLIF : TBits_1; inline;
  79827. begin
  79828. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  79829. end;
  79830. procedure TCAN1_C1FIFOINT30.setTXEMPTYIF; inline;
  79831. begin
  79832. pTDefRegMap(@Self)^.&set := $00000100;
  79833. end;
  79834. procedure TCAN1_C1FIFOINT30.clearTXEMPTYIF; inline;
  79835. begin
  79836. pTDefRegMap(@Self)^.clr := $00000100;
  79837. end;
  79838. procedure TCAN1_C1FIFOINT30.setTXEMPTYIF(thebits : TBits_1); inline;
  79839. begin
  79840. if thebits = 0 then
  79841. pTDefRegMap(@Self)^.clr := $00000100
  79842. else
  79843. pTDefRegMap(@Self)^.&set := $00000100;
  79844. end;
  79845. function TCAN1_C1FIFOINT30.getTXEMPTYIF : TBits_1; inline;
  79846. begin
  79847. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  79848. end;
  79849. procedure TCAN1_C1FIFOINT30.setTXHALFIF; inline;
  79850. begin
  79851. pTDefRegMap(@Self)^.&set := $00000200;
  79852. end;
  79853. procedure TCAN1_C1FIFOINT30.clearTXHALFIF; inline;
  79854. begin
  79855. pTDefRegMap(@Self)^.clr := $00000200;
  79856. end;
  79857. procedure TCAN1_C1FIFOINT30.setTXHALFIF(thebits : TBits_1); inline;
  79858. begin
  79859. if thebits = 0 then
  79860. pTDefRegMap(@Self)^.clr := $00000200
  79861. else
  79862. pTDefRegMap(@Self)^.&set := $00000200;
  79863. end;
  79864. function TCAN1_C1FIFOINT30.getTXHALFIF : TBits_1; inline;
  79865. begin
  79866. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  79867. end;
  79868. procedure TCAN1_C1FIFOINT30.setTXNFULLIF; inline;
  79869. begin
  79870. pTDefRegMap(@Self)^.&set := $00000400;
  79871. end;
  79872. procedure TCAN1_C1FIFOINT30.clearTXNFULLIF; inline;
  79873. begin
  79874. pTDefRegMap(@Self)^.clr := $00000400;
  79875. end;
  79876. procedure TCAN1_C1FIFOINT30.setTXNFULLIF(thebits : TBits_1); inline;
  79877. begin
  79878. if thebits = 0 then
  79879. pTDefRegMap(@Self)^.clr := $00000400
  79880. else
  79881. pTDefRegMap(@Self)^.&set := $00000400;
  79882. end;
  79883. function TCAN1_C1FIFOINT30.getTXNFULLIF : TBits_1; inline;
  79884. begin
  79885. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  79886. end;
  79887. procedure TCAN1_C1FIFOINT30.setRXNEMPTYIE; inline;
  79888. begin
  79889. pTDefRegMap(@Self)^.&set := $00010000;
  79890. end;
  79891. procedure TCAN1_C1FIFOINT30.clearRXNEMPTYIE; inline;
  79892. begin
  79893. pTDefRegMap(@Self)^.clr := $00010000;
  79894. end;
  79895. procedure TCAN1_C1FIFOINT30.setRXNEMPTYIE(thebits : TBits_1); inline;
  79896. begin
  79897. if thebits = 0 then
  79898. pTDefRegMap(@Self)^.clr := $00010000
  79899. else
  79900. pTDefRegMap(@Self)^.&set := $00010000;
  79901. end;
  79902. function TCAN1_C1FIFOINT30.getRXNEMPTYIE : TBits_1; inline;
  79903. begin
  79904. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  79905. end;
  79906. procedure TCAN1_C1FIFOINT30.setRXHALFIE; inline;
  79907. begin
  79908. pTDefRegMap(@Self)^.&set := $00020000;
  79909. end;
  79910. procedure TCAN1_C1FIFOINT30.clearRXHALFIE; inline;
  79911. begin
  79912. pTDefRegMap(@Self)^.clr := $00020000;
  79913. end;
  79914. procedure TCAN1_C1FIFOINT30.setRXHALFIE(thebits : TBits_1); inline;
  79915. begin
  79916. if thebits = 0 then
  79917. pTDefRegMap(@Self)^.clr := $00020000
  79918. else
  79919. pTDefRegMap(@Self)^.&set := $00020000;
  79920. end;
  79921. function TCAN1_C1FIFOINT30.getRXHALFIE : TBits_1; inline;
  79922. begin
  79923. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  79924. end;
  79925. procedure TCAN1_C1FIFOINT30.setRXFULLIE; inline;
  79926. begin
  79927. pTDefRegMap(@Self)^.&set := $00040000;
  79928. end;
  79929. procedure TCAN1_C1FIFOINT30.clearRXFULLIE; inline;
  79930. begin
  79931. pTDefRegMap(@Self)^.clr := $00040000;
  79932. end;
  79933. procedure TCAN1_C1FIFOINT30.setRXFULLIE(thebits : TBits_1); inline;
  79934. begin
  79935. if thebits = 0 then
  79936. pTDefRegMap(@Self)^.clr := $00040000
  79937. else
  79938. pTDefRegMap(@Self)^.&set := $00040000;
  79939. end;
  79940. function TCAN1_C1FIFOINT30.getRXFULLIE : TBits_1; inline;
  79941. begin
  79942. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  79943. end;
  79944. procedure TCAN1_C1FIFOINT30.setRXOVFLIE; inline;
  79945. begin
  79946. pTDefRegMap(@Self)^.&set := $00080000;
  79947. end;
  79948. procedure TCAN1_C1FIFOINT30.clearRXOVFLIE; inline;
  79949. begin
  79950. pTDefRegMap(@Self)^.clr := $00080000;
  79951. end;
  79952. procedure TCAN1_C1FIFOINT30.setRXOVFLIE(thebits : TBits_1); inline;
  79953. begin
  79954. if thebits = 0 then
  79955. pTDefRegMap(@Self)^.clr := $00080000
  79956. else
  79957. pTDefRegMap(@Self)^.&set := $00080000;
  79958. end;
  79959. function TCAN1_C1FIFOINT30.getRXOVFLIE : TBits_1; inline;
  79960. begin
  79961. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  79962. end;
  79963. procedure TCAN1_C1FIFOINT30.setTXEMPTYIE; inline;
  79964. begin
  79965. pTDefRegMap(@Self)^.&set := $01000000;
  79966. end;
  79967. procedure TCAN1_C1FIFOINT30.clearTXEMPTYIE; inline;
  79968. begin
  79969. pTDefRegMap(@Self)^.clr := $01000000;
  79970. end;
  79971. procedure TCAN1_C1FIFOINT30.setTXEMPTYIE(thebits : TBits_1); inline;
  79972. begin
  79973. if thebits = 0 then
  79974. pTDefRegMap(@Self)^.clr := $01000000
  79975. else
  79976. pTDefRegMap(@Self)^.&set := $01000000;
  79977. end;
  79978. function TCAN1_C1FIFOINT30.getTXEMPTYIE : TBits_1; inline;
  79979. begin
  79980. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  79981. end;
  79982. procedure TCAN1_C1FIFOINT30.setTXHALFIE; inline;
  79983. begin
  79984. pTDefRegMap(@Self)^.&set := $02000000;
  79985. end;
  79986. procedure TCAN1_C1FIFOINT30.clearTXHALFIE; inline;
  79987. begin
  79988. pTDefRegMap(@Self)^.clr := $02000000;
  79989. end;
  79990. procedure TCAN1_C1FIFOINT30.setTXHALFIE(thebits : TBits_1); inline;
  79991. begin
  79992. if thebits = 0 then
  79993. pTDefRegMap(@Self)^.clr := $02000000
  79994. else
  79995. pTDefRegMap(@Self)^.&set := $02000000;
  79996. end;
  79997. function TCAN1_C1FIFOINT30.getTXHALFIE : TBits_1; inline;
  79998. begin
  79999. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  80000. end;
  80001. procedure TCAN1_C1FIFOINT30.setTXNFULLIE; inline;
  80002. begin
  80003. pTDefRegMap(@Self)^.&set := $04000000;
  80004. end;
  80005. procedure TCAN1_C1FIFOINT30.clearTXNFULLIE; inline;
  80006. begin
  80007. pTDefRegMap(@Self)^.clr := $04000000;
  80008. end;
  80009. procedure TCAN1_C1FIFOINT30.setTXNFULLIE(thebits : TBits_1); inline;
  80010. begin
  80011. if thebits = 0 then
  80012. pTDefRegMap(@Self)^.clr := $04000000
  80013. else
  80014. pTDefRegMap(@Self)^.&set := $04000000;
  80015. end;
  80016. function TCAN1_C1FIFOINT30.getTXNFULLIE : TBits_1; inline;
  80017. begin
  80018. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  80019. end;
  80020. procedure TCAN1_C1FIFOINT30.setw(thebits : TBits_32); inline;
  80021. begin
  80022. pTDefRegMap(@Self)^.val := thebits;
  80023. end;
  80024. function TCAN1_C1FIFOINT30.getw : TBits_32; inline;
  80025. begin
  80026. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80027. end;
  80028. procedure TCAN1_C1FIFOCI30.setCFIFOCI(thebits : TBits_5); inline;
  80029. begin
  80030. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  80031. end;
  80032. function TCAN1_C1FIFOCI30.getCFIFOCI : TBits_5; inline;
  80033. begin
  80034. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  80035. end;
  80036. procedure TCAN1_C1FIFOCI30.setw(thebits : TBits_32); inline;
  80037. begin
  80038. pTDefRegMap(@Self)^.val := thebits;
  80039. end;
  80040. function TCAN1_C1FIFOCI30.getw : TBits_32; inline;
  80041. begin
  80042. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80043. end;
  80044. procedure TCAN1_C1FIFOCON31.setTXPRI(thebits : TBits_2); inline;
  80045. begin
  80046. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  80047. end;
  80048. function TCAN1_C1FIFOCON31.getTXPRI : TBits_2; inline;
  80049. begin
  80050. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  80051. end;
  80052. procedure TCAN1_C1FIFOCON31.setRTREN; inline;
  80053. begin
  80054. pTDefRegMap(@Self)^.&set := $00000004;
  80055. end;
  80056. procedure TCAN1_C1FIFOCON31.clearRTREN; inline;
  80057. begin
  80058. pTDefRegMap(@Self)^.clr := $00000004;
  80059. end;
  80060. procedure TCAN1_C1FIFOCON31.setRTREN(thebits : TBits_1); inline;
  80061. begin
  80062. if thebits = 0 then
  80063. pTDefRegMap(@Self)^.clr := $00000004
  80064. else
  80065. pTDefRegMap(@Self)^.&set := $00000004;
  80066. end;
  80067. function TCAN1_C1FIFOCON31.getRTREN : TBits_1; inline;
  80068. begin
  80069. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  80070. end;
  80071. procedure TCAN1_C1FIFOCON31.setTXREQ; inline;
  80072. begin
  80073. pTDefRegMap(@Self)^.&set := $00000008;
  80074. end;
  80075. procedure TCAN1_C1FIFOCON31.clearTXREQ; inline;
  80076. begin
  80077. pTDefRegMap(@Self)^.clr := $00000008;
  80078. end;
  80079. procedure TCAN1_C1FIFOCON31.setTXREQ(thebits : TBits_1); inline;
  80080. begin
  80081. if thebits = 0 then
  80082. pTDefRegMap(@Self)^.clr := $00000008
  80083. else
  80084. pTDefRegMap(@Self)^.&set := $00000008;
  80085. end;
  80086. function TCAN1_C1FIFOCON31.getTXREQ : TBits_1; inline;
  80087. begin
  80088. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  80089. end;
  80090. procedure TCAN1_C1FIFOCON31.setTXERR; inline;
  80091. begin
  80092. pTDefRegMap(@Self)^.&set := $00000010;
  80093. end;
  80094. procedure TCAN1_C1FIFOCON31.clearTXERR; inline;
  80095. begin
  80096. pTDefRegMap(@Self)^.clr := $00000010;
  80097. end;
  80098. procedure TCAN1_C1FIFOCON31.setTXERR(thebits : TBits_1); inline;
  80099. begin
  80100. if thebits = 0 then
  80101. pTDefRegMap(@Self)^.clr := $00000010
  80102. else
  80103. pTDefRegMap(@Self)^.&set := $00000010;
  80104. end;
  80105. function TCAN1_C1FIFOCON31.getTXERR : TBits_1; inline;
  80106. begin
  80107. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  80108. end;
  80109. procedure TCAN1_C1FIFOCON31.setTXLARB; inline;
  80110. begin
  80111. pTDefRegMap(@Self)^.&set := $00000020;
  80112. end;
  80113. procedure TCAN1_C1FIFOCON31.clearTXLARB; inline;
  80114. begin
  80115. pTDefRegMap(@Self)^.clr := $00000020;
  80116. end;
  80117. procedure TCAN1_C1FIFOCON31.setTXLARB(thebits : TBits_1); inline;
  80118. begin
  80119. if thebits = 0 then
  80120. pTDefRegMap(@Self)^.clr := $00000020
  80121. else
  80122. pTDefRegMap(@Self)^.&set := $00000020;
  80123. end;
  80124. function TCAN1_C1FIFOCON31.getTXLARB : TBits_1; inline;
  80125. begin
  80126. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  80127. end;
  80128. procedure TCAN1_C1FIFOCON31.setTXABAT; inline;
  80129. begin
  80130. pTDefRegMap(@Self)^.&set := $00000040;
  80131. end;
  80132. procedure TCAN1_C1FIFOCON31.clearTXABAT; inline;
  80133. begin
  80134. pTDefRegMap(@Self)^.clr := $00000040;
  80135. end;
  80136. procedure TCAN1_C1FIFOCON31.setTXABAT(thebits : TBits_1); inline;
  80137. begin
  80138. if thebits = 0 then
  80139. pTDefRegMap(@Self)^.clr := $00000040
  80140. else
  80141. pTDefRegMap(@Self)^.&set := $00000040;
  80142. end;
  80143. function TCAN1_C1FIFOCON31.getTXABAT : TBits_1; inline;
  80144. begin
  80145. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  80146. end;
  80147. procedure TCAN1_C1FIFOCON31.setTXEN; inline;
  80148. begin
  80149. pTDefRegMap(@Self)^.&set := $00000080;
  80150. end;
  80151. procedure TCAN1_C1FIFOCON31.clearTXEN; inline;
  80152. begin
  80153. pTDefRegMap(@Self)^.clr := $00000080;
  80154. end;
  80155. procedure TCAN1_C1FIFOCON31.setTXEN(thebits : TBits_1); inline;
  80156. begin
  80157. if thebits = 0 then
  80158. pTDefRegMap(@Self)^.clr := $00000080
  80159. else
  80160. pTDefRegMap(@Self)^.&set := $00000080;
  80161. end;
  80162. function TCAN1_C1FIFOCON31.getTXEN : TBits_1; inline;
  80163. begin
  80164. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  80165. end;
  80166. procedure TCAN1_C1FIFOCON31.setDONLY; inline;
  80167. begin
  80168. pTDefRegMap(@Self)^.&set := $00001000;
  80169. end;
  80170. procedure TCAN1_C1FIFOCON31.clearDONLY; inline;
  80171. begin
  80172. pTDefRegMap(@Self)^.clr := $00001000;
  80173. end;
  80174. procedure TCAN1_C1FIFOCON31.setDONLY(thebits : TBits_1); inline;
  80175. begin
  80176. if thebits = 0 then
  80177. pTDefRegMap(@Self)^.clr := $00001000
  80178. else
  80179. pTDefRegMap(@Self)^.&set := $00001000;
  80180. end;
  80181. function TCAN1_C1FIFOCON31.getDONLY : TBits_1; inline;
  80182. begin
  80183. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  80184. end;
  80185. procedure TCAN1_C1FIFOCON31.setUINC; inline;
  80186. begin
  80187. pTDefRegMap(@Self)^.&set := $00002000;
  80188. end;
  80189. procedure TCAN1_C1FIFOCON31.clearUINC; inline;
  80190. begin
  80191. pTDefRegMap(@Self)^.clr := $00002000;
  80192. end;
  80193. procedure TCAN1_C1FIFOCON31.setUINC(thebits : TBits_1); inline;
  80194. begin
  80195. if thebits = 0 then
  80196. pTDefRegMap(@Self)^.clr := $00002000
  80197. else
  80198. pTDefRegMap(@Self)^.&set := $00002000;
  80199. end;
  80200. function TCAN1_C1FIFOCON31.getUINC : TBits_1; inline;
  80201. begin
  80202. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  80203. end;
  80204. procedure TCAN1_C1FIFOCON31.setFRESET; inline;
  80205. begin
  80206. pTDefRegMap(@Self)^.&set := $00004000;
  80207. end;
  80208. procedure TCAN1_C1FIFOCON31.clearFRESET; inline;
  80209. begin
  80210. pTDefRegMap(@Self)^.clr := $00004000;
  80211. end;
  80212. procedure TCAN1_C1FIFOCON31.setFRESET(thebits : TBits_1); inline;
  80213. begin
  80214. if thebits = 0 then
  80215. pTDefRegMap(@Self)^.clr := $00004000
  80216. else
  80217. pTDefRegMap(@Self)^.&set := $00004000;
  80218. end;
  80219. function TCAN1_C1FIFOCON31.getFRESET : TBits_1; inline;
  80220. begin
  80221. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  80222. end;
  80223. procedure TCAN1_C1FIFOCON31.setFSIZE(thebits : TBits_5); inline;
  80224. begin
  80225. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  80226. end;
  80227. function TCAN1_C1FIFOCON31.getFSIZE : TBits_5; inline;
  80228. begin
  80229. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  80230. end;
  80231. procedure TCAN1_C1FIFOCON31.setw(thebits : TBits_32); inline;
  80232. begin
  80233. pTDefRegMap(@Self)^.val := thebits;
  80234. end;
  80235. function TCAN1_C1FIFOCON31.getw : TBits_32; inline;
  80236. begin
  80237. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80238. end;
  80239. procedure TCAN1_C1FIFOINT31.setRXNEMPTYIF; inline;
  80240. begin
  80241. pTDefRegMap(@Self)^.&set := $00000001;
  80242. end;
  80243. procedure TCAN1_C1FIFOINT31.clearRXNEMPTYIF; inline;
  80244. begin
  80245. pTDefRegMap(@Self)^.clr := $00000001;
  80246. end;
  80247. procedure TCAN1_C1FIFOINT31.setRXNEMPTYIF(thebits : TBits_1); inline;
  80248. begin
  80249. if thebits = 0 then
  80250. pTDefRegMap(@Self)^.clr := $00000001
  80251. else
  80252. pTDefRegMap(@Self)^.&set := $00000001;
  80253. end;
  80254. function TCAN1_C1FIFOINT31.getRXNEMPTYIF : TBits_1; inline;
  80255. begin
  80256. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  80257. end;
  80258. procedure TCAN1_C1FIFOINT31.setRXHALFIF; inline;
  80259. begin
  80260. pTDefRegMap(@Self)^.&set := $00000002;
  80261. end;
  80262. procedure TCAN1_C1FIFOINT31.clearRXHALFIF; inline;
  80263. begin
  80264. pTDefRegMap(@Self)^.clr := $00000002;
  80265. end;
  80266. procedure TCAN1_C1FIFOINT31.setRXHALFIF(thebits : TBits_1); inline;
  80267. begin
  80268. if thebits = 0 then
  80269. pTDefRegMap(@Self)^.clr := $00000002
  80270. else
  80271. pTDefRegMap(@Self)^.&set := $00000002;
  80272. end;
  80273. function TCAN1_C1FIFOINT31.getRXHALFIF : TBits_1; inline;
  80274. begin
  80275. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  80276. end;
  80277. procedure TCAN1_C1FIFOINT31.setRXFULLIF; inline;
  80278. begin
  80279. pTDefRegMap(@Self)^.&set := $00000004;
  80280. end;
  80281. procedure TCAN1_C1FIFOINT31.clearRXFULLIF; inline;
  80282. begin
  80283. pTDefRegMap(@Self)^.clr := $00000004;
  80284. end;
  80285. procedure TCAN1_C1FIFOINT31.setRXFULLIF(thebits : TBits_1); inline;
  80286. begin
  80287. if thebits = 0 then
  80288. pTDefRegMap(@Self)^.clr := $00000004
  80289. else
  80290. pTDefRegMap(@Self)^.&set := $00000004;
  80291. end;
  80292. function TCAN1_C1FIFOINT31.getRXFULLIF : TBits_1; inline;
  80293. begin
  80294. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  80295. end;
  80296. procedure TCAN1_C1FIFOINT31.setRXOVFLIF; inline;
  80297. begin
  80298. pTDefRegMap(@Self)^.&set := $00000008;
  80299. end;
  80300. procedure TCAN1_C1FIFOINT31.clearRXOVFLIF; inline;
  80301. begin
  80302. pTDefRegMap(@Self)^.clr := $00000008;
  80303. end;
  80304. procedure TCAN1_C1FIFOINT31.setRXOVFLIF(thebits : TBits_1); inline;
  80305. begin
  80306. if thebits = 0 then
  80307. pTDefRegMap(@Self)^.clr := $00000008
  80308. else
  80309. pTDefRegMap(@Self)^.&set := $00000008;
  80310. end;
  80311. function TCAN1_C1FIFOINT31.getRXOVFLIF : TBits_1; inline;
  80312. begin
  80313. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  80314. end;
  80315. procedure TCAN1_C1FIFOINT31.setTXEMPTYIF; inline;
  80316. begin
  80317. pTDefRegMap(@Self)^.&set := $00000100;
  80318. end;
  80319. procedure TCAN1_C1FIFOINT31.clearTXEMPTYIF; inline;
  80320. begin
  80321. pTDefRegMap(@Self)^.clr := $00000100;
  80322. end;
  80323. procedure TCAN1_C1FIFOINT31.setTXEMPTYIF(thebits : TBits_1); inline;
  80324. begin
  80325. if thebits = 0 then
  80326. pTDefRegMap(@Self)^.clr := $00000100
  80327. else
  80328. pTDefRegMap(@Self)^.&set := $00000100;
  80329. end;
  80330. function TCAN1_C1FIFOINT31.getTXEMPTYIF : TBits_1; inline;
  80331. begin
  80332. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  80333. end;
  80334. procedure TCAN1_C1FIFOINT31.setTXHALFIF; inline;
  80335. begin
  80336. pTDefRegMap(@Self)^.&set := $00000200;
  80337. end;
  80338. procedure TCAN1_C1FIFOINT31.clearTXHALFIF; inline;
  80339. begin
  80340. pTDefRegMap(@Self)^.clr := $00000200;
  80341. end;
  80342. procedure TCAN1_C1FIFOINT31.setTXHALFIF(thebits : TBits_1); inline;
  80343. begin
  80344. if thebits = 0 then
  80345. pTDefRegMap(@Self)^.clr := $00000200
  80346. else
  80347. pTDefRegMap(@Self)^.&set := $00000200;
  80348. end;
  80349. function TCAN1_C1FIFOINT31.getTXHALFIF : TBits_1; inline;
  80350. begin
  80351. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  80352. end;
  80353. procedure TCAN1_C1FIFOINT31.setTXNFULLIF; inline;
  80354. begin
  80355. pTDefRegMap(@Self)^.&set := $00000400;
  80356. end;
  80357. procedure TCAN1_C1FIFOINT31.clearTXNFULLIF; inline;
  80358. begin
  80359. pTDefRegMap(@Self)^.clr := $00000400;
  80360. end;
  80361. procedure TCAN1_C1FIFOINT31.setTXNFULLIF(thebits : TBits_1); inline;
  80362. begin
  80363. if thebits = 0 then
  80364. pTDefRegMap(@Self)^.clr := $00000400
  80365. else
  80366. pTDefRegMap(@Self)^.&set := $00000400;
  80367. end;
  80368. function TCAN1_C1FIFOINT31.getTXNFULLIF : TBits_1; inline;
  80369. begin
  80370. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  80371. end;
  80372. procedure TCAN1_C1FIFOINT31.setRXNEMPTYIE; inline;
  80373. begin
  80374. pTDefRegMap(@Self)^.&set := $00010000;
  80375. end;
  80376. procedure TCAN1_C1FIFOINT31.clearRXNEMPTYIE; inline;
  80377. begin
  80378. pTDefRegMap(@Self)^.clr := $00010000;
  80379. end;
  80380. procedure TCAN1_C1FIFOINT31.setRXNEMPTYIE(thebits : TBits_1); inline;
  80381. begin
  80382. if thebits = 0 then
  80383. pTDefRegMap(@Self)^.clr := $00010000
  80384. else
  80385. pTDefRegMap(@Self)^.&set := $00010000;
  80386. end;
  80387. function TCAN1_C1FIFOINT31.getRXNEMPTYIE : TBits_1; inline;
  80388. begin
  80389. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  80390. end;
  80391. procedure TCAN1_C1FIFOINT31.setRXHALFIE; inline;
  80392. begin
  80393. pTDefRegMap(@Self)^.&set := $00020000;
  80394. end;
  80395. procedure TCAN1_C1FIFOINT31.clearRXHALFIE; inline;
  80396. begin
  80397. pTDefRegMap(@Self)^.clr := $00020000;
  80398. end;
  80399. procedure TCAN1_C1FIFOINT31.setRXHALFIE(thebits : TBits_1); inline;
  80400. begin
  80401. if thebits = 0 then
  80402. pTDefRegMap(@Self)^.clr := $00020000
  80403. else
  80404. pTDefRegMap(@Self)^.&set := $00020000;
  80405. end;
  80406. function TCAN1_C1FIFOINT31.getRXHALFIE : TBits_1; inline;
  80407. begin
  80408. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  80409. end;
  80410. procedure TCAN1_C1FIFOINT31.setRXFULLIE; inline;
  80411. begin
  80412. pTDefRegMap(@Self)^.&set := $00040000;
  80413. end;
  80414. procedure TCAN1_C1FIFOINT31.clearRXFULLIE; inline;
  80415. begin
  80416. pTDefRegMap(@Self)^.clr := $00040000;
  80417. end;
  80418. procedure TCAN1_C1FIFOINT31.setRXFULLIE(thebits : TBits_1); inline;
  80419. begin
  80420. if thebits = 0 then
  80421. pTDefRegMap(@Self)^.clr := $00040000
  80422. else
  80423. pTDefRegMap(@Self)^.&set := $00040000;
  80424. end;
  80425. function TCAN1_C1FIFOINT31.getRXFULLIE : TBits_1; inline;
  80426. begin
  80427. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  80428. end;
  80429. procedure TCAN1_C1FIFOINT31.setRXOVFLIE; inline;
  80430. begin
  80431. pTDefRegMap(@Self)^.&set := $00080000;
  80432. end;
  80433. procedure TCAN1_C1FIFOINT31.clearRXOVFLIE; inline;
  80434. begin
  80435. pTDefRegMap(@Self)^.clr := $00080000;
  80436. end;
  80437. procedure TCAN1_C1FIFOINT31.setRXOVFLIE(thebits : TBits_1); inline;
  80438. begin
  80439. if thebits = 0 then
  80440. pTDefRegMap(@Self)^.clr := $00080000
  80441. else
  80442. pTDefRegMap(@Self)^.&set := $00080000;
  80443. end;
  80444. function TCAN1_C1FIFOINT31.getRXOVFLIE : TBits_1; inline;
  80445. begin
  80446. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  80447. end;
  80448. procedure TCAN1_C1FIFOINT31.setTXEMPTYIE; inline;
  80449. begin
  80450. pTDefRegMap(@Self)^.&set := $01000000;
  80451. end;
  80452. procedure TCAN1_C1FIFOINT31.clearTXEMPTYIE; inline;
  80453. begin
  80454. pTDefRegMap(@Self)^.clr := $01000000;
  80455. end;
  80456. procedure TCAN1_C1FIFOINT31.setTXEMPTYIE(thebits : TBits_1); inline;
  80457. begin
  80458. if thebits = 0 then
  80459. pTDefRegMap(@Self)^.clr := $01000000
  80460. else
  80461. pTDefRegMap(@Self)^.&set := $01000000;
  80462. end;
  80463. function TCAN1_C1FIFOINT31.getTXEMPTYIE : TBits_1; inline;
  80464. begin
  80465. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  80466. end;
  80467. procedure TCAN1_C1FIFOINT31.setTXHALFIE; inline;
  80468. begin
  80469. pTDefRegMap(@Self)^.&set := $02000000;
  80470. end;
  80471. procedure TCAN1_C1FIFOINT31.clearTXHALFIE; inline;
  80472. begin
  80473. pTDefRegMap(@Self)^.clr := $02000000;
  80474. end;
  80475. procedure TCAN1_C1FIFOINT31.setTXHALFIE(thebits : TBits_1); inline;
  80476. begin
  80477. if thebits = 0 then
  80478. pTDefRegMap(@Self)^.clr := $02000000
  80479. else
  80480. pTDefRegMap(@Self)^.&set := $02000000;
  80481. end;
  80482. function TCAN1_C1FIFOINT31.getTXHALFIE : TBits_1; inline;
  80483. begin
  80484. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  80485. end;
  80486. procedure TCAN1_C1FIFOINT31.setTXNFULLIE; inline;
  80487. begin
  80488. pTDefRegMap(@Self)^.&set := $04000000;
  80489. end;
  80490. procedure TCAN1_C1FIFOINT31.clearTXNFULLIE; inline;
  80491. begin
  80492. pTDefRegMap(@Self)^.clr := $04000000;
  80493. end;
  80494. procedure TCAN1_C1FIFOINT31.setTXNFULLIE(thebits : TBits_1); inline;
  80495. begin
  80496. if thebits = 0 then
  80497. pTDefRegMap(@Self)^.clr := $04000000
  80498. else
  80499. pTDefRegMap(@Self)^.&set := $04000000;
  80500. end;
  80501. function TCAN1_C1FIFOINT31.getTXNFULLIE : TBits_1; inline;
  80502. begin
  80503. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  80504. end;
  80505. procedure TCAN1_C1FIFOINT31.setw(thebits : TBits_32); inline;
  80506. begin
  80507. pTDefRegMap(@Self)^.val := thebits;
  80508. end;
  80509. function TCAN1_C1FIFOINT31.getw : TBits_32; inline;
  80510. begin
  80511. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80512. end;
  80513. procedure TCAN1_C1FIFOCI31.setCFIFOCI(thebits : TBits_5); inline;
  80514. begin
  80515. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  80516. end;
  80517. function TCAN1_C1FIFOCI31.getCFIFOCI : TBits_5; inline;
  80518. begin
  80519. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  80520. end;
  80521. procedure TCAN1_C1FIFOCI31.setw(thebits : TBits_32); inline;
  80522. begin
  80523. pTDefRegMap(@Self)^.val := thebits;
  80524. end;
  80525. function TCAN1_C1FIFOCI31.getw : TBits_32; inline;
  80526. begin
  80527. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80528. end;
  80529. procedure TDEVCFG_DEVCFG3.setUSERID(thebits : TBits_16); inline;
  80530. begin
  80531. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  80532. end;
  80533. function TDEVCFG_DEVCFG3.getUSERID : TBits_16; inline;
  80534. begin
  80535. getUSERID := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  80536. end;
  80537. procedure TDEVCFG_DEVCFG3.setFSRSSEL(thebits : TBits_3); inline;
  80538. begin
  80539. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF8FFFF or ( thebits shl 16 );
  80540. end;
  80541. function TDEVCFG_DEVCFG3.getFSRSSEL : TBits_3; inline;
  80542. begin
  80543. getFSRSSEL := (pTDefRegMap(@Self)^.val and $00070000) shr 16;
  80544. end;
  80545. procedure TDEVCFG_DEVCFG3.setFCANIO; inline;
  80546. begin
  80547. pTDefRegMap(@Self)^.&set := $04000000;
  80548. end;
  80549. procedure TDEVCFG_DEVCFG3.clearFCANIO; inline;
  80550. begin
  80551. pTDefRegMap(@Self)^.clr := $04000000;
  80552. end;
  80553. procedure TDEVCFG_DEVCFG3.setFCANIO(thebits : TBits_1); inline;
  80554. begin
  80555. if thebits = 0 then
  80556. pTDefRegMap(@Self)^.clr := $04000000
  80557. else
  80558. pTDefRegMap(@Self)^.&set := $04000000;
  80559. end;
  80560. function TDEVCFG_DEVCFG3.getFCANIO : TBits_1; inline;
  80561. begin
  80562. getFCANIO := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  80563. end;
  80564. procedure TDEVCFG_DEVCFG3.setFUSBIDIO; inline;
  80565. begin
  80566. pTDefRegMap(@Self)^.&set := $40000000;
  80567. end;
  80568. procedure TDEVCFG_DEVCFG3.clearFUSBIDIO; inline;
  80569. begin
  80570. pTDefRegMap(@Self)^.clr := $40000000;
  80571. end;
  80572. procedure TDEVCFG_DEVCFG3.setFUSBIDIO(thebits : TBits_1); inline;
  80573. begin
  80574. if thebits = 0 then
  80575. pTDefRegMap(@Self)^.clr := $40000000
  80576. else
  80577. pTDefRegMap(@Self)^.&set := $40000000;
  80578. end;
  80579. function TDEVCFG_DEVCFG3.getFUSBIDIO : TBits_1; inline;
  80580. begin
  80581. getFUSBIDIO := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  80582. end;
  80583. procedure TDEVCFG_DEVCFG3.setFVBUSONIO; inline;
  80584. begin
  80585. pTDefRegMap(@Self)^.&set := $80000000;
  80586. end;
  80587. procedure TDEVCFG_DEVCFG3.clearFVBUSONIO; inline;
  80588. begin
  80589. pTDefRegMap(@Self)^.clr := $80000000;
  80590. end;
  80591. procedure TDEVCFG_DEVCFG3.setFVBUSONIO(thebits : TBits_1); inline;
  80592. begin
  80593. if thebits = 0 then
  80594. pTDefRegMap(@Self)^.clr := $80000000
  80595. else
  80596. pTDefRegMap(@Self)^.&set := $80000000;
  80597. end;
  80598. function TDEVCFG_DEVCFG3.getFVBUSONIO : TBits_1; inline;
  80599. begin
  80600. getFVBUSONIO := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  80601. end;
  80602. procedure TDEVCFG_DEVCFG3.setw(thebits : TBits_32); inline;
  80603. begin
  80604. pTDefRegMap(@Self)^.val := thebits;
  80605. end;
  80606. function TDEVCFG_DEVCFG3.getw : TBits_32; inline;
  80607. begin
  80608. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80609. end;
  80610. procedure TDEVCFG_DEVCFG2.setFPLLIDIV(thebits : TBits_3); inline;
  80611. begin
  80612. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  80613. end;
  80614. function TDEVCFG_DEVCFG2.getFPLLIDIV : TBits_3; inline;
  80615. begin
  80616. getFPLLIDIV := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  80617. end;
  80618. procedure TDEVCFG_DEVCFG2.setFPLLMUL(thebits : TBits_3); inline;
  80619. begin
  80620. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF8F or ( thebits shl 4 );
  80621. end;
  80622. function TDEVCFG_DEVCFG2.getFPLLMUL : TBits_3; inline;
  80623. begin
  80624. getFPLLMUL := (pTDefRegMap(@Self)^.val and $00000070) shr 4;
  80625. end;
  80626. procedure TDEVCFG_DEVCFG2.setUPLLIDIV(thebits : TBits_3); inline;
  80627. begin
  80628. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF8FF or ( thebits shl 8 );
  80629. end;
  80630. function TDEVCFG_DEVCFG2.getUPLLIDIV : TBits_3; inline;
  80631. begin
  80632. getUPLLIDIV := (pTDefRegMap(@Self)^.val and $00000700) shr 8;
  80633. end;
  80634. procedure TDEVCFG_DEVCFG2.setUPLLEN; inline;
  80635. begin
  80636. pTDefRegMap(@Self)^.&set := $00008000;
  80637. end;
  80638. procedure TDEVCFG_DEVCFG2.clearUPLLEN; inline;
  80639. begin
  80640. pTDefRegMap(@Self)^.clr := $00008000;
  80641. end;
  80642. procedure TDEVCFG_DEVCFG2.setUPLLEN(thebits : TBits_1); inline;
  80643. begin
  80644. if thebits = 0 then
  80645. pTDefRegMap(@Self)^.clr := $00008000
  80646. else
  80647. pTDefRegMap(@Self)^.&set := $00008000;
  80648. end;
  80649. function TDEVCFG_DEVCFG2.getUPLLEN : TBits_1; inline;
  80650. begin
  80651. getUPLLEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  80652. end;
  80653. procedure TDEVCFG_DEVCFG2.setFPLLODIV(thebits : TBits_3); inline;
  80654. begin
  80655. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF8FFFF or ( thebits shl 16 );
  80656. end;
  80657. function TDEVCFG_DEVCFG2.getFPLLODIV : TBits_3; inline;
  80658. begin
  80659. getFPLLODIV := (pTDefRegMap(@Self)^.val and $00070000) shr 16;
  80660. end;
  80661. procedure TDEVCFG_DEVCFG2.setw(thebits : TBits_32); inline;
  80662. begin
  80663. pTDefRegMap(@Self)^.val := thebits;
  80664. end;
  80665. function TDEVCFG_DEVCFG2.getw : TBits_32; inline;
  80666. begin
  80667. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80668. end;
  80669. procedure TDEVCFG_DEVCFG1.setFNOSC(thebits : TBits_3); inline;
  80670. begin
  80671. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  80672. end;
  80673. function TDEVCFG_DEVCFG1.getFNOSC : TBits_3; inline;
  80674. begin
  80675. getFNOSC := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  80676. end;
  80677. procedure TDEVCFG_DEVCFG1.setFSOSCEN; inline;
  80678. begin
  80679. pTDefRegMap(@Self)^.&set := $00000020;
  80680. end;
  80681. procedure TDEVCFG_DEVCFG1.clearFSOSCEN; inline;
  80682. begin
  80683. pTDefRegMap(@Self)^.clr := $00000020;
  80684. end;
  80685. procedure TDEVCFG_DEVCFG1.setFSOSCEN(thebits : TBits_1); inline;
  80686. begin
  80687. if thebits = 0 then
  80688. pTDefRegMap(@Self)^.clr := $00000020
  80689. else
  80690. pTDefRegMap(@Self)^.&set := $00000020;
  80691. end;
  80692. function TDEVCFG_DEVCFG1.getFSOSCEN : TBits_1; inline;
  80693. begin
  80694. getFSOSCEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  80695. end;
  80696. procedure TDEVCFG_DEVCFG1.setIESO; inline;
  80697. begin
  80698. pTDefRegMap(@Self)^.&set := $00000080;
  80699. end;
  80700. procedure TDEVCFG_DEVCFG1.clearIESO; inline;
  80701. begin
  80702. pTDefRegMap(@Self)^.clr := $00000080;
  80703. end;
  80704. procedure TDEVCFG_DEVCFG1.setIESO(thebits : TBits_1); inline;
  80705. begin
  80706. if thebits = 0 then
  80707. pTDefRegMap(@Self)^.clr := $00000080
  80708. else
  80709. pTDefRegMap(@Self)^.&set := $00000080;
  80710. end;
  80711. function TDEVCFG_DEVCFG1.getIESO : TBits_1; inline;
  80712. begin
  80713. getIESO := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  80714. end;
  80715. procedure TDEVCFG_DEVCFG1.setPOSCMOD(thebits : TBits_2); inline;
  80716. begin
  80717. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  80718. end;
  80719. function TDEVCFG_DEVCFG1.getPOSCMOD : TBits_2; inline;
  80720. begin
  80721. getPOSCMOD := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  80722. end;
  80723. procedure TDEVCFG_DEVCFG1.setOSCIOFNC; inline;
  80724. begin
  80725. pTDefRegMap(@Self)^.&set := $00000400;
  80726. end;
  80727. procedure TDEVCFG_DEVCFG1.clearOSCIOFNC; inline;
  80728. begin
  80729. pTDefRegMap(@Self)^.clr := $00000400;
  80730. end;
  80731. procedure TDEVCFG_DEVCFG1.setOSCIOFNC(thebits : TBits_1); inline;
  80732. begin
  80733. if thebits = 0 then
  80734. pTDefRegMap(@Self)^.clr := $00000400
  80735. else
  80736. pTDefRegMap(@Self)^.&set := $00000400;
  80737. end;
  80738. function TDEVCFG_DEVCFG1.getOSCIOFNC : TBits_1; inline;
  80739. begin
  80740. getOSCIOFNC := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  80741. end;
  80742. procedure TDEVCFG_DEVCFG1.setFPBDIV(thebits : TBits_2); inline;
  80743. begin
  80744. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFCFFF or ( thebits shl 12 );
  80745. end;
  80746. function TDEVCFG_DEVCFG1.getFPBDIV : TBits_2; inline;
  80747. begin
  80748. getFPBDIV := (pTDefRegMap(@Self)^.val and $00003000) shr 12;
  80749. end;
  80750. procedure TDEVCFG_DEVCFG1.setFCKSM(thebits : TBits_2); inline;
  80751. begin
  80752. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  80753. end;
  80754. function TDEVCFG_DEVCFG1.getFCKSM : TBits_2; inline;
  80755. begin
  80756. getFCKSM := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  80757. end;
  80758. procedure TDEVCFG_DEVCFG1.setWDTPS(thebits : TBits_5); inline;
  80759. begin
  80760. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  80761. end;
  80762. function TDEVCFG_DEVCFG1.getWDTPS : TBits_5; inline;
  80763. begin
  80764. getWDTPS := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  80765. end;
  80766. procedure TDEVCFG_DEVCFG1.setFWDTEN; inline;
  80767. begin
  80768. pTDefRegMap(@Self)^.&set := $00800000;
  80769. end;
  80770. procedure TDEVCFG_DEVCFG1.clearFWDTEN; inline;
  80771. begin
  80772. pTDefRegMap(@Self)^.clr := $00800000;
  80773. end;
  80774. procedure TDEVCFG_DEVCFG1.setFWDTEN(thebits : TBits_1); inline;
  80775. begin
  80776. if thebits = 0 then
  80777. pTDefRegMap(@Self)^.clr := $00800000
  80778. else
  80779. pTDefRegMap(@Self)^.&set := $00800000;
  80780. end;
  80781. function TDEVCFG_DEVCFG1.getFWDTEN : TBits_1; inline;
  80782. begin
  80783. getFWDTEN := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  80784. end;
  80785. procedure TDEVCFG_DEVCFG1.setw(thebits : TBits_32); inline;
  80786. begin
  80787. pTDefRegMap(@Self)^.val := thebits;
  80788. end;
  80789. function TDEVCFG_DEVCFG1.getw : TBits_32; inline;
  80790. begin
  80791. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80792. end;
  80793. procedure TDEVCFG_DEVCFG0.setDEBUG(thebits : TBits_2); inline;
  80794. begin
  80795. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  80796. end;
  80797. function TDEVCFG_DEVCFG0.getDEBUG : TBits_2; inline;
  80798. begin
  80799. getDEBUG := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  80800. end;
  80801. procedure TDEVCFG_DEVCFG0.setICESEL; inline;
  80802. begin
  80803. pTDefRegMap(@Self)^.&set := $00000008;
  80804. end;
  80805. procedure TDEVCFG_DEVCFG0.clearICESEL; inline;
  80806. begin
  80807. pTDefRegMap(@Self)^.clr := $00000008;
  80808. end;
  80809. procedure TDEVCFG_DEVCFG0.setICESEL(thebits : TBits_1); inline;
  80810. begin
  80811. if thebits = 0 then
  80812. pTDefRegMap(@Self)^.clr := $00000008
  80813. else
  80814. pTDefRegMap(@Self)^.&set := $00000008;
  80815. end;
  80816. function TDEVCFG_DEVCFG0.getICESEL : TBits_1; inline;
  80817. begin
  80818. getICESEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  80819. end;
  80820. procedure TDEVCFG_DEVCFG0.setPWP(thebits : TBits_8); inline;
  80821. begin
  80822. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF00FFF or ( thebits shl 12 );
  80823. end;
  80824. function TDEVCFG_DEVCFG0.getPWP : TBits_8; inline;
  80825. begin
  80826. getPWP := (pTDefRegMap(@Self)^.val and $000FF000) shr 12;
  80827. end;
  80828. procedure TDEVCFG_DEVCFG0.setBWP; inline;
  80829. begin
  80830. pTDefRegMap(@Self)^.&set := $01000000;
  80831. end;
  80832. procedure TDEVCFG_DEVCFG0.clearBWP; inline;
  80833. begin
  80834. pTDefRegMap(@Self)^.clr := $01000000;
  80835. end;
  80836. procedure TDEVCFG_DEVCFG0.setBWP(thebits : TBits_1); inline;
  80837. begin
  80838. if thebits = 0 then
  80839. pTDefRegMap(@Self)^.clr := $01000000
  80840. else
  80841. pTDefRegMap(@Self)^.&set := $01000000;
  80842. end;
  80843. function TDEVCFG_DEVCFG0.getBWP : TBits_1; inline;
  80844. begin
  80845. getBWP := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  80846. end;
  80847. procedure TDEVCFG_DEVCFG0.setCP; inline;
  80848. begin
  80849. pTDefRegMap(@Self)^.&set := $10000000;
  80850. end;
  80851. procedure TDEVCFG_DEVCFG0.clearCP; inline;
  80852. begin
  80853. pTDefRegMap(@Self)^.clr := $10000000;
  80854. end;
  80855. procedure TDEVCFG_DEVCFG0.setCP(thebits : TBits_1); inline;
  80856. begin
  80857. if thebits = 0 then
  80858. pTDefRegMap(@Self)^.clr := $10000000
  80859. else
  80860. pTDefRegMap(@Self)^.&set := $10000000;
  80861. end;
  80862. function TDEVCFG_DEVCFG0.getCP : TBits_1; inline;
  80863. begin
  80864. getCP := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  80865. end;
  80866. procedure TDEVCFG_DEVCFG0.setFDEBUG(thebits : TBits_2); inline;
  80867. begin
  80868. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  80869. end;
  80870. function TDEVCFG_DEVCFG0.getFDEBUG : TBits_2; inline;
  80871. begin
  80872. getFDEBUG := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  80873. end;
  80874. procedure TDEVCFG_DEVCFG0.setw(thebits : TBits_32); inline;
  80875. begin
  80876. pTDefRegMap(@Self)^.val := thebits;
  80877. end;
  80878. function TDEVCFG_DEVCFG0.getw : TBits_32; inline;
  80879. begin
  80880. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80881. end;
  80882. procedure _CORE_TIMER_VECTOR_interrupt; external name '_CORE_TIMER_VECTOR_interrupt';
  80883. procedure _CORE_SOFTWARE_0_VECTOR_interrupt; external name '_CORE_SOFTWARE_0_VECTOR_interrupt';
  80884. procedure _CORE_SOFTWARE_1_VECTOR_interrupt; external name '_CORE_SOFTWARE_1_VECTOR_interrupt';
  80885. procedure _EXTERNAL_0_VECTOR_interrupt; external name '_EXTERNAL_0_VECTOR_interrupt';
  80886. procedure _TIMER_1_VECTOR_interrupt; external name '_TIMER_1_VECTOR_interrupt';
  80887. procedure _INPUT_CAPTURE_1_VECTOR_interrupt; external name '_INPUT_CAPTURE_1_VECTOR_interrupt';
  80888. procedure _OUTPUT_COMPARE_1_VECTOR_interrupt; external name '_OUTPUT_COMPARE_1_VECTOR_interrupt';
  80889. procedure _EXTERNAL_1_VECTOR_interrupt; external name '_EXTERNAL_1_VECTOR_interrupt';
  80890. procedure _TIMER_2_VECTOR_interrupt; external name '_TIMER_2_VECTOR_interrupt';
  80891. procedure _INPUT_CAPTURE_2_VECTOR_interrupt; external name '_INPUT_CAPTURE_2_VECTOR_interrupt';
  80892. procedure _OUTPUT_COMPARE_2_VECTOR_interrupt; external name '_OUTPUT_COMPARE_2_VECTOR_interrupt';
  80893. procedure _EXTERNAL_2_VECTOR_interrupt; external name '_EXTERNAL_2_VECTOR_interrupt';
  80894. procedure _TIMER_3_VECTOR_interrupt; external name '_TIMER_3_VECTOR_interrupt';
  80895. procedure _INPUT_CAPTURE_3_VECTOR_interrupt; external name '_INPUT_CAPTURE_3_VECTOR_interrupt';
  80896. procedure _OUTPUT_COMPARE_3_VECTOR_interrupt; external name '_OUTPUT_COMPARE_3_VECTOR_interrupt';
  80897. procedure _EXTERNAL_3_VECTOR_interrupt; external name '_EXTERNAL_3_VECTOR_interrupt';
  80898. procedure _TIMER_4_VECTOR_interrupt; external name '_TIMER_4_VECTOR_interrupt';
  80899. procedure _INPUT_CAPTURE_4_VECTOR_interrupt; external name '_INPUT_CAPTURE_4_VECTOR_interrupt';
  80900. procedure _OUTPUT_COMPARE_4_VECTOR_interrupt; external name '_OUTPUT_COMPARE_4_VECTOR_interrupt';
  80901. procedure _EXTERNAL_4_VECTOR_interrupt; external name '_EXTERNAL_4_VECTOR_interrupt';
  80902. procedure _TIMER_5_VECTOR_interrupt; external name '_TIMER_5_VECTOR_interrupt';
  80903. procedure _INPUT_CAPTURE_5_VECTOR_interrupt; external name '_INPUT_CAPTURE_5_VECTOR_interrupt';
  80904. procedure _OUTPUT_COMPARE_5_VECTOR_interrupt; external name '_OUTPUT_COMPARE_5_VECTOR_interrupt';
  80905. procedure _SPI_1A_VECTOR_interrupt; external name '_SPI_1A_VECTOR_interrupt';
  80906. procedure _UART_1_VECTOR_interrupt; external name '_UART_1_VECTOR_interrupt';
  80907. procedure _UART_1A_VECTOR_interrupt; external name '_UART_1A_VECTOR_interrupt';
  80908. procedure _I2C_3_VECTOR_interrupt; external name '_I2C_3_VECTOR_interrupt';
  80909. procedure _I2C_1A_VECTOR_interrupt; external name '_I2C_1A_VECTOR_interrupt';
  80910. procedure _SPI_3_VECTOR_interrupt; external name '_SPI_3_VECTOR_interrupt';
  80911. procedure _I2C_1_VECTOR_interrupt; external name '_I2C_1_VECTOR_interrupt';
  80912. procedure _CHANGE_NOTICE_VECTOR_interrupt; external name '_CHANGE_NOTICE_VECTOR_interrupt';
  80913. procedure _ADC_VECTOR_interrupt; external name '_ADC_VECTOR_interrupt';
  80914. procedure _PMP_VECTOR_interrupt; external name '_PMP_VECTOR_interrupt';
  80915. procedure _COMPARATOR_1_VECTOR_interrupt; external name '_COMPARATOR_1_VECTOR_interrupt';
  80916. procedure _COMPARATOR_2_VECTOR_interrupt; external name '_COMPARATOR_2_VECTOR_interrupt';
  80917. procedure _SPI_2A_VECTOR_interrupt; external name '_SPI_2A_VECTOR_interrupt';
  80918. procedure _UART_3_VECTOR_interrupt; external name '_UART_3_VECTOR_interrupt';
  80919. procedure _UART_2A_VECTOR_interrupt; external name '_UART_2A_VECTOR_interrupt';
  80920. procedure _I2C_4_VECTOR_interrupt; external name '_I2C_4_VECTOR_interrupt';
  80921. procedure _I2C_2A_VECTOR_interrupt; external name '_I2C_2A_VECTOR_interrupt';
  80922. procedure _SPI_2_VECTOR_interrupt; external name '_SPI_2_VECTOR_interrupt';
  80923. procedure _SPI_3A_VECTOR_interrupt; external name '_SPI_3A_VECTOR_interrupt';
  80924. procedure _UART_2_VECTOR_interrupt; external name '_UART_2_VECTOR_interrupt';
  80925. procedure _UART_3A_VECTOR_interrupt; external name '_UART_3A_VECTOR_interrupt';
  80926. procedure _I2C_5_VECTOR_interrupt; external name '_I2C_5_VECTOR_interrupt';
  80927. procedure _I2C_3A_VECTOR_interrupt; external name '_I2C_3A_VECTOR_interrupt';
  80928. procedure _SPI_4_VECTOR_interrupt; external name '_SPI_4_VECTOR_interrupt';
  80929. procedure _I2C_2_VECTOR_interrupt; external name '_I2C_2_VECTOR_interrupt';
  80930. procedure _FAIL_SAFE_MONITOR_VECTOR_interrupt; external name '_FAIL_SAFE_MONITOR_VECTOR_interrupt';
  80931. procedure _RTCC_VECTOR_interrupt; external name '_RTCC_VECTOR_interrupt';
  80932. procedure _DMA_0_VECTOR_interrupt; external name '_DMA_0_VECTOR_interrupt';
  80933. procedure _DMA_1_VECTOR_interrupt; external name '_DMA_1_VECTOR_interrupt';
  80934. procedure _DMA_2_VECTOR_interrupt; external name '_DMA_2_VECTOR_interrupt';
  80935. procedure _DMA_3_VECTOR_interrupt; external name '_DMA_3_VECTOR_interrupt';
  80936. procedure _FCE_VECTOR_interrupt; external name '_FCE_VECTOR_interrupt';
  80937. procedure _USB_1_VECTOR_interrupt; external name '_USB_1_VECTOR_interrupt';
  80938. procedure _CAN_1_VECTOR_interrupt; external name '_CAN_1_VECTOR_interrupt';
  80939. procedure _UART_1B_VECTOR_interrupt; external name '_UART_1B_VECTOR_interrupt';
  80940. procedure _UART_4_VECTOR_interrupt; external name '_UART_4_VECTOR_interrupt';
  80941. procedure _UART_2B_VECTOR_interrupt; external name '_UART_2B_VECTOR_interrupt';
  80942. procedure _UART_6_VECTOR_interrupt; external name '_UART_6_VECTOR_interrupt';
  80943. procedure _UART_3B_VECTOR_interrupt; external name '_UART_3B_VECTOR_interrupt';
  80944. procedure _UART_5_VECTOR_interrupt; external name '_UART_5_VECTOR_interrupt';
  80945. procedure Vectors; assembler; nostackframe;
  80946. label interrupt_vectors;
  80947. asm
  80948. .section ".init.interrupt_vectors,\"ax\",@progbits"
  80949. interrupt_vectors:
  80950. j _CORE_TIMER_VECTOR_interrupt
  80951. nop
  80952. nop
  80953. nop
  80954. nop
  80955. nop
  80956. nop
  80957. nop
  80958. j _CORE_SOFTWARE_0_VECTOR_interrupt
  80959. nop
  80960. nop
  80961. nop
  80962. nop
  80963. nop
  80964. nop
  80965. nop
  80966. j _CORE_SOFTWARE_1_VECTOR_interrupt
  80967. nop
  80968. nop
  80969. nop
  80970. nop
  80971. nop
  80972. nop
  80973. nop
  80974. j _EXTERNAL_0_VECTOR_interrupt
  80975. nop
  80976. nop
  80977. nop
  80978. nop
  80979. nop
  80980. nop
  80981. nop
  80982. j _TIMER_1_VECTOR_interrupt
  80983. nop
  80984. nop
  80985. nop
  80986. nop
  80987. nop
  80988. nop
  80989. nop
  80990. j _INPUT_CAPTURE_1_VECTOR_interrupt
  80991. nop
  80992. nop
  80993. nop
  80994. nop
  80995. nop
  80996. nop
  80997. nop
  80998. j _OUTPUT_COMPARE_1_VECTOR_interrupt
  80999. nop
  81000. nop
  81001. nop
  81002. nop
  81003. nop
  81004. nop
  81005. nop
  81006. j _EXTERNAL_1_VECTOR_interrupt
  81007. nop
  81008. nop
  81009. nop
  81010. nop
  81011. nop
  81012. nop
  81013. nop
  81014. j _TIMER_2_VECTOR_interrupt
  81015. nop
  81016. nop
  81017. nop
  81018. nop
  81019. nop
  81020. nop
  81021. nop
  81022. j _INPUT_CAPTURE_2_VECTOR_interrupt
  81023. nop
  81024. nop
  81025. nop
  81026. nop
  81027. nop
  81028. nop
  81029. nop
  81030. j _OUTPUT_COMPARE_2_VECTOR_interrupt
  81031. nop
  81032. nop
  81033. nop
  81034. nop
  81035. nop
  81036. nop
  81037. nop
  81038. j _EXTERNAL_2_VECTOR_interrupt
  81039. nop
  81040. nop
  81041. nop
  81042. nop
  81043. nop
  81044. nop
  81045. nop
  81046. j _TIMER_3_VECTOR_interrupt
  81047. nop
  81048. nop
  81049. nop
  81050. nop
  81051. nop
  81052. nop
  81053. nop
  81054. j _INPUT_CAPTURE_3_VECTOR_interrupt
  81055. nop
  81056. nop
  81057. nop
  81058. nop
  81059. nop
  81060. nop
  81061. nop
  81062. j _OUTPUT_COMPARE_3_VECTOR_interrupt
  81063. nop
  81064. nop
  81065. nop
  81066. nop
  81067. nop
  81068. nop
  81069. nop
  81070. j _EXTERNAL_3_VECTOR_interrupt
  81071. nop
  81072. nop
  81073. nop
  81074. nop
  81075. nop
  81076. nop
  81077. nop
  81078. j _TIMER_4_VECTOR_interrupt
  81079. nop
  81080. nop
  81081. nop
  81082. nop
  81083. nop
  81084. nop
  81085. nop
  81086. j _INPUT_CAPTURE_4_VECTOR_interrupt
  81087. nop
  81088. nop
  81089. nop
  81090. nop
  81091. nop
  81092. nop
  81093. nop
  81094. j _OUTPUT_COMPARE_4_VECTOR_interrupt
  81095. nop
  81096. nop
  81097. nop
  81098. nop
  81099. nop
  81100. nop
  81101. nop
  81102. j _EXTERNAL_4_VECTOR_interrupt
  81103. nop
  81104. nop
  81105. nop
  81106. nop
  81107. nop
  81108. nop
  81109. nop
  81110. j _TIMER_5_VECTOR_interrupt
  81111. nop
  81112. nop
  81113. nop
  81114. nop
  81115. nop
  81116. nop
  81117. nop
  81118. j _INPUT_CAPTURE_5_VECTOR_interrupt
  81119. nop
  81120. nop
  81121. nop
  81122. nop
  81123. nop
  81124. nop
  81125. nop
  81126. j _OUTPUT_COMPARE_5_VECTOR_interrupt
  81127. nop
  81128. nop
  81129. nop
  81130. nop
  81131. nop
  81132. nop
  81133. nop
  81134. nop
  81135. nop
  81136. nop
  81137. nop
  81138. nop
  81139. nop
  81140. nop
  81141. nop
  81142. j _SPI_1A_VECTOR_interrupt
  81143. nop
  81144. nop
  81145. nop
  81146. nop
  81147. nop
  81148. nop
  81149. nop
  81150. j _I2C_1_VECTOR_interrupt
  81151. nop
  81152. nop
  81153. nop
  81154. nop
  81155. nop
  81156. nop
  81157. nop
  81158. j _CHANGE_NOTICE_VECTOR_interrupt
  81159. nop
  81160. nop
  81161. nop
  81162. nop
  81163. nop
  81164. nop
  81165. nop
  81166. j _ADC_VECTOR_interrupt
  81167. nop
  81168. nop
  81169. nop
  81170. nop
  81171. nop
  81172. nop
  81173. nop
  81174. j _PMP_VECTOR_interrupt
  81175. nop
  81176. nop
  81177. nop
  81178. nop
  81179. nop
  81180. nop
  81181. nop
  81182. j _COMPARATOR_1_VECTOR_interrupt
  81183. nop
  81184. nop
  81185. nop
  81186. nop
  81187. nop
  81188. nop
  81189. nop
  81190. j _COMPARATOR_2_VECTOR_interrupt
  81191. nop
  81192. nop
  81193. nop
  81194. nop
  81195. nop
  81196. nop
  81197. nop
  81198. j _SPI_2A_VECTOR_interrupt
  81199. nop
  81200. nop
  81201. nop
  81202. nop
  81203. nop
  81204. nop
  81205. nop
  81206. j _SPI_3A_VECTOR_interrupt
  81207. nop
  81208. nop
  81209. nop
  81210. nop
  81211. nop
  81212. nop
  81213. nop
  81214. j _I2C_2_VECTOR_interrupt
  81215. nop
  81216. nop
  81217. nop
  81218. nop
  81219. nop
  81220. nop
  81221. nop
  81222. j _FAIL_SAFE_MONITOR_VECTOR_interrupt
  81223. nop
  81224. nop
  81225. nop
  81226. nop
  81227. nop
  81228. nop
  81229. nop
  81230. j _RTCC_VECTOR_interrupt
  81231. nop
  81232. nop
  81233. nop
  81234. nop
  81235. nop
  81236. nop
  81237. nop
  81238. j _DMA_0_VECTOR_interrupt
  81239. nop
  81240. nop
  81241. nop
  81242. nop
  81243. nop
  81244. nop
  81245. nop
  81246. j _DMA_1_VECTOR_interrupt
  81247. nop
  81248. nop
  81249. nop
  81250. nop
  81251. nop
  81252. nop
  81253. nop
  81254. j _DMA_2_VECTOR_interrupt
  81255. nop
  81256. nop
  81257. nop
  81258. nop
  81259. nop
  81260. nop
  81261. nop
  81262. j _DMA_3_VECTOR_interrupt
  81263. nop
  81264. nop
  81265. nop
  81266. nop
  81267. nop
  81268. nop
  81269. nop
  81270. nop
  81271. nop
  81272. nop
  81273. nop
  81274. nop
  81275. nop
  81276. nop
  81277. nop
  81278. nop
  81279. nop
  81280. nop
  81281. nop
  81282. nop
  81283. nop
  81284. nop
  81285. nop
  81286. nop
  81287. nop
  81288. nop
  81289. nop
  81290. nop
  81291. nop
  81292. nop
  81293. nop
  81294. nop
  81295. nop
  81296. nop
  81297. nop
  81298. nop
  81299. nop
  81300. nop
  81301. nop
  81302. j _FCE_VECTOR_interrupt
  81303. nop
  81304. nop
  81305. nop
  81306. nop
  81307. nop
  81308. nop
  81309. nop
  81310. j _USB_1_VECTOR_interrupt
  81311. nop
  81312. nop
  81313. nop
  81314. nop
  81315. nop
  81316. nop
  81317. nop
  81318. j _CAN_1_VECTOR_interrupt
  81319. nop
  81320. nop
  81321. nop
  81322. nop
  81323. nop
  81324. nop
  81325. nop
  81326. nop
  81327. nop
  81328. nop
  81329. nop
  81330. nop
  81331. nop
  81332. nop
  81333. nop
  81334. nop
  81335. nop
  81336. nop
  81337. nop
  81338. nop
  81339. nop
  81340. nop
  81341. nop
  81342. j _UART_1B_VECTOR_interrupt
  81343. nop
  81344. nop
  81345. nop
  81346. nop
  81347. nop
  81348. nop
  81349. nop
  81350. j _UART_2B_VECTOR_interrupt
  81351. nop
  81352. nop
  81353. nop
  81354. nop
  81355. nop
  81356. nop
  81357. nop
  81358. j _UART_3B_VECTOR_interrupt
  81359. nop
  81360. nop
  81361. nop
  81362. nop
  81363. nop
  81364. nop
  81365. nop
  81366. .weak _CORE_TIMER_VECTOR_interrupt
  81367. .weak _CORE_SOFTWARE_0_VECTOR_interrupt
  81368. .weak _CORE_SOFTWARE_1_VECTOR_interrupt
  81369. .weak _EXTERNAL_0_VECTOR_interrupt
  81370. .weak _TIMER_1_VECTOR_interrupt
  81371. .weak _INPUT_CAPTURE_1_VECTOR_interrupt
  81372. .weak _OUTPUT_COMPARE_1_VECTOR_interrupt
  81373. .weak _EXTERNAL_1_VECTOR_interrupt
  81374. .weak _TIMER_2_VECTOR_interrupt
  81375. .weak _INPUT_CAPTURE_2_VECTOR_interrupt
  81376. .weak _OUTPUT_COMPARE_2_VECTOR_interrupt
  81377. .weak _EXTERNAL_2_VECTOR_interrupt
  81378. .weak _TIMER_3_VECTOR_interrupt
  81379. .weak _INPUT_CAPTURE_3_VECTOR_interrupt
  81380. .weak _OUTPUT_COMPARE_3_VECTOR_interrupt
  81381. .weak _EXTERNAL_3_VECTOR_interrupt
  81382. .weak _TIMER_4_VECTOR_interrupt
  81383. .weak _INPUT_CAPTURE_4_VECTOR_interrupt
  81384. .weak _OUTPUT_COMPARE_4_VECTOR_interrupt
  81385. .weak _EXTERNAL_4_VECTOR_interrupt
  81386. .weak _TIMER_5_VECTOR_interrupt
  81387. .weak _INPUT_CAPTURE_5_VECTOR_interrupt
  81388. .weak _OUTPUT_COMPARE_5_VECTOR_interrupt
  81389. .weak _SPI_1A_VECTOR_interrupt
  81390. .weak _UART_1_VECTOR_interrupt
  81391. .weak _UART_1A_VECTOR_interrupt
  81392. .weak _I2C_3_VECTOR_interrupt
  81393. .weak _I2C_1A_VECTOR_interrupt
  81394. .weak _SPI_3_VECTOR_interrupt
  81395. .weak _I2C_1_VECTOR_interrupt
  81396. .weak _CHANGE_NOTICE_VECTOR_interrupt
  81397. .weak _ADC_VECTOR_interrupt
  81398. .weak _PMP_VECTOR_interrupt
  81399. .weak _COMPARATOR_1_VECTOR_interrupt
  81400. .weak _COMPARATOR_2_VECTOR_interrupt
  81401. .weak _SPI_2A_VECTOR_interrupt
  81402. .weak _UART_3_VECTOR_interrupt
  81403. .weak _UART_2A_VECTOR_interrupt
  81404. .weak _I2C_4_VECTOR_interrupt
  81405. .weak _I2C_2A_VECTOR_interrupt
  81406. .weak _SPI_2_VECTOR_interrupt
  81407. .weak _SPI_3A_VECTOR_interrupt
  81408. .weak _UART_2_VECTOR_interrupt
  81409. .weak _UART_3A_VECTOR_interrupt
  81410. .weak _I2C_5_VECTOR_interrupt
  81411. .weak _I2C_3A_VECTOR_interrupt
  81412. .weak _SPI_4_VECTOR_interrupt
  81413. .weak _I2C_2_VECTOR_interrupt
  81414. .weak _FAIL_SAFE_MONITOR_VECTOR_interrupt
  81415. .weak _RTCC_VECTOR_interrupt
  81416. .weak _DMA_0_VECTOR_interrupt
  81417. .weak _DMA_1_VECTOR_interrupt
  81418. .weak _DMA_2_VECTOR_interrupt
  81419. .weak _DMA_3_VECTOR_interrupt
  81420. .weak _FCE_VECTOR_interrupt
  81421. .weak _USB_1_VECTOR_interrupt
  81422. .weak _CAN_1_VECTOR_interrupt
  81423. .weak _UART_1B_VECTOR_interrupt
  81424. .weak _UART_4_VECTOR_interrupt
  81425. .weak _UART_2B_VECTOR_interrupt
  81426. .weak _UART_6_VECTOR_interrupt
  81427. .weak _UART_3B_VECTOR_interrupt
  81428. .weak _UART_5_VECTOR_interrupt
  81429. .text
  81430. end;
  81431. end.